Theorem metidval 31508

Description: Value of the metric identification relation. (Contributed by Thierry Arnoux, 7-Feb-2018.)

Assertion

Ref	Expression
metidval	⊢ (𝐷 ∈ (PsMet‘𝑋) → (~Met‘𝐷) = {⟨𝑥, 𝑦⟩ ∣ ((𝑥 ∈ 𝑋 ∧ 𝑦 ∈ 𝑋) ∧ (𝑥𝐷𝑦) = 0)})

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

Proof of Theorem metidval

Dummy variables 𝑤 𝑑 𝑧 are mutually distinct and distinct from all other variables.

Step	Hyp	Ref	Expression
1		df-metid 31506	. . 3 ⊢ ~Met = (𝑑 ∈ ∪ ran PsMet ↦ {⟨𝑥, 𝑦⟩ ∣ ((𝑥 ∈ dom dom 𝑑 ∧ 𝑦 ∈ dom dom 𝑑) ∧ (𝑥𝑑𝑦) = 0)})
2	1	a1i 11	. 2 ⊢ (𝐷 ∈ (PsMet‘𝑋) → ~Met = (𝑑 ∈ ∪ ran PsMet ↦ {⟨𝑥, 𝑦⟩ ∣ ((𝑥 ∈ dom dom 𝑑 ∧ 𝑦 ∈ dom dom 𝑑) ∧ (𝑥𝑑𝑦) = 0)}))
3		simpr 488	. . . . . . . . 9 ⊢ ((𝐷 ∈ (PsMet‘𝑋) ∧ 𝑑 = 𝐷) → 𝑑 = 𝐷)
4	3	dmeqd 5759	. . . . . . . 8 ⊢ ((𝐷 ∈ (PsMet‘𝑋) ∧ 𝑑 = 𝐷) → dom 𝑑 = dom 𝐷)
5	4	dmeqd 5759	. . . . . . 7 ⊢ ((𝐷 ∈ (PsMet‘𝑋) ∧ 𝑑 = 𝐷) → dom dom 𝑑 = dom dom 𝐷)
6		psmetdmdm 23157	. . . . . . . 8 ⊢ (𝐷 ∈ (PsMet‘𝑋) → 𝑋 = dom dom 𝐷)
7	6	adantr 484	. . . . . . 7 ⊢ ((𝐷 ∈ (PsMet‘𝑋) ∧ 𝑑 = 𝐷) → 𝑋 = dom dom 𝐷)
8	5, 7	eqtr4d 2774	. . . . . 6 ⊢ ((𝐷 ∈ (PsMet‘𝑋) ∧ 𝑑 = 𝐷) → dom dom 𝑑 = 𝑋)
9	8	eleq2d 2816	. . . . 5 ⊢ ((𝐷 ∈ (PsMet‘𝑋) ∧ 𝑑 = 𝐷) → (𝑥 ∈ dom dom 𝑑 ↔ 𝑥 ∈ 𝑋))
10	8	eleq2d 2816	. . . . 5 ⊢ ((𝐷 ∈ (PsMet‘𝑋) ∧ 𝑑 = 𝐷) → (𝑦 ∈ dom dom 𝑑 ↔ 𝑦 ∈ 𝑋))
11	9, 10	anbi12d 634	. . . 4 ⊢ ((𝐷 ∈ (PsMet‘𝑋) ∧ 𝑑 = 𝐷) → ((𝑥 ∈ dom dom 𝑑 ∧ 𝑦 ∈ dom dom 𝑑) ↔ (𝑥 ∈ 𝑋 ∧ 𝑦 ∈ 𝑋)))
12	3	oveqd 7208	. . . . 5 ⊢ ((𝐷 ∈ (PsMet‘𝑋) ∧ 𝑑 = 𝐷) → (𝑥𝑑𝑦) = (𝑥𝐷𝑦))
13	12	eqeq1d 2738	. . . 4 ⊢ ((𝐷 ∈ (PsMet‘𝑋) ∧ 𝑑 = 𝐷) → ((𝑥𝑑𝑦) = 0 ↔ (𝑥𝐷𝑦) = 0))
14	11, 13	anbi12d 634	. . 3 ⊢ ((𝐷 ∈ (PsMet‘𝑋) ∧ 𝑑 = 𝐷) → (((𝑥 ∈ dom dom 𝑑 ∧ 𝑦 ∈ dom dom 𝑑) ∧ (𝑥𝑑𝑦) = 0) ↔ ((𝑥 ∈ 𝑋 ∧ 𝑦 ∈ 𝑋) ∧ (𝑥𝐷𝑦) = 0)))
15	14	opabbidv 5105	. 2 ⊢ ((𝐷 ∈ (PsMet‘𝑋) ∧ 𝑑 = 𝐷) → {⟨𝑥, 𝑦⟩ ∣ ((𝑥 ∈ dom dom 𝑑 ∧ 𝑦 ∈ dom dom 𝑑) ∧ (𝑥𝑑𝑦) = 0)} = {⟨𝑥, 𝑦⟩ ∣ ((𝑥 ∈ 𝑋 ∧ 𝑦 ∈ 𝑋) ∧ (𝑥𝐷𝑦) = 0)})
16		elfvdm 6727	. . . 4 ⊢ (𝐷 ∈ (PsMet‘𝑋) → 𝑋 ∈ dom PsMet)
17		fveq2 6695	. . . . . 6 ⊢ (𝑥 = 𝑋 → (PsMet‘𝑥) = (PsMet‘𝑋))
18	17	eleq2d 2816	. . . . 5 ⊢ (𝑥 = 𝑋 → (𝐷 ∈ (PsMet‘𝑥) ↔ 𝐷 ∈ (PsMet‘𝑋)))
19	18	rspcev 3527	. . . 4 ⊢ ((𝑋 ∈ dom PsMet ∧ 𝐷 ∈ (PsMet‘𝑋)) → ∃𝑥 ∈ dom PsMet𝐷 ∈ (PsMet‘𝑥))
20	16, 19	mpancom 688	. . 3 ⊢ (𝐷 ∈ (PsMet‘𝑋) → ∃𝑥 ∈ dom PsMet𝐷 ∈ (PsMet‘𝑥))
21		df-psmet 20309	. . . . 5 ⊢ PsMet = (𝑥 ∈ V ↦ {𝑑 ∈ (ℝ* ↑m (𝑥 × 𝑥)) ∣ ∀𝑦 ∈ 𝑥 ((𝑦𝑑𝑦) = 0 ∧ ∀𝑧 ∈ 𝑥 ∀𝑤 ∈ 𝑥 (𝑦𝑑𝑧) ≤ ((𝑤𝑑𝑦) +𝑒 (𝑤𝑑𝑧)))})
22	21	funmpt2 6397	. . . 4 ⊢ Fun PsMet
23		elunirn 7042	. . . 4 ⊢ (Fun PsMet → (𝐷 ∈ ∪ ran PsMet ↔ ∃𝑥 ∈ dom PsMet𝐷 ∈ (PsMet‘𝑥)))
24	22, 23	ax-mp 5	. . 3 ⊢ (𝐷 ∈ ∪ ran PsMet ↔ ∃𝑥 ∈ dom PsMet𝐷 ∈ (PsMet‘𝑥))
25	20, 24	sylibr 237	. 2 ⊢ (𝐷 ∈ (PsMet‘𝑋) → 𝐷 ∈ ∪ ran PsMet)
26		opabssxp 5625	. . 3 ⊢ {⟨𝑥, 𝑦⟩ ∣ ((𝑥 ∈ 𝑋 ∧ 𝑦 ∈ 𝑋) ∧ (𝑥𝐷𝑦) = 0)} ⊆ (𝑋 × 𝑋)
27		elfvex 6728	. . . 4 ⊢ (𝐷 ∈ (PsMet‘𝑋) → 𝑋 ∈ V)
28	27, 27	xpexd 7514	. . 3 ⊢ (𝐷 ∈ (PsMet‘𝑋) → (𝑋 × 𝑋) ∈ V)
29		ssexg 5201	. . 3 ⊢ (({⟨𝑥, 𝑦⟩ ∣ ((𝑥 ∈ 𝑋 ∧ 𝑦 ∈ 𝑋) ∧ (𝑥𝐷𝑦) = 0)} ⊆ (𝑋 × 𝑋) ∧ (𝑋 × 𝑋) ∈ V) → {⟨𝑥, 𝑦⟩ ∣ ((𝑥 ∈ 𝑋 ∧ 𝑦 ∈ 𝑋) ∧ (𝑥𝐷𝑦) = 0)} ∈ V)
30	26, 28, 29	sylancr 590	. 2 ⊢ (𝐷 ∈ (PsMet‘𝑋) → {⟨𝑥, 𝑦⟩ ∣ ((𝑥 ∈ 𝑋 ∧ 𝑦 ∈ 𝑋) ∧ (𝑥𝐷𝑦) = 0)} ∈ V)
31	2, 15, 25, 30	fvmptd 6803	1 ⊢ (𝐷 ∈ (PsMet‘𝑋) → (~Met‘𝐷) = {⟨𝑥, 𝑦⟩ ∣ ((𝑥 ∈ 𝑋 ∧ 𝑦 ∈ 𝑋) ∧ (𝑥𝐷𝑦) = 0)})

