Proof of Theorem blsscls2
Step | Hyp | Ref
| Expression |
1 | | blcld.3 |
. 2
⊢ 𝑆 = {𝑧 ∈ 𝑋 ∣ (𝑃𝐷𝑧) ≤ 𝑅} |
2 | | simplr3 1215 |
. . . . . 6
⊢ ((((𝐷 ∈ (∞Met‘𝑋) ∧ 𝑃 ∈ 𝑋) ∧ (𝑅 ∈ ℝ* ∧ 𝑇 ∈ ℝ*
∧ 𝑅 < 𝑇)) ∧ 𝑧 ∈ 𝑋) → 𝑅 < 𝑇) |
3 | | xmetcl 23392 |
. . . . . . . 8
⊢ ((𝐷 ∈ (∞Met‘𝑋) ∧ 𝑃 ∈ 𝑋 ∧ 𝑧 ∈ 𝑋) → (𝑃𝐷𝑧) ∈
ℝ*) |
4 | 3 | ad4ant124 1171 |
. . . . . . 7
⊢ ((((𝐷 ∈ (∞Met‘𝑋) ∧ 𝑃 ∈ 𝑋) ∧ (𝑅 ∈ ℝ* ∧ 𝑇 ∈ ℝ*
∧ 𝑅 < 𝑇)) ∧ 𝑧 ∈ 𝑋) → (𝑃𝐷𝑧) ∈
ℝ*) |
5 | | simplr1 1213 |
. . . . . . 7
⊢ ((((𝐷 ∈ (∞Met‘𝑋) ∧ 𝑃 ∈ 𝑋) ∧ (𝑅 ∈ ℝ* ∧ 𝑇 ∈ ℝ*
∧ 𝑅 < 𝑇)) ∧ 𝑧 ∈ 𝑋) → 𝑅 ∈
ℝ*) |
6 | | simplr2 1214 |
. . . . . . 7
⊢ ((((𝐷 ∈ (∞Met‘𝑋) ∧ 𝑃 ∈ 𝑋) ∧ (𝑅 ∈ ℝ* ∧ 𝑇 ∈ ℝ*
∧ 𝑅 < 𝑇)) ∧ 𝑧 ∈ 𝑋) → 𝑇 ∈
ℝ*) |
7 | | xrlelttr 12819 |
. . . . . . . 8
⊢ (((𝑃𝐷𝑧) ∈ ℝ* ∧ 𝑅 ∈ ℝ*
∧ 𝑇 ∈
ℝ*) → (((𝑃𝐷𝑧) ≤ 𝑅 ∧ 𝑅 < 𝑇) → (𝑃𝐷𝑧) < 𝑇)) |
8 | 7 | expcomd 416 |
. . . . . . 7
⊢ (((𝑃𝐷𝑧) ∈ ℝ* ∧ 𝑅 ∈ ℝ*
∧ 𝑇 ∈
ℝ*) → (𝑅 < 𝑇 → ((𝑃𝐷𝑧) ≤ 𝑅 → (𝑃𝐷𝑧) < 𝑇))) |
9 | 4, 5, 6, 8 | syl3anc 1369 |
. . . . . 6
⊢ ((((𝐷 ∈ (∞Met‘𝑋) ∧ 𝑃 ∈ 𝑋) ∧ (𝑅 ∈ ℝ* ∧ 𝑇 ∈ ℝ*
∧ 𝑅 < 𝑇)) ∧ 𝑧 ∈ 𝑋) → (𝑅 < 𝑇 → ((𝑃𝐷𝑧) ≤ 𝑅 → (𝑃𝐷𝑧) < 𝑇))) |
10 | 2, 9 | mpd 15 |
. . . . 5
⊢ ((((𝐷 ∈ (∞Met‘𝑋) ∧ 𝑃 ∈ 𝑋) ∧ (𝑅 ∈ ℝ* ∧ 𝑇 ∈ ℝ*
∧ 𝑅 < 𝑇)) ∧ 𝑧 ∈ 𝑋) → ((𝑃𝐷𝑧) ≤ 𝑅 → (𝑃𝐷𝑧) < 𝑇)) |
11 | | simp2 1135 |
. . . . . . 7
⊢ ((𝑅 ∈ ℝ*
∧ 𝑇 ∈
ℝ* ∧ 𝑅
< 𝑇) → 𝑇 ∈
ℝ*) |
12 | | elbl2 23451 |
. . . . . . . 8
⊢ (((𝐷 ∈ (∞Met‘𝑋) ∧ 𝑇 ∈ ℝ*) ∧ (𝑃 ∈ 𝑋 ∧ 𝑧 ∈ 𝑋)) → (𝑧 ∈ (𝑃(ball‘𝐷)𝑇) ↔ (𝑃𝐷𝑧) < 𝑇)) |
13 | 12 | an4s 656 |
. . . . . . 7
⊢ (((𝐷 ∈ (∞Met‘𝑋) ∧ 𝑃 ∈ 𝑋) ∧ (𝑇 ∈ ℝ* ∧ 𝑧 ∈ 𝑋)) → (𝑧 ∈ (𝑃(ball‘𝐷)𝑇) ↔ (𝑃𝐷𝑧) < 𝑇)) |
14 | 11, 13 | sylanr1 678 |
. . . . . 6
⊢ (((𝐷 ∈ (∞Met‘𝑋) ∧ 𝑃 ∈ 𝑋) ∧ ((𝑅 ∈ ℝ* ∧ 𝑇 ∈ ℝ*
∧ 𝑅 < 𝑇) ∧ 𝑧 ∈ 𝑋)) → (𝑧 ∈ (𝑃(ball‘𝐷)𝑇) ↔ (𝑃𝐷𝑧) < 𝑇)) |
15 | 14 | anassrs 467 |
. . . . 5
⊢ ((((𝐷 ∈ (∞Met‘𝑋) ∧ 𝑃 ∈ 𝑋) ∧ (𝑅 ∈ ℝ* ∧ 𝑇 ∈ ℝ*
∧ 𝑅 < 𝑇)) ∧ 𝑧 ∈ 𝑋) → (𝑧 ∈ (𝑃(ball‘𝐷)𝑇) ↔ (𝑃𝐷𝑧) < 𝑇)) |
16 | 10, 15 | sylibrd 258 |
. . . 4
⊢ ((((𝐷 ∈ (∞Met‘𝑋) ∧ 𝑃 ∈ 𝑋) ∧ (𝑅 ∈ ℝ* ∧ 𝑇 ∈ ℝ*
∧ 𝑅 < 𝑇)) ∧ 𝑧 ∈ 𝑋) → ((𝑃𝐷𝑧) ≤ 𝑅 → 𝑧 ∈ (𝑃(ball‘𝐷)𝑇))) |
17 | 16 | ralrimiva 3107 |
. . 3
⊢ (((𝐷 ∈ (∞Met‘𝑋) ∧ 𝑃 ∈ 𝑋) ∧ (𝑅 ∈ ℝ* ∧ 𝑇 ∈ ℝ*
∧ 𝑅 < 𝑇)) → ∀𝑧 ∈ 𝑋 ((𝑃𝐷𝑧) ≤ 𝑅 → 𝑧 ∈ (𝑃(ball‘𝐷)𝑇))) |
18 | | rabss 4001 |
. . 3
⊢ ({𝑧 ∈ 𝑋 ∣ (𝑃𝐷𝑧) ≤ 𝑅} ⊆ (𝑃(ball‘𝐷)𝑇) ↔ ∀𝑧 ∈ 𝑋 ((𝑃𝐷𝑧) ≤ 𝑅 → 𝑧 ∈ (𝑃(ball‘𝐷)𝑇))) |
19 | 17, 18 | sylibr 233 |
. 2
⊢ (((𝐷 ∈ (∞Met‘𝑋) ∧ 𝑃 ∈ 𝑋) ∧ (𝑅 ∈ ℝ* ∧ 𝑇 ∈ ℝ*
∧ 𝑅 < 𝑇)) → {𝑧 ∈ 𝑋 ∣ (𝑃𝐷𝑧) ≤ 𝑅} ⊆ (𝑃(ball‘𝐷)𝑇)) |
20 | 1, 19 | eqsstrid 3965 |
1
⊢ (((𝐷 ∈ (∞Met‘𝑋) ∧ 𝑃 ∈ 𝑋) ∧ (𝑅 ∈ ℝ* ∧ 𝑇 ∈ ℝ*
∧ 𝑅 < 𝑇)) → 𝑆 ⊆ (𝑃(ball‘𝐷)𝑇)) |