Theorem blfvalps 12554

Description: The value of the ball function. (Contributed by NM, 30-Aug-2006.) (Revised by Mario Carneiro, 11-Nov-2013.) (Revised by Thierry Arnoux, 11-Feb-2018.)

Assertion

Ref	Expression
blfvalps	⊢ (𝐷 ∈ (PsMet‘𝑋) → (ball‘𝐷) = (𝑥 ∈ 𝑋, 𝑟 ∈ ℝ* ↦ {𝑦 ∈ 𝑋 ∣ (𝑥𝐷𝑦) < 𝑟}))

Distinct variable groups:   𝑥,𝑟,𝑦,𝐷   𝑋,𝑟,𝑥,𝑦

Proof of Theorem blfvalps

Dummy variable 𝑑 is distinct from all other variables.

Step	Hyp	Ref	Expression
1		df-bl 12159	. . 3 ⊢ ball = (𝑑 ∈ V ↦ (𝑥 ∈ dom dom 𝑑, 𝑟 ∈ ℝ* ↦ {𝑦 ∈ dom dom 𝑑 ∣ (𝑥𝑑𝑦) < 𝑟}))
2	1	a1i 9	. 2 ⊢ (𝐷 ∈ (PsMet‘𝑋) → ball = (𝑑 ∈ V ↦ (𝑥 ∈ dom dom 𝑑, 𝑟 ∈ ℝ* ↦ {𝑦 ∈ dom dom 𝑑 ∣ (𝑥𝑑𝑦) < 𝑟})))
3		dmeq 4739	. . . . 5 ⊢ (𝑑 = 𝐷 → dom 𝑑 = dom 𝐷)
4	3	dmeqd 4741	. . . 4 ⊢ (𝑑 = 𝐷 → dom dom 𝑑 = dom dom 𝐷)
5		psmetdmdm 12493	. . . . 5 ⊢ (𝐷 ∈ (PsMet‘𝑋) → 𝑋 = dom dom 𝐷)
6	5	eqcomd 2145	. . . 4 ⊢ (𝐷 ∈ (PsMet‘𝑋) → dom dom 𝐷 = 𝑋)
7	4, 6	sylan9eqr 2194	. . 3 ⊢ ((𝐷 ∈ (PsMet‘𝑋) ∧ 𝑑 = 𝐷) → dom dom 𝑑 = 𝑋)
8		eqidd 2140	. . 3 ⊢ ((𝐷 ∈ (PsMet‘𝑋) ∧ 𝑑 = 𝐷) → ℝ* = ℝ*)
9		simpr 109	. . . . . 6 ⊢ ((𝐷 ∈ (PsMet‘𝑋) ∧ 𝑑 = 𝐷) → 𝑑 = 𝐷)
10	9	oveqd 5791	. . . . 5 ⊢ ((𝐷 ∈ (PsMet‘𝑋) ∧ 𝑑 = 𝐷) → (𝑥𝑑𝑦) = (𝑥𝐷𝑦))
11	10	breq1d 3939	. . . 4 ⊢ ((𝐷 ∈ (PsMet‘𝑋) ∧ 𝑑 = 𝐷) → ((𝑥𝑑𝑦) < 𝑟 ↔ (𝑥𝐷𝑦) < 𝑟))
12	7, 11	rabeqbidv 2681	. . 3 ⊢ ((𝐷 ∈ (PsMet‘𝑋) ∧ 𝑑 = 𝐷) → {𝑦 ∈ dom dom 𝑑 ∣ (𝑥𝑑𝑦) < 𝑟} = {𝑦 ∈ 𝑋 ∣ (𝑥𝐷𝑦) < 𝑟})
13	7, 8, 12	mpoeq123dv 5833	. 2 ⊢ ((𝐷 ∈ (PsMet‘𝑋) ∧ 𝑑 = 𝐷) → (𝑥 ∈ dom dom 𝑑, 𝑟 ∈ ℝ* ↦ {𝑦 ∈ dom dom 𝑑 ∣ (𝑥𝑑𝑦) < 𝑟}) = (𝑥 ∈ 𝑋, 𝑟 ∈ ℝ* ↦ {𝑦 ∈ 𝑋 ∣ (𝑥𝐷𝑦) < 𝑟}))
14		elex 2697	. 2 ⊢ (𝐷 ∈ (PsMet‘𝑋) → 𝐷 ∈ V)
15		ssrab2 3182	. . . . . 6 ⊢ {𝑦 ∈ 𝑋 ∣ (𝑥𝐷𝑦) < 𝑟} ⊆ 𝑋
16		psmetrel 12491	. . . . . . . . 9 ⊢ Rel PsMet
17		relelfvdm 5453	. . . . . . . . 9 ⊢ ((Rel PsMet ∧ 𝐷 ∈ (PsMet‘𝑋)) → 𝑋 ∈ dom PsMet)
18	16, 17	mpan 420	. . . . . . . 8 ⊢ (𝐷 ∈ (PsMet‘𝑋) → 𝑋 ∈ dom PsMet)
19	18	adantr 274	. . . . . . 7 ⊢ ((𝐷 ∈ (PsMet‘𝑋) ∧ (𝑥 ∈ 𝑋 ∧ 𝑟 ∈ ℝ*)) → 𝑋 ∈ dom PsMet)
20		elpw2g 4081	. . . . . . 7 ⊢ (𝑋 ∈ dom PsMet → ({𝑦 ∈ 𝑋 ∣ (𝑥𝐷𝑦) < 𝑟} ∈ 𝒫 𝑋 ↔ {𝑦 ∈ 𝑋 ∣ (𝑥𝐷𝑦) < 𝑟} ⊆ 𝑋))
21	19, 20	syl 14	. . . . . 6 ⊢ ((𝐷 ∈ (PsMet‘𝑋) ∧ (𝑥 ∈ 𝑋 ∧ 𝑟 ∈ ℝ*)) → ({𝑦 ∈ 𝑋 ∣ (𝑥𝐷𝑦) < 𝑟} ∈ 𝒫 𝑋 ↔ {𝑦 ∈ 𝑋 ∣ (𝑥𝐷𝑦) < 𝑟} ⊆ 𝑋))
22	15, 21	mpbiri 167	. . . . 5 ⊢ ((𝐷 ∈ (PsMet‘𝑋) ∧ (𝑥 ∈ 𝑋 ∧ 𝑟 ∈ ℝ*)) → {𝑦 ∈ 𝑋 ∣ (𝑥𝐷𝑦) < 𝑟} ∈ 𝒫 𝑋)
23	22	ralrimivva 2514	. . . 4 ⊢ (𝐷 ∈ (PsMet‘𝑋) → ∀𝑥 ∈ 𝑋 ∀𝑟 ∈ ℝ* {𝑦 ∈ 𝑋 ∣ (𝑥𝐷𝑦) < 𝑟} ∈ 𝒫 𝑋)
24		eqid 2139	. . . . 5 ⊢ (𝑥 ∈ 𝑋, 𝑟 ∈ ℝ* ↦ {𝑦 ∈ 𝑋 ∣ (𝑥𝐷𝑦) < 𝑟}) = (𝑥 ∈ 𝑋, 𝑟 ∈ ℝ* ↦ {𝑦 ∈ 𝑋 ∣ (𝑥𝐷𝑦) < 𝑟})
25	24	fmpo 6099	. . . 4 ⊢ (∀𝑥 ∈ 𝑋 ∀𝑟 ∈ ℝ* {𝑦 ∈ 𝑋 ∣ (𝑥𝐷𝑦) < 𝑟} ∈ 𝒫 𝑋 ↔ (𝑥 ∈ 𝑋, 𝑟 ∈ ℝ* ↦ {𝑦 ∈ 𝑋 ∣ (𝑥𝐷𝑦) < 𝑟}):(𝑋 × ℝ*)⟶𝒫 𝑋)
26	23, 25	sylib 121	. . 3 ⊢ (𝐷 ∈ (PsMet‘𝑋) → (𝑥 ∈ 𝑋, 𝑟 ∈ ℝ* ↦ {𝑦 ∈ 𝑋 ∣ (𝑥𝐷𝑦) < 𝑟}):(𝑋 × ℝ*)⟶𝒫 𝑋)
27		xrex 9639	. . . 4 ⊢ ℝ* ∈ V
28		xpexg 4653	. . . 4 ⊢ ((𝑋 ∈ dom PsMet ∧ ℝ* ∈ V) → (𝑋 × ℝ*) ∈ V)
29	18, 27, 28	sylancl 409	. . 3 ⊢ (𝐷 ∈ (PsMet‘𝑋) → (𝑋 × ℝ*) ∈ V)
30	18	pwexd 4105	. . 3 ⊢ (𝐷 ∈ (PsMet‘𝑋) → 𝒫 𝑋 ∈ V)
31		fex2 5291	. . 3 ⊢ (((𝑥 ∈ 𝑋, 𝑟 ∈ ℝ* ↦ {𝑦 ∈ 𝑋 ∣ (𝑥𝐷𝑦) < 𝑟}):(𝑋 × ℝ*)⟶𝒫 𝑋 ∧ (𝑋 × ℝ*) ∈ V ∧ 𝒫 𝑋 ∈ V) → (𝑥 ∈ 𝑋, 𝑟 ∈ ℝ* ↦ {𝑦 ∈ 𝑋 ∣ (𝑥𝐷𝑦) < 𝑟}) ∈ V)
32	26, 29, 30, 31	syl3anc 1216	. 2 ⊢ (𝐷 ∈ (PsMet‘𝑋) → (𝑥 ∈ 𝑋, 𝑟 ∈ ℝ* ↦ {𝑦 ∈ 𝑋 ∣ (𝑥𝐷𝑦) < 𝑟}) ∈ V)
33	2, 13, 14, 32	fvmptd 5502	1 ⊢ (𝐷 ∈ (PsMet‘𝑋) → (ball‘𝐷) = (𝑥 ∈ 𝑋, 𝑟 ∈ ℝ* ↦ {𝑦 ∈ 𝑋 ∣ (𝑥𝐷𝑦) < 𝑟}))

