MPE Home Metamath Proof Explorer < Previous   Next >
Nearby theorems
Mirrors  >  Home  >  MPE Home  >  Th. List  >  metnrmlem3 Structured version   Visualization version   GIF version

Theorem metnrmlem3 23152
Description: Lemma for metnrm 23153. (Contributed by Mario Carneiro, 14-Jan-2014.) (Revised by Mario Carneiro, 5-Sep-2015.)
Hypotheses
Ref Expression
metdscn.f 𝐹 = (𝑥𝑋 ↦ inf(ran (𝑦𝑆 ↦ (𝑥𝐷𝑦)), ℝ*, < ))
metdscn.j 𝐽 = (MetOpen‘𝐷)
metnrmlem.1 (𝜑𝐷 ∈ (∞Met‘𝑋))
metnrmlem.2 (𝜑𝑆 ∈ (Clsd‘𝐽))
metnrmlem.3 (𝜑𝑇 ∈ (Clsd‘𝐽))
metnrmlem.4 (𝜑 → (𝑆𝑇) = ∅)
metnrmlem.u 𝑈 = 𝑡𝑇 (𝑡(ball‘𝐷)(if(1 ≤ (𝐹𝑡), 1, (𝐹𝑡)) / 2))
metnrmlem.g 𝐺 = (𝑥𝑋 ↦ inf(ran (𝑦𝑇 ↦ (𝑥𝐷𝑦)), ℝ*, < ))
metnrmlem.v 𝑉 = 𝑠𝑆 (𝑠(ball‘𝐷)(if(1 ≤ (𝐺𝑠), 1, (𝐺𝑠)) / 2))
Assertion
Ref Expression
metnrmlem3 (𝜑 → ∃𝑧𝐽𝑤𝐽 (𝑆𝑧𝑇𝑤 ∧ (𝑧𝑤) = ∅))
Distinct variable groups:   𝑥,𝑤,𝑦,𝑧   𝑡,𝑠,𝑤,𝑥,𝑦,𝑧,𝐷   𝐽,𝑠,𝑡,𝑤,𝑦,𝑧   𝜑,𝑠,𝑡   𝐺,𝑠,𝑡   𝑇,𝑠,𝑡,𝑤,𝑥,𝑦,𝑧   𝑆,𝑠,𝑡,𝑤,𝑥,𝑦,𝑧   𝑈,𝑠,𝑤   𝑋,𝑠,𝑡,𝑤,𝑥,𝑦,𝑧   𝐹,𝑠,𝑡,𝑤,𝑧   𝑤,𝑉,𝑧
Allowed substitution hints:   𝜑(𝑥,𝑦,𝑧,𝑤)   𝑈(𝑥,𝑦,𝑧,𝑡)   𝐹(𝑥,𝑦)   𝐺(𝑥,𝑦,𝑧,𝑤)   𝐽(𝑥)   𝑉(𝑥,𝑦,𝑡,𝑠)

