fact: Fixpoint Xsum {R : ConstructiveReals} {X : Set} (fn : nat -> PartialFunction X) (n : nat) : @PartialFunction R X := match n with | O => fn O | S i => (Xplus (Xsum fn i) (fn (S i))) end.
imports: List QArith ConstructiveReals ConstructiveAbs ConstructiveMinMax ConstructiveSum ConstructiveLimits ConstructiveRcomplete