-- -*- M2-comint -*- hash: 17157255421645533470

i1 : R = QQ[w,x,y,z];

i2 : e = graph {w*x,w*y,x*y,y*z}  -- clique on {w,x,y} and {y,z}

o2 = Graph{"edges" => {{w, x}, {w, y}, {x, y}, {y, z}}}
           "ring" => R
           "vertices" => {w, x, y, z}

o2 : Graph

i3 : cliqueComplex e  -- max facets {w,x,y} and {y,z}

o3 = simplicialComplex | yz wxy |

o3 : SimplicialComplex

i4 : g = completeGraph R

o4 = Graph{"edges" => {{w, x}, {w, y}, {w, z}, {x, y}, {x, z}, {y, z}}}
           "ring" => R
           "vertices" => {w, x, y, z}

o4 : Graph

i5 : cliqueComplex g

o5 = simplicialComplex | wxyz |

o5 : SimplicialComplex

i6 : 
