proposition: Theorem make_list63irI k l1 l2 ll c : In k ll -> In k (int63it _ make_list l1 l2 ll c).
proof: Proof. intro H; rewrite int63it_naive; unfold naive_int63it; replace ll with (ll ++ nil); try rewrite naive_auxA; auto with datatypes. Qed.
imports: PrimInt63 Cyclic63 List BasicRubik