| Step | Hyp | Ref
| Expression |
| 1 | | ral0 4452 |
. . 3
⊢
∀𝑥𝑅 ∈ ∅ 𝐵 <s 𝑥𝑅 |
| 2 | 1 | a1i 11 |
. 2
⊢ ((𝐴 ∈ Ons ∧
𝐵 ∈ ( M ‘( bday ‘𝐴))) → ∀𝑥𝑅 ∈ ∅ 𝐵 <s 𝑥𝑅) |
| 3 | | leftssold 27871 |
. . . . . . 7
⊢ ( L
‘𝐵) ⊆ ( O
‘( bday ‘𝐵)) |
| 4 | | bdayon 27752 |
. . . . . . . 8
⊢ ( bday ‘𝐴) ∈ On |
| 5 | | madebdayim 27888 |
. . . . . . . . 9
⊢ (𝐵 ∈ ( M ‘( bday ‘𝐴)) → ( bday
‘𝐵) ⊆
( bday ‘𝐴)) |
| 6 | 5 | adantl 481 |
. . . . . . . 8
⊢ ((𝐴 ∈ Ons ∧
𝐵 ∈ ( M ‘( bday ‘𝐴))) → ( bday
‘𝐵) ⊆
( bday ‘𝐴)) |
| 7 | | oldss 27870 |
. . . . . . . 8
⊢ ((( bday ‘𝐴) ∈ On ∧ (
bday ‘𝐵)
⊆ ( bday ‘𝐴)) → ( O ‘(
bday ‘𝐵))
⊆ ( O ‘( bday ‘𝐴))) |
| 8 | 4, 6, 7 | sylancr 588 |
. . . . . . 7
⊢ ((𝐴 ∈ Ons ∧
𝐵 ∈ ( M ‘( bday ‘𝐴))) → ( O ‘( bday ‘𝐵)) ⊆ ( O ‘( bday ‘𝐴))) |
| 9 | 3, 8 | sstrid 3946 |
. . . . . 6
⊢ ((𝐴 ∈ Ons ∧
𝐵 ∈ ( M ‘( bday ‘𝐴))) → ( L ‘𝐵) ⊆ ( O ‘(
bday ‘𝐴))) |
| 10 | | onleft 28260 |
. . . . . . 7
⊢ (𝐴 ∈ Ons → (
O ‘( bday ‘𝐴)) = ( L ‘𝐴)) |
| 11 | 10 | adantr 480 |
. . . . . 6
⊢ ((𝐴 ∈ Ons ∧
𝐵 ∈ ( M ‘( bday ‘𝐴))) → ( O ‘( bday ‘𝐴)) = ( L ‘𝐴)) |
| 12 | 9, 11 | sseqtrd 3971 |
. . . . 5
⊢ ((𝐴 ∈ Ons ∧
𝐵 ∈ ( M ‘( bday ‘𝐴))) → ( L ‘𝐵) ⊆ ( L ‘𝐴)) |
| 13 | 12 | sselda 3934 |
. . . 4
⊢ (((𝐴 ∈ Ons ∧
𝐵 ∈ ( M ‘( bday ‘𝐴))) ∧ 𝑦𝐿 ∈ ( L ‘𝐵)) → 𝑦𝐿 ∈ ( L ‘𝐴)) |
| 14 | | leftlt 27853 |
. . . 4
⊢ (𝑦𝐿 ∈ ( L
‘𝐴) → 𝑦𝐿 <s 𝐴) |
| 15 | 13, 14 | syl 17 |
. . 3
⊢ (((𝐴 ∈ Ons ∧
𝐵 ∈ ( M ‘( bday ‘𝐴))) ∧ 𝑦𝐿 ∈ ( L ‘𝐵)) → 𝑦𝐿 <s 𝐴) |
| 16 | 15 | ralrimiva 3129 |
. 2
⊢ ((𝐴 ∈ Ons ∧
𝐵 ∈ ( M ‘( bday ‘𝐴))) → ∀𝑦𝐿 ∈ ( L ‘𝐵)𝑦𝐿 <s 𝐴) |
| 17 | | lltr 27862 |
. . . 4
⊢ ( L
‘𝐵) <<s ( R
‘𝐵) |
| 18 | 17 | a1i 11 |
. . 3
⊢ ((𝐴 ∈ Ons ∧
𝐵 ∈ ( M ‘( bday ‘𝐴))) → ( L ‘𝐵) <<s ( R ‘𝐵)) |
| 19 | | leftssno 27873 |
. . . . 5
⊢ ( L
‘𝐴) ⊆ No |
| 20 | | fvex 6848 |
. . . . . 6
⊢ ( L
‘𝐴) ∈
V |
| 21 | 20 | elpw 4559 |
. . . . 5
⊢ (( L
‘𝐴) ∈ 𝒫
No ↔ ( L ‘𝐴) ⊆ No
) |
| 22 | 19, 21 | mpbir 231 |
. . . 4
⊢ ( L
‘𝐴) ∈ 𝒫
No |
| 23 | | nulsgts 27776 |
. . . 4
⊢ (( L
‘𝐴) ∈ 𝒫
No → ( L ‘𝐴) <<s ∅) |
| 24 | 22, 23 | mp1i 13 |
. . 3
⊢ ((𝐴 ∈ Ons ∧
𝐵 ∈ ( M ‘( bday ‘𝐴))) → ( L ‘𝐴) <<s ∅) |
| 25 | | madeno 27843 |
. . . . . 6
⊢ (𝐵 ∈ ( M ‘( bday ‘𝐴)) → 𝐵 ∈ No
) |
| 26 | 25 | adantl 481 |
. . . . 5
⊢ ((𝐴 ∈ Ons ∧
𝐵 ∈ ( M ‘( bday ‘𝐴))) → 𝐵 ∈ No
) |
| 27 | | lrcut 27904 |
. . . . 5
⊢ (𝐵 ∈
No → (( L ‘𝐵) |s ( R ‘𝐵)) = 𝐵) |
| 28 | 26, 27 | syl 17 |
. . . 4
⊢ ((𝐴 ∈ Ons ∧
𝐵 ∈ ( M ‘( bday ‘𝐴))) → (( L ‘𝐵) |s ( R ‘𝐵)) = 𝐵) |
| 29 | 28 | eqcomd 2743 |
. . 3
⊢ ((𝐴 ∈ Ons ∧
𝐵 ∈ ( M ‘( bday ‘𝐴))) → 𝐵 = (( L ‘𝐵) |s ( R ‘𝐵))) |
| 30 | | oncutleft 28263 |
. . . 4
⊢ (𝐴 ∈ Ons →
𝐴 = (( L ‘𝐴) |s ∅)) |
| 31 | 30 | adantr 480 |
. . 3
⊢ ((𝐴 ∈ Ons ∧
𝐵 ∈ ( M ‘( bday ‘𝐴))) → 𝐴 = (( L ‘𝐴) |s ∅)) |
| 32 | 18, 24, 29, 31 | lesrecd 27800 |
. 2
⊢ ((𝐴 ∈ Ons ∧
𝐵 ∈ ( M ‘( bday ‘𝐴))) → (𝐵 ≤s 𝐴 ↔ (∀𝑥𝑅 ∈ ∅ 𝐵 <s 𝑥𝑅 ∧ ∀𝑦𝐿 ∈ ( L
‘𝐵)𝑦𝐿 <s 𝐴))) |
| 33 | 2, 16, 32 | mpbir2and 714 |
1
⊢ ((𝐴 ∈ Ons ∧
𝐵 ∈ ( M ‘( bday ‘𝐴))) → 𝐵 ≤s 𝐴) |