-- -*- M2-comint -*- {* hash: -1348596799 *}

i1 : R = QQ[a..f];

i2 : G = graph {a*b,b*c,c*a,b*d};

i3 : isLeaf(G, d)

o3 = true

i4 : isLeaf(G, getEdgeIndex(G, {b,d}))

o4 = true

i5 : isLeaf(G, a)

o5 = false

i6 : isLeaf(G, getEdgeIndex(G, {a,b}))

o6 = false

i7 : H = hyperGraph {a*b*c,b*d,c*e,b*c*f};

i8 : K = hyperGraph {a*b*c,b*d,c*e};

i9 : isLeaf(H, a)

o9 = true

i10 : isLeaf(H, getEdgeIndex(H, {a,b,c}))

o10 = true

i11 : isLeaf(K, a)

o11 = false

i12 : isLeaf(K, getEdgeIndex(K, {a,b,c}))

o12 = false

i13 :