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

Theorem lesrec 27869
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 27852 . . . . . . . 8 (𝐴 <<s 𝐵 → (𝐴 |s 𝐵) ∈ No )
21ad3antrrr 740 . . . . . . 7 ((((𝐴 <<s 𝐵𝐶 <<s 𝐷) ∧ (𝐴 |s 𝐵) ≤s (𝐶 |s 𝐷)) ∧ 𝑑𝐷) → (𝐴 |s 𝐵) ∈ No )
3 cutscl 27852 . . . . . . . 8 (𝐶 <<s 𝐷 → (𝐶 |s 𝐷) ∈ No )
43ad3antlr 741 . . . . . . 7 ((((𝐴 <<s 𝐵𝐶 <<s 𝐷) ∧ (𝐴 |s 𝐵) ≤s (𝐶 |s 𝐷)) ∧ 𝑑𝐷) → (𝐶 |s 𝐷) ∈ No )
5 sltsss2 27836 . . . . . . . . 9 (𝐶 <<s 𝐷𝐷 No )
65ad2antlr 737 . . . . . . . 8 (((𝐴 <<s 𝐵𝐶 <<s 𝐷) ∧ (𝐴 |s 𝐵) ≤s (𝐶 |s 𝐷)) → 𝐷 No )
76sselda 3936 . . . . . . 7 ((((𝐴 <<s 𝐵𝐶 <<s 𝐷) ∧ (𝐴 |s 𝐵) ≤s (𝐶 |s 𝐷)) ∧ 𝑑𝐷) → 𝑑 No )
8 simplr 778 . . . . . . 7 ((((𝐴 <<s 𝐵𝐶 <<s 𝐷) ∧ (𝐴 |s 𝐵) ≤s (𝐶 |s 𝐷)) ∧ 𝑑𝐷) → (𝐴 |s 𝐵) ≤s (𝐶 |s 𝐷))
9 cutcuts 27851 . . . . . . . . . . . 12 (𝐶 <<s 𝐷 → ((𝐶 |s 𝐷) ∈ No 𝐶 <<s {(𝐶 |s 𝐷)} ∧ {(𝐶 |s 𝐷)} <<s 𝐷))
109simp3d 1156 . . . . . . . . . . 11 (𝐶 <<s 𝐷 → {(𝐶 |s 𝐷)} <<s 𝐷)
1110ad2antlr 737 . . . . . . . . . 10 (((𝐴 <<s 𝐵𝐶 <<s 𝐷) ∧ (𝐴 |s 𝐵) ≤s (𝐶 |s 𝐷)) → {(𝐶 |s 𝐷)} <<s 𝐷)
12 sltssep 27837 . . . . . . . . . 10 ({(𝐶 |s 𝐷)} <<s 𝐷 → ∀𝑎 ∈ {(𝐶 |s 𝐷)}∀𝑑𝐷 𝑎 <s 𝑑)
1311, 12syl 17 . . . . . . . . 9 (((𝐴 <<s 𝐵𝐶 <<s 𝐷) ∧ (𝐴 |s 𝐵) ≤s (𝐶 |s 𝐷)) → ∀𝑎 ∈ {(𝐶 |s 𝐷)}∀𝑑𝐷 𝑎 <s 𝑑)
14 ovex 7425 . . . . . . . . . 10 (𝐶 |s 𝐷) ∈ V
15 breq1 5102 . . . . . . . . . . 11 (𝑎 = (𝐶 |s 𝐷) → (𝑎 <s 𝑑 ↔ (𝐶 |s 𝐷) <s 𝑑))
1615ralbidv 3184 . . . . . . . . . 10 (𝑎 = (𝐶 |s 𝐷) → (∀𝑑𝐷 𝑎 <s 𝑑 ↔ ∀𝑑𝐷 (𝐶 |s 𝐷) <s 𝑑))
1714, 16ralsn 4639 . . . . . . . . 9 (∀𝑎 ∈ {(𝐶 |s 𝐷)}∀𝑑𝐷 𝑎 <s 𝑑 ↔ ∀𝑑𝐷 (𝐶 |s 𝐷) <s 𝑑)
1813, 17sylib 220 . . . . . . . 8 (((𝐴 <<s 𝐵𝐶 <<s 𝐷) ∧ (𝐴 |s 𝐵) ≤s (𝐶 |s 𝐷)) → ∀𝑑𝐷 (𝐶 |s 𝐷) <s 𝑑)
1918r19.21bi 3253 . . . . . . 7 ((((𝐴 <<s 𝐵𝐶 <<s 𝐷) ∧ (𝐴 |s 𝐵) ≤s (𝐶 |s 𝐷)) ∧ 𝑑𝐷) → (𝐶 |s 𝐷) <s 𝑑)
202, 4, 7, 8, 19leltstrd 27806 . . . . . 6 ((((𝐴 <<s 𝐵𝐶 <<s 𝐷) ∧ (𝐴 |s 𝐵) ≤s (𝐶 |s 𝐷)) ∧ 𝑑𝐷) → (𝐴 |s 𝐵) <s 𝑑)
2120ralrimiva 3153 . . . . 5 (((𝐴 <<s 𝐵𝐶 <<s 𝐷) ∧ (𝐴 |s 𝐵) ≤s (𝐶 |s 𝐷)) → ∀𝑑𝐷 (𝐴 |s 𝐵) <s 𝑑)
22 sltsss1 27835 . . . . . . . . . 10 (𝐴 <<s 𝐵𝐴 No )
2322adantr 484 . . . . . . . . 9 ((𝐴 <<s 𝐵𝐶 <<s 𝐷) → 𝐴 No )
2423adantr 484 . . . . . . . 8 (((𝐴 <<s 𝐵𝐶 <<s 𝐷) ∧ (𝐴 |s 𝐵) ≤s (𝐶 |s 𝐷)) → 𝐴 No )
2524sselda 3936 . . . . . . 7 ((((𝐴 <<s 𝐵𝐶 <<s 𝐷) ∧ (𝐴 |s 𝐵) ≤s (𝐶 |s 𝐷)) ∧ 𝑎𝐴) → 𝑎 No )
261ad3antrrr 740 . . . . . . 7 ((((𝐴 <<s 𝐵𝐶 <<s 𝐷) ∧ (𝐴 |s 𝐵) ≤s (𝐶 |s 𝐷)) ∧ 𝑎𝐴) → (𝐴 |s 𝐵) ∈ No )
273ad3antlr 741 . . . . . . 7 ((((𝐴 <<s 𝐵𝐶 <<s 𝐷) ∧ (𝐴 |s 𝐵) ≤s (𝐶 |s 𝐷)) ∧ 𝑎𝐴) → (𝐶 |s 𝐷) ∈ No )
28 cutcuts 27851 . . . . . . . . . . . . 13 (𝐴 <<s 𝐵 → ((𝐴 |s 𝐵) ∈ No 𝐴 <<s {(𝐴 |s 𝐵)} ∧ {(𝐴 |s 𝐵)} <<s 𝐵))
2928simp2d 1155 . . . . . . . . . . . 12 (𝐴 <<s 𝐵𝐴 <<s {(𝐴 |s 𝐵)})
3029adantr 484 . . . . . . . . . . 11 ((𝐴 <<s 𝐵𝐶 <<s 𝐷) → 𝐴 <<s {(𝐴 |s 𝐵)})
3130adantr 484 . . . . . . . . . 10 (((𝐴 <<s 𝐵𝐶 <<s 𝐷) ∧ (𝐴 |s 𝐵) ≤s (𝐶 |s 𝐷)) → 𝐴 <<s {(𝐴 |s 𝐵)})
32 sltssep 27837 . . . . . . . . . 10 (𝐴 <<s {(𝐴 |s 𝐵)} → ∀𝑎𝐴𝑑 ∈ {(𝐴 |s 𝐵)}𝑎 <s 𝑑)
3331, 32syl 17 . . . . . . . . 9 (((𝐴 <<s 𝐵𝐶 <<s 𝐷) ∧ (𝐴 |s 𝐵) ≤s (𝐶 |s 𝐷)) → ∀𝑎𝐴𝑑 ∈ {(𝐴 |s 𝐵)}𝑎 <s 𝑑)
3433r19.21bi 3253 . . . . . . . 8 ((((𝐴 <<s 𝐵𝐶 <<s 𝐷) ∧ (𝐴 |s 𝐵) ≤s (𝐶 |s 𝐷)) ∧ 𝑎𝐴) → ∀𝑑 ∈ {(𝐴 |s 𝐵)}𝑎 <s 𝑑)
35 ovex 7425 . . . . . . . . 9 (𝐴 |s 𝐵) ∈ V
36 breq2 5103 . . . . . . . . 9 (𝑑 = (𝐴 |s 𝐵) → (𝑎 <s 𝑑𝑎 <s (𝐴 |s 𝐵)))
3735, 36ralsn 4639 . . . . . . . 8 (∀𝑑 ∈ {(𝐴 |s 𝐵)}𝑎 <s 𝑑𝑎 <s (𝐴 |s 𝐵))
3834, 37sylib 220 . . . . . . 7 ((((𝐴 <<s 𝐵𝐶 <<s 𝐷) ∧ (𝐴 |s 𝐵) ≤s (𝐶 |s 𝐷)) ∧ 𝑎𝐴) → 𝑎 <s (𝐴 |s 𝐵))
39 simplr 778 . . . . . . 7 ((((𝐴 <<s 𝐵𝐶 <<s 𝐷) ∧ (𝐴 |s 𝐵) ≤s (𝐶 |s 𝐷)) ∧ 𝑎𝐴) → (𝐴 |s 𝐵) ≤s (𝐶 |s 𝐷))
4025, 26, 27, 38, 39ltlestrd 27805 . . . . . 6 ((((𝐴 <<s 𝐵𝐶 <<s 𝐷) ∧ (𝐴 |s 𝐵) ≤s (𝐶 |s 𝐷)) ∧ 𝑎𝐴) → 𝑎 <s (𝐶 |s 𝐷))
4140ralrimiva 3153 . . . . 5 (((𝐴 <<s 𝐵𝐶 <<s 𝐷) ∧ (𝐴 |s 𝐵) ≤s (𝐶 |s 𝐷)) → ∀𝑎𝐴 𝑎 <s (𝐶 |s 𝐷))
4221, 41jca 519 . . . 4 (((𝐴 <<s 𝐵𝐶 <<s 𝐷) ∧ (𝐴 |s 𝐵) ≤s (𝐶 |s 𝐷)) → (∀𝑑𝐷 (𝐴 |s 𝐵) <s 𝑑 ∧ ∀𝑎𝐴 𝑎 <s (𝐶 |s 𝐷)))
43 bdayon 27822 . . . . . . 7 ( bday ‘(𝐴 |s 𝐵)) ∈ On
4443onordi 6455 . . . . . 6 Ord ( bday ‘(𝐴 |s 𝐵))
45 ordn2lp 6362 . . . . . 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 737 . . . . . . 7 (((𝐴 <<s 𝐵𝐶 <<s 𝐷) ∧ (∀𝑑𝐷 (𝐴 |s 𝐵) <s 𝑑 ∧ ∀𝑎𝐴 𝑎 <s (𝐶 |s 𝐷))) → (𝐶 |s 𝐷) ∈ No )
481adantr 484 . . . . . . . 8 ((𝐴 <<s 𝐵𝐶 <<s 𝐷) → (𝐴 |s 𝐵) ∈ No )
4948adantr 484 . . . . . . 7 (((𝐴 <<s 𝐵𝐶 <<s 𝐷) ∧ (∀𝑑𝐷 (𝐴 |s 𝐵) <s 𝑑 ∧ ∀𝑎𝐴 𝑎 <s (𝐶 |s 𝐷))) → (𝐴 |s 𝐵) ∈ No )
50 ltnles 27794 . . . . . . 7 (((𝐶 |s 𝐷) ∈ No ∧ (𝐴 |s 𝐵) ∈ No ) → ((𝐶 |s 𝐷) <s (𝐴 |s 𝐵) ↔ ¬ (𝐴 |s 𝐵) ≤s (𝐶 |s 𝐷)))
5147, 49, 50syl2anc 593 . . . . . 6 (((𝐴 <<s 𝐵𝐶 <<s 𝐷) ∧ (∀𝑑𝐷 (𝐴 |s 𝐵) <s 𝑑 ∧ ∀𝑎𝐴 𝑎 <s (𝐶 |s 𝐷))) → ((𝐶 |s 𝐷) <s (𝐴 |s 𝐵) ↔ ¬ (𝐴 |s 𝐵) ≤s (𝐶 |s 𝐷)))
523ad3antlr 741 . . . . . . . . 9 ((((𝐴 <<s 𝐵𝐶 <<s 𝐷) ∧ (∀𝑑𝐷 (𝐴 |s 𝐵) <s 𝑑 ∧ ∀𝑎𝐴 𝑎 <s (𝐶 |s 𝐷))) ∧ (𝐶 |s 𝐷) <s (𝐴 |s 𝐵)) → (𝐶 |s 𝐷) ∈ No )
53 sltsex1 27833 . . . . . . . . . . . 12 (𝐴 <<s 𝐵𝐴 ∈ V)
5453ad3antrrr 740 . . . . . . . . . . 11 ((((𝐴 <<s 𝐵𝐶 <<s 𝐷) ∧ (∀𝑑𝐷 (𝐴 |s 𝐵) <s 𝑑 ∧ ∀𝑎𝐴 𝑎 <s (𝐶 |s 𝐷))) ∧ (𝐶 |s 𝐷) <s (𝐴 |s 𝐵)) → 𝐴 ∈ V)
55 snex 5395 . . . . . . . . . . 11 {(𝐶 |s 𝐷)} ∈ V
5654, 55jctir 528 . . . . . . . . . 10 ((((𝐴 <<s 𝐵𝐶 <<s 𝐷) ∧ (∀𝑑𝐷 (𝐴 |s 𝐵) <s 𝑑 ∧ ∀𝑎𝐴 𝑎 <s (𝐶 |s 𝐷))) ∧ (𝐶 |s 𝐷) <s (𝐴 |s 𝐵)) → (𝐴 ∈ V ∧ {(𝐶 |s 𝐷)} ∈ V))
5722ad3antrrr 740 . . . . . . . . . . 11 ((((𝐴 <<s 𝐵𝐶 <<s 𝐷) ∧ (∀𝑑𝐷 (𝐴 |s 𝐵) <s 𝑑 ∧ ∀𝑎𝐴 𝑎 <s (𝐶 |s 𝐷))) ∧ (𝐶 |s 𝐷) <s (𝐴 |s 𝐵)) → 𝐴 No )
5852snssd 4744 . . . . . . . . . . 11 ((((𝐴 <<s 𝐵𝐶 <<s 𝐷) ∧ (∀𝑑𝐷 (𝐴 |s 𝐵) <s 𝑑 ∧ ∀𝑎𝐴 𝑎 <s (𝐶 |s 𝐷))) ∧ (𝐶 |s 𝐷) <s (𝐴 |s 𝐵)) → {(𝐶 |s 𝐷)} ⊆ No )
59 simplrr 787 . . . . . . . . . . . 12 ((((𝐴 <<s 𝐵𝐶 <<s 𝐷) ∧ (∀𝑑𝐷 (𝐴 |s 𝐵) <s 𝑑 ∧ ∀𝑎𝐴 𝑎 <s (𝐶 |s 𝐷))) ∧ (𝐶 |s 𝐷) <s (𝐴 |s 𝐵)) → ∀𝑎𝐴 𝑎 <s (𝐶 |s 𝐷))
60 breq2 5103 . . . . . . . . . . . . . 14 (𝑑 = (𝐶 |s 𝐷) → (𝑎 <s 𝑑𝑎 <s (𝐶 |s 𝐷)))
6114, 60ralsn 4639 . . . . . . . . . . . . 13 (∀𝑑 ∈ {(𝐶 |s 𝐷)}𝑎 <s 𝑑𝑎 <s (𝐶 |s 𝐷))
6261ralbii 3107 . . . . . . . . . . . 12 (∀𝑎𝐴𝑑 ∈ {(𝐶 |s 𝐷)}𝑎 <s 𝑑 ↔ ∀𝑎𝐴 𝑎 <s (𝐶 |s 𝐷))
6359, 62sylibr 236 . . . . . . . . . . 11 ((((𝐴 <<s 𝐵𝐶 <<s 𝐷) ∧ (∀𝑑𝐷 (𝐴 |s 𝐵) <s 𝑑 ∧ ∀𝑎𝐴 𝑎 <s (𝐶 |s 𝐷))) ∧ (𝐶 |s 𝐷) <s (𝐴 |s 𝐵)) → ∀𝑎𝐴𝑑 ∈ {(𝐶 |s 𝐷)}𝑎 <s 𝑑)
6457, 58, 633jca 1140 . . . . . . . . . 10 ((((𝐴 <<s 𝐵𝐶 <<s 𝐷) ∧ (∀𝑑𝐷 (𝐴 |s 𝐵) <s 𝑑 ∧ ∀𝑎𝐴 𝑎 <s (𝐶 |s 𝐷))) ∧ (𝐶 |s 𝐷) <s (𝐴 |s 𝐵)) → (𝐴 No ∧ {(𝐶 |s 𝐷)} ⊆ No ∧ ∀𝑎𝐴𝑑 ∈ {(𝐶 |s 𝐷)}𝑎 <s 𝑑))
65 brslts 27832 . . . . . . . . . 10 (𝐴 <<s {(𝐶 |s 𝐷)} ↔ ((𝐴 ∈ V ∧ {(𝐶 |s 𝐷)} ∈ V) ∧ (𝐴 No ∧ {(𝐶 |s 𝐷)} ⊆ No ∧ ∀𝑎𝐴𝑑 ∈ {(𝐶 |s 𝐷)}𝑎 <s 𝑑)))
6656, 64, 65sylanbrc 592 . . . . . . . . 9 ((((𝐴 <<s 𝐵𝐶 <<s 𝐷) ∧ (∀𝑑𝐷 (𝐴 |s 𝐵) <s 𝑑 ∧ ∀𝑎𝐴 𝑎 <s (𝐶 |s 𝐷))) ∧ (𝐶 |s 𝐷) <s (𝐴 |s 𝐵)) → 𝐴 <<s {(𝐶 |s 𝐷)})
67 sltsex2 27834 . . . . . . . . . . . 12 (𝐴 <<s 𝐵𝐵 ∈ V)
6867ad3antrrr 740 . . . . . . . . . . 11 ((((𝐴 <<s 𝐵𝐶 <<s 𝐷) ∧ (∀𝑑𝐷 (𝐴 |s 𝐵) <s 𝑑 ∧ ∀𝑎𝐴 𝑎 <s (𝐶 |s 𝐷))) ∧ (𝐶 |s 𝐷) <s (𝐴 |s 𝐵)) → 𝐵 ∈ V)
6968, 55jctil 527 . . . . . . . . . 10 ((((𝐴 <<s 𝐵𝐶 <<s 𝐷) ∧ (∀𝑑𝐷 (𝐴 |s 𝐵) <s 𝑑 ∧ ∀𝑎𝐴 𝑎 <s (𝐶 |s 𝐷))) ∧ (𝐶 |s 𝐷) <s (𝐴 |s 𝐵)) → ({(𝐶 |s 𝐷)} ∈ V ∧ 𝐵 ∈ V))
70 sltsss2 27836 . . . . . . . . . . . 12 (𝐴 <<s 𝐵𝐵 No )
7170ad3antrrr 740 . . . . . . . . . . 11 ((((𝐴 <<s 𝐵𝐶 <<s 𝐷) ∧ (∀𝑑𝐷 (𝐴 |s 𝐵) <s 𝑑 ∧ ∀𝑎𝐴 𝑎 <s (𝐶 |s 𝐷))) ∧ (𝐶 |s 𝐷) <s (𝐴 |s 𝐵)) → 𝐵 No )
7252adantr 484 . . . . . . . . . . . . . 14 (((((𝐴 <<s 𝐵𝐶 <<s 𝐷) ∧ (∀𝑑𝐷 (𝐴 |s 𝐵) <s 𝑑 ∧ ∀𝑎𝐴 𝑎 <s (𝐶 |s 𝐷))) ∧ (𝐶 |s 𝐷) <s (𝐴 |s 𝐵)) ∧ 𝑏𝐵) → (𝐶 |s 𝐷) ∈ No )
7348ad3antrrr 740 . . . . . . . . . . . . . 14 (((((𝐴 <<s 𝐵𝐶 <<s 𝐷) ∧ (∀𝑑𝐷 (𝐴 |s 𝐵) <s 𝑑 ∧ ∀𝑎𝐴 𝑎 <s (𝐶 |s 𝐷))) ∧ (𝐶 |s 𝐷) <s (𝐴 |s 𝐵)) ∧ 𝑏𝐵) → (𝐴 |s 𝐵) ∈ No )
7471sselda 3936 . . . . . . . . . . . . . 14 (((((𝐴 <<s 𝐵𝐶 <<s 𝐷) ∧ (∀𝑑𝐷 (𝐴 |s 𝐵) <s 𝑑 ∧ ∀𝑎𝐴 𝑎 <s (𝐶 |s 𝐷))) ∧ (𝐶 |s 𝐷) <s (𝐴 |s 𝐵)) ∧ 𝑏𝐵) → 𝑏 No )
75 simplr 778 . . . . . . . . . . . . . 14 (((((𝐴 <<s 𝐵𝐶 <<s 𝐷) ∧ (∀𝑑𝐷 (𝐴 |s 𝐵) <s 𝑑 ∧ ∀𝑎𝐴 𝑎 <s (𝐶 |s 𝐷))) ∧ (𝐶 |s 𝐷) <s (𝐴 |s 𝐵)) ∧ 𝑏𝐵) → (𝐶 |s 𝐷) <s (𝐴 |s 𝐵))
7628simp3d 1156 . . . . . . . . . . . . . . . . . 18 (𝐴 <<s 𝐵 → {(𝐴 |s 𝐵)} <<s 𝐵)
7776ad3antrrr 740 . . . . . . . . . . . . . . . . 17 ((((𝐴 <<s 𝐵𝐶 <<s 𝐷) ∧ (∀𝑑𝐷 (𝐴 |s 𝐵) <s 𝑑 ∧ ∀𝑎𝐴 𝑎 <s (𝐶 |s 𝐷))) ∧ (𝐶 |s 𝐷) <s (𝐴 |s 𝐵)) → {(𝐴 |s 𝐵)} <<s 𝐵)
78 sltssep 27837 . . . . . . . . . . . . . . . . 17 ({(𝐴 |s 𝐵)} <<s 𝐵 → ∀𝑎 ∈ {(𝐴 |s 𝐵)}∀𝑏𝐵 𝑎 <s 𝑏)
7977, 78syl 17 . . . . . . . . . . . . . . . 16 ((((𝐴 <<s 𝐵𝐶 <<s 𝐷) ∧ (∀𝑑𝐷 (𝐴 |s 𝐵) <s 𝑑 ∧ ∀𝑎𝐴 𝑎 <s (𝐶 |s 𝐷))) ∧ (𝐶 |s 𝐷) <s (𝐴 |s 𝐵)) → ∀𝑎 ∈ {(𝐴 |s 𝐵)}∀𝑏𝐵 𝑎 <s 𝑏)
80 breq1 5102 . . . . . . . . . . . . . . . . . 18 (𝑎 = (𝐴 |s 𝐵) → (𝑎 <s 𝑏 ↔ (𝐴 |s 𝐵) <s 𝑏))
8180ralbidv 3184 . . . . . . . . . . . . . . . . 17 (𝑎 = (𝐴 |s 𝐵) → (∀𝑏𝐵 𝑎 <s 𝑏 ↔ ∀𝑏𝐵 (𝐴 |s 𝐵) <s 𝑏))
8235, 81ralsn 4639 . . . . . . . . . . . . . . . 16 (∀𝑎 ∈ {(𝐴 |s 𝐵)}∀𝑏𝐵 𝑎 <s 𝑏 ↔ ∀𝑏𝐵 (𝐴 |s 𝐵) <s 𝑏)
8379, 82sylib 220 . . . . . . . . . . . . . . 15 ((((𝐴 <<s 𝐵𝐶 <<s 𝐷) ∧ (∀𝑑𝐷 (𝐴 |s 𝐵) <s 𝑑 ∧ ∀𝑎𝐴 𝑎 <s (𝐶 |s 𝐷))) ∧ (𝐶 |s 𝐷) <s (𝐴 |s 𝐵)) → ∀𝑏𝐵 (𝐴 |s 𝐵) <s 𝑏)
8483r19.21bi 3253 . . . . . . . . . . . . . 14 (((((𝐴 <<s 𝐵𝐶 <<s 𝐷) ∧ (∀𝑑𝐷 (𝐴 |s 𝐵) <s 𝑑 ∧ ∀𝑎𝐴 𝑎 <s (𝐶 |s 𝐷))) ∧ (𝐶 |s 𝐷) <s (𝐴 |s 𝐵)) ∧ 𝑏𝐵) → (𝐴 |s 𝐵) <s 𝑏)
8572, 73, 74, 75, 84ltstrd 27804 . . . . . . . . . . . . 13 (((((𝐴 <<s 𝐵𝐶 <<s 𝐷) ∧ (∀𝑑𝐷 (𝐴 |s 𝐵) <s 𝑑 ∧ ∀𝑎𝐴 𝑎 <s (𝐶 |s 𝐷))) ∧ (𝐶 |s 𝐷) <s (𝐴 |s 𝐵)) ∧ 𝑏𝐵) → (𝐶 |s 𝐷) <s 𝑏)
8685ralrimiva 3153 . . . . . . . . . . . 12 ((((𝐴 <<s 𝐵𝐶 <<s 𝐷) ∧ (∀𝑑𝐷 (𝐴 |s 𝐵) <s 𝑑 ∧ ∀𝑎𝐴 𝑎 <s (𝐶 |s 𝐷))) ∧ (𝐶 |s 𝐷) <s (𝐴 |s 𝐵)) → ∀𝑏𝐵 (𝐶 |s 𝐷) <s 𝑏)
87 breq1 5102 . . . . . . . . . . . . . 14 (𝑎 = (𝐶 |s 𝐷) → (𝑎 <s 𝑏 ↔ (𝐶 |s 𝐷) <s 𝑏))
8887ralbidv 3184 . . . . . . . . . . . . 13 (𝑎 = (𝐶 |s 𝐷) → (∀𝑏𝐵 𝑎 <s 𝑏 ↔ ∀𝑏𝐵 (𝐶 |s 𝐷) <s 𝑏))
8914, 88ralsn 4639 . . . . . . . . . . . 12 (∀𝑎 ∈ {(𝐶 |s 𝐷)}∀𝑏𝐵 𝑎 <s 𝑏 ↔ ∀𝑏𝐵 (𝐶 |s 𝐷) <s 𝑏)
9086, 89sylibr 236 . . . . . . . . . . 11 ((((𝐴 <<s 𝐵𝐶 <<s 𝐷) ∧ (∀𝑑𝐷 (𝐴 |s 𝐵) <s 𝑑 ∧ ∀𝑎𝐴 𝑎 <s (𝐶 |s 𝐷))) ∧ (𝐶 |s 𝐷) <s (𝐴 |s 𝐵)) → ∀𝑎 ∈ {(𝐶 |s 𝐷)}∀𝑏𝐵 𝑎 <s 𝑏)
9158, 71, 903jca 1140 . . . . . . . . . 10 ((((𝐴 <<s 𝐵𝐶 <<s 𝐷) ∧ (∀𝑑𝐷 (𝐴 |s 𝐵) <s 𝑑 ∧ ∀𝑎𝐴 𝑎 <s (𝐶 |s 𝐷))) ∧ (𝐶 |s 𝐷) <s (𝐴 |s 𝐵)) → ({(𝐶 |s 𝐷)} ⊆ No 𝐵 No ∧ ∀𝑎 ∈ {(𝐶 |s 𝐷)}∀𝑏𝐵 𝑎 <s 𝑏))
92 brslts 27832 . . . . . . . . . 10 ({(𝐶 |s 𝐷)} <<s 𝐵 ↔ (({(𝐶 |s 𝐷)} ∈ V ∧ 𝐵 ∈ V) ∧ ({(𝐶 |s 𝐷)} ⊆ No 𝐵 No ∧ ∀𝑎 ∈ {(𝐶 |s 𝐷)}∀𝑏𝐵 𝑎 <s 𝑏)))
9369, 91, 92sylanbrc 592 . . . . . . . . 9 ((((𝐴 <<s 𝐵𝐶 <<s 𝐷) ∧ (∀𝑑𝐷 (𝐴 |s 𝐵) <s 𝑑 ∧ ∀𝑎𝐴 𝑎 <s (𝐶 |s 𝐷))) ∧ (𝐶 |s 𝐷) <s (𝐴 |s 𝐵)) → {(𝐶 |s 𝐷)} <<s 𝐵)
94 ltsirr 27787 . . . . . . . . . . . . . 14 ((𝐴 |s 𝐵) ∈ No → ¬ (𝐴 |s 𝐵) <s (𝐴 |s 𝐵))
9549, 94syl 17 . . . . . . . . . . . . 13 (((𝐴 <<s 𝐵𝐶 <<s 𝐷) ∧ (∀𝑑𝐷 (𝐴 |s 𝐵) <s 𝑑 ∧ ∀𝑎𝐴 𝑎 <s (𝐶 |s 𝐷))) → ¬ (𝐴 |s 𝐵) <s (𝐴 |s 𝐵))
96 breq1 5102 . . . . . . . . . . . . . 14 ((𝐴 |s 𝐵) = (𝐶 |s 𝐷) → ((𝐴 |s 𝐵) <s (𝐴 |s 𝐵) ↔ (𝐶 |s 𝐷) <s (𝐴 |s 𝐵)))
9796notbid 320 . . . . . . . . . . . . 13 ((𝐴 |s 𝐵) = (𝐶 |s 𝐷) → (¬ (𝐴 |s 𝐵) <s (𝐴 |s 𝐵) ↔ ¬ (𝐶 |s 𝐷) <s (𝐴 |s 𝐵)))
9895, 97syl5ibcom 247 . . . . . . . . . . . 12 (((𝐴 <<s 𝐵𝐶 <<s 𝐷) ∧ (∀𝑑𝐷 (𝐴 |s 𝐵) <s 𝑑 ∧ ∀𝑎𝐴 𝑎 <s (𝐶 |s 𝐷))) → ((𝐴 |s 𝐵) = (𝐶 |s 𝐷) → ¬ (𝐶 |s 𝐷) <s (𝐴 |s 𝐵)))
9998necon2ad 2971 . . . . . . . . . . 11 (((𝐴 <<s 𝐵𝐶 <<s 𝐷) ∧ (∀𝑑𝐷 (𝐴 |s 𝐵) <s 𝑑 ∧ ∀𝑎𝐴 𝑎 <s (𝐶 |s 𝐷))) → ((𝐶 |s 𝐷) <s (𝐴 |s 𝐵) → (𝐴 |s 𝐵) ≠ (𝐶 |s 𝐷)))
10099imp 410 . . . . . . . . . 10 ((((𝐴 <<s 𝐵𝐶 <<s 𝐷) ∧ (∀𝑑𝐷 (𝐴 |s 𝐵) <s 𝑑 ∧ ∀𝑎𝐴 𝑎 <s (𝐶 |s 𝐷))) ∧ (𝐶 |s 𝐷) <s (𝐴 |s 𝐵)) → (𝐴 |s 𝐵) ≠ (𝐶 |s 𝐷))
101100necomd 3011 . . . . . . . . 9 ((((𝐴 <<s 𝐵𝐶 <<s 𝐷) ∧ (∀𝑑𝐷 (𝐴 |s 𝐵) <s 𝑑 ∧ ∀𝑎𝐴 𝑎 <s (𝐶 |s 𝐷))) ∧ (𝐶 |s 𝐷) <s (𝐴 |s 𝐵)) → (𝐶 |s 𝐷) ≠ (𝐴 |s 𝐵))
102 cutbdaylt 27868 . . . . . . . . 9 (((𝐶 |s 𝐷) ∈ No ∧ (𝐴 <<s {(𝐶 |s 𝐷)} ∧ {(𝐶 |s 𝐷)} <<s 𝐵) ∧ (𝐶 |s 𝐷) ≠ (𝐴 |s 𝐵)) → ( bday ‘(𝐴 |s 𝐵)) ∈ ( bday ‘(𝐶 |s 𝐷)))
10352, 66, 93, 101, 102syl121anc 1393 . . . . . . . 8 ((((𝐴 <<s 𝐵𝐶 <<s 𝐷) ∧ (∀𝑑𝐷 (𝐴 |s 𝐵) <s 𝑑 ∧ ∀𝑎𝐴 𝑎 <s (𝐶 |s 𝐷))) ∧ (𝐶 |s 𝐷) <s (𝐴 |s 𝐵)) → ( bday ‘(𝐴 |s 𝐵)) ∈ ( bday ‘(𝐶 |s 𝐷)))
1041ad3antrrr 740 . . . . . . . . 9 ((((𝐴 <<s 𝐵𝐶 <<s 𝐷) ∧ (∀𝑑𝐷 (𝐴 |s 𝐵) <s 𝑑 ∧ ∀𝑎𝐴 𝑎 <s (𝐶 |s 𝐷))) ∧ (𝐶 |s 𝐷) <s (𝐴 |s 𝐵)) → (𝐴 |s 𝐵) ∈ No )
105 sltsex1 27833 . . . . . . . . . . . 12 (𝐶 <<s 𝐷𝐶 ∈ V)
106105ad3antlr 741 . . . . . . . . . . 11 ((((𝐴 <<s 𝐵𝐶 <<s 𝐷) ∧ (∀𝑑𝐷 (𝐴 |s 𝐵) <s 𝑑 ∧ ∀𝑎𝐴 𝑎 <s (𝐶 |s 𝐷))) ∧ (𝐶 |s 𝐷) <s (𝐴 |s 𝐵)) → 𝐶 ∈ V)
107 snex 5395 . . . . . . . . . . 11 {(𝐴 |s 𝐵)} ∈ V
108106, 107jctir 528 . . . . . . . . . 10 ((((𝐴 <<s 𝐵𝐶 <<s 𝐷) ∧ (∀𝑑𝐷 (𝐴 |s 𝐵) <s 𝑑 ∧ ∀𝑎𝐴 𝑎 <s (𝐶 |s 𝐷))) ∧ (𝐶 |s 𝐷) <s (𝐴 |s 𝐵)) → (𝐶 ∈ V ∧ {(𝐴 |s 𝐵)} ∈ V))
109 sltsss1 27835 . . . . . . . . . . . 12 (𝐶 <<s 𝐷𝐶 No )
110109ad3antlr 741 . . . . . . . . . . 11 ((((𝐴 <<s 𝐵𝐶 <<s 𝐷) ∧ (∀𝑑𝐷 (𝐴 |s 𝐵) <s 𝑑 ∧ ∀𝑎𝐴 𝑎 <s (𝐶 |s 𝐷))) ∧ (𝐶 |s 𝐷) <s (𝐴 |s 𝐵)) → 𝐶 No )
111104snssd 4744 . . . . . . . . . . 11 ((((𝐴 <<s 𝐵𝐶 <<s 𝐷) ∧ (∀𝑑𝐷 (𝐴 |s 𝐵) <s 𝑑 ∧ ∀𝑎𝐴 𝑎 <s (𝐶 |s 𝐷))) ∧ (𝐶 |s 𝐷) <s (𝐴 |s 𝐵)) → {(𝐴 |s 𝐵)} ⊆ No )
112110sselda 3936 . . . . . . . . . . . . . 14 (((((𝐴 <<s 𝐵𝐶 <<s 𝐷) ∧ (∀𝑑𝐷 (𝐴 |s 𝐵) <s 𝑑 ∧ ∀𝑎𝐴 𝑎 <s (𝐶 |s 𝐷))) ∧ (𝐶 |s 𝐷) <s (𝐴 |s 𝐵)) ∧ 𝑐𝐶) → 𝑐 No )
11352adantr 484 . . . . . . . . . . . . . 14 (((((𝐴 <<s 𝐵𝐶 <<s 𝐷) ∧ (∀𝑑𝐷 (𝐴 |s 𝐵) <s 𝑑 ∧ ∀𝑎𝐴 𝑎 <s (𝐶 |s 𝐷))) ∧ (𝐶 |s 𝐷) <s (𝐴 |s 𝐵)) ∧ 𝑐𝐶) → (𝐶 |s 𝐷) ∈ No )
11448ad3antrrr 740 . . . . . . . . . . . . . 14 (((((𝐴 <<s 𝐵𝐶 <<s 𝐷) ∧ (∀𝑑𝐷 (𝐴 |s 𝐵) <s 𝑑 ∧ ∀𝑎𝐴 𝑎 <s (𝐶 |s 𝐷))) ∧ (𝐶 |s 𝐷) <s (𝐴 |s 𝐵)) ∧ 𝑐𝐶) → (𝐴 |s 𝐵) ∈ No )
1159simp2d 1155 . . . . . . . . . . . . . . . . . 18 (𝐶 <<s 𝐷𝐶 <<s {(𝐶 |s 𝐷)})
116115ad3antlr 741 . . . . . . . . . . . . . . . . 17 ((((𝐴 <<s 𝐵𝐶 <<s 𝐷) ∧ (∀𝑑𝐷 (𝐴 |s 𝐵) <s 𝑑 ∧ ∀𝑎𝐴 𝑎 <s (𝐶 |s 𝐷))) ∧ (𝐶 |s 𝐷) <s (𝐴 |s 𝐵)) → 𝐶 <<s {(𝐶 |s 𝐷)})
117 sltssep 27837 . . . . . . . . . . . . . . . . 17 (𝐶 <<s {(𝐶 |s 𝐷)} → ∀𝑐𝐶𝑑 ∈ {(𝐶 |s 𝐷)}𝑐 <s 𝑑)
118116, 117syl 17 . . . . . . . . . . . . . . . 16 ((((𝐴 <<s 𝐵𝐶 <<s 𝐷) ∧ (∀𝑑𝐷 (𝐴 |s 𝐵) <s 𝑑 ∧ ∀𝑎𝐴 𝑎 <s (𝐶 |s 𝐷))) ∧ (𝐶 |s 𝐷) <s (𝐴 |s 𝐵)) → ∀𝑐𝐶𝑑 ∈ {(𝐶 |s 𝐷)}𝑐 <s 𝑑)
119118r19.21bi 3253 . . . . . . . . . . . . . . 15 (((((𝐴 <<s 𝐵𝐶 <<s 𝐷) ∧ (∀𝑑𝐷 (𝐴 |s 𝐵) <s 𝑑 ∧ ∀𝑎𝐴 𝑎 <s (𝐶 |s 𝐷))) ∧ (𝐶 |s 𝐷) <s (𝐴 |s 𝐵)) ∧ 𝑐𝐶) → ∀𝑑 ∈ {(𝐶 |s 𝐷)}𝑐 <s 𝑑)
120 breq2 5103 . . . . . . . . . . . . . . . 16 (𝑑 = (𝐶 |s 𝐷) → (𝑐 <s 𝑑𝑐 <s (𝐶 |s 𝐷)))
12114, 120ralsn 4639 . . . . . . . . . . . . . . 15 (∀𝑑 ∈ {(𝐶 |s 𝐷)}𝑐 <s 𝑑𝑐 <s (𝐶 |s 𝐷))
122119, 121sylib 220 . . . . . . . . . . . . . 14 (((((𝐴 <<s 𝐵𝐶 <<s 𝐷) ∧ (∀𝑑𝐷 (𝐴 |s 𝐵) <s 𝑑 ∧ ∀𝑎𝐴 𝑎 <s (𝐶 |s 𝐷))) ∧ (𝐶 |s 𝐷) <s (𝐴 |s 𝐵)) ∧ 𝑐𝐶) → 𝑐 <s (𝐶 |s 𝐷))
123 simplr 778 . . . . . . . . . . . . . 14 (((((𝐴 <<s 𝐵𝐶 <<s 𝐷) ∧ (∀𝑑𝐷 (𝐴 |s 𝐵) <s 𝑑 ∧ ∀𝑎𝐴 𝑎 <s (𝐶 |s 𝐷))) ∧ (𝐶 |s 𝐷) <s (𝐴 |s 𝐵)) ∧ 𝑐𝐶) → (𝐶 |s 𝐷) <s (𝐴 |s 𝐵))
124112, 113, 114, 122, 123ltstrd 27804 . . . . . . . . . . . . 13 (((((𝐴 <<s 𝐵𝐶 <<s 𝐷) ∧ (∀𝑑𝐷 (𝐴 |s 𝐵) <s 𝑑 ∧ ∀𝑎𝐴 𝑎 <s (𝐶 |s 𝐷))) ∧ (𝐶 |s 𝐷) <s (𝐴 |s 𝐵)) ∧ 𝑐𝐶) → 𝑐 <s (𝐴 |s 𝐵))
125 breq2 5103 . . . . . . . . . . . . . 14 (𝑎 = (𝐴 |s 𝐵) → (𝑐 <s 𝑎𝑐 <s (𝐴 |s 𝐵)))
12635, 125ralsn 4639 . . . . . . . . . . . . 13 (∀𝑎 ∈ {(𝐴 |s 𝐵)}𝑐 <s 𝑎𝑐 <s (𝐴 |s 𝐵))
127124, 126sylibr 236 . . . . . . . . . . . 12 (((((𝐴 <<s 𝐵𝐶 <<s 𝐷) ∧ (∀𝑑𝐷 (𝐴 |s 𝐵) <s 𝑑 ∧ ∀𝑎𝐴 𝑎 <s (𝐶 |s 𝐷))) ∧ (𝐶 |s 𝐷) <s (𝐴 |s 𝐵)) ∧ 𝑐𝐶) → ∀𝑎 ∈ {(𝐴 |s 𝐵)}𝑐 <s 𝑎)
128127ralrimiva 3153 . . . . . . . . . . 11 ((((𝐴 <<s 𝐵𝐶 <<s 𝐷) ∧ (∀𝑑𝐷 (𝐴 |s 𝐵) <s 𝑑 ∧ ∀𝑎𝐴 𝑎 <s (𝐶 |s 𝐷))) ∧ (𝐶 |s 𝐷) <s (𝐴 |s 𝐵)) → ∀𝑐𝐶𝑎 ∈ {(𝐴 |s 𝐵)}𝑐 <s 𝑎)
129110, 111, 1283jca 1140 . . . . . . . . . 10 ((((𝐴 <<s 𝐵𝐶 <<s 𝐷) ∧ (∀𝑑𝐷 (𝐴 |s 𝐵) <s 𝑑 ∧ ∀𝑎𝐴 𝑎 <s (𝐶 |s 𝐷))) ∧ (𝐶 |s 𝐷) <s (𝐴 |s 𝐵)) → (𝐶 No ∧ {(𝐴 |s 𝐵)} ⊆ No ∧ ∀𝑐𝐶𝑎 ∈ {(𝐴 |s 𝐵)}𝑐 <s 𝑎))
130 brslts 27832 . . . . . . . . . 10 (𝐶 <<s {(𝐴 |s 𝐵)} ↔ ((𝐶 ∈ V ∧ {(𝐴 |s 𝐵)} ∈ V) ∧ (𝐶 No ∧ {(𝐴 |s 𝐵)} ⊆ No ∧ ∀𝑐𝐶𝑎 ∈ {(𝐴 |s 𝐵)}𝑐 <s 𝑎)))
131108, 129, 130sylanbrc 592 . . . . . . . . 9 ((((𝐴 <<s 𝐵𝐶 <<s 𝐷) ∧ (∀𝑑𝐷 (𝐴 |s 𝐵) <s 𝑑 ∧ ∀𝑎𝐴 𝑎 <s (𝐶 |s 𝐷))) ∧ (𝐶 |s 𝐷) <s (𝐴 |s 𝐵)) → 𝐶 <<s {(𝐴 |s 𝐵)})
132 sltsex2 27834 . . . . . . . . . . . 12 (𝐶 <<s 𝐷𝐷 ∈ V)
133132ad3antlr 741 . . . . . . . . . . 11 ((((𝐴 <<s 𝐵𝐶 <<s 𝐷) ∧ (∀𝑑𝐷 (𝐴 |s 𝐵) <s 𝑑 ∧ ∀𝑎𝐴 𝑎 <s (𝐶 |s 𝐷))) ∧ (𝐶 |s 𝐷) <s (𝐴 |s 𝐵)) → 𝐷 ∈ V)
134133, 107jctil 527 . . . . . . . . . 10 ((((𝐴 <<s 𝐵𝐶 <<s 𝐷) ∧ (∀𝑑𝐷 (𝐴 |s 𝐵) <s 𝑑 ∧ ∀𝑎𝐴 𝑎 <s (𝐶 |s 𝐷))) ∧ (𝐶 |s 𝐷) <s (𝐴 |s 𝐵)) → ({(𝐴 |s 𝐵)} ∈ V ∧ 𝐷 ∈ V))
1355ad3antlr 741 . . . . . . . . . . 11 ((((𝐴 <<s 𝐵𝐶 <<s 𝐷) ∧ (∀𝑑𝐷 (𝐴 |s 𝐵) <s 𝑑 ∧ ∀𝑎𝐴 𝑎 <s (𝐶 |s 𝐷))) ∧ (𝐶 |s 𝐷) <s (𝐴 |s 𝐵)) → 𝐷 No )
136 simplrl 786 . . . . . . . . . . . 12 ((((𝐴 <<s 𝐵𝐶 <<s 𝐷) ∧ (∀𝑑𝐷 (𝐴 |s 𝐵) <s 𝑑 ∧ ∀𝑎𝐴 𝑎 <s (𝐶 |s 𝐷))) ∧ (𝐶 |s 𝐷) <s (𝐴 |s 𝐵)) → ∀𝑑𝐷 (𝐴 |s 𝐵) <s 𝑑)
137 breq1 5102 . . . . . . . . . . . . . 14 (𝑎 = (𝐴 |s 𝐵) → (𝑎 <s 𝑑 ↔ (𝐴 |s 𝐵) <s 𝑑))
138137ralbidv 3184 . . . . . . . . . . . . 13 (𝑎 = (𝐴 |s 𝐵) → (∀𝑑𝐷 𝑎 <s 𝑑 ↔ ∀𝑑𝐷 (𝐴 |s 𝐵) <s 𝑑))
13935, 138ralsn 4639 . . . . . . . . . . . 12 (∀𝑎 ∈ {(𝐴 |s 𝐵)}∀𝑑𝐷 𝑎 <s 𝑑 ↔ ∀𝑑𝐷 (𝐴 |s 𝐵) <s 𝑑)
140136, 139sylibr 236 . . . . . . . . . . 11 ((((𝐴 <<s 𝐵𝐶 <<s 𝐷) ∧ (∀𝑑𝐷 (𝐴 |s 𝐵) <s 𝑑 ∧ ∀𝑎𝐴 𝑎 <s (𝐶 |s 𝐷))) ∧ (𝐶 |s 𝐷) <s (𝐴 |s 𝐵)) → ∀𝑎 ∈ {(𝐴 |s 𝐵)}∀𝑑𝐷 𝑎 <s 𝑑)
141111, 135, 1403jca 1140 . . . . . . . . . 10 ((((𝐴 <<s 𝐵𝐶 <<s 𝐷) ∧ (∀𝑑𝐷 (𝐴 |s 𝐵) <s 𝑑 ∧ ∀𝑎𝐴 𝑎 <s (𝐶 |s 𝐷))) ∧ (𝐶 |s 𝐷) <s (𝐴 |s 𝐵)) → ({(𝐴 |s 𝐵)} ⊆ No 𝐷 No ∧ ∀𝑎 ∈ {(𝐴 |s 𝐵)}∀𝑑𝐷 𝑎 <s 𝑑))
142 brslts 27832 . . . . . . . . . 10 ({(𝐴 |s 𝐵)} <<s 𝐷 ↔ (({(𝐴 |s 𝐵)} ∈ V ∧ 𝐷 ∈ V) ∧ ({(𝐴 |s 𝐵)} ⊆ No 𝐷 No ∧ ∀𝑎 ∈ {(𝐴 |s 𝐵)}∀𝑑𝐷 𝑎 <s 𝑑)))
143134, 141, 142sylanbrc 592 . . . . . . . . 9 ((((𝐴 <<s 𝐵𝐶 <<s 𝐷) ∧ (∀𝑑𝐷 (𝐴 |s 𝐵) <s 𝑑 ∧ ∀𝑎𝐴 𝑎 <s (𝐶 |s 𝐷))) ∧ (𝐶 |s 𝐷) <s (𝐴 |s 𝐵)) → {(𝐴 |s 𝐵)} <<s 𝐷)
144 cutbdaylt 27868 . . . . . . . . 9 (((𝐴 |s 𝐵) ∈ No ∧ (𝐶 <<s {(𝐴 |s 𝐵)} ∧ {(𝐴 |s 𝐵)} <<s 𝐷) ∧ (𝐴 |s 𝐵) ≠ (𝐶 |s 𝐷)) → ( bday ‘(𝐶 |s 𝐷)) ∈ ( bday ‘(𝐴 |s 𝐵)))
145104, 131, 143, 100, 144syl121anc 1393 . . . . . . . 8 ((((𝐴 <<s 𝐵𝐶 <<s 𝐷) ∧ (∀𝑑𝐷 (𝐴 |s 𝐵) <s 𝑑 ∧ ∀𝑎𝐴 𝑎 <s (𝐶 |s 𝐷))) ∧ (𝐶 |s 𝐷) <s (𝐴 |s 𝐵)) → ( bday ‘(𝐶 |s 𝐷)) ∈ ( bday ‘(𝐴 |s 𝐵)))
146103, 145jca 519 . . . . . . 7 ((((𝐴 <<s 𝐵𝐶 <<s 𝐷) ∧ (∀𝑑𝐷 (𝐴 |s 𝐵) <s 𝑑 ∧ ∀𝑎𝐴 𝑎 <s (𝐶 |s 𝐷))) ∧ (𝐶 |s 𝐷) <s (𝐴 |s 𝐵)) → (( bday ‘(𝐴 |s 𝐵)) ∈ ( bday ‘(𝐶 |s 𝐷)) ∧ ( bday ‘(𝐶 |s 𝐷)) ∈ ( bday ‘(𝐴 |s 𝐵))))
147146ex 416 . . . . . 6 (((𝐴 <<s 𝐵𝐶 <<s 𝐷) ∧ (∀𝑑𝐷 (𝐴 |s 𝐵) <s 𝑑 ∧ ∀𝑎𝐴 𝑎 <s (𝐶 |s 𝐷))) → ((𝐶 |s 𝐷) <s (𝐴 |s 𝐵) → (( bday ‘(𝐴 |s 𝐵)) ∈ ( bday ‘(𝐶 |s 𝐷)) ∧ ( bday ‘(𝐶 |s 𝐷)) ∈ ( bday ‘(𝐴 |s 𝐵)))))
14851, 147sylbird 262 . . . . 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 810 . . 3 ((𝐴 <<s 𝐵𝐶 <<s 𝐷) → ((𝐴 |s 𝐵) ≤s (𝐶 |s 𝐷) ↔ (∀𝑑𝐷 (𝐴 |s 𝐵) <s 𝑑 ∧ ∀𝑎𝐴 𝑎 <s (𝐶 |s 𝐷))))
151 breq12 5104 . . . 4 ((𝑋 = (𝐴 |s 𝐵) ∧ 𝑌 = (𝐶 |s 𝐷)) → (𝑋 ≤s 𝑌 ↔ (𝐴 |s 𝐵) ≤s (𝐶 |s 𝐷)))
152 breq1 5102 . . . . . 6 (𝑋 = (𝐴 |s 𝐵) → (𝑋 <s 𝑑 ↔ (𝐴 |s 𝐵) <s 𝑑))
153152ralbidv 3184 . . . . 5 (𝑋 = (𝐴 |s 𝐵) → (∀𝑑𝐷 𝑋 <s 𝑑 ↔ ∀𝑑𝐷 (𝐴 |s 𝐵) <s 𝑑))
154 breq2 5103 . . . . . 6 (𝑌 = (𝐶 |s 𝐷) → (𝑎 <s 𝑌𝑎 <s (𝐶 |s 𝐷)))
155154ralbidv 3184 . . . . 5 (𝑌 = (𝐶 |s 𝐷) → (∀𝑎𝐴 𝑎 <s 𝑌 ↔ ∀𝑎𝐴 𝑎 <s (𝐶 |s 𝐷)))
156153, 155bi2anan9 647 . . . 4 ((𝑋 = (𝐴 |s 𝐵) ∧ 𝑌 = (𝐶 |s 𝐷)) → ((∀𝑑𝐷 𝑋 <s 𝑑 ∧ ∀𝑎𝐴 𝑎 <s 𝑌) ↔ (∀𝑑𝐷 (𝐴 |s 𝐵) <s 𝑑 ∧ ∀𝑎𝐴 𝑎 <s (𝐶 |s 𝐷))))
157151, 156bibi12d 347 . . 3 ((𝑋 = (𝐴 |s 𝐵) ∧ 𝑌 = (𝐶 |s 𝐷)) → ((𝑋 ≤s 𝑌 ↔ (∀𝑑𝐷 𝑋 <s 𝑑 ∧ ∀𝑎𝐴 𝑎 <s 𝑌)) ↔ ((𝐴 |s 𝐵) ≤s (𝐶 |s 𝐷) ↔ (∀𝑑𝐷 (𝐴 |s 𝐵) <s 𝑑 ∧ ∀𝑎𝐴 𝑎 <s (𝐶 |s 𝐷)))))
158150, 157imbitrrid 248 . 2 ((𝑋 = (𝐴 |s 𝐵) ∧ 𝑌 = (𝐶 |s 𝐷)) → ((𝐴 <<s 𝐵𝐶 <<s 𝐷) → (𝑋 ≤s 𝑌 ↔ (∀𝑑𝐷 𝑋 <s 𝑑 ∧ ∀𝑎𝐴 𝑎 <s 𝑌))))
159158impcom 411 1 (((𝐴 <<s 𝐵𝐶 <<s 𝐷) ∧ (𝑋 = (𝐴 |s 𝐵) ∧ 𝑌 = (𝐶 |s 𝐷))) → (𝑋 ≤s 𝑌 ↔ (∀𝑑𝐷 𝑋 <s 𝑑 ∧ ∀𝑎𝐴 𝑎 <s 𝑌)))
Colors of variables: wff setvar class
Syntax hints:  ¬ wn 3  wi 4  wb 208  wa 399  w3a 1097   = wceq 1559  wcel 2141  wne 2956  wral 3075  Vcvv 3453  wss 3904  {csn 4581   class class class wbr 5099  Ord word 6341  cfv 6517  (class class class)co 7392   No csur 27681   <s clts 27682   bday cbday 27683   ≤s cles 27785   <<s cslts 27827   |s ccuts 27829
This theorem was proved from axioms:  ax-mp 5  ax-1 6  ax-2 7  ax-3 8  ax-gen 1814  ax-4 1828  ax-5 1929  ax-6 1986  ax-7 2027  ax-8 2143  ax-9 2151  ax-10 2174  ax-11 2190  ax-12 2211  ax-ext 2733  ax-rep 5226  ax-sep 5245  ax-nul 5255  ax-pow 5321  ax-pr 5389  ax-un 7714
This theorem depends on definitions:  df-bi 209  df-an 400  df-or 859  df-3or 1098  df-3an 1099  df-tru 1562  df-fal 1572  df-ex 1799  df-nf 1803  df-sb 2090  df-mo 2565  df-eu 2595  df-clab 2740  df-cleq 2753  df-clel 2836  df-nfc 2910  df-ne 2957  df-ral 3076  df-rex 3086  df-rmo 3366  df-reu 3367  df-rab 3414  df-v 3455  df-sbc 3745  df-csb 3853  df-dif 3907  df-un 3909  df-in 3911  df-ss 3921  df-pss 3924  df-nul 4286  df-if 4480  df-pw 4556  df-sn 4582  df-pr 4584  df-tp 4586  df-op 4588  df-uni 4865  df-int 4905  df-br 5100  df-opab 5162  df-mpt 5181  df-tr 5207  df-id 5540  df-eprel 5545  df-po 5553  df-so 5554  df-fr 5598  df-we 5600  df-xp 5651  df-rel 5652  df-cnv 5653  df-co 5654  df-dm 5655  df-rn 5656  df-res 5657  df-ima 5658  df-ord 6345  df-on 6346  df-suc 6348  df-iota 6473  df-fun 6519  df-fn 6520  df-f 6521  df-f1 6522  df-fo 6523  df-f1o 6524  df-fv 6525  df-riota 7349  df-ov 7395  df-oprab 7396  df-mpo 7397  df-1o 8432  df-2o 8433  df-no 27684  df-lts 27685  df-bday 27686  df-les 27786  df-slts 27828  df-cuts 27830
This theorem is referenced by:  lesrecd  27870  twocut  28493
  Copyright terms: Public domain W3C validator