Theorem r1wunlim 10660

Description: The weak universes in the cumulative hierarchy are exactly the limit ordinals. (Contributed by Mario Carneiro, 2-Jan-2017.)

Assertion

Ref	Expression
r1wunlim	⊢ (𝐴 ∈ 𝑉 → ((𝑅1‘𝐴) ∈ WUni ↔ Lim 𝐴))

Proof of Theorem r1wunlim

Dummy variable 𝑥 is distinct from all other variables.

Step	Hyp	Ref	Expression
1		simpr 484	. . . . . . 7 ⊢ ((𝐴 ∈ 𝑉 ∧ (𝑅1‘𝐴) ∈ WUni) → (𝑅1‘𝐴) ∈ WUni)
2	1	wun0 10641	. . . . . 6 ⊢ ((𝐴 ∈ 𝑉 ∧ (𝑅1‘𝐴) ∈ WUni) → ∅ ∈ (𝑅1‘𝐴))
3		elfvdm 6874	. . . . . 6 ⊢ (∅ ∈ (𝑅1‘𝐴) → 𝐴 ∈ dom 𝑅1)
4	2, 3	syl 17	. . . . 5 ⊢ ((𝐴 ∈ 𝑉 ∧ (𝑅1‘𝐴) ∈ WUni) → 𝐴 ∈ dom 𝑅1)
5		r1fnon 9691	. . . . . 6 ⊢ 𝑅1 Fn On
6	5	fndmi 6602	. . . . 5 ⊢ dom 𝑅1 = On
7	4, 6	eleqtrdi 2846	. . . 4 ⊢ ((𝐴 ∈ 𝑉 ∧ (𝑅1‘𝐴) ∈ WUni) → 𝐴 ∈ On)
8		eloni 6333	. . . 4 ⊢ (𝐴 ∈ On → Ord 𝐴)
9	7, 8	syl 17	. . 3 ⊢ ((𝐴 ∈ 𝑉 ∧ (𝑅1‘𝐴) ∈ WUni) → Ord 𝐴)
10		n0i 4280	. . . . . 6 ⊢ (∅ ∈ (𝑅1‘𝐴) → ¬ (𝑅1‘𝐴) = ∅)
11	2, 10	syl 17	. . . . 5 ⊢ ((𝐴 ∈ 𝑉 ∧ (𝑅1‘𝐴) ∈ WUni) → ¬ (𝑅1‘𝐴) = ∅)
12		fveq2 6840	. . . . . 6 ⊢ (𝐴 = ∅ → (𝑅1‘𝐴) = (𝑅1‘∅))
13		r10 9692	. . . . . 6 ⊢ (𝑅1‘∅) = ∅
14	12, 13	eqtrdi 2787	. . . . 5 ⊢ (𝐴 = ∅ → (𝑅1‘𝐴) = ∅)
15	11, 14	nsyl 140	. . . 4 ⊢ ((𝐴 ∈ 𝑉 ∧ (𝑅1‘𝐴) ∈ WUni) → ¬ 𝐴 = ∅)
16		onsuc 7764	. . . . . . . 8 ⊢ (𝐴 ∈ On → suc 𝐴 ∈ On)
17	7, 16	syl 17	. . . . . . 7 ⊢ ((𝐴 ∈ 𝑉 ∧ (𝑅1‘𝐴) ∈ WUni) → suc 𝐴 ∈ On)
18		sucidg 6406	. . . . . . . 8 ⊢ (𝐴 ∈ On → 𝐴 ∈ suc 𝐴)
19	7, 18	syl 17	. . . . . . 7 ⊢ ((𝐴 ∈ 𝑉 ∧ (𝑅1‘𝐴) ∈ WUni) → 𝐴 ∈ suc 𝐴)
20		r1ord 9704	. . . . . . 7 ⊢ (suc 𝐴 ∈ On → (𝐴 ∈ suc 𝐴 → (𝑅1‘𝐴) ∈ (𝑅1‘suc 𝐴)))
21	17, 19, 20	sylc 65	. . . . . 6 ⊢ ((𝐴 ∈ 𝑉 ∧ (𝑅1‘𝐴) ∈ WUni) → (𝑅1‘𝐴) ∈ (𝑅1‘suc 𝐴))
22		r1elwf 9720	. . . . . 6 ⊢ ((𝑅1‘𝐴) ∈ (𝑅1‘suc 𝐴) → (𝑅1‘𝐴) ∈ ∪ (𝑅1 “ On))
23		wfelirr 9749	. . . . . 6 ⊢ ((𝑅1‘𝐴) ∈ ∪ (𝑅1 “ On) → ¬ (𝑅1‘𝐴) ∈ (𝑅1‘𝐴))
24	21, 22, 23	3syl 18	. . . . 5 ⊢ ((𝐴 ∈ 𝑉 ∧ (𝑅1‘𝐴) ∈ WUni) → ¬ (𝑅1‘𝐴) ∈ (𝑅1‘𝐴))
25		simprr 773	. . . . . . . . 9 ⊢ (((𝐴 ∈ 𝑉 ∧ (𝑅1‘𝐴) ∈ WUni) ∧ (𝑥 ∈ On ∧ 𝐴 = suc 𝑥)) → 𝐴 = suc 𝑥)
26	25	fveq2d 6844	. . . . . . . 8 ⊢ (((𝐴 ∈ 𝑉 ∧ (𝑅1‘𝐴) ∈ WUni) ∧ (𝑥 ∈ On ∧ 𝐴 = suc 𝑥)) → (𝑅1‘𝐴) = (𝑅1‘suc 𝑥))
27		r1suc 9694	. . . . . . . . 9 ⊢ (𝑥 ∈ On → (𝑅1‘suc 𝑥) = 𝒫 (𝑅1‘𝑥))
28	27	ad2antrl 729	. . . . . . . 8 ⊢ (((𝐴 ∈ 𝑉 ∧ (𝑅1‘𝐴) ∈ WUni) ∧ (𝑥 ∈ On ∧ 𝐴 = suc 𝑥)) → (𝑅1‘suc 𝑥) = 𝒫 (𝑅1‘𝑥))
29	26, 28	eqtrd 2771	. . . . . . 7 ⊢ (((𝐴 ∈ 𝑉 ∧ (𝑅1‘𝐴) ∈ WUni) ∧ (𝑥 ∈ On ∧ 𝐴 = suc 𝑥)) → (𝑅1‘𝐴) = 𝒫 (𝑅1‘𝑥))
30		simplr 769	. . . . . . . 8 ⊢ (((𝐴 ∈ 𝑉 ∧ (𝑅1‘𝐴) ∈ WUni) ∧ (𝑥 ∈ On ∧ 𝐴 = suc 𝑥)) → (𝑅1‘𝐴) ∈ WUni)
31	7	adantr 480	. . . . . . . . 9 ⊢ (((𝐴 ∈ 𝑉 ∧ (𝑅1‘𝐴) ∈ WUni) ∧ (𝑥 ∈ On ∧ 𝐴 = suc 𝑥)) → 𝐴 ∈ On)
32		sucidg 6406	. . . . . . . . . . 11 ⊢ (𝑥 ∈ On → 𝑥 ∈ suc 𝑥)
33	32	ad2antrl 729	. . . . . . . . . 10 ⊢ (((𝐴 ∈ 𝑉 ∧ (𝑅1‘𝐴) ∈ WUni) ∧ (𝑥 ∈ On ∧ 𝐴 = suc 𝑥)) → 𝑥 ∈ suc 𝑥)
34	33, 25	eleqtrrd 2839	. . . . . . . . 9 ⊢ (((𝐴 ∈ 𝑉 ∧ (𝑅1‘𝐴) ∈ WUni) ∧ (𝑥 ∈ On ∧ 𝐴 = suc 𝑥)) → 𝑥 ∈ 𝐴)
35		r1ord 9704	. . . . . . . . 9 ⊢ (𝐴 ∈ On → (𝑥 ∈ 𝐴 → (𝑅1‘𝑥) ∈ (𝑅1‘𝐴)))
36	31, 34, 35	sylc 65	. . . . . . . 8 ⊢ (((𝐴 ∈ 𝑉 ∧ (𝑅1‘𝐴) ∈ WUni) ∧ (𝑥 ∈ On ∧ 𝐴 = suc 𝑥)) → (𝑅1‘𝑥) ∈ (𝑅1‘𝐴))
37	30, 36	wunpw 10630	. . . . . . 7 ⊢ (((𝐴 ∈ 𝑉 ∧ (𝑅1‘𝐴) ∈ WUni) ∧ (𝑥 ∈ On ∧ 𝐴 = suc 𝑥)) → 𝒫 (𝑅1‘𝑥) ∈ (𝑅1‘𝐴))
38	29, 37	eqeltrd 2836	. . . . . 6 ⊢ (((𝐴 ∈ 𝑉 ∧ (𝑅1‘𝐴) ∈ WUni) ∧ (𝑥 ∈ On ∧ 𝐴 = suc 𝑥)) → (𝑅1‘𝐴) ∈ (𝑅1‘𝐴))
39	38	rexlimdvaa 3139	. . . . 5 ⊢ ((𝐴 ∈ 𝑉 ∧ (𝑅1‘𝐴) ∈ WUni) → (∃𝑥 ∈ On 𝐴 = suc 𝑥 → (𝑅1‘𝐴) ∈ (𝑅1‘𝐴)))
40	24, 39	mtod 198	. . . 4 ⊢ ((𝐴 ∈ 𝑉 ∧ (𝑅1‘𝐴) ∈ WUni) → ¬ ∃𝑥 ∈ On 𝐴 = suc 𝑥)
41		ioran 986	. . . 4 ⊢ (¬ (𝐴 = ∅ ∨ ∃𝑥 ∈ On 𝐴 = suc 𝑥) ↔ (¬ 𝐴 = ∅ ∧ ¬ ∃𝑥 ∈ On 𝐴 = suc 𝑥))
42	15, 40, 41	sylanbrc 584	. . 3 ⊢ ((𝐴 ∈ 𝑉 ∧ (𝑅1‘𝐴) ∈ WUni) → ¬ (𝐴 = ∅ ∨ ∃𝑥 ∈ On 𝐴 = suc 𝑥))
43		dflim3 7798	. . 3 ⊢ (Lim 𝐴 ↔ (Ord 𝐴 ∧ ¬ (𝐴 = ∅ ∨ ∃𝑥 ∈ On 𝐴 = suc 𝑥)))
44	9, 42, 43	sylanbrc 584	. 2 ⊢ ((𝐴 ∈ 𝑉 ∧ (𝑅1‘𝐴) ∈ WUni) → Lim 𝐴)
45		r1limwun 10659	. 2 ⊢ ((𝐴 ∈ 𝑉 ∧ Lim 𝐴) → (𝑅1‘𝐴) ∈ WUni)
46	44, 45	impbida 801	1 ⊢ (𝐴 ∈ 𝑉 → ((𝑅1‘𝐴) ∈ WUni ↔ Lim 𝐴))

