-- -*- M2-comint -*- hash: 44006984

i1 : B = threeDimSklyanin(QQ,{1,1,-1},{x,y,z})
--Calling Bergman for NCGB calculation.
Complete!

o1 = B

o1 : NCQuotientRing

i2 : M = ncMatrix {{x,y,z,0}, {-y*z-2*x^2,-y*x,z*x-x*z,x},{x*y-2*y*x,x*z,-x^2,y}, {-y^2-z*x,x^2,-x*y,z}}

o2 = | x          y    z         0 |
     | -y*z-2*x^2 -y*x y^2-2*x*z x |
     | -2*y*x+x*y x*z  -x^2      y |
     | -2*y^2+x*z x^2  -x*y      z |

o2 : NCMatrix

i3 : isHomogeneous M

o3 = false

i4 : assignDegrees(M,{1,0,0,0},{2,2,2,1})

o4 = | x          y    z         0 |
     | -y*z-2*x^2 -y*x y^2-2*x*z x |
     | -2*y*x+x*y x*z  -x^2      y |
     | -2*y^2+x*z x^2  -x*y      z |

o4 : NCMatrix

i5 : isHomogeneous M

o5 = true

i6 : N = ncMatrix {gens B}

o6 = | x y z |

o6 : NCMatrix

i7 : isHomogeneous N

o7 = true

i8 : 
