proposition: Lemma bounded_has_exp mu F : (exists M, forall x, `|F x| <= M) -> \E?_[mu] F.
proof: Proof. by move=> leM; apply/summableMl. Qed.
imports: mathcomp(all_ssreflect all_algebra) mathcomp.classical(boolp classical_sets mathcomp_extra) xfinmap ereal reals discrete topology realseq realsum