Section NormedModule1.
Context {K : AbsRing} {V : NormedModule K}.
Definition norm : V -> R := NormedModule.norm K _ (NormedModule.class K V).
Definition norm_factor : R := NormedModule.norm_factor K _ (NormedModule.class K V).
Definition ball_norm (x : V) (eps : R) (y : V) := norm (minus y x) < eps.
Definition locally_norm (x : V) (P : V -> Prop) :=
exists eps : posreal, forall y, ball_norm x eps y -> P y.

Lemma ball_norm_le :
forall (x : V) (e1 e2 : posreal), e1 <= e2 ->
forall y, ball_norm x e1 y -> ball_norm x e2 y.