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