Syntax hints:  ¬ wn 3   → wi 4   ↔ wb 206   ∧ wa 395   ∨ wo 848   = wceq 1542   ∈ wcel 2114  ∃wrex 3061  ∅c0 4273  𝒫 cpw 4541  ∪ cuni 4850  dom cdm 5631   “ cima 5634  Ord word 6322  Oncon0 6323  Lim wlim 6324  suc csuc 6325  ‘cfv 6498  𝑅₁cr1 9686  WUnicwun 10623

This theorem was proved from axioms:  ax-mp 5  ax-1 6  ax-2 7  ax-3 8  ax-gen 1797  ax-4 1811  ax-5 1912  ax-6 1969  ax-7 2010  ax-8 2116  ax-9 2124  ax-10 2147  ax-11 2163  ax-12 2185  ax-ext 2708  ax-rep 5212  ax-sep 5231  ax-nul 5241  ax-pow 5307  ax-pr 5375  ax-un 7689  ax-reg 9507  ax-inf2 9562

This theorem depends on definitions:  df-bi 207  df-an 396  df-or 849  df-3or 1088  df-3an 1089  df-tru 1545  df-fal 1555  df-ex 1782  df-nf 1786  df-sb 2069  df-mo 2539  df-eu 2569  df-clab 2715  df-cleq 2728  df-clel 2811  df-nfc 2885  df-ne 2933  df-ral 3052  df-rex 3062  df-reu 3343  df-rab 3390  df-v 3431  df-sbc 3729  df-csb 3838  df-dif 3892  df-un 3894  df-in 3896  df-ss 3906  df-pss 3909  df-nul 4274  df-if 4467  df-pw 4543  df-sn 4568  df-pr 4570  df-op 4574  df-uni 4851  df-int 4890  df-iun 4935  df-br 5086  df-opab 5148  df-mpt 5167  df-tr 5193  df-id 5526  df-eprel 5531  df-po 5539  df-so 5540  df-fr 5584  df-we 5586  df-xp 5637  df-rel 5638  df-cnv 5639  df-co 5640  df-dm 5641  df-rn 5642  df-res 5643  df-ima 5644  df-pred 6265  df-ord 6326  df-on 6327  df-lim 6328  df-suc 6329  df-iota 6454  df-fun 6500  df-fn 6501  df-f 6502  df-f1 6503  df-fo 6504  df-f1o 6505  df-fv 6506  df-ov 7370  df-om 7818  df-2nd 7943  df-frecs 8231  df-wrecs 8262  df-recs 8311  df-rdg 8349  df-r1 9688  df-rank 9689  df-wun 10625

This theorem is referenced by: (None)