Theorem rankr1c 9437

Description: A relationship between the rank function and the cumulative hierarchy of sets function 𝑅₁. Proposition 9.15(2) of [TakeutiZaring] p. 79. (Contributed by Mario Carneiro, 22-Mar-2013.) (Revised by Mario Carneiro, 17-Nov-2014.)

Assertion

Ref	Expression
rankr1c	⊢ (𝐴 ∈ ∪ (𝑅1 “ On) → (𝐵 = (rank‘𝐴) ↔ (¬ 𝐴 ∈ (𝑅1‘𝐵) ∧ 𝐴 ∈ (𝑅1‘suc 𝐵))))

Proof of Theorem rankr1c

Step	Hyp	Ref	Expression
1		id 22	. . . 4 ⊢ (𝐵 = (rank‘𝐴) → 𝐵 = (rank‘𝐴))
2		rankdmr1 9417	. . . 4 ⊢ (rank‘𝐴) ∈ dom 𝑅1
3	1, 2	eqeltrdi 2846	. . 3 ⊢ (𝐵 = (rank‘𝐴) → 𝐵 ∈ dom 𝑅1)
4	3	a1i 11	. 2 ⊢ (𝐴 ∈ ∪ (𝑅1 “ On) → (𝐵 = (rank‘𝐴) → 𝐵 ∈ dom 𝑅1))
5		elfvdm 6749	. . . . 5 ⊢ (𝐴 ∈ (𝑅1‘suc 𝐵) → suc 𝐵 ∈ dom 𝑅1)
6		r1funlim 9382	. . . . . . 7 ⊢ (Fun 𝑅1 ∧ Lim dom 𝑅1)
7	6	simpri 489	. . . . . 6 ⊢ Lim dom 𝑅1
8		limsuc 7628	. . . . . 6 ⊢ (Lim dom 𝑅1 → (𝐵 ∈ dom 𝑅1 ↔ suc 𝐵 ∈ dom 𝑅1))
9	7, 8	ax-mp 5	. . . . 5 ⊢ (𝐵 ∈ dom 𝑅1 ↔ suc 𝐵 ∈ dom 𝑅1)
10	5, 9	sylibr 237	. . . 4 ⊢ (𝐴 ∈ (𝑅1‘suc 𝐵) → 𝐵 ∈ dom 𝑅1)
11	10	adantl 485	. . 3 ⊢ ((¬ 𝐴 ∈ (𝑅1‘𝐵) ∧ 𝐴 ∈ (𝑅1‘suc 𝐵)) → 𝐵 ∈ dom 𝑅1)
12	11	a1i 11	. 2 ⊢ (𝐴 ∈ ∪ (𝑅1 “ On) → ((¬ 𝐴 ∈ (𝑅1‘𝐵) ∧ 𝐴 ∈ (𝑅1‘suc 𝐵)) → 𝐵 ∈ dom 𝑅1))
13		eqss 3916	. . . 4 ⊢ (𝐵 = (rank‘𝐴) ↔ (𝐵 ⊆ (rank‘𝐴) ∧ (rank‘𝐴) ⊆ 𝐵))
14		rankr1clem 9436	. . . . 5 ⊢ ((𝐴 ∈ ∪ (𝑅1 “ On) ∧ 𝐵 ∈ dom 𝑅1) → (¬ 𝐴 ∈ (𝑅1‘𝐵) ↔ 𝐵 ⊆ (rank‘𝐴)))
15		rankr1ag 9418	. . . . . . 7 ⊢ ((𝐴 ∈ ∪ (𝑅1 “ On) ∧ suc 𝐵 ∈ dom 𝑅1) → (𝐴 ∈ (𝑅1‘suc 𝐵) ↔ (rank‘𝐴) ∈ suc 𝐵))
16	9, 15	sylan2b 597	. . . . . 6 ⊢ ((𝐴 ∈ ∪ (𝑅1 “ On) ∧ 𝐵 ∈ dom 𝑅1) → (𝐴 ∈ (𝑅1‘suc 𝐵) ↔ (rank‘𝐴) ∈ suc 𝐵))
17		rankon 9411	. . . . . . 7 ⊢ (rank‘𝐴) ∈ On
18		limord 6272	. . . . . . . . . 10 ⊢ (Lim dom 𝑅1 → Ord dom 𝑅1)
19	7, 18	ax-mp 5	. . . . . . . . 9 ⊢ Ord dom 𝑅1
20		ordelon 6237	. . . . . . . . 9 ⊢ ((Ord dom 𝑅1 ∧ 𝐵 ∈ dom 𝑅1) → 𝐵 ∈ On)
21	19, 20	mpan 690	. . . . . . . 8 ⊢ (𝐵 ∈ dom 𝑅1 → 𝐵 ∈ On)
22	21	adantl 485	. . . . . . 7 ⊢ ((𝐴 ∈ ∪ (𝑅1 “ On) ∧ 𝐵 ∈ dom 𝑅1) → 𝐵 ∈ On)
23		onsssuc 6300	. . . . . . 7 ⊢ (((rank‘𝐴) ∈ On ∧ 𝐵 ∈ On) → ((rank‘𝐴) ⊆ 𝐵 ↔ (rank‘𝐴) ∈ suc 𝐵))
24	17, 22, 23	sylancr 590	. . . . . 6 ⊢ ((𝐴 ∈ ∪ (𝑅1 “ On) ∧ 𝐵 ∈ dom 𝑅1) → ((rank‘𝐴) ⊆ 𝐵 ↔ (rank‘𝐴) ∈ suc 𝐵))
25	16, 24	bitr4d 285	. . . . 5 ⊢ ((𝐴 ∈ ∪ (𝑅1 “ On) ∧ 𝐵 ∈ dom 𝑅1) → (𝐴 ∈ (𝑅1‘suc 𝐵) ↔ (rank‘𝐴) ⊆ 𝐵))
26	14, 25	anbi12d 634	. . . 4 ⊢ ((𝐴 ∈ ∪ (𝑅1 “ On) ∧ 𝐵 ∈ dom 𝑅1) → ((¬ 𝐴 ∈ (𝑅1‘𝐵) ∧ 𝐴 ∈ (𝑅1‘suc 𝐵)) ↔ (𝐵 ⊆ (rank‘𝐴) ∧ (rank‘𝐴) ⊆ 𝐵)))
27	13, 26	bitr4id 293	. . 3 ⊢ ((𝐴 ∈ ∪ (𝑅1 “ On) ∧ 𝐵 ∈ dom 𝑅1) → (𝐵 = (rank‘𝐴) ↔ (¬ 𝐴 ∈ (𝑅1‘𝐵) ∧ 𝐴 ∈ (𝑅1‘suc 𝐵))))
28	27	ex 416	. 2 ⊢ (𝐴 ∈ ∪ (𝑅1 “ On) → (𝐵 ∈ dom 𝑅1 → (𝐵 = (rank‘𝐴) ↔ (¬ 𝐴 ∈ (𝑅1‘𝐵) ∧ 𝐴 ∈ (𝑅1‘suc 𝐵)))))
29	4, 12, 28	pm5.21ndd 384	1 ⊢ (𝐴 ∈ ∪ (𝑅1 “ On) → (𝐵 = (rank‘𝐴) ↔ (¬ 𝐴 ∈ (𝑅1‘𝐵) ∧ 𝐴 ∈ (𝑅1‘suc 𝐵))))

