Section NormedZmoduleTheory.
Variable V : normedZmodType R.
Implicit Types (u v w : V).
Hint Resolve normr_real : core.
Arguments real_ler_normlP {x y}.
Definition real_lter_norml := (real_ler_norml, real_ltr_norml).
Arguments real_ltr_normlP {x y}.
Definition real_lter_normr := (real_ler_normr, real_ltr_normr).

Lemma leif_sum (I : finType) (P C : pred I) (E1 E2 : I -> R) :
(forall i, P i -> E1 i <= E2 i ?= iff C i) ->
\sum_(i | P i) E1 i <= \sum_(i | P i) E2 i ?= iff [forall (i | P i), C i].