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

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

i2 : G = completeGraph R

o2 = Graph{edges => {{a, b}, {a, c}, {a, d}, {b, c}, {b, d}, {c, d}}}
           ring => R
           vertices => {a, b, c, d}

o2 : Graph

i3 : getMaxCliques G

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

o3 : List

i4 : H = graph({a*b,b*c,a*c,c*d,b*d})

o4 = Graph{edges => {{a, b}, {a, c}, {b, c}, {b, d}, {c, d}}}
           ring => R
           vertices => {a, b, c, d}

o4 : Graph

i5 : getMaxCliques H

o5 = {{a, b, c}, {b, c, d}}

o5 : List

i6 :