Theorem r1wunlim 10690

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 10671	. . . . . 6 ⊢ ((𝐴 ∈ 𝑉 ∧ (𝑅1‘𝐴) ∈ WUni) → ∅ ∈ (𝑅1‘𝐴))
3		elfvdm 6895	. . . . . 6 ⊢ (∅ ∈ (𝑅1‘𝐴) → 𝐴 ∈ dom 𝑅1)
4	2, 3	syl 17	. . . . 5 ⊢ ((𝐴 ∈ 𝑉 ∧ (𝑅1‘𝐴) ∈ WUni) → 𝐴 ∈ dom 𝑅1)
5		r1fnon 9720	. . . . . 6 ⊢ 𝑅1 Fn On
6	5	fndmi 6622	. . . . 5 ⊢ dom 𝑅1 = On
7	4, 6	eleqtrdi 2838	. . . 4 ⊢ ((𝐴 ∈ 𝑉 ∧ (𝑅1‘𝐴) ∈ WUni) → 𝐴 ∈ On)
8		eloni 6342	. . . 4 ⊢ (𝐴 ∈ On → Ord 𝐴)
9	7, 8	syl 17	. . 3 ⊢ ((𝐴 ∈ 𝑉 ∧ (𝑅1‘𝐴) ∈ WUni) → Ord 𝐴)
10		n0i 4303	. . . . . 6 ⊢ (∅ ∈ (𝑅1‘𝐴) → ¬ (𝑅1‘𝐴) = ∅)
11	2, 10	syl 17	. . . . 5 ⊢ ((𝐴 ∈ 𝑉 ∧ (𝑅1‘𝐴) ∈ WUni) → ¬ (𝑅1‘𝐴) = ∅)
12		fveq2 6858	. . . . . 6 ⊢ (𝐴 = ∅ → (𝑅1‘𝐴) = (𝑅1‘∅))
13		r10 9721	. . . . . 6 ⊢ (𝑅1‘∅) = ∅
14	12, 13	eqtrdi 2780	. . . . 5 ⊢ (𝐴 = ∅ → (𝑅1‘𝐴) = ∅)
15	11, 14	nsyl 140	. . . 4 ⊢ ((𝐴 ∈ 𝑉 ∧ (𝑅1‘𝐴) ∈ WUni) → ¬ 𝐴 = ∅)
16		onsuc 7787	. . . . . . . 8 ⊢ (𝐴 ∈ On → suc 𝐴 ∈ On)
17	7, 16	syl 17	. . . . . . 7 ⊢ ((𝐴 ∈ 𝑉 ∧ (𝑅1‘𝐴) ∈ WUni) → suc 𝐴 ∈ On)
18		sucidg 6415	. . . . . . . 8 ⊢ (𝐴 ∈ On → 𝐴 ∈ suc 𝐴)
19	7, 18	syl 17	. . . . . . 7 ⊢ ((𝐴 ∈ 𝑉 ∧ (𝑅1‘𝐴) ∈ WUni) → 𝐴 ∈ suc 𝐴)
20		r1ord 9733	. . . . . . 7 ⊢ (suc 𝐴 ∈ On → (𝐴 ∈ suc 𝐴 → (𝑅1‘𝐴) ∈ (𝑅1‘suc 𝐴)))
21	17, 19, 20	sylc 65	. . . . . 6 ⊢ ((𝐴 ∈ 𝑉 ∧ (𝑅1‘𝐴) ∈ WUni) → (𝑅1‘𝐴) ∈ (𝑅1‘suc 𝐴))
22		r1elwf 9749	. . . . . 6 ⊢ ((𝑅1‘𝐴) ∈ (𝑅1‘suc 𝐴) → (𝑅1‘𝐴) ∈ ∪ (𝑅1 “ On))
23		wfelirr 9778	. . . . . 6 ⊢ ((𝑅1‘𝐴) ∈ ∪ (𝑅1 “ On) → ¬ (𝑅1‘𝐴) ∈ (𝑅1‘𝐴))
24	21, 22, 23	3syl 18	. . . . 5 ⊢ ((𝐴 ∈ 𝑉 ∧ (𝑅1‘𝐴) ∈ WUni) → ¬ (𝑅1‘𝐴) ∈ (𝑅1‘𝐴))
25		simprr 772	. . . . . . . . 9 ⊢ (((𝐴 ∈ 𝑉 ∧ (𝑅1‘𝐴) ∈ WUni) ∧ (𝑥 ∈ On ∧ 𝐴 = suc 𝑥)) → 𝐴 = suc 𝑥)
26	25	fveq2d 6862	. . . . . . . 8 ⊢ (((𝐴 ∈ 𝑉 ∧ (𝑅1‘𝐴) ∈ WUni) ∧ (𝑥 ∈ On ∧ 𝐴 = suc 𝑥)) → (𝑅1‘𝐴) = (𝑅1‘suc 𝑥))
27		r1suc 9723	. . . . . . . . 9 ⊢ (𝑥 ∈ On → (𝑅1‘suc 𝑥) = 𝒫 (𝑅1‘𝑥))
28	27	ad2antrl 728	. . . . . . . 8 ⊢ (((𝐴 ∈ 𝑉 ∧ (𝑅1‘𝐴) ∈ WUni) ∧ (𝑥 ∈ On ∧ 𝐴 = suc 𝑥)) → (𝑅1‘suc 𝑥) = 𝒫 (𝑅1‘𝑥))
29	26, 28	eqtrd 2764	. . . . . . 7 ⊢ (((𝐴 ∈ 𝑉 ∧ (𝑅1‘𝐴) ∈ WUni) ∧ (𝑥 ∈ On ∧ 𝐴 = suc 𝑥)) → (𝑅1‘𝐴) = 𝒫 (𝑅1‘𝑥))
30		simplr 768	. . . . . . . 8 ⊢ (((𝐴 ∈ 𝑉 ∧ (𝑅1‘𝐴) ∈ WUni) ∧ (𝑥 ∈ On ∧ 𝐴 = suc 𝑥)) → (𝑅1‘𝐴) ∈ WUni)
31	7	adantr 480	. . . . . . . . 9 ⊢ (((𝐴 ∈ 𝑉 ∧ (𝑅1‘𝐴) ∈ WUni) ∧ (𝑥 ∈ On ∧ 𝐴 = suc 𝑥)) → 𝐴 ∈ On)
32		sucidg 6415	. . . . . . . . . . 11 ⊢ (𝑥 ∈ On → 𝑥 ∈ suc 𝑥)
33	32	ad2antrl 728	. . . . . . . . . 10 ⊢ (((𝐴 ∈ 𝑉 ∧ (𝑅1‘𝐴) ∈ WUni) ∧ (𝑥 ∈ On ∧ 𝐴 = suc 𝑥)) → 𝑥 ∈ suc 𝑥)
34	33, 25	eleqtrrd 2831	. . . . . . . . 9 ⊢ (((𝐴 ∈ 𝑉 ∧ (𝑅1‘𝐴) ∈ WUni) ∧ (𝑥 ∈ On ∧ 𝐴 = suc 𝑥)) → 𝑥 ∈ 𝐴)
35		r1ord 9733	. . . . . . . . 9 ⊢ (𝐴 ∈ On → (𝑥 ∈ 𝐴 → (𝑅1‘𝑥) ∈ (𝑅1‘𝐴)))
36	31, 34, 35	sylc 65	. . . . . . . 8 ⊢ (((𝐴 ∈ 𝑉 ∧ (𝑅1‘𝐴) ∈ WUni) ∧ (𝑥 ∈ On ∧ 𝐴 = suc 𝑥)) → (𝑅1‘𝑥) ∈ (𝑅1‘𝐴))
37	30, 36	wunpw 10660	. . . . . . 7 ⊢ (((𝐴 ∈ 𝑉 ∧ (𝑅1‘𝐴) ∈ WUni) ∧ (𝑥 ∈ On ∧ 𝐴 = suc 𝑥)) → 𝒫 (𝑅1‘𝑥) ∈ (𝑅1‘𝐴))
38	29, 37	eqeltrd 2828	. . . . . 6 ⊢ (((𝐴 ∈ 𝑉 ∧ (𝑅1‘𝐴) ∈ WUni) ∧ (𝑥 ∈ On ∧ 𝐴 = suc 𝑥)) → (𝑅1‘𝐴) ∈ (𝑅1‘𝐴))
39	38	rexlimdvaa 3135	. . . . 5 ⊢ ((𝐴 ∈ 𝑉 ∧ (𝑅1‘𝐴) ∈ WUni) → (∃𝑥 ∈ On 𝐴 = suc 𝑥 → (𝑅1‘𝐴) ∈ (𝑅1‘𝐴)))
40	24, 39	mtod 198	. . . 4 ⊢ ((𝐴 ∈ 𝑉 ∧ (𝑅1‘𝐴) ∈ WUni) → ¬ ∃𝑥 ∈ On 𝐴 = suc 𝑥)
41		ioran 985	. . . 4 ⊢ (¬ (𝐴 = ∅ ∨ ∃𝑥 ∈ On 𝐴 = suc 𝑥) ↔ (¬ 𝐴 = ∅ ∧ ¬ ∃𝑥 ∈ On 𝐴 = suc 𝑥))
42	15, 40, 41	sylanbrc 583	. . 3 ⊢ ((𝐴 ∈ 𝑉 ∧ (𝑅1‘𝐴) ∈ WUni) → ¬ (𝐴 = ∅ ∨ ∃𝑥 ∈ On 𝐴 = suc 𝑥))
43		dflim3 7823	. . 3 ⊢ (Lim 𝐴 ↔ (Ord 𝐴 ∧ ¬ (𝐴 = ∅ ∨ ∃𝑥 ∈ On 𝐴 = suc 𝑥)))
44	9, 42, 43	sylanbrc 583	. 2 ⊢ ((𝐴 ∈ 𝑉 ∧ (𝑅1‘𝐴) ∈ WUni) → Lim 𝐴)
45		r1limwun 10689	. 2 ⊢ ((𝐴 ∈ 𝑉 ∧ Lim 𝐴) → (𝑅1‘𝐴) ∈ WUni)
46	44, 45	impbida 800	1 ⊢ (𝐴 ∈ 𝑉 → ((𝑅1‘𝐴) ∈ WUni ↔ Lim 𝐴))

