proposition: Remark big_correct :chain_correct 45319 (make_chain dicho 45319).
proof: Proof. Time param_chain_correct. Qed.
imports: Coq(Inverse_Image Inclusion Wf_nat NArith Arith PArith Recdef Wf_nat Lexicographic_Product Lia) additions(Addition_Chains Compatibility More_on_positive Wf_transparent Dichotomy BinaryStrat) Coq(Lia) Int63.Uint63 Monoid_instances