fact: Definition tc6i l c n:= match c, l with | TC6 m _ _ _ _ _, C1 :: _ => int63i m n | TC6 _ m _ _ _ _, C2 :: _ => int63i m n | TC6 _ _ m _ _ _, C3 :: _ => int63i m n | TC6 _ _ _ m _ _, C4 :: _ => int63i m n | TC6 _ _ _ _ m _, C5 :: _ => int63i m n | TC6 _ _ _ _ _ m, C6 :: _ => int63i m n | _, _ => false end.
imports: PrimInt63 Cyclic63 List BasicRubik