Proof of Theorem metnrmlem3
StepHypRef Expression
1 metnrmlem.g . . . 4 𝐺 = (𝑥𝑋 ↦ inf(ran (𝑦𝑇 ↦ (𝑥𝐷𝑦)), ℝ*, < ))
2 metdscn.j . . . 4 𝐽 = (MetOpen‘𝐷)
3 metnrmlem.1 . . . 4 (𝜑𝐷 ∈ (∞Met‘𝑋))
4 metnrmlem.3 . . . 4 (𝜑𝑇 ∈ (Clsd‘𝐽))
5 metnrmlem.2 . . . 4 (𝜑𝑆 ∈ (Clsd‘𝐽))
6 incom 4099 . . . . 5 (𝑇𝑆) = (𝑆𝑇)
7 metnrmlem.4 . . . . 5 (𝜑 → (𝑆𝑇) = ∅)
86, 7syl5eq 2843 . . . 4 (𝜑 → (𝑇𝑆) = ∅)
9 metnrmlem.v . . . 4 𝑉 = 𝑠𝑆 (𝑠(ball‘𝐷)(if(1 ≤ (𝐺𝑠), 1, (𝐺𝑠)) / 2))
101, 2, 3, 4, 5, 8, 9metnrmlem2 23151 . . 3 (𝜑 → (𝑉𝐽𝑆𝑉))
1110simpld 495 . 2 (𝜑𝑉𝐽)
12 metdscn.f . . . 4 𝐹 = (𝑥𝑋 ↦ inf(ran (𝑦𝑆 ↦ (𝑥𝐷𝑦)), ℝ*, < ))
13 metnrmlem.u . . . 4 𝑈 = 𝑡𝑇 (𝑡(ball‘𝐷)(if(1 ≤ (𝐹𝑡), 1, (𝐹𝑡)) / 2))
1412, 2, 3, 5, 4, 7, 13metnrmlem2 23151 . . 3 (𝜑 → (𝑈𝐽𝑇𝑈))
1514simpld 495 . 2 (𝜑𝑈𝐽)
1610simprd 496 . 2 (𝜑𝑆𝑉)
1714simprd 496 . 2 (𝜑𝑇𝑈)
189ineq1i 4105 . . . 4 (𝑉𝑈) = ( 𝑠𝑆 (𝑠(ball‘𝐷)(if(1 ≤ (𝐺𝑠), 1, (𝐺𝑠)) / 2)) ∩ 𝑈)
19 iunin1 4893 . . . 4 𝑠𝑆 ((𝑠(ball‘𝐷)(if(1 ≤ (𝐺𝑠), 1, (𝐺𝑠)) / 2)) ∩ 𝑈) = ( 𝑠𝑆 (𝑠(ball‘𝐷)(if(1 ≤ (𝐺𝑠), 1, (𝐺𝑠)) / 2)) ∩ 𝑈)
2018, 19eqtr4i 2822 . . 3 (𝑉𝑈) = 𝑠𝑆 ((𝑠(ball‘𝐷)(if(1 ≤ (𝐺𝑠), 1, (𝐺𝑠)) / 2)) ∩ 𝑈)
2113ineq2i 4106 . . . . . . . 8 ((𝑠(ball‘𝐷)(if(1 ≤ (𝐺𝑠), 1, (𝐺𝑠)) / 2)) ∩ 𝑈) = ((𝑠(ball‘𝐷)(if(1 ≤ (𝐺𝑠), 1, (𝐺𝑠)) / 2)) ∩ 𝑡𝑇 (𝑡(ball‘𝐷)(if(1 ≤ (𝐹𝑡), 1, (𝐹𝑡)) / 2)))
22 iunin2 4892 . . . . . . . 8 𝑡𝑇 ((𝑠(ball‘𝐷)(if(1 ≤ (𝐺𝑠), 1, (𝐺𝑠)) / 2)) ∩ (𝑡(ball‘𝐷)(if(1 ≤ (𝐹𝑡), 1, (𝐹𝑡)) / 2))) = ((𝑠(ball‘𝐷)(if(1 ≤ (𝐺𝑠), 1, (𝐺𝑠)) / 2)) ∩ 𝑡𝑇 (𝑡(ball‘𝐷)(if(1 ≤ (𝐹𝑡), 1, (𝐹𝑡)) / 2)))
2321, 22eqtr4i 2822 . . . . . . 7 ((𝑠(ball‘𝐷)(if(1 ≤ (𝐺𝑠), 1, (𝐺𝑠)) / 2)) ∩ 𝑈) = 𝑡𝑇 ((𝑠(ball‘𝐷)(if(1 ≤ (𝐺𝑠), 1, (𝐺𝑠)) / 2)) ∩ (𝑡(ball‘𝐷)(if(1 ≤ (𝐹𝑡), 1, (𝐹𝑡)) / 2)))
243adantr 481 . . . . . . . . . . . 12 ((𝜑 ∧ (𝑠𝑆𝑡𝑇)) → 𝐷 ∈ (∞Met‘𝑋))
25 eqid 2795 . . . . . . . . . . . . . . . . 17 𝐽 = 𝐽
2625cldss 21321 . . . . . . . . . . . . . . . 16 (𝑆 ∈ (Clsd‘𝐽) → 𝑆 𝐽)
275, 26syl 17 . . . . . . . . . . . . . . 15 (𝜑𝑆 𝐽)
282mopnuni 22734 . . . . . . . . . . . . . . . 16 (𝐷 ∈ (∞Met‘𝑋) → 𝑋 = 𝐽)
293, 28syl 17 . . . . . . . . . . . . . . 15 (𝜑𝑋 = 𝐽)
3027, 29sseqtr4d 3929 . . . . . . . . . . . . . 14 (𝜑𝑆𝑋)
3130sselda 3889 . . . . . . . . . . . . 13 ((𝜑𝑠𝑆) → 𝑠𝑋)
3231adantrr 713 . . . . . . . . . . . 12 ((𝜑 ∧ (𝑠𝑆𝑡𝑇)) → 𝑠𝑋)
3325cldss 21321 . . . . . . . . . . . . . . . 16 (𝑇 ∈ (Clsd‘𝐽) → 𝑇 𝐽)
344, 33syl 17 . . . . . . . . . . . . . . 15 (𝜑𝑇 𝐽)
3534, 29sseqtr4d 3929 . . . . . . . . . . . . . 14 (𝜑𝑇𝑋)
3635sselda 3889 . . . . . . . . . . . . 13 ((𝜑𝑡𝑇) → 𝑡𝑋)
3736adantrl 712 . . . . . . . . . . . 12 ((𝜑 ∧ (𝑠𝑆𝑡𝑇)) → 𝑡𝑋)
381, 2, 3, 4, 5, 8metnrmlem1a 23149 . . . . . . . . . . . . . . . 16 ((𝜑𝑠𝑆) → (0 < (𝐺𝑠) ∧ if(1 ≤ (𝐺𝑠), 1, (𝐺𝑠)) ∈ ℝ+))
3938simprd 496 . . . . . . . . . . . . . . 15 ((𝜑𝑠𝑆) → if(1 ≤ (𝐺𝑠), 1, (𝐺𝑠)) ∈ ℝ+)
4039adantrr 713 . . . . . . . . . . . . . 14 ((𝜑 ∧ (𝑠𝑆𝑡𝑇)) → if(1 ≤ (𝐺𝑠), 1, (𝐺𝑠)) ∈ ℝ+)
4140rphalfcld 12293 . . . . . . . . . . . . 13 ((𝜑 ∧ (𝑠𝑆𝑡𝑇)) → (if(1 ≤ (𝐺𝑠), 1, (𝐺𝑠)) / 2) ∈ ℝ+)
4241rpxrd 12282 . . . . . . . . . . . 12 ((𝜑 ∧ (𝑠𝑆𝑡𝑇)) → (if(1 ≤ (𝐺𝑠), 1, (𝐺𝑠)) / 2) ∈ ℝ*)
4312, 2, 3, 5, 4, 7metnrmlem1a 23149 . . . . . . . . . . . . . . . 16 ((𝜑𝑡𝑇) → (0 < (𝐹𝑡) ∧ if(1 ≤ (𝐹𝑡), 1, (𝐹𝑡)) ∈ ℝ+))
4443adantrl 712 . . . . . . . . . . . . . . 15 ((𝜑 ∧ (𝑠𝑆𝑡𝑇)) → (0 < (𝐹𝑡) ∧ if(1 ≤ (𝐹𝑡), 1, (𝐹𝑡)) ∈ ℝ+))
4544simprd 496 . . . . . . . . . . . . . 14 ((𝜑 ∧ (𝑠𝑆𝑡𝑇)) → if(1 ≤ (𝐹𝑡), 1, (𝐹𝑡)) ∈ ℝ+)
4645rphalfcld 12293 . . . . . . . . . . . . 13 ((𝜑 ∧ (𝑠𝑆𝑡𝑇)) → (if(1 ≤ (𝐹𝑡), 1, (𝐹𝑡)) / 2) ∈ ℝ+)
4746rpxrd 12282 . . . . . . . . . . . 12 ((𝜑 ∧ (𝑠𝑆𝑡𝑇)) → (if(1 ≤ (𝐹𝑡), 1, (𝐹𝑡)) / 2) ∈ ℝ*)
4840rpred 12281 . . . . . . . . . . . . . . . 16 ((𝜑 ∧ (𝑠𝑆𝑡𝑇)) → if(1 ≤ (𝐺𝑠), 1, (𝐺𝑠)) ∈ ℝ)
4948rehalfcld 11732 . . . . . . . . . . . . . . 15 ((𝜑 ∧ (𝑠𝑆𝑡𝑇)) → (if(1 ≤ (𝐺𝑠), 1, (𝐺𝑠)) / 2) ∈ ℝ)
5045rpred 12281 . . . . . . . . . . . . . . . 16 ((𝜑 ∧ (𝑠𝑆𝑡𝑇)) → if(1 ≤ (𝐹𝑡), 1, (𝐹𝑡)) ∈ ℝ)
5150rehalfcld 11732 . . . . . . . . . . . . . . 15 ((𝜑 ∧ (𝑠𝑆𝑡𝑇)) → (if(1 ≤ (𝐹𝑡), 1, (𝐹𝑡)) / 2) ∈ ℝ)
5249, 51rexaddd 12477 . . . . . . . . . . . . . 14 ((𝜑 ∧ (𝑠𝑆𝑡𝑇)) → ((if(1 ≤ (𝐺𝑠), 1, (𝐺𝑠)) / 2) +𝑒 (if(1 ≤ (𝐹𝑡), 1, (𝐹𝑡)) / 2)) = ((if(1 ≤ (𝐺𝑠), 1, (𝐺𝑠)) / 2) + (if(1 ≤ (𝐹𝑡), 1, (𝐹𝑡)) / 2)))
5348recnd 10515 . . . . . . . . . . . . . . 15 ((𝜑 ∧ (𝑠𝑆𝑡𝑇)) → if(1 ≤ (𝐺𝑠), 1, (𝐺𝑠)) ∈ ℂ)
5450recnd 10515 . . . . . . . . . . . . . . 15 ((𝜑 ∧ (𝑠𝑆𝑡𝑇)) → if(1 ≤ (𝐹𝑡), 1, (𝐹𝑡)) ∈ ℂ)
55 2cnd 11563 . . . . . . . . . . . . . . 15 ((𝜑 ∧ (𝑠𝑆𝑡𝑇)) → 2 ∈ ℂ)
56 2ne0 11589 . . . . . . . . . . . . . . . 16 2 ≠ 0
5756a1i 11 . . . . . . . . . . . . . . 15 ((𝜑 ∧ (𝑠𝑆𝑡𝑇)) → 2 ≠ 0)
5853, 54, 55, 57divdird 11302 . . . . . . . . . . . . . 14 ((𝜑 ∧ (𝑠𝑆𝑡𝑇)) → ((if(1 ≤ (𝐺𝑠), 1, (𝐺𝑠)) + if(1 ≤ (𝐹𝑡), 1, (𝐹𝑡))) / 2) = ((if(1 ≤ (𝐺𝑠), 1, (𝐺𝑠)) / 2) + (if(1 ≤ (𝐹𝑡), 1, (𝐹𝑡)) / 2)))
5952, 58eqtr4d 2834 . . . . . . . . . . . . 13 ((𝜑 ∧ (𝑠𝑆𝑡𝑇)) → ((if(1 ≤ (𝐺𝑠), 1, (𝐺𝑠)) / 2) +𝑒 (if(1 ≤ (𝐹𝑡), 1, (𝐹𝑡)) / 2)) = ((if(1 ≤ (𝐺𝑠), 1, (𝐺𝑠)) + if(1 ≤ (𝐹𝑡), 1, (𝐹𝑡))) / 2))
601, 2, 3, 4, 5, 8metnrmlem1 23150 . . . . . . . . . . . . . . . . . 18 ((𝜑 ∧ (𝑡𝑇𝑠𝑆)) → if(1 ≤ (𝐺𝑠), 1, (𝐺𝑠)) ≤ (𝑡𝐷𝑠))
6160ancom2s 646 . . . . . . . . . . . . . . . . 17 ((𝜑 ∧ (𝑠𝑆𝑡𝑇)) → if(1 ≤ (𝐺𝑠), 1, (𝐺𝑠)) ≤ (𝑡𝐷𝑠))
62 xmetsym 22640 . . . . . . . . . . . . . . . . . 18 ((𝐷 ∈ (∞Met‘𝑋) ∧ 𝑡𝑋𝑠𝑋) → (𝑡𝐷𝑠) = (𝑠𝐷𝑡))
6324, 37, 32, 62syl3anc 1364 . . . . . . . . . . . . . . . . 17 ((𝜑 ∧ (𝑠𝑆𝑡𝑇)) → (𝑡𝐷𝑠) = (𝑠𝐷𝑡))
6461, 63breqtrd 4988 . . . . . . . . . . . . . . . 16 ((𝜑 ∧ (𝑠𝑆𝑡𝑇)) → if(1 ≤ (𝐺𝑠), 1, (𝐺𝑠)) ≤ (𝑠𝐷𝑡))
6512, 2, 3, 5, 4, 7metnrmlem1 23150 . . . . . . . . . . . . . . . 16 ((𝜑 ∧ (𝑠𝑆𝑡𝑇)) → if(1 ≤ (𝐹𝑡), 1, (𝐹𝑡)) ≤ (𝑠𝐷𝑡))
6640rpxrd 12282 . . . . . . . . . . . . . . . . 17 ((𝜑 ∧ (𝑠𝑆𝑡𝑇)) → if(1 ≤ (𝐺𝑠), 1, (𝐺𝑠)) ∈ ℝ*)
6745rpxrd 12282 . . . . . . . . . . . . . . . . 17 ((𝜑 ∧ (𝑠𝑆𝑡𝑇)) → if(1 ≤ (𝐹𝑡), 1, (𝐹𝑡)) ∈ ℝ*)
68 xmetcl 22624 . . . . . . . . . . . . . . . . . 18 ((𝐷 ∈ (∞Met‘𝑋) ∧ 𝑠𝑋𝑡𝑋) → (𝑠𝐷𝑡) ∈ ℝ*)
6924, 32, 37, 68syl3anc 1364 . . . . . . . . . . . . . . . . 17 ((𝜑 ∧ (𝑠𝑆𝑡𝑇)) → (𝑠𝐷𝑡) ∈ ℝ*)
70 xle2add 12502 . . . . . . . . . . . . . . . . 17 (((if(1 ≤ (𝐺𝑠), 1, (𝐺𝑠)) ∈ ℝ* ∧ if(1 ≤ (𝐹𝑡), 1, (𝐹𝑡)) ∈ ℝ*) ∧ ((𝑠𝐷𝑡) ∈ ℝ* ∧ (𝑠𝐷𝑡) ∈ ℝ*)) → ((if(1 ≤ (𝐺𝑠), 1, (𝐺𝑠)) ≤ (𝑠𝐷𝑡) ∧ if(1 ≤ (𝐹𝑡), 1, (𝐹𝑡)) ≤ (𝑠𝐷𝑡)) → (if(1 ≤ (𝐺𝑠), 1, (𝐺𝑠)) +𝑒 if(1 ≤ (𝐹𝑡), 1, (𝐹𝑡))) ≤ ((𝑠𝐷𝑡) +𝑒 (𝑠𝐷𝑡))))
7166, 67, 69, 69, 70syl22anc 835 . . . . . . . . . . . . . . . 16 ((𝜑 ∧ (𝑠𝑆𝑡𝑇)) → ((if(1 ≤ (𝐺𝑠), 1, (𝐺𝑠)) ≤ (𝑠𝐷𝑡) ∧ if(1 ≤ (𝐹𝑡), 1, (𝐹𝑡)) ≤ (𝑠𝐷𝑡)) → (if(1 ≤ (𝐺𝑠), 1, (𝐺𝑠)) +𝑒 if(1 ≤ (𝐹𝑡), 1, (𝐹𝑡))) ≤ ((𝑠𝐷𝑡) +𝑒 (𝑠𝐷𝑡))))
7264, 65, 71mp2and 695 . . . . . . . . . . . . . . 15 ((𝜑 ∧ (𝑠𝑆𝑡𝑇)) → (if(1 ≤ (𝐺𝑠), 1, (𝐺𝑠)) +𝑒 if(1 ≤ (𝐹𝑡), 1, (𝐹𝑡))) ≤ ((𝑠𝐷𝑡) +𝑒 (𝑠𝐷𝑡)))
7348, 50readdcld 10516 . . . . . . . . . . . . . . . . . 18 ((𝜑 ∧ (𝑠𝑆𝑡𝑇)) → (if(1 ≤ (𝐺𝑠), 1, (𝐺𝑠)) + if(1 ≤ (𝐹𝑡), 1, (𝐹𝑡))) ∈ ℝ)
7473recnd 10515 . . . . . . . . . . . . . . . . 17 ((𝜑 ∧ (𝑠𝑆𝑡𝑇)) → (if(1 ≤ (𝐺𝑠), 1, (𝐺𝑠)) + if(1 ≤ (𝐹𝑡), 1, (𝐹𝑡))) ∈ ℂ)
7574, 55, 57divcan2d 11266 . . . . . . . . . . . . . . . 16 ((𝜑 ∧ (𝑠𝑆𝑡𝑇)) → (2 · ((if(1 ≤ (𝐺𝑠), 1, (𝐺𝑠)) + if(1 ≤ (𝐹𝑡), 1, (𝐹𝑡))) / 2)) = (if(1 ≤ (𝐺𝑠), 1, (𝐺𝑠)) + if(1 ≤ (𝐹𝑡), 1, (𝐹𝑡))))
76 2re 11559 . . . . . . . . . . . . . . . . 17 2 ∈ ℝ
7773rehalfcld 11732 . . . . . . . . . . . . . . . . 17 ((𝜑 ∧ (𝑠𝑆𝑡𝑇)) → ((if(1 ≤ (𝐺𝑠), 1, (𝐺𝑠)) + if(1 ≤ (𝐹𝑡), 1, (𝐹𝑡))) / 2) ∈ ℝ)
78 rexmul 12514 . . . . . . . . . . . . . . . . 17 ((2 ∈ ℝ ∧ ((if(1 ≤ (𝐺𝑠), 1, (𝐺𝑠)) + if(1 ≤ (𝐹𝑡), 1, (𝐹𝑡))) / 2) ∈ ℝ) → (2 ·e ((if(1 ≤ (𝐺𝑠), 1, (𝐺𝑠)) + if(1 ≤ (𝐹𝑡), 1, (𝐹𝑡))) / 2)) = (2 · ((if(1 ≤ (𝐺𝑠), 1, (𝐺𝑠)) + if(1 ≤ (𝐹𝑡), 1, (𝐹𝑡))) / 2)))
7976, 77, 78sylancr 587 . . . . . . . . . . . . . . . 16 ((𝜑 ∧ (𝑠𝑆𝑡𝑇)) → (2 ·e ((if(1 ≤ (𝐺𝑠), 1, (𝐺𝑠)) + if(1 ≤ (𝐹𝑡), 1, (𝐹𝑡))) / 2)) = (2 · ((if(1 ≤ (𝐺𝑠), 1, (𝐺𝑠)) + if(1 ≤ (𝐹𝑡), 1, (𝐹𝑡))) / 2)))
8048, 50rexaddd 12477 . . . . . . . . . . . . . . . 16 ((𝜑 ∧ (𝑠𝑆𝑡𝑇)) → (if(1 ≤ (𝐺𝑠), 1, (𝐺𝑠)) +𝑒 if(1 ≤ (𝐹𝑡), 1, (𝐹𝑡))) = (if(1 ≤ (𝐺𝑠), 1, (𝐺𝑠)) + if(1 ≤ (𝐹𝑡), 1, (𝐹𝑡))))
8175, 79, 803eqtr4d 2841 . . . . . . . . . . . . . . 15 ((𝜑 ∧ (𝑠𝑆𝑡𝑇)) → (2 ·e ((if(1 ≤ (𝐺𝑠), 1, (𝐺𝑠)) + if(1 ≤ (𝐹𝑡), 1, (𝐹𝑡))) / 2)) = (if(1 ≤ (𝐺𝑠), 1, (𝐺𝑠)) +𝑒 if(1 ≤ (𝐹𝑡), 1, (𝐹𝑡))))
82 x2times 12542 . . . . . . . . . . . . . . . 16 ((𝑠𝐷𝑡) ∈ ℝ* → (2 ·e (𝑠𝐷𝑡)) = ((𝑠𝐷𝑡) +𝑒 (𝑠𝐷𝑡)))
8369, 82syl 17 . . . . . . . . . . . . . . 15 ((𝜑 ∧ (𝑠𝑆𝑡𝑇)) → (2 ·e (𝑠𝐷𝑡)) = ((𝑠𝐷𝑡) +𝑒 (𝑠𝐷𝑡)))
8472, 81, 833brtr4d 4994 . . . . . . . . . . . . . 14 ((𝜑 ∧ (𝑠𝑆𝑡𝑇)) → (2 ·e ((if(1 ≤ (𝐺𝑠), 1, (𝐺𝑠)) + if(1 ≤ (𝐹𝑡), 1, (𝐹𝑡))) / 2)) ≤ (2 ·e (𝑠𝐷𝑡)))
8577rexrd 10537 . . . . . . . . . . . . . . 15 ((𝜑 ∧ (𝑠𝑆𝑡𝑇)) → ((if(1 ≤ (𝐺𝑠), 1, (𝐺𝑠)) + if(1 ≤ (𝐹𝑡), 1, (𝐹𝑡))) / 2) ∈ ℝ*)
86 2rp 12244 . . . . . . . . . . . . . . . 16 2 ∈ ℝ+
8786a1i 11 . . . . . . . . . . . . . . 15 ((𝜑 ∧ (𝑠𝑆𝑡𝑇)) → 2 ∈ ℝ+)
88 xlemul2 12534 . . . . . . . . . . . . . . 15 ((((if(1 ≤ (𝐺𝑠), 1, (𝐺𝑠)) + if(1 ≤ (𝐹𝑡), 1, (𝐹𝑡))) / 2) ∈ ℝ* ∧ (𝑠𝐷𝑡) ∈ ℝ* ∧ 2 ∈ ℝ+) → (((if(1 ≤ (𝐺𝑠), 1, (𝐺𝑠)) + if(1 ≤ (𝐹𝑡), 1, (𝐹𝑡))) / 2) ≤ (𝑠𝐷𝑡) ↔ (2 ·e ((if(1 ≤ (𝐺𝑠), 1, (𝐺𝑠)) + if(1 ≤ (𝐹𝑡), 1, (𝐹𝑡))) / 2)) ≤ (2 ·e (𝑠𝐷𝑡))))
8985, 69, 87, 88syl3anc 1364 . . . . . . . . . . . . . 14 ((𝜑 ∧ (𝑠𝑆𝑡𝑇)) → (((if(1 ≤ (𝐺𝑠), 1, (𝐺𝑠)) + if(1 ≤ (𝐹𝑡), 1, (𝐹𝑡))) / 2) ≤ (𝑠𝐷𝑡) ↔ (2 ·e ((if(1 ≤ (𝐺𝑠), 1, (𝐺𝑠)) + if(1 ≤ (𝐹𝑡), 1, (𝐹𝑡))) / 2)) ≤ (2 ·e (𝑠𝐷𝑡))))
9084, 89mpbird 258 . . . . . . . . . . . . 13 ((𝜑 ∧ (𝑠𝑆𝑡𝑇)) → ((if(1 ≤ (𝐺𝑠), 1, (𝐺𝑠)) + if(1 ≤ (𝐹𝑡), 1, (𝐹𝑡))) / 2) ≤ (𝑠𝐷𝑡))
9159, 90eqbrtrd 4984 . . . . . . . . . . . 12 ((𝜑 ∧ (𝑠𝑆𝑡𝑇)) → ((if(1 ≤ (𝐺𝑠), 1, (𝐺𝑠)) / 2) +𝑒 (if(1 ≤ (𝐹𝑡), 1, (𝐹𝑡)) / 2)) ≤ (𝑠𝐷𝑡))
92 bldisj 22691 . . . . . . . . . . . 12 (((𝐷 ∈ (∞Met‘𝑋) ∧ 𝑠𝑋𝑡𝑋) ∧ ((if(1 ≤ (𝐺𝑠), 1, (𝐺𝑠)) / 2) ∈ ℝ* ∧ (if(1 ≤ (𝐹𝑡), 1, (𝐹𝑡)) / 2) ∈ ℝ* ∧ ((if(1 ≤ (𝐺𝑠), 1, (𝐺𝑠)) / 2) +𝑒 (if(1 ≤ (𝐹𝑡), 1, (𝐹𝑡)) / 2)) ≤ (𝑠𝐷𝑡))) → ((𝑠(ball‘𝐷)(if(1 ≤ (𝐺𝑠), 1, (𝐺𝑠)) / 2)) ∩ (𝑡(ball‘𝐷)(if(1 ≤ (𝐹𝑡), 1, (𝐹𝑡)) / 2))) = ∅)
9324, 32, 37, 42, 47, 91, 92syl33anc 1378 . . . . . . . . . . 11 ((𝜑 ∧ (𝑠𝑆𝑡𝑇)) → ((𝑠(ball‘𝐷)(if(1 ≤ (𝐺𝑠), 1, (𝐺𝑠)) / 2)) ∩ (𝑡(ball‘𝐷)(if(1 ≤ (𝐹𝑡), 1, (𝐹𝑡)) / 2))) = ∅)
94 eqimss 3944 . . . . . . . . . . 11 (((𝑠(ball‘𝐷)(if(1 ≤ (𝐺𝑠), 1, (𝐺𝑠)) / 2)) ∩ (𝑡(ball‘𝐷)(if(1 ≤ (𝐹𝑡), 1, (𝐹𝑡)) / 2))) = ∅ → ((𝑠(ball‘𝐷)(if(1 ≤ (𝐺𝑠), 1, (𝐺𝑠)) / 2)) ∩ (𝑡(ball‘𝐷)(if(1 ≤ (𝐹𝑡), 1, (𝐹𝑡)) / 2))) ⊆ ∅)
9593, 94syl 17 . . . . . . . . . 10 ((𝜑 ∧ (𝑠𝑆𝑡𝑇)) → ((𝑠(ball‘𝐷)(if(1 ≤ (𝐺𝑠), 1, (𝐺𝑠)) / 2)) ∩ (𝑡(ball‘𝐷)(if(1 ≤ (𝐹𝑡), 1, (𝐹𝑡)) / 2))) ⊆ ∅)
9695anassrs 468 . . . . . . . . 9 (((𝜑𝑠𝑆) ∧ 𝑡𝑇) → ((𝑠(ball‘𝐷)(if(1 ≤ (𝐺𝑠), 1, (𝐺𝑠)) / 2)) ∩ (𝑡(ball‘𝐷)(if(1 ≤ (𝐹𝑡), 1, (𝐹𝑡)) / 2))) ⊆ ∅)
9796ralrimiva 3149 . . . . . . . 8 ((𝜑𝑠𝑆) → ∀𝑡𝑇 ((𝑠(ball‘𝐷)(if(1 ≤ (𝐺𝑠), 1, (𝐺𝑠)) / 2)) ∩ (𝑡(ball‘𝐷)(if(1 ≤ (𝐹𝑡), 1, (𝐹𝑡)) / 2))) ⊆ ∅)
98 iunss 4868 . . . . . . . 8 ( 𝑡𝑇 ((𝑠(ball‘𝐷)(if(1 ≤ (𝐺𝑠), 1, (𝐺𝑠)) / 2)) ∩ (𝑡(ball‘𝐷)(if(1 ≤ (𝐹𝑡), 1, (𝐹𝑡)) / 2))) ⊆ ∅ ↔ ∀𝑡𝑇 ((𝑠(ball‘𝐷)(if(1 ≤ (𝐺𝑠), 1, (𝐺𝑠)) / 2)) ∩ (𝑡(ball‘𝐷)(if(1 ≤ (𝐹𝑡), 1, (𝐹𝑡)) / 2))) ⊆ ∅)
9997, 98sylibr 235 . . . . . . 7 ((𝜑𝑠𝑆) → 𝑡𝑇 ((𝑠(ball‘𝐷)(if(1 ≤ (𝐺𝑠), 1, (𝐺𝑠)) / 2)) ∩ (𝑡(ball‘𝐷)(if(1 ≤ (𝐹𝑡), 1, (𝐹𝑡)) / 2))) ⊆ ∅)
10023, 99syl5eqss 3936 . . . . . 6 ((𝜑𝑠𝑆) → ((𝑠(ball‘𝐷)(if(1 ≤ (𝐺𝑠), 1, (𝐺𝑠)) / 2)) ∩ 𝑈) ⊆ ∅)
101100ralrimiva 3149 . . . . 5 (𝜑 → ∀𝑠𝑆 ((𝑠(ball‘𝐷)(if(1 ≤ (𝐺𝑠), 1, (𝐺𝑠)) / 2)) ∩ 𝑈) ⊆ ∅)
102 iunss 4868 . . . . 5 ( 𝑠𝑆 ((𝑠(ball‘𝐷)(if(1 ≤ (𝐺𝑠), 1, (𝐺𝑠)) / 2)) ∩ 𝑈) ⊆ ∅ ↔ ∀𝑠𝑆 ((𝑠(ball‘𝐷)(if(1 ≤ (𝐺𝑠), 1, (𝐺𝑠)) / 2)) ∩ 𝑈) ⊆ ∅)
103101, 102sylibr 235 . . . 4 (𝜑 𝑠𝑆 ((𝑠(ball‘𝐷)(if(1 ≤ (𝐺𝑠), 1, (𝐺𝑠)) / 2)) ∩ 𝑈) ⊆ ∅)
104 ss0 4272 . . . 4 ( 𝑠𝑆 ((𝑠(ball‘𝐷)(if(1 ≤ (𝐺𝑠), 1, (𝐺𝑠)) / 2)) ∩ 𝑈) ⊆ ∅ → 𝑠𝑆 ((𝑠(ball‘𝐷)(if(1 ≤ (𝐺𝑠), 1, (𝐺𝑠)) / 2)) ∩ 𝑈) = ∅)
105103, 104syl 17 . . 3 (𝜑 𝑠𝑆 ((𝑠(ball‘𝐷)(if(1 ≤ (𝐺𝑠), 1, (𝐺𝑠)) / 2)) ∩ 𝑈) = ∅)
10620, 105syl5eq 2843 . 2 (𝜑 → (𝑉𝑈) = ∅)
107 sseq2 3914 . . . 4 (𝑧 = 𝑉 → (𝑆𝑧𝑆𝑉))
108 ineq1 4101 . . . . 5 (𝑧 = 𝑉 → (𝑧𝑤) = (𝑉𝑤))
109108eqeq1d 2797 . . . 4 (𝑧 = 𝑉 → ((𝑧𝑤) = ∅ ↔ (𝑉𝑤) = ∅))
110107, 1093anbi13d 1430 . . 3 (𝑧 = 𝑉 → ((𝑆𝑧𝑇𝑤 ∧ (𝑧𝑤) = ∅) ↔ (𝑆𝑉𝑇𝑤 ∧ (𝑉𝑤) = ∅)))
111 sseq2 3914 . . . 4 (𝑤 = 𝑈 → (𝑇𝑤𝑇𝑈))
112 ineq2 4103 . . . . 5 (𝑤 = 𝑈 → (𝑉𝑤) = (𝑉𝑈))
113112eqeq1d 2797 . . . 4 (𝑤 = 𝑈 → ((𝑉𝑤) = ∅ ↔ (𝑉𝑈) = ∅))
114111, 1133anbi23d 1431 . . 3 (𝑤 = 𝑈 → ((𝑆𝑉𝑇𝑤 ∧ (𝑉𝑤) = ∅) ↔ (𝑆𝑉𝑇𝑈 ∧ (𝑉𝑈) = ∅)))
115110, 114rspc2ev 3574 . 2 ((𝑉𝐽𝑈𝐽 ∧ (𝑆𝑉𝑇𝑈 ∧ (𝑉𝑈) = ∅)) → ∃𝑧𝐽𝑤𝐽 (𝑆𝑧𝑇𝑤 ∧ (𝑧𝑤) = ∅))
11611, 15, 16, 17, 106, 115syl113anc 1375 1 (𝜑 → ∃𝑧𝐽𝑤𝐽 (𝑆𝑧𝑇𝑤 ∧ (𝑧𝑤) = ∅))
Colors of variables: wff setvar class
Syntax hints:  wi 4  wb 207  wa 396  w3a 1080   = wceq 1522  wcel 2081  wne 2984  wral 3105  wrex 3106  cin 3858  wss 3859  c0 4211  ifcif 4381   cuni 4745   ciun 4825   class class class wbr 4962  cmpt 5041  ran crn 5444  cfv 6225  (class class class)co 7016  infcinf 8751  cr 10382  0cc0 10383  1c1 10384   + caddc 10386   · cmul 10388  *cxr 10520   < clt 10521  cle 10522   / cdiv 11145  2c2 11540  +crp 12239   +𝑒 cxad 12355   ·e cxmu 12356  ∞Metcxmet 20212  ballcbl 20214  MetOpencmopn 20217  Clsdccld 21308
This theorem was proved from axioms:  ax-mp 5  ax-1 6  ax-2 7  ax-3 8  ax-gen 1777  ax-4 1791  ax-5 1888  ax-6 1947  ax-7 1992  ax-8 2083  ax-9 2091  ax-10 2112  ax-11 2126  ax-12 2141  ax-13 2344  ax-ext 2769  ax-rep 5081  ax-sep 5094  ax-nul 5101  ax-pow 5157  ax-pr 5221  ax-un 7319  ax-cnex 10439  ax-resscn 10440  ax-1cn 10441  ax-icn 10442  ax-addcl 10443  ax-addrcl 10444  ax-mulcl 10445  ax-mulrcl 10446  ax-mulcom 10447  ax-addass 10448  ax-mulass 10449  ax-distr 10450  ax-i2m1 10451  ax-1ne0 10452  ax-1rid 10453  ax-rnegex 10454  ax-rrecex 10455  ax-cnre 10456  ax-pre-lttri 10457  ax-pre-lttrn 10458  ax-pre-ltadd 10459  ax-pre-mulgt0 10460  ax-pre-sup 10461
This theorem depends on definitions:  df-bi 208  df-an 397  df-or 843  df-3or 1081  df-3an 1082  df-tru 1525  df-ex 1762  df-nf 1766  df-sb 2043  df-mo 2576  df-eu 2612  df-clab 2776  df-cleq 2788  df-clel 2863  df-nfc 2935  df-ne 2985  df-nel 3091  df-ral 3110  df-rex 3111  df-reu 3112  df-rmo 3113  df-rab 3114  df-v 3439  df-sbc 3707  df-csb 3812  df-dif 3862  df-un 3864  df-in 3866  df-ss 3874  df-pss 3876  df-nul 4212  df-if 4382  df-pw 4455  df-sn 4473  df-pr 4475  df-tp 4477  df-op 4479  df-uni 4746  df-int 4783  df-iun 4827  df-iin 4828  df-br 4963  df-opab 5025  df-mpt 5042  df-tr 5064  df-id 5348  df-eprel 5353  df-po 5362  df-so 5363  df-fr 5402  df-we 5404  df-xp 5449  df-rel 5450  df-cnv 5451  df-co 5452  df-dm 5453  df-rn 5454  df-res 5455  df-ima 5456  df-pred 6023  df-ord 6069  df-on 6070  df-lim 6071  df-suc 6072  df-iota 6189  df-fun 6227  df-fn 6228  df-f 6229  df-f1 6230  df-fo 6231  df-f1o 6232  df-fv 6233  df-riota 6977  df-ov 7019  df-oprab 7020  df-mpo 7021  df-om 7437  df-1st 7545  df-2nd 7546  df-wrecs 7798  df-recs 7860  df-rdg 7898  df-er 8139  df-ec 8141  df-map 8258  df-en 8358  df-dom 8359  df-sdom 8360  df-sup 8752  df-inf 8753  df-pnf 10523  df-mnf 10524  df-xr 10525  df-ltxr 10526  df-le 10527  df-sub 10719  df-neg 10720  df-div 11146  df-nn 11487  df-2 11548  df-n0 11746  df-z 11830  df-uz 12094  df-q 12198  df-rp 12240  df-xneg 12357  df-xadd 12358  df-xmul 12359  df-icc 12595  df-topgen 16546  df-psmet 20219  df-xmet 20220  df-bl 20222  df-mopn 20223  df-top 21186  df-topon 21203  df-bases 21238  df-cld 21311  df-ntr 21312  df-cls 21313
This theorem is referenced by:  metnrm  23153
  Copyright terms: Public domain W3C validator