-- -*- M2-comint -*- {* hash: 586987104 *} i1 : R = QQ[w,x,y,z]; i2 : H = hyperGraph(R, {{w,x},{w,y,z},{x,y,z}}); i3 : vertices H o3 = {w, x, y, z} o3 : List i4 : edges H o4 = {{w, x}, {w, y, z}, {x, y, z}} o4 : List i5 : ring H o5 = R o5 : PolynomialRing i6 :