Syntax hints:  ¬ wn 3   → wi 4   ↔ wb 209   ∧ wa 399   = wceq 1543   ∈ wcel 2110   ⊆ wss 3866  ∪ cuni 4819  dom cdm 5551   “ cima 5554  Ord word 6212  Oncon0 6213  Lim wlim 6214  suc csuc 6215  Fun wfun 6374  ‘cfv 6380  𝑅₁cr1 9378  rankcrnk 9379

This theorem was proved from axioms:  ax-mp 5  ax-1 6  ax-2 7  ax-3 8  ax-gen 1803  ax-4 1817  ax-5 1918  ax-6 1976  ax-7 2016  ax-8 2112  ax-9 2120  ax-10 2141  ax-11 2158  ax-12 2175  ax-ext 2708  ax-sep 5192  ax-nul 5199  ax-pow 5258  ax-pr 5322  ax-un 7523

This theorem depends on definitions:  df-bi 210  df-an 400  df-or 848  df-3or 1090  df-3an 1091  df-tru 1546  df-fal 1556  df-ex 1788  df-nf 1792  df-sb 2071  df-mo 2539  df-eu 2568  df-clab 2715  df-cleq 2729  df-clel 2816  df-nfc 2886  df-ne 2941  df-ral 3066  df-rex 3067  df-reu 3068  df-rab 3070  df-v 3410  df-sbc 3695  df-csb 3812  df-dif 3869  df-un 3871  df-in 3873  df-ss 3883  df-pss 3885  df-nul 4238  df-if 4440  df-pw 4515  df-sn 4542  df-pr 4544  df-tp 4546  df-op 4548  df-uni 4820  df-int 4860  df-iun 4906  df-br 5054  df-opab 5116  df-mpt 5136  df-tr 5162  df-id 5455  df-eprel 5460  df-po 5468  df-so 5469  df-fr 5509  df-we 5511  df-xp 5557  df-rel 5558  df-cnv 5559  df-co 5560  df-dm 5561  df-rn 5562  df-res 5563  df-ima 5564  df-pred 6160  df-ord 6216  df-on 6217  df-lim 6218  df-suc 6219  df-iota 6338  df-fun 6382  df-fn 6383  df-f 6384  df-f1 6385  df-fo 6386  df-f1o 6387  df-fv 6388  df-om 7645  df-wrecs 8047  df-recs 8108  df-rdg 8146  df-r1 9380  df-rank 9381

This theorem is referenced by:  rankidn  9438  rankpwi  9439  rankr1g  9448  r1tskina  10396