Syntax hints:   → wi 4   ∧ wa 103   ↔ wb 104   = wceq 1331   ∈ wcel 1480  ∀wral 2416  {crab 2420  Vcvv 2686   ⊆ wss 3071  𝒫 cpw 3510   class class class wbr 3929   ↦ cmpt 3989   × cxp 4537  dom cdm 4539  Rel wrel 4544  ⟶wf 5119  ‘cfv 5123  (class class class)co 5774   ∈ cmpo 5776  ℝ^*cxr 7799   < clt 7800  PsMetcpsmet 12148  ballcbl 12151

This theorem was proved from axioms:  ax-mp 5  ax-1 6  ax-2 7  ax-ia1 105  ax-ia2 106  ax-ia3 107  ax-in1 603  ax-in2 604  ax-io 698  ax-5 1423  ax-7 1424  ax-gen 1425  ax-ie1 1469  ax-ie2 1470  ax-8 1482  ax-10 1483  ax-11 1484  ax-i12 1485  ax-bndl 1486  ax-4 1487  ax-13 1491  ax-14 1492  ax-17 1506  ax-i9 1510  ax-ial 1514  ax-i5r 1515  ax-ext 2121  ax-sep 4046  ax-pow 4098  ax-pr 4131  ax-un 4355  ax-setind 4452  ax-cnex 7711  ax-resscn 7712

This theorem depends on definitions:  df-bi 116  df-3an 964  df-tru 1334  df-fal 1337  df-nf 1437  df-sb 1736  df-eu 2002  df-mo 2003  df-clab 2126  df-cleq 2132  df-clel 2135  df-nfc 2270  df-ne 2309  df-ral 2421  df-rex 2422  df-rab 2425  df-v 2688  df-sbc 2910  df-csb 3004  df-dif 3073  df-un 3075  df-in 3077  df-ss 3084  df-pw 3512  df-sn 3533  df-pr 3534  df-op 3536  df-uni 3737  df-iun 3815  df-br 3930  df-opab 3990  df-mpt 3991  df-id 4215  df-xp 4545  df-rel 4546  df-cnv 4547  df-co 4548  df-dm 4549  df-rn 4550  df-res 4551  df-ima 4552  df-iota 5088  df-fun 5125  df-fn 5126  df-f 5127  df-fv 5131  df-ov 5777  df-oprab 5778  df-mpo 5779  df-1st 6038  df-2nd 6039  df-map 6544  df-pnf 7802  df-mnf 7803  df-xr 7804  df-psmet 12156  df-bl 12159

This theorem is referenced by:  blfval  12555  blvalps  12557  blfps  12578