Step | Hyp | Ref
| Expression |
1 | | simp1 1135 |
. . 3
⊢ ((𝐷 ∈ (PsMet‘𝑋) ∧ 𝑉 ∈ (metUnif‘𝐷) ∧ 𝑃 ∈ 𝑋) → 𝐷 ∈ (PsMet‘𝑋)) |
2 | | simp3 1137 |
. . 3
⊢ ((𝐷 ∈ (PsMet‘𝑋) ∧ 𝑉 ∈ (metUnif‘𝐷) ∧ 𝑃 ∈ 𝑋) → 𝑃 ∈ 𝑋) |
3 | | simpr 485 |
. . . . 5
⊢ ((((𝐷 ∈ (PsMet‘𝑋) ∧ 𝑉 ∈ (metUnif‘𝐷) ∧ 𝑃 ∈ 𝑋) ∧ 𝑤 ∈ ran (𝑟 ∈ ℝ+ ↦ (◡𝐷 “ (0[,)𝑟)))) ∧ 𝑤 ⊆ 𝑉) → 𝑤 ⊆ 𝑉) |
4 | | eqid 2738 |
. . . . . . . . 9
⊢ (𝑟 ∈ ℝ+
↦ (◡𝐷 “ (0[,)𝑟))) = (𝑟 ∈ ℝ+ ↦ (◡𝐷 “ (0[,)𝑟))) |
5 | 4 | elrnmpt 5865 |
. . . . . . . 8
⊢ (𝑤 ∈ V → (𝑤 ∈ ran (𝑟 ∈ ℝ+ ↦ (◡𝐷 “ (0[,)𝑟))) ↔ ∃𝑟 ∈ ℝ+ 𝑤 = (◡𝐷 “ (0[,)𝑟)))) |
6 | 5 | elv 3438 |
. . . . . . 7
⊢ (𝑤 ∈ ran (𝑟 ∈ ℝ+ ↦ (◡𝐷 “ (0[,)𝑟))) ↔ ∃𝑟 ∈ ℝ+ 𝑤 = (◡𝐷 “ (0[,)𝑟))) |
7 | 6 | biimpi 215 |
. . . . . 6
⊢ (𝑤 ∈ ran (𝑟 ∈ ℝ+ ↦ (◡𝐷 “ (0[,)𝑟))) → ∃𝑟 ∈ ℝ+ 𝑤 = (◡𝐷 “ (0[,)𝑟))) |
8 | 7 | ad2antlr 724 |
. . . . 5
⊢ ((((𝐷 ∈ (PsMet‘𝑋) ∧ 𝑉 ∈ (metUnif‘𝐷) ∧ 𝑃 ∈ 𝑋) ∧ 𝑤 ∈ ran (𝑟 ∈ ℝ+ ↦ (◡𝐷 “ (0[,)𝑟)))) ∧ 𝑤 ⊆ 𝑉) → ∃𝑟 ∈ ℝ+ 𝑤 = (◡𝐷 “ (0[,)𝑟))) |
9 | | sseq1 3946 |
. . . . . . 7
⊢ (𝑤 = (◡𝐷 “ (0[,)𝑟)) → (𝑤 ⊆ 𝑉 ↔ (◡𝐷 “ (0[,)𝑟)) ⊆ 𝑉)) |
10 | 9 | biimpcd 248 |
. . . . . 6
⊢ (𝑤 ⊆ 𝑉 → (𝑤 = (◡𝐷 “ (0[,)𝑟)) → (◡𝐷 “ (0[,)𝑟)) ⊆ 𝑉)) |
11 | 10 | reximdv 3202 |
. . . . 5
⊢ (𝑤 ⊆ 𝑉 → (∃𝑟 ∈ ℝ+ 𝑤 = (◡𝐷 “ (0[,)𝑟)) → ∃𝑟 ∈ ℝ+ (◡𝐷 “ (0[,)𝑟)) ⊆ 𝑉)) |
12 | 3, 8, 11 | sylc 65 |
. . . 4
⊢ ((((𝐷 ∈ (PsMet‘𝑋) ∧ 𝑉 ∈ (metUnif‘𝐷) ∧ 𝑃 ∈ 𝑋) ∧ 𝑤 ∈ ran (𝑟 ∈ ℝ+ ↦ (◡𝐷 “ (0[,)𝑟)))) ∧ 𝑤 ⊆ 𝑉) → ∃𝑟 ∈ ℝ+ (◡𝐷 “ (0[,)𝑟)) ⊆ 𝑉) |
13 | 2 | ne0d 4269 |
. . . . 5
⊢ ((𝐷 ∈ (PsMet‘𝑋) ∧ 𝑉 ∈ (metUnif‘𝐷) ∧ 𝑃 ∈ 𝑋) → 𝑋 ≠ ∅) |
14 | | simp2 1136 |
. . . . 5
⊢ ((𝐷 ∈ (PsMet‘𝑋) ∧ 𝑉 ∈ (metUnif‘𝐷) ∧ 𝑃 ∈ 𝑋) → 𝑉 ∈ (metUnif‘𝐷)) |
15 | | metuel 23720 |
. . . . . 6
⊢ ((𝑋 ≠ ∅ ∧ 𝐷 ∈ (PsMet‘𝑋)) → (𝑉 ∈ (metUnif‘𝐷) ↔ (𝑉 ⊆ (𝑋 × 𝑋) ∧ ∃𝑤 ∈ ran (𝑟 ∈ ℝ+ ↦ (◡𝐷 “ (0[,)𝑟)))𝑤 ⊆ 𝑉))) |
16 | 15 | simplbda 500 |
. . . . 5
⊢ (((𝑋 ≠ ∅ ∧ 𝐷 ∈ (PsMet‘𝑋)) ∧ 𝑉 ∈ (metUnif‘𝐷)) → ∃𝑤 ∈ ran (𝑟 ∈ ℝ+ ↦ (◡𝐷 “ (0[,)𝑟)))𝑤 ⊆ 𝑉) |
17 | 13, 1, 14, 16 | syl21anc 835 |
. . . 4
⊢ ((𝐷 ∈ (PsMet‘𝑋) ∧ 𝑉 ∈ (metUnif‘𝐷) ∧ 𝑃 ∈ 𝑋) → ∃𝑤 ∈ ran (𝑟 ∈ ℝ+ ↦ (◡𝐷 “ (0[,)𝑟)))𝑤 ⊆ 𝑉) |
18 | 12, 17 | r19.29a 3218 |
. . 3
⊢ ((𝐷 ∈ (PsMet‘𝑋) ∧ 𝑉 ∈ (metUnif‘𝐷) ∧ 𝑃 ∈ 𝑋) → ∃𝑟 ∈ ℝ+ (◡𝐷 “ (0[,)𝑟)) ⊆ 𝑉) |
19 | | imass1 6009 |
. . . . . 6
⊢ ((◡𝐷 “ (0[,)𝑟)) ⊆ 𝑉 → ((◡𝐷 “ (0[,)𝑟)) “ {𝑃}) ⊆ (𝑉 “ {𝑃})) |
20 | 19 | reximi 3178 |
. . . . 5
⊢
(∃𝑟 ∈
ℝ+ (◡𝐷 “ (0[,)𝑟)) ⊆ 𝑉 → ∃𝑟 ∈ ℝ+ ((◡𝐷 “ (0[,)𝑟)) “ {𝑃}) ⊆ (𝑉 “ {𝑃})) |
21 | | blval2 23718 |
. . . . . . . 8
⊢ ((𝐷 ∈ (PsMet‘𝑋) ∧ 𝑃 ∈ 𝑋 ∧ 𝑟 ∈ ℝ+) → (𝑃(ball‘𝐷)𝑟) = ((◡𝐷 “ (0[,)𝑟)) “ {𝑃})) |
22 | 21 | sseq1d 3952 |
. . . . . . 7
⊢ ((𝐷 ∈ (PsMet‘𝑋) ∧ 𝑃 ∈ 𝑋 ∧ 𝑟 ∈ ℝ+) → ((𝑃(ball‘𝐷)𝑟) ⊆ (𝑉 “ {𝑃}) ↔ ((◡𝐷 “ (0[,)𝑟)) “ {𝑃}) ⊆ (𝑉 “ {𝑃}))) |
23 | 22 | 3expa 1117 |
. . . . . 6
⊢ (((𝐷 ∈ (PsMet‘𝑋) ∧ 𝑃 ∈ 𝑋) ∧ 𝑟 ∈ ℝ+) → ((𝑃(ball‘𝐷)𝑟) ⊆ (𝑉 “ {𝑃}) ↔ ((◡𝐷 “ (0[,)𝑟)) “ {𝑃}) ⊆ (𝑉 “ {𝑃}))) |
24 | 23 | rexbidva 3225 |
. . . . 5
⊢ ((𝐷 ∈ (PsMet‘𝑋) ∧ 𝑃 ∈ 𝑋) → (∃𝑟 ∈ ℝ+ (𝑃(ball‘𝐷)𝑟) ⊆ (𝑉 “ {𝑃}) ↔ ∃𝑟 ∈ ℝ+ ((◡𝐷 “ (0[,)𝑟)) “ {𝑃}) ⊆ (𝑉 “ {𝑃}))) |
25 | 20, 24 | syl5ibr 245 |
. . . 4
⊢ ((𝐷 ∈ (PsMet‘𝑋) ∧ 𝑃 ∈ 𝑋) → (∃𝑟 ∈ ℝ+ (◡𝐷 “ (0[,)𝑟)) ⊆ 𝑉 → ∃𝑟 ∈ ℝ+ (𝑃(ball‘𝐷)𝑟) ⊆ (𝑉 “ {𝑃}))) |
26 | 25 | imp 407 |
. . 3
⊢ (((𝐷 ∈ (PsMet‘𝑋) ∧ 𝑃 ∈ 𝑋) ∧ ∃𝑟 ∈ ℝ+ (◡𝐷 “ (0[,)𝑟)) ⊆ 𝑉) → ∃𝑟 ∈ ℝ+ (𝑃(ball‘𝐷)𝑟) ⊆ (𝑉 “ {𝑃})) |
27 | 1, 2, 18, 26 | syl21anc 835 |
. 2
⊢ ((𝐷 ∈ (PsMet‘𝑋) ∧ 𝑉 ∈ (metUnif‘𝐷) ∧ 𝑃 ∈ 𝑋) → ∃𝑟 ∈ ℝ+ (𝑃(ball‘𝐷)𝑟) ⊆ (𝑉 “ {𝑃})) |
28 | | blssexps 23579 |
. . 3
⊢ ((𝐷 ∈ (PsMet‘𝑋) ∧ 𝑃 ∈ 𝑋) → (∃𝑎 ∈ ran (ball‘𝐷)(𝑃 ∈ 𝑎 ∧ 𝑎 ⊆ (𝑉 “ {𝑃})) ↔ ∃𝑟 ∈ ℝ+ (𝑃(ball‘𝐷)𝑟) ⊆ (𝑉 “ {𝑃}))) |
29 | 28 | 3adant2 1130 |
. 2
⊢ ((𝐷 ∈ (PsMet‘𝑋) ∧ 𝑉 ∈ (metUnif‘𝐷) ∧ 𝑃 ∈ 𝑋) → (∃𝑎 ∈ ran (ball‘𝐷)(𝑃 ∈ 𝑎 ∧ 𝑎 ⊆ (𝑉 “ {𝑃})) ↔ ∃𝑟 ∈ ℝ+ (𝑃(ball‘𝐷)𝑟) ⊆ (𝑉 “ {𝑃}))) |
30 | 27, 29 | mpbird 256 |
1
⊢ ((𝐷 ∈ (PsMet‘𝑋) ∧ 𝑉 ∈ (metUnif‘𝐷) ∧ 𝑃 ∈ 𝑋) → ∃𝑎 ∈ ran (ball‘𝐷)(𝑃 ∈ 𝑎 ∧ 𝑎 ⊆ (𝑉 “ {𝑃}))) |