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

Theorem mulsproplem7 28517
Description: Lemma for surreal multiplication. Show one of the inequalities involved in surreal multiplication's cuts. (Contributed by Scott Fenton, 5-Mar-2025.)
Hypotheses
Ref Expression
mulsproplem.1 (𝜑 → ∀𝑎 ∈ No ∀𝑏 ∈ No ∀𝑐 ∈ No ∀𝑑 ∈ No ∀𝑒 ∈ No ∀𝑓 ∈ No ((((bday‘𝑎) +no (bday‘𝑏)) ∪ ((((bday‘𝑐) +no (bday‘𝑒)) ∪ ((bday‘𝑑) +no (bday‘𝑓))) ∪ (((bday‘𝑐) +no (bday‘𝑓)) ∪ ((bday‘𝑑) +no (bday‘𝑒))))) ∈ (((bday‘𝐴) +no (bday‘𝐵)) ∪ ((((bday‘𝐶) +no (bday‘𝐸)) ∪ ((bday‘𝐷) +no (bday‘𝐹))) ∪ (((bday‘𝐶) +no (bday‘𝐹)) ∪ ((bday‘𝐷) +no (bday‘𝐸))))) → ((𝑎 ·s 𝑏) ∈ No ∧ ((𝑐 <s 𝑑 ∧ 𝑒 <s 𝑓) → ((𝑐 ·s 𝑓) −s (𝑐 ·s 𝑒)) <s ((𝑑 ·s 𝑓) −s (𝑑 ·s 𝑒))))))
mulsproplem7.1 (𝜑 → 𝐴 ∈ No)
mulsproplem7.2 (𝜑 → 𝐵 ∈ No)
mulsproplem7.3 (𝜑 → 𝑅 ∈ (R‘𝐴))
mulsproplem7.4 (𝜑 → 𝑆 ∈ (R‘𝐵))
mulsproplem7.5 (𝜑 → 𝑇 ∈ (L‘𝐴))
mulsproplem7.6 (𝜑 → 𝑈 ∈ (R‘𝐵))
Assertion
Ref Expression
mulsproplem7 (𝜑 → (((𝑅 ·s 𝐵) +s (𝐴 ·s 𝑆)) −s (𝑅 ·s 𝑆)) <s (((𝑇 ·s 𝐵) +s (𝐴 ·s 𝑈)) −s (𝑇 ·s 𝑈)))
Distinct variable groups:   𝐴,𝑎,𝑏,𝑐,𝑑,𝑒,𝑓   𝐵,𝑎,𝑏,𝑐,𝑑,𝑒,𝑓   𝐶,𝑎,𝑏,𝑐,𝑑,𝑒,𝑓   𝐷,𝑎,𝑏,𝑐,𝑑,𝑒,𝑓   𝐸,𝑎,𝑏,𝑐,𝑑,𝑒,𝑓   𝐹,𝑎,𝑏,𝑐,𝑑,𝑒,𝑓   𝑅,𝑎,𝑏,𝑐,𝑑,𝑒,𝑓   𝑆,𝑏,𝑐,𝑑,𝑒,𝑓   𝑇,𝑎,𝑏,𝑐,𝑑,𝑒,𝑓   𝑈,𝑏,𝑐,𝑑,𝑒,𝑓
Allowed substitution hints:   𝜑(𝑒, 𝑓, 𝑎, 𝑏, 𝑐, 𝑑)   𝑆(𝑎)   𝑈(𝑎)