Syntax hints:   → wi 4   ↔ wb 209   ∧ wa 399   = wceq 1543   ∈ wcel 2112  ∀wral 3051  ∃wrex 3052  {crab 3055  Vcvv 3398   ⊆ wss 3853  ∪ cuni 4805   class class class wbr 5039  {copab 5101   ↦ cmpt 5120   × cxp 5534  dom cdm 5536  ran crn 5537  Fun wfun 6352  ‘cfv 6358  (class class class)co 7191   ↑_m cmap 8486  0cc0 10694  ℝ^*cxr 10831   ≤ cle 10833   +_𝑒 cxad 12667  PsMetcpsmet 20301  ~_Metcmetid 31504

This theorem was proved from axioms:  ax-mp 5  ax-1 6  ax-2 7  ax-3 8  ax-gen 1803  ax-4 1817  ax-5 1918  ax-6 1976  ax-7 2018  ax-8 2114  ax-9 2122  ax-10 2143  ax-11 2160  ax-12 2177  ax-ext 2708  ax-sep 5177  ax-nul 5184  ax-pow 5243  ax-pr 5307  ax-un 7501  ax-cnex 10750  ax-resscn 10751

This theorem depends on definitions:  df-bi 210  df-an 400  df-or 848  df-3an 1091  df-tru 1546  df-fal 1556  df-ex 1788  df-nf 1792  df-sb 2073  df-mo 2539  df-eu 2568  df-clab 2715  df-cleq 2728  df-clel 2809  df-nfc 2879  df-ne 2933  df-ral 3056  df-rex 3057  df-rab 3060  df-v 3400  df-sbc 3684  df-csb 3799  df-dif 3856  df-un 3858  df-in 3860  df-ss 3870  df-nul 4224  df-if 4426  df-pw 4501  df-sn 4528  df-pr 4530  df-op 4534  df-uni 4806  df-br 5040  df-opab 5102  df-mpt 5121  df-id 5440  df-xp 5542  df-rel 5543  df-cnv 5544  df-co 5545  df-dm 5546  df-rn 5547  df-iota 6316  df-fun 6360  df-fn 6361  df-f 6362  df-fv 6366  df-ov 7194  df-oprab 7195  df-mpo 7196  df-map 8488  df-xr 10836  df-psmet 20309  df-metid 31506

This theorem is referenced by:  metidss  31509  metidv  31510