-- -*- M2-comint -*- hash: 7133968144081230914

i1 : M1 = matrix(QQ, {{1/3}})

o1 = | 1/3 |

              1       1
o1 : Matrix QQ  <-- QQ

i2 : alpha = makeGWuClass(M1)

               1
o2 = (| 1/3 |, -)
               3

o2 : UnstableGrothendieckWittClass

i3 : M2 = matrix(QQ, {{8/3}})

o3 = | 8/3 |

              1       1
o3 : Matrix QQ  <-- QQ

i4 : beta = makeGWuClass(M2)

               8
o4 = (| 8/3 |, -)
               3

o4 : UnstableGrothendieckWittClass

i5 : addGWuDivisorial({alpha, beta}, {-2, 1})

o5 = (| 1/3 0   |, 8)
      | 0   8/3 |

o5 : UnstableGrothendieckWittClass

i6 : 
