Theorem: TendstoUniformlyOn.mul_of_le (RMT4/hurwitz.lean)

State before:
𝕜 : Type u_1
ι : Type u_2
α : Type u_3
s K : Set α
inst✝ : NormedField 𝕜
F G : ι → α → 𝕜
f g : α → 𝕜
x y : 𝕜
η η' : ℝ
p : Filter ι
mf mg : ℝ
hF : TendstoUniformlyOn F f p s
hG : TendstoUniformlyOn G g p s
hf : ∀ᶠ (i : ι) in p, ∀ x ∈ s, ‖F i x‖ ≤ mf
hg : ∀ᶠ (i : ι) in p, ∀ x ∈ s, ‖G i x‖ ≤ mg
⊢ TendstoUniformlyOn (F * G) (f * g) p s
Tactic:
by_cases h : NeBot p
State after:
case pos
𝕜 : Type u_1
ι : Type u_2
α : Type u_3
s K : Set α
inst✝ : NormedField 𝕜
F G : ι → α → 𝕜
f g : α → 𝕜
x y : 𝕜
η η' : ℝ
p : Filter ι
mf mg : ℝ
hF : TendstoUniformlyOn F f p s
hG : TendstoUniformlyOn G g p s
hf : ∀ᶠ (i : ι) in p, ∀ x ∈ s, ‖F i x‖ ≤ mf
hg : ∀ᶠ (i : ι) in p, ∀ x ∈ s, ‖G i x‖ ≤ mg
h : NeBot p
⊢ TendstoUniformlyOn (F * G) (f * g) p s

case neg
𝕜 : Type u_1
ι : Type u_2
α : Type u_3
s K : Set α
inst✝ : NormedField 𝕜
F G : ι → α → 𝕜
f g : α → 𝕜
x y : 𝕜
η η' : ℝ
p : Filter ι
mf mg : ℝ
hF : TendstoUniformlyOn F f p s
hG : TendstoUniformlyOn G g p s
hf : ∀ᶠ (i : ι) in p, ∀ x ∈ s, ‖F i x‖ ≤ mf
hg : ∀ᶠ (i : ι) in p, ∀ x ∈ s, ‖G i x‖ ≤ mg
h : ¬NeBot p
⊢ TendstoUniformlyOn (F * G) (f * g) p s

State before:
𝕜 : Type u_1
ι : Type u_2
α : Type u_3
s K : Set α
inst✝ : NormedField 𝕜
F G : ι → α → 𝕜
f g : α → 𝕜
x y : 𝕜
η η' : ℝ
p : Filter ι
mf mg : ℝ
hF : TendstoUniformlyOn F f p s
hG : TendstoUniformlyOn G g p s
hf : ∀ᶠ (i : ι) in p, ∀ x ∈ s, ‖F i x‖ ≤ mf
hg : ∀ᶠ (i : ι) in p, ∀ x ∈ s, ‖G i x‖ ≤ mg
h : ¬NeBot p
⊢ TendstoUniformlyOn (F * G) (f * g) p s
Tactic:
case neg => simp at h; simp [h, TendstoUniformlyOn]
State after:
no goals

