fact: Fixpoint tc2_get_next_aux n s s1 s2 l := match l with | nil => None | a :: l1 => if positive_eq n (tc2_get_number (m2f a s) s1 s2) then Some a else tc2_get_next_aux n s s1 s2 l1 end.
imports: PrimInt63 Cyclic63 List BasicRubik Max