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

Theorem lesrec 27816
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 27799 . . . . . . . 8 (𝐴 <<s 𝐵 → (𝐴 |s 𝐵) ∈ No )
21ad3antrrr 736 . . . . . . 7 ((((𝐴 <<s 𝐵𝐶 <<s 𝐷) ∧ (𝐴 |s 𝐵) ≤s (𝐶 |s 𝐷)) ∧ 𝑑𝐷) → (𝐴 |s 𝐵) ∈ No )
3 cutscl 27799 . . . . . . . 8 (𝐶 <<s 𝐷 → (𝐶 |s 𝐷) ∈ No )
43ad3antlr 737 . . . . . . 7 ((((𝐴 <<s 𝐵𝐶 <<s 𝐷) ∧ (𝐴 |s 𝐵) ≤s (𝐶 |s 𝐷)) ∧ 𝑑𝐷) → (𝐶 |s 𝐷) ∈ No )
5 sltsss2 27783 . . . . . . . . 9 (𝐶 <<s 𝐷𝐷 No )
65ad2antlr 733 . . . . . . . 8 (((𝐴 <<s 𝐵𝐶 <<s 𝐷) ∧ (𝐴 |s 𝐵) ≤s (𝐶 |s 𝐷)) → 𝐷 No )
76sselda 3922 . . . . . . 7 ((((𝐴 <<s 𝐵𝐶 <<s 𝐷) ∧ (𝐴 |s 𝐵) ≤s (𝐶 |s 𝐷)) ∧ 𝑑𝐷) → 𝑑 No )
8 simplr 774 . . . . . . 7 ((((𝐴 <<s 𝐵𝐶 <<s 𝐷) ∧ (𝐴 |s 𝐵) ≤s (𝐶 |s 𝐷)) ∧ 𝑑𝐷) → (𝐴 |s 𝐵) ≤s (𝐶 |s 𝐷))
9 cutcuts 27798 . . . . . . . . . . . 12 (𝐶 <<s 𝐷 → ((𝐶 |s 𝐷) ∈ No 𝐶 <<s {(𝐶 |s 𝐷)} ∧ {(𝐶 |s 𝐷)} <<s 𝐷))
109simp3d 1150 . . . . . . . . . . 11 (𝐶 <<s 𝐷 → {(𝐶 |s 𝐷)} <<s 𝐷)
1110ad2antlr 733 . . . . . . . . . 10 (((𝐴 <<s 𝐵𝐶 <<s 𝐷) ∧ (𝐴 |s 𝐵) ≤s (𝐶 |s 𝐷)) → {(𝐶 |s 𝐷)} <<s 𝐷)
12 sltssep 27784 . . . . . . . . . 10 ({(𝐶 |s 𝐷)} <<s 𝐷 → ∀𝑎 ∈ {(𝐶 |s 𝐷)}∀𝑑𝐷 𝑎 <s 𝑑)
1311, 12syl 17 . . . . . . . . 9 (((𝐴 <<s 𝐵𝐶 <<s 𝐷) ∧ (𝐴 |s 𝐵) ≤s (𝐶 |s 𝐷)) → ∀𝑎 ∈ {(𝐶 |s 𝐷)}∀𝑑𝐷 𝑎 <s 𝑑)
14 ovex 7396 . . . . . . . . . 10 (𝐶 |s 𝐷) ∈ V
15 breq1 5082 . . . . . . . . . . 11 (𝑎 = (𝐶 |s 𝐷) → (𝑎 <s 𝑑 ↔ (𝐶 |s 𝐷) <s 𝑑))
1615ralbidv 3163 . . . . . . . . . 10 (𝑎 = (𝐶 |s 𝐷) → (∀𝑑𝐷 𝑎 <s 𝑑 ↔ ∀𝑑𝐷 (𝐶 |s 𝐷) <s 𝑑))
1714, 16ralsn 4620 . . . . . . . . 9 (∀𝑎 ∈ {(𝐶 |s 𝐷)}∀𝑑𝐷 𝑎 <s 𝑑 ↔ ∀𝑑𝐷 (𝐶 |s 𝐷) <s 𝑑)
1813, 17sylib 219 . . . . . . . 8 (((𝐴 <<s 𝐵𝐶 <<s 𝐷) ∧ (𝐴 |s 𝐵) ≤s (𝐶 |s 𝐷)) → ∀𝑑𝐷 (𝐶 |s 𝐷) <s 𝑑)
1918r19.21bi 3232 . . . . . . 7 ((((𝐴 <<s 𝐵𝐶 <<s 𝐷) ∧ (𝐴 |s 𝐵) ≤s (𝐶 |s 𝐷)) ∧ 𝑑𝐷) → (𝐶 |s 𝐷) <s 𝑑)
202, 4, 7, 8, 19leltstrd 27754 . . . . . 6 ((((𝐴 <<s 𝐵𝐶 <<s 𝐷) ∧ (𝐴 |s 𝐵) ≤s (𝐶 |s 𝐷)) ∧ 𝑑𝐷) → (𝐴 |s 𝐵) <s 𝑑)
2120ralrimiva 3132 . . . . 5 (((𝐴 <<s 𝐵𝐶 <<s 𝐷) ∧ (𝐴 |s 𝐵) ≤s (𝐶 |s 𝐷)) → ∀𝑑𝐷 (𝐴 |s 𝐵) <s 𝑑)
22 sltsss1 27782 . . . . . . . . . 10 (𝐴 <<s 𝐵𝐴 No )
2322adantr 481 . . . . . . . . 9 ((𝐴 <<s 𝐵𝐶 <<s 𝐷) → 𝐴 No )
2423adantr 481 . . . . . . . 8 (((𝐴 <<s 𝐵𝐶 <<s 𝐷) ∧ (𝐴 |s 𝐵) ≤s (𝐶 |s 𝐷)) → 𝐴 No )
2524sselda 3922 . . . . . . 7 ((((𝐴 <<s 𝐵𝐶 <<s 𝐷) ∧ (𝐴 |s 𝐵) ≤s (𝐶 |s 𝐷)) ∧ 𝑎𝐴) → 𝑎 No )
261ad3antrrr 736 . . . . . . 7 ((((𝐴 <<s 𝐵𝐶 <<s 𝐷) ∧ (𝐴 |s 𝐵) ≤s (𝐶 |s 𝐷)) ∧ 𝑎𝐴) → (𝐴 |s 𝐵) ∈ No )
273ad3antlr 737 . . . . . . 7 ((((𝐴 <<s 𝐵𝐶 <<s 𝐷) ∧ (𝐴 |s 𝐵) ≤s (𝐶 |s 𝐷)) ∧ 𝑎𝐴) → (𝐶 |s 𝐷) ∈ No )
28 cutcuts 27798 . . . . . . . . . . . . 13 (𝐴 <<s 𝐵 → ((𝐴 |s 𝐵) ∈ No 𝐴 <<s {(𝐴 |s 𝐵)} ∧ {(𝐴 |s 𝐵)} <<s 𝐵))
2928simp2d 1149 . . . . . . . . . . . 12 (𝐴 <<s 𝐵𝐴 <<s {(𝐴 |s 𝐵)})
3029adantr 481 . . . . . . . . . . 11 ((𝐴 <<s 𝐵𝐶 <<s 𝐷) → 𝐴 <<s {(𝐴 |s 𝐵)})
3130adantr 481 . . . . . . . . . 10 (((𝐴 <<s 𝐵𝐶 <<s 𝐷) ∧ (𝐴 |s 𝐵) ≤s (𝐶 |s 𝐷)) → 𝐴 <<s {(𝐴 |s 𝐵)})
32 sltssep 27784 . . . . . . . . . 10 (𝐴 <<s {(𝐴 |s 𝐵)} → ∀𝑎𝐴𝑑 ∈ {(𝐴 |s 𝐵)}𝑎 <s 𝑑)
3331, 32syl 17 . . . . . . . . 9 (((𝐴 <<s 𝐵𝐶 <<s 𝐷) ∧ (𝐴 |s 𝐵) ≤s (𝐶 |s 𝐷)) → ∀𝑎𝐴𝑑 ∈ {(𝐴 |s 𝐵)}𝑎 <s 𝑑)
3433r19.21bi 3232 . . . . . . . 8 ((((𝐴 <<s 𝐵𝐶 <<s 𝐷) ∧ (𝐴 |s 𝐵) ≤s (𝐶 |s 𝐷)) ∧ 𝑎𝐴) → ∀𝑑 ∈ {(𝐴 |s 𝐵)}𝑎 <s 𝑑)
35 ovex 7396 . . . . . . . . 9 (𝐴 |s 𝐵) ∈ V
36 breq2 5083 . . . . . . . . 9 (𝑑 = (𝐴 |s 𝐵) → (𝑎 <s 𝑑𝑎 <s (𝐴 |s 𝐵)))
3735, 36ralsn 4620 . . . . . . . 8 (∀𝑑 ∈ {(𝐴 |s 𝐵)}𝑎 <s 𝑑𝑎 <s (𝐴 |s 𝐵))
3834, 37sylib 219 . . . . . . 7 ((((𝐴 <<s 𝐵𝐶 <<s 𝐷) ∧ (𝐴 |s 𝐵) ≤s (𝐶 |s 𝐷)) ∧ 𝑎𝐴) → 𝑎 <s (𝐴 |s 𝐵))
39 simplr 774 . . . . . . 7 ((((𝐴 <<s 𝐵𝐶 <<s 𝐷) ∧ (𝐴 |s 𝐵) ≤s (𝐶 |s 𝐷)) ∧ 𝑎𝐴) → (𝐴 |s 𝐵) ≤s (𝐶 |s 𝐷))
4025, 26, 27, 38, 39ltlestrd 27753 . . . . . 6 ((((𝐴 <<s 𝐵𝐶 <<s 𝐷) ∧ (𝐴 |s 𝐵) ≤s (𝐶 |s 𝐷)) ∧ 𝑎𝐴) → 𝑎 <s (𝐶 |s 𝐷))
4140ralrimiva 3132 . . . . 5 (((𝐴 <<s 𝐵𝐶 <<s 𝐷) ∧ (𝐴 |s 𝐵) ≤s (𝐶 |s 𝐷)) → ∀𝑎𝐴 𝑎 <s (𝐶 |s 𝐷))
4221, 41jca 516 . . . 4 (((𝐴 <<s 𝐵𝐶 <<s 𝐷) ∧ (𝐴 |s 𝐵) ≤s (𝐶 |s 𝐷)) → (∀𝑑𝐷 (𝐴 |s 𝐵) <s 𝑑 ∧ ∀𝑎𝐴 𝑎 <s (𝐶 |s 𝐷)))
43 bdayon 27769 . . . . . . 7 ( bday ‘(𝐴 |s 𝐵)) ∈ On
4443onordi 6430 . . . . . 6 Ord ( bday ‘(𝐴 |s 𝐵))
45 ordn2lp 6337 . . . . . 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 733 . . . . . . 7 (((𝐴 <<s 𝐵𝐶 <<s 𝐷) ∧ (∀𝑑𝐷 (𝐴 |s 𝐵) <s 𝑑 ∧ ∀𝑎𝐴 𝑎 <s (𝐶 |s 𝐷))) → (𝐶 |s 𝐷) ∈ No )
481adantr 481 . . . . . . . 8 ((𝐴 <<s 𝐵𝐶 <<s 𝐷) → (𝐴 |s 𝐵) ∈ No )
4948adantr 481 . . . . . . 7 (((𝐴 <<s 𝐵𝐶 <<s 𝐷) ∧ (∀𝑑𝐷 (𝐴 |s 𝐵) <s 𝑑 ∧ ∀𝑎𝐴 𝑎 <s (𝐶 |s 𝐷))) → (𝐴 |s 𝐵) ∈ No )
50 ltnles 27742 . . . . . . 7 (((𝐶 |s 𝐷) ∈ No ∧ (𝐴 |s 𝐵) ∈ No ) → ((𝐶 |s 𝐷) <s (𝐴 |s 𝐵) ↔ ¬ (𝐴 |s 𝐵) ≤s (𝐶 |s 𝐷)))
5147, 49, 50syl2anc 590 . . . . . 6 (((𝐴 <<s 𝐵𝐶 <<s 𝐷) ∧ (∀𝑑𝐷 (𝐴 |s 𝐵) <s 𝑑 ∧ ∀𝑎𝐴 𝑎 <s (𝐶 |s 𝐷))) → ((𝐶 |s 𝐷) <s (𝐴 |s 𝐵) ↔ ¬ (𝐴 |s 𝐵) ≤s (𝐶 |s 𝐷)))
523ad3antlr 737 . . . . . . . . 9 ((((𝐴 <<s 𝐵𝐶 <<s 𝐷) ∧ (∀𝑑𝐷 (𝐴 |s 𝐵) <s 𝑑 ∧ ∀𝑎𝐴 𝑎 <s (𝐶 |s 𝐷))) ∧ (𝐶 |s 𝐷) <s (𝐴 |s 𝐵)) → (𝐶 |s 𝐷) ∈ No )
53 sltsex1 27780 . . . . . . . . . . . 12 (𝐴 <<s 𝐵𝐴 ∈ V)
5453ad3antrrr 736 . . . . . . . . . . 11 ((((𝐴 <<s 𝐵𝐶 <<s 𝐷) ∧ (∀𝑑𝐷 (𝐴 |s 𝐵) <s 𝑑 ∧ ∀𝑎𝐴 𝑎 <s (𝐶 |s 𝐷))) ∧ (𝐶 |s 𝐷) <s (𝐴 |s 𝐵)) → 𝐴 ∈ V)
55 snex 5375 . . . . . . . . . . 11 {(𝐶 |s 𝐷)} ∈ V
5654, 55jctir 525 . . . . . . . . . 10 ((((𝐴 <<s 𝐵𝐶 <<s 𝐷) ∧ (∀𝑑𝐷 (𝐴 |s 𝐵) <s 𝑑 ∧ ∀𝑎𝐴 𝑎 <s (𝐶 |s 𝐷))) ∧ (𝐶 |s 𝐷) <s (𝐴 |s 𝐵)) → (𝐴 ∈ V ∧ {(𝐶 |s 𝐷)} ∈ V))
5722ad3antrrr 736 . . . . . . . . . . 11 ((((𝐴 <<s 𝐵𝐶 <<s 𝐷) ∧ (∀𝑑𝐷 (𝐴 |s 𝐵) <s 𝑑 ∧ ∀𝑎𝐴 𝑎 <s (𝐶 |s 𝐷))) ∧ (𝐶 |s 𝐷) <s (𝐴 |s 𝐵)) → 𝐴 No )
5852snssd 4725 . . . . . . . . . . 11 ((((𝐴 <<s 𝐵𝐶 <<s 𝐷) ∧ (∀𝑑𝐷 (𝐴 |s 𝐵) <s 𝑑 ∧ ∀𝑎𝐴 𝑎 <s (𝐶 |s 𝐷))) ∧ (𝐶 |s 𝐷) <s (𝐴 |s 𝐵)) → {(𝐶 |s 𝐷)} ⊆ No )
59 simplrr 783 . . . . . . . . . . . 12 ((((𝐴 <<s 𝐵𝐶 <<s 𝐷) ∧ (∀𝑑𝐷 (𝐴 |s 𝐵) <s 𝑑 ∧ ∀𝑎𝐴 𝑎 <s (𝐶 |s 𝐷))) ∧ (𝐶 |s 𝐷) <s (𝐴 |s 𝐵)) → ∀𝑎𝐴 𝑎 <s (𝐶 |s 𝐷))
60 breq2 5083 . . . . . . . . . . . . . 14 (𝑑 = (𝐶 |s 𝐷) → (𝑎 <s 𝑑𝑎 <s (𝐶 |s 𝐷)))
6114, 60ralsn 4620 . . . . . . . . . . . . 13 (∀𝑑 ∈ {(𝐶 |s 𝐷)}𝑎 <s 𝑑𝑎 <s (𝐶 |s 𝐷))
6261ralbii 3086 . . . . . . . . . . . 12 (∀𝑎𝐴𝑑 ∈ {(𝐶 |s 𝐷)}𝑎 <s 𝑑 ↔ ∀𝑎𝐴 𝑎 <s (𝐶 |s 𝐷))
6359, 62sylibr 235 . . . . . . . . . . 11 ((((𝐴 <<s 𝐵𝐶 <<s 𝐷) ∧ (∀𝑑𝐷 (𝐴 |s 𝐵) <s 𝑑 ∧ ∀𝑎𝐴 𝑎 <s (𝐶 |s 𝐷))) ∧ (𝐶 |s 𝐷) <s (𝐴 |s 𝐵)) → ∀𝑎𝐴𝑑 ∈ {(𝐶 |s 𝐷)}𝑎 <s 𝑑)
6457, 58, 633jca 1134 . . . . . . . . . 10 ((((𝐴 <<s 𝐵𝐶 <<s 𝐷) ∧ (∀𝑑𝐷 (𝐴 |s 𝐵) <s 𝑑 ∧ ∀𝑎𝐴 𝑎 <s (𝐶 |s 𝐷))) ∧ (𝐶 |s 𝐷) <s (𝐴 |s 𝐵)) → (𝐴 No ∧ {(𝐶 |s 𝐷)} ⊆ No ∧ ∀𝑎𝐴𝑑 ∈ {(𝐶 |s 𝐷)}𝑎 <s 𝑑))
65 brslts 27779 . . . . . . . . . 10 (𝐴 <<s {(𝐶 |s 𝐷)} ↔ ((𝐴 ∈ V ∧ {(𝐶 |s 𝐷)} ∈ V) ∧ (𝐴 No ∧ {(𝐶 |s 𝐷)} ⊆ No ∧ ∀𝑎𝐴𝑑 ∈ {(𝐶 |s 𝐷)}𝑎 <s 𝑑)))
6656, 64, 65sylanbrc 589 . . . . . . . . 9 ((((𝐴 <<s 𝐵𝐶 <<s 𝐷) ∧ (∀𝑑𝐷 (𝐴 |s 𝐵) <s 𝑑 ∧ ∀𝑎𝐴 𝑎 <s (𝐶 |s 𝐷))) ∧ (𝐶 |s 𝐷) <s (𝐴 |s 𝐵)) → 𝐴 <<s {(𝐶 |s 𝐷)})
67 sltsex2 27781 . . . . . . . . . . . 12 (𝐴 <<s 𝐵𝐵 ∈ V)
6867ad3antrrr 736 . . . . . . . . . . 11 ((((𝐴 <<s 𝐵𝐶 <<s 𝐷) ∧ (∀𝑑𝐷 (𝐴 |s 𝐵) <s 𝑑 ∧ ∀𝑎𝐴 𝑎 <s (𝐶 |s 𝐷))) ∧ (𝐶 |s 𝐷) <s (𝐴 |s 𝐵)) → 𝐵 ∈ V)
6968, 55jctil 524 . . . . . . . . . 10 ((((𝐴 <<s 𝐵𝐶 <<s 𝐷) ∧ (∀𝑑𝐷 (𝐴 |s 𝐵) <s 𝑑 ∧ ∀𝑎𝐴 𝑎 <s (𝐶 |s 𝐷))) ∧ (𝐶 |s 𝐷) <s (𝐴 |s 𝐵)) → ({(𝐶 |s 𝐷)} ∈ V ∧ 𝐵 ∈ V))
70 sltsss2 27783 . . . . . . . . . . . 12 (𝐴 <<s 𝐵𝐵 No )
7170ad3antrrr 736 . . . . . . . . . . 11 ((((𝐴 <<s 𝐵𝐶 <<s 𝐷) ∧ (∀𝑑𝐷 (𝐴 |s 𝐵) <s 𝑑 ∧ ∀𝑎𝐴 𝑎 <s (𝐶 |s 𝐷))) ∧ (𝐶 |s 𝐷) <s (𝐴 |s 𝐵)) → 𝐵 No )
7252adantr 481 . . . . . . . . . . . . . 14 (((((𝐴 <<s 𝐵𝐶 <<s 𝐷) ∧ (∀𝑑𝐷 (𝐴 |s 𝐵) <s 𝑑 ∧ ∀𝑎𝐴 𝑎 <s (𝐶 |s 𝐷))) ∧ (𝐶 |s 𝐷) <s (𝐴 |s 𝐵)) ∧ 𝑏𝐵) → (𝐶 |s 𝐷) ∈ No )
7348ad3antrrr 736 . . . . . . . . . . . . . 14 (((((𝐴 <<s 𝐵𝐶 <<s 𝐷) ∧ (∀𝑑𝐷 (𝐴 |s 𝐵) <s 𝑑 ∧ ∀𝑎𝐴 𝑎 <s (𝐶 |s 𝐷))) ∧ (𝐶 |s 𝐷) <s (𝐴 |s 𝐵)) ∧ 𝑏𝐵) → (𝐴 |s 𝐵) ∈ No )
7471sselda 3922 . . . . . . . . . . . . . 14 (((((𝐴 <<s 𝐵𝐶 <<s 𝐷) ∧ (∀𝑑𝐷 (𝐴 |s 𝐵) <s 𝑑 ∧ ∀𝑎𝐴 𝑎 <s (𝐶 |s 𝐷))) ∧ (𝐶 |s 𝐷) <s (𝐴 |s 𝐵)) ∧ 𝑏𝐵) → 𝑏 No )
75 simplr 774 . . . . . . . . . . . . . 14 (((((𝐴 <<s 𝐵𝐶 <<s 𝐷) ∧ (∀𝑑𝐷 (𝐴 |s 𝐵) <s 𝑑 ∧ ∀𝑎𝐴 𝑎 <s (𝐶 |s 𝐷))) ∧ (𝐶 |s 𝐷) <s (𝐴 |s 𝐵)) ∧ 𝑏𝐵) → (𝐶 |s 𝐷) <s (𝐴 |s 𝐵))
7628simp3d 1150 . . . . . . . . . . . . . . . . . 18 (𝐴 <<s 𝐵 → {(𝐴 |s 𝐵)} <<s 𝐵)
7776ad3antrrr 736 . . . . . . . . . . . . . . . . 17 ((((𝐴 <<s 𝐵𝐶 <<s 𝐷) ∧ (∀𝑑𝐷 (𝐴 |s 𝐵) <s 𝑑 ∧ ∀𝑎𝐴 𝑎 <s (𝐶 |s 𝐷))) ∧ (𝐶 |s 𝐷) <s (𝐴 |s 𝐵)) → {(𝐴 |s 𝐵)} <<s 𝐵)
78 sltssep 27784 . . . . . . . . . . . . . . . . 17 ({(𝐴 |s 𝐵)} <<s 𝐵 → ∀𝑎 ∈ {(𝐴 |s 𝐵)}∀𝑏𝐵 𝑎 <s 𝑏)
7977, 78syl 17 . . . . . . . . . . . . . . . 16 ((((𝐴 <<s 𝐵𝐶 <<s 𝐷) ∧ (∀𝑑𝐷 (𝐴 |s 𝐵) <s 𝑑 ∧ ∀𝑎𝐴 𝑎 <s (𝐶 |s 𝐷))) ∧ (𝐶 |s 𝐷) <s (𝐴 |s 𝐵)) → ∀𝑎 ∈ {(𝐴 |s 𝐵)}∀𝑏𝐵 𝑎 <s 𝑏)
80 breq1 5082 . . . . . . . . . . . . . . . . . 18 (𝑎 = (𝐴 |s 𝐵) → (𝑎 <s 𝑏 ↔ (𝐴 |s 𝐵) <s 𝑏))
8180ralbidv 3163 . . . . . . . . . . . . . . . . 17 (𝑎 = (𝐴 |s 𝐵) → (∀𝑏𝐵 𝑎 <s 𝑏 ↔ ∀𝑏𝐵 (𝐴 |s 𝐵) <s 𝑏))
8235, 81ralsn 4620 . . . . . . . . . . . . . . . 16 (∀𝑎 ∈ {(𝐴 |s 𝐵)}∀𝑏𝐵 𝑎 <s 𝑏 ↔ ∀𝑏𝐵 (𝐴 |s 𝐵) <s 𝑏)
8379, 82sylib 219 . . . . . . . . . . . . . . 15 ((((𝐴 <<s 𝐵𝐶 <<s 𝐷) ∧ (∀𝑑𝐷 (𝐴 |s 𝐵) <s 𝑑 ∧ ∀𝑎𝐴 𝑎 <s (𝐶 |s 𝐷))) ∧ (𝐶 |s 𝐷) <s (𝐴 |s 𝐵)) → ∀𝑏𝐵 (𝐴 |s 𝐵) <s 𝑏)
8483r19.21bi 3232 . . . . . . . . . . . . . 14 (((((𝐴 <<s 𝐵𝐶 <<s 𝐷) ∧ (∀𝑑𝐷 (𝐴 |s 𝐵) <s 𝑑 ∧ ∀𝑎𝐴 𝑎 <s (𝐶 |s 𝐷))) ∧ (𝐶 |s 𝐷) <s (𝐴 |s 𝐵)) ∧ 𝑏𝐵) → (𝐴 |s 𝐵) <s 𝑏)
8572, 73, 74, 75, 84ltstrd 27752 . . . . . . . . . . . . 13 (((((𝐴 <<s 𝐵𝐶 <<s 𝐷) ∧ (∀𝑑𝐷 (𝐴 |s 𝐵) <s 𝑑 ∧ ∀𝑎𝐴 𝑎 <s (𝐶 |s 𝐷))) ∧ (𝐶 |s 𝐷) <s (𝐴 |s 𝐵)) ∧ 𝑏𝐵) → (𝐶 |s 𝐷) <s 𝑏)
8685ralrimiva 3132 . . . . . . . . . . . 12 ((((𝐴 <<s 𝐵𝐶 <<s 𝐷) ∧ (∀𝑑𝐷 (𝐴 |s 𝐵) <s 𝑑 ∧ ∀𝑎𝐴 𝑎 <s (𝐶 |s 𝐷))) ∧ (𝐶 |s 𝐷) <s (𝐴 |s 𝐵)) → ∀𝑏𝐵 (𝐶 |s 𝐷) <s 𝑏)
87 breq1 5082 . . . . . . . . . . . . . 14 (𝑎 = (𝐶 |s 𝐷) → (𝑎 <s 𝑏 ↔ (𝐶 |s 𝐷) <s 𝑏))
8887ralbidv 3163 . . . . . . . . . . . . 13 (𝑎 = (𝐶 |s 𝐷) → (∀𝑏𝐵 𝑎 <s 𝑏 ↔ ∀𝑏𝐵 (𝐶 |s 𝐷) <s 𝑏))
8914, 88ralsn 4620 . . . . . . . . . . . 12 (∀𝑎 ∈ {(𝐶 |s 𝐷)}∀𝑏𝐵 𝑎 <s 𝑏 ↔ ∀𝑏𝐵 (𝐶 |s 𝐷) <s 𝑏)
9086, 89sylibr 235 . . . . . . . . . . 11 ((((𝐴 <<s 𝐵𝐶 <<s 𝐷) ∧ (∀𝑑𝐷 (𝐴 |s 𝐵) <s 𝑑 ∧ ∀𝑎𝐴 𝑎 <s (𝐶 |s 𝐷))) ∧ (𝐶 |s 𝐷) <s (𝐴 |s 𝐵)) → ∀𝑎 ∈ {(𝐶 |s 𝐷)}∀𝑏𝐵 𝑎 <s 𝑏)
9158, 71, 903jca 1134 . . . . . . . . . 10 ((((𝐴 <<s 𝐵𝐶 <<s 𝐷) ∧ (∀𝑑𝐷 (𝐴 |s 𝐵) <s 𝑑 ∧ ∀𝑎𝐴 𝑎 <s (𝐶 |s 𝐷))) ∧ (𝐶 |s 𝐷) <s (𝐴 |s 𝐵)) → ({(𝐶 |s 𝐷)} ⊆ No 𝐵 No ∧ ∀𝑎 ∈ {(𝐶 |s 𝐷)}∀𝑏𝐵 𝑎 <s 𝑏))
92 brslts 27779 . . . . . . . . . 10 ({(𝐶 |s 𝐷)} <<s 𝐵 ↔ (({(𝐶 |s 𝐷)} ∈ V ∧ 𝐵 ∈ V) ∧ ({(𝐶 |s 𝐷)} ⊆ No 𝐵 No ∧ ∀𝑎 ∈ {(𝐶 |s 𝐷)}∀𝑏𝐵 𝑎 <s 𝑏)))
9369, 91, 92sylanbrc 589 . . . . . . . . 9 ((((𝐴 <<s 𝐵𝐶 <<s 𝐷) ∧ (∀𝑑𝐷 (𝐴 |s 𝐵) <s 𝑑 ∧ ∀𝑎𝐴 𝑎 <s (𝐶 |s 𝐷))) ∧ (𝐶 |s 𝐷) <s (𝐴 |s 𝐵)) → {(𝐶 |s 𝐷)} <<s 𝐵)
94 ltsirr 27735 . . . . . . . . . . . . . 14 ((𝐴 |s 𝐵) ∈ No → ¬ (𝐴 |s 𝐵) <s (𝐴 |s 𝐵))
9549, 94syl 17 . . . . . . . . . . . . 13 (((𝐴 <<s 𝐵𝐶 <<s 𝐷) ∧ (∀𝑑𝐷 (𝐴 |s 𝐵) <s 𝑑 ∧ ∀𝑎𝐴 𝑎 <s (𝐶 |s 𝐷))) → ¬ (𝐴 |s 𝐵) <s (𝐴 |s 𝐵))
96 breq1 5082 . . . . . . . . . . . . . 14 ((𝐴 |s 𝐵) = (𝐶 |s 𝐷) → ((𝐴 |s 𝐵) <s (𝐴 |s 𝐵) ↔ (𝐶 |s 𝐷) <s (𝐴 |s 𝐵)))
9796notbid 319 . . . . . . . . . . . . 13 ((𝐴 |s 𝐵) = (𝐶 |s 𝐷) → (¬ (𝐴 |s 𝐵) <s (𝐴 |s 𝐵) ↔ ¬ (𝐶 |s 𝐷) <s (𝐴 |s 𝐵)))
9895, 97syl5ibcom 246 . . . . . . . . . . . 12 (((𝐴 <<s 𝐵𝐶 <<s 𝐷) ∧ (∀𝑑𝐷 (𝐴 |s 𝐵) <s 𝑑 ∧ ∀𝑎𝐴 𝑎 <s (𝐶 |s 𝐷))) → ((𝐴 |s 𝐵) = (𝐶 |s 𝐷) → ¬ (𝐶 |s 𝐷) <s (𝐴 |s 𝐵)))
9998necon2ad 2950 . . . . . . . . . . 11 (((𝐴 <<s 𝐵𝐶 <<s 𝐷) ∧ (∀𝑑𝐷 (𝐴 |s 𝐵) <s 𝑑 ∧ ∀𝑎𝐴 𝑎 <s (𝐶 |s 𝐷))) → ((𝐶 |s 𝐷) <s (𝐴 |s 𝐵) → (𝐴 |s 𝐵) ≠ (𝐶 |s 𝐷)))
10099imp 407 . . . . . . . . . 10 ((((𝐴 <<s 𝐵𝐶 <<s 𝐷) ∧ (∀𝑑𝐷 (𝐴 |s 𝐵) <s 𝑑 ∧ ∀𝑎𝐴 𝑎 <s (𝐶 |s 𝐷))) ∧ (𝐶 |s 𝐷) <s (𝐴 |s 𝐵)) → (𝐴 |s 𝐵) ≠ (𝐶 |s 𝐷))
101100necomd 2990 . . . . . . . . 9 ((((𝐴 <<s 𝐵𝐶 <<s 𝐷) ∧ (∀𝑑𝐷 (𝐴 |s 𝐵) <s 𝑑 ∧ ∀𝑎𝐴 𝑎 <s (𝐶 |s 𝐷))) ∧ (𝐶 |s 𝐷) <s (𝐴 |s 𝐵)) → (𝐶 |s 𝐷) ≠ (𝐴 |s 𝐵))
102 cutbdaylt 27815 . . . . . . . . 9 (((𝐶 |s 𝐷) ∈ No ∧ (𝐴 <<s {(𝐶 |s 𝐷)} ∧ {(𝐶 |s 𝐷)} <<s 𝐵) ∧ (𝐶 |s 𝐷) ≠ (𝐴 |s 𝐵)) → ( bday ‘(𝐴 |s 𝐵)) ∈ ( bday ‘(𝐶 |s 𝐷)))
10352, 66, 93, 101, 102syl121anc 1383 . . . . . . . 8 ((((𝐴 <<s 𝐵𝐶 <<s 𝐷) ∧ (∀𝑑𝐷 (𝐴 |s 𝐵) <s 𝑑 ∧ ∀𝑎𝐴 𝑎 <s (𝐶 |s 𝐷))) ∧ (𝐶 |s 𝐷) <s (𝐴 |s 𝐵)) → ( bday ‘(𝐴 |s 𝐵)) ∈ ( bday ‘(𝐶 |s 𝐷)))
1041ad3antrrr 736 . . . . . . . . 9 ((((𝐴 <<s 𝐵𝐶 <<s 𝐷) ∧ (∀𝑑𝐷 (𝐴 |s 𝐵) <s 𝑑 ∧ ∀𝑎𝐴 𝑎 <s (𝐶 |s 𝐷))) ∧ (𝐶 |s 𝐷) <s (𝐴 |s 𝐵)) → (𝐴 |s 𝐵) ∈ No )
105 sltsex1 27780 . . . . . . . . . . . 12 (𝐶 <<s 𝐷𝐶 ∈ V)
106105ad3antlr 737 . . . . . . . . . . 11 ((((𝐴 <<s 𝐵𝐶 <<s 𝐷) ∧ (∀𝑑𝐷 (𝐴 |s 𝐵) <s 𝑑 ∧ ∀𝑎𝐴 𝑎 <s (𝐶 |s 𝐷))) ∧ (𝐶 |s 𝐷) <s (𝐴 |s 𝐵)) → 𝐶 ∈ V)
107 snex 5375 . . . . . . . . . . 11 {(𝐴 |s 𝐵)} ∈ V
108106, 107jctir 525 . . . . . . . . . 10 ((((𝐴 <<s 𝐵𝐶 <<s 𝐷) ∧ (∀𝑑𝐷 (𝐴 |s 𝐵) <s 𝑑 ∧ ∀𝑎𝐴 𝑎 <s (𝐶 |s 𝐷))) ∧ (𝐶 |s 𝐷) <s (𝐴 |s 𝐵)) → (𝐶 ∈ V ∧ {(𝐴 |s 𝐵)} ∈ V))
109 sltsss1 27782 . . . . . . . . . . . 12 (𝐶 <<s 𝐷𝐶 No )
110109ad3antlr 737 . . . . . . . . . . 11 ((((𝐴 <<s 𝐵𝐶 <<s 𝐷) ∧ (∀𝑑𝐷 (𝐴 |s 𝐵) <s 𝑑 ∧ ∀𝑎𝐴 𝑎 <s (𝐶 |s 𝐷))) ∧ (𝐶 |s 𝐷) <s (𝐴 |s 𝐵)) → 𝐶 No )
111104snssd 4725 . . . . . . . . . . 11 ((((𝐴 <<s 𝐵𝐶 <<s 𝐷) ∧ (∀𝑑𝐷 (𝐴 |s 𝐵) <s 𝑑 ∧ ∀𝑎𝐴 𝑎 <s (𝐶 |s 𝐷))) ∧ (𝐶 |s 𝐷) <s (𝐴 |s 𝐵)) → {(𝐴 |s 𝐵)} ⊆ No )
112110sselda 3922 . . . . . . . . . . . . . 14 (((((𝐴 <<s 𝐵𝐶 <<s 𝐷) ∧ (∀𝑑𝐷 (𝐴 |s 𝐵) <s 𝑑 ∧ ∀𝑎𝐴 𝑎 <s (𝐶 |s 𝐷))) ∧ (𝐶 |s 𝐷) <s (𝐴 |s 𝐵)) ∧ 𝑐𝐶) → 𝑐 No )
11352adantr 481 . . . . . . . . . . . . . 14 (((((𝐴 <<s 𝐵𝐶 <<s 𝐷) ∧ (∀𝑑𝐷 (𝐴 |s 𝐵) <s 𝑑 ∧ ∀𝑎𝐴 𝑎 <s (𝐶 |s 𝐷))) ∧ (𝐶 |s 𝐷) <s (𝐴 |s 𝐵)) ∧ 𝑐𝐶) → (𝐶 |s 𝐷) ∈ No )
11448ad3antrrr 736 . . . . . . . . . . . . . 14 (((((𝐴 <<s 𝐵𝐶 <<s 𝐷) ∧ (∀𝑑𝐷 (𝐴 |s 𝐵) <s 𝑑 ∧ ∀𝑎𝐴 𝑎 <s (𝐶 |s 𝐷))) ∧ (𝐶 |s 𝐷) <s (𝐴 |s 𝐵)) ∧ 𝑐𝐶) → (𝐴 |s 𝐵) ∈ No )
1159simp2d 1149 . . . . . . . . . . . . . . . . . 18 (𝐶 <<s 𝐷𝐶 <<s {(𝐶 |s 𝐷)})
116115ad3antlr 737 . . . . . . . . . . . . . . . . 17 ((((𝐴 <<s 𝐵𝐶 <<s 𝐷) ∧ (∀𝑑𝐷 (𝐴 |s 𝐵) <s 𝑑 ∧ ∀𝑎𝐴 𝑎 <s (𝐶 |s 𝐷))) ∧ (𝐶 |s 𝐷) <s (𝐴 |s 𝐵)) → 𝐶 <<s {(𝐶 |s 𝐷)})
117 sltssep 27784 . . . . . . . . . . . . . . . . 17 (𝐶 <<s {(𝐶 |s 𝐷)} → ∀𝑐𝐶𝑑 ∈ {(𝐶 |s 𝐷)}𝑐 <s 𝑑)
118116, 117syl 17 . . . . . . . . . . . . . . . 16 ((((𝐴 <<s 𝐵𝐶 <<s 𝐷) ∧ (∀𝑑𝐷 (𝐴 |s 𝐵) <s 𝑑 ∧ ∀𝑎𝐴 𝑎 <s (𝐶 |s 𝐷))) ∧ (𝐶 |s 𝐷) <s (𝐴 |s 𝐵)) → ∀𝑐𝐶𝑑 ∈ {(𝐶 |s 𝐷)}𝑐 <s 𝑑)
119118r19.21bi 3232 . . . . . . . . . . . . . . 15 (((((𝐴 <<s 𝐵𝐶 <<s 𝐷) ∧ (∀𝑑𝐷 (𝐴 |s 𝐵) <s 𝑑 ∧ ∀𝑎𝐴 𝑎 <s (𝐶 |s 𝐷))) ∧ (𝐶 |s 𝐷) <s (𝐴 |s 𝐵)) ∧ 𝑐𝐶) → ∀𝑑 ∈ {(𝐶 |s 𝐷)}𝑐 <s 𝑑)
120 breq2 5083 . . . . . . . . . . . . . . . 16 (𝑑 = (𝐶 |s 𝐷) → (𝑐 <s 𝑑𝑐 <s (𝐶 |s 𝐷)))
12114, 120ralsn 4620 . . . . . . . . . . . . . . 15 (∀𝑑 ∈ {(𝐶 |s 𝐷)}𝑐 <s 𝑑𝑐 <s (𝐶 |s 𝐷))
122119, 121sylib 219 . . . . . . . . . . . . . 14 (((((𝐴 <<s 𝐵𝐶 <<s 𝐷) ∧ (∀𝑑𝐷 (𝐴 |s 𝐵) <s 𝑑 ∧ ∀𝑎𝐴 𝑎 <s (𝐶 |s 𝐷))) ∧ (𝐶 |s 𝐷) <s (𝐴 |s 𝐵)) ∧ 𝑐𝐶) → 𝑐 <s (𝐶 |s 𝐷))
123 simplr 774 . . . . . . . . . . . . . 14 (((((𝐴 <<s 𝐵𝐶 <<s 𝐷) ∧ (∀𝑑𝐷 (𝐴 |s 𝐵) <s 𝑑 ∧ ∀𝑎𝐴 𝑎 <s (𝐶 |s 𝐷))) ∧ (𝐶 |s 𝐷) <s (𝐴 |s 𝐵)) ∧ 𝑐𝐶) → (𝐶 |s 𝐷) <s (𝐴 |s 𝐵))
124112, 113, 114, 122, 123ltstrd 27752 . . . . . . . . . . . . 13 (((((𝐴 <<s 𝐵𝐶 <<s 𝐷) ∧ (∀𝑑𝐷 (𝐴 |s 𝐵) <s 𝑑 ∧ ∀𝑎𝐴 𝑎 <s (𝐶 |s 𝐷))) ∧ (𝐶 |s 𝐷) <s (𝐴 |s 𝐵)) ∧ 𝑐𝐶) → 𝑐 <s (𝐴 |s 𝐵))
125 breq2 5083 . . . . . . . . . . . . . 14 (𝑎 = (𝐴 |s 𝐵) → (𝑐 <s 𝑎𝑐 <s (𝐴 |s 𝐵)))
12635, 125ralsn 4620 . . . . . . . . . . . . 13 (∀𝑎 ∈ {(𝐴 |s 𝐵)}𝑐 <s 𝑎𝑐 <s (𝐴 |s 𝐵))
127124, 126sylibr 235 . . . . . . . . . . . 12 (((((𝐴 <<s 𝐵𝐶 <<s 𝐷) ∧ (∀𝑑𝐷 (𝐴 |s 𝐵) <s 𝑑 ∧ ∀𝑎𝐴 𝑎 <s (𝐶 |s 𝐷))) ∧ (𝐶 |s 𝐷) <s (𝐴 |s 𝐵)) ∧ 𝑐𝐶) → ∀𝑎 ∈ {(𝐴 |s 𝐵)}𝑐 <s 𝑎)
128127ralrimiva 3132 . . . . . . . . . . 11 ((((𝐴 <<s 𝐵𝐶 <<s 𝐷) ∧ (∀𝑑𝐷 (𝐴 |s 𝐵) <s 𝑑 ∧ ∀𝑎𝐴 𝑎 <s (𝐶 |s 𝐷))) ∧ (𝐶 |s 𝐷) <s (𝐴 |s 𝐵)) → ∀𝑐𝐶𝑎 ∈ {(𝐴 |s 𝐵)}𝑐 <s 𝑎)
129110, 111, 1283jca 1134 . . . . . . . . . 10 ((((𝐴 <<s 𝐵𝐶 <<s 𝐷) ∧ (∀𝑑𝐷 (𝐴 |s 𝐵) <s 𝑑 ∧ ∀𝑎𝐴 𝑎 <s (𝐶 |s 𝐷))) ∧ (𝐶 |s 𝐷) <s (𝐴 |s 𝐵)) → (𝐶 No ∧ {(𝐴 |s 𝐵)} ⊆ No ∧ ∀𝑐𝐶𝑎 ∈ {(𝐴 |s 𝐵)}𝑐 <s 𝑎))
130 brslts 27779 . . . . . . . . . 10 (𝐶 <<s {(𝐴 |s 𝐵)} ↔ ((𝐶 ∈ V ∧ {(𝐴 |s 𝐵)} ∈ V) ∧ (𝐶 No ∧ {(𝐴 |s 𝐵)} ⊆ No ∧ ∀𝑐𝐶𝑎 ∈ {(𝐴 |s 𝐵)}𝑐 <s 𝑎)))
131108, 129, 130sylanbrc 589 . . . . . . . . 9 ((((𝐴 <<s 𝐵𝐶 <<s 𝐷) ∧ (∀𝑑𝐷 (𝐴 |s 𝐵) <s 𝑑 ∧ ∀𝑎𝐴 𝑎 <s (𝐶 |s 𝐷))) ∧ (𝐶 |s 𝐷) <s (𝐴 |s 𝐵)) → 𝐶 <<s {(𝐴 |s 𝐵)})
132 sltsex2 27781 . . . . . . . . . . . 12 (𝐶 <<s 𝐷𝐷 ∈ V)
133132ad3antlr 737 . . . . . . . . . . 11 ((((𝐴 <<s 𝐵𝐶 <<s 𝐷) ∧ (∀𝑑𝐷 (𝐴 |s 𝐵) <s 𝑑 ∧ ∀𝑎𝐴 𝑎 <s (𝐶 |s 𝐷))) ∧ (𝐶 |s 𝐷) <s (𝐴 |s 𝐵)) → 𝐷 ∈ V)
134133, 107jctil 524 . . . . . . . . . 10 ((((𝐴 <<s 𝐵𝐶 <<s 𝐷) ∧ (∀𝑑𝐷 (𝐴 |s 𝐵) <s 𝑑 ∧ ∀𝑎𝐴 𝑎 <s (𝐶 |s 𝐷))) ∧ (𝐶 |s 𝐷) <s (𝐴 |s 𝐵)) → ({(𝐴 |s 𝐵)} ∈ V ∧ 𝐷 ∈ V))
1355ad3antlr 737 . . . . . . . . . . 11 ((((𝐴 <<s 𝐵𝐶 <<s 𝐷) ∧ (∀𝑑𝐷 (𝐴 |s 𝐵) <s 𝑑 ∧ ∀𝑎𝐴 𝑎 <s (𝐶 |s 𝐷))) ∧ (𝐶 |s 𝐷) <s (𝐴 |s 𝐵)) → 𝐷 No )
136 simplrl 782 . . . . . . . . . . . 12 ((((𝐴 <<s 𝐵𝐶 <<s 𝐷) ∧ (∀𝑑𝐷 (𝐴 |s 𝐵) <s 𝑑 ∧ ∀𝑎𝐴 𝑎 <s (𝐶 |s 𝐷))) ∧ (𝐶 |s 𝐷) <s (𝐴 |s 𝐵)) → ∀𝑑𝐷 (𝐴 |s 𝐵) <s 𝑑)
137 breq1 5082 . . . . . . . . . . . . . 14 (𝑎 = (𝐴 |s 𝐵) → (𝑎 <s 𝑑 ↔ (𝐴 |s 𝐵) <s 𝑑))
138137ralbidv 3163 . . . . . . . . . . . . 13 (𝑎 = (𝐴 |s 𝐵) → (∀𝑑𝐷 𝑎 <s 𝑑 ↔ ∀𝑑𝐷 (𝐴 |s 𝐵) <s 𝑑))
13935, 138ralsn 4620 . . . . . . . . . . . 12 (∀𝑎 ∈ {(𝐴 |s 𝐵)}∀𝑑𝐷 𝑎 <s 𝑑 ↔ ∀𝑑𝐷 (𝐴 |s 𝐵) <s 𝑑)
140136, 139sylibr 235 . . . . . . . . . . 11 ((((𝐴 <<s 𝐵𝐶 <<s 𝐷) ∧ (∀𝑑𝐷 (𝐴 |s 𝐵) <s 𝑑 ∧ ∀𝑎𝐴 𝑎 <s (𝐶 |s 𝐷))) ∧ (𝐶 |s 𝐷) <s (𝐴 |s 𝐵)) → ∀𝑎 ∈ {(𝐴 |s 𝐵)}∀𝑑𝐷 𝑎 <s 𝑑)
141111, 135, 1403jca 1134 . . . . . . . . . 10 ((((𝐴 <<s 𝐵𝐶 <<s 𝐷) ∧ (∀𝑑𝐷 (𝐴 |s 𝐵) <s 𝑑 ∧ ∀𝑎𝐴 𝑎 <s (𝐶 |s 𝐷))) ∧ (𝐶 |s 𝐷) <s (𝐴 |s 𝐵)) → ({(𝐴 |s 𝐵)} ⊆ No 𝐷 No ∧ ∀𝑎 ∈ {(𝐴 |s 𝐵)}∀𝑑𝐷 𝑎 <s 𝑑))
142 brslts 27779 . . . . . . . . . 10 ({(𝐴 |s 𝐵)} <<s 𝐷 ↔ (({(𝐴 |s 𝐵)} ∈ V ∧ 𝐷 ∈ V) ∧ ({(𝐴 |s 𝐵)} ⊆ No 𝐷 No ∧ ∀𝑎 ∈ {(𝐴 |s 𝐵)}∀𝑑𝐷 𝑎 <s 𝑑)))
143134, 141, 142sylanbrc 589 . . . . . . . . 9 ((((𝐴 <<s 𝐵𝐶 <<s 𝐷) ∧ (∀𝑑𝐷 (𝐴 |s 𝐵) <s 𝑑 ∧ ∀𝑎𝐴 𝑎 <s (𝐶 |s 𝐷))) ∧ (𝐶 |s 𝐷) <s (𝐴 |s 𝐵)) → {(𝐴 |s 𝐵)} <<s 𝐷)
144 cutbdaylt 27815 . . . . . . . . 9 (((𝐴 |s 𝐵) ∈ No ∧ (𝐶 <<s {(𝐴 |s 𝐵)} ∧ {(𝐴 |s 𝐵)} <<s 𝐷) ∧ (𝐴 |s 𝐵) ≠ (𝐶 |s 𝐷)) → ( bday ‘(𝐶 |s 𝐷)) ∈ ( bday ‘(𝐴 |s 𝐵)))
145104, 131, 143, 100, 144syl121anc 1383 . . . . . . . 8 ((((𝐴 <<s 𝐵𝐶 <<s 𝐷) ∧ (∀𝑑𝐷 (𝐴 |s 𝐵) <s 𝑑 ∧ ∀𝑎𝐴 𝑎 <s (𝐶 |s 𝐷))) ∧ (𝐶 |s 𝐷) <s (𝐴 |s 𝐵)) → ( bday ‘(𝐶 |s 𝐷)) ∈ ( bday ‘(𝐴 |s 𝐵)))
146103, 145jca 516 . . . . . . 7 ((((𝐴 <<s 𝐵𝐶 <<s 𝐷) ∧ (∀𝑑𝐷 (𝐴 |s 𝐵) <s 𝑑 ∧ ∀𝑎𝐴 𝑎 <s (𝐶 |s 𝐷))) ∧ (𝐶 |s 𝐷) <s (𝐴 |s 𝐵)) → (( bday ‘(𝐴 |s 𝐵)) ∈ ( bday ‘(𝐶 |s 𝐷)) ∧ ( bday ‘(𝐶 |s 𝐷)) ∈ ( bday ‘(𝐴 |s 𝐵))))
147146ex 413 . . . . . 6 (((𝐴 <<s 𝐵𝐶 <<s 𝐷) ∧ (∀𝑑𝐷 (𝐴 |s 𝐵) <s 𝑑 ∧ ∀𝑎𝐴 𝑎 <s (𝐶 |s 𝐷))) → ((𝐶 |s 𝐷) <s (𝐴 |s 𝐵) → (( bday ‘(𝐴 |s 𝐵)) ∈ ( bday ‘(𝐶 |s 𝐷)) ∧ ( bday ‘(𝐶 |s 𝐷)) ∈ ( bday ‘(𝐴 |s 𝐵)))))
14851, 147sylbird 261 . . . . 5 (((𝐴 <<s 𝐵𝐶 <<s 𝐷) ∧ (∀𝑑𝐷 (𝐴 |s 𝐵) <s 𝑑 ∧ ∀𝑎𝐴 𝑎 <s (𝐶 |s 𝐷))) → (¬ (𝐴 |s 𝐵) ≤s (𝐶 |s 𝐷) → (( bday ‘(𝐴 |s 𝐵)) ∈ ( bday ‘(𝐶 |s 𝐷)) ∧ ( bday ‘(𝐶 |s 𝐷)) ∈ ( bday ‘(𝐴 |s 𝐵)))))
14946, 148mt3i 149 . . . 4 (((𝐴 <<s 𝐵𝐶 <<s 𝐷) ∧ (∀𝑑𝐷 (𝐴 |s 𝐵) <s 𝑑 ∧ ∀𝑎𝐴 𝑎 <s (𝐶 |s 𝐷))) → (𝐴 |s 𝐵) ≤s (𝐶 |s 𝐷))
15042, 149impbida 806 . . 3 ((𝐴 <<s 𝐵𝐶 <<s 𝐷) → ((𝐴 |s 𝐵) ≤s (𝐶 |s 𝐷) ↔ (∀𝑑𝐷 (𝐴 |s 𝐵) <s 𝑑 ∧ ∀𝑎𝐴 𝑎 <s (𝐶 |s 𝐷))))
151 breq12 5084 . . . 4 ((𝑋 = (𝐴 |s 𝐵) ∧ 𝑌 = (𝐶 |s 𝐷)) → (𝑋 ≤s 𝑌 ↔ (𝐴 |s 𝐵) ≤s (𝐶 |s 𝐷)))
152 breq1 5082 . . . . . 6 (𝑋 = (𝐴 |s 𝐵) → (𝑋 <s 𝑑 ↔ (𝐴 |s 𝐵) <s 𝑑))
153152ralbidv 3163 . . . . 5 (𝑋 = (𝐴 |s 𝐵) → (∀𝑑𝐷 𝑋 <s 𝑑 ↔ ∀𝑑𝐷 (𝐴 |s 𝐵) <s 𝑑))
154 breq2 5083 . . . . . 6 (𝑌 = (𝐶 |s 𝐷) → (𝑎 <s 𝑌𝑎 <s (𝐶 |s 𝐷)))
155154ralbidv 3163 . . . . 5 (𝑌 = (𝐶 |s 𝐷) → (∀𝑎𝐴 𝑎 <s 𝑌 ↔ ∀𝑎𝐴 𝑎 <s (𝐶 |s 𝐷)))
156153, 155bi2anan9 644 . . . 4 ((𝑋 = (𝐴 |s 𝐵) ∧ 𝑌 = (𝐶 |s 𝐷)) → ((∀𝑑𝐷 𝑋 <s 𝑑 ∧ ∀𝑎𝐴 𝑎 <s 𝑌) ↔ (∀𝑑𝐷 (𝐴 |s 𝐵) <s 𝑑 ∧ ∀𝑎𝐴 𝑎 <s (𝐶 |s 𝐷))))
157151, 156bibi12d 346 . . 3 ((𝑋 = (𝐴 |s 𝐵) ∧ 𝑌 = (𝐶 |s 𝐷)) → ((𝑋 ≤s 𝑌 ↔ (∀𝑑𝐷 𝑋 <s 𝑑 ∧ ∀𝑎𝐴 𝑎 <s 𝑌)) ↔ ((𝐴 |s 𝐵) ≤s (𝐶 |s 𝐷) ↔ (∀𝑑𝐷 (𝐴 |s 𝐵) <s 𝑑 ∧ ∀𝑎𝐴 𝑎 <s (𝐶 |s 𝐷)))))
158150, 157imbitrrid 247 . 2 ((𝑋 = (𝐴 |s 𝐵) ∧ 𝑌 = (𝐶 |s 𝐷)) → ((𝐴 <<s 𝐵𝐶 <<s 𝐷) → (𝑋 ≤s 𝑌 ↔ (∀𝑑𝐷 𝑋 <s 𝑑 ∧ ∀𝑎𝐴 𝑎 <s 𝑌))))
159158impcom 408 1 (((𝐴 <<s 𝐵𝐶 <<s 𝐷) ∧ (𝑋 = (𝐴 |s 𝐵) ∧ 𝑌 = (𝐶 |s 𝐷))) → (𝑋 ≤s 𝑌 ↔ (∀𝑑𝐷 𝑋 <s 𝑑 ∧ ∀𝑎𝐴 𝑎 <s 𝑌)))
Colors of variables: wff setvar class
Syntax hints:  ¬ wn 3  wi 4  wb 207  wa 396  w3a 1092   = wceq 1547  wcel 2119  wne 2935  wral 3054  Vcvv 3432  wss 3890  {csn 4562   class class class wbr 5079  Ord word 6316  cfv 6492  (class class class)co 7363   No csur 27628   <s clts 27629   bday cbday 27630   ≤s cles 27733   <<s cslts 27774   |s ccuts 27776
This theorem was proved from axioms:  ax-mp 5  ax-1 6  ax-2 7  ax-3 8  ax-gen 1802  ax-4 1816  ax-5 1917  ax-6 1974  ax-7 2015  ax-8 2121  ax-9 2129  ax-10 2152  ax-11 2168  ax-12 2189  ax-ext 2712  ax-rep 5206  ax-sep 5225  ax-nul 5235  ax-pow 5301  ax-pr 5369  ax-un 7685
This theorem depends on definitions:  df-bi 208  df-an 397  df-or 854  df-3or 1093  df-3an 1094  df-tru 1550  df-fal 1560  df-ex 1787  df-nf 1791  df-sb 2074  df-mo 2543  df-eu 2573  df-clab 2719  df-cleq 2732  df-clel 2815  df-nfc 2889  df-ne 2936  df-ral 3055  df-rex 3065  df-rmo 3345  df-reu 3346  df-rab 3393  df-v 3434  df-sbc 3731  df-csb 3839  df-dif 3893  df-un 3895  df-in 3897  df-ss 3907  df-pss 3910  df-nul 4269  df-if 4462  df-pw 4538  df-sn 4563  df-pr 4565  df-tp 4567  df-op 4569  df-uni 4846  df-int 4885  df-br 5080  df-opab 5142  df-mpt 5161  df-tr 5187  df-id 5520  df-eprel 5525  df-po 5533  df-so 5534  df-fr 5578  df-we 5580  df-xp 5631  df-rel 5632  df-cnv 5633  df-co 5634  df-dm 5635  df-rn 5636  df-res 5637  df-ima 5638  df-ord 6320  df-on 6321  df-suc 6323  df-iota 6448  df-fun 6494  df-fn 6495  df-f 6496  df-f1 6497  df-fo 6498  df-f1o 6499  df-fv 6500  df-riota 7320  df-ov 7366  df-oprab 7367  df-mpo 7368  df-1o 8402  df-2o 8403  df-no 27631  df-lts 27632  df-bday 27633  df-les 27734  df-slts 27775  df-cuts 27777
This theorem is referenced by:  lesrecd  27817  twocut  28440
  Copyright terms: Public domain W3C validator