proposition: Lemma Cauchy_fun_seq2_wd_IR : Cauchy_fun_seq2_IR _ _ contf -> Cauchy_fun_seq2_IR _ _ contf0.
proof: Proof. intro H. red in |- *; intros. eapply Cauchy_fun_seq2_wd. apply (H a b Hab Hinc). Qed.
imports: CoRN.ftc.FunctSeries CoRN.ftc.MoreFunctions