Proof of Theorem blhalf
Step | Hyp | Ref
| Expression |
1 | | simpll 786 |
. 2
⊢ (((𝑀 ∈ (∞Met‘𝑋) ∧ 𝑌 ∈ 𝑋) ∧ (𝑅 ∈ ℝ ∧ 𝑍 ∈ (𝑌(ball‘𝑀)(𝑅 / 2)))) → 𝑀 ∈ (∞Met‘𝑋)) |
2 | | simplr 788 |
. 2
⊢ (((𝑀 ∈ (∞Met‘𝑋) ∧ 𝑌 ∈ 𝑋) ∧ (𝑅 ∈ ℝ ∧ 𝑍 ∈ (𝑌(ball‘𝑀)(𝑅 / 2)))) → 𝑌 ∈ 𝑋) |
3 | | simprr 792 |
. . . 4
⊢ (((𝑀 ∈ (∞Met‘𝑋) ∧ 𝑌 ∈ 𝑋) ∧ (𝑅 ∈ ℝ ∧ 𝑍 ∈ (𝑌(ball‘𝑀)(𝑅 / 2)))) → 𝑍 ∈ (𝑌(ball‘𝑀)(𝑅 / 2))) |
4 | | simprl 790 |
. . . . . . 7
⊢ (((𝑀 ∈ (∞Met‘𝑋) ∧ 𝑌 ∈ 𝑋) ∧ (𝑅 ∈ ℝ ∧ 𝑍 ∈ (𝑌(ball‘𝑀)(𝑅 / 2)))) → 𝑅 ∈ ℝ) |
5 | 4 | rehalfcld 11156 |
. . . . . 6
⊢ (((𝑀 ∈ (∞Met‘𝑋) ∧ 𝑌 ∈ 𝑋) ∧ (𝑅 ∈ ℝ ∧ 𝑍 ∈ (𝑌(ball‘𝑀)(𝑅 / 2)))) → (𝑅 / 2) ∈ ℝ) |
6 | 5 | rexrd 9968 |
. . . . 5
⊢ (((𝑀 ∈ (∞Met‘𝑋) ∧ 𝑌 ∈ 𝑋) ∧ (𝑅 ∈ ℝ ∧ 𝑍 ∈ (𝑌(ball‘𝑀)(𝑅 / 2)))) → (𝑅 / 2) ∈
ℝ*) |
7 | | elbl 22003 |
. . . . 5
⊢ ((𝑀 ∈ (∞Met‘𝑋) ∧ 𝑌 ∈ 𝑋 ∧ (𝑅 / 2) ∈ ℝ*) →
(𝑍 ∈ (𝑌(ball‘𝑀)(𝑅 / 2)) ↔ (𝑍 ∈ 𝑋 ∧ (𝑌𝑀𝑍) < (𝑅 / 2)))) |
8 | 1, 2, 6, 7 | syl3anc 1318 |
. . . 4
⊢ (((𝑀 ∈ (∞Met‘𝑋) ∧ 𝑌 ∈ 𝑋) ∧ (𝑅 ∈ ℝ ∧ 𝑍 ∈ (𝑌(ball‘𝑀)(𝑅 / 2)))) → (𝑍 ∈ (𝑌(ball‘𝑀)(𝑅 / 2)) ↔ (𝑍 ∈ 𝑋 ∧ (𝑌𝑀𝑍) < (𝑅 / 2)))) |
9 | 3, 8 | mpbid 221 |
. . 3
⊢ (((𝑀 ∈ (∞Met‘𝑋) ∧ 𝑌 ∈ 𝑋) ∧ (𝑅 ∈ ℝ ∧ 𝑍 ∈ (𝑌(ball‘𝑀)(𝑅 / 2)))) → (𝑍 ∈ 𝑋 ∧ (𝑌𝑀𝑍) < (𝑅 / 2))) |
10 | 9 | simpld 474 |
. 2
⊢ (((𝑀 ∈ (∞Met‘𝑋) ∧ 𝑌 ∈ 𝑋) ∧ (𝑅 ∈ ℝ ∧ 𝑍 ∈ (𝑌(ball‘𝑀)(𝑅 / 2)))) → 𝑍 ∈ 𝑋) |
11 | 9 | simprd 478 |
. . . 4
⊢ (((𝑀 ∈ (∞Met‘𝑋) ∧ 𝑌 ∈ 𝑋) ∧ (𝑅 ∈ ℝ ∧ 𝑍 ∈ (𝑌(ball‘𝑀)(𝑅 / 2)))) → (𝑌𝑀𝑍) < (𝑅 / 2)) |
12 | | xmetcl 21946 |
. . . . . 6
⊢ ((𝑀 ∈ (∞Met‘𝑋) ∧ 𝑌 ∈ 𝑋 ∧ 𝑍 ∈ 𝑋) → (𝑌𝑀𝑍) ∈
ℝ*) |
13 | 1, 2, 10, 12 | syl3anc 1318 |
. . . . 5
⊢ (((𝑀 ∈ (∞Met‘𝑋) ∧ 𝑌 ∈ 𝑋) ∧ (𝑅 ∈ ℝ ∧ 𝑍 ∈ (𝑌(ball‘𝑀)(𝑅 / 2)))) → (𝑌𝑀𝑍) ∈
ℝ*) |
14 | | xrltle 11858 |
. . . . 5
⊢ (((𝑌𝑀𝑍) ∈ ℝ* ∧ (𝑅 / 2) ∈
ℝ*) → ((𝑌𝑀𝑍) < (𝑅 / 2) → (𝑌𝑀𝑍) ≤ (𝑅 / 2))) |
15 | 13, 6, 14 | syl2anc 691 |
. . . 4
⊢ (((𝑀 ∈ (∞Met‘𝑋) ∧ 𝑌 ∈ 𝑋) ∧ (𝑅 ∈ ℝ ∧ 𝑍 ∈ (𝑌(ball‘𝑀)(𝑅 / 2)))) → ((𝑌𝑀𝑍) < (𝑅 / 2) → (𝑌𝑀𝑍) ≤ (𝑅 / 2))) |
16 | 11, 15 | mpd 15 |
. . 3
⊢ (((𝑀 ∈ (∞Met‘𝑋) ∧ 𝑌 ∈ 𝑋) ∧ (𝑅 ∈ ℝ ∧ 𝑍 ∈ (𝑌(ball‘𝑀)(𝑅 / 2)))) → (𝑌𝑀𝑍) ≤ (𝑅 / 2)) |
17 | 5 | recnd 9947 |
. . . . 5
⊢ (((𝑀 ∈ (∞Met‘𝑋) ∧ 𝑌 ∈ 𝑋) ∧ (𝑅 ∈ ℝ ∧ 𝑍 ∈ (𝑌(ball‘𝑀)(𝑅 / 2)))) → (𝑅 / 2) ∈ ℂ) |
18 | 17, 17 | pncand 10272 |
. . . 4
⊢ (((𝑀 ∈ (∞Met‘𝑋) ∧ 𝑌 ∈ 𝑋) ∧ (𝑅 ∈ ℝ ∧ 𝑍 ∈ (𝑌(ball‘𝑀)(𝑅 / 2)))) → (((𝑅 / 2) + (𝑅 / 2)) − (𝑅 / 2)) = (𝑅 / 2)) |
19 | 4 | recnd 9947 |
. . . . . 6
⊢ (((𝑀 ∈ (∞Met‘𝑋) ∧ 𝑌 ∈ 𝑋) ∧ (𝑅 ∈ ℝ ∧ 𝑍 ∈ (𝑌(ball‘𝑀)(𝑅 / 2)))) → 𝑅 ∈ ℂ) |
20 | 19 | 2halvesd 11155 |
. . . . 5
⊢ (((𝑀 ∈ (∞Met‘𝑋) ∧ 𝑌 ∈ 𝑋) ∧ (𝑅 ∈ ℝ ∧ 𝑍 ∈ (𝑌(ball‘𝑀)(𝑅 / 2)))) → ((𝑅 / 2) + (𝑅 / 2)) = 𝑅) |
21 | 20 | oveq1d 6564 |
. . . 4
⊢ (((𝑀 ∈ (∞Met‘𝑋) ∧ 𝑌 ∈ 𝑋) ∧ (𝑅 ∈ ℝ ∧ 𝑍 ∈ (𝑌(ball‘𝑀)(𝑅 / 2)))) → (((𝑅 / 2) + (𝑅 / 2)) − (𝑅 / 2)) = (𝑅 − (𝑅 / 2))) |
22 | 18, 21 | eqtr3d 2646 |
. . 3
⊢ (((𝑀 ∈ (∞Met‘𝑋) ∧ 𝑌 ∈ 𝑋) ∧ (𝑅 ∈ ℝ ∧ 𝑍 ∈ (𝑌(ball‘𝑀)(𝑅 / 2)))) → (𝑅 / 2) = (𝑅 − (𝑅 / 2))) |
23 | 16, 22 | breqtrd 4609 |
. 2
⊢ (((𝑀 ∈ (∞Met‘𝑋) ∧ 𝑌 ∈ 𝑋) ∧ (𝑅 ∈ ℝ ∧ 𝑍 ∈ (𝑌(ball‘𝑀)(𝑅 / 2)))) → (𝑌𝑀𝑍) ≤ (𝑅 − (𝑅 / 2))) |
24 | | blss2 22019 |
. 2
⊢ (((𝑀 ∈ (∞Met‘𝑋) ∧ 𝑌 ∈ 𝑋 ∧ 𝑍 ∈ 𝑋) ∧ ((𝑅 / 2) ∈ ℝ ∧ 𝑅 ∈ ℝ ∧ (𝑌𝑀𝑍) ≤ (𝑅 − (𝑅 / 2)))) → (𝑌(ball‘𝑀)(𝑅 / 2)) ⊆ (𝑍(ball‘𝑀)𝑅)) |
25 | 1, 2, 10, 5, 4, 23, 24 | syl33anc 1333 |
1
⊢ (((𝑀 ∈ (∞Met‘𝑋) ∧ 𝑌 ∈ 𝑋) ∧ (𝑅 ∈ ℝ ∧ 𝑍 ∈ (𝑌(ball‘𝑀)(𝑅 / 2)))) → (𝑌(ball‘𝑀)(𝑅 / 2)) ⊆ (𝑍(ball‘𝑀)𝑅)) |