Theorem opabex3 7925

Description: Existence of an ordered pair abstraction. (Contributed by Jeff Madsen, 2-Sep-2009.)

Hypotheses

Ref	Expression
opabex3.1	⊢ 𝐴 ∈ V
opabex3.2	⊢ (𝑥 ∈ 𝐴 → {𝑦 ∣ 𝜑} ∈ V)

Assertion

Ref	Expression
opabex3	⊢ {⟨𝑥, 𝑦⟩ ∣ (𝑥 ∈ 𝐴 ∧ 𝜑)} ∈ V

Distinct variable group:   𝑥,𝐴,𝑦

Allowed substitution hints:   𝜑(𝑥,𝑦)

Proof of Theorem opabex3

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

Step	Hyp	Ref	Expression
1		19.42v 1953	. . . . . 6 ⊢ (∃𝑦(𝑥 ∈ 𝐴 ∧ (𝑧 = ⟨𝑥, 𝑦⟩ ∧ 𝜑)) ↔ (𝑥 ∈ 𝐴 ∧ ∃𝑦(𝑧 = ⟨𝑥, 𝑦⟩ ∧ 𝜑)))
2		an12 645	. . . . . . 7 ⊢ ((𝑧 = ⟨𝑥, 𝑦⟩ ∧ (𝑥 ∈ 𝐴 ∧ 𝜑)) ↔ (𝑥 ∈ 𝐴 ∧ (𝑧 = ⟨𝑥, 𝑦⟩ ∧ 𝜑)))
3	2	exbii 1848	. . . . . 6 ⊢ (∃𝑦(𝑧 = ⟨𝑥, 𝑦⟩ ∧ (𝑥 ∈ 𝐴 ∧ 𝜑)) ↔ ∃𝑦(𝑥 ∈ 𝐴 ∧ (𝑧 = ⟨𝑥, 𝑦⟩ ∧ 𝜑)))
4		elxp 5654	. . . . . . . 8 ⊢ (𝑧 ∈ ({𝑥} × {𝑦 ∣ 𝜑}) ↔ ∃𝑣∃𝑤(𝑧 = ⟨𝑣, 𝑤⟩ ∧ (𝑣 ∈ {𝑥} ∧ 𝑤 ∈ {𝑦 ∣ 𝜑})))
5		excom 2163	. . . . . . . . 9 ⊢ (∃𝑣∃𝑤(𝑧 = ⟨𝑣, 𝑤⟩ ∧ (𝑣 ∈ {𝑥} ∧ 𝑤 ∈ {𝑦 ∣ 𝜑})) ↔ ∃𝑤∃𝑣(𝑧 = ⟨𝑣, 𝑤⟩ ∧ (𝑣 ∈ {𝑥} ∧ 𝑤 ∈ {𝑦 ∣ 𝜑})))
6		an12 645	. . . . . . . . . . . . 13 ⊢ ((𝑧 = ⟨𝑣, 𝑤⟩ ∧ (𝑣 ∈ {𝑥} ∧ 𝑤 ∈ {𝑦 ∣ 𝜑})) ↔ (𝑣 ∈ {𝑥} ∧ (𝑧 = ⟨𝑣, 𝑤⟩ ∧ 𝑤 ∈ {𝑦 ∣ 𝜑})))
7		velsn 4601	. . . . . . . . . . . . . 14 ⊢ (𝑣 ∈ {𝑥} ↔ 𝑣 = 𝑥)
8	7	anbi1i 624	. . . . . . . . . . . . 13 ⊢ ((𝑣 ∈ {𝑥} ∧ (𝑧 = ⟨𝑣, 𝑤⟩ ∧ 𝑤 ∈ {𝑦 ∣ 𝜑})) ↔ (𝑣 = 𝑥 ∧ (𝑧 = ⟨𝑣, 𝑤⟩ ∧ 𝑤 ∈ {𝑦 ∣ 𝜑})))
9	6, 8	bitri 275	. . . . . . . . . . . 12 ⊢ ((𝑧 = ⟨𝑣, 𝑤⟩ ∧ (𝑣 ∈ {𝑥} ∧ 𝑤 ∈ {𝑦 ∣ 𝜑})) ↔ (𝑣 = 𝑥 ∧ (𝑧 = ⟨𝑣, 𝑤⟩ ∧ 𝑤 ∈ {𝑦 ∣ 𝜑})))
10	9	exbii 1848	. . . . . . . . . . 11 ⊢ (∃𝑣(𝑧 = ⟨𝑣, 𝑤⟩ ∧ (𝑣 ∈ {𝑥} ∧ 𝑤 ∈ {𝑦 ∣ 𝜑})) ↔ ∃𝑣(𝑣 = 𝑥 ∧ (𝑧 = ⟨𝑣, 𝑤⟩ ∧ 𝑤 ∈ {𝑦 ∣ 𝜑})))
11		opeq1 4833	. . . . . . . . . . . . . 14 ⊢ (𝑣 = 𝑥 → ⟨𝑣, 𝑤⟩ = ⟨𝑥, 𝑤⟩)
12	11	eqeq2d 2740	. . . . . . . . . . . . 13 ⊢ (𝑣 = 𝑥 → (𝑧 = ⟨𝑣, 𝑤⟩ ↔ 𝑧 = ⟨𝑥, 𝑤⟩))
13	12	anbi1d 631	. . . . . . . . . . . 12 ⊢ (𝑣 = 𝑥 → ((𝑧 = ⟨𝑣, 𝑤⟩ ∧ 𝑤 ∈ {𝑦 ∣ 𝜑}) ↔ (𝑧 = ⟨𝑥, 𝑤⟩ ∧ 𝑤 ∈ {𝑦 ∣ 𝜑})))
14	13	equsexvw 2005	. . . . . . . . . . 11 ⊢ (∃𝑣(𝑣 = 𝑥 ∧ (𝑧 = ⟨𝑣, 𝑤⟩ ∧ 𝑤 ∈ {𝑦 ∣ 𝜑})) ↔ (𝑧 = ⟨𝑥, 𝑤⟩ ∧ 𝑤 ∈ {𝑦 ∣ 𝜑}))
15	10, 14	bitri 275	. . . . . . . . . 10 ⊢ (∃𝑣(𝑧 = ⟨𝑣, 𝑤⟩ ∧ (𝑣 ∈ {𝑥} ∧ 𝑤 ∈ {𝑦 ∣ 𝜑})) ↔ (𝑧 = ⟨𝑥, 𝑤⟩ ∧ 𝑤 ∈ {𝑦 ∣ 𝜑}))
16	15	exbii 1848	. . . . . . . . 9 ⊢ (∃𝑤∃𝑣(𝑧 = ⟨𝑣, 𝑤⟩ ∧ (𝑣 ∈ {𝑥} ∧ 𝑤 ∈ {𝑦 ∣ 𝜑})) ↔ ∃𝑤(𝑧 = ⟨𝑥, 𝑤⟩ ∧ 𝑤 ∈ {𝑦 ∣ 𝜑}))
17	5, 16	bitri 275	. . . . . . . 8 ⊢ (∃𝑣∃𝑤(𝑧 = ⟨𝑣, 𝑤⟩ ∧ (𝑣 ∈ {𝑥} ∧ 𝑤 ∈ {𝑦 ∣ 𝜑})) ↔ ∃𝑤(𝑧 = ⟨𝑥, 𝑤⟩ ∧ 𝑤 ∈ {𝑦 ∣ 𝜑}))
18		nfv 1914	. . . . . . . . . 10 ⊢ Ⅎ𝑦 𝑧 = ⟨𝑥, 𝑤⟩
19		nfsab1 2715	. . . . . . . . . 10 ⊢ Ⅎ𝑦 𝑤 ∈ {𝑦 ∣ 𝜑}
20	18, 19	nfan 1899	. . . . . . . . 9 ⊢ Ⅎ𝑦(𝑧 = ⟨𝑥, 𝑤⟩ ∧ 𝑤 ∈ {𝑦 ∣ 𝜑})
21		nfv 1914	. . . . . . . . 9 ⊢ Ⅎ𝑤(𝑧 = ⟨𝑥, 𝑦⟩ ∧ 𝜑)
22		opeq2 4834	. . . . . . . . . . 11 ⊢ (𝑤 = 𝑦 → ⟨𝑥, 𝑤⟩ = ⟨𝑥, 𝑦⟩)
23	22	eqeq2d 2740	. . . . . . . . . 10 ⊢ (𝑤 = 𝑦 → (𝑧 = ⟨𝑥, 𝑤⟩ ↔ 𝑧 = ⟨𝑥, 𝑦⟩))
24		df-clab 2708	. . . . . . . . . . 11 ⊢ (𝑤 ∈ {𝑦 ∣ 𝜑} ↔ [𝑤 / 𝑦]𝜑)
25		sbequ12 2252	. . . . . . . . . . . 12 ⊢ (𝑦 = 𝑤 → (𝜑 ↔ [𝑤 / 𝑦]𝜑))
26	25	equcoms 2020	. . . . . . . . . . 11 ⊢ (𝑤 = 𝑦 → (𝜑 ↔ [𝑤 / 𝑦]𝜑))
27	24, 26	bitr4id 290	. . . . . . . . . 10 ⊢ (𝑤 = 𝑦 → (𝑤 ∈ {𝑦 ∣ 𝜑} ↔ 𝜑))
28	23, 27	anbi12d 632	. . . . . . . . 9 ⊢ (𝑤 = 𝑦 → ((𝑧 = ⟨𝑥, 𝑤⟩ ∧ 𝑤 ∈ {𝑦 ∣ 𝜑}) ↔ (𝑧 = ⟨𝑥, 𝑦⟩ ∧ 𝜑)))
29	20, 21, 28	cbvexv1 2340	. . . . . . . 8 ⊢ (∃𝑤(𝑧 = ⟨𝑥, 𝑤⟩ ∧ 𝑤 ∈ {𝑦 ∣ 𝜑}) ↔ ∃𝑦(𝑧 = ⟨𝑥, 𝑦⟩ ∧ 𝜑))
30	4, 17, 29	3bitri 297	. . . . . . 7 ⊢ (𝑧 ∈ ({𝑥} × {𝑦 ∣ 𝜑}) ↔ ∃𝑦(𝑧 = ⟨𝑥, 𝑦⟩ ∧ 𝜑))
31	30	anbi2i 623	. . . . . 6 ⊢ ((𝑥 ∈ 𝐴 ∧ 𝑧 ∈ ({𝑥} × {𝑦 ∣ 𝜑})) ↔ (𝑥 ∈ 𝐴 ∧ ∃𝑦(𝑧 = ⟨𝑥, 𝑦⟩ ∧ 𝜑)))
32	1, 3, 31	3bitr4ri 304	. . . . 5 ⊢ ((𝑥 ∈ 𝐴 ∧ 𝑧 ∈ ({𝑥} × {𝑦 ∣ 𝜑})) ↔ ∃𝑦(𝑧 = ⟨𝑥, 𝑦⟩ ∧ (𝑥 ∈ 𝐴 ∧ 𝜑)))
33	32	exbii 1848	. . . 4 ⊢ (∃𝑥(𝑥 ∈ 𝐴 ∧ 𝑧 ∈ ({𝑥} × {𝑦 ∣ 𝜑})) ↔ ∃𝑥∃𝑦(𝑧 = ⟨𝑥, 𝑦⟩ ∧ (𝑥 ∈ 𝐴 ∧ 𝜑)))
34		eliun 4955	. . . . 5 ⊢ (𝑧 ∈ ∪ 𝑥 ∈ 𝐴 ({𝑥} × {𝑦 ∣ 𝜑}) ↔ ∃𝑥 ∈ 𝐴 𝑧 ∈ ({𝑥} × {𝑦 ∣ 𝜑}))
35		df-rex 3054	. . . . 5 ⊢ (∃𝑥 ∈ 𝐴 𝑧 ∈ ({𝑥} × {𝑦 ∣ 𝜑}) ↔ ∃𝑥(𝑥 ∈ 𝐴 ∧ 𝑧 ∈ ({𝑥} × {𝑦 ∣ 𝜑})))
36	34, 35	bitri 275	. . . 4 ⊢ (𝑧 ∈ ∪ 𝑥 ∈ 𝐴 ({𝑥} × {𝑦 ∣ 𝜑}) ↔ ∃𝑥(𝑥 ∈ 𝐴 ∧ 𝑧 ∈ ({𝑥} × {𝑦 ∣ 𝜑})))
37		elopab 5482	. . . 4 ⊢ (𝑧 ∈ {⟨𝑥, 𝑦⟩ ∣ (𝑥 ∈ 𝐴 ∧ 𝜑)} ↔ ∃𝑥∃𝑦(𝑧 = ⟨𝑥, 𝑦⟩ ∧ (𝑥 ∈ 𝐴 ∧ 𝜑)))
38	33, 36, 37	3bitr4i 303	. . 3 ⊢ (𝑧 ∈ ∪ 𝑥 ∈ 𝐴 ({𝑥} × {𝑦 ∣ 𝜑}) ↔ 𝑧 ∈ {⟨𝑥, 𝑦⟩ ∣ (𝑥 ∈ 𝐴 ∧ 𝜑)})
39	38	eqriv 2726	. 2 ⊢ ∪ 𝑥 ∈ 𝐴 ({𝑥} × {𝑦 ∣ 𝜑}) = {⟨𝑥, 𝑦⟩ ∣ (𝑥 ∈ 𝐴 ∧ 𝜑)}
40		opabex3.1	. . 3 ⊢ 𝐴 ∈ V
41		vsnex 5384	. . . . 5 ⊢ {𝑥} ∈ V
42		opabex3.2	. . . . 5 ⊢ (𝑥 ∈ 𝐴 → {𝑦 ∣ 𝜑} ∈ V)
43		xpexg 7706	. . . . 5 ⊢ (({𝑥} ∈ V ∧ {𝑦 ∣ 𝜑} ∈ V) → ({𝑥} × {𝑦 ∣ 𝜑}) ∈ V)
44	41, 42, 43	sylancr 587	. . . 4 ⊢ (𝑥 ∈ 𝐴 → ({𝑥} × {𝑦 ∣ 𝜑}) ∈ V)
45	44	rgen 3046	. . 3 ⊢ ∀𝑥 ∈ 𝐴 ({𝑥} × {𝑦 ∣ 𝜑}) ∈ V
46		iunexg 7921	. . 3 ⊢ ((𝐴 ∈ V ∧ ∀𝑥 ∈ 𝐴 ({𝑥} × {𝑦 ∣ 𝜑}) ∈ V) → ∪ 𝑥 ∈ 𝐴 ({𝑥} × {𝑦 ∣ 𝜑}) ∈ V)
47	40, 45, 46	mp2an 692	. 2 ⊢ ∪ 𝑥 ∈ 𝐴 ({𝑥} × {𝑦 ∣ 𝜑}) ∈ V
48	39, 47	eqeltrri 2825	1 ⊢ {⟨𝑥, 𝑦⟩ ∣ (𝑥 ∈ 𝐴 ∧ 𝜑)} ∈ V

