HomeHome Metamath Proof Explorer < Previous   Next >
Related theorems
Unicode version

Theorem alephordi 3679
Description: Strict ordering property of the aleph function.
Assertion
Ref Expression
alephordi |- (B e. On -> (A e. B -> (aleph` A) ~< (aleph` B)))

Proof of Theorem alephordi
StepHypRef Expression
1 eleq2 1150 . . 3 |- (x = (/) -> (A e. x <-> A e. (/)))
2 fveq2 2832 . . . 4 |- (x = (/) -> (aleph` x) = (aleph` (/)))
32breq2d 2072 . . 3 |- (x = (/) -> ((aleph` A) ~< (aleph` x) <-> (aleph` A) ~< (aleph` (/))))
41, 3imbi12d 474 . 2 |- (x = (/) -> ((A e. x -> (aleph` A) ~< (aleph` x)) <-> (A e. (/) -> (aleph` A) ~< (aleph` (/)))))
5 eleq2 1150 . . 3 |- (x = y -> (A e. x <-> A e. y))
6 fveq2 2832 . . . 4 |- (x = y -> (aleph` x) = (aleph` y))
76breq2d 2072 . . 3 |- (x = y -> ((aleph` A) ~< (aleph` x) <-> (aleph` A) ~< (aleph` y)))
85, 7imbi12d 474 . 2 |- (x = y -> ((A e. x -> (aleph` A) ~< (aleph` x)) <-> (A e. y -> (aleph` A) ~< (aleph` y))))
9 eleq2 1150 . . 3 |- (x = suc y -> (A e. x <-> A e. suc y))
10 fveq2 2832 . . . 4 |- (x = suc y -> (aleph` x) = (aleph` suc y))
1110breq2d 2072 . . 3 |- (x = suc y -> ((aleph` A) ~< (aleph` x) <-> (aleph` A) ~< (aleph` suc y)))
129, 11imbi12d 474 . 2 |- (x = suc y -> ((A e. x -> (aleph` A) ~< (aleph` x)) <-> (A e. suc y -> (aleph` A) ~< (aleph` suc y))))
13 eleq2 1150 . . 3 |- (x = B -> (A e. x <-> A e. B))
14 fveq2 2832 . . . 4 |- (x = B -> (aleph` x) = (aleph` B))
1514breq2d 2072 . . 3 |- (x = B -> ((aleph` A) ~< (aleph` x) <-> (aleph` A) ~< (aleph` B)))
1613, 15imbi12d 474 . 2 |- (x = B -> ((A e. x -> (aleph` A) ~< (aleph` x)) <-> (A e. B -> (aleph` A) ~< (aleph` B))))
17 noel 1711 . . 3 |- -. A e. (/)
1817pm2.21i 73 . 2 |- (A e. (/) -> (aleph` A) ~< (aleph` (/)))
19 sdomtr 3373 . . . . . . . . . 10 |- (((aleph` A) ~< (aleph` y) /\ (aleph` y) ~< (aleph` suc y)) -> (aleph` A) ~< (aleph` suc y))
20 alephordlem1 3677 . . . . . . . . . 10 |- (y e. On -> (aleph` y) ~< (aleph` suc y))
2119, 20sylan2 346 . . . . . . . . 9 |- (((aleph` A) ~< (aleph` y) /\ y e. On) -> (aleph` A) ~< (aleph` suc y))
2221exp 291 . . . . . . . 8 |- ((aleph` A) ~< (aleph` y) -> (y e. On -> (aleph` A) ~< (aleph` suc y)))
2322com12 13 . . . . . . 7 |- (y e. On -> ((aleph` A) ~< (aleph` y) -> (aleph` A) ~< (aleph` suc y)))
2423syl3d 26 . . . . . 6 |- (y e. On -> ((A e. y -> (aleph` A) ~< (aleph` y)) -> (A e. y -> (aleph` A) ~< (aleph` suc y))))
2524com23 32 . . . . 5 |- (y e. On -> (A e. y -> ((A e. y -> (aleph` A) ~< (aleph` y)) -> (aleph` A) ~< (aleph` suc y))))
26 fveq2 2832 . . . . . . . . 9 |- (A = y -> (aleph` A) = (aleph` y))
2726breq1d 2071 . . . . . . . 8 |- (A = y -> ((aleph` A) ~< (aleph` suc y) <-> (aleph` y) ~< (aleph` suc y)))
2827, 20syl5bir 184 . . . . . . 7 |- (A = y -> (y e. On -> (aleph` A) ~< (aleph` suc y)))
2928a1d 14 . . . . . 6 |- (A = y -> ((A e. y -> (aleph` A) ~< (aleph` y)) -> (y e. On -> (aleph` A) ~< (aleph` suc y))))
3029com3r 35 . . . . 5 |- (y e. On -> (A = y -> ((A e. y -> (aleph` A) ~< (aleph` y)) -> (aleph` A) ~< (aleph` suc y))))
3125, 30jaod 329 . . . 4 |- (y e. On -> ((A e. y \/ A = y) -> ((A e. y -> (aleph` A) ~< (aleph` y)) -> (aleph` A) ~< (aleph` suc y))))
32 visset 1350 . . . . 5 |- y e. V
3332elsuc2 2293 . . . 4 |- (A e. suc y <-> (A e. y \/ A = y))
3431, 33syl5ib 181 . . 3 |- (y e. On -> (A e. suc y -> ((A e. y -> (aleph` A) ~< (aleph` y)) -> (aleph` A) ~< (aleph` suc y))))
3534com23 32 . 2 |- (y e. On -> ((A e. y -> (aleph` A) ~< (aleph` y)) -> (A e. suc y -> (aleph` A) ~< (aleph` suc y))))
36 visset 1350 . . . . . . . . 9 |- x e. V
37 alephlim 3670 . . . . . . . . 9 |- ((x e. V /\ Lim x) -> (aleph` x) = U.y e. x (aleph` y))
3836, 37mpan 518 . . . . . . . 8 |- (Lim x -> (aleph` x) = U.y e. x (aleph` y))
3938sseq2d 1528 . . . . . . 7 |- (Lim x -> ((aleph` A) (_ (aleph` x) <-> (aleph` A) (_ U.y e. x (aleph` y)))
40 fveq2 2832 . . . . . . . 8 |- (y = A -> (aleph` y) = (aleph` A))
4140ssiun2s 2020 . . . . . . 7 |- (A e. x -> (aleph` A) (_ U.y e. x (aleph` y))
4239, 41syl5bir 184 . . . . . 6 |- (Lim x -> (A e. x -> (aleph` A) (_ (aleph` x)))
43 alephon 3671 . . . . . . 7 |- (aleph` A) e. On
44 ssdomg 3311 . . . . . . 7 |- ((aleph` A) e. On -> ((aleph` A) (_ (aleph` x) -> (aleph` A) ~<_ (aleph` x)))
4543, 44ax-mp 6 . . . . . 6 |- ((aleph` A) (_ (aleph` x) -> (aleph` A) ~<_ (aleph` x))
4642, 45syl6 23 . . . . 5 |- (Lim x -> (A e. x -> (aleph` A) ~<_ (aleph` x)))
47 limsuc 2361 . . . . . . . . . 10 |- (Lim x -> (A e. x <-> suc A e. x))
48 alephordlem2 3678 . . . . . . . . . . 11 |- ((x e. V /\ Lim x) -> (suc A e. x -> (aleph` suc A) ~<_ (aleph` x)))
4936, 48mpan 518 . . . . . . . . . 10 |- (Lim x -> (suc A e. x -> (aleph` suc A) ~<_ (aleph` x)))
5047, 49sylbid 178 . . . . . . . . 9 |- (Lim x -> (A e. x -> (aleph` suc A) ~<_ (aleph` x)))
5150imp 277 . . . . . . . 8 |- ((Lim x /\ A e. x) -> (aleph` suc A) ~<_ (aleph` x))
52 domnsym 3365 . . . . . . . 8 |- ((aleph` suc A) ~<_ (aleph` x) -> -. (aleph` x) ~< (aleph` suc A))
5351, 52syl 12 . . . . . . 7 |- ((Lim x /\ A e. x) -> -. (aleph` x) ~< (aleph` suc A))
54 onelon 2223 . . . . . . . . 9 |- ((x e. On /\ A e. x) -> A e. On)
55 limelon 2286 . . . . . . . . . 10 |- ((x e. V /\ Lim x) -> x e. On)
5636, 55mpan 518 . . . . . . . . 9 |- (Lim x -> x e. On)
5754, 56sylan 343 . . . . . . . 8 |- ((Lim x /\ A e. x) -> A e. On)
58 fvex 2838 . . . . . . . . . . . 12 |- (aleph` x) e. V
5958ensym 3317 . . . . . . . . . . 11 |- ((aleph` A) ~~ (aleph` x) -> (aleph` x) ~~ (aleph` A))
60 ensdomtr 3372 . . . . . . . . . . . 12 |- (((aleph` x) ~~ (aleph` A) /\ (aleph` A) ~< (aleph` suc A)) -> (aleph` x) ~< (aleph` suc A))
6160exp 291 . . . . . . . . . . 11 |- ((aleph` x) ~~ (aleph` A) -> ((aleph` A) ~< (aleph` suc A) -> (aleph` x) ~< (aleph` suc A)))
6259, 61syl 12 . . . . . . . . . 10 |- ((aleph` A) ~~ (aleph` x) -> ((aleph` A) ~< (aleph` suc A) -> (aleph` x) ~< (aleph` suc A)))
63 alephordlem1 3677 . . . . . . . . . 10 |- (A e. On -> (aleph` A) ~< (aleph` suc A))
6462, 63syl5 22 . . . . . . . . 9 |- ((aleph` A) ~~ (aleph` x) -> (A e. On -> (aleph` x) ~< (aleph` suc A)))
6564com12 13 . . . . . . . 8 |- (A e. On -> ((aleph` A) ~~ (aleph` x) -> (aleph` x) ~< (aleph` suc A)))
6657, 65syl 12 . . . . . . 7 |- ((Lim x /\ A e. x) -> ((aleph` A) ~~ (aleph` x) -> (aleph` x) ~< (aleph` suc A)))
6753, 66mtod 95 . . . . . 6 |- ((Lim x /\ A e. x) -> -. (aleph` A) ~~ (aleph` x))
6867exp 291 . . . . 5 |- (Lim x -> (A e. x -> -. (aleph` A) ~~ (aleph` x)))
6946, 68jcad 455 . . . 4 |- (Lim x -> (A e. x -> ((aleph` A) ~<_ (aleph` x) /\ -. (aleph` A) ~~ (aleph` x))))
70 brsdom 3286 . . . 4 |- ((aleph` A) ~< (aleph` x) <-> ((aleph` A) ~<_ (aleph` x) /\ -. (aleph` A) ~~ (aleph` x)))
7169, 70syl6ibr 186 . . 3 |- (Lim x -> (A e. x -> (aleph` A) ~< (aleph` x)))
7271a1d 14 . 2 |- (Lim x -> (A.y e. x (A e. y -> (