Section Equiv_VS.
Context {T : Type} {K : AbsRing} {V : NormedModule K}.
End Equiv_VS.
(** * Multiplication and inverse *)
(** Domination *)

Lemma domin_mult_r :
forall {T} {F : (T -> Prop) -> Prop} {FF : Filter F} (f g h : T -> R),
is_domin F f g -> is_domin F (fun x => f x * h x) (fun x => g x * h x).