fact: Definition tc5it lc lo a c := match c with | TC5 m0 m1 m2 m3 m4 => tc6it (C1 :: lc) lo (tc6it (C2 :: lc) lo (tc6it (C3 :: lc) lo (tc6it (C4 :: lc) lo (tc6it (C5 :: lc) lo a m4 ) m3) m2) m1) m0 | _ => a end.
imports: PrimInt63 Cyclic63 List BasicRubik