Syntax hints:   → wi 4   ↔ wb 206   ∧ wa 395   = wceq 1540  ∃wex 1779  [wsb 2065   ∈ wcel 2109  {cab 2707  ∀wral 3044  ∃wrex 3053  Vcvv 3444  {csn 4585  ⟨cop 4591  ∪ ciun 4951  {copab 5164   × cxp 5629

This theorem was proved from axioms:  ax-mp 5  ax-1 6  ax-2 7  ax-3 8  ax-gen 1795  ax-4 1809  ax-5 1910  ax-6 1967  ax-7 2008  ax-8 2111  ax-9 2119  ax-10 2142  ax-11 2158  ax-12 2178  ax-ext 2701  ax-rep 5229  ax-sep 5246  ax-nul 5256  ax-pow 5315  ax-pr 5382  ax-un 7691

This theorem depends on definitions:  df-bi 207  df-an 396  df-or 848  df-3an 1088  df-tru 1543  df-fal 1553  df-ex 1780  df-nf 1784  df-sb 2066  df-mo 2533  df-clab 2708  df-cleq 2721  df-clel 2803  df-ral 3045  df-rex 3054  df-rab 3403  df-v 3446  df-dif 3914  df-un 3916  df-in 3918  df-ss 3928  df-nul 4293  df-if 4485  df-pw 4561  df-sn 4586  df-pr 4588  df-op 4592  df-uni 4868  df-iun 4953  df-opab 5165  df-xp 5637  df-rel 5638

This theorem is referenced by:  dvdsrval  20246  eulerpartlemgvv  34340