Syntax hints:  ¬ wn 3   → wi 4   ↔ wb 206   ∧ wa 395   ∨ wo 847   = wceq 1540   ∈ wcel 2109  ∃wrex 3053  ∅c0 4296  𝒫 cpw 4563  ∪ cuni 4871  dom cdm 5638   “ cima 5641  Ord word 6331  Oncon0 6332  Lim wlim 6333  suc csuc 6334  ‘cfv 6511  𝑅₁cr1 9715  WUnicwun 10653

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 5234  ax-sep 5251  ax-nul 5261  ax-pow 5320  ax-pr 5387  ax-un 7711  ax-reg 9545  ax-inf2 9594

This theorem depends on definitions:  df-bi 207  df-an 396  df-or 848  df-3or 1087  df-3an 1088  df-tru 1543  df-fal 1553  df-ex 1780  df-nf 1784  df-sb 2066  df-mo 2533  df-eu 2562  df-clab 2708  df-cleq 2721  df-clel 2803  df-nfc 2878  df-ne 2926  df-ral 3045  df-rex 3054  df-reu 3355  df-rab 3406  df-v 3449  df-sbc 3754  df-csb 3863  df-dif 3917  df-un 3919  df-in 3921  df-ss 3931  df-pss 3934  df-nul 4297  df-if 4489  df-pw 4565  df-sn 4590  df-pr 4592  df-op 4596  df-uni 4872  df-int 4911  df-iun 4957  df-br 5108  df-opab 5170  df-mpt 5189  df-tr 5215  df-id 5533  df-eprel 5538  df-po 5546  df-so 5547  df-fr 5591  df-we 5593  df-xp 5644  df-rel 5645  df-cnv 5646  df-co 5647  df-dm 5648  df-rn 5649  df-res 5650  df-ima 5651  df-pred 6274  df-ord 6335  df-on 6336  df-lim 6337  df-suc 6338  df-iota 6464  df-fun 6513  df-fn 6514  df-f 6515  df-f1 6516  df-fo 6517  df-f1o 6518  df-fv 6519  df-ov 7390  df-om 7843  df-2nd 7969  df-frecs 8260  df-wrecs 8291  df-recs 8340  df-rdg 8378  df-r1 9717  df-rank 9718  df-wun 10655

This theorem is referenced by: (None)