Theorem itunitc 9843

Description: The union of all union iterates creates the transitive closure; compare trcl 9170. (Contributed by Stefan O'Rear, 11-Feb-2015.)

Hypothesis

Ref	Expression
ituni.u	⊢ 𝑈 = (𝑥 ∈ V ↦ (rec((𝑦 ∈ V ↦ ∪ 𝑦), 𝑥) ↾ ω))

Assertion

Ref	Expression
itunitc	⊢ (TC‘𝐴) = ∪ ran (𝑈‘𝐴)

Distinct variable group:   𝑥,𝐴,𝑦

Allowed substitution hints:   𝑈(𝑥,𝑦)

Proof of Theorem itunitc

Dummy variables 𝑎 𝑏 𝑐 are mutually distinct and distinct from all other variables.

Step	Hyp	Ref	Expression
1		fveq2 6670	. . . 4 ⊢ (𝑎 = 𝐴 → (TC‘𝑎) = (TC‘𝐴))
2		fveq2 6670	. . . . . 6 ⊢ (𝑎 = 𝐴 → (𝑈‘𝑎) = (𝑈‘𝐴))
3	2	rneqd 5808	. . . . 5 ⊢ (𝑎 = 𝐴 → ran (𝑈‘𝑎) = ran (𝑈‘𝐴))
4	3	unieqd 4852	. . . 4 ⊢ (𝑎 = 𝐴 → ∪ ran (𝑈‘𝑎) = ∪ ran (𝑈‘𝐴))
5	1, 4	eqeq12d 2837	. . 3 ⊢ (𝑎 = 𝐴 → ((TC‘𝑎) = ∪ ran (𝑈‘𝑎) ↔ (TC‘𝐴) = ∪ ran (𝑈‘𝐴)))
6		ituni.u	. . . . . . . 8 ⊢ 𝑈 = (𝑥 ∈ V ↦ (rec((𝑦 ∈ V ↦ ∪ 𝑦), 𝑥) ↾ ω))
7	6	ituni0 9840	. . . . . . 7 ⊢ (𝑎 ∈ V → ((𝑈‘𝑎)‘∅) = 𝑎)
8	7	elv 3499	. . . . . 6 ⊢ ((𝑈‘𝑎)‘∅) = 𝑎
9		fvssunirn 6699	. . . . . 6 ⊢ ((𝑈‘𝑎)‘∅) ⊆ ∪ ran (𝑈‘𝑎)
10	8, 9	eqsstrri 4002	. . . . 5 ⊢ 𝑎 ⊆ ∪ ran (𝑈‘𝑎)
11		dftr3 5176	. . . . . 6 ⊢ (Tr ∪ ran (𝑈‘𝑎) ↔ ∀𝑏 ∈ ∪ ran (𝑈‘𝑎)𝑏 ⊆ ∪ ran (𝑈‘𝑎))
12		vex 3497	. . . . . . . 8 ⊢ 𝑎 ∈ V
13	6	itunifn 9839	. . . . . . . 8 ⊢ (𝑎 ∈ V → (𝑈‘𝑎) Fn ω)
14		fnunirn 7012	. . . . . . . 8 ⊢ ((𝑈‘𝑎) Fn ω → (𝑏 ∈ ∪ ran (𝑈‘𝑎) ↔ ∃𝑐 ∈ ω 𝑏 ∈ ((𝑈‘𝑎)‘𝑐)))
15	12, 13, 14	mp2b 10	. . . . . . 7 ⊢ (𝑏 ∈ ∪ ran (𝑈‘𝑎) ↔ ∃𝑐 ∈ ω 𝑏 ∈ ((𝑈‘𝑎)‘𝑐))
16		elssuni 4868	. . . . . . . . 9 ⊢ (𝑏 ∈ ((𝑈‘𝑎)‘𝑐) → 𝑏 ⊆ ∪ ((𝑈‘𝑎)‘𝑐))
17	6	itunisuc 9841	. . . . . . . . . 10 ⊢ ((𝑈‘𝑎)‘suc 𝑐) = ∪ ((𝑈‘𝑎)‘𝑐)
18		fvssunirn 6699	. . . . . . . . . 10 ⊢ ((𝑈‘𝑎)‘suc 𝑐) ⊆ ∪ ran (𝑈‘𝑎)
19	17, 18	eqsstrri 4002	. . . . . . . . 9 ⊢ ∪ ((𝑈‘𝑎)‘𝑐) ⊆ ∪ ran (𝑈‘𝑎)
20	16, 19	sstrdi 3979	. . . . . . . 8 ⊢ (𝑏 ∈ ((𝑈‘𝑎)‘𝑐) → 𝑏 ⊆ ∪ ran (𝑈‘𝑎))
21	20	rexlimivw 3282	. . . . . . 7 ⊢ (∃𝑐 ∈ ω 𝑏 ∈ ((𝑈‘𝑎)‘𝑐) → 𝑏 ⊆ ∪ ran (𝑈‘𝑎))
22	15, 21	sylbi 219	. . . . . 6 ⊢ (𝑏 ∈ ∪ ran (𝑈‘𝑎) → 𝑏 ⊆ ∪ ran (𝑈‘𝑎))
23	11, 22	mprgbir 3153	. . . . 5 ⊢ Tr ∪ ran (𝑈‘𝑎)
24		tcmin 9183	. . . . . 6 ⊢ (𝑎 ∈ V → ((𝑎 ⊆ ∪ ran (𝑈‘𝑎) ∧ Tr ∪ ran (𝑈‘𝑎)) → (TC‘𝑎) ⊆ ∪ ran (𝑈‘𝑎)))
25	24	elv 3499	. . . . 5 ⊢ ((𝑎 ⊆ ∪ ran (𝑈‘𝑎) ∧ Tr ∪ ran (𝑈‘𝑎)) → (TC‘𝑎) ⊆ ∪ ran (𝑈‘𝑎))
26	10, 23, 25	mp2an 690	. . . 4 ⊢ (TC‘𝑎) ⊆ ∪ ran (𝑈‘𝑎)
27		unissb 4870	. . . . 5 ⊢ (∪ ran (𝑈‘𝑎) ⊆ (TC‘𝑎) ↔ ∀𝑏 ∈ ran (𝑈‘𝑎)𝑏 ⊆ (TC‘𝑎))
28		fvelrnb 6726	. . . . . . 7 ⊢ ((𝑈‘𝑎) Fn ω → (𝑏 ∈ ran (𝑈‘𝑎) ↔ ∃𝑐 ∈ ω ((𝑈‘𝑎)‘𝑐) = 𝑏))
29	12, 13, 28	mp2b 10	. . . . . 6 ⊢ (𝑏 ∈ ran (𝑈‘𝑎) ↔ ∃𝑐 ∈ ω ((𝑈‘𝑎)‘𝑐) = 𝑏)
30	6	itunitc1 9842	. . . . . . . . 9 ⊢ ((𝑈‘𝑎)‘𝑐) ⊆ (TC‘𝑎)
31	30	a1i 11	. . . . . . . 8 ⊢ (𝑐 ∈ ω → ((𝑈‘𝑎)‘𝑐) ⊆ (TC‘𝑎))
32		sseq1 3992	. . . . . . . 8 ⊢ (((𝑈‘𝑎)‘𝑐) = 𝑏 → (((𝑈‘𝑎)‘𝑐) ⊆ (TC‘𝑎) ↔ 𝑏 ⊆ (TC‘𝑎)))
33	31, 32	syl5ibcom 247	. . . . . . 7 ⊢ (𝑐 ∈ ω → (((𝑈‘𝑎)‘𝑐) = 𝑏 → 𝑏 ⊆ (TC‘𝑎)))
34	33	rexlimiv 3280	. . . . . 6 ⊢ (∃𝑐 ∈ ω ((𝑈‘𝑎)‘𝑐) = 𝑏 → 𝑏 ⊆ (TC‘𝑎))
35	29, 34	sylbi 219	. . . . 5 ⊢ (𝑏 ∈ ran (𝑈‘𝑎) → 𝑏 ⊆ (TC‘𝑎))
36	27, 35	mprgbir 3153	. . . 4 ⊢ ∪ ran (𝑈‘𝑎) ⊆ (TC‘𝑎)
37	26, 36	eqssi 3983	. . 3 ⊢ (TC‘𝑎) = ∪ ran (𝑈‘𝑎)
38	5, 37	vtoclg 3567	. 2 ⊢ (𝐴 ∈ V → (TC‘𝐴) = ∪ ran (𝑈‘𝐴))
39		rn0 5796	. . . . 5 ⊢ ran ∅ = ∅
40	39	unieqi 4851	. . . 4 ⊢ ∪ ran ∅ = ∪ ∅
41		uni0 4866	. . . 4 ⊢ ∪ ∅ = ∅
42	40, 41	eqtr2i 2845	. . 3 ⊢ ∅ = ∪ ran ∅
43		fvprc 6663	. . 3 ⊢ (¬ 𝐴 ∈ V → (TC‘𝐴) = ∅)
44		fvprc 6663	. . . . 5 ⊢ (¬ 𝐴 ∈ V → (𝑈‘𝐴) = ∅)
45	44	rneqd 5808	. . . 4 ⊢ (¬ 𝐴 ∈ V → ran (𝑈‘𝐴) = ran ∅)
46	45	unieqd 4852	. . 3 ⊢ (¬ 𝐴 ∈ V → ∪ ran (𝑈‘𝐴) = ∪ ran ∅)
47	42, 43, 46	3eqtr4a 2882	. 2 ⊢ (¬ 𝐴 ∈ V → (TC‘𝐴) = ∪ ran (𝑈‘𝐴))
48	38, 47	pm2.61i 184	1 ⊢ (TC‘𝐴) = ∪ ran (𝑈‘𝐴)

Syntax hints:  ¬ wn 3   → wi 4   ↔ wb 208   ∧ wa 398   = wceq 1537   ∈ wcel 2114  ∃wrex 3139  Vcvv 3494   ⊆ wss 3936  ∅c0 4291  ∪ cuni 4838   ↦ cmpt 5146  Tr wtr 5172  ran crn 5556   ↾ cres 5557  suc csuc 6193   Fn wfn 6350  ‘cfv 6355  ωcom 7580  reccrdg 8045  TCctc 9178

This theorem was proved from axioms:  ax-mp 5  ax-1 6  ax-2 7  ax-3 8  ax-gen 1796  ax-4 1810  ax-5 1911  ax-6 1970  ax-7 2015  ax-8 2116  ax-9 2124  ax-10 2145  ax-11 2161  ax-12 2177  ax-ext 2793  ax-rep 5190  ax-sep 5203  ax-nul 5210  ax-pow 5266  ax-pr 5330  ax-un 7461  ax-inf2 9104

This theorem depends on definitions:  df-bi 209  df-an 399  df-or 844  df-3or 1084  df-3an 1085  df-tru 1540  df-ex 1781  df-nf 1785  df-sb 2070  df-mo 2622  df-eu 2654  df-clab 2800  df-cleq 2814  df-clel 2893  df-nfc 2963  df-ne 3017  df-ral 3143  df-rex 3144  df-reu 3145  df-rab 3147  df-v 3496  df-sbc 3773  df-csb 3884  df-dif 3939  df-un 3941  df-in 3943  df-ss 3952  df-pss 3954  df-nul 4292  df-if 4468  df-pw 4541  df-sn 4568  df-pr 4570  df-tp 4572  df-op 4574  df-uni 4839  df-int 4877  df-iun 4921  df-iin 4922  df-br 5067  df-opab 5129  df-mpt 5147  df-tr 5173  df-id 5460  df-eprel 5465  df-po 5474  df-so 5475  df-fr 5514  df-we 5516  df-xp 5561  df-rel 5562  df-cnv 5563  df-co 5564  df-dm 5565  df-rn 5566  df-res 5567  df-ima 5568  df-pred 6148  df-ord 6194  df-on 6195  df-lim 6196  df-suc 6197  df-iota 6314  df-fun 6357  df-fn 6358  df-f 6359  df-f1 6360  df-fo 6361  df-f1o 6362  df-fv 6363  df-om 7581  df-wrecs 7947  df-recs 8008  df-rdg 8046  df-tc 9179

This theorem is referenced by:  hsmexlem5  9852