proposition: Lemma measurable_oppr D : measurable_fun D (-%R).
proof: Proof. apply: measurable_funTS => /=; apply: continuous_measurable_fun. exact: (@opp_continuous R [the normedModType R of R^o]). Qed.
imports: mathcomp(all_ssreflect ssralg ssrnum ssrint interval) mathcomp(finmap fingroup perm rat) mathcomp(mathcomp_extra boolp classical_sets functions) mathcomp(cardinality fsbigop) reals ereal signed topology numfun normedtype HB(structures) sequences esum measure real_interval realfun exp lebesgue_stieltjes_measure