proposition: Lemma ereal_supT : ereal_sup [set: \bar R] = +oo.
proof: Proof. by rewrite /ereal_sup/= supremumT. Qed.
imports: HB(structures) mathcomp(all_ssreflect all_algebra finmap) mathcomp(mathcomp_extra boolp classical_sets functions) mathcomp(fsbigop cardinality set_interval) reals signed topology constructive_ereal