proposition: Lemma dominated_by1 {T : Type} {K : numFieldType} {V : pseudoMetricNormedZmodType K} : @dominated_by T K _ V fun1 = fun k f F => F [set x | `|f x| <= k].
proof: Proof. rewrite funeq3E => k f F. by congr F; rewrite funeqE => x/=; rewrite normr1 mulr1. 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