fact: Definition Partition_Sum g F (H : Points_in_Partition g) (incF : included (Compact Hab) (Dom F)) := Sumx (fun i Hi => F (g i Hi) (incF _ (Pts_part_lemma _ H i Hi)) [*] (P (S i) Hi[-]P i (Nat.lt_le_incl _ _ Hi))).
imports: CoRN.ftc.Continuity Coq(Lia)