MPE Home Metamath Proof Explorer < Previous   Next >
Nearby theorems
Mirrors  >  Home  >  MPE Home  >  Th. List  >  lesrec Structured version   Visualization version   GIF version

Theorem lesrec 27950
Description: A comparison law for surreals considered as cuts of sets of surreals. Definition from [Conway] p. 4. Theorem 4 of [Alling] p. 186. Theorem 2.5 of [Gonshor] p. 9. (Contributed by Scott Fenton, 11-Dec-2021.)
Assertion
Ref Expression
lesrec (((𝐴 <<s 𝐵𝐶 <<s 𝐷) ∧ (𝑋 = (𝐴 |s 𝐵) ∧ 𝑌 = (𝐶 |s 𝐷))) → (𝑋 ≤s 𝑌 ↔ (∀𝑑𝐷 𝑋 <s 𝑑 ∧ ∀𝑎𝐴 𝑎 <s 𝑌)))
Distinct variable groups:   𝐴,𝑎,𝑑   𝐵,𝑎,𝑑   𝐶,𝑎,𝑑   𝐷,𝑎,𝑑   𝑋,𝑎,𝑑   𝑌,𝑎,𝑑

Proof of Theorem lesrec
Dummy variables 𝑏 𝑐 are mutually distinct and distinct from all other variables.
StepHypRef Expression
1 cutscl 27933 . . . . . . . 8 (𝐴 <<s 𝐵 → (𝐴 |s 𝐵) ∈ No )
21ad3antrrr 742 . . . . . . 7 ((((𝐴 <<s 𝐵𝐶 <<s 𝐷) ∧ (𝐴 |s 𝐵) ≤s (𝐶 |s 𝐷)) ∧ 𝑑𝐷) → (𝐴 |s 𝐵) ∈ No )
3 cutscl 27933 . . . . . . . 8 (𝐶 <<s 𝐷 → (𝐶 |s 𝐷) ∈ No )
43ad3antlr 743 . . . . . . 7 ((((𝐴 <<s 𝐵𝐶 <<s 𝐷) ∧ (𝐴 |s 𝐵) ≤s (𝐶 |s 𝐷)) ∧ 𝑑𝐷) → (𝐶 |s 𝐷) ∈ No )
5 sltsss2 27917 . . . . . . . . 9 (𝐶 <<s 𝐷𝐷 No )
65ad2antlr 739 . . . . . . . 8 (((𝐴 <<s 𝐵𝐶 <<s 𝐷) ∧ (𝐴 |s 𝐵) ≤s (𝐶 |s 𝐷)) → 𝐷 No )
76sselda 3939 . . . . . . 7 ((((𝐴 <<s 𝐵𝐶 <<s 𝐷) ∧ (𝐴 |s 𝐵) ≤s (𝐶 |s 𝐷)) ∧ 𝑑𝐷) → 𝑑 No )
8 simplr 780 . . . . . . 7 ((((𝐴 <<s 𝐵𝐶 <<s 𝐷) ∧ (𝐴 |s 𝐵) ≤s (𝐶 |s 𝐷)) ∧ 𝑑𝐷) → (𝐴 |s 𝐵) ≤s (𝐶 |s 𝐷))
9 cutcuts 27932 . . . . . . . . . . . 12 (𝐶 <<s 𝐷 → ((𝐶 |s 𝐷) ∈ No 𝐶 <<s {(𝐶 |s 𝐷)} ∧ {(𝐶 |s 𝐷)} <<s 𝐷))
109simp3d 1160 . . . . . . . . . . 11 (𝐶 <<s 𝐷 → {(𝐶 |s 𝐷)} <<s 𝐷)
1110ad2antlr 739 . . . . . . . . . 10 (((𝐴 <<s 𝐵𝐶 <<s 𝐷) ∧ (𝐴 |s 𝐵) ≤s (𝐶 |s 𝐷)) → {(𝐶 |s 𝐷)} <<s 𝐷)
12 sltssep 27918 . . . . . . . . . 10 ({(𝐶 |s 𝐷)} <<s 𝐷 → ∀𝑎 ∈ {(𝐶 |s 𝐷)}∀𝑑𝐷 𝑎 <s 𝑑)
1311, 12syl 18 . . . . . . . . 9 (((𝐴 <<s 𝐵𝐶 <<s 𝐷) ∧ (𝐴 |s 𝐵) ≤s (𝐶 |s 𝐷)) → ∀𝑎 ∈ {(𝐶 |s 𝐷)}∀𝑑𝐷 𝑎 <s 𝑑)
14 ovex 7433 . . . . . . . . . 10 (𝐶 |s 𝐷) ∈ V
15 breq1 5108 . . . . . . . . . . 11 (𝑎 = (𝐶 |s 𝐷) → (𝑎 <s 𝑑 ↔ (𝐶 |s 𝐷) <s 𝑑))
1615ralbidv 3188 . . . . . . . . . 10 (𝑎 = (𝐶 |s 𝐷) → (∀𝑑𝐷 𝑎 <s 𝑑 ↔ ∀𝑑𝐷 (𝐶 |s 𝐷) <s 𝑑))
1714, 16ralsn 4643 . . . . . . . . 9 (∀𝑎 ∈ {(𝐶 |s 𝐷)}∀𝑑𝐷 𝑎 <s 𝑑 ↔ ∀𝑑𝐷 (𝐶 |s 𝐷) <s 𝑑)
1813, 17sylib 221 . . . . . . . 8 (((𝐴 <<s 𝐵𝐶 <<s 𝐷) ∧ (𝐴 |s 𝐵) ≤s (𝐶 |s 𝐷)) → ∀𝑑𝐷 (𝐶 |s 𝐷) <s 𝑑)
1918r19.21bi 3257 . . . . . . 7 ((((𝐴 <<s 𝐵𝐶 <<s 𝐷) ∧ (𝐴 |s 𝐵) ≤s (𝐶 |s 𝐷)) ∧ 𝑑𝐷) → (𝐶 |s 𝐷) <s 𝑑)
202, 4, 7, 8, 19leltstrd 27887 . . . . . 6 ((((𝐴 <<s 𝐵𝐶 <<s 𝐷) ∧ (𝐴 |s 𝐵) ≤s (𝐶 |s 𝐷)) ∧ 𝑑𝐷) → (𝐴 |s 𝐵) <s 𝑑)
2120ralrimiva 3157 . . . . 5 (((𝐴 <<s 𝐵𝐶 <<s 𝐷) ∧ (𝐴 |s 𝐵) ≤s (𝐶 |s 𝐷)) → ∀𝑑𝐷 (𝐴 |s 𝐵) <s 𝑑)
22 sltsss1 27916 . . . . . . . . . 10 (𝐴 <<s 𝐵𝐴 No )
2322adantr 485 . . . . . . . . 9 ((𝐴 <<s 𝐵𝐶 <<s 𝐷) → 𝐴 No )
2423adantr 485 . . . . . . . 8 (((𝐴 <<s 𝐵𝐶 <<s 𝐷) ∧ (𝐴 |s 𝐵) ≤s (𝐶 |s 𝐷)) → 𝐴 No )
2524sselda 3939 . . . . . . 7 ((((𝐴 <<s 𝐵𝐶 <<s 𝐷) ∧ (𝐴 |s 𝐵) ≤s (𝐶 |s 𝐷)) ∧ 𝑎𝐴) → 𝑎 No )
261ad3antrrr 742 . . . . . . 7 ((((𝐴 <<s 𝐵𝐶 <<s 𝐷) ∧ (𝐴 |s 𝐵) ≤s (𝐶 |s 𝐷)) ∧ 𝑎𝐴) → (𝐴 |s 𝐵) ∈ No )
273ad3antlr 743 . . . . . . 7 ((((𝐴 <<s 𝐵𝐶 <<s 𝐷) ∧ (𝐴 |s 𝐵) ≤s (𝐶 |s 𝐷)) ∧ 𝑎𝐴) → (𝐶 |s 𝐷) ∈ No )
28 cutcuts 27932 . . . . . . . . . . . . 13 (𝐴 <<s 𝐵 → ((𝐴 |s 𝐵) ∈ No 𝐴 <<s {(𝐴 |s 𝐵)} ∧ {(𝐴 |s 𝐵)} <<s 𝐵))
2928simp2d 1159 . . . . . . . . . . . 12 (𝐴 <<s 𝐵𝐴 <<s {(𝐴 |s 𝐵)})
3029adantr 485 . . . . . . . . . . 11 ((𝐴 <<s 𝐵𝐶 <<s 𝐷) → 𝐴 <<s {(𝐴 |s 𝐵)})
3130adantr 485 . . . . . . . . . 10 (((𝐴 <<s 𝐵𝐶 <<s 𝐷) ∧ (𝐴 |s 𝐵) ≤s (𝐶 |s 𝐷)) → 𝐴 <<s {(𝐴 |s 𝐵)})
32 sltssep 27918 . . . . . . . . . 10 (𝐴 <<s {(𝐴 |s 𝐵)} → ∀𝑎𝐴𝑑 ∈ {(𝐴 |s 𝐵)}𝑎 <s 𝑑)
3331, 32syl 18 . . . . . . . . 9 (((𝐴 <<s 𝐵𝐶 <<s 𝐷) ∧ (𝐴 |s 𝐵) ≤s (𝐶 |s 𝐷)) → ∀𝑎𝐴𝑑 ∈ {(𝐴 |s 𝐵)}𝑎 <s 𝑑)
3433r19.21bi 3257 . . . . . . . 8 ((((𝐴 <<s 𝐵𝐶 <<s 𝐷) ∧ (𝐴 |s 𝐵) ≤s (𝐶 |s 𝐷)) ∧ 𝑎𝐴) → ∀𝑑 ∈ {(𝐴 |s 𝐵)}𝑎 <s 𝑑)
35 ovex 7433 . . . . . . . . 9 (𝐴 |s 𝐵) ∈ V
36 breq2 5109 . . . . . . . . 9 (𝑑 = (𝐴 |s 𝐵) → (𝑎 <s 𝑑𝑎 <s (𝐴 |s 𝐵)))
3735, 36ralsn 4643 . . . . . . . 8 (∀𝑑 ∈ {(𝐴 |s 𝐵)}𝑎 <s 𝑑𝑎 <s (𝐴 |s 𝐵))
3834, 37sylib 221 . . . . . . 7 ((((𝐴 <<s 𝐵𝐶 <<s 𝐷) ∧ (𝐴 |s 𝐵) ≤s (𝐶 |s 𝐷)) ∧ 𝑎𝐴) → 𝑎 <s (𝐴 |s 𝐵))
39 simplr 780 . . . . . . 7 ((((𝐴 <<s 𝐵𝐶 <<s 𝐷) ∧ (𝐴 |s 𝐵) ≤s (𝐶 |s 𝐷)) ∧ 𝑎𝐴) → (𝐴 |s 𝐵) ≤s (𝐶 |s 𝐷))
4025, 26, 27, 38, 39ltlestrd 27886 . . . . . 6 ((((𝐴 <<s 𝐵𝐶 <<s 𝐷) ∧ (𝐴 |s 𝐵) ≤s (𝐶 |s 𝐷)) ∧ 𝑎𝐴) → 𝑎 <s (𝐶 |s 𝐷))
4140ralrimiva 3157 . . . . 5 (((𝐴 <<s 𝐵𝐶 <<s 𝐷) ∧ (𝐴 |s 𝐵) ≤s (𝐶 |s 𝐷)) → ∀𝑎𝐴 𝑎 <s (𝐶 |s 𝐷))
4221, 41jca 520 . . . 4 (((𝐴 <<s 𝐵𝐶 <<s 𝐷) ∧ (𝐴 |s 𝐵) ≤s (𝐶 |s 𝐷)) → (∀𝑑𝐷 (𝐴 |s 𝐵) <s 𝑑 ∧ ∀𝑎𝐴 𝑎 <s (𝐶 |s 𝐷)))
43 bdayon 27903 . . . . . . 7 ( bday ‘(𝐴 |s 𝐵)) ∈ On
4443onordi 6463 . . . . . 6 Ord ( bday ‘(𝐴 |s 𝐵))
45 ordn2lp 6370 . . . . . 6 (Ord ( bday ‘(𝐴 |s 𝐵)) → ¬ (( bday ‘(𝐴 |s 𝐵)) ∈ ( bday ‘(𝐶 |s 𝐷)) ∧ ( bday ‘(𝐶 |s 𝐷)) ∈ ( bday ‘(𝐴 |s 𝐵))))
4644, 45ax-mp 5 . . . . 5 ¬ (( bday ‘(𝐴 |s 𝐵)) ∈ ( bday ‘(𝐶 |s 𝐷)) ∧ ( bday ‘(𝐶 |s 𝐷)) ∈ ( bday ‘(𝐴 |s 𝐵)))
473ad2antlr 739 . . . . . . 7 (((𝐴 <<s 𝐵𝐶 <<s 𝐷) ∧ (∀𝑑𝐷 (𝐴 |s 𝐵) <s 𝑑 ∧ ∀𝑎𝐴 𝑎 <s (𝐶 |s 𝐷))) → (𝐶 |s 𝐷) ∈ No )
481adantr 485 . . . . . . . 8 ((𝐴 <<s 𝐵𝐶 <<s 𝐷) → (𝐴 |s 𝐵) ∈ No )
4948adantr 485 . . . . . . 7 (((𝐴 <<s 𝐵𝐶 <<s 𝐷) ∧ (∀𝑑𝐷 (𝐴 |s 𝐵) <s 𝑑 ∧ ∀𝑎𝐴 𝑎 <s (𝐶 |s 𝐷))) → (𝐴 |s 𝐵) ∈ No )
50 ltnles 27875 . . . . . . 7 (((𝐶 |s 𝐷) ∈ No ∧ (𝐴 |s 𝐵) ∈ No ) → ((𝐶 |s 𝐷) <s (𝐴 |s 𝐵) ↔ ¬ (𝐴 |s 𝐵) ≤s (𝐶 |s 𝐷)))
5147, 49, 50syl2anc 595 . . . . . 6 (((𝐴 <<s 𝐵𝐶 <<s 𝐷) ∧ (∀𝑑𝐷 (𝐴 |s 𝐵) <s 𝑑 ∧ ∀𝑎𝐴 𝑎 <s (𝐶 |s 𝐷))) → ((𝐶 |s 𝐷) <s (𝐴 |s 𝐵) ↔ ¬ (𝐴 |s 𝐵) ≤s (𝐶 |s 𝐷)))
523ad3antlr 743 . . . . . . . . 9 ((((𝐴 <<s 𝐵𝐶 <<s 𝐷) ∧ (∀𝑑𝐷 (𝐴 |s 𝐵) <s 𝑑 ∧ ∀𝑎𝐴 𝑎 <s (𝐶 |s 𝐷))) ∧ (𝐶 |s 𝐷) <s (𝐴 |s 𝐵)) → (𝐶 |s 𝐷) ∈ No )
53 sltsex1 27914 . . . . . . . . . . . 12 (𝐴 <<s 𝐵𝐴 ∈ V)
5453ad3antrrr 742 . . . . . . . . . . 11 ((((𝐴 <<s 𝐵𝐶 <<s 𝐷) ∧ (∀𝑑𝐷 (𝐴 |s 𝐵) <s 𝑑 ∧ ∀𝑎𝐴 𝑎 <s (𝐶 |s 𝐷))) ∧ (𝐶 |s 𝐷) <s (𝐴 |s 𝐵)) → 𝐴 ∈ V)
55 snex 5401 . . . . . . . . . . 11 {(𝐶 |s 𝐷)} ∈ V
5654, 55jctir 529 . . . . . . . . . 10 ((((𝐴 <<s 𝐵𝐶 <<s 𝐷) ∧ (∀𝑑𝐷 (𝐴 |s 𝐵) <s 𝑑 ∧ ∀𝑎𝐴 𝑎 <s (𝐶 |s 𝐷))) ∧ (𝐶 |s 𝐷) <s (𝐴 |s 𝐵)) → (𝐴 ∈ V ∧ {(𝐶 |s 𝐷)} ∈ V))
5722ad3antrrr 742 . . . . . . . . . . 11 ((((𝐴 <<s 𝐵𝐶 <<s 𝐷) ∧ (∀𝑑𝐷 (𝐴 |s 𝐵) <s 𝑑 ∧ ∀𝑎𝐴 𝑎 <s (𝐶 |s 𝐷))) ∧ (𝐶 |s 𝐷) <s (𝐴 |s 𝐵)) → 𝐴 No )
5852snssd 4748 . . . . . . . . . . 11 ((((𝐴 <<s 𝐵𝐶 <<s 𝐷) ∧ (∀𝑑𝐷 (𝐴 |s 𝐵) <s 𝑑 ∧ ∀𝑎𝐴 𝑎 <s (𝐶 |s 𝐷))) ∧ (𝐶 |s 𝐷) <s (𝐴 |s 𝐵)) → {(𝐶 |s 𝐷)} ⊆ No )
59 simplrr 789 . . . . . . . . . . . 12 ((((𝐴 <<s 𝐵𝐶 <<s 𝐷) ∧ (∀𝑑𝐷 (𝐴 |s 𝐵) <s 𝑑 ∧ ∀𝑎𝐴 𝑎 <s (𝐶 |s 𝐷))) ∧ (𝐶 |s 𝐷) <s (𝐴 |s 𝐵)) → ∀𝑎𝐴 𝑎 <s (𝐶 |s 𝐷))
60 breq2 5109 . . . . . . . . . . . . . 14 (𝑑 = (𝐶 |s 𝐷) → (𝑎 <s 𝑑𝑎 <s (𝐶 |s 𝐷)))
6114, 60ralsn 4643 . . . . . . . . . . . . 13 (∀𝑑 ∈ {(𝐶 |s 𝐷)}𝑎 <s 𝑑𝑎 <s (𝐶 |s 𝐷))
6261ralbii 3111 . . . . . . . . . . . 12 (∀𝑎𝐴𝑑 ∈ {(𝐶 |s 𝐷)}𝑎 <s 𝑑 ↔ ∀𝑎𝐴 𝑎 <s (𝐶 |s 𝐷))
6359, 62sylibr 237 . . . . . . . . . . 11 ((((𝐴 <<s 𝐵𝐶 <<s 𝐷) ∧ (∀𝑑𝐷 (𝐴 |s 𝐵) <s 𝑑 ∧ ∀𝑎𝐴 𝑎 <s (𝐶 |s 𝐷))) ∧ (𝐶 |s 𝐷) <s (𝐴 |s 𝐵)) → ∀𝑎𝐴𝑑 ∈ {(𝐶 |s 𝐷)}𝑎 <s 𝑑)
6457, 58, 633jca 1144 . . . . . . . . . 10 ((((𝐴 <<s 𝐵𝐶 <<s 𝐷) ∧ (∀𝑑𝐷 (𝐴 |s 𝐵) <s 𝑑 ∧ ∀𝑎𝐴 𝑎 <s (𝐶 |s 𝐷))) ∧ (𝐶 |s 𝐷) <s (𝐴 |s 𝐵)) → (𝐴 No ∧ {(𝐶 |s 𝐷)} ⊆ No ∧ ∀𝑎𝐴𝑑 ∈ {(𝐶 |s 𝐷)}𝑎 <s 𝑑))
65 brslts 27913 . . . . . . . . . 10 (𝐴 <<s {(𝐶 |s 𝐷)} ↔ ((𝐴 ∈ V ∧ {(𝐶 |s 𝐷)} ∈ V) ∧ (𝐴 No ∧ {(𝐶 |s 𝐷)} ⊆ No ∧ ∀𝑎𝐴𝑑 ∈ {(𝐶 |s 𝐷)}𝑎 <s 𝑑)))
6656, 64, 65sylanbrc 594 . . . . . . . . 9 ((((𝐴 <<s 𝐵𝐶 <<s 𝐷) ∧ (∀𝑑𝐷 (𝐴 |s 𝐵) <s 𝑑 ∧ ∀𝑎𝐴 𝑎 <s (𝐶 |s 𝐷))) ∧ (𝐶 |s 𝐷) <s (𝐴 |s 𝐵)) → 𝐴 <<s {(𝐶 |s 𝐷)})
67 sltsex2 27915 . . . . . . . . . . . 12 (𝐴 <<s 𝐵𝐵 ∈ V)
6867ad3antrrr 742 . . . . . . . . . . 11 ((((𝐴 <<s 𝐵𝐶 <<s 𝐷) ∧ (∀𝑑𝐷 (𝐴 |s 𝐵) <s 𝑑 ∧ ∀𝑎𝐴 𝑎 <s (𝐶 |s 𝐷))) ∧ (𝐶 |s 𝐷) <s (𝐴 |s 𝐵)) → 𝐵 ∈ V)
6968, 55jctil 528 . . . . . . . . . 10 ((((𝐴 <<s 𝐵𝐶 <<s 𝐷) ∧ (∀𝑑𝐷 (𝐴 |s 𝐵) <s 𝑑 ∧ ∀𝑎𝐴 𝑎 <s (𝐶 |s 𝐷))) ∧ (𝐶 |s 𝐷) <s (𝐴 |s 𝐵)) → ({(𝐶 |s 𝐷)} ∈ V ∧ 𝐵 ∈ V))
70 sltsss2 27917 . . . . . . . . . . . 12 (𝐴 <<s 𝐵𝐵 No )
7170ad3antrrr 742 . . . . . . . . . . 11 ((((𝐴 <<s 𝐵𝐶 <<s 𝐷) ∧ (∀𝑑𝐷 (𝐴 |s 𝐵) <s 𝑑 ∧ ∀𝑎𝐴 𝑎 <s (𝐶 |s 𝐷))) ∧ (𝐶 |s 𝐷) <s (𝐴 |s 𝐵)) → 𝐵 No )
7252adantr 485 . . . . . . . . . . . . . 14 (((((𝐴 <<s 𝐵𝐶 <<s 𝐷) ∧ (∀𝑑𝐷 (𝐴 |s 𝐵) <s 𝑑 ∧ ∀𝑎𝐴 𝑎 <s (𝐶 |s 𝐷))) ∧ (𝐶 |s 𝐷) <s (𝐴 |s 𝐵)) ∧ 𝑏𝐵) → (𝐶 |s 𝐷) ∈ No )
7348ad3antrrr 742 . . . . . . . . . . . . . 14 (((((𝐴 <<s 𝐵𝐶 <<s 𝐷) ∧ (∀𝑑𝐷 (𝐴 |s 𝐵) <s 𝑑 ∧ ∀𝑎𝐴 𝑎 <s (𝐶 |s 𝐷))) ∧ (𝐶 |s 𝐷) <s (𝐴 |s 𝐵)) ∧ 𝑏𝐵) → (𝐴 |s 𝐵) ∈ No )
7471sselda 3939 . . . . . . . . . . . . . 14 (((((𝐴 <<s 𝐵𝐶 <<s 𝐷) ∧ (∀𝑑𝐷 (𝐴 |s 𝐵) <s 𝑑 ∧ ∀𝑎𝐴 𝑎 <s (𝐶 |s 𝐷))) ∧ (𝐶 |s 𝐷) <s (𝐴 |s 𝐵)) ∧ 𝑏𝐵) → 𝑏 No )
75 simplr 780 . . . . . . . . . . . . . 14 (((((𝐴 <<s 𝐵𝐶 <<s 𝐷) ∧ (∀𝑑𝐷 (𝐴 |s 𝐵) <s 𝑑 ∧ ∀𝑎𝐴 𝑎 <s (𝐶 |s 𝐷))) ∧ (𝐶 |s 𝐷) <s (𝐴 |s 𝐵)) ∧ 𝑏𝐵) → (𝐶 |s 𝐷) <s (𝐴 |s 𝐵))
7628simp3d 1160 . . . . . . . . . . . . . . . . . 18 (𝐴 <<s 𝐵 → {(𝐴 |s 𝐵)} <<s 𝐵)
7776ad3antrrr 742 . . . . . . . . . . . . . . . . 17 ((((𝐴 <<s 𝐵𝐶 <<s 𝐷) ∧ (∀𝑑𝐷 (𝐴 |s 𝐵) <s 𝑑 ∧ ∀𝑎𝐴 𝑎 <s (𝐶 |s 𝐷))) ∧ (𝐶 |s 𝐷) <s (𝐴 |s 𝐵)) → {(𝐴 |s 𝐵)} <<s 𝐵)
78 sltssep 27918 . . . . . . . . . . . . . . . . 17 ({(𝐴 |s 𝐵)} <<s 𝐵 → ∀𝑎 ∈ {(𝐴 |s 𝐵)}∀𝑏𝐵 𝑎 <s 𝑏)
7977, 78syl 18 . . . . . . . . . . . . . . . 16 ((((𝐴 <<s 𝐵𝐶 <<s 𝐷) ∧ (∀𝑑𝐷 (𝐴 |s 𝐵) <s 𝑑 ∧ ∀𝑎𝐴 𝑎 <s (𝐶 |s 𝐷))) ∧ (𝐶 |s 𝐷) <s (𝐴 |s 𝐵)) → ∀𝑎 ∈ {(𝐴 |s 𝐵)}∀𝑏𝐵 𝑎 <s 𝑏)
80 breq1 5108 . . . . . . . . . . . . . . . . . 18 (𝑎 = (𝐴 |s 𝐵) → (𝑎 <s 𝑏 ↔ (𝐴 |s 𝐵) <s 𝑏))
8180ralbidv 3188 . . . . . . . . . . . . . . . . 17 (𝑎 = (𝐴 |s 𝐵) → (∀𝑏𝐵 𝑎 <s 𝑏 ↔ ∀𝑏𝐵 (𝐴 |s 𝐵) <s 𝑏))
8235, 81ralsn 4643 . . . . . . . . . . . . . . . 16 (∀𝑎 ∈ {(𝐴 |s 𝐵)}∀𝑏𝐵 𝑎 <s 𝑏 ↔ ∀𝑏𝐵 (𝐴 |s 𝐵) <s 𝑏)
8379, 82sylib 221 . . . . . . . . . . . . . . 15 ((((𝐴 <<s 𝐵𝐶 <<s 𝐷) ∧ (∀𝑑𝐷 (𝐴 |s 𝐵) <s 𝑑 ∧ ∀𝑎𝐴 𝑎 <s (𝐶 |s 𝐷))) ∧ (𝐶 |s 𝐷) <s (𝐴 |s 𝐵)) → ∀𝑏𝐵 (𝐴 |s 𝐵) <s 𝑏)
8483r19.21bi 3257 . . . . . . . . . . . . . 14 (((((𝐴 <<s 𝐵𝐶 <<s 𝐷) ∧ (∀𝑑𝐷 (𝐴 |s 𝐵) <s 𝑑 ∧ ∀𝑎𝐴 𝑎 <s (𝐶 |s 𝐷))) ∧ (𝐶 |s 𝐷) <s (𝐴 |s 𝐵)) ∧ 𝑏𝐵) → (𝐴 |s 𝐵) <s 𝑏)
8572, 73, 74, 75, 84ltstrd 27885 . . . . . . . . . . . . 13 (((((𝐴 <<s 𝐵𝐶 <<s 𝐷) ∧ (∀𝑑𝐷 (𝐴 |s 𝐵) <s 𝑑 ∧ ∀𝑎𝐴 𝑎 <s (𝐶 |s 𝐷))) ∧ (𝐶 |s 𝐷) <s (𝐴 |s 𝐵)) ∧ 𝑏𝐵) → (𝐶 |s 𝐷) <s 𝑏)
8685ralrimiva 3157 . . . . . . . . . . . 12 ((((𝐴 <<s 𝐵𝐶 <<s 𝐷) ∧ (∀𝑑𝐷 (𝐴 |s 𝐵) <s 𝑑 ∧ ∀𝑎𝐴 𝑎 <s (𝐶 |s 𝐷))) ∧ (𝐶 |s 𝐷) <s (𝐴 |s 𝐵)) → ∀𝑏𝐵 (𝐶 |s 𝐷) <s 𝑏)
87 breq1 5108 . . . . . . . . . . . . . 14 (𝑎 = (𝐶 |s 𝐷) → (𝑎 <s 𝑏 ↔ (𝐶 |s 𝐷) <s 𝑏))
8887ralbidv 3188 . . . . . . . . . . . . 13 (𝑎 = (𝐶 |s 𝐷) → (∀𝑏𝐵 𝑎 <s 𝑏 ↔ ∀𝑏𝐵 (𝐶 |s 𝐷) <s 𝑏))
8914, 88ralsn 4643 . . . . . . . . . . . 12 (∀𝑎 ∈ {(𝐶 |s 𝐷)}∀𝑏𝐵 𝑎 <s 𝑏 ↔ ∀𝑏𝐵 (𝐶 |s 𝐷) <s 𝑏)
9086, 89sylibr 237 . . . . . . . . . . 11 ((((𝐴 <<s 𝐵𝐶 <<s 𝐷) ∧ (∀𝑑𝐷 (𝐴 |s 𝐵) <s 𝑑 ∧ ∀𝑎𝐴 𝑎 <s (𝐶 |s 𝐷))) ∧ (𝐶 |s 𝐷) <s (𝐴 |s 𝐵)) → ∀𝑎 ∈ {(𝐶 |s 𝐷)}∀𝑏𝐵 𝑎 <s 𝑏)
9158, 71, 903jca 1144 . . . . . . . . . 10 ((((𝐴 <<s 𝐵𝐶 <<s 𝐷) ∧ (∀𝑑𝐷 (𝐴 |s 𝐵) <s 𝑑 ∧ ∀𝑎𝐴 𝑎 <s (𝐶 |s 𝐷))) ∧ (𝐶 |s 𝐷) <s (𝐴 |s 𝐵)) → ({(𝐶 |s 𝐷)} ⊆ No 𝐵 No ∧ ∀𝑎 ∈ {(𝐶 |s 𝐷)}∀𝑏𝐵 𝑎 <s 𝑏))
92 brslts 27913 . . . . . . . . . 10 ({(𝐶 |s 𝐷)} <<s 𝐵 ↔ (({(𝐶 |s 𝐷)} ∈ V ∧ 𝐵 ∈ V) ∧ ({(𝐶 |s 𝐷)} ⊆ No 𝐵 No ∧ ∀𝑎 ∈ {(𝐶 |s 𝐷)}∀𝑏𝐵 𝑎 <s 𝑏)))
9369, 91, 92sylanbrc 594 . . . . . . . . 9 ((((𝐴 <<s 𝐵𝐶 <<s 𝐷) ∧ (∀𝑑𝐷 (𝐴 |s 𝐵) <s 𝑑 ∧ ∀𝑎𝐴 𝑎 <s (𝐶 |s 𝐷))) ∧ (𝐶 |s 𝐷) <s (𝐴 |s 𝐵)) → {(𝐶 |s 𝐷)} <<s 𝐵)
94 ltsirr 27868 . . . . . . . . . . . . . 14 ((𝐴 |s 𝐵) ∈ No → ¬ (𝐴 |s 𝐵) <s (𝐴 |s 𝐵))
9549, 94syl 18 . . . . . . . . . . . . 13 (((𝐴 <<s 𝐵𝐶 <<s 𝐷) ∧ (∀𝑑𝐷 (𝐴 |s 𝐵) <s 𝑑 ∧ ∀𝑎𝐴 𝑎 <s (𝐶 |s 𝐷))) → ¬ (𝐴 |s 𝐵) <s (𝐴 |s 𝐵))
96 breq1 5108 . . . . . . . . . . . . . 14 ((𝐴 |s 𝐵) = (𝐶 |s 𝐷) → ((𝐴 |s 𝐵) <s (𝐴 |s 𝐵) ↔ (𝐶 |s 𝐷) <s (𝐴 |s 𝐵)))
9796notbid 321 . . . . . . . . . . . . 13 ((𝐴 |s 𝐵) = (𝐶 |s 𝐷) → (¬ (𝐴 |s 𝐵) <s (𝐴 |s 𝐵) ↔ ¬ (𝐶 |s 𝐷) <s (𝐴 |s 𝐵)))
9895, 97syl5ibcom 248 . . . . . . . . . . . 12 (((𝐴 <<s 𝐵𝐶 <<s 𝐷) ∧ (∀𝑑𝐷 (𝐴 |s 𝐵) <s 𝑑 ∧ ∀𝑎𝐴 𝑎 <s (𝐶 |s 𝐷))) → ((𝐴 |s 𝐵) = (𝐶 |s 𝐷) → ¬ (𝐶 |s 𝐷) <s (𝐴 |s 𝐵)))
9998necon2ad 2975 . . . . . . . . . . 11 (((𝐴 <<s 𝐵𝐶 <<s 𝐷) ∧ (∀𝑑𝐷 (𝐴 |s 𝐵) <s 𝑑 ∧ ∀𝑎𝐴 𝑎 <s (𝐶 |s 𝐷))) → ((𝐶 |s 𝐷) <s (𝐴 |s 𝐵) → (𝐴 |s 𝐵) ≠ (𝐶 |s 𝐷)))
10099imp 411 . . . . . . . . . 10 ((((𝐴 <<s 𝐵𝐶 <<s 𝐷) ∧ (∀𝑑𝐷 (𝐴 |s 𝐵) <s 𝑑 ∧ ∀𝑎𝐴 𝑎 <s (𝐶 |s 𝐷))) ∧ (𝐶 |s 𝐷) <s (𝐴 |s 𝐵)) → (𝐴 |s 𝐵) ≠ (𝐶 |s 𝐷))
101100necomd 3015 . . . . . . . . 9 ((((𝐴 <<s 𝐵𝐶 <<s 𝐷) ∧ (∀𝑑𝐷 (𝐴 |s 𝐵) <s 𝑑 ∧ ∀𝑎𝐴 𝑎 <s (𝐶 |s 𝐷))) ∧ (𝐶 |s 𝐷) <s (𝐴 |s 𝐵)) → (𝐶 |s 𝐷) ≠ (𝐴 |s 𝐵))
102 cutbdaylt 27949 . . . . . . . . 9 (((𝐶 |s 𝐷) ∈ No ∧ (𝐴 <<s {(𝐶 |s 𝐷)} ∧ {(𝐶 |s 𝐷)} <<s 𝐵) ∧ (𝐶 |s 𝐷) ≠ (𝐴 |s 𝐵)) → ( bday ‘(𝐴 |s 𝐵)) ∈ ( bday ‘(𝐶 |s 𝐷)))
10352, 66, 93, 101, 102syl121anc 1398 . . . . . . . 8 ((((𝐴 <<s 𝐵𝐶 <<s 𝐷) ∧ (∀𝑑𝐷 (𝐴 |s 𝐵) <s 𝑑 ∧ ∀𝑎𝐴 𝑎 <s (𝐶 |s 𝐷))) ∧ (𝐶 |s 𝐷) <s (𝐴 |s 𝐵)) → ( bday ‘(𝐴 |s 𝐵)) ∈ ( bday ‘(𝐶 |s 𝐷)))
1041ad3antrrr 742 . . . . . . . . 9 ((((𝐴 <<s 𝐵𝐶 <<s 𝐷) ∧ (∀𝑑𝐷 (𝐴 |s 𝐵) <s 𝑑 ∧ ∀𝑎𝐴 𝑎 <s (𝐶 |s 𝐷))) ∧ (𝐶 |s 𝐷) <s (𝐴 |s 𝐵)) → (𝐴 |s 𝐵) ∈ No )
105 sltsex1 27914 . . . . . . . . . . . 12 (𝐶 <<s 𝐷𝐶 ∈ V)
106105ad3antlr 743 . . . . . . . . . . 11 ((((𝐴 <<s 𝐵𝐶 <<s 𝐷) ∧ (∀𝑑𝐷 (𝐴 |s 𝐵) <s 𝑑 ∧ ∀𝑎𝐴 𝑎 <s (𝐶 |s 𝐷))) ∧ (𝐶 |s 𝐷) <s (𝐴 |s 𝐵)) → 𝐶 ∈ V)
107 snex 5401 . . . . . . . . . . 11 {(𝐴 |s 𝐵)} ∈ V
108106, 107jctir 529 . . . . . . . . . 10 ((((𝐴 <<s 𝐵𝐶 <<s 𝐷) ∧ (∀𝑑𝐷 (𝐴 |s 𝐵) <s 𝑑 ∧ ∀𝑎𝐴 𝑎 <s (𝐶 |s 𝐷))) ∧ (𝐶 |s 𝐷) <s (𝐴 |s 𝐵)) → (𝐶 ∈ V ∧ {(𝐴 |s 𝐵)} ∈ V))
109 sltsss1 27916 . . . . . . . . . . . 12 (𝐶 <<s 𝐷𝐶 No )
110109ad3antlr 743 . . . . . . . . . . 11 ((((𝐴 <<s 𝐵𝐶 <<s 𝐷) ∧ (∀𝑑𝐷 (𝐴 |s 𝐵) <s 𝑑 ∧ ∀𝑎𝐴 𝑎 <s (𝐶 |s 𝐷))) ∧ (𝐶 |s 𝐷) <s (𝐴 |s 𝐵)) → 𝐶 No )
111104snssd 4748 . . . . . . . . . . 11 ((((𝐴 <<s 𝐵𝐶 <<s 𝐷) ∧ (∀𝑑𝐷 (𝐴 |s 𝐵) <s 𝑑 ∧ ∀𝑎𝐴 𝑎 <s (𝐶 |s 𝐷))) ∧ (𝐶 |s 𝐷) <s (𝐴 |s 𝐵)) → {(𝐴 |s 𝐵)} ⊆ No )
112110sselda 3939 . . . . . . . . . . . . . 14 (((((𝐴 <<s 𝐵𝐶 <<s 𝐷) ∧ (∀𝑑𝐷 (𝐴 |s 𝐵) <s 𝑑 ∧ ∀𝑎𝐴 𝑎 <s (𝐶 |s 𝐷))) ∧ (𝐶 |s 𝐷) <s (𝐴 |s 𝐵)) ∧ 𝑐𝐶) → 𝑐 No )
11352adantr 485 . . . . . . . . . . . . . 14 (((((𝐴 <<s 𝐵𝐶 <<s 𝐷) ∧ (∀𝑑𝐷 (𝐴 |s 𝐵) <s 𝑑 ∧ ∀𝑎𝐴 𝑎 <s (𝐶 |s 𝐷))) ∧ (𝐶 |s 𝐷) <s (𝐴 |s 𝐵)) ∧ 𝑐𝐶) → (𝐶 |s 𝐷) ∈ No )
11448ad3antrrr 742 . . . . . . . . . . . . . 14 (((((𝐴 <<s 𝐵𝐶 <<s 𝐷) ∧ (∀𝑑𝐷 (𝐴 |s 𝐵) <s 𝑑 ∧ ∀𝑎𝐴 𝑎 <s (𝐶 |s 𝐷))) ∧ (𝐶 |s 𝐷) <s (𝐴 |s 𝐵)) ∧ 𝑐𝐶) → (𝐴 |s 𝐵) ∈ No )
1159simp2d 1159 . . . . . . . . . . . . . . . . . 18 (𝐶 <<s 𝐷𝐶 <<s {(𝐶 |s 𝐷)})
116115ad3antlr 743 . . . . . . . . . . . . . . . . 17 ((((𝐴 <<s 𝐵𝐶 <<s 𝐷) ∧ (∀𝑑𝐷 (𝐴 |s 𝐵) <s 𝑑 ∧ ∀𝑎𝐴 𝑎 <s (𝐶 |s 𝐷))) ∧ (𝐶 |s 𝐷) <s (𝐴 |s 𝐵)) → 𝐶 <<s {(𝐶 |s 𝐷)})
117 sltssep 27918 . . . . . . . . . . . . . . . . 17 (𝐶 <<s {(𝐶 |s 𝐷)} → ∀𝑐𝐶𝑑 ∈ {(𝐶 |s 𝐷)}𝑐 <s 𝑑)
118116, 117syl 18 . . . . . . . . . . . . . . . 16 ((((𝐴 <<s 𝐵𝐶 <<s 𝐷) ∧ (∀𝑑𝐷 (𝐴 |s 𝐵) <s 𝑑 ∧ ∀𝑎𝐴 𝑎 <s (𝐶 |s 𝐷))) ∧ (𝐶 |s 𝐷) <s (𝐴 |s 𝐵)) → ∀𝑐𝐶𝑑 ∈ {(𝐶 |s 𝐷)}𝑐 <s 𝑑)
119118r19.21bi 3257 . . . . . . . . . . . . . . 15 (((((𝐴 <<s 𝐵𝐶 <<s 𝐷) ∧ (∀𝑑𝐷 (𝐴 |s 𝐵) <s 𝑑 ∧ ∀𝑎𝐴 𝑎 <s (𝐶 |s 𝐷))) ∧ (𝐶 |s 𝐷) <s (𝐴 |s 𝐵)) ∧ 𝑐𝐶) → ∀𝑑 ∈ {(𝐶 |s 𝐷)}𝑐 <s 𝑑)
120 breq2 5109 . . . . . . . . . . . . . . . 16 (𝑑 = (𝐶 |s 𝐷) → (𝑐 <s 𝑑𝑐 <s (𝐶 |s 𝐷)))
12114, 120ralsn 4643 . . . . . . . . . . . . . . 15 (∀𝑑 ∈ {(𝐶 |s 𝐷)}𝑐 <s 𝑑𝑐 <s (𝐶 |s 𝐷))
122119, 121sylib 221 . . . . . . . . . . . . . 14 (((((𝐴 <<s 𝐵𝐶 <<s 𝐷) ∧ (∀𝑑𝐷 (𝐴 |s 𝐵) <s 𝑑 ∧ ∀𝑎𝐴 𝑎 <s (𝐶 |s 𝐷))) ∧ (𝐶 |s 𝐷) <s (𝐴 |s 𝐵)) ∧ 𝑐𝐶) → 𝑐 <s (𝐶 |s 𝐷))
123 simplr 780 . . . . . . . . . . . . . 14 (((((𝐴 <<s 𝐵𝐶 <<s 𝐷) ∧ (∀𝑑𝐷 (𝐴 |s 𝐵) <s 𝑑 ∧ ∀𝑎𝐴 𝑎 <s (𝐶 |s 𝐷))) ∧ (𝐶 |s 𝐷) <s (𝐴 |s 𝐵)) ∧ 𝑐𝐶) → (𝐶 |s 𝐷) <s (𝐴 |s 𝐵))
124112, 113, 114, 122, 123ltstrd 27885 . . . . . . . . . . . . 13 (((((𝐴 <<s 𝐵𝐶 <<s 𝐷) ∧ (∀𝑑𝐷 (𝐴 |s 𝐵) <s 𝑑 ∧ ∀𝑎𝐴 𝑎 <s (𝐶 |s 𝐷))) ∧ (𝐶 |s 𝐷) <s (𝐴 |s 𝐵)) ∧ 𝑐𝐶) → 𝑐 <s (𝐴 |s 𝐵))
125 breq2 5109 . . . . . . . . . . . . . 14 (𝑎 = (𝐴 |s 𝐵) → (𝑐 <s 𝑎𝑐 <s (𝐴 |s 𝐵)))
12635, 125ralsn 4643 . . . . . . . . . . . . 13 (∀𝑎 ∈ {(𝐴 |s 𝐵)}𝑐 <s 𝑎𝑐 <s (𝐴 |s 𝐵))
127124, 126sylibr 237 . . . . . . . . . . . 12 (((((𝐴 <<s 𝐵𝐶 <<s 𝐷) ∧ (∀𝑑𝐷 (𝐴 |s 𝐵) <s 𝑑 ∧ ∀𝑎𝐴 𝑎 <s (𝐶 |s 𝐷))) ∧ (𝐶 |s 𝐷) <s (𝐴 |s 𝐵)) ∧ 𝑐𝐶) → ∀𝑎 ∈ {(𝐴 |s 𝐵)}𝑐 <s 𝑎)
128127ralrimiva 3157 . . . . . . . . . . 11 ((((𝐴 <<s 𝐵𝐶 <<s 𝐷) ∧ (∀𝑑𝐷 (𝐴 |s 𝐵) <s 𝑑 ∧ ∀𝑎𝐴 𝑎 <s (𝐶 |s 𝐷))) ∧ (𝐶 |s 𝐷) <s (𝐴 |s 𝐵)) → ∀𝑐𝐶𝑎 ∈ {(𝐴 |s 𝐵)}𝑐 <s 𝑎)
129110, 111, 1283jca 1144 . . . . . . . . . 10 ((((𝐴 <<s 𝐵𝐶 <<s 𝐷) ∧ (∀𝑑𝐷 (𝐴 |s 𝐵) <s 𝑑 ∧ ∀𝑎𝐴 𝑎 <s (𝐶 |s 𝐷))) ∧ (𝐶 |s 𝐷) <s (𝐴 |s 𝐵)) → (𝐶 No ∧ {(𝐴 |s 𝐵)} ⊆ No ∧ ∀𝑐𝐶𝑎 ∈ {(𝐴 |s 𝐵)}𝑐 <s 𝑎))
130 brslts 27913 . . . . . . . . . 10 (𝐶 <<s {(𝐴 |s 𝐵)} ↔ ((𝐶 ∈ V ∧ {(𝐴 |s 𝐵)} ∈ V) ∧ (𝐶 No ∧ {(𝐴 |s 𝐵)} ⊆ No ∧ ∀𝑐𝐶𝑎 ∈ {(𝐴 |s 𝐵)}𝑐 <s 𝑎)))
131108, 129, 130sylanbrc 594 . . . . . . . . 9 ((((𝐴 <<s 𝐵𝐶 <<s 𝐷) ∧ (∀𝑑𝐷 (𝐴 |s 𝐵) <s 𝑑 ∧ ∀𝑎𝐴 𝑎 <s (𝐶 |s 𝐷))) ∧ (𝐶 |s 𝐷) <s (𝐴 |s 𝐵)) → 𝐶 <<s {(𝐴 |s 𝐵)})
132 sltsex2 27915 . . . . . . . . . . . 12 (𝐶 <<s 𝐷𝐷 ∈ V)
133132ad3antlr 743 . . . . . . . . . . 11 ((((𝐴 <<s 𝐵𝐶 <<s 𝐷) ∧ (∀𝑑𝐷 (𝐴 |s 𝐵) <s 𝑑 ∧ ∀𝑎𝐴 𝑎 <s (𝐶 |s 𝐷))) ∧ (𝐶 |s 𝐷) <s (𝐴 |s 𝐵)) → 𝐷 ∈ V)
134133, 107jctil 528 . . . . . . . . . 10 ((((𝐴 <<s 𝐵𝐶 <<s 𝐷) ∧ (∀𝑑𝐷 (𝐴 |s 𝐵) <s 𝑑 ∧ ∀𝑎𝐴 𝑎 <s (𝐶 |s 𝐷))) ∧ (𝐶 |s 𝐷) <s (𝐴 |s 𝐵)) → ({(𝐴 |s 𝐵)} ∈ V ∧ 𝐷 ∈ V))
1355ad3antlr 743 . . . . . . . . . . 11 ((((𝐴 <<s 𝐵𝐶 <<s 𝐷) ∧ (∀𝑑𝐷 (𝐴 |s 𝐵) <s 𝑑 ∧ ∀𝑎𝐴 𝑎 <s (𝐶 |s 𝐷))) ∧ (𝐶 |s 𝐷) <s (𝐴 |s 𝐵)) → 𝐷 No )
136 simplrl 788 . . . . . . . . . . . 12 ((((𝐴 <<s 𝐵𝐶 <<s 𝐷) ∧ (∀𝑑𝐷 (𝐴 |s 𝐵) <s 𝑑 ∧ ∀𝑎𝐴 𝑎 <s (𝐶 |s 𝐷))) ∧ (𝐶 |s 𝐷) <s (𝐴 |s 𝐵)) → ∀𝑑𝐷 (𝐴 |s 𝐵) <s 𝑑)
137 breq1 5108 . . . . . . . . . . . . . 14 (𝑎 = (𝐴 |s 𝐵) → (𝑎 <s 𝑑 ↔ (𝐴 |s 𝐵) <s 𝑑))
138137ralbidv 3188 . . . . . . . . . . . . 13 (𝑎 = (𝐴 |s 𝐵) → (∀𝑑𝐷 𝑎 <s 𝑑 ↔ ∀𝑑𝐷 (𝐴 |s 𝐵) <s 𝑑))
13935, 138ralsn 4643 . . . . . . . . . . . 12 (∀𝑎 ∈ {(𝐴 |s 𝐵)}∀𝑑𝐷 𝑎 <s 𝑑 ↔ ∀𝑑𝐷 (𝐴 |s 𝐵) <s 𝑑)
140136, 139sylibr 237 . . . . . . . . . . 11 ((((𝐴 <<s 𝐵𝐶 <<s 𝐷) ∧ (∀𝑑𝐷 (𝐴 |s 𝐵) <s 𝑑 ∧ ∀𝑎𝐴 𝑎 <s (𝐶 |s 𝐷))) ∧ (𝐶 |s 𝐷) <s (𝐴 |s 𝐵)) → ∀𝑎 ∈ {(𝐴 |s 𝐵)}∀𝑑𝐷 𝑎 <s 𝑑)
141111, 135, 1403jca 1144 . . . . . . . . . 10 ((((𝐴 <<s 𝐵𝐶 <<s 𝐷) ∧ (∀𝑑𝐷 (𝐴 |s 𝐵) <s 𝑑 ∧ ∀𝑎𝐴 𝑎 <s (𝐶 |s 𝐷))) ∧ (𝐶 |s 𝐷) <s (𝐴 |s 𝐵)) → ({(𝐴 |s 𝐵)} ⊆ No 𝐷 No ∧ ∀𝑎 ∈ {(𝐴 |s 𝐵)}∀𝑑𝐷 𝑎 <s 𝑑))
142 brslts 27913 . . . . . . . . . 10 ({(𝐴 |s 𝐵)} <<s 𝐷 ↔ (({(𝐴 |s 𝐵)} ∈ V ∧ 𝐷 ∈ V) ∧ ({(𝐴 |s 𝐵)} ⊆ No 𝐷 No ∧ ∀𝑎 ∈ {(𝐴 |s 𝐵)}∀𝑑𝐷 𝑎 <s 𝑑)))
143134, 141, 142sylanbrc 594 . . . . . . . . 9 ((((𝐴 <<s 𝐵𝐶 <<s 𝐷) ∧ (∀𝑑𝐷 (𝐴 |s 𝐵) <s 𝑑 ∧ ∀𝑎𝐴 𝑎 <s (𝐶 |s 𝐷))) ∧ (𝐶 |s 𝐷) <s (𝐴 |s 𝐵)) → {(𝐴 |s 𝐵)} <<s 𝐷)
144 cutbdaylt 27949 . . . . . . . . 9 (((𝐴 |s 𝐵) ∈ No ∧ (𝐶 <<s {(𝐴 |s 𝐵)} ∧ {(𝐴 |s 𝐵)} <<s 𝐷) ∧ (𝐴 |s 𝐵) ≠ (𝐶 |s 𝐷)) → ( bday ‘(𝐶 |s 𝐷)) ∈ ( bday ‘(𝐴 |s 𝐵)))
145104, 131, 143, 100, 144syl121anc 1398 . . . . . . . 8 ((((𝐴 <<s 𝐵𝐶 <<s 𝐷) ∧ (∀𝑑𝐷 (𝐴 |s 𝐵) <s 𝑑 ∧ ∀𝑎𝐴 𝑎 <s (𝐶 |s 𝐷))) ∧ (𝐶 |s 𝐷) <s (𝐴 |s 𝐵)) → ( bday ‘(𝐶 |s 𝐷)) ∈ ( bday ‘(𝐴 |s 𝐵)))
146103, 145jca 520 . . . . . . 7 ((((𝐴 <<s 𝐵𝐶 <<s 𝐷) ∧ (∀𝑑𝐷 (𝐴 |s 𝐵) <s 𝑑 ∧ ∀𝑎𝐴 𝑎 <s (𝐶 |s 𝐷))) ∧ (𝐶 |s 𝐷) <s (𝐴 |s 𝐵)) → (( bday ‘(𝐴 |s 𝐵)) ∈ ( bday ‘(𝐶 |s 𝐷)) ∧ ( bday ‘(𝐶 |s 𝐷)) ∈ ( bday ‘(𝐴 |s 𝐵))))
147146ex 417 . . . . . 6 (((𝐴 <<s 𝐵𝐶 <<s 𝐷) ∧ (∀𝑑𝐷 (𝐴 |s 𝐵) <s 𝑑 ∧ ∀𝑎𝐴 𝑎 <s (𝐶 |s 𝐷))) → ((𝐶 |s 𝐷) <s (𝐴 |s 𝐵) → (( bday ‘(𝐴 |s 𝐵)) ∈ ( bday ‘(𝐶 |s 𝐷)) ∧ ( bday ‘(𝐶 |s 𝐷)) ∈ ( bday ‘(𝐴 |s 𝐵)))))
14851, 147sylbird 263 . . . . 5 (((𝐴 <<s 𝐵𝐶 <<s 𝐷) ∧ (∀𝑑𝐷 (𝐴 |s 𝐵) <s 𝑑 ∧ ∀𝑎𝐴 𝑎 <s (𝐶 |s 𝐷))) → (¬ (𝐴 |s 𝐵) ≤s (𝐶 |s 𝐷) → (( bday ‘(𝐴 |s 𝐵)) ∈ ( bday ‘(𝐶 |s 𝐷)) ∧ ( bday ‘(𝐶 |s 𝐷)) ∈ ( bday ‘(𝐴 |s 𝐵)))))
14946, 148mt3i 150 . . . 4 (((𝐴 <<s 𝐵𝐶 <<s 𝐷) ∧ (∀𝑑𝐷 (𝐴 |s 𝐵) <s 𝑑 ∧ ∀𝑎𝐴 𝑎 <s (𝐶 |s 𝐷))) → (𝐴 |s 𝐵) ≤s (𝐶 |s 𝐷))
15042, 149impbida 812 . . 3 ((𝐴 <<s 𝐵𝐶 <<s 𝐷) → ((𝐴 |s 𝐵) ≤s (𝐶 |s 𝐷) ↔ (∀𝑑𝐷 (𝐴 |s 𝐵) <s 𝑑 ∧ ∀𝑎𝐴 𝑎 <s (𝐶 |s 𝐷))))
151 breq12 5110 . . . 4 ((𝑋 = (𝐴 |s 𝐵) ∧ 𝑌 = (𝐶 |s 𝐷)) → (𝑋 ≤s 𝑌 ↔ (𝐴 |s 𝐵) ≤s (𝐶 |s 𝐷)))
152 breq1 5108 . . . . . 6 (𝑋 = (𝐴 |s 𝐵) → (𝑋 <s 𝑑 ↔ (𝐴 |s 𝐵) <s 𝑑))
153152ralbidv 3188 . . . . 5 (𝑋 = (𝐴 |s 𝐵) → (∀𝑑𝐷 𝑋 <s 𝑑 ↔ ∀𝑑𝐷 (𝐴 |s 𝐵) <s 𝑑))
154 breq2 5109 . . . . . 6 (𝑌 = (𝐶 |s 𝐷) → (𝑎 <s 𝑌𝑎 <s (𝐶 |s 𝐷)))
155154ralbidv 3188 . . . . 5 (𝑌 = (𝐶 |s 𝐷) → (∀𝑎𝐴 𝑎 <s 𝑌 ↔ ∀𝑎𝐴 𝑎 <s (𝐶 |s 𝐷)))
156153, 155bi2anan9 649 . . . 4 ((𝑋 = (𝐴 |s 𝐵) ∧ 𝑌 = (𝐶 |s 𝐷)) → ((∀𝑑𝐷 𝑋 <s 𝑑 ∧ ∀𝑎𝐴 𝑎 <s 𝑌) ↔ (∀𝑑𝐷 (𝐴 |s 𝐵) <s 𝑑 ∧ ∀𝑎𝐴 𝑎 <s (𝐶 |s 𝐷))))
157151, 156bibi12d 348 . . 3 ((𝑋 = (𝐴 |s 𝐵) ∧ 𝑌 = (𝐶 |s 𝐷)) → ((𝑋 ≤s 𝑌 ↔ (∀𝑑𝐷 𝑋 <s 𝑑 ∧ ∀𝑎𝐴 𝑎 <s 𝑌)) ↔ ((𝐴 |s 𝐵) ≤s (𝐶 |s 𝐷) ↔ (∀𝑑𝐷 (𝐴 |s 𝐵) <s 𝑑 ∧ ∀𝑎𝐴 𝑎 <s (𝐶 |s 𝐷)))))
158150, 157imbitrrid 249 . 2 ((𝑋 = (𝐴 |s 𝐵) ∧ 𝑌 = (𝐶 |s 𝐷)) → ((𝐴 <<s 𝐵𝐶 <<s 𝐷) → (𝑋 ≤s 𝑌 ↔ (∀𝑑𝐷 𝑋 <s 𝑑 ∧ ∀𝑎𝐴 𝑎 <s 𝑌))))
159158impcom 412 1 (((𝐴 <<s 𝐵𝐶 <<s 𝐷) ∧ (𝑋 = (𝐴 |s 𝐵) ∧ 𝑌 = (𝐶 |s 𝐷))) → (𝑋 ≤s 𝑌 ↔ (∀𝑑𝐷 𝑋 <s 𝑑 ∧ ∀𝑎𝐴 𝑎 <s 𝑌)))
Colors of variables: wff setvar class
Syntax hints:  ¬ wn 3  wi 4  wb 209  wa 400  w3a 1101   = wceq 1563  wcel 2145  wne 2960  wral 3079  Vcvv 3457  wss 3907  {csn 4585   class class class wbr 5105  Ord word 6349  cfv 6525  (class class class)co 7400   No csur 27762   <s clts 27763   bday cbday 27764   ≤s cles 27866   <<s cslts 27908   |s ccuts 27910
This theorem was proved from axioms:  ax-mp 5  ax-1 6  ax-2 7  ax-3 8  ax-gen 1818  ax-4 1832  ax-5 1933  ax-6 1990  ax-7 2031  ax-8 2147  ax-9 2155  ax-10 2178  ax-11 2194  ax-12 2215  ax-ext 2737  ax-rep 5232  ax-sep 5251  ax-nul 5261  ax-pow 5327  ax-pr 5395  ax-un 7722
This theorem depends on definitions:  df-bi 210  df-an 401  df-or 861  df-3or 1102  df-3an 1103  df-tru 1566  df-fal 1576  df-ex 1803  df-nf 1807  df-sb 2094  df-mo 2569  df-eu 2599  df-clab 2744  df-cleq 2757  df-clel 2840  df-nfc 2914  df-ne 2961  df-ral 3080  df-rex 3090  df-rmo 3370  df-reu 3371  df-rab 3418  df-v 3459  df-sbc 3748  df-csb 3856  df-dif 3910  df-un 3912  df-in 3914  df-ss 3924  df-pss 3927  df-nul 4289  df-if 4484  df-pw 4560  df-sn 4586  df-pr 4588  df-tp 4590  df-op 4592  df-uni 4869  df-int 4909  df-br 5106  df-opab 5168  df-mpt 5187  df-tr 5213  df-id 5547  df-eprel 5552  df-po 5560  df-so 5561  df-fr 5605  df-we 5607  df-xp 5658  df-rel 5659  df-cnv 5660  df-co 5661  df-dm 5662  df-rn 5663  df-res 5664  df-ima 5665  df-ord 6353  df-on 6354  df-suc 6356  df-iota 6481  df-fun 6527  df-fn 6528  df-f 6529  df-f1 6530  df-fo 6531  df-f1o 6532  df-fv 6533  df-riota 7357  df-ov 7403  df-oprab 7404  df-mpo 7405  df-1o 8441  df-2o 8442  df-no 27765  df-lts 27766  df-bday 27767  df-les 27867  df-slts 27909  df-cuts 27911
This theorem is referenced by:  lesrecd  27951  twocut  28574
  Copyright terms: Public domain W3C validator