proposition: Lemma ler_expeR : {mono expeR : x y / x <= y}.
proof: Proof. move=> [r| |] [s| |]//=; rewrite ?leey ?lexx//. - by rewrite !lee_fin ler_expR. - by rewrite !leNgt lte_fin expR_gt0 ltNye. - by rewrite lee_fin expR_ge0 leNye. Qed.
imports: mathcomp(all_ssreflect ssralg ssrint ssrnum matrix) mathcomp(interval rat) mathcomp(boolp classical_sets functions) mathcomp(mathcomp_extra) reals ereal signed topology normedtype landau sequences derive realfun itv convex