-- -*- M2-comint -*- hash: 13841017577454016524

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

i2 : g = cycle S

o2 = Graph{"edges" => {{a, b}, {b, c}, {c, d}, {d, e}, {e, f}, {a, f}}}
           "ring" => S
           "vertices" => {a, b, c, d, e, f}

o2 : Graph

i3 : edges g

o3 = {{a, b}, {b, c}, {c, d}, {d, e}, {e, f}, {a, f}}

o3 : List

i4 : getEdge (g,3)  -- counting starts from 0, so the 4th element in the above list

o4 = {d, e}

o4 : List

i5 : h = hyperGraph {a*b*c*d,d*e,a*f*c,a*d*f}

o5 = HyperGraph{"edges" => {{a, b, c, d}, {d, e}, {a, c, f}, {a, d, f}}}
                "ring" => S
                "vertices" => {a, b, c, d, e, f}

o5 : HyperGraph

i6 : getEdge (h,0) -- first edge

o6 = {a, b, c, d}

o6 : List

i7 : 
