fact: Axiom eq_inv_1: forall n1 n2 N1 N2, In n1 N1 -> In n2 N2 -> n1 = n2 -> In n1 (fst (eq_inv N1 N2)) /\ In n2 (snd (eq_inv N1 N2)).
imports: Coq(ZArith Psatz Bool String List FMaps) Coq(FunctionalExtensionality) CDF(Sequences IMP)