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

Theorem lesrec 28029
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 28012 . . . . . . . 8 (𝐴 <<s 𝐵 → (𝐴 |s 𝐵) ∈ No )
21ad3antrrr 743 . . . . . . 7 ((((𝐴 <<s 𝐵𝐶 <<s 𝐷) ∧ (𝐴 |s 𝐵) ≤s (𝐶 |s 𝐷)) ∧ 𝑑𝐷) → (𝐴 |s 𝐵) ∈ No )
3 cutscl 28012 . . . . . . . 8 (𝐶 <<s 𝐷 → (𝐶 |s 𝐷) ∈ No )
43ad3antlr 744 . . . . . . 7 ((((𝐴 <<s 𝐵𝐶 <<s 𝐷) ∧ (𝐴 |s 𝐵) ≤s (𝐶 |s 𝐷)) ∧ 𝑑𝐷) → (𝐶 |s 𝐷) ∈ No )
5 sltsss2 27996 . . . . . . . . 9 (𝐶 <<s 𝐷𝐷 No )
65ad2antlr 740 . . . . . . . 8 (((𝐴 <<s 𝐵𝐶 <<s 𝐷) ∧ (𝐴 |s 𝐵) ≤s (𝐶 |s 𝐷)) → 𝐷 No )
76sselda 3940 . . . . . . 7 ((((𝐴 <<s 𝐵𝐶 <<s 𝐷) ∧ (𝐴 |s 𝐵) ≤s (𝐶 |s 𝐷)) ∧ 𝑑𝐷) → 𝑑 No )
8 simplr 781 . . . . . . 7 ((((𝐴 <<s 𝐵𝐶 <<s 𝐷) ∧ (𝐴 |s 𝐵) ≤s (𝐶 |s 𝐷)) ∧ 𝑑𝐷) → (𝐴 |s 𝐵) ≤s (𝐶 |s 𝐷))
9 cutcuts 28011 . . . . . . . . . . . 12 (𝐶 <<s 𝐷 → ((𝐶 |s 𝐷) ∈ No 𝐶 <<s {(𝐶 |s 𝐷)} ∧ {(𝐶 |s 𝐷)} <<s 𝐷))
109simp3d 1162 . . . . . . . . . . 11 (𝐶 <<s 𝐷 → {(𝐶 |s 𝐷)} <<s 𝐷)
1110ad2antlr 740 . . . . . . . . . 10 (((𝐴 <<s 𝐵𝐶 <<s 𝐷) ∧ (𝐴 |s 𝐵) ≤s (𝐶 |s 𝐷)) → {(𝐶 |s 𝐷)} <<s 𝐷)
12 sltssep 27997 . . . . . . . . . 10 ({(𝐶 |s 𝐷)} <<s 𝐷 → ∀𝑎 ∈ {(𝐶 |s 𝐷)}∀𝑑𝐷 𝑎 <s 𝑑)
1311, 12syl 18 . . . . . . . . 9 (((𝐴 <<s 𝐵𝐶 <<s 𝐷) ∧ (𝐴 |s 𝐵) ≤s (𝐶 |s 𝐷)) → ∀𝑎 ∈ {(𝐶 |s 𝐷)}∀𝑑𝐷 𝑎 <s 𝑑)
14 ovex 7456 . . . . . . . . . 10 (𝐶 |s 𝐷) ∈ V
15 breq1 5117 . . . . . . . . . . 11 (𝑎 = (𝐶 |s 𝐷) → (𝑎 <s 𝑑 ↔ (𝐶 |s 𝐷) <s 𝑑))
1615ralbidv 3191 . . . . . . . . . 10 (𝑎 = (𝐶 |s 𝐷) → (∀𝑑𝐷 𝑎 <s 𝑑 ↔ ∀𝑑𝐷 (𝐶 |s 𝐷) <s 𝑑))
1714, 16ralsn 4652 . . . . . . . . 9 (∀𝑎 ∈ {(𝐶 |s 𝐷)}∀𝑑𝐷 𝑎 <s 𝑑 ↔ ∀𝑑𝐷 (𝐶 |s 𝐷) <s 𝑑)
1813, 17sylib 221 . . . . . . . 8 (((𝐴 <<s 𝐵𝐶 <<s 𝐷) ∧ (𝐴 |s 𝐵) ≤s (𝐶 |s 𝐷)) → ∀𝑑𝐷 (𝐶 |s 𝐷) <s 𝑑)
1918r19.21bi 3260 . . . . . . 7 ((((𝐴 <<s 𝐵𝐶 <<s 𝐷) ∧ (𝐴 |s 𝐵) ≤s (𝐶 |s 𝐷)) ∧ 𝑑𝐷) → (𝐶 |s 𝐷) <s 𝑑)
202, 4, 7, 8, 19leltstrd 27966 . . . . . 6 ((((𝐴 <<s 𝐵𝐶 <<s 𝐷) ∧ (𝐴 |s 𝐵) ≤s (𝐶 |s 𝐷)) ∧ 𝑑𝐷) → (𝐴 |s 𝐵) <s 𝑑)
2120ralrimiva 3160 . . . . 5 (((𝐴 <<s 𝐵𝐶 <<s 𝐷) ∧ (𝐴 |s 𝐵) ≤s (𝐶 |s 𝐷)) → ∀𝑑𝐷 (𝐴 |s 𝐵) <s 𝑑)
22 sltsss1 27995 . . . . . . . . . 10 (𝐴 <<s 𝐵𝐴 No )
2322adantr 486 . . . . . . . . 9 ((𝐴 <<s 𝐵𝐶 <<s 𝐷) → 𝐴 No )
2423adantr 486 . . . . . . . 8 (((𝐴 <<s 𝐵𝐶 <<s 𝐷) ∧ (𝐴 |s 𝐵) ≤s (𝐶 |s 𝐷)) → 𝐴 No )
2524sselda 3940 . . . . . . 7 ((((𝐴 <<s 𝐵𝐶 <<s 𝐷) ∧ (𝐴 |s 𝐵) ≤s (𝐶 |s 𝐷)) ∧ 𝑎𝐴) → 𝑎 No )
261ad3antrrr 743 . . . . . . 7 ((((𝐴 <<s 𝐵𝐶 <<s 𝐷) ∧ (𝐴 |s 𝐵) ≤s (𝐶 |s 𝐷)) ∧ 𝑎𝐴) → (𝐴 |s 𝐵) ∈ No )
273ad3antlr 744 . . . . . . 7 ((((𝐴 <<s 𝐵𝐶 <<s 𝐷) ∧ (𝐴 |s 𝐵) ≤s (𝐶 |s 𝐷)) ∧ 𝑎𝐴) → (𝐶 |s 𝐷) ∈ No )
28 cutcuts 28011 . . . . . . . . . . . . 13 (𝐴 <<s 𝐵 → ((𝐴 |s 𝐵) ∈ No 𝐴 <<s {(𝐴 |s 𝐵)} ∧ {(𝐴 |s 𝐵)} <<s 𝐵))
2928simp2d 1161 . . . . . . . . . . . 12 (𝐴 <<s 𝐵𝐴 <<s {(𝐴 |s 𝐵)})
3029adantr 486 . . . . . . . . . . 11 ((𝐴 <<s 𝐵𝐶 <<s 𝐷) → 𝐴 <<s {(𝐴 |s 𝐵)})
3130adantr 486 . . . . . . . . . 10 (((𝐴 <<s 𝐵𝐶 <<s 𝐷) ∧ (𝐴 |s 𝐵) ≤s (𝐶 |s 𝐷)) → 𝐴 <<s {(𝐴 |s 𝐵)})
32 sltssep 27997 . . . . . . . . . 10 (𝐴 <<s {(𝐴 |s 𝐵)} → ∀𝑎𝐴𝑑 ∈ {(𝐴 |s 𝐵)}𝑎 <s 𝑑)
3331, 32syl 18 . . . . . . . . 9 (((𝐴 <<s 𝐵𝐶 <<s 𝐷) ∧ (𝐴 |s 𝐵) ≤s (𝐶 |s 𝐷)) → ∀𝑎𝐴𝑑 ∈ {(𝐴 |s 𝐵)}𝑎 <s 𝑑)
3433r19.21bi 3260 . . . . . . . 8 ((((𝐴 <<s 𝐵𝐶 <<s 𝐷) ∧ (𝐴 |s 𝐵) ≤s (𝐶 |s 𝐷)) ∧ 𝑎𝐴) → ∀𝑑 ∈ {(𝐴 |s 𝐵)}𝑎 <s 𝑑)
35 ovex 7456 . . . . . . . . 9 (𝐴 |s 𝐵) ∈ V
36 breq2 5118 . . . . . . . . 9 (𝑑 = (𝐴 |s 𝐵) → (𝑎 <s 𝑑𝑎 <s (𝐴 |s 𝐵)))
3735, 36ralsn 4652 . . . . . . . 8 (∀𝑑 ∈ {(𝐴 |s 𝐵)}𝑎 <s 𝑑𝑎 <s (𝐴 |s 𝐵))
3834, 37sylib 221 . . . . . . 7 ((((𝐴 <<s 𝐵𝐶 <<s 𝐷) ∧ (𝐴 |s 𝐵) ≤s (𝐶 |s 𝐷)) ∧ 𝑎𝐴) → 𝑎 <s (𝐴 |s 𝐵))
39 simplr 781 . . . . . . 7 ((((𝐴 <<s 𝐵𝐶 <<s 𝐷) ∧ (𝐴 |s 𝐵) ≤s (𝐶 |s 𝐷)) ∧ 𝑎𝐴) → (𝐴 |s 𝐵) ≤s (𝐶 |s 𝐷))
4025, 26, 27, 38, 39ltlestrd 27965 . . . . . 6 ((((𝐴 <<s 𝐵𝐶 <<s 𝐷) ∧ (𝐴 |s 𝐵) ≤s (𝐶 |s 𝐷)) ∧ 𝑎𝐴) → 𝑎 <s (𝐶 |s 𝐷))
4140ralrimiva 3160 . . . . 5 (((𝐴 <<s 𝐵𝐶 <<s 𝐷) ∧ (𝐴 |s 𝐵) ≤s (𝐶 |s 𝐷)) → ∀𝑎𝐴 𝑎 <s (𝐶 |s 𝐷))
4221, 41jca 521 . . . 4 (((𝐴 <<s 𝐵𝐶 <<s 𝐷) ∧ (𝐴 |s 𝐵) ≤s (𝐶 |s 𝐷)) → (∀𝑑𝐷 (𝐴 |s 𝐵) <s 𝑑 ∧ ∀𝑎𝐴 𝑎 <s (𝐶 |s 𝐷)))
43 bdayon 27982 . . . . . . 7 ( bday ‘(𝐴 |s 𝐵)) ∈ On
4443onordi 6481 . . . . . 6 Ord ( bday ‘(𝐴 |s 𝐵))
45 ordn2lp 6387 . . . . . 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 740 . . . . . . 7 (((𝐴 <<s 𝐵𝐶 <<s 𝐷) ∧ (∀𝑑𝐷 (𝐴 |s 𝐵) <s 𝑑 ∧ ∀𝑎𝐴 𝑎 <s (𝐶 |s 𝐷))) → (𝐶 |s 𝐷) ∈ No )
481adantr 486 . . . . . . . 8 ((𝐴 <<s 𝐵𝐶 <<s 𝐷) → (𝐴 |s 𝐵) ∈ No )
4948adantr 486 . . . . . . 7 (((𝐴 <<s 𝐵𝐶 <<s 𝐷) ∧ (∀𝑑𝐷 (𝐴 |s 𝐵) <s 𝑑 ∧ ∀𝑎𝐴 𝑎 <s (𝐶 |s 𝐷))) → (𝐴 |s 𝐵) ∈ No )
50 ltnles 27954 . . . . . . 7 (((𝐶 |s 𝐷) ∈ No ∧ (𝐴 |s 𝐵) ∈ No ) → ((𝐶 |s 𝐷) <s (𝐴 |s 𝐵) ↔ ¬ (𝐴 |s 𝐵) ≤s (𝐶 |s 𝐷)))
5147, 49, 50syl2anc 596 . . . . . 6 (((𝐴 <<s 𝐵𝐶 <<s 𝐷) ∧ (∀𝑑𝐷 (𝐴 |s 𝐵) <s 𝑑 ∧ ∀𝑎𝐴 𝑎 <s (𝐶 |s 𝐷))) → ((𝐶 |s 𝐷) <s (𝐴 |s 𝐵) ↔ ¬ (𝐴 |s 𝐵) ≤s (𝐶 |s 𝐷)))
523ad3antlr 744 . . . . . . . . 9 ((((𝐴 <<s 𝐵𝐶 <<s 𝐷) ∧ (∀𝑑𝐷 (𝐴 |s 𝐵) <s 𝑑 ∧ ∀𝑎𝐴 𝑎 <s (𝐶 |s 𝐷))) ∧ (𝐶 |s 𝐷) <s (𝐴 |s 𝐵)) → (𝐶 |s 𝐷) ∈ No )
53 sltsex1 27993 . . . . . . . . . . . 12 (𝐴 <<s 𝐵𝐴 ∈ V)
5453ad3antrrr 743 . . . . . . . . . . 11 ((((𝐴 <<s 𝐵𝐶 <<s 𝐷) ∧ (∀𝑑𝐷 (𝐴 |s 𝐵) <s 𝑑 ∧ ∀𝑎𝐴 𝑎 <s (𝐶 |s 𝐷))) ∧ (𝐶 |s 𝐷) <s (𝐴 |s 𝐵)) → 𝐴 ∈ V)
55 snex 5415 . . . . . . . . . . 11 {(𝐶 |s 𝐷)} ∈ V
5654, 55jctir 530 . . . . . . . . . 10 ((((𝐴 <<s 𝐵𝐶 <<s 𝐷) ∧ (∀𝑑𝐷 (𝐴 |s 𝐵) <s 𝑑 ∧ ∀𝑎𝐴 𝑎 <s (𝐶 |s 𝐷))) ∧ (𝐶 |s 𝐷) <s (𝐴 |s 𝐵)) → (𝐴 ∈ V ∧ {(𝐶 |s 𝐷)} ∈ V))
5722ad3antrrr 743 . . . . . . . . . . 11 ((((𝐴 <<s 𝐵𝐶 <<s 𝐷) ∧ (∀𝑑𝐷 (𝐴 |s 𝐵) <s 𝑑 ∧ ∀𝑎𝐴 𝑎 <s (𝐶 |s 𝐷))) ∧ (𝐶 |s 𝐷) <s (𝐴 |s 𝐵)) → 𝐴 No )
5852snssd 4757 . . . . . . . . . . 11 ((((𝐴 <<s 𝐵𝐶 <<s 𝐷) ∧ (∀𝑑𝐷 (𝐴 |s 𝐵) <s 𝑑 ∧ ∀𝑎𝐴 𝑎 <s (𝐶 |s 𝐷))) ∧ (𝐶 |s 𝐷) <s (𝐴 |s 𝐵)) → {(𝐶 |s 𝐷)} ⊆ No )
59 simplrr 790 . . . . . . . . . . . 12 ((((𝐴 <<s 𝐵𝐶 <<s 𝐷) ∧ (∀𝑑𝐷 (𝐴 |s 𝐵) <s 𝑑 ∧ ∀𝑎𝐴 𝑎 <s (𝐶 |s 𝐷))) ∧ (𝐶 |s 𝐷) <s (𝐴 |s 𝐵)) → ∀𝑎𝐴 𝑎 <s (𝐶 |s 𝐷))
60 breq2 5118 . . . . . . . . . . . . . 14 (𝑑 = (𝐶 |s 𝐷) → (𝑎 <s 𝑑𝑎 <s (𝐶 |s 𝐷)))
6114, 60ralsn 4652 . . . . . . . . . . . . 13 (∀𝑑 ∈ {(𝐶 |s 𝐷)}𝑎 <s 𝑑𝑎 <s (𝐶 |s 𝐷))
6261ralbii 3114 . . . . . . . . . . . 12 (∀𝑎𝐴𝑑 ∈ {(𝐶 |s 𝐷)}𝑎 <s 𝑑 ↔ ∀𝑎𝐴 𝑎 <s (𝐶 |s 𝐷))
6359, 62sylibr 237 . . . . . . . . . . 11 ((((𝐴 <<s 𝐵𝐶 <<s 𝐷) ∧ (∀𝑑𝐷 (𝐴 |s 𝐵) <s 𝑑 ∧ ∀𝑎𝐴 𝑎 <s (𝐶 |s 𝐷))) ∧ (𝐶 |s 𝐷) <s (𝐴 |s 𝐵)) → ∀𝑎𝐴𝑑 ∈ {(𝐶 |s 𝐷)}𝑎 <s 𝑑)
6457, 58, 633jca 1146 . . . . . . . . . 10 ((((𝐴 <<s 𝐵𝐶 <<s 𝐷) ∧ (∀𝑑𝐷 (𝐴 |s 𝐵) <s 𝑑 ∧ ∀𝑎𝐴 𝑎 <s (𝐶 |s 𝐷))) ∧ (𝐶 |s 𝐷) <s (𝐴 |s 𝐵)) → (𝐴 No ∧ {(𝐶 |s 𝐷)} ⊆ No ∧ ∀𝑎𝐴𝑑 ∈ {(𝐶 |s 𝐷)}𝑎 <s 𝑑))
65 brslts 27992 . . . . . . . . . 10 (𝐴 <<s {(𝐶 |s 𝐷)} ↔ ((𝐴 ∈ V ∧ {(𝐶 |s 𝐷)} ∈ V) ∧ (𝐴 No ∧ {(𝐶 |s 𝐷)} ⊆ No ∧ ∀𝑎𝐴𝑑 ∈ {(𝐶 |s 𝐷)}𝑎 <s 𝑑)))
6656, 64, 65sylanbrc 595 . . . . . . . . 9 ((((𝐴 <<s 𝐵𝐶 <<s 𝐷) ∧ (∀𝑑𝐷 (𝐴 |s 𝐵) <s 𝑑 ∧ ∀𝑎𝐴 𝑎 <s (𝐶 |s 𝐷))) ∧ (𝐶 |s 𝐷) <s (𝐴 |s 𝐵)) → 𝐴 <<s {(𝐶 |s 𝐷)})
67 sltsex2 27994 . . . . . . . . . . . 12 (𝐴 <<s 𝐵𝐵 ∈ V)
6867ad3antrrr 743 . . . . . . . . . . 11 ((((𝐴 <<s 𝐵𝐶 <<s 𝐷) ∧ (∀𝑑𝐷 (𝐴 |s 𝐵) <s 𝑑 ∧ ∀𝑎𝐴 𝑎 <s (𝐶 |s 𝐷))) ∧ (𝐶 |s 𝐷) <s (𝐴 |s 𝐵)) → 𝐵 ∈ V)
6968, 55jctil 529 . . . . . . . . . 10 ((((𝐴 <<s 𝐵𝐶 <<s 𝐷) ∧ (∀𝑑𝐷 (𝐴 |s 𝐵) <s 𝑑 ∧ ∀𝑎𝐴 𝑎 <s (𝐶 |s 𝐷))) ∧ (𝐶 |s 𝐷) <s (𝐴 |s 𝐵)) → ({(𝐶 |s 𝐷)} ∈ V ∧ 𝐵 ∈ V))
70 sltsss2 27996 . . . . . . . . . . . 12 (𝐴 <<s 𝐵𝐵 No )
7170ad3antrrr 743 . . . . . . . . . . 11 ((((𝐴 <<s 𝐵𝐶 <<s 𝐷) ∧ (∀𝑑𝐷 (𝐴 |s 𝐵) <s 𝑑 ∧ ∀𝑎𝐴 𝑎 <s (𝐶 |s 𝐷))) ∧ (𝐶 |s 𝐷) <s (𝐴 |s 𝐵)) → 𝐵 No )
7252adantr 486 . . . . . . . . . . . . . 14 (((((𝐴 <<s 𝐵𝐶 <<s 𝐷) ∧ (∀𝑑𝐷 (𝐴 |s 𝐵) <s 𝑑 ∧ ∀𝑎𝐴 𝑎 <s (𝐶 |s 𝐷))) ∧ (𝐶 |s 𝐷) <s (𝐴 |s 𝐵)) ∧ 𝑏𝐵) → (𝐶 |s 𝐷) ∈ No )
7348ad3antrrr 743 . . . . . . . . . . . . . 14 (((((𝐴 <<s 𝐵𝐶 <<s 𝐷) ∧ (∀𝑑𝐷 (𝐴 |s 𝐵) <s 𝑑 ∧ ∀𝑎𝐴 𝑎 <s (𝐶 |s 𝐷))) ∧ (𝐶 |s 𝐷) <s (𝐴 |s 𝐵)) ∧ 𝑏𝐵) → (𝐴 |s 𝐵) ∈ No )
7471sselda 3940 . . . . . . . . . . . . . 14 (((((𝐴 <<s 𝐵𝐶 <<s 𝐷) ∧ (∀𝑑𝐷 (𝐴 |s 𝐵) <s 𝑑 ∧ ∀𝑎𝐴 𝑎 <s (𝐶 |s 𝐷))) ∧ (𝐶 |s 𝐷) <s (𝐴 |s 𝐵)) ∧ 𝑏𝐵) → 𝑏 No )
75 simplr 781 . . . . . . . . . . . . . 14 (((((𝐴 <<s 𝐵𝐶 <<s 𝐷) ∧ (∀𝑑𝐷 (𝐴 |s 𝐵) <s 𝑑 ∧ ∀𝑎𝐴 𝑎 <s (𝐶 |s 𝐷))) ∧ (𝐶 |s 𝐷) <s (𝐴 |s 𝐵)) ∧ 𝑏𝐵) → (𝐶 |s 𝐷) <s (𝐴 |s 𝐵))
7628simp3d 1162 . . . . . . . . . . . . . . . . . 18 (𝐴 <<s 𝐵 → {(𝐴 |s 𝐵)} <<s 𝐵)
7776ad3antrrr 743 . . . . . . . . . . . . . . . . 17 ((((𝐴 <<s 𝐵𝐶 <<s 𝐷) ∧ (∀𝑑𝐷 (𝐴 |s 𝐵) <s 𝑑 ∧ ∀𝑎𝐴 𝑎 <s (𝐶 |s 𝐷))) ∧ (𝐶 |s 𝐷) <s (𝐴 |s 𝐵)) → {(𝐴 |s 𝐵)} <<s 𝐵)
78 sltssep 27997 . . . . . . . . . . . . . . . . 17 ({(𝐴 |s 𝐵)} <<s 𝐵 → ∀𝑎 ∈ {(𝐴 |s 𝐵)}∀𝑏𝐵 𝑎 <s 𝑏)
7977, 78syl 18 . . . . . . . . . . . . . . . 16 ((((𝐴 <<s 𝐵𝐶 <<s 𝐷) ∧ (∀𝑑𝐷 (𝐴 |s 𝐵) <s 𝑑 ∧ ∀𝑎𝐴 𝑎 <s (𝐶 |s 𝐷))) ∧ (𝐶 |s 𝐷) <s (𝐴 |s 𝐵)) → ∀𝑎 ∈ {(𝐴 |s 𝐵)}∀𝑏𝐵 𝑎 <s 𝑏)
80 breq1 5117 . . . . . . . . . . . . . . . . . 18 (𝑎 = (𝐴 |s 𝐵) → (𝑎 <s 𝑏 ↔ (𝐴 |s 𝐵) <s 𝑏))
8180ralbidv 3191 . . . . . . . . . . . . . . . . 17 (𝑎 = (𝐴 |s 𝐵) → (∀𝑏𝐵 𝑎 <s 𝑏 ↔ ∀𝑏𝐵 (𝐴 |s 𝐵) <s 𝑏))
8235, 81ralsn 4652 . . . . . . . . . . . . . . . 16 (∀𝑎 ∈ {(𝐴 |s 𝐵)}∀𝑏𝐵 𝑎 <s 𝑏 ↔ ∀𝑏𝐵 (𝐴 |s 𝐵) <s 𝑏)
8379, 82sylib 221 . . . . . . . . . . . . . . 15 ((((𝐴 <<s 𝐵𝐶 <<s 𝐷) ∧ (∀𝑑𝐷 (𝐴 |s 𝐵) <s 𝑑 ∧ ∀𝑎𝐴 𝑎 <s (𝐶 |s 𝐷))) ∧ (𝐶 |s 𝐷) <s (𝐴 |s 𝐵)) → ∀𝑏𝐵 (𝐴 |s 𝐵) <s 𝑏)
8483r19.21bi 3260 . . . . . . . . . . . . . 14 (((((𝐴 <<s 𝐵𝐶 <<s 𝐷) ∧ (∀𝑑𝐷 (𝐴 |s 𝐵) <s 𝑑 ∧ ∀𝑎𝐴 𝑎 <s (𝐶 |s 𝐷))) ∧ (𝐶 |s 𝐷) <s (𝐴 |s 𝐵)) ∧ 𝑏𝐵) → (𝐴 |s 𝐵) <s 𝑏)
8572, 73, 74, 75, 84ltstrd 27964 . . . . . . . . . . . . 13 (((((𝐴 <<s 𝐵𝐶 <<s 𝐷) ∧ (∀𝑑𝐷 (𝐴 |s 𝐵) <s 𝑑 ∧ ∀𝑎𝐴 𝑎 <s (𝐶 |s 𝐷))) ∧ (𝐶 |s 𝐷) <s (𝐴 |s 𝐵)) ∧ 𝑏𝐵) → (𝐶 |s 𝐷) <s 𝑏)
8685ralrimiva 3160 . . . . . . . . . . . 12 ((((𝐴 <<s 𝐵𝐶 <<s 𝐷) ∧ (∀𝑑𝐷 (𝐴 |s 𝐵) <s 𝑑 ∧ ∀𝑎𝐴 𝑎 <s (𝐶 |s 𝐷))) ∧ (𝐶 |s 𝐷) <s (𝐴 |s 𝐵)) → ∀𝑏𝐵 (𝐶 |s 𝐷) <s 𝑏)
87 breq1 5117 . . . . . . . . . . . . . 14 (𝑎 = (𝐶 |s 𝐷) → (𝑎 <s 𝑏 ↔ (𝐶 |s 𝐷) <s 𝑏))
8887ralbidv 3191 . . . . . . . . . . . . 13 (𝑎 = (𝐶 |s 𝐷) → (∀𝑏𝐵 𝑎 <s 𝑏 ↔ ∀𝑏𝐵 (𝐶 |s 𝐷) <s 𝑏))
8914, 88ralsn 4652 . . . . . . . . . . . 12 (∀𝑎 ∈ {(𝐶 |s 𝐷)}∀𝑏𝐵 𝑎 <s 𝑏 ↔ ∀𝑏𝐵 (𝐶 |s 𝐷) <s 𝑏)
9086, 89sylibr 237 . . . . . . . . . . 11 ((((𝐴 <<s 𝐵𝐶 <<s 𝐷) ∧ (∀𝑑𝐷 (𝐴 |s 𝐵) <s 𝑑 ∧ ∀𝑎𝐴 𝑎 <s (𝐶 |s 𝐷))) ∧ (𝐶 |s 𝐷) <s (𝐴 |s 𝐵)) → ∀𝑎 ∈ {(𝐶 |s 𝐷)}∀𝑏𝐵 𝑎 <s 𝑏)
9158, 71, 903jca 1146 . . . . . . . . . 10 ((((𝐴 <<s 𝐵𝐶 <<s 𝐷) ∧ (∀𝑑𝐷 (𝐴 |s 𝐵) <s 𝑑 ∧ ∀𝑎𝐴 𝑎 <s (𝐶 |s 𝐷))) ∧ (𝐶 |s 𝐷) <s (𝐴 |s 𝐵)) → ({(𝐶 |s 𝐷)} ⊆ No 𝐵 No ∧ ∀𝑎 ∈ {(𝐶 |s 𝐷)}∀𝑏𝐵 𝑎 <s 𝑏))
92 brslts 27992 . . . . . . . . . 10 ({(𝐶 |s 𝐷)} <<s 𝐵 ↔ (({(𝐶 |s 𝐷)} ∈ V ∧ 𝐵 ∈ V) ∧ ({(𝐶 |s 𝐷)} ⊆ No 𝐵 No ∧ ∀𝑎 ∈ {(𝐶 |s 𝐷)}∀𝑏𝐵 𝑎 <s 𝑏)))
9369, 91, 92sylanbrc 595 . . . . . . . . 9 ((((𝐴 <<s 𝐵𝐶 <<s 𝐷) ∧ (∀𝑑𝐷 (𝐴 |s 𝐵) <s 𝑑 ∧ ∀𝑎𝐴 𝑎 <s (𝐶 |s 𝐷))) ∧ (𝐶 |s 𝐷) <s (𝐴 |s 𝐵)) → {(𝐶 |s 𝐷)} <<s 𝐵)
94 ltsirr 27947 . . . . . . . . . . . . . 14 ((𝐴 |s 𝐵) ∈ No → ¬ (𝐴 |s 𝐵) <s (𝐴 |s 𝐵))
9549, 94syl 18 . . . . . . . . . . . . 13 (((𝐴 <<s 𝐵𝐶 <<s 𝐷) ∧ (∀𝑑𝐷 (𝐴 |s 𝐵) <s 𝑑 ∧ ∀𝑎𝐴 𝑎 <s (𝐶 |s 𝐷))) → ¬ (𝐴 |s 𝐵) <s (𝐴 |s 𝐵))
96 breq1 5117 . . . . . . . . . . . . . 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 2976 . . . . . . . . . . 11 (((𝐴 <<s 𝐵𝐶 <<s 𝐷) ∧ (∀𝑑𝐷 (𝐴 |s 𝐵) <s 𝑑 ∧ ∀𝑎𝐴 𝑎 <s (𝐶 |s 𝐷))) → ((𝐶 |s 𝐷) <s (𝐴 |s 𝐵) → (𝐴 |s 𝐵) ≠ (𝐶 |s 𝐷)))
10099imp 412 . . . . . . . . . 10 ((((𝐴 <<s 𝐵𝐶 <<s 𝐷) ∧ (∀𝑑𝐷 (𝐴 |s 𝐵) <s 𝑑 ∧ ∀𝑎𝐴 𝑎 <s (𝐶 |s 𝐷))) ∧ (𝐶 |s 𝐷) <s (𝐴 |s 𝐵)) → (𝐴 |s 𝐵) ≠ (𝐶 |s 𝐷))
101100necomd 3016 . . . . . . . . 9 ((((𝐴 <<s 𝐵𝐶 <<s 𝐷) ∧ (∀𝑑𝐷 (𝐴 |s 𝐵) <s 𝑑 ∧ ∀𝑎𝐴 𝑎 <s (𝐶 |s 𝐷))) ∧ (𝐶 |s 𝐷) <s (𝐴 |s 𝐵)) → (𝐶 |s 𝐷) ≠ (𝐴 |s 𝐵))
102 cutbdaylt 28028 . . . . . . . . 9 (((𝐶 |s 𝐷) ∈ No ∧ (𝐴 <<s {(𝐶 |s 𝐷)} ∧ {(𝐶 |s 𝐷)} <<s 𝐵) ∧ (𝐶 |s 𝐷) ≠ (𝐴 |s 𝐵)) → ( bday ‘(𝐴 |s 𝐵)) ∈ ( bday ‘(𝐶 |s 𝐷)))
10352, 66, 93, 101, 102syl121anc 1402 . . . . . . . 8 ((((𝐴 <<s 𝐵𝐶 <<s 𝐷) ∧ (∀𝑑𝐷 (𝐴 |s 𝐵) <s 𝑑 ∧ ∀𝑎𝐴 𝑎 <s (𝐶 |s 𝐷))) ∧ (𝐶 |s 𝐷) <s (𝐴 |s 𝐵)) → ( bday ‘(𝐴 |s 𝐵)) ∈ ( bday ‘(𝐶 |s 𝐷)))
1041ad3antrrr 743 . . . . . . . . 9 ((((𝐴 <<s 𝐵𝐶 <<s 𝐷) ∧ (∀𝑑𝐷 (𝐴 |s 𝐵) <s 𝑑 ∧ ∀𝑎𝐴 𝑎 <s (𝐶 |s 𝐷))) ∧ (𝐶 |s 𝐷) <s (𝐴 |s 𝐵)) → (𝐴 |s 𝐵) ∈ No )
105 sltsex1 27993 . . . . . . . . . . . 12 (𝐶 <<s 𝐷𝐶 ∈ V)
106105ad3antlr 744 . . . . . . . . . . 11 ((((𝐴 <<s 𝐵𝐶 <<s 𝐷) ∧ (∀𝑑𝐷 (𝐴 |s 𝐵) <s 𝑑 ∧ ∀𝑎𝐴 𝑎 <s (𝐶 |s 𝐷))) ∧ (𝐶 |s 𝐷) <s (𝐴 |s 𝐵)) → 𝐶 ∈ V)
107 snex 5415 . . . . . . . . . . 11 {(𝐴 |s 𝐵)} ∈ V
108106, 107jctir 530 . . . . . . . . . 10 ((((𝐴 <<s 𝐵𝐶 <<s 𝐷) ∧ (∀𝑑𝐷 (𝐴 |s 𝐵) <s 𝑑 ∧ ∀𝑎𝐴 𝑎 <s (𝐶 |s 𝐷))) ∧ (𝐶 |s 𝐷) <s (𝐴 |s 𝐵)) → (𝐶 ∈ V ∧ {(𝐴 |s 𝐵)} ∈ V))
109 sltsss1 27995 . . . . . . . . . . . 12 (𝐶 <<s 𝐷𝐶 No )
110109ad3antlr 744 . . . . . . . . . . 11 ((((𝐴 <<s 𝐵𝐶 <<s 𝐷) ∧ (∀𝑑𝐷 (𝐴 |s 𝐵) <s 𝑑 ∧ ∀𝑎𝐴 𝑎 <s (𝐶 |s 𝐷))) ∧ (𝐶 |s 𝐷) <s (𝐴 |s 𝐵)) → 𝐶 No )
111104snssd 4757 . . . . . . . . . . 11 ((((𝐴 <<s 𝐵𝐶 <<s 𝐷) ∧ (∀𝑑𝐷 (𝐴 |s 𝐵) <s 𝑑 ∧ ∀𝑎𝐴 𝑎 <s (𝐶 |s 𝐷))) ∧ (𝐶 |s 𝐷) <s (𝐴 |s 𝐵)) → {(𝐴 |s 𝐵)} ⊆ No )
112110sselda 3940 . . . . . . . . . . . . . 14 (((((𝐴 <<s 𝐵𝐶 <<s 𝐷) ∧ (∀𝑑𝐷 (𝐴 |s 𝐵) <s 𝑑 ∧ ∀𝑎𝐴 𝑎 <s (𝐶 |s 𝐷))) ∧ (𝐶 |s 𝐷) <s (𝐴 |s 𝐵)) ∧ 𝑐𝐶) → 𝑐 No )
11352adantr 486 . . . . . . . . . . . . . 14 (((((𝐴 <<s 𝐵𝐶 <<s 𝐷) ∧ (∀𝑑𝐷 (𝐴 |s 𝐵) <s 𝑑 ∧ ∀𝑎𝐴 𝑎 <s (𝐶 |s 𝐷))) ∧ (𝐶 |s 𝐷) <s (𝐴 |s 𝐵)) ∧ 𝑐𝐶) → (𝐶 |s 𝐷) ∈ No )
11448ad3antrrr 743 . . . . . . . . . . . . . 14 (((((𝐴 <<s 𝐵𝐶 <<s 𝐷) ∧ (∀𝑑𝐷 (𝐴 |s 𝐵) <s 𝑑 ∧ ∀𝑎𝐴 𝑎 <s (𝐶 |s 𝐷))) ∧ (𝐶 |s 𝐷) <s (𝐴 |s 𝐵)) ∧ 𝑐𝐶) → (𝐴 |s 𝐵) ∈ No )
1159simp2d 1161 . . . . . . . . . . . . . . . . . 18 (𝐶 <<s 𝐷𝐶 <<s {(𝐶 |s 𝐷)})
116115ad3antlr 744 . . . . . . . . . . . . . . . . 17 ((((𝐴 <<s 𝐵𝐶 <<s 𝐷) ∧ (∀𝑑𝐷 (𝐴 |s 𝐵) <s 𝑑 ∧ ∀𝑎𝐴 𝑎 <s (𝐶 |s 𝐷))) ∧ (𝐶 |s 𝐷) <s (𝐴 |s 𝐵)) → 𝐶 <<s {(𝐶 |s 𝐷)})
117 sltssep 27997 . . . . . . . . . . . . . . . . 17 (𝐶 <<s {(𝐶 |s 𝐷)} → ∀𝑐𝐶𝑑 ∈ {(𝐶 |s 𝐷)}𝑐 <s 𝑑)
118116, 117syl 18 . . . . . . . . . . . . . . . 16 ((((𝐴 <<s 𝐵𝐶 <<s 𝐷) ∧ (∀𝑑𝐷 (𝐴 |s 𝐵) <s 𝑑 ∧ ∀𝑎𝐴 𝑎 <s (𝐶 |s 𝐷))) ∧ (𝐶 |s 𝐷) <s (𝐴 |s 𝐵)) → ∀𝑐𝐶𝑑 ∈ {(𝐶 |s 𝐷)}𝑐 <s 𝑑)
119118r19.21bi 3260 . . . . . . . . . . . . . . 15 (((((𝐴 <<s 𝐵𝐶 <<s 𝐷) ∧ (∀𝑑𝐷 (𝐴 |s 𝐵) <s 𝑑 ∧ ∀𝑎𝐴 𝑎 <s (𝐶 |s 𝐷))) ∧ (𝐶 |s 𝐷) <s (𝐴 |s 𝐵)) ∧ 𝑐𝐶) → ∀𝑑 ∈ {(𝐶 |s 𝐷)}𝑐 <s 𝑑)
120 breq2 5118 . . . . . . . . . . . . . . . 16 (𝑑 = (𝐶 |s 𝐷) → (𝑐 <s 𝑑𝑐 <s (𝐶 |s 𝐷)))
12114, 120ralsn 4652 . . . . . . . . . . . . . . 15 (∀𝑑 ∈ {(𝐶 |s 𝐷)}𝑐 <s 𝑑𝑐 <s (𝐶 |s 𝐷))
122119, 121sylib 221 . . . . . . . . . . . . . 14 (((((𝐴 <<s 𝐵𝐶 <<s 𝐷) ∧ (∀𝑑𝐷 (𝐴 |s 𝐵) <s 𝑑 ∧ ∀𝑎𝐴 𝑎 <s (𝐶 |s 𝐷))) ∧ (𝐶 |s 𝐷) <s (𝐴 |s 𝐵)) ∧ 𝑐𝐶) → 𝑐 <s (𝐶 |s 𝐷))
123 simplr 781 . . . . . . . . . . . . . 14 (((((𝐴 <<s 𝐵𝐶 <<s 𝐷) ∧ (∀𝑑𝐷 (𝐴 |s 𝐵) <s 𝑑 ∧ ∀𝑎𝐴 𝑎 <s (𝐶 |s 𝐷))) ∧ (𝐶 |s 𝐷) <s (𝐴 |s 𝐵)) ∧ 𝑐𝐶) → (𝐶 |s 𝐷) <s (𝐴 |s 𝐵))
124112, 113, 114, 122, 123ltstrd 27964 . . . . . . . . . . . . 13 (((((𝐴 <<s 𝐵𝐶 <<s 𝐷) ∧ (∀𝑑𝐷 (𝐴 |s 𝐵) <s 𝑑 ∧ ∀𝑎𝐴 𝑎 <s (𝐶 |s 𝐷))) ∧ (𝐶 |s 𝐷) <s (𝐴 |s 𝐵)) ∧ 𝑐𝐶) → 𝑐 <s (𝐴 |s 𝐵))
125 breq2 5118 . . . . . . . . . . . . . 14 (𝑎 = (𝐴 |s 𝐵) → (𝑐 <s 𝑎𝑐 <s (𝐴 |s 𝐵)))
12635, 125ralsn 4652 . . . . . . . . . . . . 13 (∀𝑎 ∈ {(𝐴 |s 𝐵)}𝑐 <s 𝑎𝑐 <s (𝐴 |s 𝐵))
127124, 126sylibr 237 . . . . . . . . . . . 12 (((((𝐴 <<s 𝐵𝐶 <<s 𝐷) ∧ (∀𝑑𝐷 (𝐴 |s 𝐵) <s 𝑑 ∧ ∀𝑎𝐴 𝑎 <s (𝐶 |s 𝐷))) ∧ (𝐶 |s 𝐷) <s (𝐴 |s 𝐵)) ∧ 𝑐𝐶) → ∀𝑎 ∈ {(𝐴 |s 𝐵)}𝑐 <s 𝑎)
128127ralrimiva 3160 . . . . . . . . . . 11 ((((𝐴 <<s 𝐵𝐶 <<s 𝐷) ∧ (∀𝑑𝐷 (𝐴 |s 𝐵) <s 𝑑 ∧ ∀𝑎𝐴 𝑎 <s (𝐶 |s 𝐷))) ∧ (𝐶 |s 𝐷) <s (𝐴 |s 𝐵)) → ∀𝑐𝐶𝑎 ∈ {(𝐴 |s 𝐵)}𝑐 <s 𝑎)
129110, 111, 1283jca 1146 . . . . . . . . . 10 ((((𝐴 <<s 𝐵𝐶 <<s 𝐷) ∧ (∀𝑑𝐷 (𝐴 |s 𝐵) <s 𝑑 ∧ ∀𝑎𝐴 𝑎 <s (𝐶 |s 𝐷))) ∧ (𝐶 |s 𝐷) <s (𝐴 |s 𝐵)) → (𝐶 No ∧ {(𝐴 |s 𝐵)} ⊆ No ∧ ∀𝑐𝐶𝑎 ∈ {(𝐴 |s 𝐵)}𝑐 <s 𝑎))
130 brslts 27992 . . . . . . . . . 10 (𝐶 <<s {(𝐴 |s 𝐵)} ↔ ((𝐶 ∈ V ∧ {(𝐴 |s 𝐵)} ∈ V) ∧ (𝐶 No ∧ {(𝐴 |s 𝐵)} ⊆ No ∧ ∀𝑐𝐶𝑎 ∈ {(𝐴 |s 𝐵)}𝑐 <s 𝑎)))
131108, 129, 130sylanbrc 595 . . . . . . . . 9 ((((𝐴 <<s 𝐵𝐶 <<s 𝐷) ∧ (∀𝑑𝐷 (𝐴 |s 𝐵) <s 𝑑 ∧ ∀𝑎𝐴 𝑎 <s (𝐶 |s 𝐷))) ∧ (𝐶 |s 𝐷) <s (𝐴 |s 𝐵)) → 𝐶 <<s {(𝐴 |s 𝐵)})
132 sltsex2 27994 . . . . . . . . . . . 12 (𝐶 <<s 𝐷𝐷 ∈ V)
133132ad3antlr 744 . . . . . . . . . . 11 ((((𝐴 <<s 𝐵𝐶 <<s 𝐷) ∧ (∀𝑑𝐷 (𝐴 |s 𝐵) <s 𝑑 ∧ ∀𝑎𝐴 𝑎 <s (𝐶 |s 𝐷))) ∧ (𝐶 |s 𝐷) <s (𝐴 |s 𝐵)) → 𝐷 ∈ V)
134133, 107jctil 529 . . . . . . . . . 10 ((((𝐴 <<s 𝐵𝐶 <<s 𝐷) ∧ (∀𝑑𝐷 (𝐴 |s 𝐵) <s 𝑑 ∧ ∀𝑎𝐴 𝑎 <s (𝐶 |s 𝐷))) ∧ (𝐶 |s 𝐷) <s (𝐴 |s 𝐵)) → ({(𝐴 |s 𝐵)} ∈ V ∧ 𝐷 ∈ V))
1355ad3antlr 744 . . . . . . . . . . 11 ((((𝐴 <<s 𝐵𝐶 <<s 𝐷) ∧ (∀𝑑𝐷 (𝐴 |s 𝐵) <s 𝑑 ∧ ∀𝑎𝐴 𝑎 <s (𝐶 |s 𝐷))) ∧ (𝐶 |s 𝐷) <s (𝐴 |s 𝐵)) → 𝐷 No )
136 simplrl 789 . . . . . . . . . . . 12 ((((𝐴 <<s 𝐵𝐶 <<s 𝐷) ∧ (∀𝑑𝐷 (𝐴 |s 𝐵) <s 𝑑 ∧ ∀𝑎𝐴 𝑎 <s (𝐶 |s 𝐷))) ∧ (𝐶 |s 𝐷) <s (𝐴 |s 𝐵)) → ∀𝑑𝐷 (𝐴 |s 𝐵) <s 𝑑)
137 breq1 5117 . . . . . . . . . . . . . 14 (𝑎 = (𝐴 |s 𝐵) → (𝑎 <s 𝑑 ↔ (𝐴 |s 𝐵) <s 𝑑))
138137ralbidv 3191 . . . . . . . . . . . . 13 (𝑎 = (𝐴 |s 𝐵) → (∀𝑑𝐷 𝑎 <s 𝑑 ↔ ∀𝑑𝐷 (𝐴 |s 𝐵) <s 𝑑))
13935, 138ralsn 4652 . . . . . . . . . . . 12 (∀𝑎 ∈ {(𝐴 |s 𝐵)}∀𝑑𝐷 𝑎 <s 𝑑 ↔ ∀𝑑𝐷 (𝐴 |s 𝐵) <s 𝑑)
140136, 139sylibr 237 . . . . . . . . . . 11 ((((𝐴 <<s 𝐵𝐶 <<s 𝐷) ∧ (∀𝑑𝐷 (𝐴 |s 𝐵) <s 𝑑 ∧ ∀𝑎𝐴 𝑎 <s (𝐶 |s 𝐷))) ∧ (𝐶 |s 𝐷) <s (𝐴 |s 𝐵)) → ∀𝑎 ∈ {(𝐴 |s 𝐵)}∀𝑑𝐷 𝑎 <s 𝑑)
141111, 135, 1403jca 1146 . . . . . . . . . 10 ((((𝐴 <<s 𝐵𝐶 <<s 𝐷) ∧ (∀𝑑𝐷 (𝐴 |s 𝐵) <s 𝑑 ∧ ∀𝑎𝐴 𝑎 <s (𝐶 |s 𝐷))) ∧ (𝐶 |s 𝐷) <s (𝐴 |s 𝐵)) → ({(𝐴 |s 𝐵)} ⊆ No 𝐷 No ∧ ∀𝑎 ∈ {(𝐴 |s 𝐵)}∀𝑑𝐷 𝑎 <s 𝑑))
142 brslts 27992 . . . . . . . . . 10 ({(𝐴 |s 𝐵)} <<s 𝐷 ↔ (({(𝐴 |s 𝐵)} ∈ V ∧ 𝐷 ∈ V) ∧ ({(𝐴 |s 𝐵)} ⊆ No 𝐷 No ∧ ∀𝑎 ∈ {(𝐴 |s 𝐵)}∀𝑑𝐷 𝑎 <s 𝑑)))
143134, 141, 142sylanbrc 595 . . . . . . . . 9 ((((𝐴 <<s 𝐵𝐶 <<s 𝐷) ∧ (∀𝑑𝐷 (𝐴 |s 𝐵) <s 𝑑 ∧ ∀𝑎𝐴 𝑎 <s (𝐶 |s 𝐷))) ∧ (𝐶 |s 𝐷) <s (𝐴 |s 𝐵)) → {(𝐴 |s 𝐵)} <<s 𝐷)
144 cutbdaylt 28028 . . . . . . . . 9 (((𝐴 |s 𝐵) ∈ No ∧ (𝐶 <<s {(𝐴 |s 𝐵)} ∧ {(𝐴 |s 𝐵)} <<s 𝐷) ∧ (𝐴 |s 𝐵) ≠ (𝐶 |s 𝐷)) → ( bday ‘(𝐶 |s 𝐷)) ∈ ( bday ‘(𝐴 |s 𝐵)))
145104, 131, 143, 100, 144syl121anc 1402 . . . . . . . 8 ((((𝐴 <<s 𝐵𝐶 <<s 𝐷) ∧ (∀𝑑𝐷 (𝐴 |s 𝐵) <s 𝑑 ∧ ∀𝑎𝐴 𝑎 <s (𝐶 |s 𝐷))) ∧ (𝐶 |s 𝐷) <s (𝐴 |s 𝐵)) → ( bday ‘(𝐶 |s 𝐷)) ∈ ( bday ‘(𝐴 |s 𝐵)))
146103, 145jca 521 . . . . . . 7 ((((𝐴 <<s 𝐵𝐶 <<s 𝐷) ∧ (∀𝑑𝐷 (𝐴 |s 𝐵) <s 𝑑 ∧ ∀𝑎𝐴 𝑎 <s (𝐶 |s 𝐷))) ∧ (𝐶 |s 𝐷) <s (𝐴 |s 𝐵)) → (( bday ‘(𝐴 |s 𝐵)) ∈ ( bday ‘(𝐶 |s 𝐷)) ∧ ( bday ‘(𝐶 |s 𝐷)) ∈ ( bday ‘(𝐴 |s 𝐵))))
147146ex 418 . . . . . 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 813 . . 3 ((𝐴 <<s 𝐵𝐶 <<s 𝐷) → ((𝐴 |s 𝐵) ≤s (𝐶 |s 𝐷) ↔ (∀𝑑𝐷 (𝐴 |s 𝐵) <s 𝑑 ∧ ∀𝑎𝐴 𝑎 <s (𝐶 |s 𝐷))))
151 breq12 5119 . . . 4 ((𝑋 = (𝐴 |s 𝐵) ∧ 𝑌 = (𝐶 |s 𝐷)) → (𝑋 ≤s 𝑌 ↔ (𝐴 |s 𝐵) ≤s (𝐶 |s 𝐷)))
152 breq1 5117 . . . . . 6 (𝑋 = (𝐴 |s 𝐵) → (𝑋 <s 𝑑 ↔ (𝐴 |s 𝐵) <s 𝑑))
153152ralbidv 3191 . . . . 5 (𝑋 = (𝐴 |s 𝐵) → (∀𝑑𝐷 𝑋 <s 𝑑 ↔ ∀𝑑𝐷 (𝐴 |s 𝐵) <s 𝑑))
154 breq2 5118 . . . . . 6 (𝑌 = (𝐶 |s 𝐷) → (𝑎 <s 𝑌𝑎 <s (𝐶 |s 𝐷)))
155154ralbidv 3191 . . . . 5 (𝑌 = (𝐶 |s 𝐷) → (∀𝑎𝐴 𝑎 <s 𝑌 ↔ ∀𝑎𝐴 𝑎 <s (𝐶 |s 𝐷)))
156153, 155bi2anan9 650 . . . 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 413 1 (((𝐴 <<s 𝐵𝐶 <<s 𝐷) ∧ (𝑋 = (𝐴 |s 𝐵) ∧ 𝑌 = (𝐶 |s 𝐷))) → (𝑋 ≤s 𝑌 ↔ (∀𝑑𝐷 𝑋 <s 𝑑 ∧ ∀𝑎𝐴 𝑎 <s 𝑌)))
Colors of variables:    wff setvar class
This proof depends on syntax axioms:  ¬ wn 3  wi 4  wb 209  wa 401  w3a 1103   = wceq 1570  wcel 2146  wne 2961  wral 3082  Vcvv 3458  wss 3908  {csn 4594   class class class wbr 5114  Ord word 6366  cfv 6543  (class class class)co 7423   No csur 27841   <s clts 27842   bday cbday 27843   ≤s cles 27945   <<s cslts 27987   |s ccuts 27989
This proof depends on axioms:  ax-mp 5  ax-1 6  ax-2 7  ax-3 8  ax-gen 1828  ax-4 1842  ax-5 1943  ax-6 2000  ax-7 2041  ax-8 2148  ax-9 2156  ax-10 2179  ax-11 2195  ax-12 2216  ax-ext 2738  ax-rep 5243  ax-sep 5262  ax-nul 5274  ax-pow 5341  ax-pr 5409  ax-un 7745
This proof depends on definitions:  df-bi 210  df-an 402  df-or 862  df-3or 1104  df-3an 1105  df-tru 1573  df-fal 1583  df-ex 1813  df-nf 1817  df-sb 2100  df-mo 2570  df-eu 2600  df-clab 2745  df-cleq 2758  df-clel 2841  df-nfc 2915  df-ne 2962  df-ral 3083  df-rex 3093  df-rmo 3372  df-reu 3373  df-rab 3420  df-v 3460  df-sbc 3748  df-csb 3857  df-dif 3911  df-un 3913  df-in 3915  df-ss 3925  df-pss 3928  df-nul 4290  df-if 4493  df-pw 4569  df-sn 4595  df-pr 4597  df-tp 4599  df-op 4601  df-uni 4878  df-int 4918  df-br 5115  df-opab 5179  df-mpt 5198  df-tr 5224  df-id 5561  df-eprel 5566  df-po 5574  df-so 5575  df-fr 5619  df-we 5621  df-xp 5672  df-rel 5673  df-cnv 5674  df-co 5675  df-dm 5676  df-rn 5677  df-res 5678  df-ima 5679  df-ord 6370  df-on 6371  df-suc 6373  df-iota 6499  df-fun 6545  df-fn 6546  df-f 6547  df-f1 6548  df-fo 6549  df-f1o 6550  df-fv 6551  df-riota 7380  df-ov 7426  df-oprab 7427  df-mpo 7428  df-1o 8462  df-2o 8463  df-no 27844  df-lts 27845  df-bday 27846  df-les 27946  df-slts 27988  df-cuts 27990
This theorem is used by:  lesrecd  28030  twocut  28653
  Copyright terms: Public domain W3C validator