-- -*- M2-comint -*- hash: 3212381219865550141

i1 : P=convexHull(matrix{{0,1}});

i2 : Q=convexHull(matrix{{0}});

i3 : A=latticePoints(cayley({P,Q}));

i4 : B=latticePoints(cayley({P,P}));

i5 : gaussFiber(A)

o5 = {1, x , x }
          1   0

o5 : List

i6 : gaussFiber(B)

o6 = {1}

o6 : List

i7 : 
