(** ** Norm *)
Section norm_RInt.
Context {V : NormedModule R_AbsRing}.

Lemma norm_RInt_le_const :
forall (f : R -> V) (a b : R) (lf : V) (M : R),
a <= b ->
(forall x, a <= x <= b -> norm (f x) <= M) ->
is_RInt f a b lf ->
norm lf <= (b - a) * M.