-- -*- M2-comint -*- {* hash: -563193299 *} i1 : S = QQ[a..d,DegreeRank => 4]; i2 : degrees S o2 = {{1, 0, 0, 0}, {0, 1, 0, 0}, {0, 0, 1, 0}, {0, 0, 0, 1}} o2 : List i3 : heft S o3 = {1, 1, 1, 1} o3 : List i4 :
-- -*- M2-comint -*- {* hash: -563193299 *} i1 : S = QQ[a..d,DegreeRank => 4]; i2 : degrees S o2 = {{1, 0, 0, 0}, {0, 1, 0, 0}, {0, 0, 1, 0}, {0, 0, 0, 1}} o2 : List i3 : heft S o3 = {1, 1, 1, 1} o3 : List i4 :