proposition: Lemma num_lee_maxl a x y : maxe x%:num y%:num <= a = (x%:num <= a) && (y%:num <= a).
proof: Proof. by rewrite -comparable_le_maxl// ereal_comparable. Qed.
imports: HB(structures) mathcomp(all_ssreflect all_algebra finmap) mathcomp(mathcomp_extra) signed