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

Theorem lesrec 28072
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 28055 . . . . . . . 8 (𝐴 <<s 𝐵 → (𝐴 |s 𝐵) ∈ No )
21ad3antrrr 743 . . . . . . 7 ((((𝐴 <<s 𝐵𝐶 <<s 𝐷) ∧ (𝐴 |s 𝐵) ≤s (𝐶 |s 𝐷)) ∧ 𝑑𝐷) → (𝐴 |s 𝐵) ∈ No )
3 cutscl 28055 . . . . . . . 8 (𝐶 <<s 𝐷 → (𝐶 |s 𝐷) ∈ No )
43ad3antlr 744 . . . . . . 7 ((((𝐴 <<s 𝐵𝐶 <<s 𝐷) ∧ (𝐴 |s 𝐵) ≤s (𝐶 |s 𝐷)) ∧ 𝑑𝐷) → (𝐶 |s 𝐷) ∈ No )
5 sltsss2 28039 . . . . . . . . 9 (𝐶 <<s 𝐷𝐷 No )
65ad2antlr 740 . . . . . . . 8 (((𝐴 <<s 𝐵𝐶 <<s 𝐷) ∧ (𝐴 |s 𝐵) ≤s (𝐶 |s 𝐷)) → 𝐷 No )
76sselda 3934 . . . . . . 7 ((((𝐴 <<s 𝐵𝐶 <<s 𝐷) ∧ (𝐴 |s 𝐵) ≤s (𝐶 |s 𝐷)) ∧ 𝑑𝐷) → 𝑑 No )
8 simplr 781 . . . . . . 7 ((((𝐴 <<s 𝐵𝐶 <<s 𝐷) ∧ (𝐴 |s 𝐵) ≤s (𝐶 |s 𝐷)) ∧ 𝑑𝐷) → (𝐴 |s 𝐵) ≤s (𝐶 |s 𝐷))
9 cutcuts 28054 . . . . . . . . . . . 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 28040 . . . . . . . . . 10 ({(𝐶 |s 𝐷)} <<s 𝐷 → ∀𝑎 ∈ {(𝐶 |s 𝐷)}∀𝑑𝐷 𝑎 <s 𝑑)
1311, 12syl 18 . . . . . . . . 9 (((𝐴 <<s 𝐵𝐶 <<s 𝐷) ∧ (𝐴 |s 𝐵) ≤s (𝐶 |s 𝐷)) → ∀𝑎 ∈ {(𝐶 |s 𝐷)}∀𝑑𝐷 𝑎 <s 𝑑)
14 ovex 7450 . . . . . . . . . 10 (𝐶 |s 𝐷) ∈ V
15 breq1 5110 . . . . . . . . . . 11 (𝑎 = (𝐶 |s 𝐷) → (𝑎 <s 𝑑 ↔ (𝐶 |s 𝐷) <s 𝑑))
1615ralbidv 3187 . . . . . . . . . 10 (𝑎 = (𝐶 |s 𝐷) → (∀𝑑𝐷 𝑎 <s 𝑑 ↔ ∀𝑑𝐷 (𝐶 |s 𝐷) <s 𝑑))
1714, 16ralsn 4645 . . . . . . . . 9 (∀𝑎 ∈ {(𝐶 |s 𝐷)}∀𝑑𝐷 𝑎 <s 𝑑 ↔ ∀𝑑𝐷 (𝐶 |s 𝐷) <s 𝑑)
1813, 17sylib 221 . . . . . . . 8 (((𝐴 <<s 𝐵𝐶 <<s 𝐷) ∧ (𝐴 |s 𝐵) ≤s (𝐶 |s 𝐷)) → ∀𝑑𝐷 (𝐶 |s 𝐷) <s 𝑑)
1918r19.21bi 3256 . . . . . . 7 ((((𝐴 <<s 𝐵𝐶 <<s 𝐷) ∧ (𝐴 |s 𝐵) ≤s (𝐶 |s 𝐷)) ∧ 𝑑𝐷) → (𝐶 |s 𝐷) <s 𝑑)
202, 4, 7, 8, 19leltstrd 28009 . . . . . 6 ((((𝐴 <<s 𝐵𝐶 <<s 𝐷) ∧ (𝐴 |s 𝐵) ≤s (𝐶 |s 𝐷)) ∧ 𝑑𝐷) → (𝐴 |s 𝐵) <s 𝑑)
2120ralrimiva 3156 . . . . 5 (((𝐴 <<s 𝐵𝐶 <<s 𝐷) ∧ (𝐴 |s 𝐵) ≤s (𝐶 |s 𝐷)) → ∀𝑑𝐷 (𝐴 |s 𝐵) <s 𝑑)
22 sltsss1 28038 . . . . . . . . . 10 (𝐴 <<s 𝐵𝐴 No )
2322adantr 486 . . . . . . . . 9 ((𝐴 <<s 𝐵𝐶 <<s 𝐷) → 𝐴 No )
2423adantr 486 . . . . . . . 8 (((𝐴 <<s 𝐵𝐶 <<s 𝐷) ∧ (𝐴 |s 𝐵) ≤s (𝐶 |s 𝐷)) → 𝐴 No )
2524sselda 3934 . . . . . . 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 28054 . . . . . . . . . . . . 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 28040 . . . . . . . . . 10 (𝐴 <<s {(𝐴 |s 𝐵)} → ∀𝑎𝐴𝑑 ∈ {(𝐴 |s 𝐵)}𝑎 <s 𝑑)
3331, 32syl 18 . . . . . . . . 9 (((𝐴 <<s 𝐵𝐶 <<s 𝐷) ∧ (𝐴 |s 𝐵) ≤s (𝐶 |s 𝐷)) → ∀𝑎𝐴𝑑 ∈ {(𝐴 |s 𝐵)}𝑎 <s 𝑑)
3433r19.21bi 3256 . . . . . . . 8 ((((𝐴 <<s 𝐵𝐶 <<s 𝐷) ∧ (𝐴 |s 𝐵) ≤s (𝐶 |s 𝐷)) ∧ 𝑎𝐴) → ∀𝑑 ∈ {(𝐴 |s 𝐵)}𝑎 <s 𝑑)
35 ovex 7450 . . . . . . . . 9 (𝐴 |s 𝐵) ∈ V
36 breq2 5111 . . . . . . . . 9 (𝑑 = (𝐴 |s 𝐵) → (𝑎 <s 𝑑𝑎 <s (𝐴 |s 𝐵)))
3735, 36ralsn 4645 . . . . . . . 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 28008 . . . . . 6 ((((𝐴 <<s 𝐵𝐶 <<s 𝐷) ∧ (𝐴 |s 𝐵) ≤s (𝐶 |s 𝐷)) ∧ 𝑎𝐴) → 𝑎 <s (𝐶 |s 𝐷))
4140ralrimiva 3156 . . . . 5 (((𝐴 <<s 𝐵𝐶 <<s 𝐷) ∧ (𝐴 |s 𝐵) ≤s (𝐶 |s 𝐷)) → ∀𝑎𝐴 𝑎 <s (𝐶 |s 𝐷))
4221, 41jca 521 . . . 4 (((𝐴 <<s 𝐵𝐶 <<s 𝐷) ∧ (𝐴 |s 𝐵) ≤s (𝐶 |s 𝐷)) → (∀𝑑𝐷 (𝐴 |s 𝐵) <s 𝑑 ∧ ∀𝑎𝐴 𝑎 <s (𝐶 |s 𝐷)))
43 bdayon 28025 . . . . . . 7 ( bday ‘(𝐴 |s 𝐵)) ∈ On
4443onordi 6475 . . . . . 6 Ord ( bday ‘(𝐴 |s 𝐵))
45 ordn2lp 6381 . . . . . 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 27997 . . . . . . 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 28036 . . . . . . . . . . . 12 (𝐴 <<s 𝐵𝐴 ∈ V)
5453ad3antrrr 743 . . . . . . . . . . 11 ((((𝐴 <<s 𝐵𝐶 <<s 𝐷) ∧ (∀𝑑𝐷 (𝐴 |s 𝐵) <s 𝑑 ∧ ∀𝑎𝐴 𝑎 <s (𝐶 |s 𝐷))) ∧ (𝐶 |s 𝐷) <s (𝐴 |s 𝐵)) → 𝐴 ∈ V)
55 snex 5408 . . . . . . . . . . 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 4750 . . . . . . . . . . 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 5111 . . . . . . . . . . . . . 14 (𝑑 = (𝐶 |s 𝐷) → (𝑎 <s 𝑑𝑎 <s (𝐶 |s 𝐷)))
6114, 60ralsn 4645 . . . . . . . . . . . . 13 (∀𝑑 ∈ {(𝐶 |s 𝐷)}𝑎 <s 𝑑𝑎 <s (𝐶 |s 𝐷))
6261ralbii 3110 . . . . . . . . . . . 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 28035 . . . . . . . . . 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 28037 . . . . . . . . . . . 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 28039 . . . . . . . . . . . 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 3934 . . . . . . . . . . . . . 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 28040 . . . . . . . . . . . . . . . . 17 ({(𝐴 |s 𝐵)} <<s 𝐵 → ∀𝑎 ∈ {(𝐴 |s 𝐵)}∀𝑏𝐵 𝑎 <s 𝑏)
7977, 78syl 18 . . . . . . . . . . . . . . . 16 ((((𝐴 <<s 𝐵𝐶 <<s 𝐷) ∧ (∀𝑑𝐷 (𝐴 |s 𝐵) <s 𝑑 ∧ ∀𝑎𝐴 𝑎 <s (𝐶 |s 𝐷))) ∧ (𝐶 |s 𝐷) <s (𝐴 |s 𝐵)) → ∀𝑎 ∈ {(𝐴 |s 𝐵)}∀𝑏𝐵 𝑎 <s 𝑏)
80 breq1 5110 . . . . . . . . . . . . . . . . . 18 (𝑎 = (𝐴 |s 𝐵) → (𝑎 <s 𝑏 ↔ (𝐴 |s 𝐵) <s 𝑏))
8180ralbidv 3187 . . . . . . . . . . . . . . . . 17 (𝑎 = (𝐴 |s 𝐵) → (∀𝑏𝐵 𝑎 <s 𝑏 ↔ ∀𝑏𝐵 (𝐴 |s 𝐵) <s 𝑏))
8235, 81ralsn 4645 . . . . . . . . . . . . . . . 16 (∀𝑎 ∈ {(𝐴 |s 𝐵)}∀𝑏𝐵 𝑎 <s 𝑏 ↔ ∀𝑏𝐵 (𝐴 |s 𝐵) <s 𝑏)
8379, 82sylib 221 . . . . . . . . . . . . . . 15 ((((𝐴 <<s 𝐵𝐶 <<s 𝐷) ∧ (∀𝑑𝐷 (𝐴 |s 𝐵) <s 𝑑 ∧ ∀𝑎𝐴 𝑎 <s (𝐶 |s 𝐷))) ∧ (𝐶 |s 𝐷) <s (𝐴 |s 𝐵)) → ∀𝑏𝐵 (𝐴 |s 𝐵) <s 𝑏)
8483r19.21bi 3256 . . . . . . . . . . . . . 14 (((((𝐴 <<s 𝐵𝐶 <<s 𝐷) ∧ (∀𝑑𝐷 (𝐴 |s 𝐵) <s 𝑑 ∧ ∀𝑎𝐴 𝑎 <s (𝐶 |s 𝐷))) ∧ (𝐶 |s 𝐷) <s (𝐴 |s 𝐵)) ∧ 𝑏𝐵) → (𝐴 |s 𝐵) <s 𝑏)
8572, 73, 74, 75, 84ltstrd 28007 . . . . . . . . . . . . 13 (((((𝐴 <<s 𝐵𝐶 <<s 𝐷) ∧ (∀𝑑𝐷 (𝐴 |s 𝐵) <s 𝑑 ∧ ∀𝑎𝐴 𝑎 <s (𝐶 |s 𝐷))) ∧ (𝐶 |s 𝐷) <s (𝐴 |s 𝐵)) ∧ 𝑏𝐵) → (𝐶 |s 𝐷) <s 𝑏)
8685ralrimiva 3156 . . . . . . . . . . . 12 ((((𝐴 <<s 𝐵𝐶 <<s 𝐷) ∧ (∀𝑑𝐷 (𝐴 |s 𝐵) <s 𝑑 ∧ ∀𝑎𝐴 𝑎 <s (𝐶 |s 𝐷))) ∧ (𝐶 |s 𝐷) <s (𝐴 |s 𝐵)) → ∀𝑏𝐵 (𝐶 |s 𝐷) <s 𝑏)
87 breq1 5110 . . . . . . . . . . . . . 14 (𝑎 = (𝐶 |s 𝐷) → (𝑎 <s 𝑏 ↔ (𝐶 |s 𝐷) <s 𝑏))
8887ralbidv 3187 . . . . . . . . . . . . 13 (𝑎 = (𝐶 |s 𝐷) → (∀𝑏𝐵 𝑎 <s 𝑏 ↔ ∀𝑏𝐵 (𝐶 |s 𝐷) <s 𝑏))
8914, 88ralsn 4645 . . . . . . . . . . . 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 28035 . . . . . . . . . 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 27990 . . . . . . . . . . . . . 14 ((𝐴 |s 𝐵) ∈ No → ¬ (𝐴 |s 𝐵) <s (𝐴 |s 𝐵))
9549, 94syl 18 . . . . . . . . . . . . 13 (((𝐴 <<s 𝐵𝐶 <<s 𝐷) ∧ (∀𝑑𝐷 (𝐴 |s 𝐵) <s 𝑑 ∧ ∀𝑎𝐴 𝑎 <s (𝐶 |s 𝐷))) → ¬ (𝐴 |s 𝐵) <s (𝐴 |s 𝐵))
96 breq1 5110 . . . . . . . . . . . . . 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 2972 . . . . . . . . . . 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 3012 . . . . . . . . 9 ((((𝐴 <<s 𝐵𝐶 <<s 𝐷) ∧ (∀𝑑𝐷 (𝐴 |s 𝐵) <s 𝑑 ∧ ∀𝑎𝐴 𝑎 <s (𝐶 |s 𝐷))) ∧ (𝐶 |s 𝐷) <s (𝐴 |s 𝐵)) → (𝐶 |s 𝐷) ≠ (𝐴 |s 𝐵))
102 cutbdaylt 28071 . . . . . . . . 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 28036 . . . . . . . . . . . 12 (𝐶 <<s 𝐷𝐶 ∈ V)
106105ad3antlr 744 . . . . . . . . . . 11 ((((𝐴 <<s 𝐵𝐶 <<s 𝐷) ∧ (∀𝑑𝐷 (𝐴 |s 𝐵) <s 𝑑 ∧ ∀𝑎𝐴 𝑎 <s (𝐶 |s 𝐷))) ∧ (𝐶 |s 𝐷) <s (𝐴 |s 𝐵)) → 𝐶 ∈ V)
107 snex 5408 . . . . . . . . . . 11 {(𝐴 |s 𝐵)} ∈ V
108106, 107jctir 530 . . . . . . . . . 10 ((((𝐴 <<s 𝐵𝐶 <<s 𝐷) ∧ (∀𝑑𝐷 (𝐴 |s 𝐵) <s 𝑑 ∧ ∀𝑎𝐴 𝑎 <s (𝐶 |s 𝐷))) ∧ (𝐶 |s 𝐷) <s (𝐴 |s 𝐵)) → (𝐶 ∈ V ∧ {(𝐴 |s 𝐵)} ∈ V))
109 sltsss1 28038 . . . . . . . . . . . 12 (𝐶 <<s 𝐷𝐶 No )
110109ad3antlr 744 . . . . . . . . . . 11 ((((𝐴 <<s 𝐵𝐶 <<s 𝐷) ∧ (∀𝑑𝐷 (𝐴 |s 𝐵) <s 𝑑 ∧ ∀𝑎𝐴 𝑎 <s (𝐶 |s 𝐷))) ∧ (𝐶 |s 𝐷) <s (𝐴 |s 𝐵)) → 𝐶 No )
111104snssd 4750 . . . . . . . . . . 11 ((((𝐴 <<s 𝐵𝐶 <<s 𝐷) ∧ (∀𝑑𝐷 (𝐴 |s 𝐵) <s 𝑑 ∧ ∀𝑎𝐴 𝑎 <s (𝐶 |s 𝐷))) ∧ (𝐶 |s 𝐷) <s (𝐴 |s 𝐵)) → {(𝐴 |s 𝐵)} ⊆ No )
112110sselda 3934 . . . . . . . . . . . . . 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 28040 . . . . . . . . . . . . . . . . 17 (𝐶 <<s {(𝐶 |s 𝐷)} → ∀𝑐𝐶𝑑 ∈ {(𝐶 |s 𝐷)}𝑐 <s 𝑑)
118116, 117syl 18 . . . . . . . . . . . . . . . 16 ((((𝐴 <<s 𝐵𝐶 <<s 𝐷) ∧ (∀𝑑𝐷 (𝐴 |s 𝐵) <s 𝑑 ∧ ∀𝑎𝐴 𝑎 <s (𝐶 |s 𝐷))) ∧ (𝐶 |s 𝐷) <s (𝐴 |s 𝐵)) → ∀𝑐𝐶𝑑 ∈ {(𝐶 |s 𝐷)}𝑐 <s 𝑑)
119118r19.21bi 3256 . . . . . . . . . . . . . . 15 (((((𝐴 <<s 𝐵𝐶 <<s 𝐷) ∧ (∀𝑑𝐷 (𝐴 |s 𝐵) <s 𝑑 ∧ ∀𝑎𝐴 𝑎 <s (𝐶 |s 𝐷))) ∧ (𝐶 |s 𝐷) <s (𝐴 |s 𝐵)) ∧ 𝑐𝐶) → ∀𝑑 ∈ {(𝐶 |s 𝐷)}𝑐 <s 𝑑)
120 breq2 5111 . . . . . . . . . . . . . . . 16 (𝑑 = (𝐶 |s 𝐷) → (𝑐 <s 𝑑𝑐 <s (𝐶 |s 𝐷)))
12114, 120ralsn 4645 . . . . . . . . . . . . . . 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 28007 . . . . . . . . . . . . 13 (((((𝐴 <<s 𝐵𝐶 <<s 𝐷) ∧ (∀𝑑𝐷 (𝐴 |s 𝐵) <s 𝑑 ∧ ∀𝑎𝐴 𝑎 <s (𝐶 |s 𝐷))) ∧ (𝐶 |s 𝐷) <s (𝐴 |s 𝐵)) ∧ 𝑐𝐶) → 𝑐 <s (𝐴 |s 𝐵))
125 breq2 5111 . . . . . . . . . . . . . 14 (𝑎 = (𝐴 |s 𝐵) → (𝑐 <s 𝑎𝑐 <s (𝐴 |s 𝐵)))
12635, 125ralsn 4645 . . . . . . . . . . . . 13 (∀𝑎 ∈ {(𝐴 |s 𝐵)}𝑐 <s 𝑎𝑐 <s (𝐴 |s 𝐵))
127124, 126sylibr 237 . . . . . . . . . . . 12 (((((𝐴 <<s 𝐵𝐶 <<s 𝐷) ∧ (∀𝑑𝐷 (𝐴 |s 𝐵) <s 𝑑 ∧ ∀𝑎𝐴 𝑎 <s (𝐶 |s 𝐷))) ∧ (𝐶 |s 𝐷) <s (𝐴 |s 𝐵)) ∧ 𝑐𝐶) → ∀𝑎 ∈ {(𝐴 |s 𝐵)}𝑐 <s 𝑎)
128127ralrimiva 3156 . . . . . . . . . . 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 28035 . . . . . . . . . 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 28037 . . . . . . . . . . . 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 5110 . . . . . . . . . . . . . 14 (𝑎 = (𝐴 |s 𝐵) → (𝑎 <s 𝑑 ↔ (𝐴 |s 𝐵) <s 𝑑))
138137ralbidv 3187 . . . . . . . . . . . . 13 (𝑎 = (𝐴 |s 𝐵) → (∀𝑑𝐷 𝑎 <s 𝑑 ↔ ∀𝑑𝐷 (𝐴 |s 𝐵) <s 𝑑))
13935, 138ralsn 4645 . . . . . . . . . . . 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 28035 . . . . . . . . . 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 28071 . . . . . . . . 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 5112 . . . 4 ((𝑋 = (𝐴 |s 𝐵) ∧ 𝑌 = (𝐶 |s 𝐷)) → (𝑋 ≤s 𝑌 ↔ (𝐴 |s 𝐵) ≤s (𝐶 |s 𝐷)))
152 breq1 5110 . . . . . 6 (𝑋 = (𝐴 |s 𝐵) → (𝑋 <s 𝑑 ↔ (𝐴 |s 𝐵) <s 𝑑))
153152ralbidv 3187 . . . . 5 (𝑋 = (𝐴 |s 𝐵) → (∀𝑑𝐷 𝑋 <s 𝑑 ↔ ∀𝑑𝐷 (𝐴 |s 𝐵) <s 𝑑))
154 breq2 5111 . . . . . 6 (𝑌 = (𝐶 |s 𝐷) → (𝑎 <s 𝑌𝑎 <s (𝐶 |s 𝐷)))
155154ralbidv 3187 . . . . 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 2145  wne 2957  wral 3078  Vcvv 3453  wss 3902  {csn 4587   class class class wbr 5107  Ord word 6360  cfv 6537  (class class class)co 7417   No csur 27884   <s clts 27885   bday cbday 27886   ≤s cles 27988   <<s cslts 28030   |s ccuts 28032
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 2147  ax-9 2155  ax-10 2178  ax-11 2194  ax-12 2215  ax-ext 2734  ax-rep 5236  ax-sep 5255  ax-nul 5267  ax-pow 5334  ax-pr 5402  ax-un 7740
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 2566  df-eu 2596  df-clab 2741  df-cleq 2754  df-clel 2837  df-nfc 2911  df-ne 2958  df-ral 3079  df-rex 3089  df-rmo 3367  df-reu 3368  df-rab 3415  df-v 3455  df-sbc 3743  df-csb 3851  df-dif 3905  df-un 3907  df-in 3909  df-ss 3919  df-pss 3922  df-nul 4283  df-if 4486  df-pw 4562  df-sn 4588  df-pr 4590  df-tp 4592  df-op 4594  df-uni 4871  df-int 4911  df-br 5108  df-opab 5172  df-mpt 5191  df-tr 5217  df-id 5554  df-eprel 5559  df-po 5567  df-so 5568  df-fr 5612  df-we 5614  df-xp 5665  df-rel 5666  df-cnv 5667  df-co 5668  df-dm 5669  df-rn 5670  df-res 5671  df-ima 5672  df-ord 6364  df-on 6365  df-suc 6367  df-iota 6493  df-fun 6539  df-fn 6540  df-f 6541  df-f1 6542  df-fo 6543  df-f1o 6544  df-fv 6545  df-riota 7374  df-ov 7420  df-oprab 7421  df-mpo 7422  df-1o 8459  df-2o 8460  df-no 27887  df-lts 27888  df-bday 27889  df-les 27989  df-slts 28031  df-cuts 28033
This theorem is used by:  lesrecd  28073  twocut  28696
  Copyright terms: Public domain W3C validator