proposition: Lemma max_fimfun_subproof : @FiniteImage T R (f \max g).
proof: Proof. by split; apply: (finite_image11 maxr). Qed.
imports: HB(structures) mathcomp(all_ssreflect ssralg ssrnum ssrint interval finmap) mathcomp(mathcomp_extra boolp classical_sets fsbigop) mathcomp(functions cardinality set_interval) signed reals ereal topology normedtype sequences