(* Lemma RInt_comp_opp (f : R -> V) (a b : R) : ex_RInt f (-a) (-b) -> RInt (fun y => f (- y)) a b = opp (RInt f (-a) (-b)). *)

Lemma RInt_scal (f : R -> V) (a b l : R) :
ex_RInt f a b ->
RInt (fun x => scal l (f x)) a b = scal l (RInt f a b).