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

Theorem metdstri 24740
Description: A generalization of the triangle inequality to the point-set distance function. Under the usual notation where the same symbol 𝑑 denotes the point-point and point-set distance functions, this theorem would be written 𝑑(𝑎, 𝑆) ≤ 𝑑(𝑎, 𝑏) + 𝑑(𝑏, 𝑆). (Contributed by Mario Carneiro, 4-Sep-2015.)
Hypothesis
Ref Expression
metdscn.f 𝐹 = (𝑥𝑋 ↦ inf(ran (𝑦𝑆 ↦ (𝑥𝐷𝑦)), ℝ*, < ))
Assertion
Ref Expression
metdstri (((𝐷 ∈ (∞Met‘𝑋) ∧ 𝑆𝑋) ∧ (𝐴𝑋𝐵𝑋)) → (𝐹𝐴) ≤ ((𝐴𝐷𝐵) +𝑒 (𝐹𝐵)))
Distinct variable groups:   𝑥,𝑦,𝐴   𝑥,𝐷,𝑦   𝑥,𝐵,𝑦   𝑥,𝑆,𝑦   𝑥,𝑋,𝑦
Allowed substitution hints:   𝐹(𝑥,𝑦)

Proof of Theorem metdstri
StepHypRef Expression
1 simprr 772 . . . . . . . . . . . 12 ((((𝐷 ∈ (∞Met‘𝑋) ∧ 𝑆𝑋) ∧ (𝐴𝑋𝐵𝑋)) ∧ ((𝐴𝐷𝐵) ∈ ℝ ∧ (𝐹𝐴) ∈ ℝ)) → (𝐹𝐴) ∈ ℝ)
2 simprl 770 . . . . . . . . . . . 12 ((((𝐷 ∈ (∞Met‘𝑋) ∧ 𝑆𝑋) ∧ (𝐴𝑋𝐵𝑋)) ∧ ((𝐴𝐷𝐵) ∈ ℝ ∧ (𝐹𝐴) ∈ ℝ)) → (𝐴𝐷𝐵) ∈ ℝ)
3 rexsub 13193 . . . . . . . . . . . 12 (((𝐹𝐴) ∈ ℝ ∧ (𝐴𝐷𝐵) ∈ ℝ) → ((𝐹𝐴) +𝑒 -𝑒(𝐴𝐷𝐵)) = ((𝐹𝐴) − (𝐴𝐷𝐵)))
41, 2, 3syl2anc 584 . . . . . . . . . . 11 ((((𝐷 ∈ (∞Met‘𝑋) ∧ 𝑆𝑋) ∧ (𝐴𝑋𝐵𝑋)) ∧ ((𝐴𝐷𝐵) ∈ ℝ ∧ (𝐹𝐴) ∈ ℝ)) → ((𝐹𝐴) +𝑒 -𝑒(𝐴𝐷𝐵)) = ((𝐹𝐴) − (𝐴𝐷𝐵)))
54oveq2d 7403 . . . . . . . . . 10 ((((𝐷 ∈ (∞Met‘𝑋) ∧ 𝑆𝑋) ∧ (𝐴𝑋𝐵𝑋)) ∧ ((𝐴𝐷𝐵) ∈ ℝ ∧ (𝐹𝐴) ∈ ℝ)) → (𝐵(ball‘𝐷)((𝐹𝐴) +𝑒 -𝑒(𝐴𝐷𝐵))) = (𝐵(ball‘𝐷)((𝐹𝐴) − (𝐴𝐷𝐵))))
6 simpll 766 . . . . . . . . . . . 12 (((𝐷 ∈ (∞Met‘𝑋) ∧ 𝑆𝑋) ∧ (𝐴𝑋𝐵𝑋)) → 𝐷 ∈ (∞Met‘𝑋))
76adantr 480 . . . . . . . . . . 11 ((((𝐷 ∈ (∞Met‘𝑋) ∧ 𝑆𝑋) ∧ (𝐴𝑋𝐵𝑋)) ∧ ((𝐴𝐷𝐵) ∈ ℝ ∧ (𝐹𝐴) ∈ ℝ)) → 𝐷 ∈ (∞Met‘𝑋))
8 simprr 772 . . . . . . . . . . . 12 (((𝐷 ∈ (∞Met‘𝑋) ∧ 𝑆𝑋) ∧ (𝐴𝑋𝐵𝑋)) → 𝐵𝑋)
98adantr 480 . . . . . . . . . . 11 ((((𝐷 ∈ (∞Met‘𝑋) ∧ 𝑆𝑋) ∧ (𝐴𝑋𝐵𝑋)) ∧ ((𝐴𝐷𝐵) ∈ ℝ ∧ (𝐹𝐴) ∈ ℝ)) → 𝐵𝑋)
10 simprl 770 . . . . . . . . . . . 12 (((𝐷 ∈ (∞Met‘𝑋) ∧ 𝑆𝑋) ∧ (𝐴𝑋𝐵𝑋)) → 𝐴𝑋)
1110adantr 480 . . . . . . . . . . 11 ((((𝐷 ∈ (∞Met‘𝑋) ∧ 𝑆𝑋) ∧ (𝐴𝑋𝐵𝑋)) ∧ ((𝐴𝐷𝐵) ∈ ℝ ∧ (𝐹𝐴) ∈ ℝ)) → 𝐴𝑋)
121, 2resubcld 11606 . . . . . . . . . . 11 ((((𝐷 ∈ (∞Met‘𝑋) ∧ 𝑆𝑋) ∧ (𝐴𝑋𝐵𝑋)) ∧ ((𝐴𝐷𝐵) ∈ ℝ ∧ (𝐹𝐴) ∈ ℝ)) → ((𝐹𝐴) − (𝐴𝐷𝐵)) ∈ ℝ)
132leidd 11744 . . . . . . . . . . . 12 ((((𝐷 ∈ (∞Met‘𝑋) ∧ 𝑆𝑋) ∧ (𝐴𝑋𝐵𝑋)) ∧ ((𝐴𝐷𝐵) ∈ ℝ ∧ (𝐹𝐴) ∈ ℝ)) → (𝐴𝐷𝐵) ≤ (𝐴𝐷𝐵))
14 xmetsym 24235 . . . . . . . . . . . . . . 15 ((𝐷 ∈ (∞Met‘𝑋) ∧ 𝐴𝑋𝐵𝑋) → (𝐴𝐷𝐵) = (𝐵𝐷𝐴))
156, 10, 8, 14syl3anc 1373 . . . . . . . . . . . . . 14 (((𝐷 ∈ (∞Met‘𝑋) ∧ 𝑆𝑋) ∧ (𝐴𝑋𝐵𝑋)) → (𝐴𝐷𝐵) = (𝐵𝐷𝐴))
1615adantr 480 . . . . . . . . . . . . 13 ((((𝐷 ∈ (∞Met‘𝑋) ∧ 𝑆𝑋) ∧ (𝐴𝑋𝐵𝑋)) ∧ ((𝐴𝐷𝐵) ∈ ℝ ∧ (𝐹𝐴) ∈ ℝ)) → (𝐴𝐷𝐵) = (𝐵𝐷𝐴))
1716eqcomd 2735 . . . . . . . . . . . 12 ((((𝐷 ∈ (∞Met‘𝑋) ∧ 𝑆𝑋) ∧ (𝐴𝑋𝐵𝑋)) ∧ ((𝐴𝐷𝐵) ∈ ℝ ∧ (𝐹𝐴) ∈ ℝ)) → (𝐵𝐷𝐴) = (𝐴𝐷𝐵))
181recnd 11202 . . . . . . . . . . . . 13 ((((𝐷 ∈ (∞Met‘𝑋) ∧ 𝑆𝑋) ∧ (𝐴𝑋𝐵𝑋)) ∧ ((𝐴𝐷𝐵) ∈ ℝ ∧ (𝐹𝐴) ∈ ℝ)) → (𝐹𝐴) ∈ ℂ)
192recnd 11202 . . . . . . . . . . . . 13 ((((𝐷 ∈ (∞Met‘𝑋) ∧ 𝑆𝑋) ∧ (𝐴𝑋𝐵𝑋)) ∧ ((𝐴𝐷𝐵) ∈ ℝ ∧ (𝐹𝐴) ∈ ℝ)) → (𝐴𝐷𝐵) ∈ ℂ)
2018, 19nncand 11538 . . . . . . . . . . . 12 ((((𝐷 ∈ (∞Met‘𝑋) ∧ 𝑆𝑋) ∧ (𝐴𝑋𝐵𝑋)) ∧ ((𝐴𝐷𝐵) ∈ ℝ ∧ (𝐹𝐴) ∈ ℝ)) → ((𝐹𝐴) − ((𝐹𝐴) − (𝐴𝐷𝐵))) = (𝐴𝐷𝐵))
2113, 17, 203brtr4d 5139 . . . . . . . . . . 11 ((((𝐷 ∈ (∞Met‘𝑋) ∧ 𝑆𝑋) ∧ (𝐴𝑋𝐵𝑋)) ∧ ((𝐴𝐷𝐵) ∈ ℝ ∧ (𝐹𝐴) ∈ ℝ)) → (𝐵𝐷𝐴) ≤ ((𝐹𝐴) − ((𝐹𝐴) − (𝐴𝐷𝐵))))
22 blss2 24292 . . . . . . . . . . 11 (((𝐷 ∈ (∞Met‘𝑋) ∧ 𝐵𝑋𝐴𝑋) ∧ (((𝐹𝐴) − (𝐴𝐷𝐵)) ∈ ℝ ∧ (𝐹𝐴) ∈ ℝ ∧ (𝐵𝐷𝐴) ≤ ((𝐹𝐴) − ((𝐹𝐴) − (𝐴𝐷𝐵))))) → (𝐵(ball‘𝐷)((𝐹𝐴) − (𝐴𝐷𝐵))) ⊆ (𝐴(ball‘𝐷)(𝐹𝐴)))
237, 9, 11, 12, 1, 21, 22syl33anc 1387 . . . . . . . . . 10 ((((𝐷 ∈ (∞Met‘𝑋) ∧ 𝑆𝑋) ∧ (𝐴𝑋𝐵𝑋)) ∧ ((𝐴𝐷𝐵) ∈ ℝ ∧ (𝐹𝐴) ∈ ℝ)) → (𝐵(ball‘𝐷)((𝐹𝐴) − (𝐴𝐷𝐵))) ⊆ (𝐴(ball‘𝐷)(𝐹𝐴)))
245, 23eqsstrd 3981 . . . . . . . . 9 ((((𝐷 ∈ (∞Met‘𝑋) ∧ 𝑆𝑋) ∧ (𝐴𝑋𝐵𝑋)) ∧ ((𝐴𝐷𝐵) ∈ ℝ ∧ (𝐹𝐴) ∈ ℝ)) → (𝐵(ball‘𝐷)((𝐹𝐴) +𝑒 -𝑒(𝐴𝐷𝐵))) ⊆ (𝐴(ball‘𝐷)(𝐹𝐴)))
2524expr 456 . . . . . . . 8 ((((𝐷 ∈ (∞Met‘𝑋) ∧ 𝑆𝑋) ∧ (𝐴𝑋𝐵𝑋)) ∧ (𝐴𝐷𝐵) ∈ ℝ) → ((𝐹𝐴) ∈ ℝ → (𝐵(ball‘𝐷)((𝐹𝐴) +𝑒 -𝑒(𝐴𝐷𝐵))) ⊆ (𝐴(ball‘𝐷)(𝐹𝐴))))
266adantr 480 . . . . . . . . . . 11 ((((𝐷 ∈ (∞Met‘𝑋) ∧ 𝑆𝑋) ∧ (𝐴𝑋𝐵𝑋)) ∧ ((𝐴𝐷𝐵) ∈ ℝ ∧ (𝐹𝐴) = +∞)) → 𝐷 ∈ (∞Met‘𝑋))
278adantr 480 . . . . . . . . . . 11 ((((𝐷 ∈ (∞Met‘𝑋) ∧ 𝑆𝑋) ∧ (𝐴𝑋𝐵𝑋)) ∧ ((𝐴𝐷𝐵) ∈ ℝ ∧ (𝐹𝐴) = +∞)) → 𝐵𝑋)
28 metdscn.f . . . . . . . . . . . . . . . . . 18 𝐹 = (𝑥𝑋 ↦ inf(ran (𝑦𝑆 ↦ (𝑥𝐷𝑦)), ℝ*, < ))
2928metdsf 24737 . . . . . . . . . . . . . . . . 17 ((𝐷 ∈ (∞Met‘𝑋) ∧ 𝑆𝑋) → 𝐹:𝑋⟶(0[,]+∞))
3029adantr 480 . . . . . . . . . . . . . . . 16 (((𝐷 ∈ (∞Met‘𝑋) ∧ 𝑆𝑋) ∧ (𝐴𝑋𝐵𝑋)) → 𝐹:𝑋⟶(0[,]+∞))
3130, 10ffvelcdmd 7057 . . . . . . . . . . . . . . 15 (((𝐷 ∈ (∞Met‘𝑋) ∧ 𝑆𝑋) ∧ (𝐴𝑋𝐵𝑋)) → (𝐹𝐴) ∈ (0[,]+∞))
32 eliccxr 13396 . . . . . . . . . . . . . . 15 ((𝐹𝐴) ∈ (0[,]+∞) → (𝐹𝐴) ∈ ℝ*)
3331, 32syl 17 . . . . . . . . . . . . . 14 (((𝐷 ∈ (∞Met‘𝑋) ∧ 𝑆𝑋) ∧ (𝐴𝑋𝐵𝑋)) → (𝐹𝐴) ∈ ℝ*)
3433adantr 480 . . . . . . . . . . . . 13 ((((𝐷 ∈ (∞Met‘𝑋) ∧ 𝑆𝑋) ∧ (𝐴𝑋𝐵𝑋)) ∧ (𝐴𝐷𝐵) ∈ ℝ) → (𝐹𝐴) ∈ ℝ*)
35 xmetcl 24219 . . . . . . . . . . . . . . . 16 ((𝐷 ∈ (∞Met‘𝑋) ∧ 𝐴𝑋𝐵𝑋) → (𝐴𝐷𝐵) ∈ ℝ*)
366, 10, 8, 35syl3anc 1373 . . . . . . . . . . . . . . 15 (((𝐷 ∈ (∞Met‘𝑋) ∧ 𝑆𝑋) ∧ (𝐴𝑋𝐵𝑋)) → (𝐴𝐷𝐵) ∈ ℝ*)
3736adantr 480 . . . . . . . . . . . . . 14 ((((𝐷 ∈ (∞Met‘𝑋) ∧ 𝑆𝑋) ∧ (𝐴𝑋𝐵𝑋)) ∧ (𝐴𝐷𝐵) ∈ ℝ) → (𝐴𝐷𝐵) ∈ ℝ*)
3837xnegcld 13260 . . . . . . . . . . . . 13 ((((𝐷 ∈ (∞Met‘𝑋) ∧ 𝑆𝑋) ∧ (𝐴𝑋𝐵𝑋)) ∧ (𝐴𝐷𝐵) ∈ ℝ) → -𝑒(𝐴𝐷𝐵) ∈ ℝ*)
3934, 38xaddcld 13261 . . . . . . . . . . . 12 ((((𝐷 ∈ (∞Met‘𝑋) ∧ 𝑆𝑋) ∧ (𝐴𝑋𝐵𝑋)) ∧ (𝐴𝐷𝐵) ∈ ℝ) → ((𝐹𝐴) +𝑒 -𝑒(𝐴𝐷𝐵)) ∈ ℝ*)
4039adantrr 717 . . . . . . . . . . 11 ((((𝐷 ∈ (∞Met‘𝑋) ∧ 𝑆𝑋) ∧ (𝐴𝑋𝐵𝑋)) ∧ ((𝐴𝐷𝐵) ∈ ℝ ∧ (𝐹𝐴) = +∞)) → ((𝐹𝐴) +𝑒 -𝑒(𝐴𝐷𝐵)) ∈ ℝ*)
41 pnfxr 11228 . . . . . . . . . . . 12 +∞ ∈ ℝ*
4241a1i 11 . . . . . . . . . . 11 ((((𝐷 ∈ (∞Met‘𝑋) ∧ 𝑆𝑋) ∧ (𝐴𝑋𝐵𝑋)) ∧ ((𝐴𝐷𝐵) ∈ ℝ ∧ (𝐹𝐴) = +∞)) → +∞ ∈ ℝ*)
43 pnfge 13090 . . . . . . . . . . . 12 (((𝐹𝐴) +𝑒 -𝑒(𝐴𝐷𝐵)) ∈ ℝ* → ((𝐹𝐴) +𝑒 -𝑒(𝐴𝐷𝐵)) ≤ +∞)
4440, 43syl 17 . . . . . . . . . . 11 ((((𝐷 ∈ (∞Met‘𝑋) ∧ 𝑆𝑋) ∧ (𝐴𝑋𝐵𝑋)) ∧ ((𝐴𝐷𝐵) ∈ ℝ ∧ (𝐹𝐴) = +∞)) → ((𝐹𝐴) +𝑒 -𝑒(𝐴𝐷𝐵)) ≤ +∞)
45 ssbl 24311 . . . . . . . . . . 11 (((𝐷 ∈ (∞Met‘𝑋) ∧ 𝐵𝑋) ∧ (((𝐹𝐴) +𝑒 -𝑒(𝐴𝐷𝐵)) ∈ ℝ* ∧ +∞ ∈ ℝ*) ∧ ((𝐹𝐴) +𝑒 -𝑒(𝐴𝐷𝐵)) ≤ +∞) → (𝐵(ball‘𝐷)((𝐹𝐴) +𝑒 -𝑒(𝐴𝐷𝐵))) ⊆ (𝐵(ball‘𝐷)+∞))
4626, 27, 40, 42, 44, 45syl221anc 1383 . . . . . . . . . 10 ((((𝐷 ∈ (∞Met‘𝑋) ∧ 𝑆𝑋) ∧ (𝐴𝑋𝐵𝑋)) ∧ ((𝐴𝐷𝐵) ∈ ℝ ∧ (𝐹𝐴) = +∞)) → (𝐵(ball‘𝐷)((𝐹𝐴) +𝑒 -𝑒(𝐴𝐷𝐵))) ⊆ (𝐵(ball‘𝐷)+∞))
47 simprr 772 . . . . . . . . . . . 12 ((((𝐷 ∈ (∞Met‘𝑋) ∧ 𝑆𝑋) ∧ (𝐴𝑋𝐵𝑋)) ∧ ((𝐴𝐷𝐵) ∈ ℝ ∧ (𝐹𝐴) = +∞)) → (𝐹𝐴) = +∞)
4847oveq2d 7403 . . . . . . . . . . 11 ((((𝐷 ∈ (∞Met‘𝑋) ∧ 𝑆𝑋) ∧ (𝐴𝑋𝐵𝑋)) ∧ ((𝐴𝐷𝐵) ∈ ℝ ∧ (𝐹𝐴) = +∞)) → (𝐴(ball‘𝐷)(𝐹𝐴)) = (𝐴(ball‘𝐷)+∞))
4910adantr 480 . . . . . . . . . . . 12 ((((𝐷 ∈ (∞Met‘𝑋) ∧ 𝑆𝑋) ∧ (𝐴𝑋𝐵𝑋)) ∧ ((𝐴𝐷𝐵) ∈ ℝ ∧ (𝐹𝐴) = +∞)) → 𝐴𝑋)
50 simprl 770 . . . . . . . . . . . . 13 ((((𝐷 ∈ (∞Met‘𝑋) ∧ 𝑆𝑋) ∧ (𝐴𝑋𝐵𝑋)) ∧ ((𝐴𝐷𝐵) ∈ ℝ ∧ (𝐹𝐴) = +∞)) → (𝐴𝐷𝐵) ∈ ℝ)
51 xblpnf 24284 . . . . . . . . . . . . . 14 ((𝐷 ∈ (∞Met‘𝑋) ∧ 𝐴𝑋) → (𝐵 ∈ (𝐴(ball‘𝐷)+∞) ↔ (𝐵𝑋 ∧ (𝐴𝐷𝐵) ∈ ℝ)))
5226, 49, 51syl2anc 584 . . . . . . . . . . . . 13 ((((𝐷 ∈ (∞Met‘𝑋) ∧ 𝑆𝑋) ∧ (𝐴𝑋𝐵𝑋)) ∧ ((𝐴𝐷𝐵) ∈ ℝ ∧ (𝐹𝐴) = +∞)) → (𝐵 ∈ (𝐴(ball‘𝐷)+∞) ↔ (𝐵𝑋 ∧ (𝐴𝐷𝐵) ∈ ℝ)))
5327, 50, 52mpbir2and 713 . . . . . . . . . . . 12 ((((𝐷 ∈ (∞Met‘𝑋) ∧ 𝑆𝑋) ∧ (𝐴𝑋𝐵𝑋)) ∧ ((𝐴𝐷𝐵) ∈ ℝ ∧ (𝐹𝐴) = +∞)) → 𝐵 ∈ (𝐴(ball‘𝐷)+∞))
54 blpnfctr 24324 . . . . . . . . . . . 12 ((𝐷 ∈ (∞Met‘𝑋) ∧ 𝐴𝑋𝐵 ∈ (𝐴(ball‘𝐷)+∞)) → (𝐴(ball‘𝐷)+∞) = (𝐵(ball‘𝐷)+∞))
5526, 49, 53, 54syl3anc 1373 . . . . . . . . . . 11 ((((𝐷 ∈ (∞Met‘𝑋) ∧ 𝑆𝑋) ∧ (𝐴𝑋𝐵𝑋)) ∧ ((𝐴𝐷𝐵) ∈ ℝ ∧ (𝐹𝐴) = +∞)) → (𝐴(ball‘𝐷)+∞) = (𝐵(ball‘𝐷)+∞))
5648, 55eqtr2d 2765 . . . . . . . . . 10 ((((𝐷 ∈ (∞Met‘𝑋) ∧ 𝑆𝑋) ∧ (𝐴𝑋𝐵𝑋)) ∧ ((𝐴𝐷𝐵) ∈ ℝ ∧ (𝐹𝐴) = +∞)) → (𝐵(ball‘𝐷)+∞) = (𝐴(ball‘𝐷)(𝐹𝐴)))
5746, 56sseqtrd 3983 . . . . . . . . 9 ((((𝐷 ∈ (∞Met‘𝑋) ∧ 𝑆𝑋) ∧ (𝐴𝑋𝐵𝑋)) ∧ ((𝐴𝐷𝐵) ∈ ℝ ∧ (𝐹𝐴) = +∞)) → (𝐵(ball‘𝐷)((𝐹𝐴) +𝑒 -𝑒(𝐴𝐷𝐵))) ⊆ (𝐴(ball‘𝐷)(𝐹𝐴)))
5857expr 456 . . . . . . . 8 ((((𝐷 ∈ (∞Met‘𝑋) ∧ 𝑆𝑋) ∧ (𝐴𝑋𝐵𝑋)) ∧ (𝐴𝐷𝐵) ∈ ℝ) → ((𝐹𝐴) = +∞ → (𝐵(ball‘𝐷)((𝐹𝐴) +𝑒 -𝑒(𝐴𝐷𝐵))) ⊆ (𝐴(ball‘𝐷)(𝐹𝐴))))
59 elxrge0 13418 . . . . . . . . . . . . . 14 ((𝐹𝐴) ∈ (0[,]+∞) ↔ ((𝐹𝐴) ∈ ℝ* ∧ 0 ≤ (𝐹𝐴)))
6059simprbi 496 . . . . . . . . . . . . 13 ((𝐹𝐴) ∈ (0[,]+∞) → 0 ≤ (𝐹𝐴))
6131, 60syl 17 . . . . . . . . . . . 12 (((𝐷 ∈ (∞Met‘𝑋) ∧ 𝑆𝑋) ∧ (𝐴𝑋𝐵𝑋)) → 0 ≤ (𝐹𝐴))
62 ge0nemnf 13133 . . . . . . . . . . . 12 (((𝐹𝐴) ∈ ℝ* ∧ 0 ≤ (𝐹𝐴)) → (𝐹𝐴) ≠ -∞)
6333, 61, 62syl2anc 584 . . . . . . . . . . 11 (((𝐷 ∈ (∞Met‘𝑋) ∧ 𝑆𝑋) ∧ (𝐴𝑋𝐵𝑋)) → (𝐹𝐴) ≠ -∞)
6433, 63jca 511 . . . . . . . . . 10 (((𝐷 ∈ (∞Met‘𝑋) ∧ 𝑆𝑋) ∧ (𝐴𝑋𝐵𝑋)) → ((𝐹𝐴) ∈ ℝ* ∧ (𝐹𝐴) ≠ -∞))
6564adantr 480 . . . . . . . . 9 ((((𝐷 ∈ (∞Met‘𝑋) ∧ 𝑆𝑋) ∧ (𝐴𝑋𝐵𝑋)) ∧ (𝐴𝐷𝐵) ∈ ℝ) → ((𝐹𝐴) ∈ ℝ* ∧ (𝐹𝐴) ≠ -∞))
66 xrnemnf 13077 . . . . . . . . 9 (((𝐹𝐴) ∈ ℝ* ∧ (𝐹𝐴) ≠ -∞) ↔ ((𝐹𝐴) ∈ ℝ ∨ (𝐹𝐴) = +∞))
6765, 66sylib 218 . . . . . . . 8 ((((𝐷 ∈ (∞Met‘𝑋) ∧ 𝑆𝑋) ∧ (𝐴𝑋𝐵𝑋)) ∧ (𝐴𝐷𝐵) ∈ ℝ) → ((𝐹𝐴) ∈ ℝ ∨ (𝐹𝐴) = +∞))
6825, 58, 67mpjaod 860 . . . . . . 7 ((((𝐷 ∈ (∞Met‘𝑋) ∧ 𝑆𝑋) ∧ (𝐴𝑋𝐵𝑋)) ∧ (𝐴𝐷𝐵) ∈ ℝ) → (𝐵(ball‘𝐷)((𝐹𝐴) +𝑒 -𝑒(𝐴𝐷𝐵))) ⊆ (𝐴(ball‘𝐷)(𝐹𝐴)))
69 pnfnlt 13088 . . . . . . . . . . 11 ((𝐹𝐴) ∈ ℝ* → ¬ +∞ < (𝐹𝐴))
7033, 69syl 17 . . . . . . . . . 10 (((𝐷 ∈ (∞Met‘𝑋) ∧ 𝑆𝑋) ∧ (𝐴𝑋𝐵𝑋)) → ¬ +∞ < (𝐹𝐴))
7170adantr 480 . . . . . . . . 9 ((((𝐷 ∈ (∞Met‘𝑋) ∧ 𝑆𝑋) ∧ (𝐴𝑋𝐵𝑋)) ∧ (𝐴𝐷𝐵) = +∞) → ¬ +∞ < (𝐹𝐴))
7236xnegcld 13260 . . . . . . . . . . . . . 14 (((𝐷 ∈ (∞Met‘𝑋) ∧ 𝑆𝑋) ∧ (𝐴𝑋𝐵𝑋)) → -𝑒(𝐴𝐷𝐵) ∈ ℝ*)
7333, 72xaddcld 13261 . . . . . . . . . . . . 13 (((𝐷 ∈ (∞Met‘𝑋) ∧ 𝑆𝑋) ∧ (𝐴𝑋𝐵𝑋)) → ((𝐹𝐴) +𝑒 -𝑒(𝐴𝐷𝐵)) ∈ ℝ*)
74 xbln0 24302 . . . . . . . . . . . . 13 ((𝐷 ∈ (∞Met‘𝑋) ∧ 𝐵𝑋 ∧ ((𝐹𝐴) +𝑒 -𝑒(𝐴𝐷𝐵)) ∈ ℝ*) → ((𝐵(ball‘𝐷)((𝐹𝐴) +𝑒 -𝑒(𝐴𝐷𝐵))) ≠ ∅ ↔ 0 < ((𝐹𝐴) +𝑒 -𝑒(𝐴𝐷𝐵))))
756, 8, 73, 74syl3anc 1373 . . . . . . . . . . . 12 (((𝐷 ∈ (∞Met‘𝑋) ∧ 𝑆𝑋) ∧ (𝐴𝑋𝐵𝑋)) → ((𝐵(ball‘𝐷)((𝐹𝐴) +𝑒 -𝑒(𝐴𝐷𝐵))) ≠ ∅ ↔ 0 < ((𝐹𝐴) +𝑒 -𝑒(𝐴𝐷𝐵))))
76 xposdif 13222 . . . . . . . . . . . . 13 (((𝐴𝐷𝐵) ∈ ℝ* ∧ (𝐹𝐴) ∈ ℝ*) → ((𝐴𝐷𝐵) < (𝐹𝐴) ↔ 0 < ((𝐹𝐴) +𝑒 -𝑒(𝐴𝐷𝐵))))
7736, 33, 76syl2anc 584 . . . . . . . . . . . 12 (((𝐷 ∈ (∞Met‘𝑋) ∧ 𝑆𝑋) ∧ (𝐴𝑋𝐵𝑋)) → ((𝐴𝐷𝐵) < (𝐹𝐴) ↔ 0 < ((𝐹𝐴) +𝑒 -𝑒(𝐴𝐷𝐵))))
7875, 77bitr4d 282 . . . . . . . . . . 11 (((𝐷 ∈ (∞Met‘𝑋) ∧ 𝑆𝑋) ∧ (𝐴𝑋𝐵𝑋)) → ((𝐵(ball‘𝐷)((𝐹𝐴) +𝑒 -𝑒(𝐴𝐷𝐵))) ≠ ∅ ↔ (𝐴𝐷𝐵) < (𝐹𝐴)))
79 breq1 5110 . . . . . . . . . . 11 ((𝐴𝐷𝐵) = +∞ → ((𝐴𝐷𝐵) < (𝐹𝐴) ↔ +∞ < (𝐹𝐴)))
8078, 79sylan9bb 509 . . . . . . . . . 10 ((((𝐷 ∈ (∞Met‘𝑋) ∧ 𝑆𝑋) ∧ (𝐴𝑋𝐵𝑋)) ∧ (𝐴𝐷𝐵) = +∞) → ((𝐵(ball‘𝐷)((𝐹𝐴) +𝑒 -𝑒(𝐴𝐷𝐵))) ≠ ∅ ↔ +∞ < (𝐹𝐴)))
8180necon1bbid 2964 . . . . . . . . 9 ((((𝐷 ∈ (∞Met‘𝑋) ∧ 𝑆𝑋) ∧ (𝐴𝑋𝐵𝑋)) ∧ (𝐴𝐷𝐵) = +∞) → (¬ +∞ < (𝐹𝐴) ↔ (𝐵(ball‘𝐷)((𝐹𝐴) +𝑒 -𝑒(𝐴𝐷𝐵))) = ∅))
8271, 81mpbid 232 . . . . . . . 8 ((((𝐷 ∈ (∞Met‘𝑋) ∧ 𝑆𝑋) ∧ (𝐴𝑋𝐵𝑋)) ∧ (𝐴𝐷𝐵) = +∞) → (𝐵(ball‘𝐷)((𝐹𝐴) +𝑒 -𝑒(𝐴𝐷𝐵))) = ∅)
83 0ss 4363 . . . . . . . 8 ∅ ⊆ (𝐴(ball‘𝐷)(𝐹𝐴))
8482, 83eqsstrdi 3991 . . . . . . 7 ((((𝐷 ∈ (∞Met‘𝑋) ∧ 𝑆𝑋) ∧ (𝐴𝑋𝐵𝑋)) ∧ (𝐴𝐷𝐵) = +∞) → (𝐵(ball‘𝐷)((𝐹𝐴) +𝑒 -𝑒(𝐴𝐷𝐵))) ⊆ (𝐴(ball‘𝐷)(𝐹𝐴)))
85 xmetge0 24232 . . . . . . . . . . 11 ((𝐷 ∈ (∞Met‘𝑋) ∧ 𝐴𝑋𝐵𝑋) → 0 ≤ (𝐴𝐷𝐵))
866, 10, 8, 85syl3anc 1373 . . . . . . . . . 10 (((𝐷 ∈ (∞Met‘𝑋) ∧ 𝑆𝑋) ∧ (𝐴𝑋𝐵𝑋)) → 0 ≤ (𝐴𝐷𝐵))
87 ge0nemnf 13133 . . . . . . . . . 10 (((𝐴𝐷𝐵) ∈ ℝ* ∧ 0 ≤ (𝐴𝐷𝐵)) → (𝐴𝐷𝐵) ≠ -∞)
8836, 86, 87syl2anc 584 . . . . . . . . 9 (((𝐷 ∈ (∞Met‘𝑋) ∧ 𝑆𝑋) ∧ (𝐴𝑋𝐵𝑋)) → (𝐴𝐷𝐵) ≠ -∞)
8936, 88jca 511 . . . . . . . 8 (((𝐷 ∈ (∞Met‘𝑋) ∧ 𝑆𝑋) ∧ (𝐴𝑋𝐵𝑋)) → ((𝐴𝐷𝐵) ∈ ℝ* ∧ (𝐴𝐷𝐵) ≠ -∞))
90 xrnemnf 13077 . . . . . . . 8 (((𝐴𝐷𝐵) ∈ ℝ* ∧ (𝐴𝐷𝐵) ≠ -∞) ↔ ((𝐴𝐷𝐵) ∈ ℝ ∨ (𝐴𝐷𝐵) = +∞))
9189, 90sylib 218 . . . . . . 7 (((𝐷 ∈ (∞Met‘𝑋) ∧ 𝑆𝑋) ∧ (𝐴𝑋𝐵𝑋)) → ((𝐴𝐷𝐵) ∈ ℝ ∨ (𝐴𝐷𝐵) = +∞))
9268, 84, 91mpjaodan 960 . . . . . 6 (((𝐷 ∈ (∞Met‘𝑋) ∧ 𝑆𝑋) ∧ (𝐴𝑋𝐵𝑋)) → (𝐵(ball‘𝐷)((𝐹𝐴) +𝑒 -𝑒(𝐴𝐷𝐵))) ⊆ (𝐴(ball‘𝐷)(𝐹𝐴)))
93 sslin 4206 . . . . . 6 ((𝐵(ball‘𝐷)((𝐹𝐴) +𝑒 -𝑒(𝐴𝐷𝐵))) ⊆ (𝐴(ball‘𝐷)(𝐹𝐴)) → (𝑆 ∩ (𝐵(ball‘𝐷)((𝐹𝐴) +𝑒 -𝑒(𝐴𝐷𝐵)))) ⊆ (𝑆 ∩ (𝐴(ball‘𝐷)(𝐹𝐴))))
9492, 93syl 17 . . . . 5 (((𝐷 ∈ (∞Met‘𝑋) ∧ 𝑆𝑋) ∧ (𝐴𝑋𝐵𝑋)) → (𝑆 ∩ (𝐵(ball‘𝐷)((𝐹𝐴) +𝑒 -𝑒(𝐴𝐷𝐵)))) ⊆ (𝑆 ∩ (𝐴(ball‘𝐷)(𝐹𝐴))))
9533xrleidd 13112 . . . . . 6 (((𝐷 ∈ (∞Met‘𝑋) ∧ 𝑆𝑋) ∧ (𝐴𝑋𝐵𝑋)) → (𝐹𝐴) ≤ (𝐹𝐴))
96 simplr 768 . . . . . . 7 (((𝐷 ∈ (∞Met‘𝑋) ∧ 𝑆𝑋) ∧ (𝐴𝑋𝐵𝑋)) → 𝑆𝑋)
9728metdsge 24738 . . . . . . 7 (((𝐷 ∈ (∞Met‘𝑋) ∧ 𝑆𝑋𝐴𝑋) ∧ (𝐹𝐴) ∈ ℝ*) → ((𝐹𝐴) ≤ (𝐹𝐴) ↔ (𝑆 ∩ (𝐴(ball‘𝐷)(𝐹𝐴))) = ∅))
986, 96, 10, 33, 97syl31anc 1375 . . . . . 6 (((𝐷 ∈ (∞Met‘𝑋) ∧ 𝑆𝑋) ∧ (𝐴𝑋𝐵𝑋)) → ((𝐹𝐴) ≤ (𝐹𝐴) ↔ (𝑆 ∩ (𝐴(ball‘𝐷)(𝐹𝐴))) = ∅))
9995, 98mpbid 232 . . . . 5 (((𝐷 ∈ (∞Met‘𝑋) ∧ 𝑆𝑋) ∧ (𝐴𝑋𝐵𝑋)) → (𝑆 ∩ (𝐴(ball‘𝐷)(𝐹𝐴))) = ∅)
100 sseq0 4366 . . . . 5 (((𝑆 ∩ (𝐵(ball‘𝐷)((𝐹𝐴) +𝑒 -𝑒(𝐴𝐷𝐵)))) ⊆ (𝑆 ∩ (𝐴(ball‘𝐷)(𝐹𝐴))) ∧ (𝑆 ∩ (𝐴(ball‘𝐷)(𝐹𝐴))) = ∅) → (𝑆 ∩ (𝐵(ball‘𝐷)((𝐹𝐴) +𝑒 -𝑒(𝐴𝐷𝐵)))) = ∅)
10194, 99, 100syl2anc 584 . . . 4 (((𝐷 ∈ (∞Met‘𝑋) ∧ 𝑆𝑋) ∧ (𝐴𝑋𝐵𝑋)) → (𝑆 ∩ (𝐵(ball‘𝐷)((𝐹𝐴) +𝑒 -𝑒(𝐴𝐷𝐵)))) = ∅)
10228metdsge 24738 . . . . 5 (((𝐷 ∈ (∞Met‘𝑋) ∧ 𝑆𝑋𝐵𝑋) ∧ ((𝐹𝐴) +𝑒 -𝑒(𝐴𝐷𝐵)) ∈ ℝ*) → (((𝐹𝐴) +𝑒 -𝑒(𝐴𝐷𝐵)) ≤ (𝐹𝐵) ↔ (𝑆 ∩ (𝐵(ball‘𝐷)((𝐹𝐴) +𝑒 -𝑒(𝐴𝐷𝐵)))) = ∅))
1036, 96, 8, 73, 102syl31anc 1375 . . . 4 (((𝐷 ∈ (∞Met‘𝑋) ∧ 𝑆𝑋) ∧ (𝐴𝑋𝐵𝑋)) → (((𝐹𝐴) +𝑒 -𝑒(𝐴𝐷𝐵)) ≤ (𝐹𝐵) ↔ (𝑆 ∩ (𝐵(ball‘𝐷)((𝐹𝐴) +𝑒 -𝑒(𝐴𝐷𝐵)))) = ∅))
104101, 103mpbird 257 . . 3 (((𝐷 ∈ (∞Met‘𝑋) ∧ 𝑆𝑋) ∧ (𝐴𝑋𝐵𝑋)) → ((𝐹𝐴) +𝑒 -𝑒(𝐴𝐷𝐵)) ≤ (𝐹𝐵))
10530, 8ffvelcdmd 7057 . . . . 5 (((𝐷 ∈ (∞Met‘𝑋) ∧ 𝑆𝑋) ∧ (𝐴𝑋𝐵𝑋)) → (𝐹𝐵) ∈ (0[,]+∞))
106 eliccxr 13396 . . . . 5 ((𝐹𝐵) ∈ (0[,]+∞) → (𝐹𝐵) ∈ ℝ*)
107105, 106syl 17 . . . 4 (((𝐷 ∈ (∞Met‘𝑋) ∧ 𝑆𝑋) ∧ (𝐴𝑋𝐵𝑋)) → (𝐹𝐵) ∈ ℝ*)
108 elxrge0 13418 . . . . . 6 ((𝐹𝐵) ∈ (0[,]+∞) ↔ ((𝐹𝐵) ∈ ℝ* ∧ 0 ≤ (𝐹𝐵)))
109108simprbi 496 . . . . 5 ((𝐹𝐵) ∈ (0[,]+∞) → 0 ≤ (𝐹𝐵))
110105, 109syl 17 . . . 4 (((𝐷 ∈ (∞Met‘𝑋) ∧ 𝑆𝑋) ∧ (𝐴𝑋𝐵𝑋)) → 0 ≤ (𝐹𝐵))
111 xlesubadd 13223 . . . 4 ((((𝐹𝐴) ∈ ℝ* ∧ (𝐴𝐷𝐵) ∈ ℝ* ∧ (𝐹𝐵) ∈ ℝ*) ∧ (0 ≤ (𝐹𝐴) ∧ (𝐴𝐷𝐵) ≠ -∞ ∧ 0 ≤ (𝐹𝐵))) → (((𝐹𝐴) +𝑒 -𝑒(𝐴𝐷𝐵)) ≤ (𝐹𝐵) ↔ (𝐹𝐴) ≤ ((𝐹𝐵) +𝑒 (𝐴𝐷𝐵))))
11233, 36, 107, 61, 88, 110, 111syl33anc 1387 . . 3 (((𝐷 ∈ (∞Met‘𝑋) ∧ 𝑆𝑋) ∧ (𝐴𝑋𝐵𝑋)) → (((𝐹𝐴) +𝑒 -𝑒(𝐴𝐷𝐵)) ≤ (𝐹𝐵) ↔ (𝐹𝐴) ≤ ((𝐹𝐵) +𝑒 (𝐴𝐷𝐵))))
113104, 112mpbid 232 . 2 (((𝐷 ∈ (∞Met‘𝑋) ∧ 𝑆𝑋) ∧ (𝐴𝑋𝐵𝑋)) → (𝐹𝐴) ≤ ((𝐹𝐵) +𝑒 (𝐴𝐷𝐵)))
114 xaddcom 13200 . . 3 (((𝐹𝐵) ∈ ℝ* ∧ (𝐴𝐷𝐵) ∈ ℝ*) → ((𝐹𝐵) +𝑒 (𝐴𝐷𝐵)) = ((𝐴𝐷𝐵) +𝑒 (𝐹𝐵)))
115107, 36, 114syl2anc 584 . 2 (((𝐷 ∈ (∞Met‘𝑋) ∧ 𝑆𝑋) ∧ (𝐴𝑋𝐵𝑋)) → ((𝐹𝐵) +𝑒 (𝐴𝐷𝐵)) = ((𝐴𝐷𝐵) +𝑒 (𝐹𝐵)))
116113, 115breqtrd 5133 1 (((𝐷 ∈ (∞Met‘𝑋) ∧ 𝑆𝑋) ∧ (𝐴𝑋𝐵𝑋)) → (𝐹𝐴) ≤ ((𝐴𝐷𝐵) +𝑒 (𝐹𝐵)))
Colors of variables: wff setvar class
Syntax hints:  ¬ wn 3  wi 4  wb 206  wa 395  wo 847   = wceq 1540  wcel 2109  wne 2925  cin 3913  wss 3914  c0 4296   class class class wbr 5107  cmpt 5188  ran crn 5639  wf 6507  cfv 6511  (class class class)co 7387  infcinf 9392  cr 11067  0cc0 11068  +∞cpnf 11205  -∞cmnf 11206  *cxr 11207   < clt 11208  cle 11209  cmin 11405  -𝑒cxne 13069   +𝑒 cxad 13070  [,]cicc 13309  ∞Metcxmet 21249  ballcbl 21251
This theorem was proved from axioms:  ax-mp 5  ax-1 6  ax-2 7  ax-3 8  ax-gen 1795  ax-4 1809  ax-5 1910  ax-6 1967  ax-7 2008  ax-8 2111  ax-9 2119  ax-10 2142  ax-11 2158  ax-12 2178  ax-ext 2701  ax-sep 5251  ax-nul 5261  ax-pow 5320  ax-pr 5387  ax-un 7711  ax-cnex 11124  ax-resscn 11125  ax-1cn 11126  ax-icn 11127  ax-addcl 11128  ax-addrcl 11129  ax-mulcl 11130  ax-mulrcl 11131  ax-mulcom 11132  ax-addass 11133  ax-mulass 11134  ax-distr 11135  ax-i2m1 11136  ax-1ne0 11137  ax-1rid 11138  ax-rnegex 11139  ax-rrecex 11140  ax-cnre 11141  ax-pre-lttri 11142  ax-pre-lttrn 11143  ax-pre-ltadd 11144  ax-pre-mulgt0 11145  ax-pre-sup 11146
This theorem depends on definitions:  df-bi 207  df-an 396  df-or 848  df-3or 1087  df-3an 1088  df-tru 1543  df-fal 1553  df-ex 1780  df-nf 1784  df-sb 2066  df-mo 2533  df-eu 2562  df-clab 2708  df-cleq 2721  df-clel 2803  df-nfc 2878  df-ne 2926  df-nel 3030  df-ral 3045  df-rex 3054  df-rmo 3354  df-reu 3355  df-rab 3406  df-v 3449  df-sbc 3754  df-csb 3863  df-dif 3917  df-un 3919  df-in 3921  df-ss 3931  df-nul 4297  df-if 4489  df-pw 4565  df-sn 4590  df-pr 4592  df-op 4596  df-uni 4872  df-iun 4957  df-br 5108  df-opab 5170  df-mpt 5189  df-id 5533  df-po 5546  df-so 5547  df-xp 5644  df-rel 5645  df-cnv 5646  df-co 5647  df-dm 5648  df-rn 5649  df-res 5650  df-ima 5651  df-iota 6464  df-fun 6513  df-fn 6514  df-f 6515  df-f1 6516  df-fo 6517  df-f1o 6518  df-fv 6519  df-riota 7344  df-ov 7390  df-oprab 7391  df-mpo 7392  df-1st 7968  df-2nd 7969  df-er 8671  df-ec 8673  df-map 8801  df-en 8919  df-dom 8920  df-sdom 8921  df-sup 9393  df-inf 9394  df-pnf 11210  df-mnf 11211  df-xr 11212  df-ltxr 11213  df-le 11214  df-sub 11407  df-neg 11408  df-div 11836  df-2 12249  df-rp 12952  df-xneg 13072  df-xadd 13073  df-xmul 13074  df-icc 13313  df-psmet 21256  df-xmet 21257  df-bl 21259
This theorem is referenced by:  metdsle  24741  metdscnlem  24744  metnrmlem1  24748
  Copyright terms: Public domain W3C validator