proposition: Lemma cvgr_le {T} {F : set_system T} {FF : Filter F} (f : T -> R) (y : R) : f @ F --> y -> forall z, z > y -> \forall t \near F, f t <= z.
proof: Proof. by move=> /cvgr_lt + ? z0 => /(_ _ z0); apply: filterS => ?; apply/ltW. Qed.
imports: HB(structures) mathcomp(all_ssreflect ssralg ssrint ssrnum finmap matrix) mathcomp(rat interval zmodp vector fieldext falgebra) mathcomp(mathcomp_extra boolp classical_sets functions) mathcomp(cardinality set_interval Rstruct) ereal reals signed topology prodnormedzmodule