Theorem uniuni 4597

Description: Expression for double union that moves union into a class builder. (Contributed by FL, 28-May-2007.)

Assertion

Ref	Expression
uniuni	⊢ ∪ ∪ 𝐴 = ∪ {𝑥 ∣ ∃𝑦(𝑥 = ∪ 𝑦 ∧ 𝑦 ∈ 𝐴)}

Distinct variable group:   𝑥,𝐴,𝑦

Proof of Theorem uniuni

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

Step	Hyp	Ref	Expression
1		eluni 3938	. . . . . 6 ⊢ (𝑢 ∈ ∪ 𝐴 ↔ ∃𝑦(𝑢 ∈ 𝑦 ∧ 𝑦 ∈ 𝐴))
2	1	anbi2i 461	. . . . 5 ⊢ ((𝑧 ∈ 𝑢 ∧ 𝑢 ∈ ∪ 𝐴) ↔ (𝑧 ∈ 𝑢 ∧ ∃𝑦(𝑢 ∈ 𝑦 ∧ 𝑦 ∈ 𝐴)))
3	2	exbii 1658	. . . 4 ⊢ (∃𝑢(𝑧 ∈ 𝑢 ∧ 𝑢 ∈ ∪ 𝐴) ↔ ∃𝑢(𝑧 ∈ 𝑢 ∧ ∃𝑦(𝑢 ∈ 𝑦 ∧ 𝑦 ∈ 𝐴)))
4		19.42v 1962	. . . . . . 7 ⊢ (∃𝑦(𝑧 ∈ 𝑢 ∧ (𝑢 ∈ 𝑦 ∧ 𝑦 ∈ 𝐴)) ↔ (𝑧 ∈ 𝑢 ∧ ∃𝑦(𝑢 ∈ 𝑦 ∧ 𝑦 ∈ 𝐴)))
5	4	bicomi 132	. . . . . 6 ⊢ ((𝑧 ∈ 𝑢 ∧ ∃𝑦(𝑢 ∈ 𝑦 ∧ 𝑦 ∈ 𝐴)) ↔ ∃𝑦(𝑧 ∈ 𝑢 ∧ (𝑢 ∈ 𝑦 ∧ 𝑦 ∈ 𝐴)))
6	5	exbii 1658	. . . . 5 ⊢ (∃𝑢(𝑧 ∈ 𝑢 ∧ ∃𝑦(𝑢 ∈ 𝑦 ∧ 𝑦 ∈ 𝐴)) ↔ ∃𝑢∃𝑦(𝑧 ∈ 𝑢 ∧ (𝑢 ∈ 𝑦 ∧ 𝑦 ∈ 𝐴)))
7		excom 1716	. . . . . 6 ⊢ (∃𝑢∃𝑦(𝑧 ∈ 𝑢 ∧ (𝑢 ∈ 𝑦 ∧ 𝑦 ∈ 𝐴)) ↔ ∃𝑦∃𝑢(𝑧 ∈ 𝑢 ∧ (𝑢 ∈ 𝑦 ∧ 𝑦 ∈ 𝐴)))
8		anass 405	. . . . . . . 8 ⊢ (((𝑧 ∈ 𝑢 ∧ 𝑢 ∈ 𝑦) ∧ 𝑦 ∈ 𝐴) ↔ (𝑧 ∈ 𝑢 ∧ (𝑢 ∈ 𝑦 ∧ 𝑦 ∈ 𝐴)))
9		ancom 266	. . . . . . . 8 ⊢ (((𝑧 ∈ 𝑢 ∧ 𝑢 ∈ 𝑦) ∧ 𝑦 ∈ 𝐴) ↔ (𝑦 ∈ 𝐴 ∧ (𝑧 ∈ 𝑢 ∧ 𝑢 ∈ 𝑦)))
10	8, 9	bitr3i 186	. . . . . . 7 ⊢ ((𝑧 ∈ 𝑢 ∧ (𝑢 ∈ 𝑦 ∧ 𝑦 ∈ 𝐴)) ↔ (𝑦 ∈ 𝐴 ∧ (𝑧 ∈ 𝑢 ∧ 𝑢 ∈ 𝑦)))
11	10	2exbii 1659	. . . . . 6 ⊢ (∃𝑦∃𝑢(𝑧 ∈ 𝑢 ∧ (𝑢 ∈ 𝑦 ∧ 𝑦 ∈ 𝐴)) ↔ ∃𝑦∃𝑢(𝑦 ∈ 𝐴 ∧ (𝑧 ∈ 𝑢 ∧ 𝑢 ∈ 𝑦)))
12		exdistr 1965	. . . . . 6 ⊢ (∃𝑦∃𝑢(𝑦 ∈ 𝐴 ∧ (𝑧 ∈ 𝑢 ∧ 𝑢 ∈ 𝑦)) ↔ ∃𝑦(𝑦 ∈ 𝐴 ∧ ∃𝑢(𝑧 ∈ 𝑢 ∧ 𝑢 ∈ 𝑦)))
13	7, 11, 12	3bitri 206	. . . . 5 ⊢ (∃𝑢∃𝑦(𝑧 ∈ 𝑢 ∧ (𝑢 ∈ 𝑦 ∧ 𝑦 ∈ 𝐴)) ↔ ∃𝑦(𝑦 ∈ 𝐴 ∧ ∃𝑢(𝑧 ∈ 𝑢 ∧ 𝑢 ∈ 𝑦)))
14		eluni 3938	. . . . . . . 8 ⊢ (𝑧 ∈ ∪ 𝑦 ↔ ∃𝑢(𝑧 ∈ 𝑢 ∧ 𝑢 ∈ 𝑦))
15	14	bicomi 132	. . . . . . 7 ⊢ (∃𝑢(𝑧 ∈ 𝑢 ∧ 𝑢 ∈ 𝑦) ↔ 𝑧 ∈ ∪ 𝑦)
16	15	anbi2i 461	. . . . . 6 ⊢ ((𝑦 ∈ 𝐴 ∧ ∃𝑢(𝑧 ∈ 𝑢 ∧ 𝑢 ∈ 𝑦)) ↔ (𝑦 ∈ 𝐴 ∧ 𝑧 ∈ ∪ 𝑦))
17	16	exbii 1658	. . . . 5 ⊢ (∃𝑦(𝑦 ∈ 𝐴 ∧ ∃𝑢(𝑧 ∈ 𝑢 ∧ 𝑢 ∈ 𝑦)) ↔ ∃𝑦(𝑦 ∈ 𝐴 ∧ 𝑧 ∈ ∪ 𝑦))
18	6, 13, 17	3bitri 206	. . . 4 ⊢ (∃𝑢(𝑧 ∈ 𝑢 ∧ ∃𝑦(𝑢 ∈ 𝑦 ∧ 𝑦 ∈ 𝐴)) ↔ ∃𝑦(𝑦 ∈ 𝐴 ∧ 𝑧 ∈ ∪ 𝑦))
19		vex 2824	. . . . . . . . . . 11 ⊢ 𝑦 ∈ V
20	19	uniex 4583	. . . . . . . . . 10 ⊢ ∪ 𝑦 ∈ V
21		eleq2 2302	. . . . . . . . . 10 ⊢ (𝑣 = ∪ 𝑦 → (𝑧 ∈ 𝑣 ↔ 𝑧 ∈ ∪ 𝑦))
22	20, 21	ceqsexv 2861	. . . . . . . . 9 ⊢ (∃𝑣(𝑣 = ∪ 𝑦 ∧ 𝑧 ∈ 𝑣) ↔ 𝑧 ∈ ∪ 𝑦)
23		exancom 1661	. . . . . . . . 9 ⊢ (∃𝑣(𝑣 = ∪ 𝑦 ∧ 𝑧 ∈ 𝑣) ↔ ∃𝑣(𝑧 ∈ 𝑣 ∧ 𝑣 = ∪ 𝑦))
24	22, 23	bitr3i 186	. . . . . . . 8 ⊢ (𝑧 ∈ ∪ 𝑦 ↔ ∃𝑣(𝑧 ∈ 𝑣 ∧ 𝑣 = ∪ 𝑦))
25	24	anbi2i 461	. . . . . . 7 ⊢ ((𝑦 ∈ 𝐴 ∧ 𝑧 ∈ ∪ 𝑦) ↔ (𝑦 ∈ 𝐴 ∧ ∃𝑣(𝑧 ∈ 𝑣 ∧ 𝑣 = ∪ 𝑦)))
26		19.42v 1962	. . . . . . 7 ⊢ (∃𝑣(𝑦 ∈ 𝐴 ∧ (𝑧 ∈ 𝑣 ∧ 𝑣 = ∪ 𝑦)) ↔ (𝑦 ∈ 𝐴 ∧ ∃𝑣(𝑧 ∈ 𝑣 ∧ 𝑣 = ∪ 𝑦)))
27		ancom 266	. . . . . . . . 9 ⊢ ((𝑦 ∈ 𝐴 ∧ (𝑧 ∈ 𝑣 ∧ 𝑣 = ∪ 𝑦)) ↔ ((𝑧 ∈ 𝑣 ∧ 𝑣 = ∪ 𝑦) ∧ 𝑦 ∈ 𝐴))
28		anass 405	. . . . . . . . 9 ⊢ (((𝑧 ∈ 𝑣 ∧ 𝑣 = ∪ 𝑦) ∧ 𝑦 ∈ 𝐴) ↔ (𝑧 ∈ 𝑣 ∧ (𝑣 = ∪ 𝑦 ∧ 𝑦 ∈ 𝐴)))
29	27, 28	bitri 184	. . . . . . . 8 ⊢ ((𝑦 ∈ 𝐴 ∧ (𝑧 ∈ 𝑣 ∧ 𝑣 = ∪ 𝑦)) ↔ (𝑧 ∈ 𝑣 ∧ (𝑣 = ∪ 𝑦 ∧ 𝑦 ∈ 𝐴)))
30	29	exbii 1658	. . . . . . 7 ⊢ (∃𝑣(𝑦 ∈ 𝐴 ∧ (𝑧 ∈ 𝑣 ∧ 𝑣 = ∪ 𝑦)) ↔ ∃𝑣(𝑧 ∈ 𝑣 ∧ (𝑣 = ∪ 𝑦 ∧ 𝑦 ∈ 𝐴)))
31	25, 26, 30	3bitr2i 208	. . . . . 6 ⊢ ((𝑦 ∈ 𝐴 ∧ 𝑧 ∈ ∪ 𝑦) ↔ ∃𝑣(𝑧 ∈ 𝑣 ∧ (𝑣 = ∪ 𝑦 ∧ 𝑦 ∈ 𝐴)))
32	31	exbii 1658	. . . . 5 ⊢ (∃𝑦(𝑦 ∈ 𝐴 ∧ 𝑧 ∈ ∪ 𝑦) ↔ ∃𝑦∃𝑣(𝑧 ∈ 𝑣 ∧ (𝑣 = ∪ 𝑦 ∧ 𝑦 ∈ 𝐴)))
33		excom 1716	. . . . 5 ⊢ (∃𝑦∃𝑣(𝑧 ∈ 𝑣 ∧ (𝑣 = ∪ 𝑦 ∧ 𝑦 ∈ 𝐴)) ↔ ∃𝑣∃𝑦(𝑧 ∈ 𝑣 ∧ (𝑣 = ∪ 𝑦 ∧ 𝑦 ∈ 𝐴)))
34		exdistr 1965	. . . . . 6 ⊢ (∃𝑣∃𝑦(𝑧 ∈ 𝑣 ∧ (𝑣 = ∪ 𝑦 ∧ 𝑦 ∈ 𝐴)) ↔ ∃𝑣(𝑧 ∈ 𝑣 ∧ ∃𝑦(𝑣 = ∪ 𝑦 ∧ 𝑦 ∈ 𝐴)))
35		vex 2824	. . . . . . . . . 10 ⊢ 𝑣 ∈ V
36		eqeq1 2245	. . . . . . . . . . . 12 ⊢ (𝑥 = 𝑣 → (𝑥 = ∪ 𝑦 ↔ 𝑣 = ∪ 𝑦))
37	36	anbi1d 469	. . . . . . . . . . 11 ⊢ (𝑥 = 𝑣 → ((𝑥 = ∪ 𝑦 ∧ 𝑦 ∈ 𝐴) ↔ (𝑣 = ∪ 𝑦 ∧ 𝑦 ∈ 𝐴)))
38	37	exbidv 1878	. . . . . . . . . 10 ⊢ (𝑥 = 𝑣 → (∃𝑦(𝑥 = ∪ 𝑦 ∧ 𝑦 ∈ 𝐴) ↔ ∃𝑦(𝑣 = ∪ 𝑦 ∧ 𝑦 ∈ 𝐴)))
39	35, 38	elab 2970	. . . . . . . . 9 ⊢ (𝑣 ∈ {𝑥 ∣ ∃𝑦(𝑥 = ∪ 𝑦 ∧ 𝑦 ∈ 𝐴)} ↔ ∃𝑦(𝑣 = ∪ 𝑦 ∧ 𝑦 ∈ 𝐴))
40	39	bicomi 132	. . . . . . . 8 ⊢ (∃𝑦(𝑣 = ∪ 𝑦 ∧ 𝑦 ∈ 𝐴) ↔ 𝑣 ∈ {𝑥 ∣ ∃𝑦(𝑥 = ∪ 𝑦 ∧ 𝑦 ∈ 𝐴)})
41	40	anbi2i 461	. . . . . . 7 ⊢ ((𝑧 ∈ 𝑣 ∧ ∃𝑦(𝑣 = ∪ 𝑦 ∧ 𝑦 ∈ 𝐴)) ↔ (𝑧 ∈ 𝑣 ∧ 𝑣 ∈ {𝑥 ∣ ∃𝑦(𝑥 = ∪ 𝑦 ∧ 𝑦 ∈ 𝐴)}))
42	41	exbii 1658	. . . . . 6 ⊢ (∃𝑣(𝑧 ∈ 𝑣 ∧ ∃𝑦(𝑣 = ∪ 𝑦 ∧ 𝑦 ∈ 𝐴)) ↔ ∃𝑣(𝑧 ∈ 𝑣 ∧ 𝑣 ∈ {𝑥 ∣ ∃𝑦(𝑥 = ∪ 𝑦 ∧ 𝑦 ∈ 𝐴)}))
43	34, 42	bitri 184	. . . . 5 ⊢ (∃𝑣∃𝑦(𝑧 ∈ 𝑣 ∧ (𝑣 = ∪ 𝑦 ∧ 𝑦 ∈ 𝐴)) ↔ ∃𝑣(𝑧 ∈ 𝑣 ∧ 𝑣 ∈ {𝑥 ∣ ∃𝑦(𝑥 = ∪ 𝑦 ∧ 𝑦 ∈ 𝐴)}))
44	32, 33, 43	3bitri 206	. . . 4 ⊢ (∃𝑦(𝑦 ∈ 𝐴 ∧ 𝑧 ∈ ∪ 𝑦) ↔ ∃𝑣(𝑧 ∈ 𝑣 ∧ 𝑣 ∈ {𝑥 ∣ ∃𝑦(𝑥 = ∪ 𝑦 ∧ 𝑦 ∈ 𝐴)}))
45	3, 18, 44	3bitri 206	. . 3 ⊢ (∃𝑢(𝑧 ∈ 𝑢 ∧ 𝑢 ∈ ∪ 𝐴) ↔ ∃𝑣(𝑧 ∈ 𝑣 ∧ 𝑣 ∈ {𝑥 ∣ ∃𝑦(𝑥 = ∪ 𝑦 ∧ 𝑦 ∈ 𝐴)}))
46	45	abbii 2354	. 2 ⊢ {𝑧 ∣ ∃𝑢(𝑧 ∈ 𝑢 ∧ 𝑢 ∈ ∪ 𝐴)} = {𝑧 ∣ ∃𝑣(𝑧 ∈ 𝑣 ∧ 𝑣 ∈ {𝑥 ∣ ∃𝑦(𝑥 = ∪ 𝑦 ∧ 𝑦 ∈ 𝐴)})}
47		df-uni 3936	. 2 ⊢ ∪ ∪ 𝐴 = {𝑧 ∣ ∃𝑢(𝑧 ∈ 𝑢 ∧ 𝑢 ∈ ∪ 𝐴)}
48		df-uni 3936	. 2 ⊢ ∪ {𝑥 ∣ ∃𝑦(𝑥 = ∪ 𝑦 ∧ 𝑦 ∈ 𝐴)} = {𝑧 ∣ ∃𝑣(𝑧 ∈ 𝑣 ∧ 𝑣 ∈ {𝑥 ∣ ∃𝑦(𝑥 = ∪ 𝑦 ∧ 𝑦 ∈ 𝐴)})}
49	46, 47, 48	3eqtr4i 2269	1 ⊢ ∪ ∪ 𝐴 = ∪ {𝑥 ∣ ∃𝑦(𝑥 = ∪ 𝑦 ∧ 𝑦 ∈ 𝐴)}

This proof depends on syntax axioms:   ∧ wa 104   = wceq 1402  ∃wex 1545   ∈ wcel 2209  {cab 2224  ∪ cuni 3935

This proof depends on axioms:  ax-mp 5  ax-1 6  ax-2 7  ax-ia1 106  ax-ia2 107  ax-ia3 108  ax-io 721  ax-5 1500  ax-7 1501  ax-gen 1502  ax-ie1 1546  ax-ie2 1547  ax-8 1557  ax-10 1558  ax-11 1559  ax-i12 1560  ax-bndl 1562  ax-4 1563  ax-17 1579  ax-i9 1583  ax-ial 1587  ax-i5r 1588  ax-14 2212  ax-ext 2220  ax-sep 4249  ax-un 4578

This proof depends on definitions:  df-bi 117  df-tru 1405  df-nf 1514  df-sb 1816  df-clab 2225  df-cleq 2231  df-clel 2234  df-nfc 2381  df-rex 2534  df-v 2823  df-uni 3936

This theorem is used by: (None)