State before:
𝕜 : Type u_1
ι : Type u_2
α : Type u_3
s K : Set α
inst✝ : NormedField 𝕜
F G : ι → α → 𝕜
f g : α → 𝕜
x y : 𝕜
η η' : ℝ
p : Filter ι
mf mg : ℝ
hF : TendstoUniformlyOn F f p s
hG : TendstoUniformlyOn G g p s
hf : ∀ᶠ (i : ι) in p, ∀ x ∈ s, ‖F i x‖ ≤ mf
hg : ∀ᶠ (i : ι) in p, ∀ x ∈ s, ‖G i x‖ ≤ mg
h : NeBot p
⊢ TendstoUniformlyOn (F * G) (f * g) p s
Tactic:
case pos =>
  set Mf := |mf| + 1
  set Mg := |mg| + 1
  have hMf : 0 < Mf := by positivity
  have hMg : 0 < Mg := by positivity
  replace hf : ∀ᶠ i in p, ∀ x ∈ s, ‖F i x‖ ≤ Mf := by
    filter_upwards [hf] with i hF x hx using (hF x hx).trans ((le_abs_self mf).trans (lt_add_one _).le)
  replace hg : ∀ᶠ i in p, ∀ x ∈ s, ‖G i x‖ ≤ Mg := by
    filter_upwards [hg] with i hG x hx using (hG x hx).trans ((le_abs_self mg).trans (lt_add_one _).le)
  have h1 : ∀ x ∈ s, ‖g x‖ ≤ Mg := by
    intro x hx
    refine le_of_tendsto ((continuous_norm.tendsto (g x)).comp (hG.tendsto_at hx)) ?_
    filter_upwards [hg] with i hg using hg x hx
  simp_rw [Metric.tendstoUniformlyOn_iff, dist_eq_norm] at hF hG ⊢
  intro ε hε
  filter_upwards [hf, hF (ε / (2 * Mg)) (by positivity), hG (ε / (2 * Mf)) (by positivity)] with i hf hF hG x hx
  have h2 : ‖(f x - F i x) * g x‖ < ε / 2 := by
    rw [norm_mul]
    by_cases h : g x = 0
    case pos => simp [h, half_pos hε]
    case neg =>
      convert mul_lt_mul (hF x hx) (h1 x hx) (norm_pos_iff.mpr h) (by positivity) using 1
      simp only [div_mul, mul_div_cancel, hMg.ne.symm, Ne.def, not_false_iff]
  have h3 : ‖F i x * (g x - G i x)‖ < ε / 2 := by
    rw [norm_mul]
    by_cases h : F i x = 0
    case pos => simp [h, half_pos hε]
    case neg =>
      convert mul_lt_mul' (hf x hx) (hG x hx) (norm_nonneg _) hMf using 1
      field_simp [hMf.ne.symm]; ring
  simp_rw [Pi.mul_apply, lxyab]
  exact (norm_add_le _ _).trans_lt (add_halves' ε ▸ add_lt_add h2 h3)
State after:
no goals

State before:
𝕜 : Type u_1
ι : Type u_2
α : Type u_3
s K : Set α
inst✝ : NormedField 𝕜
F G : ι → α → 𝕜
f g : α → 𝕜
x y : 𝕜
η η' : ℝ
p : Filter ι
mf mg : ℝ
hF : TendstoUniformlyOn F f p s
hG : TendstoUniformlyOn G g p s
hf : ∀ᶠ (i : ι) in p, ∀ x ∈ s, ‖F i x‖ ≤ mf
hg : ∀ᶠ (i : ι) in p, ∀ x ∈ s, ‖G i x‖ ≤ mg
h : ¬NeBot p
⊢ TendstoUniformlyOn (F * G) (f * g) p s
Tactic:
simp at h
State after:
𝕜 : Type u_1
ι : Type u_2
α : Type u_3
s K : Set α
inst✝ : NormedField 𝕜
F G : ι → α → 𝕜
f g : α → 𝕜
x y : 𝕜
η η' : ℝ
p : Filter ι
mf mg : ℝ
hF : TendstoUniformlyOn F f p s
hG : TendstoUniformlyOn G g p s
hf : ∀ᶠ (i : ι) in p, ∀ x ∈ s, ‖F i x‖ ≤ mf
hg : ∀ᶠ (i : ι) in p, ∀ x ∈ s, ‖G i x‖ ≤ mg
h : p = ⊥
⊢ TendstoUniformlyOn (F * G) (f * g) p s

State before:
𝕜 : Type u_1
ι : Type u_2
α : Type u_3
s K : Set α
inst✝ : NormedField 𝕜
F G : ι → α → 𝕜
f g : α → 𝕜
x y : 𝕜
η η' : ℝ
p : Filter ι
mf mg : ℝ
hF : TendstoUniformlyOn F f p s
hG : TendstoUniformlyOn G g p s
hf : ∀ᶠ (i : ι) in p, ∀ x ∈ s, ‖F i x‖ ≤ mf
hg : ∀ᶠ (i : ι) in p, ∀ x ∈ s, ‖G i x‖ ≤ mg
h : p = ⊥
⊢ TendstoUniformlyOn (F * G) (f * g) p s
Tactic:
simp [h, TendstoUniformlyOn]
State after:
no goals

State before:
𝕜 : Type u_1
ι : Type u_2
α : Type u_3
s K : Set α
inst✝ : NormedField 𝕜
F G : ι → α → 𝕜
f g : α → 𝕜
x y : 𝕜
η η' : ℝ
p : Filter ι
mf mg : ℝ
hF : TendstoUniformlyOn F f p s
hG : TendstoUniformlyOn G g p s
hf : ∀ᶠ (i : ι) in p, ∀ x ∈ s, ‖F i x‖ ≤ mf
hg : ∀ᶠ (i : ι) in p, ∀ x ∈ s, ‖G i x‖ ≤ mg
h : NeBot p
⊢ TendstoUniformlyOn (F * G) (f * g) p s
Tactic:
set Mf := |mf| + 1
State after:
𝕜 : Type u_1
ι : Type u_2
α : Type u_3
s K : Set α
inst✝ : NormedField 𝕜
F G : ι → α → 𝕜
f g : α → 𝕜
x y : 𝕜
η η' : ℝ
p : Filter ι
mf mg : ℝ
hF : TendstoUniformlyOn F f p s
hG : TendstoUniformlyOn G g p s
hf : ∀ᶠ (i : ι) in p, ∀ x ∈ s, ‖F i x‖ ≤ mf
hg : ∀ᶠ (i : ι) in p, ∀ x ∈ s, ‖G i x‖ ≤ mg
h : NeBot p
Mf : ℝ := |mf| + 1
⊢ TendstoUniformlyOn (F * G) (f * g) p s

State before:
𝕜 : Type u_1
ι : Type u_2
α : Type u_3
s K : Set α
inst✝ : NormedField 𝕜
F G : ι → α → 𝕜
f g : α → 𝕜
x y : 𝕜
η η' : ℝ
p : Filter ι
mf mg : ℝ
hF : TendstoUniformlyOn F f p s
hG : TendstoUniformlyOn G g p s
hf : ∀ᶠ (i : ι) in p, ∀ x ∈ s, ‖F i x‖ ≤ mf
hg : ∀ᶠ (i : ι) in p, ∀ x ∈ s, ‖G i x‖ ≤ mg
h : NeBot p
Mf : ℝ := |mf| + 1
⊢ TendstoUniformlyOn (F * G) (f * g) p s
Tactic:
set Mg := |mg| + 1
State after:
𝕜 : Type u_1
ι : Type u_2
α : Type u_3
s K : Set α
inst✝ : NormedField 𝕜
F G : ι → α → 𝕜
f g : α → 𝕜
x y : 𝕜
η η' : ℝ
p : Filter ι
mf mg : ℝ
hF : TendstoUniformlyOn F f p s
hG : TendstoUniformlyOn G g p s
hf : ∀ᶠ (i : ι) in p, ∀ x ∈ s, ‖F i x‖ ≤ mf
hg : ∀ᶠ (i : ι) in p, ∀ x ∈ s, ‖G i x‖ ≤ mg
h : NeBot p
Mf : ℝ := |mf| + 1
Mg : ℝ := |mg| + 1
⊢ TendstoUniformlyOn (F * G) (f * g) p s

State before:
𝕜 : Type u_1
ι : Type u_2
α : Type u_3
s K : Set α
inst✝ : NormedField 𝕜
F G : ι → α → 𝕜
f g : α → 𝕜
x y : 𝕜
η η' : ℝ
p : Filter ι
mf mg : ℝ
hF : TendstoUniformlyOn F f p s
hG : TendstoUniformlyOn G g p s
hf : ∀ᶠ (i : ι) in p, ∀ x ∈ s, ‖F i x‖ ≤ mf
hg : ∀ᶠ (i : ι) in p, ∀ x ∈ s, ‖G i x‖ ≤ mg
h : NeBot p
Mf : ℝ := |mf| + 1
Mg : ℝ := |mg| + 1
⊢ TendstoUniformlyOn (F * G) (f * g) p s
Tactic:
have hMf : 0 < Mf := by positivity
State after:
𝕜 : Type u_1
ι : Type u_2
α : Type u_3
s K : Set α
inst✝ : NormedField 𝕜
F G : ι → α → 𝕜
f g : α → 𝕜
x y : 𝕜
η η' : ℝ
p : Filter ι
mf mg : ℝ
hF : TendstoUniformlyOn F f p s
hG : TendstoUniformlyOn G g p s
hf : ∀ᶠ (i : ι) in p, ∀ x ∈ s, ‖F i x‖ ≤ mf
hg : ∀ᶠ (i : ι) in p, ∀ x ∈ s, ‖G i x‖ ≤ mg
h : NeBot p
Mf : ℝ := |mf| + 1
Mg : ℝ := |mg| + 1
hMf : 0 < Mf
⊢ TendstoUniformlyOn (F * G) (f * g) p s

State before:
𝕜 : Type u_1
ι : Type u_2
α : Type u_3
s K : Set α
inst✝ : NormedField 𝕜
F G : ι → α → 𝕜
f g : α → 𝕜
x y : 𝕜
η η' : ℝ
p : Filter ι
mf mg : ℝ
hF : TendstoUniformlyOn F f p s
hG : TendstoUniformlyOn G g p s
hf : ∀ᶠ (i : ι) in p, ∀ x ∈ s, ‖F i x‖ ≤ mf
hg : ∀ᶠ (i : ι) in p, ∀ x ∈ s, ‖G i x‖ ≤ mg
h : NeBot p
Mf : ℝ := |mf| + 1
Mg : ℝ := |mg| + 1
hMf : 0 < Mf
⊢ TendstoUniformlyOn (F * G) (f * g) p s
Tactic:
have hMg : 0 < Mg := by positivity
State after:
𝕜 : Type u_1
ι : Type u_2
α : Type u_3
s K : Set α
inst✝ : NormedField 𝕜
F G : ι → α → 𝕜
f g : α → 𝕜
x y : 𝕜
η η' : ℝ
p : Filter ι
mf mg : ℝ
hF : TendstoUniformlyOn F f p s
hG : TendstoUniformlyOn G g p s
hf : ∀ᶠ (i : ι) in p, ∀ x ∈ s, ‖F i x‖ ≤ mf
hg : ∀ᶠ (i : ι) in p, ∀ x ∈ s, ‖G i x‖ ≤ mg
h : NeBot p
Mf : ℝ := |mf| + 1
Mg : ℝ := |mg| + 1
hMf : 0 < Mf
hMg : 0 < Mg
⊢ TendstoUniformlyOn (F * G) (f * g) p s

State before:
𝕜 : Type u_1
ι : Type u_2
α : Type u_3
s K : Set α
inst✝ : NormedField 𝕜
F G : ι → α → 𝕜
f g : α → 𝕜
x y : 𝕜
η η' : ℝ
p : Filter ι
mf mg : ℝ
hF : TendstoUniformlyOn F f p s
hG : TendstoUniformlyOn G g p s
hf : ∀ᶠ (i : ι) in p, ∀ x ∈ s, ‖F i x‖ ≤ mf
hg : ∀ᶠ (i : ι) in p, ∀ x ∈ s, ‖G i x‖ ≤ mg
h : NeBot p
Mf : ℝ := |mf| + 1
Mg : ℝ := |mg| + 1
hMf : 0 < Mf
hMg : 0 < Mg
⊢ TendstoUniformlyOn (F * G) (f * g) p s
Tactic:
replace hf : ∀ᶠ i in p, ∀ x ∈ s, ‖F i x‖ ≤ Mf := by
  filter_upwards [hf] with i hF x hx using (hF x hx).trans ((le_abs_self mf).trans (lt_add_one _).le)
State after:
𝕜 : Type u_1
ι : Type u_2
α : Type u_3
s K : Set α
inst✝ : NormedField 𝕜
F G : ι → α → 𝕜
f g : α → 𝕜
x y : 𝕜
η η' : ℝ
p : Filter ι
mf mg : ℝ
hF : TendstoUniformlyOn F f p s
hG : TendstoUniformlyOn G g p s
hg : ∀ᶠ (i : ι) in p, ∀ x ∈ s, ‖G i x‖ ≤ mg
h : NeBot p
Mf : ℝ := |mf| + 1
Mg : ℝ := |mg| + 1
hMf : 0 < Mf
hMg : 0 < Mg
hf : ∀ᶠ (i : ι) in p, ∀ x ∈ s, ‖F i x‖ ≤ Mf
⊢ TendstoUniformlyOn (F * G) (f * g) p s

State before:
𝕜 : Type u_1
ι : Type u_2
α : Type u_3
s K : Set α
inst✝ : NormedField 𝕜
F G : ι → α → 𝕜
f g : α → 𝕜
x y : 𝕜
η η' : ℝ
p : Filter ι
mf mg : ℝ
hF : TendstoUniformlyOn F f p s
hG : TendstoUniformlyOn G g p s
hg : ∀ᶠ (i : ι) in p, ∀ x ∈ s, ‖G i x‖ ≤ mg
h : NeBot p
Mf : ℝ := |mf| + 1
Mg : ℝ := |mg| + 1
hMf : 0 < Mf
hMg : 0 < Mg
hf : ∀ᶠ (i : ι) in p, ∀ x ∈ s, ‖F i x‖ ≤ Mf
⊢ TendstoUniformlyOn (F * G) (f * g) p s
Tactic:
replace hg : ∀ᶠ i in p, ∀ x ∈ s, ‖G i x‖ ≤ Mg := by
  filter_upwards [hg] with i hG x hx using (hG x hx).trans ((le_abs_self mg).trans (lt_add_one _).le)
State after:
𝕜 : Type u_1
ι : Type u_2
α : Type u_3
s K : Set α
inst✝ : NormedField 𝕜
F G : ι → α → 𝕜
f g : α → 𝕜
x y : 𝕜
η η' : ℝ
p : Filter ι
mf mg : ℝ
hF : TendstoUniformlyOn F f p s
hG : TendstoUniformlyOn G g p s
h : NeBot p
Mf : ℝ := |mf| + 1
Mg : ℝ := |mg| + 1
hMf : 0 < Mf
hMg : 0 < Mg
hf : ∀ᶠ (i : ι) in p, ∀ x ∈ s, ‖F i x‖ ≤ Mf
hg : ∀ᶠ (i : ι) in p, ∀ x ∈ s, ‖G i x‖ ≤ Mg
⊢ TendstoUniformlyOn (F * G) (f * g) p s

State before:
𝕜 : Type u_1
ι : Type u_2
α : Type u_3
s K : Set α
inst✝ : NormedField 𝕜
F G : ι → α → 𝕜
f g : α → 𝕜
x y : 𝕜
η η' : ℝ
p : Filter ι
mf mg : ℝ
hF : TendstoUniformlyOn F f p s
hG : TendstoUniformlyOn G g p s
h : NeBot p
Mf : ℝ := |mf| + 1
Mg : ℝ := |mg| + 1
hMf : 0 < Mf
hMg : 0 < Mg
hf : ∀ᶠ (i : ι) in p, ∀ x ∈ s, ‖F i x‖ ≤ Mf
hg : ∀ᶠ (i : ι) in p, ∀ x ∈ s, ‖G i x‖ ≤ Mg
⊢ TendstoUniformlyOn (F * G) (f * g) p s
Tactic:
have h1 : ∀ x ∈ s, ‖g x‖ ≤ Mg := by
  intro x hx
  refine le_of_tendsto ((continuous_norm.tendsto (g x)).comp (hG.tendsto_at hx)) ?_
  filter_upwards [hg] with i hg using hg x hx
State after:
𝕜 : Type u_1
ι : Type u_2
α : Type u_3
s K : Set α
inst✝ : NormedField 𝕜
F G : ι → α → 𝕜
f g : α → 𝕜
x y : 𝕜
η η' : ℝ
p : Filter ι
mf mg : ℝ
hF : TendstoUniformlyOn F f p s
hG : TendstoUniformlyOn G g p s
h : NeBot p
Mf : ℝ := |mf| + 1
Mg : ℝ := |mg| + 1
hMf : 0 < Mf
hMg : 0 < Mg
hf : ∀ᶠ (i : ι) in p, ∀ x ∈ s, ‖F i x‖ ≤ Mf
hg : ∀ᶠ (i : ι) in p, ∀ x ∈ s, ‖G i x‖ ≤ Mg
h1 : ∀ x ∈ s, ‖g x‖ ≤ Mg
⊢ TendstoUniformlyOn (F * G) (f * g) p s

State before:
𝕜 : Type u_1
ι : Type u_2
α : Type u_3
s K : Set α
inst✝ : NormedField 𝕜
F G : ι → α → 𝕜
f g : α → 𝕜
x y : 𝕜
η η' : ℝ
p : Filter ι
mf mg : ℝ
hF : TendstoUniformlyOn F f p s
hG : TendstoUniformlyOn G g p s
h : NeBot p
Mf : ℝ := |mf| + 1
Mg : ℝ := |mg| + 1
hMf : 0 < Mf
hMg : 0 < Mg
hf : ∀ᶠ (i : ι) in p, ∀ x ∈ s, ‖F i x‖ ≤ Mf
hg : ∀ᶠ (i : ι) in p, ∀ x ∈ s, ‖G i x‖ ≤ Mg
h1 : ∀ x ∈ s, ‖g x‖ ≤ Mg
⊢ TendstoUniformlyOn (F * G) (f * g) p s
Tactic:
simp_rw [Metric.tendstoUniformlyOn_iff, dist_eq_norm] at hF hG ⊢
State after:
𝕜 : Type u_1
ι : Type u_2
α : Type u_3
s K : Set α
inst✝ : NormedField 𝕜
F G : ι → α → 𝕜
f g : α → 𝕜
x y : 𝕜
η η' : ℝ
p : Filter ι
mf mg : ℝ
h : NeBot p
Mf : ℝ := |mf| + 1
Mg : ℝ := |mg| + 1
hMf : 0 < Mf
hMg : 0 < Mg
hf : ∀ᶠ (i : ι) in p, ∀ x ∈ s, ‖F i x‖ ≤ Mf
hg : ∀ᶠ (i : ι) in p, ∀ x ∈ s, ‖G i x‖ ≤ Mg
h1 : ∀ x ∈ s, ‖g x‖ ≤ Mg
hF : ∀ ε > 0, ∀ᶠ (n : ι) in p, ∀ x ∈ s, ‖f x - F n x‖ < ε
hG : ∀ ε > 0, ∀ᶠ (n : ι) in p, ∀ x ∈ s, ‖g x - G n x‖ < ε
⊢ ∀ ε > 0, ∀ᶠ (n : ι) in p, ∀ x ∈ s, ‖(f * g) x - (F * G) n x‖ < ε

State before:
𝕜 : Type u_1
ι : Type u_2
α : Type u_3
s K : Set α
inst✝ : NormedField 𝕜
F G : ι → α → 𝕜
f g : α → 𝕜
x y : 𝕜
η η' : ℝ
p : Filter ι
mf mg : ℝ
h : NeBot p
Mf : ℝ := |mf| + 1
Mg : ℝ := |mg| + 1
hMf : 0 < Mf
hMg : 0 < Mg
hf : ∀ᶠ (i : ι) in p, ∀ x ∈ s, ‖F i x‖ ≤ Mf
hg : ∀ᶠ (i : ι) in p, ∀ x ∈ s, ‖G i x‖ ≤ Mg
h1 : ∀ x ∈ s, ‖g x‖ ≤ Mg
hF : ∀ ε > 0, ∀ᶠ (n : ι) in p, ∀ x ∈ s, ‖f x - F n x‖ < ε
hG : ∀ ε > 0, ∀ᶠ (n : ι) in p, ∀ x ∈ s, ‖g x - G n x‖ < ε
⊢ ∀ ε > 0, ∀ᶠ (n : ι) in p, ∀ x ∈ s, ‖(f * g) x - (F * G) n x‖ < ε
Tactic:
intro ε hε
State after:
𝕜 : Type u_1
ι : Type u_2
α : Type u_3
s K : Set α
inst✝ : NormedField 𝕜
F G : ι → α → 𝕜
f g : α → 𝕜
x y : 𝕜
η η' : ℝ
p : Filter ι
mf mg : ℝ
h : NeBot p
Mf : ℝ := |mf| + 1
Mg : ℝ := |mg| + 1
hMf : 0 < Mf
hMg : 0 < Mg
hf : ∀ᶠ (i : ι) in p, ∀ x ∈ s, ‖F i x‖ ≤ Mf
hg : ∀ᶠ (i : ι) in p, ∀ x ∈ s, ‖G i x‖ ≤ Mg
h1 : ∀ x ∈ s, ‖g x‖ ≤ Mg
hF : ∀ ε > 0, ∀ᶠ (n : ι) in p, ∀ x ∈ s, ‖f x - F n x‖ < ε
hG : ∀ ε > 0, ∀ᶠ (n : ι) in p, ∀ x ∈ s, ‖g x - G n x‖ < ε
ε : ℝ
hε : ε > 0
⊢ ∀ᶠ (n : ι) in p, ∀ x ∈ s, ‖(f * g) x - (F * G) n x‖ < ε

State before:
𝕜 : Type u_1
ι : Type u_2
α : Type u_3
s K : Set α
inst✝ : NormedField 𝕜
F G : ι → α → 𝕜
f g : α → 𝕜
x y : 𝕜
η η' : ℝ
p : Filter ι
mf mg : ℝ
h : NeBot p
Mf : ℝ := |mf| + 1
Mg : ℝ := |mg| + 1
hMf : 0 < Mf
hMg : 0 < Mg
hf : ∀ᶠ (i : ι) in p, ∀ x ∈ s, ‖F i x‖ ≤ Mf
hg : ∀ᶠ (i : ι) in p, ∀ x ∈ s, ‖G i x‖ ≤ Mg
h1 : ∀ x ∈ s, ‖g x‖ ≤ Mg
hF : ∀ ε > 0, ∀ᶠ (n : ι) in p, ∀ x ∈ s, ‖f x - F n x‖ < ε
hG : ∀ ε > 0, ∀ᶠ (n : ι) in p, ∀ x ∈ s, ‖g x - G n x‖ < ε
ε : ℝ
hε : ε > 0
⊢ ∀ᶠ (n : ι) in p, ∀ x ∈ s, ‖(f * g) x - (F * G) n x‖ < ε
Tactic:
filter_upwards [hf, hF (ε / (2 * Mg)) (by positivity), hG (ε / (2 * Mf)) (by positivity)] with i hf hF hG x hx
State after:
case h
𝕜 : Type u_1
ι : Type u_2
α : Type u_3
s K : Set α
inst✝ : NormedField 𝕜
F G : ι → α → 𝕜
f g : α → 𝕜
x✝ y : 𝕜
η η' : ℝ
p : Filter ι
mf mg : ℝ
h : NeBot p
Mf : ℝ := |mf| + 1
Mg : ℝ := |mg| + 1
hMf : 0 < Mf
hMg : 0 < Mg
hf✝ : ∀ᶠ (i : ι) in p, ∀ x ∈ s, ‖F i x‖ ≤ Mf
hg : ∀ᶠ (i : ι) in p, ∀ x ∈ s, ‖G i x‖ ≤ Mg
h1 : ∀ x ∈ s, ‖g x‖ ≤ Mg
hF✝ : ∀ ε > 0, ∀ᶠ (n : ι) in p, ∀ x ∈ s, ‖f x - F n x‖ < ε
hG✝ : ∀ ε > 0, ∀ᶠ (n : ι) in p, ∀ x ∈ s, ‖g x - G n x‖ < ε
ε : ℝ
hε : ε > 0
i : ι
hf : ∀ x ∈ s, ‖F i x‖ ≤ Mf
hF : ∀ x ∈ s, ‖f x - F i x‖ < ε / (2 * Mg)
hG : ∀ x ∈ s, ‖g x - G i x‖ < ε / (2 * Mf)
x : α
hx : x ∈ s
⊢ ‖(f * g) x - (F * G) i x‖ < ε

State before:
case h
𝕜 : Type u_1
ι : Type u_2
α : Type u_3
s K : Set α
inst✝ : NormedField 𝕜
F G : ι → α → 𝕜
f g : α → 𝕜
x✝ y : 𝕜
η η' : ℝ
p : Filter ι
mf mg : ℝ
h : NeBot p
Mf : ℝ := |mf| + 1
Mg : ℝ := |mg| + 1
hMf : 0 < Mf
hMg : 0 < Mg
hf✝ : ∀ᶠ (i : ι) in p, ∀ x ∈ s, ‖F i x‖ ≤ Mf
hg : ∀ᶠ (i : ι) in p, ∀ x ∈ s, ‖G i x‖ ≤ Mg
h1 : ∀ x ∈ s, ‖g x‖ ≤ Mg
hF✝ : ∀ ε > 0, ∀ᶠ (n : ι) in p, ∀ x ∈ s, ‖f x - F n x‖ < ε
hG✝ : ∀ ε > 0, ∀ᶠ (n : ι) in p, ∀ x ∈ s, ‖g x - G n x‖ < ε
ε : ℝ
hε : ε > 0
i : ι
hf : ∀ x ∈ s, ‖F i x‖ ≤ Mf
hF : ∀ x ∈ s, ‖f x - F i x‖ < ε / (2 * Mg)
hG : ∀ x ∈ s, ‖g x - G i x‖ < ε / (2 * Mf)
x : α
hx : x ∈ s
⊢ ‖(f * g) x - (F * G) i x‖ < ε
Tactic:
have h2 : ‖(f x - F i x) * g x‖ < ε / 2 := by
  rw [norm_mul]
  by_cases h : g x = 0
  case pos => simp [h, half_pos hε]
  case neg =>
    convert mul_lt_mul (hF x hx) (h1 x hx) (norm_pos_iff.mpr h) (by positivity) using 1
    simp only [div_mul, mul_div_cancel, hMg.ne.symm, Ne.def, not_false_iff]
State after:
case h
𝕜 : Type u_1
ι : Type u_2
α : Type u_3
s K : Set α
inst✝ : NormedField 𝕜
F G : ι → α → 𝕜
f g : α → 𝕜
x✝ y : 𝕜
η η' : ℝ
p : Filter ι
mf mg : ℝ
h : NeBot p
Mf : ℝ := |mf| + 1
Mg : ℝ := |mg| + 1
hMf : 0 < Mf
hMg : 0 < Mg
hf✝ : ∀ᶠ (i : ι) in p, ∀ x ∈ s, ‖F i x‖ ≤ Mf
hg : ∀ᶠ (i : ι) in p, ∀ x ∈ s, ‖G i x‖ ≤ Mg
h1 : ∀ x ∈ s, ‖g x‖ ≤ Mg
hF✝ : ∀ ε > 0, ∀ᶠ (n : ι) in p, ∀ x ∈ s, ‖f x - F n x‖ < ε
hG✝ : ∀ ε > 0, ∀ᶠ (n : ι) in p, ∀ x ∈ s, ‖g x - G n x‖ < ε
ε : ℝ
hε : ε > 0
i : ι
hf : ∀ x ∈ s, ‖F i x‖ ≤ Mf
hF : ∀ x ∈ s, ‖f x - F i x‖ < ε / (2 * Mg)
hG : ∀ x ∈ s, ‖g x - G i x‖ < ε / (2 * Mf)
x : α
hx : x ∈ s
h2 : ‖(f x - F i x) * g x‖ < ε / 2
⊢ ‖(f * g) x - (F * G) i x‖ < ε

State before:
case h
𝕜 : Type u_1
ι : Type u_2
α : Type u_3
s K : Set α
inst✝ : NormedField 𝕜
F G : ι → α → 𝕜
f g : α → 𝕜
x✝ y : 𝕜
η η' : ℝ
p : Filter ι
mf mg : ℝ
h : NeBot p
Mf : ℝ := |mf| + 1
Mg : ℝ := |mg| + 1
hMf : 0 < Mf
hMg : 0 < Mg
hf✝ : ∀ᶠ (i : ι) in p, ∀ x ∈ s, ‖F i x‖ ≤ Mf
hg : ∀ᶠ (i : ι) in p, ∀ x ∈ s, ‖G i x‖ ≤ Mg
h1 : ∀ x ∈ s, ‖g x‖ ≤ Mg
hF✝ : ∀ ε > 0, ∀ᶠ (n : ι) in p, ∀ x ∈ s, ‖f x - F n x‖ < ε
hG✝ : ∀ ε > 0, ∀ᶠ (n : ι) in p, ∀ x ∈ s, ‖g x - G n x‖ < ε
ε : ℝ
hε : ε > 0
i : ι
hf : ∀ x ∈ s, ‖F i x‖ ≤ Mf
hF : ∀ x ∈ s, ‖f x - F i x‖ < ε / (2 * Mg)
hG : ∀ x ∈ s, ‖g x - G i x‖ < ε / (2 * Mf)
x : α
hx : x ∈ s
h2 : ‖(f x - F i x) * g x‖ < ε / 2
⊢ ‖(f * g) x - (F * G) i x‖ < ε
Tactic:
have h3 : ‖F i x * (g x - G i x)‖ < ε / 2 := by
  rw [norm_mul]
  by_cases h : F i x = 0
  case pos => simp [h, half_pos hε]
  case neg =>
    convert mul_lt_mul' (hf x hx) (hG x hx) (norm_nonneg _) hMf using 1
    field_simp [hMf.ne.symm]; ring
State after:
case h
𝕜 : Type u_1
ι : Type u_2
α : Type u_3
s K : Set α
inst✝ : NormedField 𝕜
F G : ι → α → 𝕜
f g : α → 𝕜
x✝ y : 𝕜
η η' : ℝ
p : Filter ι
mf mg : ℝ
h : NeBot p
Mf : ℝ := |mf| + 1
Mg : ℝ := |mg| + 1
hMf : 0 < Mf
hMg : 0 < Mg
hf✝ : ∀ᶠ (i : ι) in p, ∀ x ∈ s, ‖F i x‖ ≤ Mf
hg : ∀ᶠ (i : ι) in p, ∀ x ∈ s, ‖G i x‖ ≤ Mg
h1 : ∀ x ∈ s, ‖g x‖ ≤ Mg
hF✝ : ∀ ε > 0, ∀ᶠ (n : ι) in p, ∀ x ∈ s, ‖f x - F n x‖ < ε
hG✝ : ∀ ε > 0, ∀ᶠ (n : ι) in p, ∀ x ∈ s, ‖g x - G n x‖ < ε
ε : ℝ
hε : ε > 0
i : ι
hf : ∀ x ∈ s, ‖F i x‖ ≤ Mf
hF : ∀ x ∈ s, ‖f x - F i x‖ < ε / (2 * Mg)
hG : ∀ x ∈ s, ‖g x - G i x‖ < ε / (2 * Mf)
x : α
hx : x ∈ s
h2 : ‖(f x - F i x) * g x‖ < ε / 2
h3 : ‖F i x * (g x - G i x)‖ < ε / 2
⊢ ‖(f * g) x - (F * G) i x‖ < ε

State before:
case h
𝕜 : Type u_1
ι : Type u_2
α : Type u_3
s K : Set α
inst✝ : NormedField 𝕜
F G : ι → α → 𝕜
f g : α → 𝕜
x✝ y : 𝕜
η η' : ℝ
p : Filter ι
mf mg : ℝ
h : NeBot p
Mf : ℝ := |mf| + 1
Mg : ℝ := |mg| + 1
hMf : 0 < Mf
hMg : 0 < Mg
hf✝ : ∀ᶠ (i : ι) in p, ∀ x ∈ s, ‖F i x‖ ≤ Mf
hg : ∀ᶠ (i : ι) in p, ∀ x ∈ s, ‖G i x‖ ≤ Mg
h1 : ∀ x ∈ s, ‖g x‖ ≤ Mg
hF✝ : ∀ ε > 0, ∀ᶠ (n : ι) in p, ∀ x ∈ s, ‖f x - F n x‖ < ε
hG✝ : ∀ ε > 0, ∀ᶠ (n : ι) in p, ∀ x ∈ s, ‖g x - G n x‖ < ε
ε : ℝ
hε : ε > 0
i : ι
hf : ∀ x ∈ s, ‖F i x‖ ≤ Mf
hF : ∀ x ∈ s, ‖f x - F i x‖ < ε / (2 * Mg)
hG : ∀ x ∈ s, ‖g x - G i x‖ < ε / (2 * Mf)
x : α
hx : x ∈ s
h2 : ‖(f x - F i x) * g x‖ < ε / 2
h3 : ‖F i x * (g x - G i x)‖ < ε / 2
⊢ ‖(f * g) x - (F * G) i x‖ < ε
Tactic:
simp_rw [Pi.mul_apply, lxyab]
State after:
case h
𝕜 : Type u_1
ι : Type u_2
α : Type u_3
s K : Set α
inst✝ : NormedField 𝕜
F G : ι → α → 𝕜
f g : α → 𝕜
x✝ y : 𝕜
η η' : ℝ
p : Filter ι
mf mg : ℝ
h : NeBot p
Mf : ℝ := |mf| + 1
Mg : ℝ := |mg| + 1
hMf : 0 < Mf
hMg : 0 < Mg
hf✝ : ∀ᶠ (i : ι) in p, ∀ x ∈ s, ‖F i x‖ ≤ Mf
hg : ∀ᶠ (i : ι) in p, ∀ x ∈ s, ‖G i x‖ ≤ Mg
h1 : ∀ x ∈ s, ‖g x‖ ≤ Mg
hF✝ : ∀ ε > 0, ∀ᶠ (n : ι) in p, ∀ x ∈ s, ‖f x - F n x‖ < ε
hG✝ : ∀ ε > 0, ∀ᶠ (n : ι) in p, ∀ x ∈ s, ‖g x - G n x‖ < ε
ε : ℝ
hε : ε > 0
i : ι
hf : ∀ x ∈ s, ‖F i x‖ ≤ Mf
hF : ∀ x ∈ s, ‖f x - F i x‖ < ε / (2 * Mg)
hG : ∀ x ∈ s, ‖g x - G i x‖ < ε / (2 * Mf)
x : α
hx : x ∈ s
h2 : ‖(f x - F i x) * g x‖ < ε / 2
h3 : ‖F i x * (g x - G i x)‖ < ε / 2
⊢ ‖(f x - F i x) * g x + F i x * (g x - G i x)‖ < ε

State before:
case h
𝕜 : Type u_1
ι : Type u_2
α : Type u_3
s K : Set α
inst✝ : NormedField 𝕜
F G : ι → α → 𝕜
f g : α → 𝕜
x✝ y : 𝕜
η η' : ℝ
p : Filter ι
mf mg : ℝ
h : NeBot p
Mf : ℝ := |mf| + 1
Mg : ℝ := |mg| + 1
hMf : 0 < Mf
hMg : 0 < Mg
hf✝ : ∀ᶠ (i : ι) in p, ∀ x ∈ s, ‖F i x‖ ≤ Mf
hg : ∀ᶠ (i : ι) in p, ∀ x ∈ s, ‖G i x‖ ≤ Mg
h1 : ∀ x ∈ s, ‖g x‖ ≤ Mg
hF✝ : ∀ ε > 0, ∀ᶠ (n : ι) in p, ∀ x ∈ s, ‖f x - F n x‖ < ε
hG✝ : ∀ ε > 0, ∀ᶠ (n : ι) in p, ∀ x ∈ s, ‖g x - G n x‖ < ε
ε : ℝ
hε : ε > 0
i : ι
hf : ∀ x ∈ s, ‖F i x‖ ≤ Mf
hF : ∀ x ∈ s, ‖f x - F i x‖ < ε / (2 * Mg)
hG : ∀ x ∈ s, ‖g x - G i x‖ < ε / (2 * Mf)
x : α
hx : x ∈ s
h2 : ‖(f x - F i x) * g x‖ < ε / 2
h3 : ‖F i x * (g x - G i x)‖ < ε / 2
⊢ ‖(f x - F i x) * g x + F i x * (g x - G i x)‖ < ε
Tactic:
exact (norm_add_le _ _).trans_lt (add_halves' ε ▸ add_lt_add h2 h3)
State after:
no goals

State before:
𝕜 : Type u_1
ι : Type u_2
α : Type u_3
s K : Set α
inst✝ : NormedField 𝕜
F G : ι → α → 𝕜
f g : α → 𝕜
x y : 𝕜
η η' : ℝ
p : Filter ι
mf mg : ℝ
hF : TendstoUniformlyOn F f p s
hG : TendstoUniformlyOn G g p s
hf : ∀ᶠ (i : ι) in p, ∀ x ∈ s, ‖F i x‖ ≤ mf
hg : ∀ᶠ (i : ι) in p, ∀ x ∈ s, ‖G i x‖ ≤ mg
h : NeBot p
Mf : ℝ := |mf| + 1
Mg : ℝ := |mg| + 1
⊢ 0 < Mf
Tactic:
positivity
State after:
no goals

State before:
𝕜 : Type u_1
ι : Type u_2
α : Type u_3
s K : Set α
inst✝ : NormedField 𝕜
F G : ι → α → 𝕜
f g : α → 𝕜
x y : 𝕜
η η' : ℝ
p : Filter ι
mf mg : ℝ
hF : TendstoUniformlyOn F f p s
hG : TendstoUniformlyOn G g p s
hf : ∀ᶠ (i : ι) in p, ∀ x ∈ s, ‖F i x‖ ≤ mf
hg : ∀ᶠ (i : ι) in p, ∀ x ∈ s, ‖G i x‖ ≤ mg
h : NeBot p
Mf : ℝ := |mf| + 1
Mg : ℝ := |mg| + 1
hMf : 0 < Mf
⊢ 0 < Mg
Tactic:
positivity
State after:
no goals

State before:
𝕜 : Type u_1
ι : Type u_2
α : Type u_3
s K : Set α
inst✝ : NormedField 𝕜
F G : ι → α → 𝕜
f g : α → 𝕜
x y : 𝕜
η η' : ℝ
p : Filter ι
mf mg : ℝ
hF : TendstoUniformlyOn F f p s
hG : TendstoUniformlyOn G g p s
hf : ∀ᶠ (i : ι) in p, ∀ x ∈ s, ‖F i x‖ ≤ mf
hg : ∀ᶠ (i : ι) in p, ∀ x ∈ s, ‖G i x‖ ≤ mg
h : NeBot p
Mf : ℝ := |mf| + 1
Mg : ℝ := |mg| + 1
hMf : 0 < Mf
hMg : 0 < Mg
⊢ ∀ᶠ (i : ι) in p, ∀ x ∈ s, ‖F i x‖ ≤ Mf
Tactic:
filter_upwards [hf] with i hF x hx using (hF x hx).trans ((le_abs_self mf).trans (lt_add_one _).le)
State after:
no goals

State before:
𝕜 : Type u_1
ι : Type u_2
α : Type u_3
s K : Set α
inst✝ : NormedField 𝕜
F G : ι → α → 𝕜
f g : α → 𝕜
x y : 𝕜
η η' : ℝ
p : Filter ι
mf mg : ℝ
hF : TendstoUniformlyOn F f p s
hG : TendstoUniformlyOn G g p s
hg : ∀ᶠ (i : ι) in p, ∀ x ∈ s, ‖G i x‖ ≤ mg
h : NeBot p
Mf : ℝ := |mf| + 1
Mg : ℝ := |mg| + 1
hMf : 0 < Mf
hMg : 0 < Mg
hf : ∀ᶠ (i : ι) in p, ∀ x ∈ s, ‖F i x‖ ≤ Mf
⊢ ∀ᶠ (i : ι) in p, ∀ x ∈ s, ‖G i x‖ ≤ Mg
Tactic:
filter_upwards [hg] with i hG x hx using (hG x hx).trans ((le_abs_self mg).trans (lt_add_one _).le)
State after:
no goals

State before:
𝕜 : Type u_1
ι : Type u_2
α : Type u_3
s K : Set α
inst✝ : NormedField 𝕜
F G : ι → α → 𝕜
f g : α → 𝕜
x y : 𝕜
η η' : ℝ
p : Filter ι
mf mg : ℝ
hF : TendstoUniformlyOn F f p s
hG : TendstoUniformlyOn G g p s
h : NeBot p
Mf : ℝ := |mf| + 1
Mg : ℝ := |mg| + 1
hMf : 0 < Mf
hMg : 0 < Mg
hf : ∀ᶠ (i : ι) in p, ∀ x ∈ s, ‖F i x‖ ≤ Mf
hg : ∀ᶠ (i : ι) in p, ∀ x ∈ s, ‖G i x‖ ≤ Mg
⊢ ∀ x ∈ s, ‖g x‖ ≤ Mg
Tactic:
intro x hx
State after:
𝕜 : Type u_1
ι : Type u_2
α : Type u_3
s K : Set α
inst✝ : NormedField 𝕜
F G : ι → α → 𝕜
f g : α → 𝕜
x✝ y : 𝕜
η η' : ℝ
p : Filter ι
mf mg : ℝ
hF : TendstoUniformlyOn F f p s
hG : TendstoUniformlyOn G g p s
h : NeBot p
Mf : ℝ := |mf| + 1
Mg : ℝ := |mg| + 1
hMf : 0 < Mf
hMg : 0 < Mg
hf : ∀ᶠ (i : ι) in p, ∀ x ∈ s, ‖F i x‖ ≤ Mf
hg : ∀ᶠ (i : ι) in p, ∀ x ∈ s, ‖G i x‖ ≤ Mg
x : α
hx : x ∈ s
⊢ ‖g x‖ ≤ Mg

State before:
𝕜 : Type u_1
ι : Type u_2
α : Type u_3
s K : Set α
inst✝ : NormedField 𝕜
F G : ι → α → 𝕜
f g : α → 𝕜
x✝ y : 𝕜
η η' : ℝ
p : Filter ι
mf mg : ℝ
hF : TendstoUniformlyOn F f p s
hG : TendstoUniformlyOn G g p s
h : NeBot p
Mf : ℝ := |mf| + 1
Mg : ℝ := |mg| + 1
hMf : 0 < Mf
hMg : 0 < Mg
hf : ∀ᶠ (i : ι) in p, ∀ x ∈ s, ‖F i x‖ ≤ Mf
hg : ∀ᶠ (i : ι) in p, ∀ x ∈ s, ‖G i x‖ ≤ Mg
x : α
hx : x ∈ s
⊢ ‖g x‖ ≤ Mg
Tactic:
refine le_of_tendsto ((continuous_norm.tendsto (g x)).comp (hG.tendsto_at hx)) ?_
State after:
𝕜 : Type u_1
ι : Type u_2
α : Type u_3
s K : Set α
inst✝ : NormedField 𝕜
F G : ι → α → 𝕜
f g : α → 𝕜
x✝ y : 𝕜
η η' : ℝ
p : Filter ι
mf mg : ℝ
hF : TendstoUniformlyOn F f p s
hG : TendstoUniformlyOn G g p s
h : NeBot p
Mf : ℝ := |mf| + 1
Mg : ℝ := |mg| + 1
hMf : 0 < Mf
hMg : 0 < Mg
hf : ∀ᶠ (i : ι) in p, ∀ x ∈ s, ‖F i x‖ ≤ Mf
hg : ∀ᶠ (i : ι) in p, ∀ x ∈ s, ‖G i x‖ ≤ Mg
x : α
hx : x ∈ s
⊢ ∀ᶠ (c : ι) in p, ((fun a => ‖a‖) ∘ fun n => G n x) c ≤ Mg

State before:
𝕜 : Type u_1
ι : Type u_2
α : Type u_3
s K : Set α
inst✝ : NormedField 𝕜
F G : ι → α → 𝕜
f g : α → 𝕜
x✝ y : 𝕜
η η' : ℝ
p : Filter ι
mf mg : ℝ
hF : TendstoUniformlyOn F f p s
hG : TendstoUniformlyOn G g p s
h : NeBot p
Mf : ℝ := |mf| + 1
Mg : ℝ := |mg| + 1
hMf : 0 < Mf
hMg : 0 < Mg
hf : ∀ᶠ (i : ι) in p, ∀ x ∈ s, ‖F i x‖ ≤ Mf
hg : ∀ᶠ (i : ι) in p, ∀ x ∈ s, ‖G i x‖ ≤ Mg
x : α
hx : x ∈ s
⊢ ∀ᶠ (c : ι) in p, ((fun a => ‖a‖) ∘ fun n => G n x) c ≤ Mg
Tactic:
filter_upwards [hg] with i hg using hg x hx
State after:
no goals

State before:
𝕜 : Type u_1
ι : Type u_2
α : Type u_3
s K : Set α
inst✝ : NormedField 𝕜
F G : ι → α → 𝕜
f g : α → 𝕜
x y : 𝕜
η η' : ℝ
p : Filter ι
mf mg : ℝ
h : NeBot p
Mf : ℝ := |mf| + 1
Mg : ℝ := |mg| + 1
hMf : 0 < Mf
hMg : 0 < Mg
hf : ∀ᶠ (i : ι) in p, ∀ x ∈ s, ‖F i x‖ ≤ Mf
hg : ∀ᶠ (i : ι) in p, ∀ x ∈ s, ‖G i x‖ ≤ Mg
h1 : ∀ x ∈ s, ‖g x‖ ≤ Mg
hF : ∀ ε > 0, ∀ᶠ (n : ι) in p, ∀ x ∈ s, ‖f x - F n x‖ < ε
hG : ∀ ε > 0, ∀ᶠ (n : ι) in p, ∀ x ∈ s, ‖g x - G n x‖ < ε
ε : ℝ
hε : ε > 0
⊢ ε / (2 * Mg) > 0
Tactic:
positivity
State after:
no goals

State before:
𝕜 : Type u_1
ι : Type u_2
α : Type u_3
s K : Set α
inst✝ : NormedField 𝕜
F G : ι → α → 𝕜
f g : α → 𝕜
x y : 𝕜
η η' : ℝ
p : Filter ι
mf mg : ℝ
h : NeBot p
Mf : ℝ := |mf| + 1
Mg : ℝ := |mg| + 1
hMf : 0 < Mf
hMg : 0 < Mg
hf : ∀ᶠ (i : ι) in p, ∀ x ∈ s, ‖F i x‖ ≤ Mf
hg : ∀ᶠ (i : ι) in p, ∀ x ∈ s, ‖G i x‖ ≤ Mg
h1 : ∀ x ∈ s, ‖g x‖ ≤ Mg
hF : ∀ ε > 0, ∀ᶠ (n : ι) in p, ∀ x ∈ s, ‖f x - F n x‖ < ε
hG : ∀ ε > 0, ∀ᶠ (n : ι) in p, ∀ x ∈ s, ‖g x - G n x‖ < ε
ε : ℝ
hε : ε > 0
⊢ ε / (2 * Mf) > 0
Tactic:
positivity
State after:
no goals

State before:
𝕜 : Type u_1
ι : Type u_2
α : Type u_3
s K : Set α
inst✝ : NormedField 𝕜
F G : ι → α → 𝕜
f g : α → 𝕜
x✝ y : 𝕜
η η' : ℝ
p : Filter ι
mf mg : ℝ
h : NeBot p
Mf : ℝ := |mf| + 1
Mg : ℝ := |mg| + 1
hMf : 0 < Mf
hMg : 0 < Mg
hf✝ : ∀ᶠ (i : ι) in p, ∀ x ∈ s, ‖F i x‖ ≤ Mf
hg : ∀ᶠ (i : ι) in p, ∀ x ∈ s, ‖G i x‖ ≤ Mg
h1 : ∀ x ∈ s, ‖g x‖ ≤ Mg
hF✝ : ∀ ε > 0, ∀ᶠ (n : ι) in p, ∀ x ∈ s, ‖f x - F n x‖ < ε
hG✝ : ∀ ε > 0, ∀ᶠ (n : ι) in p, ∀ x ∈ s, ‖g x - G n x‖ < ε
ε : ℝ
hε : ε > 0
i : ι
hf : ∀ x ∈ s, ‖F i x‖ ≤ Mf
hF : ∀ x ∈ s, ‖f x - F i x‖ < ε / (2 * Mg)
hG : ∀ x ∈ s, ‖g x - G i x‖ < ε / (2 * Mf)
x : α
hx : x ∈ s
⊢ ‖(f x - F i x) * g x‖ < ε / 2
Tactic:
rw [norm_mul]
State after:
𝕜 : Type u_1
ι : Type u_2
α : Type u_3
s K : Set α
inst✝ : NormedField 𝕜
F G : ι → α → 𝕜
f g : α → 𝕜
x✝ y : 𝕜
η η' : ℝ
p : Filter ι
mf mg : ℝ
h : NeBot p
Mf : ℝ := |mf| + 1
Mg : ℝ := |mg| + 1
hMf : 0 < Mf
hMg : 0 < Mg
hf✝ : ∀ᶠ (i : ι) in p, ∀ x ∈ s, ‖F i x‖ ≤ Mf
hg : ∀ᶠ (i : ι) in p, ∀ x ∈ s, ‖G i x‖ ≤ Mg
h1 : ∀ x ∈ s, ‖g x‖ ≤ Mg
hF✝ : ∀ ε > 0, ∀ᶠ (n : ι) in p, ∀ x ∈ s, ‖f x - F n x‖ < ε
hG✝ : ∀ ε > 0, ∀ᶠ (n : ι) in p, ∀ x ∈ s, ‖g x - G n x‖ < ε
ε : ℝ
hε : ε > 0
i : ι
hf : ∀ x ∈ s, ‖F i x‖ ≤ Mf
hF : ∀ x ∈ s, ‖f x - F i x‖ < ε / (2 * Mg)
hG : ∀ x ∈ s, ‖g x - G i x‖ < ε / (2 * Mf)
x : α
hx : x ∈ s
⊢ ‖f x - F i x‖ * ‖g x‖ < ε / 2

State before:
𝕜 : Type u_1
ι : Type u_2
α : Type u_3
s K : Set α
inst✝ : NormedField 𝕜
F G : ι → α → 𝕜
f g : α → 𝕜
x✝ y : 𝕜
η η' : ℝ
p : Filter ι
mf mg : ℝ
h : NeBot p
Mf : ℝ := |mf| + 1
Mg : ℝ := |mg| + 1
hMf : 0 < Mf
hMg : 0 < Mg
hf✝ : ∀ᶠ (i : ι) in p, ∀ x ∈ s, ‖F i x‖ ≤ Mf
hg : ∀ᶠ (i : ι) in p, ∀ x ∈ s, ‖G i x‖ ≤ Mg
h1 : ∀ x ∈ s, ‖g x‖ ≤ Mg
hF✝ : ∀ ε > 0, ∀ᶠ (n : ι) in p, ∀ x ∈ s, ‖f x - F n x‖ < ε
hG✝ : ∀ ε > 0, ∀ᶠ (n : ι) in p, ∀ x ∈ s, ‖g x - G n x‖ < ε
ε : ℝ
hε : ε > 0
i : ι
hf : ∀ x ∈ s, ‖F i x‖ ≤ Mf
hF : ∀ x ∈ s, ‖f x - F i x‖ < ε / (2 * Mg)
hG : ∀ x ∈ s, ‖g x - G i x‖ < ε / (2 * Mf)
x : α
hx : x ∈ s
⊢ ‖f x - F i x‖ * ‖g x‖ < ε / 2
Tactic:
by_cases h : g x = 0
State after:
case pos
𝕜 : Type u_1
ι : Type u_2
α : Type u_3
s K : Set α
inst✝ : NormedField 𝕜
F G : ι → α → 𝕜
f g : α → 𝕜
x✝ y : 𝕜
η η' : ℝ
p : Filter ι
mf mg : ℝ
h✝ : NeBot p
Mf : ℝ := |mf| + 1
Mg : ℝ := |mg| + 1
hMf : 0 < Mf
hMg : 0 < Mg
hf✝ : ∀ᶠ (i : ι) in p, ∀ x ∈ s, ‖F i x‖ ≤ Mf
hg : ∀ᶠ (i : ι) in p, ∀ x ∈ s, ‖G i x‖ ≤ Mg
h1 : ∀ x ∈ s, ‖g x‖ ≤ Mg
hF✝ : ∀ ε > 0, ∀ᶠ (n : ι) in p, ∀ x ∈ s, ‖f x - F n x‖ < ε
hG✝ : ∀ ε > 0, ∀ᶠ (n : ι) in p, ∀ x ∈ s, ‖g x - G n x‖ < ε
ε : ℝ
hε : ε > 0
i : ι
hf : ∀ x ∈ s, ‖F i x‖ ≤ Mf
hF : ∀ x ∈ s, ‖f x - F i x‖ < ε / (2 * Mg)
hG : ∀ x ∈ s, ‖g x - G i x‖ < ε / (2 * Mf)
x : α
hx : x ∈ s
h : g x = 0
⊢ ‖f x - F i x‖ * ‖g x‖ < ε / 2

case neg
𝕜 : Type u_1
ι : Type u_2
α : Type u_3
s K : Set α
inst✝ : NormedField 𝕜
F G : ι → α → 𝕜
f g : α → 𝕜
x✝ y : 𝕜
η η' : ℝ
p : Filter ι
mf mg : ℝ
h✝ : NeBot p
Mf : ℝ := |mf| + 1
Mg : ℝ := |mg| + 1
hMf : 0 < Mf
hMg : 0 < Mg
hf✝ : ∀ᶠ (i : ι) in p, ∀ x ∈ s, ‖F i x‖ ≤ Mf
hg : ∀ᶠ (i : ι) in p, ∀ x ∈ s, ‖G i x‖ ≤ Mg
h1 : ∀ x ∈ s, ‖g x‖ ≤ Mg
hF✝ : ∀ ε > 0, ∀ᶠ (n : ι) in p, ∀ x ∈ s, ‖f x - F n x‖ < ε
hG✝ : ∀ ε > 0, ∀ᶠ (n : ι) in p, ∀ x ∈ s, ‖g x - G n x‖ < ε
ε : ℝ
hε : ε > 0
i : ι
hf : ∀ x ∈ s, ‖F i x‖ ≤ Mf
hF : ∀ x ∈ s, ‖f x - F i x‖ < ε / (2 * Mg)
hG : ∀ x ∈ s, ‖g x - G i x‖ < ε / (2 * Mf)
x : α
hx : x ∈ s
h : ¬g x = 0
⊢ ‖f x - F i x‖ * ‖g x‖ < ε / 2

State before:
𝕜 : Type u_1
ι : Type u_2
α : Type u_3
s K : Set α
inst✝ : NormedField 𝕜
F G : ι → α → 𝕜
f g : α → 𝕜
x✝ y : 𝕜
η η' : ℝ
p : Filter ι
mf mg : ℝ
h✝ : NeBot p
Mf : ℝ := |mf| + 1
Mg : ℝ := |mg| + 1
hMf : 0 < Mf
hMg : 0 < Mg
hf✝ : ∀ᶠ (i : ι) in p, ∀ x ∈ s, ‖F i x‖ ≤ Mf
hg : ∀ᶠ (i : ι) in p, ∀ x ∈ s, ‖G i x‖ ≤ Mg
h1 : ∀ x ∈ s, ‖g x‖ ≤ Mg
hF✝ : ∀ ε > 0, ∀ᶠ (n : ι) in p, ∀ x ∈ s, ‖f x - F n x‖ < ε
hG✝ : ∀ ε > 0, ∀ᶠ (n : ι) in p, ∀ x ∈ s, ‖g x - G n x‖ < ε
ε : ℝ
hε : ε > 0
i : ι
hf : ∀ x ∈ s, ‖F i x‖ ≤ Mf
hF : ∀ x ∈ s, ‖f x - F i x‖ < ε / (2 * Mg)
hG : ∀ x ∈ s, ‖g x - G i x‖ < ε / (2 * Mf)
x : α
hx : x ∈ s
h : g x = 0
⊢ ‖f x - F i x‖ * ‖g x‖ < ε / 2
Tactic:
case pos => simp [h, half_pos hε]
State after:
no goals

State before:
𝕜 : Type u_1
ι : Type u_2
α : Type u_3
s K : Set α
inst✝ : NormedField 𝕜
F G : ι → α → 𝕜
f g : α → 𝕜
x✝ y : 𝕜
η η' : ℝ
p : Filter ι
mf mg : ℝ
h✝ : NeBot p
Mf : ℝ := |mf| + 1
Mg : ℝ := |mg| + 1
hMf : 0 < Mf
hMg : 0 < Mg
hf✝ : ∀ᶠ (i : ι) in p, ∀ x ∈ s, ‖F i x‖ ≤ Mf
hg : ∀ᶠ (i : ι) in p, ∀ x ∈ s, ‖G i x‖ ≤ Mg
h1 : ∀ x ∈ s, ‖g x‖ ≤ Mg
hF✝ : ∀ ε > 0, ∀ᶠ (n : ι) in p, ∀ x ∈ s, ‖f x - F n x‖ < ε
hG✝ : ∀ ε > 0, ∀ᶠ (n : ι) in p, ∀ x ∈ s, ‖g x - G n x‖ < ε
ε : ℝ
hε : ε > 0
i : ι
hf : ∀ x ∈ s, ‖F i x‖ ≤ Mf
hF : ∀ x ∈ s, ‖f x - F i x‖ < ε / (2 * Mg)
hG : ∀ x ∈ s, ‖g x - G i x‖ < ε / (2 * Mf)
x : α
hx : x ∈ s
h : ¬g x = 0
⊢ ‖f x - F i x‖ * ‖g x‖ < ε / 2
Tactic:
case neg =>
  convert mul_lt_mul (hF x hx) (h1 x hx) (norm_pos_iff.mpr h) (by positivity) using 1
  simp only [div_mul, mul_div_cancel, hMg.ne.symm, Ne.def, not_false_iff]
State after:
no goals

State before:
𝕜 : Type u_1
ι : Type u_2
α : Type u_3
s K : Set α
inst✝ : NormedField 𝕜
F G : ι → α → 𝕜
f g : α → 𝕜
x✝ y : 𝕜
η η' : ℝ
p : Filter ι
mf mg : ℝ
h✝ : NeBot p
Mf : ℝ := |mf| + 1
Mg : ℝ := |mg| + 1
hMf : 0 < Mf
hMg : 0 < Mg
hf✝ : ∀ᶠ (i : ι) in p, ∀ x ∈ s, ‖F i x‖ ≤ Mf
hg : ∀ᶠ (i : ι) in p, ∀ x ∈ s, ‖G i x‖ ≤ Mg
h1 : ∀ x ∈ s, ‖g x‖ ≤ Mg
hF✝ : ∀ ε > 0, ∀ᶠ (n : ι) in p, ∀ x ∈ s, ‖f x - F n x‖ < ε
hG✝ : ∀ ε > 0, ∀ᶠ (n : ι) in p, ∀ x ∈ s, ‖g x - G n x‖ < ε
ε : ℝ
hε : ε > 0
i : ι
hf : ∀ x ∈ s, ‖F i x‖ ≤ Mf
hF : ∀ x ∈ s, ‖f x - F i x‖ < ε / (2 * Mg)
hG : ∀ x ∈ s, ‖g x - G i x‖ < ε / (2 * Mf)
x : α
hx : x ∈ s
h : g x = 0
⊢ ‖f x - F i x‖ * ‖g x‖ < ε / 2
Tactic:
simp [h, half_pos hε]
State after:
no goals

State before:
𝕜 : Type u_1
ι : Type u_2
α : Type u_3
s K : Set α
inst✝ : NormedField 𝕜
F G : ι → α → 𝕜
f g : α → 𝕜
x✝ y : 𝕜
η η' : ℝ
p : Filter ι
mf mg : ℝ
h✝ : NeBot p
Mf : ℝ := |mf| + 1
Mg : ℝ := |mg| + 1
hMf : 0 < Mf
hMg : 0 < Mg
hf✝ : ∀ᶠ (i : ι) in p, ∀ x ∈ s, ‖F i x‖ ≤ Mf
hg : ∀ᶠ (i : ι) in p, ∀ x ∈ s, ‖G i x‖ ≤ Mg
h1 : ∀ x ∈ s, ‖g x‖ ≤ Mg
hF✝ : ∀ ε > 0, ∀ᶠ (n : ι) in p, ∀ x ∈ s, ‖f x - F n x‖ < ε
hG✝ : ∀ ε > 0, ∀ᶠ (n : ι) in p, ∀ x ∈ s, ‖g x - G n x‖ < ε
ε : ℝ
hε : ε > 0
i : ι
hf : ∀ x ∈ s, ‖F i x‖ ≤ Mf
hF : ∀ x ∈ s, ‖f x - F i x‖ < ε / (2 * Mg)
hG : ∀ x ∈ s, ‖g x - G i x‖ < ε / (2 * Mf)
x : α
hx : x ∈ s
h : ¬g x = 0
⊢ ‖f x - F i x‖ * ‖g x‖ < ε / 2
Tactic:
convert mul_lt_mul (hF x hx) (h1 x hx) (norm_pos_iff.mpr h) (by positivity) using 1
State after:
case h.e'_4
𝕜 : Type u_1
ι : Type u_2
α : Type u_3
s K : Set α
inst✝ : NormedField 𝕜
F G : ι → α → 𝕜
f g : α → 𝕜
x✝ y : 𝕜
η η' : ℝ
p : Filter ι
mf mg : ℝ
h✝ : NeBot p
Mf : ℝ := |mf| + 1
Mg : ℝ := |mg| + 1
hMf : 0 < Mf
hMg : 0 < Mg
hf✝ : ∀ᶠ (i : ι) in p, ∀ x ∈ s, ‖F i x‖ ≤ Mf
hg : ∀ᶠ (i : ι) in p, ∀ x ∈ s, ‖G i x‖ ≤ Mg
h1 : ∀ x ∈ s, ‖g x‖ ≤ Mg
hF✝ : ∀ ε > 0, ∀ᶠ (n : ι) in p, ∀ x ∈ s, ‖f x - F n x‖ < ε
hG✝ : ∀ ε > 0, ∀ᶠ (n : ι) in p, ∀ x ∈ s, ‖g x - G n x‖ < ε
ε : ℝ
hε : ε > 0
i : ι
hf : ∀ x ∈ s, ‖F i x‖ ≤ Mf
hF : ∀ x ∈ s, ‖f x - F i x‖ < ε / (2 * Mg)
hG : ∀ x ∈ s, ‖g x - G i x‖ < ε / (2 * Mf)
x : α
hx : x ∈ s
h : ¬g x = 0
⊢ ε / 2 = ε / (2 * Mg) * Mg

State before:
case h.e'_4
𝕜 : Type u_1
ι : Type u_2
α : Type u_3
s K : Set α
inst✝ : NormedField 𝕜
F G : ι → α → 𝕜
f g : α → 𝕜
x✝ y : 𝕜
η η' : ℝ
p : Filter ι
mf mg : ℝ
h✝ : NeBot p
Mf : ℝ := |mf| + 1
Mg : ℝ := |mg| + 1
hMf : 0 < Mf
hMg : 0 < Mg
hf✝ : ∀ᶠ (i : ι) in p, ∀ x ∈ s, ‖F i x‖ ≤ Mf
hg : ∀ᶠ (i : ι) in p, ∀ x ∈ s, ‖G i x‖ ≤ Mg
h1 : ∀ x ∈ s, ‖g x‖ ≤ Mg
hF✝ : ∀ ε > 0, ∀ᶠ (n : ι) in p, ∀ x ∈ s, ‖f x - F n x‖ < ε
hG✝ : ∀ ε > 0, ∀ᶠ (n : ι) in p, ∀ x ∈ s, ‖g x - G n x‖ < ε
ε : ℝ
hε : ε > 0
i : ι
hf : ∀ x ∈ s, ‖F i x‖ ≤ Mf
hF : ∀ x ∈ s, ‖f x - F i x‖ < ε / (2 * Mg)
hG : ∀ x ∈ s, ‖g x - G i x‖ < ε / (2 * Mf)
x : α
hx : x ∈ s
h : ¬g x = 0
⊢ ε / 2 = ε / (2 * Mg) * Mg
Tactic:
simp only [div_mul, mul_div_cancel, hMg.ne.symm, Ne.def, not_false_iff]
State after:
no goals

State before:
𝕜 : Type u_1
ι : Type u_2
α : Type u_3
s K : Set α
inst✝ : NormedField 𝕜
F G : ι → α → 𝕜
f g : α → 𝕜
x✝ y : 𝕜
η η' : ℝ
p : Filter ι
mf mg : ℝ
h✝ : NeBot p
Mf : ℝ := |mf| + 1
Mg : ℝ := |mg| + 1
hMf : 0 < Mf
hMg : 0 < Mg
hf✝ : ∀ᶠ (i : ι) in p, ∀ x ∈ s, ‖F i x‖ ≤ Mf
hg : ∀ᶠ (i : ι) in p, ∀ x ∈ s, ‖G i x‖ ≤ Mg
h1 : ∀ x ∈ s, ‖g x‖ ≤ Mg
hF✝ : ∀ ε > 0, ∀ᶠ (n : ι) in p, ∀ x ∈ s, ‖f x - F n x‖ < ε
hG✝ : ∀ ε > 0, ∀ᶠ (n : ι) in p, ∀ x ∈ s, ‖g x - G n x‖ < ε
ε : ℝ
hε : ε > 0
i : ι
hf : ∀ x ∈ s, ‖F i x‖ ≤ Mf
hF : ∀ x ∈ s, ‖f x - F i x‖ < ε / (2 * Mg)
hG : ∀ x ∈ s, ‖g x - G i x‖ < ε / (2 * Mf)
x : α
hx : x ∈ s
h : ¬g x = 0
⊢ 0 ≤ ε / (2 * Mg)
Tactic:
positivity
State after:
no goals

State before:
𝕜 : Type u_1
ι : Type u_2
α : Type u_3
s K : Set α
inst✝ : NormedField 𝕜
F G : ι → α → 𝕜
f g : α → 𝕜
x✝ y : 𝕜
η η' : ℝ
p : Filter ι
mf mg : ℝ
h : NeBot p
Mf : ℝ := |mf| + 1
Mg : ℝ := |mg| + 1
hMf : 0 < Mf
hMg : 0 < Mg
hf✝ : ∀ᶠ (i : ι) in p, ∀ x ∈ s, ‖F i x‖ ≤ Mf
hg : ∀ᶠ (i : ι) in p, ∀ x ∈ s, ‖G i x‖ ≤ Mg
h1 : ∀ x ∈ s, ‖g x‖ ≤ Mg
hF✝ : ∀ ε > 0, ∀ᶠ (n : ι) in p, ∀ x ∈ s, ‖f x - F n x‖ < ε
hG✝ : ∀ ε > 0, ∀ᶠ (n : ι) in p, ∀ x ∈ s, ‖g x - G n x‖ < ε
ε : ℝ
hε : ε > 0
i : ι
hf : ∀ x ∈ s, ‖F i x‖ ≤ Mf
hF : ∀ x ∈ s, ‖f x - F i x‖ < ε / (2 * Mg)
hG : ∀ x ∈ s, ‖g x - G i x‖ < ε / (2 * Mf)
x : α
hx : x ∈ s
h2 : ‖(f x - F i x) * g x‖ < ε / 2
⊢ ‖F i x * (g x - G i x)‖ < ε / 2
Tactic:
rw [norm_mul]
State after:
𝕜 : Type u_1
ι : Type u_2
α : Type u_3
s K : Set α
inst✝ : NormedField 𝕜
F G : ι → α → 𝕜
f g : α → 𝕜
x✝ y : 𝕜
η η' : ℝ
p : Filter ι
mf mg : ℝ
h : NeBot p
Mf : ℝ := |mf| + 1
Mg : ℝ := |mg| + 1
hMf : 0 < Mf
hMg : 0 < Mg
hf✝ : ∀ᶠ (i : ι) in p, ∀ x ∈ s, ‖F i x‖ ≤ Mf
hg : ∀ᶠ (i : ι) in p, ∀ x ∈ s, ‖G i x‖ ≤ Mg
h1 : ∀ x ∈ s, ‖g x‖ ≤ Mg
hF✝ : ∀ ε > 0, ∀ᶠ (n : ι) in p, ∀ x ∈ s, ‖f x - F n x‖ < ε
hG✝ : ∀ ε > 0, ∀ᶠ (n : ι) in p, ∀ x ∈ s, ‖g x - G n x‖ < ε
ε : ℝ
hε : ε > 0
i : ι
hf : ∀ x ∈ s, ‖F i x‖ ≤ Mf
hF : ∀ x ∈ s, ‖f x - F i x‖ < ε / (2 * Mg)
hG : ∀ x ∈ s, ‖g x - G i x‖ < ε / (2 * Mf)
x : α
hx : x ∈ s
h2 : ‖(f x - F i x) * g x‖ < ε / 2
⊢ ‖F i x‖ * ‖g x - G i x‖ < ε / 2

State before:
𝕜 : Type u_1
ι : Type u_2
α : Type u_3
s K : Set α
inst✝ : NormedField 𝕜
F G : ι → α → 𝕜
f g : α → 𝕜
x✝ y : 𝕜
η η' : ℝ
p : Filter ι
mf mg : ℝ
h : NeBot p
Mf : ℝ := |mf| + 1
Mg : ℝ := |mg| + 1
hMf : 0 < Mf
hMg : 0 < Mg
hf✝ : ∀ᶠ (i : ι) in p, ∀ x ∈ s, ‖F i x‖ ≤ Mf
hg : ∀ᶠ (i : ι) in p, ∀ x ∈ s, ‖G i x‖ ≤ Mg
h1 : ∀ x ∈ s, ‖g x‖ ≤ Mg
hF✝ : ∀ ε > 0, ∀ᶠ (n : ι) in p, ∀ x ∈ s, ‖f x - F n x‖ < ε
hG✝ : ∀ ε > 0, ∀ᶠ (n : ι) in p, ∀ x ∈ s, ‖g x - G n x‖ < ε
ε : ℝ
hε : ε > 0
i : ι
hf : ∀ x ∈ s, ‖F i x‖ ≤ Mf
hF : ∀ x ∈ s, ‖f x - F i x‖ < ε / (2 * Mg)
hG : ∀ x ∈ s, ‖g x - G i x‖ < ε / (2 * Mf)
x : α
hx : x ∈ s
h2 : ‖(f x - F i x) * g x‖ < ε / 2
⊢ ‖F i x‖ * ‖g x - G i x‖ < ε / 2
Tactic:
by_cases h : F i x = 0
State after:
case pos
𝕜 : Type u_1
ι : Type u_2
α : Type u_3
s K : Set α
inst✝ : NormedField 𝕜
F G : ι → α → 𝕜
f g : α → 𝕜
x✝ y : 𝕜
η η' : ℝ
p : Filter ι
mf mg : ℝ
h✝ : NeBot p
Mf : ℝ := |mf| + 1
Mg : ℝ := |mg| + 1
hMf : 0 < Mf
hMg : 0 < Mg
hf✝ : ∀ᶠ (i : ι) in p, ∀ x ∈ s, ‖F i x‖ ≤ Mf
hg : ∀ᶠ (i : ι) in p, ∀ x ∈ s, ‖G i x‖ ≤ Mg
h1 : ∀ x ∈ s, ‖g x‖ ≤ Mg
hF✝ : ∀ ε > 0, ∀ᶠ (n : ι) in p, ∀ x ∈ s, ‖f x - F n x‖ < ε
hG✝ : ∀ ε > 0, ∀ᶠ (n : ι) in p, ∀ x ∈ s, ‖g x - G n x‖ < ε
ε : ℝ
hε : ε > 0
i : ι
hf : ∀ x ∈ s, ‖F i x‖ ≤ Mf
hF : ∀ x ∈ s, ‖f x - F i x‖ < ε / (2 * Mg)
hG : ∀ x ∈ s, ‖g x - G i x‖ < ε / (2 * Mf)
x : α
hx : x ∈ s
h2 : ‖(f x - F i x) * g x‖ < ε / 2
h : F i x = 0
⊢ ‖F i x‖ * ‖g x - G i x‖ < ε / 2

case neg
𝕜 : Type u_1
ι : Type u_2
α : Type u_3
s K : Set α
inst✝ : NormedField 𝕜
F G : ι → α → 𝕜
f g : α → 𝕜
x✝ y : 𝕜
η η' : ℝ
p : Filter ι
mf mg : ℝ
h✝ : NeBot p
Mf : ℝ := |mf| + 1
Mg : ℝ := |mg| + 1
hMf : 0 < Mf
hMg : 0 < Mg
hf✝ : ∀ᶠ (i : ι) in p, ∀ x ∈ s, ‖F i x‖ ≤ Mf
hg : ∀ᶠ (i : ι) in p, ∀ x ∈ s, ‖G i x‖ ≤ Mg
h1 : ∀ x ∈ s, ‖g x‖ ≤ Mg
hF✝ : ∀ ε > 0, ∀ᶠ (n : ι) in p, ∀ x ∈ s, ‖f x - F n x‖ < ε
hG✝ : ∀ ε > 0, ∀ᶠ (n : ι) in p, ∀ x ∈ s, ‖g x - G n x‖ < ε
ε : ℝ
hε : ε > 0
i : ι
hf : ∀ x ∈ s, ‖F i x‖ ≤ Mf
hF : ∀ x ∈ s, ‖f x - F i x‖ < ε / (2 * Mg)
hG : ∀ x ∈ s, ‖g x - G i x‖ < ε / (2 * Mf)
x : α
hx : x ∈ s
h2 : ‖(f x - F i x) * g x‖ < ε / 2
h : ¬F i x = 0
⊢ ‖F i x‖ * ‖g x - G i x‖ < ε / 2

State before:
𝕜 : Type u_1
ι : Type u_2
α : Type u_3
s K : Set α
inst✝ : NormedField 𝕜
F G : ι → α → 𝕜
f g : α → 𝕜
x✝ y : 𝕜
η η' : ℝ
p : Filter ι
mf mg : ℝ
h✝ : NeBot p
Mf : ℝ := |mf| + 1
Mg : ℝ := |mg| + 1
hMf : 0 < Mf
hMg : 0 < Mg
hf✝ : ∀ᶠ (i : ι) in p, ∀ x ∈ s, ‖F i x‖ ≤ Mf
hg : ∀ᶠ (i : ι) in p, ∀ x ∈ s, ‖G i x‖ ≤ Mg
h1 : ∀ x ∈ s, ‖g x‖ ≤ Mg
hF✝ : ∀ ε > 0, ∀ᶠ (n : ι) in p, ∀ x ∈ s, ‖f x - F n x‖ < ε
hG✝ : ∀ ε > 0, ∀ᶠ (n : ι) in p, ∀ x ∈ s, ‖g x - G n x‖ < ε
ε : ℝ
hε : ε > 0
i : ι
hf : ∀ x ∈ s, ‖F i x‖ ≤ Mf
hF : ∀ x ∈ s, ‖f x - F i x‖ < ε / (2 * Mg)
hG : ∀ x ∈ s, ‖g x - G i x‖ < ε / (2 * Mf)
x : α
hx : x ∈ s
h2 : ‖(f x - F i x) * g x‖ < ε / 2
h : F i x = 0
⊢ ‖F i x‖ * ‖g x - G i x‖ < ε / 2
Tactic:
case pos => simp [h, half_pos hε]
State after:
no goals

State before:
𝕜 : Type u_1
ι : Type u_2
α : Type u_3
s K : Set α
inst✝ : NormedField 𝕜
F G : ι → α → 𝕜
f g : α → 𝕜
x✝ y : 𝕜
η η' : ℝ
p : Filter ι
mf mg : ℝ
h✝ : NeBot p
Mf : ℝ := |mf| + 1
Mg : ℝ := |mg| + 1
hMf : 0 < Mf
hMg : 0 < Mg
hf✝ : ∀ᶠ (i : ι) in p, ∀ x ∈ s, ‖F i x‖ ≤ Mf
hg : ∀ᶠ (i : ι) in p, ∀ x ∈ s, ‖G i x‖ ≤ Mg
h1 : ∀ x ∈ s, ‖g x‖ ≤ Mg
hF✝ : ∀ ε > 0, ∀ᶠ (n : ι) in p, ∀ x ∈ s, ‖f x - F n x‖ < ε
hG✝ : ∀ ε > 0, ∀ᶠ (n : ι) in p, ∀ x ∈ s, ‖g x - G n x‖ < ε
ε : ℝ
hε : ε > 0
i : ι
hf : ∀ x ∈ s, ‖F i x‖ ≤ Mf
hF : ∀ x ∈ s, ‖f x - F i x‖ < ε / (2 * Mg)
hG : ∀ x ∈ s, ‖g x - G i x‖ < ε / (2 * Mf)
x : α
hx : x ∈ s
h2 : ‖(f x - F i x) * g x‖ < ε / 2
h : ¬F i x = 0
⊢ ‖F i x‖ * ‖g x - G i x‖ < ε / 2
Tactic:
case neg =>
  convert mul_lt_mul' (hf x hx) (hG x hx) (norm_nonneg _) hMf using 1
  field_simp [hMf.ne.symm]; ring
State after:
no goals

State before:
𝕜 : Type u_1
ι : Type u_2
α : Type u_3
s K : Set α
inst✝ : NormedField 𝕜
F G : ι → α → 𝕜
f g : α → 𝕜
x✝ y : 𝕜
η η' : ℝ
p : Filter ι
mf mg : ℝ
h✝ : NeBot p
Mf : ℝ := |mf| + 1
Mg : ℝ := |mg| + 1
hMf : 0 < Mf
hMg : 0 < Mg
hf✝ : ∀ᶠ (i : ι) in p, ∀ x ∈ s, ‖F i x‖ ≤ Mf
hg : ∀ᶠ (i : ι) in p, ∀ x ∈ s, ‖G i x‖ ≤ Mg
h1 : ∀ x ∈ s, ‖g x‖ ≤ Mg
hF✝ : ∀ ε > 0, ∀ᶠ (n : ι) in p, ∀ x ∈ s, ‖f x - F n x‖ < ε
hG✝ : ∀ ε > 0, ∀ᶠ (n : ι) in p, ∀ x ∈ s, ‖g x - G n x‖ < ε
ε : ℝ
hε : ε > 0
i : ι
hf : ∀ x ∈ s, ‖F i x‖ ≤ Mf
hF : ∀ x ∈ s, ‖f x - F i x‖ < ε / (2 * Mg)
hG : ∀ x ∈ s, ‖g x - G i x‖ < ε / (2 * Mf)
x : α
hx : x ∈ s
h2 : ‖(f x - F i x) * g x‖ < ε / 2
h : F i x = 0
⊢ ‖F i x‖ * ‖g x - G i x‖ < ε / 2
Tactic:
simp [h, half_pos hε]
State after:
no goals

State before:
𝕜 : Type u_1
ι : Type u_2
α : Type u_3
s K : Set α
inst✝ : NormedField 𝕜
F G : ι → α → 𝕜
f g : α → 𝕜
x✝ y : 𝕜
η η' : ℝ
p : Filter ι
mf mg : ℝ
h✝ : NeBot p
Mf : ℝ := |mf| + 1
Mg : ℝ := |mg| + 1
hMf : 0 < Mf
hMg : 0 < Mg
hf✝ : ∀ᶠ (i : ι) in p, ∀ x ∈ s, ‖F i x‖ ≤ Mf
hg : ∀ᶠ (i : ι) in p, ∀ x ∈ s, ‖G i x‖ ≤ Mg
h1 : ∀ x ∈ s, ‖g x‖ ≤ Mg
hF✝ : ∀ ε > 0, ∀ᶠ (n : ι) in p, ∀ x ∈ s, ‖f x - F n x‖ < ε
hG✝ : ∀ ε > 0, ∀ᶠ (n : ι) in p, ∀ x ∈ s, ‖g x - G n x‖ < ε
ε : ℝ
hε : ε > 0
i : ι
hf : ∀ x ∈ s, ‖F i x‖ ≤ Mf
hF : ∀ x ∈ s, ‖f x - F i x‖ < ε / (2 * Mg)
hG : ∀ x ∈ s, ‖g x - G i x‖ < ε / (2 * Mf)
x : α
hx : x ∈ s
h2 : ‖(f x - F i x) * g x‖ < ε / 2
h : ¬F i x = 0
⊢ ‖F i x‖ * ‖g x - G i x‖ < ε / 2
Tactic:
convert mul_lt_mul' (hf x hx) (hG x hx) (norm_nonneg _) hMf using 1
State after:
case h.e'_4
𝕜 : Type u_1
ι : Type u_2
α : Type u_3
s K : Set α
inst✝ : NormedField 𝕜
F G : ι → α → 𝕜
f g : α → 𝕜
x✝ y : 𝕜
η η' : ℝ
p : Filter ι
mf mg : ℝ
h✝ : NeBot p
Mf : ℝ := |mf| + 1
Mg : ℝ := |mg| + 1
hMf : 0 < Mf
hMg : 0 < Mg
hf✝ : ∀ᶠ (i : ι) in p, ∀ x ∈ s, ‖F i x‖ ≤ Mf
hg : ∀ᶠ (i : ι) in p, ∀ x ∈ s, ‖G i x‖ ≤ Mg
h1 : ∀ x ∈ s, ‖g x‖ ≤ Mg
hF✝ : ∀ ε > 0, ∀ᶠ (n : ι) in p, ∀ x ∈ s, ‖f x - F n x‖ < ε
hG✝ : ∀ ε > 0, ∀ᶠ (n : ι) in p, ∀ x ∈ s, ‖g x - G n x‖ < ε
ε : ℝ
hε : ε > 0
i : ι
hf : ∀ x ∈ s, ‖F i x‖ ≤ Mf
hF : ∀ x ∈ s, ‖f x - F i x‖ < ε / (2 * Mg)
hG : ∀ x ∈ s, ‖g x - G i x‖ < ε / (2 * Mf)
x : α
hx : x ∈ s
h2 : ‖(f x - F i x) * g x‖ < ε / 2
h : ¬F i x = 0
⊢ ε / 2 = Mf * (ε / (2 * Mf))

State before:
case h.e'_4
𝕜 : Type u_1
ι : Type u_2
α : Type u_3
s K : Set α
inst✝ : NormedField 𝕜
F G : ι → α → 𝕜
f g : α → 𝕜
x✝ y : 𝕜
η η' : ℝ
p : Filter ι
mf mg : ℝ
h✝ : NeBot p
Mf : ℝ := |mf| + 1
Mg : ℝ := |mg| + 1
hMf : 0 < Mf
hMg : 0 < Mg
hf✝ : ∀ᶠ (i : ι) in p, ∀ x ∈ s, ‖F i x‖ ≤ Mf
hg : ∀ᶠ (i : ι) in p, ∀ x ∈ s, ‖G i x‖ ≤ Mg
h1 : ∀ x ∈ s, ‖g x‖ ≤ Mg
hF✝ : ∀ ε > 0, ∀ᶠ (n : ι) in p, ∀ x ∈ s, ‖f x - F n x‖ < ε
hG✝ : ∀ ε > 0, ∀ᶠ (n : ι) in p, ∀ x ∈ s, ‖g x - G n x‖ < ε
ε : ℝ
hε : ε > 0
i : ι
hf : ∀ x ∈ s, ‖F i x‖ ≤ Mf
hF : ∀ x ∈ s, ‖f x - F i x‖ < ε / (2 * Mg)
hG : ∀ x ∈ s, ‖g x - G i x‖ < ε / (2 * Mf)
x : α
hx : x ∈ s
h2 : ‖(f x - F i x) * g x‖ < ε / 2
h : ¬F i x = 0
⊢ ε / 2 = Mf * (ε / (2 * Mf))
Tactic:
field_simp [hMf.ne.symm]
State after:
case h.e'_4
𝕜 : Type u_1
ι : Type u_2
α : Type u_3
s K : Set α
inst✝ : NormedField 𝕜
F G : ι → α → 𝕜
f g : α → 𝕜
x✝ y : 𝕜
η η' : ℝ
p : Filter ι
mf mg : ℝ
h✝ : NeBot p
Mf : ℝ := |mf| + 1
Mg : ℝ := |mg| + 1
hMf : 0 < Mf
hMg : 0 < Mg
hf✝ : ∀ᶠ (i : ι) in p, ∀ x ∈ s, ‖F i x‖ ≤ Mf
hg : ∀ᶠ (i : ι) in p, ∀ x ∈ s, ‖G i x‖ ≤ Mg
h1 : ∀ x ∈ s, ‖g x‖ ≤ Mg
hF✝ : ∀ ε > 0, ∀ᶠ (n : ι) in p, ∀ x ∈ s, ‖f x - F n x‖ < ε
hG✝ : ∀ ε > 0, ∀ᶠ (n : ι) in p, ∀ x ∈ s, ‖g x - G n x‖ < ε
ε : ℝ
hε : ε > 0
i : ι
hf : ∀ x ∈ s, ‖F i x‖ ≤ Mf
hF : ∀ x ∈ s, ‖f x - F i x‖ < ε / (2 * Mg)
hG : ∀ x ∈ s, ‖g x - G i x‖ < ε / (2 * Mf)
x : α
hx : x ∈ s
h2 : ‖(f x - F i x) * g x‖ < ε / 2
h : ¬F i x = 0
⊢ ε * (2 * Mf) = Mf * ε * 2

State before:
case h.e'_4
𝕜 : Type u_1
ι : Type u_2
α : Type u_3
s K : Set α
inst✝ : NormedField 𝕜
F G : ι → α → 𝕜
f g : α → 𝕜
x✝ y : 𝕜
η η' : ℝ
p : Filter ι
mf mg : ℝ
h✝ : NeBot p
Mf : ℝ := |mf| + 1
Mg : ℝ := |mg| + 1
hMf : 0 < Mf
hMg : 0 < Mg
hf✝ : ∀ᶠ (i : ι) in p, ∀ x ∈ s, ‖F i x‖ ≤ Mf
hg : ∀ᶠ (i : ι) in p, ∀ x ∈ s, ‖G i x‖ ≤ Mg
h1 : ∀ x ∈ s, ‖g x‖ ≤ Mg
hF✝ : ∀ ε > 0, ∀ᶠ (n : ι) in p, ∀ x ∈ s, ‖f x - F n x‖ < ε
hG✝ : ∀ ε > 0, ∀ᶠ (n : ι) in p, ∀ x ∈ s, ‖g x - G n x‖ < ε
ε : ℝ
hε : ε > 0
i : ι
hf : ∀ x ∈ s, ‖F i x‖ ≤ Mf
hF : ∀ x ∈ s, ‖f x - F i x‖ < ε / (2 * Mg)
hG : ∀ x ∈ s, ‖g x - G i x‖ < ε / (2 * Mf)
x : α
hx : x ∈ s
h2 : ‖(f x - F i x) * g x‖ < ε / 2
h : ¬F i x = 0
⊢ ε * (2 * Mf) = Mf * ε * 2
Tactic:
ring
State after:
no goals