Metamath Proof Explorer


Theorem r1sdom

Description: Each stage in the cumulative hierarchy is strictly larger than the last. (Contributed by Mario Carneiro, 19-Apr-2013)

Ref Expression
Assertion r1sdom A On B A R1 B R1 A

Proof

Step Hyp Ref Expression
1 eleq2 x = B x B
2 fveq2 x = R1 x = R1
3 2 breq2d x = R1 B R1 x R1 B R1
4 1 3 imbi12d x = B x R1 B R1 x B R1 B R1
5 eleq2 x = y B x B y
6 fveq2 x = y R1 x = R1 y
7 6 breq2d x = y R1 B R1 x R1 B R1 y
8 5 7 imbi12d x = y B x R1 B R1 x B y R1 B R1 y
9 eleq2 x = suc y B x B suc y
10 fveq2 x = suc y R1 x = R1 suc y
11 10 breq2d x = suc y R1 B R1 x R1 B R1 suc y
12 9 11 imbi12d x = suc y B x R1 B R1 x B suc y R1 B R1 suc y
13 eleq2 x = A B x B A
14 fveq2 x = A R1 x = R1 A
15 14 breq2d x = A R1 B R1 x R1 B R1 A
16 13 15 imbi12d x = A B x R1 B R1 x B A R1 B R1 A
17 noel ¬ B
18 17 pm2.21i B R1 B R1
19 elsuci B suc y B y B = y
20 sdomtr R1 B R1 y R1 y R1 suc y R1 B R1 suc y
21 20 expcom R1 y R1 suc y R1 B R1 y R1 B R1 suc y
22 fvex R1 y V
23 22 canth2 R1 y 𝒫 R1 y
24 r1suc y On R1 suc y = 𝒫 R1 y
25 23 24 breqtrrid y On R1 y R1 suc y
26 21 25 syl11 R1 B R1 y y On R1 B R1 suc y
27 26 imim2i B y R1 B R1 y B y y On R1 B R1 suc y
28 fveq2 B = y R1 B = R1 y
29 28 breq1d B = y R1 B R1 suc y R1 y R1 suc y
30 25 29 syl5ibr B = y y On R1 B R1 suc y
31 30 a1i B y R1 B R1 y B = y y On R1 B R1 suc y
32 27 31 jaod B y R1 B R1 y B y B = y y On R1 B R1 suc y
33 19 32 syl5 B y R1 B R1 y B suc y y On R1 B R1 suc y
34 33 com3r y On B y R1 B R1 y B suc y R1 B R1 suc y
35 limuni Lim x x = x
36 35 eleq2d Lim x B x B x
37 eluni2 B x y x B y
38 36 37 bitrdi Lim x B x y x B y
39 r19.29 y x B y R1 B R1 y y x B y y x B y R1 B R1 y B y
40 fvex R1 x V
41 ssiun2 y x R1 y y x R1 y
42 vex x V
43 r1lim x V Lim x R1 x = y x R1 y
44 42 43 mpan Lim x R1 x = y x R1 y
45 44 sseq2d Lim x R1 y R1 x R1 y y x R1 y
46 41 45 syl5ibr Lim x y x R1 y R1 x
47 ssdomg R1 x V R1 y R1 x R1 y R1 x
48 40 46 47 mpsylsyld Lim x y x R1 y R1 x
49 id B y R1 B R1 y B y R1 B R1 y
50 49 imp B y R1 B R1 y B y R1 B R1 y
51 sdomdomtr R1 B R1 y R1 y R1 x R1 B R1 x
52 51 expcom R1 y R1 x R1 B R1 y R1 B R1 x
53 50 52 syl5 R1 y R1 x B y R1 B R1 y B y R1 B R1 x
54 48 53 syl6 Lim x y x B y R1 B R1 y B y R1 B R1 x
55 54 rexlimdv Lim x y x B y R1 B R1 y B y R1 B R1 x
56 39 55 syl5 Lim x y x B y R1 B R1 y y x B y R1 B R1 x
57 56 expcomd Lim x y x B y y x B y R1 B R1 y R1 B R1 x
58 38 57 sylbid Lim x B x y x B y R1 B R1 y R1 B R1 x
59 58 com23 Lim x y x B y R1 B R1 y B x R1 B R1 x
60 4 8 12 16 18 34 59 tfinds A On B A R1 B R1 A
61 60 imp A On B A R1 B R1 A