i1 : S=ZZ/101[x_0..x_3] o1 = S o1 : PolynomialRing |
i2 : (J,M)=pickGorensteinIdeal(S,{1,3,6,6,3,1});
|
i3 : hVector J
o3 = {1, 3, 6, 6, 3, 1}
o3 : List
|
i4 : hVector (S^{2}/J)
o4 = {-2, {1, 3, 6, 6, 3, 1}}
o4 : List
|
i5 : hVector 10
o5 = {1, 3, 6}
o5 : List
|