fact: Fixpoint apply {T} p : Rn p T -> (nat -> R) -> T := match p return Rn p T -> _ -> T with | O => fun (x : T) _ => x | S p => fun (f : Rn (S p) T) g => apply p (f (g p)) g end.
imports: Coq(Reals Datatypes ssreflect ssrbool) mathcomp(seq) Rcomplements Hierarchy Derive RInt RInt_analysis Derive_2d Continuity ElemFct