Proof of Theorem mulsproplem7
StepHypRef Expression
1 mulsproplem7.4 . . . 4 (𝜑 → 𝑆 ∈ (R‘𝐵))
21rightnod 28277 . . 3 (𝜑 → 𝑆 ∈ No)
3 mulsproplem7.6 . . . 4 (𝜑 → 𝑈 ∈ (R‘𝐵))
43rightnod 28277 . . 3 (𝜑 → 𝑈 ∈ No)
5 ltslin 28115 . . 3 ((𝑆 ∈ No ∧ 𝑈 ∈ No) → (𝑆 <s 𝑈 ∨ 𝑆 = 𝑈 ∨ 𝑈 <s 𝑆))
62, 4, 5syl2anc 596 . 2 (𝜑 → (𝑆 <s 𝑈 ∨ 𝑆 = 𝑈 ∨ 𝑈 <s 𝑆))
7 mulsproplem.1 . . . . . . . . 9 (𝜑 → ∀𝑎 ∈ No ∀𝑏 ∈ No ∀𝑐 ∈ No ∀𝑑 ∈ No ∀𝑒 ∈ No ∀𝑓 ∈ No ((((bday‘𝑎) +no (bday‘𝑏)) ∪ ((((bday‘𝑐) +no (bday‘𝑒)) ∪ ((bday‘𝑑) +no (bday‘𝑓))) ∪ (((bday‘𝑐) +no (bday‘𝑓)) ∪ ((bday‘𝑑) +no (bday‘𝑒))))) ∈ (((bday‘𝐴) +no (bday‘𝐵)) ∪ ((((bday‘𝐶) +no (bday‘𝐸)) ∪ ((bday‘𝐷) +no (bday‘𝐹))) ∪ (((bday‘𝐶) +no (bday‘𝐹)) ∪ ((bday‘𝐷) +no (bday‘𝐸))))) → ((𝑎 ·s 𝑏) ∈ No ∧ ((𝑐 <s 𝑑 ∧ 𝑒 <s 𝑓) → ((𝑐 ·s 𝑓) −s (𝑐 ·s 𝑒)) <s ((𝑑 ·s 𝑓) −s (𝑑 ·s 𝑒))))))
8 mulsproplem7.3 . . . . . . . . . 10 (𝜑 → 𝑅 ∈ (R‘𝐴))
98rightoldd 28276 . . . . . . . . 9 (𝜑 → 𝑅 ∈ (O‘(bday‘𝐴)))
10 mulsproplem7.2 . . . . . . . . 9 (𝜑 → 𝐵 ∈ No)
117, 9, 10mulsproplem2 28512 . . . . . . . 8 (𝜑 → (𝑅 ·s 𝐵) ∈ No)
12 mulsproplem7.1 . . . . . . . . 9 (𝜑 → 𝐴 ∈ No)
131rightoldd 28276 . . . . . . . . 9 (𝜑 → 𝑆 ∈ (O‘(bday‘𝐵)))
147, 12, 13mulsproplem3 28513 . . . . . . . 8 (𝜑 → (𝐴 ·s 𝑆) ∈ No)
1511, 14addscld 28375 . . . . . . 7 (𝜑 → ((𝑅 ·s 𝐵) +s (𝐴 ·s 𝑆)) ∈ No)
167, 9, 13mulsproplem4 28514 . . . . . . 7 (𝜑 → (𝑅 ·s 𝑆) ∈ No)
1715, 16subscld 28458 . . . . . 6 (𝜑 → (((𝑅 ·s 𝐵) +s (𝐴 ·s 𝑆)) −s (𝑅 ·s 𝑆)) ∈ No)
1817adantr 486 . . . . 5 ((𝜑 ∧ 𝑆 <s 𝑈) → (((𝑅 ·s 𝐵) +s (𝐴 ·s 𝑆)) −s (𝑅 ·s 𝑆)) ∈ No)
19 mulsproplem7.5 . . . . . . . . . 10 (𝜑 → 𝑇 ∈ (L‘𝐴))
2019leftoldd 28274 . . . . . . . . 9 (𝜑 → 𝑇 ∈ (O‘(bday‘𝐴)))
217, 20, 10mulsproplem2 28512 . . . . . . . 8 (𝜑 → (𝑇 ·s 𝐵) ∈ No)
2221, 14addscld 28375 . . . . . . 7 (𝜑 → ((𝑇 ·s 𝐵) +s (𝐴 ·s 𝑆)) ∈ No)
237, 20, 13mulsproplem4 28514 . . . . . . 7 (𝜑 → (𝑇 ·s 𝑆) ∈ No)
2422, 23subscld 28458 . . . . . 6 (𝜑 → (((𝑇 ·s 𝐵) +s (𝐴 ·s 𝑆)) −s (𝑇 ·s 𝑆)) ∈ No)
2524adantr 486 . . . . 5 ((𝜑 ∧ 𝑆 <s 𝑈) → (((𝑇 ·s 𝐵) +s (𝐴 ·s 𝑆)) −s (𝑇 ·s 𝑆)) ∈ No)
263rightoldd 28276 . . . . . . . . 9 (𝜑 → 𝑈 ∈ (O‘(bday‘𝐵)))
277, 12, 26mulsproplem3 28513 . . . . . . . 8 (𝜑 → (𝐴 ·s 𝑈) ∈ No)
2821, 27addscld 28375 . . . . . . 7 (𝜑 → ((𝑇 ·s 𝐵) +s (𝐴 ·s 𝑈)) ∈ No)
297, 20, 26mulsproplem4 28514 . . . . . . 7 (𝜑 → (𝑇 ·s 𝑈) ∈ No)
3028, 29subscld 28458 . . . . . 6 (𝜑 → (((𝑇 ·s 𝐵) +s (𝐴 ·s 𝑈)) −s (𝑇 ·s 𝑈)) ∈ No)
3130adantr 486 . . . . 5 ((𝜑 ∧ 𝑆 <s 𝑈) → (((𝑇 ·s 𝐵) +s (𝐴 ·s 𝑈)) −s (𝑇 ·s 𝑈)) ∈ No)
32 lltr 28257 . . . . . . . . . . 11 (L‘𝐴) <<s (R‘𝐴)
3332a1i 11 . . . . . . . . . 10 (𝜑 → (L‘𝐴) <<s (R‘𝐴))
3433, 19, 8sltssepcd 28167 . . . . . . . . 9 (𝜑 → 𝑇 <s 𝑅)
35 sltsright 28256 . . . . . . . . . . 11 (𝐵 ∈ No → {𝐵} <<s (R‘𝐵))
3610, 35syl 18 . . . . . . . . . 10 (𝜑 → {𝐵} <<s (R‘𝐵))
37 snidg 4617 . . . . . . . . . . 11 (𝐵 ∈ No → 𝐵 ∈ {𝐵})
3810, 37syl 18 . . . . . . . . . 10 (𝜑 → 𝐵 ∈ {𝐵})
3936, 38, 1sltssepcd 28167 . . . . . . . . 9 (𝜑 → 𝐵 <s 𝑆)
40 0no 28204 . . . . . . . . . . . 12 0s ∈ No
4140a1i 11 . . . . . . . . . . 11 (𝜑 → 0s ∈ No)
4219leftnod 28275 . . . . . . . . . . 11 (𝜑 → 𝑇 ∈ No)
438rightnod 28277 . . . . . . . . . . 11 (𝜑 → 𝑅 ∈ No)
44 bday0 28206 . . . . . . . . . . . . . . . 16 (bday‘ 0s ) = ∅
4544, 44oveq12i 7436 . . . . . . . . . . . . . . 15 ((bday‘ 0s ) +no (bday‘ 0s )) = (∅ +no ∅)
46 0elon 6421 . . . . . . . . . . . . . . . 16 ∅ ∈ On
47 naddrid 8700 . . . . . . . . . . . . . . . 16 (∅ ∈ On → (∅ +no ∅) = ∅)
4846, 47ax-mp 5 . . . . . . . . . . . . . . 15 (∅ +no ∅) = ∅
4945, 48eqtri 2783 . . . . . . . . . . . . . 14 ((bday‘ 0s ) +no (bday‘ 0s )) = ∅
5049uneq1i 4162 . . . . . . . . . . . . 13 (((bday‘ 0s ) +no (bday‘ 0s )) ∪ ((((bday‘𝑇) +no (bday‘𝐵)) ∪ ((bday‘𝑅) +no (bday‘𝑆))) ∪ (((bday‘𝑇) +no (bday‘𝑆)) ∪ ((bday‘𝑅) +no (bday‘𝐵))))) = (∅ ∪ ((((bday‘𝑇) +no (bday‘𝐵)) ∪ ((bday‘𝑅) +no (bday‘𝑆))) ∪ (((bday‘𝑇) +no (bday‘𝑆)) ∪ ((bday‘𝑅) +no (bday‘𝐵)))))
51 0un 4345 . . . . . . . . . . . . 13 (∅ ∪ ((((bday‘𝑇) +no (bday‘𝐵)) ∪ ((bday‘𝑅) +no (bday‘𝑆))) ∪ (((bday‘𝑇) +no (bday‘𝑆)) ∪ ((bday‘𝑅) +no (bday‘𝐵))))) = ((((bday‘𝑇) +no (bday‘𝐵)) ∪ ((bday‘𝑅) +no (bday‘𝑆))) ∪ (((bday‘𝑇) +no (bday‘𝑆)) ∪ ((bday‘𝑅) +no (bday‘𝐵))))
5250, 51eqtri 2783 . . . . . . . . . . . 12 (((bday‘ 0s ) +no (bday‘ 0s )) ∪ ((((bday‘𝑇) +no (bday‘𝐵)) ∪ ((bday‘𝑅) +no (bday‘𝑆))) ∪ (((bday‘𝑇) +no (bday‘𝑆)) ∪ ((bday‘𝑅) +no (bday‘𝐵))))) = ((((bday‘𝑇) +no (bday‘𝐵)) ∪ ((bday‘𝑅) +no (bday‘𝑆))) ∪ (((bday‘𝑇) +no (bday‘𝑆)) ∪ ((bday‘𝑅) +no (bday‘𝐵))))
53 oldbdayim 28284 . . . . . . . . . . . . . . . . 17 (𝑇 ∈ (O‘(bday‘𝐴)) → (bday‘𝑇) ∈ (bday‘𝐴))
5420, 53syl 18 . . . . . . . . . . . . . . . 16 (𝜑 → (bday‘𝑇) ∈ (bday‘𝐴))
55 bdayon 28147 . . . . . . . . . . . . . . . . 17 (bday‘𝑇) ∈ On
56 bdayon 28147 . . . . . . . . . . . . . . . . 17 (bday‘𝐴) ∈ On
57 bdayon 28147 . . . . . . . . . . . . . . . . 17 (bday‘𝐵) ∈ On
58 naddel1 8704 . . . . . . . . . . . . . . . . 17 (((bday‘𝑇) ∈ On ∧ (bday‘𝐴) ∈ On ∧ (bday‘𝐵) ∈ On) → ((bday‘𝑇) ∈ (bday‘𝐴) ↔ ((bday‘𝑇) +no (bday‘𝐵)) ∈ ((bday‘𝐴) +no (bday‘𝐵))))
5955, 56, 57, 58mp3an 1490 . . . . . . . . . . . . . . . 16 ((bday‘𝑇) ∈ (bday‘𝐴) ↔ ((bday‘𝑇) +no (bday‘𝐵)) ∈ ((bday‘𝐴) +no (bday‘𝐵)))
6054, 59sylib 221 . . . . . . . . . . . . . . 15 (𝜑 → ((bday‘𝑇) +no (bday‘𝐵)) ∈ ((bday‘𝐴) +no (bday‘𝐵)))
61 oldbdayim 28284 . . . . . . . . . . . . . . . . 17 (𝑅 ∈ (O‘(bday‘𝐴)) → (bday‘𝑅) ∈ (bday‘𝐴))
629, 61syl 18 . . . . . . . . . . . . . . . 16 (𝜑 → (bday‘𝑅) ∈ (bday‘𝐴))
63 oldbdayim 28284 . . . . . . . . . . . . . . . . 17 (𝑆 ∈ (O‘(bday‘𝐵)) → (bday‘𝑆) ∈ (bday‘𝐵))
6413, 63syl 18 . . . . . . . . . . . . . . . 16 (𝜑 → (bday‘𝑆) ∈ (bday‘𝐵))
65 naddel12 8717 . . . . . . . . . . . . . . . . 17 (((bday‘𝐴) ∈ On ∧ (bday‘𝐵) ∈ On) → (((bday‘𝑅) ∈ (bday‘𝐴) ∧ (bday‘𝑆) ∈ (bday‘𝐵)) → ((bday‘𝑅) +no (bday‘𝑆)) ∈ ((bday‘𝐴) +no (bday‘𝐵))))
6656, 57, 65mp2an 705 . . . . . . . . . . . . . . . 16 (((bday‘𝑅) ∈ (bday‘𝐴) ∧ (bday‘𝑆) ∈ (bday‘𝐵)) → ((bday‘𝑅) +no (bday‘𝑆)) ∈ ((bday‘𝐴) +no (bday‘𝐵)))
6762, 64, 66syl2anc 596 . . . . . . . . . . . . . . 15 (𝜑 → ((bday‘𝑅) +no (bday‘𝑆)) ∈ ((bday‘𝐴) +no (bday‘𝐵)))
6860, 67jca 521 . . . . . . . . . . . . . 14 (𝜑 → (((bday‘𝑇) +no (bday‘𝐵)) ∈ ((bday‘𝐴) +no (bday‘𝐵)) ∧ ((bday‘𝑅) +no (bday‘𝑆)) ∈ ((bday‘𝐴) +no (bday‘𝐵))))
69 naddel12 8717 . . . . . . . . . . . . . . . . 17 (((bday‘𝐴) ∈ On ∧ (bday‘𝐵) ∈ On) → (((bday‘𝑇) ∈ (bday‘𝐴) ∧ (bday‘𝑆) ∈ (bday‘𝐵)) → ((bday‘𝑇) +no (bday‘𝑆)) ∈ ((bday‘𝐴) +no (bday‘𝐵))))
7056, 57, 69mp2an 705 . . . . . . . . . . . . . . . 16 (((bday‘𝑇) ∈ (bday‘𝐴) ∧ (bday‘𝑆) ∈ (bday‘𝐵)) → ((bday‘𝑇) +no (bday‘𝑆)) ∈ ((bday‘𝐴) +no (bday‘𝐵)))
7154, 64, 70syl2anc 596 . . . . . . . . . . . . . . 15 (𝜑 → ((bday‘𝑇) +no (bday‘𝑆)) ∈ ((bday‘𝐴) +no (bday‘𝐵)))
72 bdayon 28147 . . . . . . . . . . . . . . . . 17 (bday‘𝑅) ∈ On
73 naddel1 8704 . . . . . . . . . . . . . . . . 17 (((bday‘𝑅) ∈ On ∧ (bday‘𝐴) ∈ On ∧ (bday‘𝐵) ∈ On) → ((bday‘𝑅) ∈ (bday‘𝐴) ↔ ((bday‘𝑅) +no (bday‘𝐵)) ∈ ((bday‘𝐴) +no (bday‘𝐵))))
7472, 56, 57, 73mp3an 1490 . . . . . . . . . . . . . . . 16 ((bday‘𝑅) ∈ (bday‘𝐴) ↔ ((bday‘𝑅) +no (bday‘𝐵)) ∈ ((bday‘𝐴) +no (bday‘𝐵)))
7562, 74sylib 221 . . . . . . . . . . . . . . 15 (𝜑 → ((bday‘𝑅) +no (bday‘𝐵)) ∈ ((bday‘𝐴) +no (bday‘𝐵)))
7671, 75jca 521 . . . . . . . . . . . . . 14 (𝜑 → (((bday‘𝑇) +no (bday‘𝑆)) ∈ ((bday‘𝐴) +no (bday‘𝐵)) ∧ ((bday‘𝑅) +no (bday‘𝐵)) ∈ ((bday‘𝐴) +no (bday‘𝐵))))
77 naddcl 8693 . . . . . . . . . . . . . . . . . 18 (((bday‘𝑇) ∈ On ∧ (bday‘𝐵) ∈ On) → ((bday‘𝑇) +no (bday‘𝐵)) ∈ On)
7855, 57, 77mp2an 705 . . . . . . . . . . . . . . . . 17 ((bday‘𝑇) +no (bday‘𝐵)) ∈ On
79 bdayon 28147 . . . . . . . . . . . . . . . . . 18 (bday‘𝑆) ∈ On
80 naddcl 8693 . . . . . . . . . . . . . . . . . 18 (((bday‘𝑅) ∈ On ∧ (bday‘𝑆) ∈ On) → ((bday‘𝑅) +no (bday‘𝑆)) ∈ On)
8172, 79, 80mp2an 705 . . . . . . . . . . . . . . . . 17 ((bday‘𝑅) +no (bday‘𝑆)) ∈ On
8278, 81onun2i 6489 . . . . . . . . . . . . . . . 16 (((bday‘𝑇) +no (bday‘𝐵)) ∪ ((bday‘𝑅) +no (bday‘𝑆))) ∈ On
83 naddcl 8693 . . . . . . . . . . . . . . . . . 18 (((bday‘𝑇) ∈ On ∧ (bday‘𝑆) ∈ On) → ((bday‘𝑇) +no (bday‘𝑆)) ∈ On)
8455, 79, 83mp2an 705 . . . . . . . . . . . . . . . . 17 ((bday‘𝑇) +no (bday‘𝑆)) ∈ On
85 naddcl 8693 . . . . . . . . . . . . . . . . . 18 (((bday‘𝑅) ∈ On ∧ (bday‘𝐵) ∈ On) → ((bday‘𝑅) +no (bday‘𝐵)) ∈ On)
8672, 57, 85mp2an 705 . . . . . . . . . . . . . . . . 17 ((bday‘𝑅) +no (bday‘𝐵)) ∈ On
8784, 86onun2i 6489 . . . . . . . . . . . . . . . 16 (((bday‘𝑇) +no (bday‘𝑆)) ∪ ((bday‘𝑅) +no (bday‘𝐵))) ∈ On
88 naddcl 8693 . . . . . . . . . . . . . . . . 17 (((bday‘𝐴) ∈ On ∧ (bday‘𝐵) ∈ On) → ((bday‘𝐴) +no (bday‘𝐵)) ∈ On)
8956, 57, 88mp2an 705 . . . . . . . . . . . . . . . 16 ((bday‘𝐴) +no (bday‘𝐵)) ∈ On
90 onunel 6473 . . . . . . . . . . . . . . . 16 (((((bday‘𝑇) +no (bday‘𝐵)) ∪ ((bday‘𝑅) +no (bday‘𝑆))) ∈ On ∧ (((bday‘𝑇) +no (bday‘𝑆)) ∪ ((bday‘𝑅) +no (bday‘𝐵))) ∈ On ∧ ((bday‘𝐴) +no (bday‘𝐵)) ∈ On) → (((((bday‘𝑇) +no (bday‘𝐵)) ∪ ((bday‘𝑅) +no (bday‘𝑆))) ∪ (((bday‘𝑇) +no (bday‘𝑆)) ∪ ((bday‘𝑅) +no (bday‘𝐵)))) ∈ ((bday‘𝐴) +no (bday‘𝐵)) ↔ ((((bday‘𝑇) +no (bday‘𝐵)) ∪ ((bday‘𝑅) +no (bday‘𝑆))) ∈ ((bday‘𝐴) +no (bday‘𝐵)) ∧ (((bday‘𝑇) +no (bday‘𝑆)) ∪ ((bday‘𝑅) +no (bday‘𝐵))) ∈ ((bday‘𝐴) +no (bday‘𝐵)))))
9182, 87, 89, 90mp3an 1490 . . . . . . . . . . . . . . 15 (((((bday‘𝑇) +no (bday‘𝐵)) ∪ ((bday‘𝑅) +no (bday‘𝑆))) ∪ (((bday‘𝑇) +no (bday‘𝑆)) ∪ ((bday‘𝑅) +no (bday‘𝐵)))) ∈ ((bday‘𝐴) +no (bday‘𝐵)) ↔ ((((bday‘𝑇) +no (bday‘𝐵)) ∪ ((bday‘𝑅) +no (bday‘𝑆))) ∈ ((bday‘𝐴) +no (bday‘𝐵)) ∧ (((bday‘𝑇) +no (bday‘𝑆)) ∪ ((bday‘𝑅) +no (bday‘𝐵))) ∈ ((bday‘𝐴) +no (bday‘𝐵))))
92 onunel 6473 . . . . . . . . . . . . . . . . 17 ((((bday‘𝑇) +no (bday‘𝐵)) ∈ On ∧ ((bday‘𝑅) +no (bday‘𝑆)) ∈ On ∧ ((bday‘𝐴) +no (bday‘𝐵)) ∈ On) → ((((bday‘𝑇) +no (bday‘𝐵)) ∪ ((bday‘𝑅) +no (bday‘𝑆))) ∈ ((bday‘𝐴) +no (bday‘𝐵)) ↔ (((bday‘𝑇) +no (bday‘𝐵)) ∈ ((bday‘𝐴) +no (bday‘𝐵)) ∧ ((bday‘𝑅) +no (bday‘𝑆)) ∈ ((bday‘𝐴) +no (bday‘𝐵)))))
9378, 81, 89, 92mp3an 1490 . . . . . . . . . . . . . . . 16 ((((bday‘𝑇) +no (bday‘𝐵)) ∪ ((bday‘𝑅) +no (bday‘𝑆))) ∈ ((bday‘𝐴) +no (bday‘𝐵)) ↔ (((bday‘𝑇) +no (bday‘𝐵)) ∈ ((bday‘𝐴) +no (bday‘𝐵)) ∧ ((bday‘𝑅) +no (bday‘𝑆)) ∈ ((bday‘𝐴) +no (bday‘𝐵))))
94 onunel 6473 . . . . . . . . . . . . . . . . 17 ((((bday‘𝑇) +no (bday‘𝑆)) ∈ On ∧ ((bday‘𝑅) +no (bday‘𝐵)) ∈ On ∧ ((bday‘𝐴) +no (bday‘𝐵)) ∈ On) → ((((bday‘𝑇) +no (bday‘𝑆)) ∪ ((bday‘𝑅) +no (bday‘𝐵))) ∈ ((bday‘𝐴) +no (bday‘𝐵)) ↔ (((bday‘𝑇) +no (bday‘𝑆)) ∈ ((bday‘𝐴) +no (bday‘𝐵)) ∧ ((bday‘𝑅) +no (bday‘𝐵)) ∈ ((bday‘𝐴) +no (bday‘𝐵)))))
9584, 86, 89, 94mp3an 1490 . . . . . . . . . . . . . . . 16 ((((bday‘𝑇) +no (bday‘𝑆)) ∪ ((bday‘𝑅) +no (bday‘𝐵))) ∈ ((bday‘𝐴) +no (bday‘𝐵)) ↔ (((bday‘𝑇) +no (bday‘𝑆)) ∈ ((bday‘𝐴) +no (bday‘𝐵)) ∧ ((bday‘𝑅) +no (bday‘𝐵)) ∈ ((bday‘𝐴) +no (bday‘𝐵))))
9693, 95anbi12i 640 . . . . . . . . . . . . . . 15 (((((bday‘𝑇) +no (bday‘𝐵)) ∪ ((bday‘𝑅) +no (bday‘𝑆))) ∈ ((bday‘𝐴) +no (bday‘𝐵)) ∧ (((bday‘𝑇) +no (bday‘𝑆)) ∪ ((bday‘𝑅) +no (bday‘𝐵))) ∈ ((bday‘𝐴) +no (bday‘𝐵))) ↔ ((((bday‘𝑇) +no (bday‘𝐵)) ∈ ((bday‘𝐴) +no (bday‘𝐵)) ∧ ((bday‘𝑅) +no (bday‘𝑆)) ∈ ((bday‘𝐴) +no (bday‘𝐵))) ∧ (((bday‘𝑇) +no (bday‘𝑆)) ∈ ((bday‘𝐴) +no (bday‘𝐵)) ∧ ((bday‘𝑅) +no (bday‘𝐵)) ∈ ((bday‘𝐴) +no (bday‘𝐵)))))
9791, 96bitri 278 . . . . . . . . . . . . . 14 (((((bday‘𝑇) +no (bday‘𝐵)) ∪ ((bday‘𝑅) +no (bday‘𝑆))) ∪ (((bday‘𝑇) +no (bday‘𝑆)) ∪ ((bday‘𝑅) +no (bday‘𝐵)))) ∈ ((bday‘𝐴) +no (bday‘𝐵)) ↔ ((((bday‘𝑇) +no (bday‘𝐵)) ∈ ((bday‘𝐴) +no (bday‘𝐵)) ∧ ((bday‘𝑅) +no (bday‘𝑆)) ∈ ((bday‘𝐴) +no (bday‘𝐵))) ∧ (((bday‘𝑇) +no (bday‘𝑆)) ∈ ((bday‘𝐴) +no (bday‘𝐵)) ∧ ((bday‘𝑅) +no (bday‘𝐵)) ∈ ((bday‘𝐴) +no (bday‘𝐵)))))
9868, 76, 97sylanbrc 595 . . . . . . . . . . . . 13 (𝜑 → ((((bday‘𝑇) +no (bday‘𝐵)) ∪ ((bday‘𝑅) +no (bday‘𝑆))) ∪ (((bday‘𝑇) +no (bday‘𝑆)) ∪ ((bday‘𝑅) +no (bday‘𝐵)))) ∈ ((bday‘𝐴) +no (bday‘𝐵)))
99 elun1 4179 . . . . . . . . . . . . 13 (((((bday‘𝑇) +no (bday‘𝐵)) ∪ ((bday‘𝑅) +no (bday‘𝑆))) ∪ (((bday‘𝑇) +no (bday‘𝑆)) ∪ ((bday‘𝑅) +no (bday‘𝐵)))) ∈ ((bday‘𝐴) +no (bday‘𝐵)) → ((((bday‘𝑇) +no (bday‘𝐵)) ∪ ((bday‘𝑅) +no (bday‘𝑆))) ∪ (((bday‘𝑇) +no (bday‘𝑆)) ∪ ((bday‘𝑅) +no (bday‘𝐵)))) ∈ (((bday‘𝐴) +no (bday‘𝐵)) ∪ ((((bday‘𝐶) +no (bday‘𝐸)) ∪ ((bday‘𝐷) +no (bday‘𝐹))) ∪ (((bday‘𝐶) +no (bday‘𝐹)) ∪ ((bday‘𝐷) +no (bday‘𝐸))))))
10098, 99syl 18 . . . . . . . . . . . 12 (𝜑 → ((((bday‘𝑇) +no (bday‘𝐵)) ∪ ((bday‘𝑅) +no (bday‘𝑆))) ∪ (((bday‘𝑇) +no (bday‘𝑆)) ∪ ((bday‘𝑅) +no (bday‘𝐵)))) ∈ (((bday‘𝐴) +no (bday‘𝐵)) ∪ ((((bday‘𝐶) +no (bday‘𝐸)) ∪ ((bday‘𝐷) +no (bday‘𝐹))) ∪ (((bday‘𝐶) +no (bday‘𝐹)) ∪ ((bday‘𝐷) +no (bday‘𝐸))))))
10152, 100eqeltrid 2864 . . . . . . . . . . 11 (𝜑 → (((bday‘ 0s ) +no (bday‘ 0s )) ∪ ((((bday‘𝑇) +no (bday‘𝐵)) ∪ ((bday‘𝑅) +no (bday‘𝑆))) ∪ (((bday‘𝑇) +no (bday‘𝑆)) ∪ ((bday‘𝑅) +no (bday‘𝐵))))) ∈ (((bday‘𝐴) +no (bday‘𝐵)) ∪ ((((bday‘𝐶) +no (bday‘𝐸)) ∪ ((bday‘𝐷) +no (bday‘𝐹))) ∪ (((bday‘𝐶) +no (bday‘𝐹)) ∪ ((bday‘𝐷) +no (bday‘𝐸))))))
1027, 41, 41, 42, 43, 10, 2, 101mulsproplem1 28511 . . . . . . . . . 10 (𝜑 → (( 0s ·s 0s ) ∈ No ∧ ((𝑇 <s 𝑅 ∧ 𝐵 <s 𝑆) → ((𝑇 ·s 𝑆) −s (𝑇 ·s 𝐵)) <s ((𝑅 ·s 𝑆) −s (𝑅 ·s 𝐵)))))
103102simprd 501 . . . . . . . . 9 (𝜑 → ((𝑇 <s 𝑅 ∧ 𝐵 <s 𝑆) → ((𝑇 ·s 𝑆) −s (𝑇 ·s 𝐵)) <s ((𝑅 ·s 𝑆) −s (𝑅 ·s 𝐵))))
10434, 39, 103mp2and 712 . . . . . . . 8 (𝜑 → ((𝑇 ·s 𝑆) −s (𝑇 ·s 𝐵)) <s ((𝑅 ·s 𝑆) −s (𝑅 ·s 𝐵)))
10523, 21, 16, 11ltsubsubs2bd 28479 . . . . . . . . 9 (𝜑 → (((𝑇 ·s 𝑆) −s (𝑇 ·s 𝐵)) <s ((𝑅 ·s 𝑆) −s (𝑅 ·s 𝐵)) ↔ ((𝑅 ·s 𝐵) −s (𝑅 ·s 𝑆)) <s ((𝑇 ·s 𝐵) −s (𝑇 ·s 𝑆))))
10611, 16subscld 28458 . . . . . . . . . 10 (𝜑 → ((𝑅 ·s 𝐵) −s (𝑅 ·s 𝑆)) ∈ No)
10721, 23subscld 28458 . . . . . . . . . 10 (𝜑 → ((𝑇 ·s 𝐵) −s (𝑇 ·s 𝑆)) ∈ No)
108106, 107, 14ltadds1d 28393 . . . . . . . . 9 (𝜑 → (((𝑅 ·s 𝐵) −s (𝑅 ·s 𝑆)) <s ((𝑇 ·s 𝐵) −s (𝑇 ·s 𝑆)) ↔ (((𝑅 ·s 𝐵) −s (𝑅 ·s 𝑆)) +s (𝐴 ·s 𝑆)) <s (((𝑇 ·s 𝐵) −s (𝑇 ·s 𝑆)) +s (𝐴 ·s 𝑆))))
109105, 108bitrd 282 . . . . . . . 8 (𝜑 → (((𝑇 ·s 𝑆) −s (𝑇 ·s 𝐵)) <s ((𝑅 ·s 𝑆) −s (𝑅 ·s 𝐵)) ↔ (((𝑅 ·s 𝐵) −s (𝑅 ·s 𝑆)) +s (𝐴 ·s 𝑆)) <s (((𝑇 ·s 𝐵) −s (𝑇 ·s 𝑆)) +s (𝐴 ·s 𝑆))))
110104, 109mpbid 235 . . . . . . 7 (𝜑 → (((𝑅 ·s 𝐵) −s (𝑅 ·s 𝑆)) +s (𝐴 ·s 𝑆)) <s (((𝑇 ·s 𝐵) −s (𝑇 ·s 𝑆)) +s (𝐴 ·s 𝑆)))
11111, 14, 16addsubsd 28477 . . . . . . 7 (𝜑 → (((𝑅 ·s 𝐵) +s (𝐴 ·s 𝑆)) −s (𝑅 ·s 𝑆)) = (((𝑅 ·s 𝐵) −s (𝑅 ·s 𝑆)) +s (𝐴 ·s 𝑆)))
11221, 14, 23addsubsd 28477 . . . . . . 7 (𝜑 → (((𝑇 ·s 𝐵) +s (𝐴 ·s 𝑆)) −s (𝑇 ·s 𝑆)) = (((𝑇 ·s 𝐵) −s (𝑇 ·s 𝑆)) +s (𝐴 ·s 𝑆)))
113110, 111, 1123brtr4d 5136 . . . . . 6 (𝜑 → (((𝑅 ·s 𝐵) +s (𝐴 ·s 𝑆)) −s (𝑅 ·s 𝑆)) <s (((𝑇 ·s 𝐵) +s (𝐴 ·s 𝑆)) −s (𝑇 ·s 𝑆)))
114113adantr 486 . . . . 5 ((𝜑 ∧ 𝑆 <s 𝑈) → (((𝑅 ·s 𝐵) +s (𝐴 ·s 𝑆)) −s (𝑅 ·s 𝑆)) <s (((𝑇 ·s 𝐵) +s (𝐴 ·s 𝑆)) −s (𝑇 ·s 𝑆)))
115 sltsleft 28255 . . . . . . . . . . 11 (𝐴 ∈ No → (L‘𝐴) <<s {𝐴})
11612, 115syl 18 . . . . . . . . . 10 (𝜑 → (L‘𝐴) <<s {𝐴})
117 snidg 4617 . . . . . . . . . . 11 (𝐴 ∈ No → 𝐴 ∈ {𝐴})
11812, 117syl 18 . . . . . . . . . 10 (𝜑 → 𝐴 ∈ {𝐴})
119116, 19, 118sltssepcd 28167 . . . . . . . . 9 (𝜑 → 𝑇 <s 𝐴)
12049uneq1i 4162 . . . . . . . . . . . . 13 (((bday‘ 0s ) +no (bday‘ 0s )) ∪ ((((bday‘𝑇) +no (bday‘𝑆)) ∪ ((bday‘𝐴) +no (bday‘𝑈))) ∪ (((bday‘𝑇) +no (bday‘𝑈)) ∪ ((bday‘𝐴) +no (bday‘𝑆))))) = (∅ ∪ ((((bday‘𝑇) +no (bday‘𝑆)) ∪ ((bday‘𝐴) +no (bday‘𝑈))) ∪ (((bday‘𝑇) +no (bday‘𝑈)) ∪ ((bday‘𝐴) +no (bday‘𝑆)))))
121 0un 4345 . . . . . . . . . . . . 13 (∅ ∪ ((((bday‘𝑇) +no (bday‘𝑆)) ∪ ((bday‘𝐴) +no (bday‘𝑈))) ∪ (((bday‘𝑇) +no (bday‘𝑈)) ∪ ((bday‘𝐴) +no (bday‘𝑆))))) = ((((bday‘𝑇) +no (bday‘𝑆)) ∪ ((bday‘𝐴) +no (bday‘𝑈))) ∪ (((bday‘𝑇) +no (bday‘𝑈)) ∪ ((bday‘𝐴) +no (bday‘𝑆))))
122120, 121eqtri 2783 . . . . . . . . . . . 12 (((bday‘ 0s ) +no (bday‘ 0s )) ∪ ((((bday‘𝑇) +no (bday‘𝑆)) ∪ ((bday‘𝐴) +no (bday‘𝑈))) ∪ (((bday‘𝑇) +no (bday‘𝑈)) ∪ ((bday‘𝐴) +no (bday‘𝑆))))) = ((((bday‘𝑇) +no (bday‘𝑆)) ∪ ((bday‘𝐴) +no (bday‘𝑈))) ∪ (((bday‘𝑇) +no (bday‘𝑈)) ∪ ((bday‘𝐴) +no (bday‘𝑆))))
123 oldbdayim 28284 . . . . . . . . . . . . . . . . 17 (𝑈 ∈ (O‘(bday‘𝐵)) → (bday‘𝑈) ∈ (bday‘𝐵))
12426, 123syl 18 . . . . . . . . . . . . . . . 16 (𝜑 → (bday‘𝑈) ∈ (bday‘𝐵))
125 bdayon 28147 . . . . . . . . . . . . . . . . 17 (bday‘𝑈) ∈ On
126 naddel2 8705 . . . . . . . . . . . . . . . . 17 (((bday‘𝑈) ∈ On ∧ (bday‘𝐵) ∈ On ∧ (bday‘𝐴) ∈ On) → ((bday‘𝑈) ∈ (bday‘𝐵) ↔ ((bday‘𝐴) +no (bday‘𝑈)) ∈ ((bday‘𝐴) +no (bday‘𝐵))))
127125, 57, 56, 126mp3an 1490 . . . . . . . . . . . . . . . 16 ((bday‘𝑈) ∈ (bday‘𝐵) ↔ ((bday‘𝐴) +no (bday‘𝑈)) ∈ ((bday‘𝐴) +no (bday‘𝐵)))
128124, 127sylib 221 . . . . . . . . . . . . . . 15 (𝜑 → ((bday‘𝐴) +no (bday‘𝑈)) ∈ ((bday‘𝐴) +no (bday‘𝐵)))
12971, 128jca 521 . . . . . . . . . . . . . 14 (𝜑 → (((bday‘𝑇) +no (bday‘𝑆)) ∈ ((bday‘𝐴) +no (bday‘𝐵)) ∧ ((bday‘𝐴) +no (bday‘𝑈)) ∈ ((bday‘𝐴) +no (bday‘𝐵))))
130 naddel12 8717 . . . . . . . . . . . . . . . . 17 (((bday‘𝐴) ∈ On ∧ (bday‘𝐵) ∈ On) → (((bday‘𝑇) ∈ (bday‘𝐴) ∧ (bday‘𝑈) ∈ (bday‘𝐵)) → ((bday‘𝑇) +no (bday‘𝑈)) ∈ ((bday‘𝐴) +no (bday‘𝐵))))
13156, 57, 130mp2an 705 . . . . . . . . . . . . . . . 16 (((bday‘𝑇) ∈ (bday‘𝐴) ∧ (bday‘𝑈) ∈ (bday‘𝐵)) → ((bday‘𝑇) +no (bday‘𝑈)) ∈ ((bday‘𝐴) +no (bday‘𝐵)))
13254, 124, 131syl2anc 596 . . . . . . . . . . . . . . 15 (𝜑 → ((bday‘𝑇) +no (bday‘𝑈)) ∈ ((bday‘𝐴) +no (bday‘𝐵)))
133 naddel2 8705 . . . . . . . . . . . . . . . . 17 (((bday‘𝑆) ∈ On ∧ (bday‘𝐵) ∈ On ∧ (bday‘𝐴) ∈ On) → ((bday‘𝑆) ∈ (bday‘𝐵) ↔ ((bday‘𝐴) +no (bday‘𝑆)) ∈ ((bday‘𝐴) +no (bday‘𝐵))))
13479, 57, 56, 133mp3an 1490 . . . . . . . . . . . . . . . 16 ((bday‘𝑆) ∈ (bday‘𝐵) ↔ ((bday‘𝐴) +no (bday‘𝑆)) ∈ ((bday‘𝐴) +no (bday‘𝐵)))
13564, 134sylib 221 . . . . . . . . . . . . . . 15 (𝜑 → ((bday‘𝐴) +no (bday‘𝑆)) ∈ ((bday‘𝐴) +no (bday‘𝐵)))
136132, 135jca 521 . . . . . . . . . . . . . 14 (𝜑 → (((bday‘𝑇) +no (bday‘𝑈)) ∈ ((bday‘𝐴) +no (bday‘𝐵)) ∧ ((bday‘𝐴) +no (bday‘𝑆)) ∈ ((bday‘𝐴) +no (bday‘𝐵))))
137 naddcl 8693 . . . . . . . . . . . . . . . . . 18 (((bday‘𝐴) ∈ On ∧ (bday‘𝑈) ∈ On) → ((bday‘𝐴) +no (bday‘𝑈)) ∈ On)
13856, 125, 137mp2an 705 . . . . . . . . . . . . . . . . 17 ((bday‘𝐴) +no (bday‘𝑈)) ∈ On
13984, 138onun2i 6489 . . . . . . . . . . . . . . . 16 (((bday‘𝑇) +no (bday‘𝑆)) ∪ ((bday‘𝐴) +no (bday‘𝑈))) ∈ On
140 naddcl 8693 . . . . . . . . . . . . . . . . . 18 (((bday‘𝑇) ∈ On ∧ (bday‘𝑈) ∈ On) → ((bday‘𝑇) +no (bday‘𝑈)) ∈ On)
14155, 125, 140mp2an 705 . . . . . . . . . . . . . . . . 17 ((bday‘𝑇) +no (bday‘𝑈)) ∈ On
142 naddcl 8693 . . . . . . . . . . . . . . . . . 18 (((bday‘𝐴) ∈ On ∧ (bday‘𝑆) ∈ On) → ((bday‘𝐴) +no (bday‘𝑆)) ∈ On)
14356, 79, 142mp2an 705 . . . . . . . . . . . . . . . . 17 ((bday‘𝐴) +no (bday‘𝑆)) ∈ On
144141, 143onun2i 6489 . . . . . . . . . . . . . . . 16 (((bday‘𝑇) +no (bday‘𝑈)) ∪ ((bday‘𝐴) +no (bday‘𝑆))) ∈ On
145 onunel 6473 . . . . . . . . . . . . . . . 16 (((((bday‘𝑇) +no (bday‘𝑆)) ∪ ((bday‘𝐴) +no (bday‘𝑈))) ∈ On ∧ (((bday‘𝑇) +no (bday‘𝑈)) ∪ ((bday‘𝐴) +no (bday‘𝑆))) ∈ On ∧ ((bday‘𝐴) +no (bday‘𝐵)) ∈ On) → (((((bday‘𝑇) +no (bday‘𝑆)) ∪ ((bday‘𝐴) +no (bday‘𝑈))) ∪ (((bday‘𝑇) +no (bday‘𝑈)) ∪ ((bday‘𝐴) +no (bday‘𝑆)))) ∈ ((bday‘𝐴) +no (bday‘𝐵)) ↔ ((((bday‘𝑇) +no (bday‘𝑆)) ∪ ((bday‘𝐴) +no (bday‘𝑈))) ∈ ((bday‘𝐴) +no (bday‘𝐵)) ∧ (((bday‘𝑇) +no (bday‘𝑈)) ∪ ((bday‘𝐴) +no (bday‘𝑆))) ∈ ((bday‘𝐴) +no (bday‘𝐵)))))
146139, 144, 89, 145mp3an 1490 . . . . . . . . . . . . . . 15 (((((bday‘𝑇) +no (bday‘𝑆)) ∪ ((bday‘𝐴) +no (bday‘𝑈))) ∪ (((bday‘𝑇) +no (bday‘𝑈)) ∪ ((bday‘𝐴) +no (bday‘𝑆)))) ∈ ((bday‘𝐴) +no (bday‘𝐵)) ↔ ((((bday‘𝑇) +no (bday‘𝑆)) ∪ ((bday‘𝐴) +no (bday‘𝑈))) ∈ ((bday‘𝐴) +no (bday‘𝐵)) ∧ (((bday‘𝑇) +no (bday‘𝑈)) ∪ ((bday‘𝐴) +no (bday‘𝑆))) ∈ ((bday‘𝐴) +no (bday‘𝐵))))
147 onunel 6473 . . . . . . . . . . . . . . . . 17 ((((bday‘𝑇) +no (bday‘𝑆)) ∈ On ∧ ((bday‘𝐴) +no (bday‘𝑈)) ∈ On ∧ ((bday‘𝐴) +no (bday‘𝐵)) ∈ On) → ((((bday‘𝑇) +no (bday‘𝑆)) ∪ ((bday‘𝐴) +no (bday‘𝑈))) ∈ ((bday‘𝐴) +no (bday‘𝐵)) ↔ (((bday‘𝑇) +no (bday‘𝑆)) ∈ ((bday‘𝐴) +no (bday‘𝐵)) ∧ ((bday‘𝐴) +no (bday‘𝑈)) ∈ ((bday‘𝐴) +no (bday‘𝐵)))))
14884, 138, 89, 147mp3an 1490 . . . . . . . . . . . . . . . 16 ((((bday‘𝑇) +no (bday‘𝑆)) ∪ ((bday‘𝐴) +no (bday‘𝑈))) ∈ ((bday‘𝐴) +no (bday‘𝐵)) ↔ (((bday‘𝑇) +no (bday‘𝑆)) ∈ ((bday‘𝐴) +no (bday‘𝐵)) ∧ ((bday‘𝐴) +no (bday‘𝑈)) ∈ ((bday‘𝐴) +no (bday‘𝐵))))
149 onunel 6473 . . . . . . . . . . . . . . . . 17 ((((bday‘𝑇) +no (bday‘𝑈)) ∈ On ∧ ((bday‘𝐴) +no (bday‘𝑆)) ∈ On ∧ ((bday‘𝐴) +no (bday‘𝐵)) ∈ On) → ((((bday‘𝑇) +no (bday‘𝑈)) ∪ ((bday‘𝐴) +no (bday‘𝑆))) ∈ ((bday‘𝐴) +no (bday‘𝐵)) ↔ (((bday‘𝑇) +no (bday‘𝑈)) ∈ ((bday‘𝐴) +no (bday‘𝐵)) ∧ ((bday‘𝐴) +no (bday‘𝑆)) ∈ ((bday‘𝐴) +no (bday‘𝐵)))))
150141, 143, 89, 149mp3an 1490 . . . . . . . . . . . . . . . 16 ((((bday‘𝑇) +no (bday‘𝑈)) ∪ ((bday‘𝐴) +no (bday‘𝑆))) ∈ ((bday‘𝐴) +no (bday‘𝐵)) ↔ (((bday‘𝑇) +no (bday‘𝑈)) ∈ ((bday‘𝐴) +no (bday‘𝐵)) ∧ ((bday‘𝐴) +no (bday‘𝑆)) ∈ ((bday‘𝐴) +no (bday‘𝐵))))
151148, 150anbi12i 640 . . . . . . . . . . . . . . 15 (((((bday‘𝑇) +no (bday‘𝑆)) ∪ ((bday‘𝐴) +no (bday‘𝑈))) ∈ ((bday‘𝐴) +no (bday‘𝐵)) ∧ (((bday‘𝑇) +no (bday‘𝑈)) ∪ ((bday‘𝐴) +no (bday‘𝑆))) ∈ ((bday‘𝐴) +no (bday‘𝐵))) ↔ ((((bday‘𝑇) +no (bday‘𝑆)) ∈ ((bday‘𝐴) +no (bday‘𝐵)) ∧ ((bday‘𝐴) +no (bday‘𝑈)) ∈ ((bday‘𝐴) +no (bday‘𝐵))) ∧ (((bday‘𝑇) +no (bday‘𝑈)) ∈ ((bday‘𝐴) +no (bday‘𝐵)) ∧ ((bday‘𝐴) +no (bday‘𝑆)) ∈ ((bday‘𝐴) +no (bday‘𝐵)))))
152146, 151bitri 278 . . . . . . . . . . . . . 14 (((((bday‘𝑇) +no (bday‘𝑆)) ∪ ((bday‘𝐴) +no (bday‘𝑈))) ∪ (((bday‘𝑇) +no (bday‘𝑈)) ∪ ((bday‘𝐴) +no (bday‘𝑆)))) ∈ ((bday‘𝐴) +no (bday‘𝐵)) ↔ ((((bday‘𝑇) +no (bday‘𝑆)) ∈ ((bday‘𝐴) +no (bday‘𝐵)) ∧ ((bday‘𝐴) +no (bday‘𝑈)) ∈ ((bday‘𝐴) +no (bday‘𝐵))) ∧ (((bday‘𝑇) +no (bday‘𝑈)) ∈ ((bday‘𝐴) +no (bday‘𝐵)) ∧ ((bday‘𝐴) +no (bday‘𝑆)) ∈ ((bday‘𝐴) +no (bday‘𝐵)))))
153129, 136, 152sylanbrc 595 . . . . . . . . . . . . 13 (𝜑 → ((((bday‘𝑇) +no (bday‘𝑆)) ∪ ((bday‘𝐴) +no (bday‘𝑈))) ∪ (((bday‘𝑇) +no (bday‘𝑈)) ∪ ((bday‘𝐴) +no (bday‘𝑆)))) ∈ ((bday‘𝐴) +no (bday‘𝐵)))
154 elun1 4179 . . . . . . . . . . . . 13 (((((bday‘𝑇) +no (bday‘𝑆)) ∪ ((bday‘𝐴) +no (bday‘𝑈))) ∪ (((bday‘𝑇) +no (bday‘𝑈)) ∪ ((bday‘𝐴) +no (bday‘𝑆)))) ∈ ((bday‘𝐴) +no (bday‘𝐵)) → ((((bday‘𝑇) +no (bday‘𝑆)) ∪ ((bday‘𝐴) +no (bday‘𝑈))) ∪ (((bday‘𝑇) +no (bday‘𝑈)) ∪ ((bday‘𝐴) +no (bday‘𝑆)))) ∈ (((bday‘𝐴) +no (bday‘𝐵)) ∪ ((((bday‘𝐶) +no (bday‘𝐸)) ∪ ((bday‘𝐷) +no (bday‘𝐹))) ∪ (((bday‘𝐶) +no (bday‘𝐹)) ∪ ((bday‘𝐷) +no (bday‘𝐸))))))
155153, 154syl 18 . . . . . . . . . . . 12 (𝜑 → ((((bday‘𝑇) +no (bday‘𝑆)) ∪ ((bday‘𝐴) +no (bday‘𝑈))) ∪ (((bday‘𝑇) +no (bday‘𝑈)) ∪ ((bday‘𝐴) +no (bday‘𝑆)))) ∈ (((bday‘𝐴) +no (bday‘𝐵)) ∪ ((((bday‘𝐶) +no (bday‘𝐸)) ∪ ((bday‘𝐷) +no (bday‘𝐹))) ∪ (((bday‘𝐶) +no (bday‘𝐹)) ∪ ((bday‘𝐷) +no (bday‘𝐸))))))
156122, 155eqeltrid 2864 . . . . . . . . . . 11 (𝜑 → (((bday‘ 0s ) +no (bday‘ 0s )) ∪ ((((bday‘𝑇) +no (bday‘𝑆)) ∪ ((bday‘𝐴) +no (bday‘𝑈))) ∪ (((bday‘𝑇) +no (bday‘𝑈)) ∪ ((bday‘𝐴) +no (bday‘𝑆))))) ∈ (((bday‘𝐴) +no (bday‘𝐵)) ∪ ((((bday‘𝐶) +no (bday‘𝐸)) ∪ ((bday‘𝐷) +no (bday‘𝐹))) ∪ (((bday‘𝐶) +no (bday‘𝐹)) ∪ ((bday‘𝐷) +no (bday‘𝐸))))))
1577, 41, 41, 42, 12, 2, 4, 156mulsproplem1 28511 . . . . . . . . . 10 (𝜑 → (( 0s ·s 0s ) ∈ No ∧ ((𝑇 <s 𝐴 ∧ 𝑆 <s 𝑈) → ((𝑇 ·s 𝑈) −s (𝑇 ·s 𝑆)) <s ((𝐴 ·s 𝑈) −s (𝐴 ·s 𝑆)))))
158157simprd 501 . . . . . . . . 9 (𝜑 → ((𝑇 <s 𝐴 ∧ 𝑆 <s 𝑈) → ((𝑇 ·s 𝑈) −s (𝑇 ·s 𝑆)) <s ((𝐴 ·s 𝑈) −s (𝐴 ·s 𝑆))))
159119, 158mpand 708 . . . . . . . 8 (𝜑 → (𝑆 <s 𝑈 → ((𝑇 ·s 𝑈) −s (𝑇 ·s 𝑆)) <s ((𝐴 ·s 𝑈) −s (𝐴 ·s 𝑆))))
160159imp 412 . . . . . . 7 ((𝜑 ∧ 𝑆 <s 𝑈) → ((𝑇 ·s 𝑈) −s (𝑇 ·s 𝑆)) <s ((𝐴 ·s 𝑈) −s (𝐴 ·s 𝑆)))
16129, 27, 23, 14ltsubsubs3bd 28480 . . . . . . . . 9 (𝜑 → (((𝑇 ·s 𝑈) −s (𝑇 ·s 𝑆)) <s ((𝐴 ·s 𝑈) −s (𝐴 ·s 𝑆)) ↔ ((𝐴 ·s 𝑆) −s (𝑇 ·s 𝑆)) <s ((𝐴 ·s 𝑈) −s (𝑇 ·s 𝑈))))
16214, 23subscld 28458 . . . . . . . . . 10 (𝜑 → ((𝐴 ·s 𝑆) −s (𝑇 ·s 𝑆)) ∈ No)
16327, 29subscld 28458 . . . . . . . . . 10 (𝜑 → ((𝐴 ·s 𝑈) −s (𝑇 ·s 𝑈)) ∈ No)
164162, 163, 21ltadds2d 28392 . . . . . . . . 9 (𝜑 → (((𝐴 ·s 𝑆) −s (𝑇 ·s 𝑆)) <s ((𝐴 ·s 𝑈) −s (𝑇 ·s 𝑈)) ↔ ((𝑇 ·s 𝐵) +s ((𝐴 ·s 𝑆) −s (𝑇 ·s 𝑆))) <s ((𝑇 ·s 𝐵) +s ((𝐴 ·s 𝑈) −s (𝑇 ·s 𝑈)))))
165161, 164bitrd 282 . . . . . . . 8 (𝜑 → (((𝑇 ·s 𝑈) −s (𝑇 ·s 𝑆)) <s ((𝐴 ·s 𝑈) −s (𝐴 ·s 𝑆)) ↔ ((𝑇 ·s 𝐵) +s ((𝐴 ·s 𝑆) −s (𝑇 ·s 𝑆))) <s ((𝑇 ·s 𝐵) +s ((𝐴 ·s 𝑈) −s (𝑇 ·s 𝑈)))))
166165adantr 486 . . . . . . 7 ((𝜑 ∧ 𝑆 <s 𝑈) → (((𝑇 ·s 𝑈) −s (𝑇 ·s 𝑆)) <s ((𝐴 ·s 𝑈) −s (𝐴 ·s 𝑆)) ↔ ((𝑇 ·s 𝐵) +s ((𝐴 ·s 𝑆) −s (𝑇 ·s 𝑆))) <s ((𝑇 ·s 𝐵) +s ((𝐴 ·s 𝑈) −s (𝑇 ·s 𝑈)))))
167160, 166mpbid 235 . . . . . 6 ((𝜑 ∧ 𝑆 <s 𝑈) → ((𝑇 ·s 𝐵) +s ((𝐴 ·s 𝑆) −s (𝑇 ·s 𝑆))) <s ((𝑇 ·s 𝐵) +s ((𝐴 ·s 𝑈) −s (𝑇 ·s 𝑈))))
16821, 14, 23addsubsassd 28476 . . . . . . 7 (𝜑 → (((𝑇 ·s 𝐵) +s (𝐴 ·s 𝑆)) −s (𝑇 ·s 𝑆)) = ((𝑇 ·s 𝐵) +s ((𝐴 ·s 𝑆) −s (𝑇 ·s 𝑆))))
169168adantr 486 . . . . . 6 ((𝜑 ∧ 𝑆 <s 𝑈) → (((𝑇 ·s 𝐵) +s (𝐴 ·s 𝑆)) −s (𝑇 ·s 𝑆)) = ((𝑇 ·s 𝐵) +s ((𝐴 ·s 𝑆) −s (𝑇 ·s 𝑆))))
17021, 27, 29addsubsassd 28476 . . . . . . 7 (𝜑 → (((𝑇 ·s 𝐵) +s (𝐴 ·s 𝑈)) −s (𝑇 ·s 𝑈)) = ((𝑇 ·s 𝐵) +s ((𝐴 ·s 𝑈) −s (𝑇 ·s 𝑈))))
171170adantr 486 . . . . . 6 ((𝜑 ∧ 𝑆 <s 𝑈) → (((𝑇 ·s 𝐵) +s (𝐴 ·s 𝑈)) −s (𝑇 ·s 𝑈)) = ((𝑇 ·s 𝐵) +s ((𝐴 ·s 𝑈) −s (𝑇 ·s 𝑈))))
172167, 169, 1713brtr4d 5136 . . . . 5 ((𝜑 ∧ 𝑆 <s 𝑈) → (((𝑇 ·s 𝐵) +s (𝐴 ·s 𝑆)) −s (𝑇 ·s 𝑆)) <s (((𝑇 ·s 𝐵) +s (𝐴 ·s 𝑈)) −s (𝑇 ·s 𝑈)))
17318, 25, 31, 114, 172ltstrd 28129 . . . 4 ((𝜑 ∧ 𝑆 <s 𝑈) → (((𝑅 ·s 𝐵) +s (𝐴 ·s 𝑆)) −s (𝑅 ·s 𝑆)) <s (((𝑇 ·s 𝐵) +s (𝐴 ·s 𝑈)) −s (𝑇 ·s 𝑈)))
174173ex 418 . . 3 (𝜑 → (𝑆 <s 𝑈 → (((𝑅 ·s 𝐵) +s (𝐴 ·s 𝑆)) −s (𝑅 ·s 𝑆)) <s (((𝑇 ·s 𝐵) +s (𝐴 ·s 𝑈)) −s (𝑇 ·s 𝑈))))
17536, 38, 3sltssepcd 28167 . . . . . . 7 (𝜑 → 𝐵 <s 𝑈)
17649uneq1i 4162 . . . . . . . . . . 11 (((bday‘ 0s ) +no (bday‘ 0s )) ∪ ((((bday‘𝑇) +no (bday‘𝐵)) ∪ ((bday‘𝑅) +no (bday‘𝑈))) ∪ (((bday‘𝑇) +no (bday‘𝑈)) ∪ ((bday‘𝑅) +no (bday‘𝐵))))) = (∅ ∪ ((((bday‘𝑇) +no (bday‘𝐵)) ∪ ((bday‘𝑅) +no (bday‘𝑈))) ∪ (((bday‘𝑇) +no (bday‘𝑈)) ∪ ((bday‘𝑅) +no (bday‘𝐵)))))
177 0un 4345 . . . . . . . . . . 11 (∅ ∪ ((((bday‘𝑇) +no (bday‘𝐵)) ∪ ((bday‘𝑅) +no (bday‘𝑈))) ∪ (((bday‘𝑇) +no (bday‘𝑈)) ∪ ((bday‘𝑅) +no (bday‘𝐵))))) = ((((bday‘𝑇) +no (bday‘𝐵)) ∪ ((bday‘𝑅) +no (bday‘𝑈))) ∪ (((bday‘𝑇) +no (bday‘𝑈)) ∪ ((bday‘𝑅) +no (bday‘𝐵))))
178176, 177eqtri 2783 . . . . . . . . . 10 (((bday‘ 0s ) +no (bday‘ 0s )) ∪ ((((bday‘𝑇) +no (bday‘𝐵)) ∪ ((bday‘𝑅) +no (bday‘𝑈))) ∪ (((bday‘𝑇) +no (bday‘𝑈)) ∪ ((bday‘𝑅) +no (bday‘𝐵))))) = ((((bday‘𝑇) +no (bday‘𝐵)) ∪ ((bday‘𝑅) +no (bday‘𝑈))) ∪ (((bday‘𝑇) +no (bday‘𝑈)) ∪ ((bday‘𝑅) +no (bday‘𝐵))))
179 naddel12 8717 . . . . . . . . . . . . . . 15 (((bday‘𝐴) ∈ On ∧ (bday‘𝐵) ∈ On) → (((bday‘𝑅) ∈ (bday‘𝐴) ∧ (bday‘𝑈) ∈ (bday‘𝐵)) → ((bday‘𝑅) +no (bday‘𝑈)) ∈ ((bday‘𝐴) +no (bday‘𝐵))))
18056, 57, 179mp2an 705 . . . . . . . . . . . . . 14 (((bday‘𝑅) ∈ (bday‘𝐴) ∧ (bday‘𝑈) ∈ (bday‘𝐵)) → ((bday‘𝑅) +no (bday‘𝑈)) ∈ ((bday‘𝐴) +no (bday‘𝐵)))
18162, 124, 180syl2anc 596 . . . . . . . . . . . . 13 (𝜑 → ((bday‘𝑅) +no (bday‘𝑈)) ∈ ((bday‘𝐴) +no (bday‘𝐵)))
18260, 181jca 521 . . . . . . . . . . . 12 (𝜑 → (((bday‘𝑇) +no (bday‘𝐵)) ∈ ((bday‘𝐴) +no (bday‘𝐵)) ∧ ((bday‘𝑅) +no (bday‘𝑈)) ∈ ((bday‘𝐴) +no (bday‘𝐵))))
183132, 75jca 521 . . . . . . . . . . . 12 (𝜑 → (((bday‘𝑇) +no (bday‘𝑈)) ∈ ((bday‘𝐴) +no (bday‘𝐵)) ∧ ((bday‘𝑅) +no (bday‘𝐵)) ∈ ((bday‘𝐴) +no (bday‘𝐵))))
184 naddcl 8693 . . . . . . . . . . . . . . . 16 (((bday‘𝑅) ∈ On ∧ (bday‘𝑈) ∈ On) → ((bday‘𝑅) +no (bday‘𝑈)) ∈ On)
18572, 125, 184mp2an 705 . . . . . . . . . . . . . . 15 ((bday‘𝑅) +no (bday‘𝑈)) ∈ On
18678, 185onun2i 6489 . . . . . . . . . . . . . 14 (((bday‘𝑇) +no (bday‘𝐵)) ∪ ((bday‘𝑅) +no (bday‘𝑈))) ∈ On
187141, 86onun2i 6489 . . . . . . . . . . . . . 14 (((bday‘𝑇) +no (bday‘𝑈)) ∪ ((bday‘𝑅) +no (bday‘𝐵))) ∈ On
188 onunel 6473 . . . . . . . . . . . . . 14 (((((bday‘𝑇) +no (bday‘𝐵)) ∪ ((bday‘𝑅) +no (bday‘𝑈))) ∈ On ∧ (((bday‘𝑇) +no (bday‘𝑈)) ∪ ((bday‘𝑅) +no (bday‘𝐵))) ∈ On ∧ ((bday‘𝐴) +no (bday‘𝐵)) ∈ On) → (((((bday‘𝑇) +no (bday‘𝐵)) ∪ ((bday‘𝑅) +no (bday‘𝑈))) ∪ (((bday‘𝑇) +no (bday‘𝑈)) ∪ ((bday‘𝑅) +no (bday‘𝐵)))) ∈ ((bday‘𝐴) +no (bday‘𝐵)) ↔ ((((bday‘𝑇) +no (bday‘𝐵)) ∪ ((bday‘𝑅) +no (bday‘𝑈))) ∈ ((bday‘𝐴) +no (bday‘𝐵)) ∧ (((bday‘𝑇) +no (bday‘𝑈)) ∪ ((bday‘𝑅) +no (bday‘𝐵))) ∈ ((bday‘𝐴) +no (bday‘𝐵)))))
189186, 187, 89, 188mp3an 1490 . . . . . . . . . . . . 13 (((((bday‘𝑇) +no (bday‘𝐵)) ∪ ((bday‘𝑅) +no (bday‘𝑈))) ∪ (((bday‘𝑇) +no (bday‘𝑈)) ∪ ((bday‘𝑅) +no (bday‘𝐵)))) ∈ ((bday‘𝐴) +no (bday‘𝐵)) ↔ ((((bday‘𝑇) +no (bday‘𝐵)) ∪ ((bday‘𝑅) +no (bday‘𝑈))) ∈ ((bday‘𝐴) +no (bday‘𝐵)) ∧ (((bday‘𝑇) +no (bday‘𝑈)) ∪ ((bday‘𝑅) +no (bday‘𝐵))) ∈ ((bday‘𝐴) +no (bday‘𝐵))))
190 onunel 6473 . . . . . . . . . . . . . . 15 ((((bday‘𝑇) +no (bday‘𝐵)) ∈ On ∧ ((bday‘𝑅) +no (bday‘𝑈)) ∈ On ∧ ((bday‘𝐴) +no (bday‘𝐵)) ∈ On) → ((((bday‘𝑇) +no (bday‘𝐵)) ∪ ((bday‘𝑅) +no (bday‘𝑈))) ∈ ((bday‘𝐴) +no (bday‘𝐵)) ↔ (((bday‘𝑇) +no (bday‘𝐵)) ∈ ((bday‘𝐴) +no (bday‘𝐵)) ∧ ((bday‘𝑅) +no (bday‘𝑈)) ∈ ((bday‘𝐴) +no (bday‘𝐵)))))
19178, 185, 89, 190mp3an 1490 . . . . . . . . . . . . . 14 ((((bday‘𝑇) +no (bday‘𝐵)) ∪ ((bday‘𝑅) +no (bday‘𝑈))) ∈ ((bday‘𝐴) +no (bday‘𝐵)) ↔ (((bday‘𝑇) +no (bday‘𝐵)) ∈ ((bday‘𝐴) +no (bday‘𝐵)) ∧ ((bday‘𝑅) +no (bday‘𝑈)) ∈ ((bday‘𝐴) +no (bday‘𝐵))))
192 onunel 6473 . . . . . . . . . . . . . . 15 ((((bday‘𝑇) +no (bday‘𝑈)) ∈ On ∧ ((bday‘𝑅) +no (bday‘𝐵)) ∈ On ∧ ((bday‘𝐴) +no (bday‘𝐵)) ∈ On) → ((((bday‘𝑇) +no (bday‘𝑈)) ∪ ((bday‘𝑅) +no (bday‘𝐵))) ∈ ((bday‘𝐴) +no (bday‘𝐵)) ↔ (((bday‘𝑇) +no (bday‘𝑈)) ∈ ((bday‘𝐴) +no (bday‘𝐵)) ∧ ((bday‘𝑅) +no (bday‘𝐵)) ∈ ((bday‘𝐴) +no (bday‘𝐵)))))
193141, 86, 89, 192mp3an 1490 . . . . . . . . . . . . . 14 ((((bday‘𝑇) +no (bday‘𝑈)) ∪ ((bday‘𝑅) +no (bday‘𝐵))) ∈ ((bday‘𝐴) +no (bday‘𝐵)) ↔ (((bday‘𝑇) +no (bday‘𝑈)) ∈ ((bday‘𝐴) +no (bday‘𝐵)) ∧ ((bday‘𝑅) +no (bday‘𝐵)) ∈ ((bday‘𝐴) +no (bday‘𝐵))))
194191, 193anbi12i 640 . . . . . . . . . . . . 13 (((((bday‘𝑇) +no (bday‘𝐵)) ∪ ((bday‘𝑅) +no (bday‘𝑈))) ∈ ((bday‘𝐴) +no (bday‘𝐵)) ∧ (((bday‘𝑇) +no (bday‘𝑈)) ∪ ((bday‘𝑅) +no (bday‘𝐵))) ∈ ((bday‘𝐴) +no (bday‘𝐵))) ↔ ((((bday‘𝑇) +no (bday‘𝐵)) ∈ ((bday‘𝐴) +no (bday‘𝐵)) ∧ ((bday‘𝑅) +no (bday‘𝑈)) ∈ ((bday‘𝐴) +no (bday‘𝐵))) ∧ (((bday‘𝑇) +no (bday‘𝑈)) ∈ ((bday‘𝐴) +no (bday‘𝐵)) ∧ ((bday‘𝑅) +no (bday‘𝐵)) ∈ ((bday‘𝐴) +no (bday‘𝐵)))))
195189, 194bitri 278 . . . . . . . . . . . 12 (((((bday‘𝑇) +no (bday‘𝐵)) ∪ ((bday‘𝑅) +no (bday‘𝑈))) ∪ (((bday‘𝑇) +no (bday‘𝑈)) ∪ ((bday‘𝑅) +no (bday‘𝐵)))) ∈ ((bday‘𝐴) +no (bday‘𝐵)) ↔ ((((bday‘𝑇) +no (bday‘𝐵)) ∈ ((bday‘𝐴) +no (bday‘𝐵)) ∧ ((bday‘𝑅) +no (bday‘𝑈)) ∈ ((bday‘𝐴) +no (bday‘𝐵))) ∧ (((bday‘𝑇) +no (bday‘𝑈)) ∈ ((bday‘𝐴) +no (bday‘𝐵)) ∧ ((bday‘𝑅) +no (bday‘𝐵)) ∈ ((bday‘𝐴) +no (bday‘𝐵)))))
196182, 183, 195sylanbrc 595 . . . . . . . . . . 11 (𝜑 → ((((bday‘𝑇) +no (bday‘𝐵)) ∪ ((bday‘𝑅) +no (bday‘𝑈))) ∪ (((bday‘𝑇) +no (bday‘𝑈)) ∪ ((bday‘𝑅) +no (bday‘𝐵)))) ∈ ((bday‘𝐴) +no (bday‘𝐵)))
197 elun1 4179 . . . . . . . . . . 11 (((((bday‘𝑇) +no (bday‘𝐵)) ∪ ((bday‘𝑅) +no (bday‘𝑈))) ∪ (((bday‘𝑇) +no (bday‘𝑈)) ∪ ((bday‘𝑅) +no (bday‘𝐵)))) ∈ ((bday‘𝐴) +no (bday‘𝐵)) → ((((bday‘𝑇) +no (bday‘𝐵)) ∪ ((bday‘𝑅) +no (bday‘𝑈))) ∪ (((bday‘𝑇) +no (bday‘𝑈)) ∪ ((bday‘𝑅) +no (bday‘𝐵)))) ∈ (((bday‘𝐴) +no (bday‘𝐵)) ∪ ((((bday‘𝐶) +no (bday‘𝐸)) ∪ ((bday‘𝐷) +no (bday‘𝐹))) ∪ (((bday‘𝐶) +no (bday‘𝐹)) ∪ ((bday‘𝐷) +no (bday‘𝐸))))))
198196, 197syl 18 . . . . . . . . . 10 (𝜑 → ((((bday‘𝑇) +no (bday‘𝐵)) ∪ ((bday‘𝑅) +no (bday‘𝑈))) ∪ (((bday‘𝑇) +no (bday‘𝑈)) ∪ ((bday‘𝑅) +no (bday‘𝐵)))) ∈ (((bday‘𝐴) +no (bday‘𝐵)) ∪ ((((bday‘𝐶) +no (bday‘𝐸)) ∪ ((bday‘𝐷) +no (bday‘𝐹))) ∪ (((bday‘𝐶) +no (bday‘𝐹)) ∪ ((bday‘𝐷) +no (bday‘𝐸))))))
199178, 198eqeltrid 2864 . . . . . . . . 9 (𝜑 → (((bday‘ 0s ) +no (bday‘ 0s )) ∪ ((((bday‘𝑇) +no (bday‘𝐵)) ∪ ((bday‘𝑅) +no (bday‘𝑈))) ∪ (((bday‘𝑇) +no (bday‘𝑈)) ∪ ((bday‘𝑅) +no (bday‘𝐵))))) ∈ (((bday‘𝐴) +no (bday‘𝐵)) ∪ ((((bday‘𝐶) +no (bday‘𝐸)) ∪ ((bday‘𝐷) +no (bday‘𝐹))) ∪ (((bday‘𝐶) +no (bday‘𝐹)) ∪ ((bday‘𝐷) +no (bday‘𝐸))))))
2007, 41, 41, 42, 43, 10, 4, 199mulsproplem1 28511 . . . . . . . 8 (𝜑 → (( 0s ·s 0s ) ∈ No ∧ ((𝑇 <s 𝑅 ∧ 𝐵 <s 𝑈) → ((𝑇 ·s 𝑈) −s (𝑇 ·s 𝐵)) <s ((𝑅 ·s 𝑈) −s (𝑅 ·s 𝐵)))))
201200simprd 501 . . . . . . 7 (𝜑 → ((𝑇 <s 𝑅 ∧ 𝐵 <s 𝑈) → ((𝑇 ·s 𝑈) −s (𝑇 ·s 𝐵)) <s ((𝑅 ·s 𝑈) −s (𝑅 ·s 𝐵))))
20234, 175, 201mp2and 712 . . . . . 6 (𝜑 → ((𝑇 ·s 𝑈) −s (𝑇 ·s 𝐵)) <s ((𝑅 ·s 𝑈) −s (𝑅 ·s 𝐵)))
2037, 9, 26mulsproplem4 28514 . . . . . . . 8 (𝜑 → (𝑅 ·s 𝑈) ∈ No)
20429, 21, 203, 11ltsubsubs2bd 28479 . . . . . . 7 (𝜑 → (((𝑇 ·s 𝑈) −s (𝑇 ·s 𝐵)) <s ((𝑅 ·s 𝑈) −s (𝑅 ·s 𝐵)) ↔ ((𝑅 ·s 𝐵) −s (𝑅 ·s 𝑈)) <s ((𝑇 ·s 𝐵) −s (𝑇 ·s 𝑈))))
20511, 203subscld 28458 . . . . . . . 8 (𝜑 → ((𝑅 ·s 𝐵) −s (𝑅 ·s 𝑈)) ∈ No)
20621, 29subscld 28458 . . . . . . . 8 (𝜑 → ((𝑇 ·s 𝐵) −s (𝑇 ·s 𝑈)) ∈ No)
207205, 206, 27ltadds1d 28393 . . . . . . 7 (𝜑 → (((𝑅 ·s 𝐵) −s (𝑅 ·s 𝑈)) <s ((𝑇 ·s 𝐵) −s (𝑇 ·s 𝑈)) ↔ (((𝑅 ·s 𝐵) −s (𝑅 ·s 𝑈)) +s (𝐴 ·s 𝑈)) <s (((𝑇 ·s 𝐵) −s (𝑇 ·s 𝑈)) +s (𝐴 ·s 𝑈))))
208204, 207bitrd 282 . . . . . 6 (𝜑 → (((𝑇 ·s 𝑈) −s (𝑇 ·s 𝐵)) <s ((𝑅 ·s 𝑈) −s (𝑅 ·s 𝐵)) ↔ (((𝑅 ·s 𝐵) −s (𝑅 ·s 𝑈)) +s (𝐴 ·s 𝑈)) <s (((𝑇 ·s 𝐵) −s (𝑇 ·s 𝑈)) +s (𝐴 ·s 𝑈))))
209202, 208mpbid 235 . . . . 5 (𝜑 → (((𝑅 ·s 𝐵) −s (𝑅 ·s 𝑈)) +s (𝐴 ·s 𝑈)) <s (((𝑇 ·s 𝐵) −s (𝑇 ·s 𝑈)) +s (𝐴 ·s 𝑈)))
21011, 27, 203addsubsd 28477 . . . . 5 (𝜑 → (((𝑅 ·s 𝐵) +s (𝐴 ·s 𝑈)) −s (𝑅 ·s 𝑈)) = (((𝑅 ·s 𝐵) −s (𝑅 ·s 𝑈)) +s (𝐴 ·s 𝑈)))
21121, 27, 29addsubsd 28477 . . . . 5 (𝜑 → (((𝑇 ·s 𝐵) +s (𝐴 ·s 𝑈)) −s (𝑇 ·s 𝑈)) = (((𝑇 ·s 𝐵) −s (𝑇 ·s 𝑈)) +s (𝐴 ·s 𝑈)))
212209, 210, 2113brtr4d 5136 . . . 4 (𝜑 → (((𝑅 ·s 𝐵) +s (𝐴 ·s 𝑈)) −s (𝑅 ·s 𝑈)) <s (((𝑇 ·s 𝐵) +s (𝐴 ·s 𝑈)) −s (𝑇 ·s 𝑈)))
213 oveq2 7432 . . . . . . 7 (𝑆 = 𝑈 → (𝐴 ·s 𝑆) = (𝐴 ·s 𝑈))
214213oveq2d 7440 . . . . . 6 (𝑆 = 𝑈 → ((𝑅 ·s 𝐵) +s (𝐴 ·s 𝑆)) = ((𝑅 ·s 𝐵) +s (𝐴 ·s 𝑈)))
215 oveq2 7432 . . . . . 6 (𝑆 = 𝑈 → (𝑅 ·s 𝑆) = (𝑅 ·s 𝑈))
216214, 215oveq12d 7442 . . . . 5 (𝑆 = 𝑈 → (((𝑅 ·s 𝐵) +s (𝐴 ·s 𝑆)) −s (𝑅 ·s 𝑆)) = (((𝑅 ·s 𝐵) +s (𝐴 ·s 𝑈)) −s (𝑅 ·s 𝑈)))
217216breq1d 5112 . . . 4 (𝑆 = 𝑈 → ((((𝑅 ·s 𝐵) +s (𝐴 ·s 𝑆)) −s (𝑅 ·s 𝑆)) <s (((𝑇 ·s 𝐵) +s (𝐴 ·s 𝑈)) −s (𝑇 ·s 𝑈)) ↔ (((𝑅 ·s 𝐵) +s (𝐴 ·s 𝑈)) −s (𝑅 ·s 𝑈)) <s (((𝑇 ·s 𝐵) +s (𝐴 ·s 𝑈)) −s (𝑇 ·s 𝑈))))
218212, 217syl5ibrcom 250 . . 3 (𝜑 → (𝑆 = 𝑈 → (((𝑅 ·s 𝐵) +s (𝐴 ·s 𝑆)) −s (𝑅 ·s 𝑆)) <s (((𝑇 ·s 𝐵) +s (𝐴 ·s 𝑈)) −s (𝑇 ·s 𝑈))))
21917adantr 486 . . . . 5 ((𝜑 ∧ 𝑈 <s 𝑆) → (((𝑅 ·s 𝐵) +s (𝐴 ·s 𝑆)) −s (𝑅 ·s 𝑆)) ∈ No)
22011, 27addscld 28375 . . . . . . 7 (𝜑 → ((𝑅 ·s 𝐵) +s (𝐴 ·s 𝑈)) ∈ No)
221220, 203subscld 28458 . . . . . 6 (𝜑 → (((𝑅 ·s 𝐵) +s (𝐴 ·s 𝑈)) −s (𝑅 ·s 𝑈)) ∈ No)
222221adantr 486 . . . . 5 ((𝜑 ∧ 𝑈 <s 𝑆) → (((𝑅 ·s 𝐵) +s (𝐴 ·s 𝑈)) −s (𝑅 ·s 𝑈)) ∈ No)
22330adantr 486 . . . . 5 ((𝜑 ∧ 𝑈 <s 𝑆) → (((𝑇 ·s 𝐵) +s (𝐴 ·s 𝑈)) −s (𝑇 ·s 𝑈)) ∈ No)
224 sltsright 28256 . . . . . . . . . . 11 (𝐴 ∈ No → {𝐴} <<s (R‘𝐴))
22512, 224syl 18 . . . . . . . . . 10 (𝜑 → {𝐴} <<s (R‘𝐴))
226225, 118, 8sltssepcd 28167 . . . . . . . . 9 (𝜑 → 𝐴 <s 𝑅)
22749uneq1i 4162 . . . . . . . . . . . . 13 (((bday‘ 0s ) +no (bday‘ 0s )) ∪ ((((bday‘𝐴) +no (bday‘𝑈)) ∪ ((bday‘𝑅) +no (bday‘𝑆))) ∪ (((bday‘𝐴) +no (bday‘𝑆)) ∪ ((bday‘𝑅) +no (bday‘𝑈))))) = (∅ ∪ ((((bday‘𝐴) +no (bday‘𝑈)) ∪ ((bday‘𝑅) +no (bday‘𝑆))) ∪ (((bday‘𝐴) +no (bday‘𝑆)) ∪ ((bday‘𝑅) +no (bday‘𝑈)))))
228 0un 4345 . . . . . . . . . . . . 13 (∅ ∪ ((((bday‘𝐴) +no (bday‘𝑈)) ∪ ((bday‘𝑅) +no (bday‘𝑆))) ∪ (((bday‘𝐴) +no (bday‘𝑆)) ∪ ((bday‘𝑅) +no (bday‘𝑈))))) = ((((bday‘𝐴) +no (bday‘𝑈)) ∪ ((bday‘𝑅) +no (bday‘𝑆))) ∪ (((bday‘𝐴) +no (bday‘𝑆)) ∪ ((bday‘𝑅) +no (bday‘𝑈))))
229227, 228eqtri 2783 . . . . . . . . . . . 12 (((bday‘ 0s ) +no (bday‘ 0s )) ∪ ((((bday‘𝐴) +no (bday‘𝑈)) ∪ ((bday‘𝑅) +no (bday‘𝑆))) ∪ (((bday‘𝐴) +no (bday‘𝑆)) ∪ ((bday‘𝑅) +no (bday‘𝑈))))) = ((((bday‘𝐴) +no (bday‘𝑈)) ∪ ((bday‘𝑅) +no (bday‘𝑆))) ∪ (((bday‘𝐴) +no (bday‘𝑆)) ∪ ((bday‘𝑅) +no (bday‘𝑈))))
230128, 67jca 521 . . . . . . . . . . . . . 14 (𝜑 → (((bday‘𝐴) +no (bday‘𝑈)) ∈ ((bday‘𝐴) +no (bday‘𝐵)) ∧ ((bday‘𝑅) +no (bday‘𝑆)) ∈ ((bday‘𝐴) +no (bday‘𝐵))))
231135, 181jca 521 . . . . . . . . . . . . . 14 (𝜑 → (((bday‘𝐴) +no (bday‘𝑆)) ∈ ((bday‘𝐴) +no (bday‘𝐵)) ∧ ((bday‘𝑅) +no (bday‘𝑈)) ∈ ((bday‘𝐴) +no (bday‘𝐵))))
232138, 81onun2i 6489 . . . . . . . . . . . . . . . 16 (((bday‘𝐴) +no (bday‘𝑈)) ∪ ((bday‘𝑅) +no (bday‘𝑆))) ∈ On
233143, 185onun2i 6489 . . . . . . . . . . . . . . . 16 (((bday‘𝐴) +no (bday‘𝑆)) ∪ ((bday‘𝑅) +no (bday‘𝑈))) ∈ On
234 onunel 6473 . . . . . . . . . . . . . . . 16 (((((bday‘𝐴) +no (bday‘𝑈)) ∪ ((bday‘𝑅) +no (bday‘𝑆))) ∈ On ∧ (((bday‘𝐴) +no (bday‘𝑆)) ∪ ((bday‘𝑅) +no (bday‘𝑈))) ∈ On ∧ ((bday‘𝐴) +no (bday‘𝐵)) ∈ On) → (((((bday‘𝐴) +no (bday‘𝑈)) ∪ ((bday‘𝑅) +no (bday‘𝑆))) ∪ (((bday‘𝐴) +no (bday‘𝑆)) ∪ ((bday‘𝑅) +no (bday‘𝑈)))) ∈ ((bday‘𝐴) +no (bday‘𝐵)) ↔ ((((bday‘𝐴) +no (bday‘𝑈)) ∪ ((bday‘𝑅) +no (bday‘𝑆))) ∈ ((bday‘𝐴) +no (bday‘𝐵)) ∧ (((bday‘𝐴) +no (bday‘𝑆)) ∪ ((bday‘𝑅) +no (bday‘𝑈))) ∈ ((bday‘𝐴) +no (bday‘𝐵)))))
235232, 233, 89, 234mp3an 1490 . . . . . . . . . . . . . . 15 (((((bday‘𝐴) +no (bday‘𝑈)) ∪ ((bday‘𝑅) +no (bday‘𝑆))) ∪ (((bday‘𝐴) +no (bday‘𝑆)) ∪ ((bday‘𝑅) +no (bday‘𝑈)))) ∈ ((bday‘𝐴) +no (bday‘𝐵)) ↔ ((((bday‘𝐴) +no (bday‘𝑈)) ∪ ((bday‘𝑅) +no (bday‘𝑆))) ∈ ((bday‘𝐴) +no (bday‘𝐵)) ∧ (((bday‘𝐴) +no (bday‘𝑆)) ∪ ((bday‘𝑅) +no (bday‘𝑈))) ∈ ((bday‘𝐴) +no (bday‘𝐵))))
236 onunel 6473 . . . . . . . . . . . . . . . . 17 ((((bday‘𝐴) +no (bday‘𝑈)) ∈ On ∧ ((bday‘𝑅) +no (bday‘𝑆)) ∈ On ∧ ((bday‘𝐴) +no (bday‘𝐵)) ∈ On) → ((((bday‘𝐴) +no (bday‘𝑈)) ∪ ((bday‘𝑅) +no (bday‘𝑆))) ∈ ((bday‘𝐴) +no (bday‘𝐵)) ↔ (((bday‘𝐴) +no (bday‘𝑈)) ∈ ((bday‘𝐴) +no (bday‘𝐵)) ∧ ((bday‘𝑅) +no (bday‘𝑆)) ∈ ((bday‘𝐴) +no (bday‘𝐵)))))
237138, 81, 89, 236mp3an 1490 . . . . . . . . . . . . . . . 16 ((((bday‘𝐴) +no (bday‘𝑈)) ∪ ((bday‘𝑅) +no (bday‘𝑆))) ∈ ((bday‘𝐴) +no (bday‘𝐵)) ↔ (((bday‘𝐴) +no (bday‘𝑈)) ∈ ((bday‘𝐴) +no (bday‘𝐵)) ∧ ((bday‘𝑅) +no (bday‘𝑆)) ∈ ((bday‘𝐴) +no (bday‘𝐵))))
238 onunel 6473 . . . . . . . . . . . . . . . . 17 ((((bday‘𝐴) +no (bday‘𝑆)) ∈ On ∧ ((bday‘𝑅) +no (bday‘𝑈)) ∈ On ∧ ((bday‘𝐴) +no (bday‘𝐵)) ∈ On) → ((((bday‘𝐴) +no (bday‘𝑆)) ∪ ((bday‘𝑅) +no (bday‘𝑈))) ∈ ((bday‘𝐴) +no (bday‘𝐵)) ↔ (((bday‘𝐴) +no (bday‘𝑆)) ∈ ((bday‘𝐴) +no (bday‘𝐵)) ∧ ((bday‘𝑅) +no (bday‘𝑈)) ∈ ((bday‘𝐴) +no (bday‘𝐵)))))
239143, 185, 89, 238mp3an 1490 . . . . . . . . . . . . . . . 16 ((((bday‘𝐴) +no (bday‘𝑆)) ∪ ((bday‘𝑅) +no (bday‘𝑈))) ∈ ((bday‘𝐴) +no (bday‘𝐵)) ↔ (((bday‘𝐴) +no (bday‘𝑆)) ∈ ((bday‘𝐴) +no (bday‘𝐵)) ∧ ((bday‘𝑅) +no (bday‘𝑈)) ∈ ((bday‘𝐴) +no (bday‘𝐵))))
240237, 239anbi12i 640 . . . . . . . . . . . . . . 15 (((((bday‘𝐴) +no (bday‘𝑈)) ∪ ((bday‘𝑅) +no (bday‘𝑆))) ∈ ((bday‘𝐴) +no (bday‘𝐵)) ∧ (((bday‘𝐴) +no (bday‘𝑆)) ∪ ((bday‘𝑅) +no (bday‘𝑈))) ∈ ((bday‘𝐴) +no (bday‘𝐵))) ↔ ((((bday‘𝐴) +no (bday‘𝑈)) ∈ ((bday‘𝐴) +no (bday‘𝐵)) ∧ ((bday‘𝑅) +no (bday‘𝑆)) ∈ ((bday‘𝐴) +no (bday‘𝐵))) ∧ (((bday‘𝐴) +no (bday‘𝑆)) ∈ ((bday‘𝐴) +no (bday‘𝐵)) ∧ ((bday‘𝑅) +no (bday‘𝑈)) ∈ ((bday‘𝐴) +no (bday‘𝐵)))))
241235, 240bitri 278 . . . . . . . . . . . . . 14 (((((bday‘𝐴) +no (bday‘𝑈)) ∪ ((bday‘𝑅) +no (bday‘𝑆))) ∪ (((bday‘𝐴) +no (bday‘𝑆)) ∪ ((bday‘𝑅) +no (bday‘𝑈)))) ∈ ((bday‘𝐴) +no (bday‘𝐵)) ↔ ((((bday‘𝐴) +no (bday‘𝑈)) ∈ ((bday‘𝐴) +no (bday‘𝐵)) ∧ ((bday‘𝑅) +no (bday‘𝑆)) ∈ ((bday‘𝐴) +no (bday‘𝐵))) ∧ (((bday‘𝐴) +no (bday‘𝑆)) ∈ ((bday‘𝐴) +no (bday‘𝐵)) ∧ ((bday‘𝑅) +no (bday‘𝑈)) ∈ ((bday‘𝐴) +no (bday‘𝐵)))))
242230, 231, 241sylanbrc 595 . . . . . . . . . . . . 13 (𝜑 → ((((bday‘𝐴) +no (bday‘𝑈)) ∪ ((bday‘𝑅) +no (bday‘𝑆))) ∪ (((bday‘𝐴) +no (bday‘𝑆)) ∪ ((bday‘𝑅) +no (bday‘𝑈)))) ∈ ((bday‘𝐴) +no (bday‘𝐵)))
243 elun1 4179 . . . . . . . . . . . . 13 (((((bday‘𝐴) +no (bday‘𝑈)) ∪ ((bday‘𝑅) +no (bday‘𝑆))) ∪ (((bday‘𝐴) +no (bday‘𝑆)) ∪ ((bday‘𝑅) +no (bday‘𝑈)))) ∈ ((bday‘𝐴) +no (bday‘𝐵)) → ((((bday‘𝐴) +no (bday‘𝑈)) ∪ ((bday‘𝑅) +no (bday‘𝑆))) ∪ (((bday‘𝐴) +no (bday‘𝑆)) ∪ ((bday‘𝑅) +no (bday‘𝑈)))) ∈ (((bday‘𝐴) +no (bday‘𝐵)) ∪ ((((bday‘𝐶) +no (bday‘𝐸)) ∪ ((bday‘𝐷) +no (bday‘𝐹))) ∪ (((bday‘𝐶) +no (bday‘𝐹)) ∪ ((bday‘𝐷) +no (bday‘𝐸))))))
244242, 243syl 18 . . . . . . . . . . . 12 (𝜑 → ((((bday‘𝐴) +no (bday‘𝑈)) ∪ ((bday‘𝑅) +no (bday‘𝑆))) ∪ (((bday‘𝐴) +no (bday‘𝑆)) ∪ ((bday‘𝑅) +no (bday‘𝑈)))) ∈ (((bday‘𝐴) +no (bday‘𝐵)) ∪ ((((bday‘𝐶) +no (bday‘𝐸)) ∪ ((bday‘𝐷) +no (bday‘𝐹))) ∪ (((bday‘𝐶) +no (bday‘𝐹)) ∪ ((bday‘𝐷) +no (bday‘𝐸))))))
245229, 244eqeltrid 2864 . . . . . . . . . . 11 (𝜑 → (((bday‘ 0s ) +no (bday‘ 0s )) ∪ ((((bday‘𝐴) +no (bday‘𝑈)) ∪ ((bday‘𝑅) +no (bday‘𝑆))) ∪ (((bday‘𝐴) +no (bday‘𝑆)) ∪ ((bday‘𝑅) +no (bday‘𝑈))))) ∈ (((bday‘𝐴) +no (bday‘𝐵)) ∪ ((((bday‘𝐶) +no (bday‘𝐸)) ∪ ((bday‘𝐷) +no (bday‘𝐹))) ∪ (((bday‘𝐶) +no (bday‘𝐹)) ∪ ((bday‘𝐷) +no (bday‘𝐸))))))
2467, 41, 41, 12, 43, 4, 2, 245mulsproplem1 28511 . . . . . . . . . 10 (𝜑 → (( 0s ·s 0s ) ∈ No ∧ ((𝐴 <s 𝑅 ∧ 𝑈 <s 𝑆) → ((𝐴 ·s 𝑆) −s (𝐴 ·s 𝑈)) <s ((𝑅 ·s 𝑆) −s (𝑅 ·s 𝑈)))))
247246simprd 501 . . . . . . . . 9 (𝜑 → ((𝐴 <s 𝑅 ∧ 𝑈 <s 𝑆) → ((𝐴 ·s 𝑆) −s (𝐴 ·s 𝑈)) <s ((𝑅 ·s 𝑆) −s (𝑅 ·s 𝑈))))
248226, 247mpand 708 . . . . . . . 8 (𝜑 → (𝑈 <s 𝑆 → ((𝐴 ·s 𝑆) −s (𝐴 ·s 𝑈)) <s ((𝑅 ·s 𝑆) −s (𝑅 ·s 𝑈))))
249248imp 412 . . . . . . 7 ((𝜑 ∧ 𝑈 <s 𝑆) → ((𝐴 ·s 𝑆) −s (𝐴 ·s 𝑈)) <s ((𝑅 ·s 𝑆) −s (𝑅 ·s 𝑈)))
25014, 16, 27, 203ltsubsubsbd 28478 . . . . . . . . 9 (𝜑 → (((𝐴 ·s 𝑆) −s (𝐴 ·s 𝑈)) <s ((𝑅 ·s 𝑆) −s (𝑅 ·s 𝑈)) ↔ ((𝐴 ·s 𝑆) −s (𝑅 ·s 𝑆)) <s ((𝐴 ·s 𝑈) −s (𝑅 ·s 𝑈))))
25114, 16subscld 28458 . . . . . . . . . 10 (𝜑 → ((𝐴 ·s 𝑆) −s (𝑅 ·s 𝑆)) ∈ No)
25227, 203subscld 28458 . . . . . . . . . 10 (𝜑 → ((𝐴 ·s 𝑈) −s (𝑅 ·s 𝑈)) ∈ No)
253251, 252, 11ltadds2d 28392 . . . . . . . . 9 (𝜑 → (((𝐴 ·s 𝑆) −s (𝑅 ·s 𝑆)) <s ((𝐴 ·s 𝑈) −s (𝑅 ·s 𝑈)) ↔ ((𝑅 ·s 𝐵) +s ((𝐴 ·s 𝑆) −s (𝑅 ·s 𝑆))) <s ((𝑅 ·s 𝐵) +s ((𝐴 ·s 𝑈) −s (𝑅 ·s 𝑈)))))
254250, 253bitrd 282 . . . . . . . 8 (𝜑 → (((𝐴 ·s 𝑆) −s (𝐴 ·s 𝑈)) <s ((𝑅 ·s 𝑆) −s (𝑅 ·s 𝑈)) ↔ ((𝑅 ·s 𝐵) +s ((𝐴 ·s 𝑆) −s (𝑅 ·s 𝑆))) <s ((𝑅 ·s 𝐵) +s ((𝐴 ·s 𝑈) −s (𝑅 ·s 𝑈)))))
255254adantr 486 . . . . . . 7 ((𝜑 ∧ 𝑈 <s 𝑆) → (((𝐴 ·s 𝑆) −s (𝐴 ·s 𝑈)) <s ((𝑅 ·s 𝑆) −s (𝑅 ·s 𝑈)) ↔ ((𝑅 ·s 𝐵) +s ((𝐴 ·s 𝑆) −s (𝑅 ·s 𝑆))) <s ((𝑅 ·s 𝐵) +s ((𝐴 ·s 𝑈) −s (𝑅 ·s 𝑈)))))
256249, 255mpbid 235 . . . . . 6 ((𝜑 ∧ 𝑈 <s 𝑆) → ((𝑅 ·s 𝐵) +s ((𝐴 ·s 𝑆) −s (𝑅 ·s 𝑆))) <s ((𝑅 ·s 𝐵) +s ((𝐴 ·s 𝑈) −s (𝑅 ·s 𝑈))))
25711, 14, 16addsubsassd 28476 . . . . . . 7 (𝜑 → (((𝑅 ·s 𝐵) +s (𝐴 ·s 𝑆)) −s (𝑅 ·s 𝑆)) = ((𝑅 ·s 𝐵) +s ((𝐴 ·s 𝑆) −s (𝑅 ·s 𝑆))))
258257adantr 486 . . . . . 6 ((𝜑 ∧ 𝑈 <s 𝑆) → (((𝑅 ·s 𝐵) +s (𝐴 ·s 𝑆)) −s (𝑅 ·s 𝑆)) = ((𝑅 ·s 𝐵) +s ((𝐴 ·s 𝑆) −s (𝑅 ·s 𝑆))))
25911, 27, 203addsubsassd 28476 . . . . . . 7 (𝜑 → (((𝑅 ·s 𝐵) +s (𝐴 ·s 𝑈)) −s (𝑅 ·s 𝑈)) = ((𝑅 ·s 𝐵) +s ((𝐴 ·s 𝑈) −s (𝑅 ·s 𝑈))))
260259adantr 486 . . . . . 6 ((𝜑 ∧ 𝑈 <s 𝑆) → (((𝑅 ·s 𝐵) +s (𝐴 ·s 𝑈)) −s (𝑅 ·s 𝑈)) = ((𝑅 ·s 𝐵) +s ((𝐴 ·s 𝑈) −s (𝑅 ·s 𝑈))))
261256, 258, 2603brtr4d 5136 . . . . 5 ((𝜑 ∧ 𝑈 <s 𝑆) → (((𝑅 ·s 𝐵) +s (𝐴 ·s 𝑆)) −s (𝑅 ·s 𝑆)) <s (((𝑅 ·s 𝐵) +s (𝐴 ·s 𝑈)) −s (𝑅 ·s 𝑈)))
262212adantr 486 . . . . 5 ((𝜑 ∧ 𝑈 <s 𝑆) → (((𝑅 ·s 𝐵) +s (𝐴 ·s 𝑈)) −s (𝑅 ·s 𝑈)) <s (((𝑇 ·s 𝐵) +s (𝐴 ·s 𝑈)) −s (𝑇 ·s 𝑈)))
263219, 222, 223, 261, 262ltstrd 28129 . . . 4 ((𝜑 ∧ 𝑈 <s 𝑆) → (((𝑅 ·s 𝐵) +s (𝐴 ·s 𝑆)) −s (𝑅 ·s 𝑆)) <s (((𝑇 ·s 𝐵) +s (𝐴 ·s 𝑈)) −s (𝑇 ·s 𝑈)))
264263ex 418 . . 3 (𝜑 → (𝑈 <s 𝑆 → (((𝑅 ·s 𝐵) +s (𝐴 ·s 𝑆)) −s (𝑅 ·s 𝑆)) <s (((𝑇 ·s 𝐵) +s (𝐴 ·s 𝑈)) −s (𝑇 ·s 𝑈))))
265174, 218, 2643jaod 1456 . 2 (𝜑 → ((𝑆 <s 𝑈 ∨ 𝑆 = 𝑈 ∨ 𝑈 <s 𝑆) → (((𝑅 ·s 𝐵) +s (𝐴 ·s 𝑆)) −s (𝑅 ·s 𝑆)) <s (((𝑇 ·s 𝐵) +s (𝐴 ·s 𝑈)) −s (𝑇 ·s 𝑈))))
2666, 265mpd 16 1 (𝜑 → (((𝑅 ·s 𝐵) +s (𝐴 ·s 𝑆)) −s (𝑅 ·s 𝑆)) <s (((𝑇 ·s 𝐵) +s (𝐴 ·s 𝑈)) −s (𝑇 ·s 𝑈)))
Colors of variables:    wff setvar class
This proof depends on syntax axioms:   → wi 4   ↔ wb 209   ∧ wa 401   ∨ w3o 1102   = wceq 1569   ∈ wcel 2144  ∀wral 3076   ∪ cun 4148  ∅c0 4277  {csn 4584   class class class wbr 5102  Oncon0 6365  ‘cfv 6543  (class class class)co 7424   +no cnadd 8681  Nocsur 28006   <s clts 28007  bdaycbday 28008   <<s cslts 28152   0s c0s 28200  Ocold 28218  Lcleft 28220  Rcright 28221   +s cadds 28354   −s csubs 28415   ·s cmuls 28501
This proof depends on axioms:  ax-mp 5  ax-1 6  ax-2 7  ax-3 8  ax-gen 1827  ax-4 1841  ax-5 1942  ax-6 1999  ax-7 2040  ax-8 2146  ax-9 2154  ax-10 2177  ax-11 2193  ax-12 2212  ax-ext 2732  ax-rep 5231  ax-sep 5248  ax-nul 5259  ax-pow 5327  ax-pr 5391  ax-un 7755
This proof depends on definitions:  df-bi 210  df-an 402  df-or 862  df-3or 1104  df-3an 1105  df-tru 1572  df-fal 1582  df-ex 1812  df-nf 1816  df-sb 2099  df-mo 2564  df-eu 2594  df-clab 2739  df-cleq 2752  df-clel 2835  df-nfc 2909  df-ne 2956  df-ral 3077  df-rex 3087  df-rmo 3365  df-reu 3366  df-rab 3413  df-v 3452  df-sbc 3739  df-csb 3848  df-ss 3897  df-pss 4013  df-dif 4046  df-in 4090  df-un 4150  df-nul 4278  df-if 4482  df-pw 4558  df-sn 4585  df-pr 4587  df-tp 4589  df-op 4835  df-ot 4858  df-uni 4867  df-int 4907  df-iun 4952  df-br 5103  df-opab 5167  df-mpt 5186  df-tr 5212  df-id 5546  df-eprel 5551  df-po 5559  df-so 5560  df-fr 5604  df-se 5605  df-we 5606  df-xp 5657  df-rel 5658  df-cnv 5659  df-co 5660  df-dm 5661  df-rn 5662  df-res 5663  df-ima 5664  df-pred 6307  df-ord 6368  df-on 6369  df-suc 6371  df-iota 6497  df-fun 6545  df-fn 6546  df-f 6547  df-f1 6548  df-fo 6549  df-f1o 6550  df-fv 6551  df-riota 7381  df-ov 7427  df-oprab 7428  df-mpo 7429  df-1st 8005  df-2nd 8006  df-frecs 8306  df-wrecs 8337  df-recs 8386  df-1o 8483  df-2o 8484  df-nadd 8682  df-no 28009  df-lts 28010  df-bday 28011  df-les 28111  df-slts 28153  df-cuts 28155  df-0s 28202  df-made 28222  df-old 28223  df-left 28225  df-right 28226  df-norec 28333  df-norec2 28344  df-adds 28355  df-negs 28416  df-subs 28417
This theorem is used by:  mulsproplem9  28519
  Copyright terms: Public domain W3C validator