Theorem reusv2lem4 5319

Description: Lemma for reusv2 5321. (Contributed by NM, 13-Dec-2012.)

Assertion

Ref	Expression
reusv2lem4	⊢ (∃!𝑥 ∈ 𝐴 ∃𝑦 ∈ 𝐵 (𝜑 ∧ 𝑥 = 𝐶) ↔ ∃!𝑥∀𝑦 ∈ 𝐵 ((𝐶 ∈ 𝐴 ∧ 𝜑) → 𝑥 = 𝐶))

Distinct variable groups:   𝑥,𝑦,𝐴   𝑥,𝐵   𝑥,𝐶   𝜑,𝑥

Allowed substitution hints:   𝜑(𝑦)   𝐵(𝑦)   𝐶(𝑦)

Proof of Theorem reusv2lem4

Dummy variable 𝑧 is distinct from all other variables.

Step	Hyp	Ref	Expression
1		df-reu 3070	. 2 ⊢ (∃!𝑥 ∈ 𝐴 ∃𝑦 ∈ 𝐵 (𝜑 ∧ 𝑥 = 𝐶) ↔ ∃!𝑥(𝑥 ∈ 𝐴 ∧ ∃𝑦 ∈ 𝐵 (𝜑 ∧ 𝑥 = 𝐶)))
2		anass 468	. . . . . 6 ⊢ (((𝑦 ∈ 𝐵 ∧ (𝐶 ∈ 𝐴 ∧ 𝜑)) ∧ 𝑥 = 𝐶) ↔ (𝑦 ∈ 𝐵 ∧ ((𝐶 ∈ 𝐴 ∧ 𝜑) ∧ 𝑥 = 𝐶)))
3		rabid 3304	. . . . . . 7 ⊢ (𝑦 ∈ {𝑦 ∈ 𝐵 ∣ (𝐶 ∈ 𝐴 ∧ 𝜑)} ↔ (𝑦 ∈ 𝐵 ∧ (𝐶 ∈ 𝐴 ∧ 𝜑)))
4	3	anbi1i 623	. . . . . 6 ⊢ ((𝑦 ∈ {𝑦 ∈ 𝐵 ∣ (𝐶 ∈ 𝐴 ∧ 𝜑)} ∧ 𝑥 = 𝐶) ↔ ((𝑦 ∈ 𝐵 ∧ (𝐶 ∈ 𝐴 ∧ 𝜑)) ∧ 𝑥 = 𝐶))
5		anass 468	. . . . . . . 8 ⊢ (((𝑥 ∈ 𝐴 ∧ 𝜑) ∧ 𝑥 = 𝐶) ↔ (𝑥 ∈ 𝐴 ∧ (𝜑 ∧ 𝑥 = 𝐶)))
6		eleq1 2826	. . . . . . . . . 10 ⊢ (𝑥 = 𝐶 → (𝑥 ∈ 𝐴 ↔ 𝐶 ∈ 𝐴))
7	6	anbi1d 629	. . . . . . . . 9 ⊢ (𝑥 = 𝐶 → ((𝑥 ∈ 𝐴 ∧ 𝜑) ↔ (𝐶 ∈ 𝐴 ∧ 𝜑)))
8	7	pm5.32ri 575	. . . . . . . 8 ⊢ (((𝑥 ∈ 𝐴 ∧ 𝜑) ∧ 𝑥 = 𝐶) ↔ ((𝐶 ∈ 𝐴 ∧ 𝜑) ∧ 𝑥 = 𝐶))
9	5, 8	bitr3i 276	. . . . . . 7 ⊢ ((𝑥 ∈ 𝐴 ∧ (𝜑 ∧ 𝑥 = 𝐶)) ↔ ((𝐶 ∈ 𝐴 ∧ 𝜑) ∧ 𝑥 = 𝐶))
10	9	anbi2i 622	. . . . . 6 ⊢ ((𝑦 ∈ 𝐵 ∧ (𝑥 ∈ 𝐴 ∧ (𝜑 ∧ 𝑥 = 𝐶))) ↔ (𝑦 ∈ 𝐵 ∧ ((𝐶 ∈ 𝐴 ∧ 𝜑) ∧ 𝑥 = 𝐶)))
11	2, 4, 10	3bitr4ri 303	. . . . 5 ⊢ ((𝑦 ∈ 𝐵 ∧ (𝑥 ∈ 𝐴 ∧ (𝜑 ∧ 𝑥 = 𝐶))) ↔ (𝑦 ∈ {𝑦 ∈ 𝐵 ∣ (𝐶 ∈ 𝐴 ∧ 𝜑)} ∧ 𝑥 = 𝐶))
12	11	rexbii2 3175	. . . 4 ⊢ (∃𝑦 ∈ 𝐵 (𝑥 ∈ 𝐴 ∧ (𝜑 ∧ 𝑥 = 𝐶)) ↔ ∃𝑦 ∈ {𝑦 ∈ 𝐵 ∣ (𝐶 ∈ 𝐴 ∧ 𝜑)}𝑥 = 𝐶)
13		r19.42v 3276	. . . 4 ⊢ (∃𝑦 ∈ 𝐵 (𝑥 ∈ 𝐴 ∧ (𝜑 ∧ 𝑥 = 𝐶)) ↔ (𝑥 ∈ 𝐴 ∧ ∃𝑦 ∈ 𝐵 (𝜑 ∧ 𝑥 = 𝐶)))
14		nfrab1 3310	. . . . 5 ⊢ Ⅎ𝑦{𝑦 ∈ 𝐵 ∣ (𝐶 ∈ 𝐴 ∧ 𝜑)}
15		nfcv 2906	. . . . 5 ⊢ Ⅎ𝑧{𝑦 ∈ 𝐵 ∣ (𝐶 ∈ 𝐴 ∧ 𝜑)}
16		nfv 1918	. . . . 5 ⊢ Ⅎ𝑧 𝑥 = 𝐶
17		nfcsb1v 3853	. . . . . 6 ⊢ Ⅎ𝑦⦋𝑧 / 𝑦⦌𝐶
18	17	nfeq2 2923	. . . . 5 ⊢ Ⅎ𝑦 𝑥 = ⦋𝑧 / 𝑦⦌𝐶
19		csbeq1a 3842	. . . . . 6 ⊢ (𝑦 = 𝑧 → 𝐶 = ⦋𝑧 / 𝑦⦌𝐶)
20	19	eqeq2d 2749	. . . . 5 ⊢ (𝑦 = 𝑧 → (𝑥 = 𝐶 ↔ 𝑥 = ⦋𝑧 / 𝑦⦌𝐶))
21	14, 15, 16, 18, 20	cbvrexfw 3360	. . . 4 ⊢ (∃𝑦 ∈ {𝑦 ∈ 𝐵 ∣ (𝐶 ∈ 𝐴 ∧ 𝜑)}𝑥 = 𝐶 ↔ ∃𝑧 ∈ {𝑦 ∈ 𝐵 ∣ (𝐶 ∈ 𝐴 ∧ 𝜑)}𝑥 = ⦋𝑧 / 𝑦⦌𝐶)
22	12, 13, 21	3bitr3i 300	. . 3 ⊢ ((𝑥 ∈ 𝐴 ∧ ∃𝑦 ∈ 𝐵 (𝜑 ∧ 𝑥 = 𝐶)) ↔ ∃𝑧 ∈ {𝑦 ∈ 𝐵 ∣ (𝐶 ∈ 𝐴 ∧ 𝜑)}𝑥 = ⦋𝑧 / 𝑦⦌𝐶)
23	22	eubii 2585	. 2 ⊢ (∃!𝑥(𝑥 ∈ 𝐴 ∧ ∃𝑦 ∈ 𝐵 (𝜑 ∧ 𝑥 = 𝐶)) ↔ ∃!𝑥∃𝑧 ∈ {𝑦 ∈ 𝐵 ∣ (𝐶 ∈ 𝐴 ∧ 𝜑)}𝑥 = ⦋𝑧 / 𝑦⦌𝐶)
24		elex 3440	. . . . . . . 8 ⊢ (𝐶 ∈ 𝐴 → 𝐶 ∈ V)
25	24	ad2antrl 724	. . . . . . 7 ⊢ ((𝑦 ∈ 𝐵 ∧ (𝐶 ∈ 𝐴 ∧ 𝜑)) → 𝐶 ∈ V)
26	3, 25	sylbi 216	. . . . . 6 ⊢ (𝑦 ∈ {𝑦 ∈ 𝐵 ∣ (𝐶 ∈ 𝐴 ∧ 𝜑)} → 𝐶 ∈ V)
27	26	rgen 3073	. . . . 5 ⊢ ∀𝑦 ∈ {𝑦 ∈ 𝐵 ∣ (𝐶 ∈ 𝐴 ∧ 𝜑)}𝐶 ∈ V
28		nfv 1918	. . . . . 6 ⊢ Ⅎ𝑧 𝐶 ∈ V
29	17	nfel1 2922	. . . . . 6 ⊢ Ⅎ𝑦⦋𝑧 / 𝑦⦌𝐶 ∈ V
30	19	eleq1d 2823	. . . . . 6 ⊢ (𝑦 = 𝑧 → (𝐶 ∈ V ↔ ⦋𝑧 / 𝑦⦌𝐶 ∈ V))
31	14, 15, 28, 29, 30	cbvralfw 3358	. . . . 5 ⊢ (∀𝑦 ∈ {𝑦 ∈ 𝐵 ∣ (𝐶 ∈ 𝐴 ∧ 𝜑)}𝐶 ∈ V ↔ ∀𝑧 ∈ {𝑦 ∈ 𝐵 ∣ (𝐶 ∈ 𝐴 ∧ 𝜑)}⦋𝑧 / 𝑦⦌𝐶 ∈ V)
32	27, 31	mpbi 229	. . . 4 ⊢ ∀𝑧 ∈ {𝑦 ∈ 𝐵 ∣ (𝐶 ∈ 𝐴 ∧ 𝜑)}⦋𝑧 / 𝑦⦌𝐶 ∈ V
33		reusv2lem3 5318	. . . 4 ⊢ (∀𝑧 ∈ {𝑦 ∈ 𝐵 ∣ (𝐶 ∈ 𝐴 ∧ 𝜑)}⦋𝑧 / 𝑦⦌𝐶 ∈ V → (∃!𝑥∃𝑧 ∈ {𝑦 ∈ 𝐵 ∣ (𝐶 ∈ 𝐴 ∧ 𝜑)}𝑥 = ⦋𝑧 / 𝑦⦌𝐶 ↔ ∃!𝑥∀𝑧 ∈ {𝑦 ∈ 𝐵 ∣ (𝐶 ∈ 𝐴 ∧ 𝜑)}𝑥 = ⦋𝑧 / 𝑦⦌𝐶))
34	32, 33	ax-mp 5	. . 3 ⊢ (∃!𝑥∃𝑧 ∈ {𝑦 ∈ 𝐵 ∣ (𝐶 ∈ 𝐴 ∧ 𝜑)}𝑥 = ⦋𝑧 / 𝑦⦌𝐶 ↔ ∃!𝑥∀𝑧 ∈ {𝑦 ∈ 𝐵 ∣ (𝐶 ∈ 𝐴 ∧ 𝜑)}𝑥 = ⦋𝑧 / 𝑦⦌𝐶)
35		df-ral 3068	. . . . 5 ⊢ (∀𝑧 ∈ {𝑦 ∈ 𝐵 ∣ (𝐶 ∈ 𝐴 ∧ 𝜑)}𝑥 = ⦋𝑧 / 𝑦⦌𝐶 ↔ ∀𝑧(𝑧 ∈ {𝑦 ∈ 𝐵 ∣ (𝐶 ∈ 𝐴 ∧ 𝜑)} → 𝑥 = ⦋𝑧 / 𝑦⦌𝐶))
36		nfv 1918	. . . . . 6 ⊢ Ⅎ𝑧(𝑦 ∈ {𝑦 ∈ 𝐵 ∣ (𝐶 ∈ 𝐴 ∧ 𝜑)} → 𝑥 = 𝐶)
37	14	nfcri 2893	. . . . . . 7 ⊢ Ⅎ𝑦 𝑧 ∈ {𝑦 ∈ 𝐵 ∣ (𝐶 ∈ 𝐴 ∧ 𝜑)}
38	37, 18	nfim 1900	. . . . . 6 ⊢ Ⅎ𝑦(𝑧 ∈ {𝑦 ∈ 𝐵 ∣ (𝐶 ∈ 𝐴 ∧ 𝜑)} → 𝑥 = ⦋𝑧 / 𝑦⦌𝐶)
39		eleq1 2826	. . . . . . 7 ⊢ (𝑦 = 𝑧 → (𝑦 ∈ {𝑦 ∈ 𝐵 ∣ (𝐶 ∈ 𝐴 ∧ 𝜑)} ↔ 𝑧 ∈ {𝑦 ∈ 𝐵 ∣ (𝐶 ∈ 𝐴 ∧ 𝜑)}))
40	39, 20	imbi12d 344	. . . . . 6 ⊢ (𝑦 = 𝑧 → ((𝑦 ∈ {𝑦 ∈ 𝐵 ∣ (𝐶 ∈ 𝐴 ∧ 𝜑)} → 𝑥 = 𝐶) ↔ (𝑧 ∈ {𝑦 ∈ 𝐵 ∣ (𝐶 ∈ 𝐴 ∧ 𝜑)} → 𝑥 = ⦋𝑧 / 𝑦⦌𝐶)))
41	36, 38, 40	cbvalv1 2340	. . . . 5 ⊢ (∀𝑦(𝑦 ∈ {𝑦 ∈ 𝐵 ∣ (𝐶 ∈ 𝐴 ∧ 𝜑)} → 𝑥 = 𝐶) ↔ ∀𝑧(𝑧 ∈ {𝑦 ∈ 𝐵 ∣ (𝐶 ∈ 𝐴 ∧ 𝜑)} → 𝑥 = ⦋𝑧 / 𝑦⦌𝐶))
42	3	imbi1i 349	. . . . . . . 8 ⊢ ((𝑦 ∈ {𝑦 ∈ 𝐵 ∣ (𝐶 ∈ 𝐴 ∧ 𝜑)} → 𝑥 = 𝐶) ↔ ((𝑦 ∈ 𝐵 ∧ (𝐶 ∈ 𝐴 ∧ 𝜑)) → 𝑥 = 𝐶))
43		impexp 450	. . . . . . . 8 ⊢ (((𝑦 ∈ 𝐵 ∧ (𝐶 ∈ 𝐴 ∧ 𝜑)) → 𝑥 = 𝐶) ↔ (𝑦 ∈ 𝐵 → ((𝐶 ∈ 𝐴 ∧ 𝜑) → 𝑥 = 𝐶)))
44	42, 43	bitri 274	. . . . . . 7 ⊢ ((𝑦 ∈ {𝑦 ∈ 𝐵 ∣ (𝐶 ∈ 𝐴 ∧ 𝜑)} → 𝑥 = 𝐶) ↔ (𝑦 ∈ 𝐵 → ((𝐶 ∈ 𝐴 ∧ 𝜑) → 𝑥 = 𝐶)))
45	44	albii 1823	. . . . . 6 ⊢ (∀𝑦(𝑦 ∈ {𝑦 ∈ 𝐵 ∣ (𝐶 ∈ 𝐴 ∧ 𝜑)} → 𝑥 = 𝐶) ↔ ∀𝑦(𝑦 ∈ 𝐵 → ((𝐶 ∈ 𝐴 ∧ 𝜑) → 𝑥 = 𝐶)))
46		df-ral 3068	. . . . . 6 ⊢ (∀𝑦 ∈ 𝐵 ((𝐶 ∈ 𝐴 ∧ 𝜑) → 𝑥 = 𝐶) ↔ ∀𝑦(𝑦 ∈ 𝐵 → ((𝐶 ∈ 𝐴 ∧ 𝜑) → 𝑥 = 𝐶)))
47	45, 46	bitr4i 277	. . . . 5 ⊢ (∀𝑦(𝑦 ∈ {𝑦 ∈ 𝐵 ∣ (𝐶 ∈ 𝐴 ∧ 𝜑)} → 𝑥 = 𝐶) ↔ ∀𝑦 ∈ 𝐵 ((𝐶 ∈ 𝐴 ∧ 𝜑) → 𝑥 = 𝐶))
48	35, 41, 47	3bitr2i 298	. . . 4 ⊢ (∀𝑧 ∈ {𝑦 ∈ 𝐵 ∣ (𝐶 ∈ 𝐴 ∧ 𝜑)}𝑥 = ⦋𝑧 / 𝑦⦌𝐶 ↔ ∀𝑦 ∈ 𝐵 ((𝐶 ∈ 𝐴 ∧ 𝜑) → 𝑥 = 𝐶))
49	48	eubii 2585	. . 3 ⊢ (∃!𝑥∀𝑧 ∈ {𝑦 ∈ 𝐵 ∣ (𝐶 ∈ 𝐴 ∧ 𝜑)}𝑥 = ⦋𝑧 / 𝑦⦌𝐶 ↔ ∃!𝑥∀𝑦 ∈ 𝐵 ((𝐶 ∈ 𝐴 ∧ 𝜑) → 𝑥 = 𝐶))
50	34, 49	bitri 274	. 2 ⊢ (∃!𝑥∃𝑧 ∈ {𝑦 ∈ 𝐵 ∣ (𝐶 ∈ 𝐴 ∧ 𝜑)}𝑥 = ⦋𝑧 / 𝑦⦌𝐶 ↔ ∃!𝑥∀𝑦 ∈ 𝐵 ((𝐶 ∈ 𝐴 ∧ 𝜑) → 𝑥 = 𝐶))
51	1, 23, 50	3bitri 296	1 ⊢ (∃!𝑥 ∈ 𝐴 ∃𝑦 ∈ 𝐵 (𝜑 ∧ 𝑥 = 𝐶) ↔ ∃!𝑥∀𝑦 ∈ 𝐵 ((𝐶 ∈ 𝐴 ∧ 𝜑) → 𝑥 = 𝐶))

Syntax hints:   → wi 4   ↔ wb 205   ∧ wa 395  ∀wal 1537   = wceq 1539   ∈ wcel 2108  ∃!weu 2568  ∀wral 3063  ∃wrex 3064  ∃!wreu 3065  {crab 3067  Vcvv 3422  ⦋csb 3828

This theorem was proved from axioms:  ax-mp 5  ax-1 6  ax-2 7  ax-3 8  ax-gen 1799  ax-4 1813  ax-5 1914  ax-6 1972  ax-7 2012  ax-8 2110  ax-9 2118  ax-10 2139  ax-11 2156  ax-12 2173  ax-ext 2709  ax-nul 5225  ax-pow 5283

This theorem depends on definitions:  df-bi 206  df-an 396  df-or 844  df-tru 1542  df-fal 1552  df-ex 1784  df-nf 1788  df-sb 2069  df-mo 2540  df-eu 2569  df-clab 2716  df-cleq 2730  df-clel 2817  df-nfc 2888  df-ne 2943  df-ral 3068  df-rex 3069  df-reu 3070  df-rab 3072  df-v 3424  df-sbc 3712  df-csb 3829  df-dif 3886  df-nul 4254

This theorem is referenced by:  reusv2lem5  5320