i1 : R = QQ[a,b,c,d,e]; |
i2 : antiCycle R
o2 = Graph{edges => {{a, c}, {a, d}, {b, d}, {b, e}, {c, e}}}
ring => R
vertices => {a, b, c, d, e}
o2 : Graph
|
i3 : antiCycle(R,4)
o3 = Graph{edges => {{a, c}, {b, d}} }
ring => R
vertices => {a, b, c, d, e}
o3 : Graph
|
i4 : antiCycle {e,c,d,b}
o4 = Graph{edges => {{e, d}, {c, b}} }
ring => R
vertices => {a, b, c, d, e}
o4 : Graph
|
i5 : complementGraph antiCycle R == cycle R o5 = true |