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

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 : getCliques(G,3)

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

o3 : List

i4 : getCliques(G,4)

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

o4 : List

i5 : getCliques G

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

o5 : List

i6 :