Proof of Theorem mulsproplem8
| Step | Hyp | Ref
| Expression |
| 1 | | mulsproplem8.3 |
. . . 4
⊢ (𝜑 → 𝑅 ∈ ( R ‘𝐴)) |
| 2 | 1 | rightnod 27878 |
. . 3
⊢ (𝜑 → 𝑅 ∈ No
) |
| 3 | | mulsproplem8.5 |
. . . 4
⊢ (𝜑 → 𝑉 ∈ ( R ‘𝐴)) |
| 4 | 3 | rightnod 27878 |
. . 3
⊢ (𝜑 → 𝑉 ∈ No
) |
| 5 | | ltslin 27717 |
. . 3
⊢ ((𝑅 ∈
No ∧ 𝑉 ∈
No ) → (𝑅 <s 𝑉 ∨ 𝑅 = 𝑉 ∨ 𝑉 <s 𝑅)) |
| 6 | 2, 4, 5 | syl2anc 584 |
. 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 | 1 | rightoldd 27877 |
. . . . . . . . 9
⊢ (𝜑 → 𝑅 ∈ ( O ‘(
bday ‘𝐴))) |
| 9 | | mulsproplem8.2 |
. . . . . . . . 9
⊢ (𝜑 → 𝐵 ∈ No
) |
| 10 | 7, 8, 9 | mulsproplem2 28113 |
. . . . . . . 8
⊢ (𝜑 → (𝑅 ·s 𝐵) ∈ No
) |
| 11 | | mulsproplem8.1 |
. . . . . . . . 9
⊢ (𝜑 → 𝐴 ∈ No
) |
| 12 | | mulsproplem8.4 |
. . . . . . . . . 10
⊢ (𝜑 → 𝑆 ∈ ( R ‘𝐵)) |
| 13 | 12 | rightoldd 27877 |
. . . . . . . . 9
⊢ (𝜑 → 𝑆 ∈ ( O ‘(
bday ‘𝐵))) |
| 14 | 7, 11, 13 | mulsproplem3 28114 |
. . . . . . . 8
⊢ (𝜑 → (𝐴 ·s 𝑆) ∈ No
) |
| 15 | 10, 14 | addscld 27976 |
. . . . . . 7
⊢ (𝜑 → ((𝑅 ·s 𝐵) +s (𝐴 ·s 𝑆)) ∈ No
) |
| 16 | 7, 8, 13 | mulsproplem4 28115 |
. . . . . . 7
⊢ (𝜑 → (𝑅 ·s 𝑆) ∈ No
) |
| 17 | 15, 16 | subscld 28059 |
. . . . . 6
⊢ (𝜑 → (((𝑅 ·s 𝐵) +s (𝐴 ·s 𝑆)) -s (𝑅 ·s 𝑆)) ∈ No
) |
| 18 | 17 | adantr 480 |
. . . . 5
⊢ ((𝜑 ∧ 𝑅 <s 𝑉) → (((𝑅 ·s 𝐵) +s (𝐴 ·s 𝑆)) -s (𝑅 ·s 𝑆)) ∈ No
) |
| 19 | | mulsproplem8.6 |
. . . . . . . . . 10
⊢ (𝜑 → 𝑊 ∈ ( L ‘𝐵)) |
| 20 | 19 | leftoldd 27875 |
. . . . . . . . 9
⊢ (𝜑 → 𝑊 ∈ ( O ‘(
bday ‘𝐵))) |
| 21 | 7, 11, 20 | mulsproplem3 28114 |
. . . . . . . 8
⊢ (𝜑 → (𝐴 ·s 𝑊) ∈ No
) |
| 22 | 10, 21 | addscld 27976 |
. . . . . . 7
⊢ (𝜑 → ((𝑅 ·s 𝐵) +s (𝐴 ·s 𝑊)) ∈ No
) |
| 23 | 7, 8, 20 | mulsproplem4 28115 |
. . . . . . 7
⊢ (𝜑 → (𝑅 ·s 𝑊) ∈ No
) |
| 24 | 22, 23 | subscld 28059 |
. . . . . 6
⊢ (𝜑 → (((𝑅 ·s 𝐵) +s (𝐴 ·s 𝑊)) -s (𝑅 ·s 𝑊)) ∈ No
) |
| 25 | 24 | adantr 480 |
. . . . 5
⊢ ((𝜑 ∧ 𝑅 <s 𝑉) → (((𝑅 ·s 𝐵) +s (𝐴 ·s 𝑊)) -s (𝑅 ·s 𝑊)) ∈ No
) |
| 26 | 3 | rightoldd 27877 |
. . . . . . . . 9
⊢ (𝜑 → 𝑉 ∈ ( O ‘(
bday ‘𝐴))) |
| 27 | 7, 26, 9 | mulsproplem2 28113 |
. . . . . . . 8
⊢ (𝜑 → (𝑉 ·s 𝐵) ∈ No
) |
| 28 | 27, 21 | addscld 27976 |
. . . . . . 7
⊢ (𝜑 → ((𝑉 ·s 𝐵) +s (𝐴 ·s 𝑊)) ∈ No
) |
| 29 | 7, 26, 20 | mulsproplem4 28115 |
. . . . . . 7
⊢ (𝜑 → (𝑉 ·s 𝑊) ∈ No
) |
| 30 | 28, 29 | subscld 28059 |
. . . . . 6
⊢ (𝜑 → (((𝑉 ·s 𝐵) +s (𝐴 ·s 𝑊)) -s (𝑉 ·s 𝑊)) ∈ No
) |
| 31 | 30 | adantr 480 |
. . . . 5
⊢ ((𝜑 ∧ 𝑅 <s 𝑉) → (((𝑉 ·s 𝐵) +s (𝐴 ·s 𝑊)) -s (𝑉 ·s 𝑊)) ∈ No
) |
| 32 | | sltsright 27857 |
. . . . . . . . . . 11
⊢ (𝐴 ∈
No → {𝐴}
<<s ( R ‘𝐴)) |
| 33 | 11, 32 | syl 17 |
. . . . . . . . . 10
⊢ (𝜑 → {𝐴} <<s ( R ‘𝐴)) |
| 34 | | snidg 4617 |
. . . . . . . . . . 11
⊢ (𝐴 ∈
No → 𝐴 ∈
{𝐴}) |
| 35 | 11, 34 | syl 17 |
. . . . . . . . . 10
⊢ (𝜑 → 𝐴 ∈ {𝐴}) |
| 36 | 33, 35, 1 | sltssepcd 27768 |
. . . . . . . . 9
⊢ (𝜑 → 𝐴 <s 𝑅) |
| 37 | | lltr 27858 |
. . . . . . . . . . 11
⊢ ( L
‘𝐵) <<s ( R
‘𝐵) |
| 38 | 37 | a1i 11 |
. . . . . . . . . 10
⊢ (𝜑 → ( L ‘𝐵) <<s ( R ‘𝐵)) |
| 39 | 38, 19, 12 | sltssepcd 27768 |
. . . . . . . . 9
⊢ (𝜑 → 𝑊 <s 𝑆) |
| 40 | | 0no 27805 |
. . . . . . . . . . . 12
⊢
0s ∈ No |
| 41 | 40 | a1i 11 |
. . . . . . . . . . 11
⊢ (𝜑 → 0s ∈ No ) |
| 42 | 19 | leftnod 27876 |
. . . . . . . . . . 11
⊢ (𝜑 → 𝑊 ∈ No
) |
| 43 | 12 | rightnod 27878 |
. . . . . . . . . . 11
⊢ (𝜑 → 𝑆 ∈ No
) |
| 44 | | bday0 27807 |
. . . . . . . . . . . . . . . 16
⊢ ( bday ‘ 0s ) = ∅ |
| 45 | 44, 44 | oveq12i 7370 |
. . . . . . . . . . . . . . 15
⊢ (( bday ‘ 0s ) +no ( bday ‘ 0s )) = (∅ +no
∅) |
| 46 | | 0elon 6372 |
. . . . . . . . . . . . . . . 16
⊢ ∅
∈ On |
| 47 | | naddrid 8611 |
. . . . . . . . . . . . . . . 16
⊢ (∅
∈ On → (∅ +no ∅) = ∅) |
| 48 | 46, 47 | ax-mp 5 |
. . . . . . . . . . . . . . 15
⊢ (∅
+no ∅) = ∅ |
| 49 | 45, 48 | eqtri 2759 |
. . . . . . . . . . . . . 14
⊢ (( bday ‘ 0s ) +no ( bday ‘ 0s )) =
∅ |
| 50 | 49 | uneq1i 4116 |
. . . . . . . . . . . . 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 4348 |
. . . . . . . . . . . . 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
‘𝑊)))) |
| 52 | 50, 51 | eqtri 2759 |
. . . . . . . . . . . 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 27885 |
. . . . . . . . . . . . . . . . 17
⊢ (𝑊 ∈ ( O ‘( bday ‘𝐵)) → ( bday
‘𝑊) ∈
( bday ‘𝐵)) |
| 54 | 20, 53 | syl 17 |
. . . . . . . . . . . . . . . 16
⊢ (𝜑 → (
bday ‘𝑊)
∈ ( bday ‘𝐵)) |
| 55 | | bdayon 27748 |
. . . . . . . . . . . . . . . . 17
⊢ ( bday ‘𝑊) ∈ On |
| 56 | | bdayon 27748 |
. . . . . . . . . . . . . . . . 17
⊢ ( bday ‘𝐵) ∈ On |
| 57 | | bdayon 27748 |
. . . . . . . . . . . . . . . . 17
⊢ ( bday ‘𝐴) ∈ On |
| 58 | | naddel2 8616 |
. . . . . . . . . . . . . . . . 17
⊢ ((( bday ‘𝑊) ∈ On ∧ (
bday ‘𝐵)
∈ On ∧ ( bday ‘𝐴) ∈ On) → ((
bday ‘𝑊)
∈ ( bday ‘𝐵) ↔ (( bday
‘𝐴) +no ( bday ‘𝑊)) ∈ (( bday
‘𝐴) +no ( bday ‘𝐵)))) |
| 59 | 55, 56, 57, 58 | mp3an 1463 |
. . . . . . . . . . . . . . . 16
⊢ (( bday ‘𝑊) ∈ ( bday
‘𝐵) ↔
(( bday ‘𝐴) +no ( bday
‘𝑊)) ∈
(( bday ‘𝐴) +no ( bday
‘𝐵))) |
| 60 | 54, 59 | sylib 218 |
. . . . . . . . . . . . . . 15
⊢ (𝜑 → ((
bday ‘𝐴) +no
( bday ‘𝑊)) ∈ (( bday
‘𝐴) +no ( bday ‘𝐵))) |
| 61 | | oldbdayim 27885 |
. . . . . . . . . . . . . . . . 17
⊢ (𝑅 ∈ ( O ‘( bday ‘𝐴)) → ( bday
‘𝑅) ∈
( bday ‘𝐴)) |
| 62 | 8, 61 | syl 17 |
. . . . . . . . . . . . . . . 16
⊢ (𝜑 → (
bday ‘𝑅)
∈ ( bday ‘𝐴)) |
| 63 | | oldbdayim 27885 |
. . . . . . . . . . . . . . . . 17
⊢ (𝑆 ∈ ( O ‘( bday ‘𝐵)) → ( bday
‘𝑆) ∈
( bday ‘𝐵)) |
| 64 | 13, 63 | syl 17 |
. . . . . . . . . . . . . . . 16
⊢ (𝜑 → (
bday ‘𝑆)
∈ ( bday ‘𝐵)) |
| 65 | | naddel12 8628 |
. . . . . . . . . . . . . . . . 17
⊢ ((( bday ‘𝐴) ∈ On ∧ (
bday ‘𝐵)
∈ On) → ((( bday ‘𝑅) ∈ (
bday ‘𝐴) ∧
( bday ‘𝑆) ∈ ( bday
‘𝐵)) →
(( bday ‘𝑅) +no ( bday
‘𝑆)) ∈
(( bday ‘𝐴) +no ( bday
‘𝐵)))) |
| 66 | 57, 56, 65 | mp2an 692 |
. . . . . . . . . . . . . . . 16
⊢ ((( bday ‘𝑅) ∈ ( bday
‘𝐴) ∧
( bday ‘𝑆) ∈ ( bday
‘𝐵)) →
(( bday ‘𝑅) +no ( bday
‘𝑆)) ∈
(( bday ‘𝐴) +no ( bday
‘𝐵))) |
| 67 | 62, 64, 66 | syl2anc 584 |
. . . . . . . . . . . . . . 15
⊢ (𝜑 → ((
bday ‘𝑅) +no
( bday ‘𝑆)) ∈ (( bday
‘𝐴) +no ( bday ‘𝐵))) |
| 68 | 60, 67 | jca 511 |
. . . . . . . . . . . . . 14
⊢ (𝜑 → (((
bday ‘𝐴) +no
( bday ‘𝑊)) ∈ (( bday
‘𝐴) +no ( bday ‘𝐵)) ∧ (( bday
‘𝑅) +no ( bday ‘𝑆)) ∈ (( bday
‘𝐴) +no ( bday ‘𝐵)))) |
| 69 | | bdayon 27748 |
. . . . . . . . . . . . . . . . 17
⊢ ( bday ‘𝑆) ∈ On |
| 70 | | naddel2 8616 |
. . . . . . . . . . . . . . . . 17
⊢ ((( bday ‘𝑆) ∈ On ∧ (
bday ‘𝐵)
∈ On ∧ ( bday ‘𝐴) ∈ On) → ((
bday ‘𝑆)
∈ ( bday ‘𝐵) ↔ (( bday
‘𝐴) +no ( bday ‘𝑆)) ∈ (( bday
‘𝐴) +no ( bday ‘𝐵)))) |
| 71 | 69, 56, 57, 70 | mp3an 1463 |
. . . . . . . . . . . . . . . 16
⊢ (( bday ‘𝑆) ∈ ( bday
‘𝐵) ↔
(( bday ‘𝐴) +no ( bday
‘𝑆)) ∈
(( bday ‘𝐴) +no ( bday
‘𝐵))) |
| 72 | 64, 71 | sylib 218 |
. . . . . . . . . . . . . . 15
⊢ (𝜑 → ((
bday ‘𝐴) +no
( bday ‘𝑆)) ∈ (( bday
‘𝐴) +no ( bday ‘𝐵))) |
| 73 | | naddel12 8628 |
. . . . . . . . . . . . . . . . 17
⊢ ((( bday ‘𝐴) ∈ On ∧ (
bday ‘𝐵)
∈ On) → ((( bday ‘𝑅) ∈ (
bday ‘𝐴) ∧
( bday ‘𝑊) ∈ ( bday
‘𝐵)) →
(( bday ‘𝑅) +no ( bday
‘𝑊)) ∈
(( bday ‘𝐴) +no ( bday
‘𝐵)))) |
| 74 | 57, 56, 73 | mp2an 692 |
. . . . . . . . . . . . . . . 16
⊢ ((( bday ‘𝑅) ∈ ( bday
‘𝐴) ∧
( bday ‘𝑊) ∈ ( bday
‘𝐵)) →
(( bday ‘𝑅) +no ( bday
‘𝑊)) ∈
(( bday ‘𝐴) +no ( bday
‘𝐵))) |
| 75 | 62, 54, 74 | syl2anc 584 |
. . . . . . . . . . . . . . 15
⊢ (𝜑 → ((
bday ‘𝑅) +no
( bday ‘𝑊)) ∈ (( bday
‘𝐴) +no ( bday ‘𝐵))) |
| 76 | 72, 75 | jca 511 |
. . . . . . . . . . . . . 14
⊢ (𝜑 → (((
bday ‘𝐴) +no
( bday ‘𝑆)) ∈ (( bday
‘𝐴) +no ( bday ‘𝐵)) ∧ (( bday
‘𝑅) +no ( bday ‘𝑊)) ∈ (( bday
‘𝐴) +no ( bday ‘𝐵)))) |
| 77 | | naddcl 8605 |
. . . . . . . . . . . . . . . . . 18
⊢ ((( bday ‘𝐴) ∈ On ∧ (
bday ‘𝑊)
∈ On) → (( bday ‘𝐴) +no ( bday
‘𝑊)) ∈
On) |
| 78 | 57, 55, 77 | mp2an 692 |
. . . . . . . . . . . . . . . . 17
⊢ (( bday ‘𝐴) +no ( bday
‘𝑊)) ∈
On |
| 79 | | bdayon 27748 |
. . . . . . . . . . . . . . . . . 18
⊢ ( bday ‘𝑅) ∈ On |
| 80 | | naddcl 8605 |
. . . . . . . . . . . . . . . . . 18
⊢ ((( bday ‘𝑅) ∈ On ∧ (
bday ‘𝑆)
∈ On) → (( bday ‘𝑅) +no ( bday
‘𝑆)) ∈
On) |
| 81 | 79, 69, 80 | mp2an 692 |
. . . . . . . . . . . . . . . . 17
⊢ (( bday ‘𝑅) +no ( bday
‘𝑆)) ∈
On |
| 82 | 78, 81 | onun2i 6440 |
. . . . . . . . . . . . . . . 16
⊢ ((( bday ‘𝐴) +no ( bday
‘𝑊)) ∪
(( bday ‘𝑅) +no ( bday
‘𝑆))) ∈
On |
| 83 | | naddcl 8605 |
. . . . . . . . . . . . . . . . . 18
⊢ ((( bday ‘𝐴) ∈ On ∧ (
bday ‘𝑆)
∈ On) → (( bday ‘𝐴) +no ( bday
‘𝑆)) ∈
On) |
| 84 | 57, 69, 83 | mp2an 692 |
. . . . . . . . . . . . . . . . 17
⊢ (( bday ‘𝐴) +no ( bday
‘𝑆)) ∈
On |
| 85 | | naddcl 8605 |
. . . . . . . . . . . . . . . . . 18
⊢ ((( bday ‘𝑅) ∈ On ∧ (
bday ‘𝑊)
∈ On) → (( bday ‘𝑅) +no ( bday
‘𝑊)) ∈
On) |
| 86 | 79, 55, 85 | mp2an 692 |
. . . . . . . . . . . . . . . . 17
⊢ (( bday ‘𝑅) +no ( bday
‘𝑊)) ∈
On |
| 87 | 84, 86 | onun2i 6440 |
. . . . . . . . . . . . . . . 16
⊢ ((( bday ‘𝐴) +no ( bday
‘𝑆)) ∪
(( bday ‘𝑅) +no ( bday
‘𝑊))) ∈
On |
| 88 | | naddcl 8605 |
. . . . . . . . . . . . . . . . 17
⊢ ((( bday ‘𝐴) ∈ On ∧ (
bday ‘𝐵)
∈ On) → (( bday ‘𝐴) +no ( bday
‘𝐵)) ∈
On) |
| 89 | 57, 56, 88 | mp2an 692 |
. . . . . . . . . . . . . . . 16
⊢ (( bday ‘𝐴) +no ( bday
‘𝐵)) ∈
On |
| 90 | | onunel 6424 |
. . . . . . . . . . . . . . . 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
‘𝐵))))) |
| 91 | 82, 87, 89, 90 | mp3an 1463 |
. . . . . . . . . . . . . . 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 6424 |
. . . . . . . . . . . . . . . . 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
‘𝐵))))) |
| 93 | 78, 81, 89, 92 | mp3an 1463 |
. . . . . . . . . . . . . . . 16
⊢ (((( bday ‘𝐴) +no ( bday
‘𝑊)) ∪
(( bday ‘𝑅) +no ( bday
‘𝑆))) ∈
(( bday ‘𝐴) +no ( bday
‘𝐵)) ↔
((( bday ‘𝐴) +no ( bday
‘𝑊)) ∈
(( bday ‘𝐴) +no ( bday
‘𝐵)) ∧
(( bday ‘𝑅) +no ( bday
‘𝑆)) ∈
(( bday ‘𝐴) +no ( bday
‘𝐵)))) |
| 94 | | onunel 6424 |
. . . . . . . . . . . . . . . . 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
‘𝐵))))) |
| 95 | 84, 86, 89, 94 | mp3an 1463 |
. . . . . . . . . . . . . . . 16
⊢ (((( bday ‘𝐴) +no ( bday
‘𝑆)) ∪
(( bday ‘𝑅) +no ( bday
‘𝑊))) ∈
(( bday ‘𝐴) +no ( bday
‘𝐵)) ↔
((( bday ‘𝐴) +no ( bday
‘𝑆)) ∈
(( bday ‘𝐴) +no ( bday
‘𝐵)) ∧
(( bday ‘𝑅) +no ( bday
‘𝑊)) ∈
(( bday ‘𝐴) +no ( bday
‘𝐵)))) |
| 96 | 93, 95 | anbi12i 628 |
. . . . . . . . . . . . . . 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
‘𝐵))))) |
| 97 | 91, 96 | bitri 275 |
. . . . . . . . . . . . . 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
‘𝐵))))) |
| 98 | 68, 76, 97 | sylanbrc 583 |
. . . . . . . . . . . . 13
⊢ (𝜑 → ((((
bday ‘𝐴) +no
( bday ‘𝑊)) ∪ (( bday
‘𝑅) +no ( bday ‘𝑆))) ∪ ((( bday
‘𝐴) +no ( bday ‘𝑆)) ∪ (( bday
‘𝑅) +no ( bday ‘𝑊)))) ∈ (( bday
‘𝐴) +no ( bday ‘𝐵))) |
| 99 | | elun1 4134 |
. . . . . . . . . . . . 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
‘𝐸)))))) |
| 100 | 98, 99 | syl 17 |
. . . . . . . . . . . 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 ‘𝐸)))))) |
| 101 | 52, 100 | eqeltrid 2840 |
. . . . . . . . . . 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 ‘𝐸)))))) |
| 102 | 7, 41, 41, 11, 2, 42, 43, 101 | mulsproplem1 28112 |
. . . . . . . . . 10
⊢ (𝜑 → (( 0s
·s 0s ) ∈ No
∧ ((𝐴 <s 𝑅 ∧ 𝑊 <s 𝑆) → ((𝐴 ·s 𝑆) -s (𝐴 ·s 𝑊)) <s ((𝑅 ·s 𝑆) -s (𝑅 ·s 𝑊))))) |
| 103 | 102 | simprd 495 |
. . . . . . . . 9
⊢ (𝜑 → ((𝐴 <s 𝑅 ∧ 𝑊 <s 𝑆) → ((𝐴 ·s 𝑆) -s (𝐴 ·s 𝑊)) <s ((𝑅 ·s 𝑆) -s (𝑅 ·s 𝑊)))) |
| 104 | 36, 39, 103 | mp2and 699 |
. . . . . . . 8
⊢ (𝜑 → ((𝐴 ·s 𝑆) -s (𝐴 ·s 𝑊)) <s ((𝑅 ·s 𝑆) -s (𝑅 ·s 𝑊))) |
| 105 | 14, 16, 21, 23 | ltsubsubsbd 28079 |
. . . . . . . . 9
⊢ (𝜑 → (((𝐴 ·s 𝑆) -s (𝐴 ·s 𝑊)) <s ((𝑅 ·s 𝑆) -s (𝑅 ·s 𝑊)) ↔ ((𝐴 ·s 𝑆) -s (𝑅 ·s 𝑆)) <s ((𝐴 ·s 𝑊) -s (𝑅 ·s 𝑊)))) |
| 106 | 14, 16 | subscld 28059 |
. . . . . . . . . 10
⊢ (𝜑 → ((𝐴 ·s 𝑆) -s (𝑅 ·s 𝑆)) ∈ No
) |
| 107 | 21, 23 | subscld 28059 |
. . . . . . . . . 10
⊢ (𝜑 → ((𝐴 ·s 𝑊) -s (𝑅 ·s 𝑊)) ∈ No
) |
| 108 | 106, 107,
10 | ltadds2d 27993 |
. . . . . . . . 9
⊢ (𝜑 → (((𝐴 ·s 𝑆) -s (𝑅 ·s 𝑆)) <s ((𝐴 ·s 𝑊) -s (𝑅 ·s 𝑊)) ↔ ((𝑅 ·s 𝐵) +s ((𝐴 ·s 𝑆) -s (𝑅 ·s 𝑆))) <s ((𝑅 ·s 𝐵) +s ((𝐴 ·s 𝑊) -s (𝑅 ·s 𝑊))))) |
| 109 | 105, 108 | bitrd 279 |
. . . . . . . 8
⊢ (𝜑 → (((𝐴 ·s 𝑆) -s (𝐴 ·s 𝑊)) <s ((𝑅 ·s 𝑆) -s (𝑅 ·s 𝑊)) ↔ ((𝑅 ·s 𝐵) +s ((𝐴 ·s 𝑆) -s (𝑅 ·s 𝑆))) <s ((𝑅 ·s 𝐵) +s ((𝐴 ·s 𝑊) -s (𝑅 ·s 𝑊))))) |
| 110 | 104, 109 | mpbid 232 |
. . . . . . 7
⊢ (𝜑 → ((𝑅 ·s 𝐵) +s ((𝐴 ·s 𝑆) -s (𝑅 ·s 𝑆))) <s ((𝑅 ·s 𝐵) +s ((𝐴 ·s 𝑊) -s (𝑅 ·s 𝑊)))) |
| 111 | 10, 14, 16 | addsubsassd 28077 |
. . . . . . 7
⊢ (𝜑 → (((𝑅 ·s 𝐵) +s (𝐴 ·s 𝑆)) -s (𝑅 ·s 𝑆)) = ((𝑅 ·s 𝐵) +s ((𝐴 ·s 𝑆) -s (𝑅 ·s 𝑆)))) |
| 112 | 10, 21, 23 | addsubsassd 28077 |
. . . . . . 7
⊢ (𝜑 → (((𝑅 ·s 𝐵) +s (𝐴 ·s 𝑊)) -s (𝑅 ·s 𝑊)) = ((𝑅 ·s 𝐵) +s ((𝐴 ·s 𝑊) -s (𝑅 ·s 𝑊)))) |
| 113 | 110, 111,
112 | 3brtr4d 5130 |
. . . . . 6
⊢ (𝜑 → (((𝑅 ·s 𝐵) +s (𝐴 ·s 𝑆)) -s (𝑅 ·s 𝑆)) <s (((𝑅 ·s 𝐵) +s (𝐴 ·s 𝑊)) -s (𝑅 ·s 𝑊))) |
| 114 | 113 | adantr 480 |
. . . . 5
⊢ ((𝜑 ∧ 𝑅 <s 𝑉) → (((𝑅 ·s 𝐵) +s (𝐴 ·s 𝑆)) -s (𝑅 ·s 𝑆)) <s (((𝑅 ·s 𝐵) +s (𝐴 ·s 𝑊)) -s (𝑅 ·s 𝑊))) |
| 115 | | sltsleft 27856 |
. . . . . . . . . . 11
⊢ (𝐵 ∈
No → ( L ‘𝐵) <<s {𝐵}) |
| 116 | 9, 115 | syl 17 |
. . . . . . . . . 10
⊢ (𝜑 → ( L ‘𝐵) <<s {𝐵}) |
| 117 | | snidg 4617 |
. . . . . . . . . . 11
⊢ (𝐵 ∈
No → 𝐵 ∈
{𝐵}) |
| 118 | 9, 117 | syl 17 |
. . . . . . . . . 10
⊢ (𝜑 → 𝐵 ∈ {𝐵}) |
| 119 | 116, 19, 118 | sltssepcd 27768 |
. . . . . . . . 9
⊢ (𝜑 → 𝑊 <s 𝐵) |
| 120 | 49 | uneq1i 4116 |
. . . . . . . . . . . . 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 4348 |
. . . . . . . . . . . . 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
‘𝑊)))) |
| 122 | 120, 121 | eqtri 2759 |
. . . . . . . . . . . 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 27885 |
. . . . . . . . . . . . . . . . 17
⊢ (𝑉 ∈ ( O ‘( bday ‘𝐴)) → ( bday
‘𝑉) ∈
( bday ‘𝐴)) |
| 124 | 26, 123 | syl 17 |
. . . . . . . . . . . . . . . 16
⊢ (𝜑 → (
bday ‘𝑉)
∈ ( bday ‘𝐴)) |
| 125 | | bdayon 27748 |
. . . . . . . . . . . . . . . . 17
⊢ ( bday ‘𝑉) ∈ On |
| 126 | | naddel1 8615 |
. . . . . . . . . . . . . . . . 17
⊢ ((( bday ‘𝑉) ∈ On ∧ (
bday ‘𝐴)
∈ On ∧ ( bday ‘𝐵) ∈ On) → ((
bday ‘𝑉)
∈ ( bday ‘𝐴) ↔ (( bday
‘𝑉) +no ( bday ‘𝐵)) ∈ (( bday
‘𝐴) +no ( bday ‘𝐵)))) |
| 127 | 125, 57, 56, 126 | mp3an 1463 |
. . . . . . . . . . . . . . . 16
⊢ (( bday ‘𝑉) ∈ ( bday
‘𝐴) ↔
(( bday ‘𝑉) +no ( bday
‘𝐵)) ∈
(( bday ‘𝐴) +no ( bday
‘𝐵))) |
| 128 | 124, 127 | sylib 218 |
. . . . . . . . . . . . . . 15
⊢ (𝜑 → ((
bday ‘𝑉) +no
( bday ‘𝐵)) ∈ (( bday
‘𝐴) +no ( bday ‘𝐵))) |
| 129 | 75, 128 | jca 511 |
. . . . . . . . . . . . . 14
⊢ (𝜑 → (((
bday ‘𝑅) +no
( bday ‘𝑊)) ∈ (( bday
‘𝐴) +no ( bday ‘𝐵)) ∧ (( bday
‘𝑉) +no ( bday ‘𝐵)) ∈ (( bday
‘𝐴) +no ( bday ‘𝐵)))) |
| 130 | | naddel1 8615 |
. . . . . . . . . . . . . . . . 17
⊢ ((( bday ‘𝑅) ∈ On ∧ (
bday ‘𝐴)
∈ On ∧ ( bday ‘𝐵) ∈ On) → ((
bday ‘𝑅)
∈ ( bday ‘𝐴) ↔ (( bday
‘𝑅) +no ( bday ‘𝐵)) ∈ (( bday
‘𝐴) +no ( bday ‘𝐵)))) |
| 131 | 79, 57, 56, 130 | mp3an 1463 |
. . . . . . . . . . . . . . . 16
⊢ (( bday ‘𝑅) ∈ ( bday
‘𝐴) ↔
(( bday ‘𝑅) +no ( bday
‘𝐵)) ∈
(( bday ‘𝐴) +no ( bday
‘𝐵))) |
| 132 | 62, 131 | sylib 218 |
. . . . . . . . . . . . . . 15
⊢ (𝜑 → ((
bday ‘𝑅) +no
( bday ‘𝐵)) ∈ (( bday
‘𝐴) +no ( bday ‘𝐵))) |
| 133 | | naddel12 8628 |
. . . . . . . . . . . . . . . . 17
⊢ ((( bday ‘𝐴) ∈ On ∧ (
bday ‘𝐵)
∈ On) → ((( bday ‘𝑉) ∈ (
bday ‘𝐴) ∧
( bday ‘𝑊) ∈ ( bday
‘𝐵)) →
(( bday ‘𝑉) +no ( bday
‘𝑊)) ∈
(( bday ‘𝐴) +no ( bday
‘𝐵)))) |
| 134 | 57, 56, 133 | mp2an 692 |
. . . . . . . . . . . . . . . 16
⊢ ((( bday ‘𝑉) ∈ ( bday
‘𝐴) ∧
( bday ‘𝑊) ∈ ( bday
‘𝐵)) →
(( bday ‘𝑉) +no ( bday
‘𝑊)) ∈
(( bday ‘𝐴) +no ( bday
‘𝐵))) |
| 135 | 124, 54, 134 | syl2anc 584 |
. . . . . . . . . . . . . . 15
⊢ (𝜑 → ((
bday ‘𝑉) +no
( bday ‘𝑊)) ∈ (( bday
‘𝐴) +no ( bday ‘𝐵))) |
| 136 | 132, 135 | jca 511 |
. . . . . . . . . . . . . 14
⊢ (𝜑 → (((
bday ‘𝑅) +no
( bday ‘𝐵)) ∈ (( bday
‘𝐴) +no ( bday ‘𝐵)) ∧ (( bday
‘𝑉) +no ( bday ‘𝑊)) ∈ (( bday
‘𝐴) +no ( bday ‘𝐵)))) |
| 137 | | naddcl 8605 |
. . . . . . . . . . . . . . . . . 18
⊢ ((( bday ‘𝑉) ∈ On ∧ (
bday ‘𝐵)
∈ On) → (( bday ‘𝑉) +no ( bday
‘𝐵)) ∈
On) |
| 138 | 125, 56, 137 | mp2an 692 |
. . . . . . . . . . . . . . . . 17
⊢ (( bday ‘𝑉) +no ( bday
‘𝐵)) ∈
On |
| 139 | 86, 138 | onun2i 6440 |
. . . . . . . . . . . . . . . 16
⊢ ((( bday ‘𝑅) +no ( bday
‘𝑊)) ∪
(( bday ‘𝑉) +no ( bday
‘𝐵))) ∈
On |
| 140 | | naddcl 8605 |
. . . . . . . . . . . . . . . . . 18
⊢ ((( bday ‘𝑅) ∈ On ∧ (
bday ‘𝐵)
∈ On) → (( bday ‘𝑅) +no ( bday
‘𝐵)) ∈
On) |
| 141 | 79, 56, 140 | mp2an 692 |
. . . . . . . . . . . . . . . . 17
⊢ (( bday ‘𝑅) +no ( bday
‘𝐵)) ∈
On |
| 142 | | naddcl 8605 |
. . . . . . . . . . . . . . . . . 18
⊢ ((( bday ‘𝑉) ∈ On ∧ (
bday ‘𝑊)
∈ On) → (( bday ‘𝑉) +no ( bday
‘𝑊)) ∈
On) |
| 143 | 125, 55, 142 | mp2an 692 |
. . . . . . . . . . . . . . . . 17
⊢ (( bday ‘𝑉) +no ( bday
‘𝑊)) ∈
On |
| 144 | 141, 143 | onun2i 6440 |
. . . . . . . . . . . . . . . 16
⊢ ((( bday ‘𝑅) +no ( bday
‘𝐵)) ∪
(( bday ‘𝑉) +no ( bday
‘𝑊))) ∈
On |
| 145 | | onunel 6424 |
. . . . . . . . . . . . . . . 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
‘𝐵))))) |
| 146 | 139, 144,
89, 145 | mp3an 1463 |
. . . . . . . . . . . . . . 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 6424 |
. . . . . . . . . . . . . . . . 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
‘𝐵))))) |
| 148 | 86, 138, 89, 147 | mp3an 1463 |
. . . . . . . . . . . . . . . 16
⊢ (((( bday ‘𝑅) +no ( bday
‘𝑊)) ∪
(( bday ‘𝑉) +no ( bday
‘𝐵))) ∈
(( bday ‘𝐴) +no ( bday
‘𝐵)) ↔
((( bday ‘𝑅) +no ( bday
‘𝑊)) ∈
(( bday ‘𝐴) +no ( bday
‘𝐵)) ∧
(( bday ‘𝑉) +no ( bday
‘𝐵)) ∈
(( bday ‘𝐴) +no ( bday
‘𝐵)))) |
| 149 | | onunel 6424 |
. . . . . . . . . . . . . . . . 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
‘𝐵))))) |
| 150 | 141, 143,
89, 149 | mp3an 1463 |
. . . . . . . . . . . . . . . 16
⊢ (((( bday ‘𝑅) +no ( bday
‘𝐵)) ∪
(( bday ‘𝑉) +no ( bday
‘𝑊))) ∈
(( bday ‘𝐴) +no ( bday
‘𝐵)) ↔
((( bday ‘𝑅) +no ( bday
‘𝐵)) ∈
(( bday ‘𝐴) +no ( bday
‘𝐵)) ∧
(( bday ‘𝑉) +no ( bday
‘𝑊)) ∈
(( bday ‘𝐴) +no ( bday
‘𝐵)))) |
| 151 | 148, 150 | anbi12i 628 |
. . . . . . . . . . . . . . 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
‘𝐵))))) |
| 152 | 146, 151 | bitri 275 |
. . . . . . . . . . . . . 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
‘𝐵))))) |
| 153 | 129, 136,
152 | sylanbrc 583 |
. . . . . . . . . . . . 13
⊢ (𝜑 → ((((
bday ‘𝑅) +no
( bday ‘𝑊)) ∪ (( bday
‘𝑉) +no ( bday ‘𝐵))) ∪ ((( bday
‘𝑅) +no ( bday ‘𝐵)) ∪ (( bday
‘𝑉) +no ( bday ‘𝑊)))) ∈ (( bday
‘𝐴) +no ( bday ‘𝐵))) |
| 154 | | elun1 4134 |
. . . . . . . . . . . . 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
‘𝐸)))))) |
| 155 | 153, 154 | syl 17 |
. . . . . . . . . . . 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 ‘𝐸)))))) |
| 156 | 122, 155 | eqeltrid 2840 |
. . . . . . . . . . 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 ‘𝐸)))))) |
| 157 | 7, 41, 41, 2, 4, 42, 9, 156 | mulsproplem1 28112 |
. . . . . . . . . 10
⊢ (𝜑 → (( 0s
·s 0s ) ∈ No
∧ ((𝑅 <s 𝑉 ∧ 𝑊 <s 𝐵) → ((𝑅 ·s 𝐵) -s (𝑅 ·s 𝑊)) <s ((𝑉 ·s 𝐵) -s (𝑉 ·s 𝑊))))) |
| 158 | 157 | simprd 495 |
. . . . . . . . 9
⊢ (𝜑 → ((𝑅 <s 𝑉 ∧ 𝑊 <s 𝐵) → ((𝑅 ·s 𝐵) -s (𝑅 ·s 𝑊)) <s ((𝑉 ·s 𝐵) -s (𝑉 ·s 𝑊)))) |
| 159 | 119, 158 | mpan2d 694 |
. . . . . . . 8
⊢ (𝜑 → (𝑅 <s 𝑉 → ((𝑅 ·s 𝐵) -s (𝑅 ·s 𝑊)) <s ((𝑉 ·s 𝐵) -s (𝑉 ·s 𝑊)))) |
| 160 | 159 | imp 406 |
. . . . . . 7
⊢ ((𝜑 ∧ 𝑅 <s 𝑉) → ((𝑅 ·s 𝐵) -s (𝑅 ·s 𝑊)) <s ((𝑉 ·s 𝐵) -s (𝑉 ·s 𝑊))) |
| 161 | 10, 23 | subscld 28059 |
. . . . . . . . 9
⊢ (𝜑 → ((𝑅 ·s 𝐵) -s (𝑅 ·s 𝑊)) ∈ No
) |
| 162 | 27, 29 | subscld 28059 |
. . . . . . . . 9
⊢ (𝜑 → ((𝑉 ·s 𝐵) -s (𝑉 ·s 𝑊)) ∈ No
) |
| 163 | 161, 162,
21 | ltadds1d 27994 |
. . . . . . . 8
⊢ (𝜑 → (((𝑅 ·s 𝐵) -s (𝑅 ·s 𝑊)) <s ((𝑉 ·s 𝐵) -s (𝑉 ·s 𝑊)) ↔ (((𝑅 ·s 𝐵) -s (𝑅 ·s 𝑊)) +s (𝐴 ·s 𝑊)) <s (((𝑉 ·s 𝐵) -s (𝑉 ·s 𝑊)) +s (𝐴 ·s 𝑊)))) |
| 164 | 163 | adantr 480 |
. . . . . . 7
⊢ ((𝜑 ∧ 𝑅 <s 𝑉) → (((𝑅 ·s 𝐵) -s (𝑅 ·s 𝑊)) <s ((𝑉 ·s 𝐵) -s (𝑉 ·s 𝑊)) ↔ (((𝑅 ·s 𝐵) -s (𝑅 ·s 𝑊)) +s (𝐴 ·s 𝑊)) <s (((𝑉 ·s 𝐵) -s (𝑉 ·s 𝑊)) +s (𝐴 ·s 𝑊)))) |
| 165 | 160, 164 | mpbid 232 |
. . . . . 6
⊢ ((𝜑 ∧ 𝑅 <s 𝑉) → (((𝑅 ·s 𝐵) -s (𝑅 ·s 𝑊)) +s (𝐴 ·s 𝑊)) <s (((𝑉 ·s 𝐵) -s (𝑉 ·s 𝑊)) +s (𝐴 ·s 𝑊))) |
| 166 | 10, 21, 23 | addsubsd 28078 |
. . . . . . 7
⊢ (𝜑 → (((𝑅 ·s 𝐵) +s (𝐴 ·s 𝑊)) -s (𝑅 ·s 𝑊)) = (((𝑅 ·s 𝐵) -s (𝑅 ·s 𝑊)) +s (𝐴 ·s 𝑊))) |
| 167 | 166 | adantr 480 |
. . . . . 6
⊢ ((𝜑 ∧ 𝑅 <s 𝑉) → (((𝑅 ·s 𝐵) +s (𝐴 ·s 𝑊)) -s (𝑅 ·s 𝑊)) = (((𝑅 ·s 𝐵) -s (𝑅 ·s 𝑊)) +s (𝐴 ·s 𝑊))) |
| 168 | 27, 21, 29 | addsubsd 28078 |
. . . . . . 7
⊢ (𝜑 → (((𝑉 ·s 𝐵) +s (𝐴 ·s 𝑊)) -s (𝑉 ·s 𝑊)) = (((𝑉 ·s 𝐵) -s (𝑉 ·s 𝑊)) +s (𝐴 ·s 𝑊))) |
| 169 | 168 | adantr 480 |
. . . . . 6
⊢ ((𝜑 ∧ 𝑅 <s 𝑉) → (((𝑉 ·s 𝐵) +s (𝐴 ·s 𝑊)) -s (𝑉 ·s 𝑊)) = (((𝑉 ·s 𝐵) -s (𝑉 ·s 𝑊)) +s (𝐴 ·s 𝑊))) |
| 170 | 165, 167,
169 | 3brtr4d 5130 |
. . . . 5
⊢ ((𝜑 ∧ 𝑅 <s 𝑉) → (((𝑅 ·s 𝐵) +s (𝐴 ·s 𝑊)) -s (𝑅 ·s 𝑊)) <s (((𝑉 ·s 𝐵) +s (𝐴 ·s 𝑊)) -s (𝑉 ·s 𝑊))) |
| 171 | 18, 25, 31, 114, 170 | ltstrd 27731 |
. . . 4
⊢ ((𝜑 ∧ 𝑅 <s 𝑉) → (((𝑅 ·s 𝐵) +s (𝐴 ·s 𝑆)) -s (𝑅 ·s 𝑆)) <s (((𝑉 ·s 𝐵) +s (𝐴 ·s 𝑊)) -s (𝑉 ·s 𝑊))) |
| 172 | 171 | ex 412 |
. . 3
⊢ (𝜑 → (𝑅 <s 𝑉 → (((𝑅 ·s 𝐵) +s (𝐴 ·s 𝑆)) -s (𝑅 ·s 𝑆)) <s (((𝑉 ·s 𝐵) +s (𝐴 ·s 𝑊)) -s (𝑉 ·s 𝑊)))) |
| 173 | 33, 35, 3 | sltssepcd 27768 |
. . . . . . 7
⊢ (𝜑 → 𝐴 <s 𝑉) |
| 174 | 49 | uneq1i 4116 |
. . . . . . . . . . 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
‘𝑊))))) |
| 175 | | 0un 4348 |
. . . . . . . . . . 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
‘𝑊)))) |
| 176 | 174, 175 | eqtri 2759 |
. . . . . . . . . 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
‘𝑊)))) |
| 177 | | naddel12 8628 |
. . . . . . . . . . . . . . 15
⊢ ((( bday ‘𝐴) ∈ On ∧ (
bday ‘𝐵)
∈ On) → ((( bday ‘𝑉) ∈ (
bday ‘𝐴) ∧
( bday ‘𝑆) ∈ ( bday
‘𝐵)) →
(( bday ‘𝑉) +no ( bday
‘𝑆)) ∈
(( bday ‘𝐴) +no ( bday
‘𝐵)))) |
| 178 | 57, 56, 177 | mp2an 692 |
. . . . . . . . . . . . . 14
⊢ ((( bday ‘𝑉) ∈ ( bday
‘𝐴) ∧
( bday ‘𝑆) ∈ ( bday
‘𝐵)) →
(( bday ‘𝑉) +no ( bday
‘𝑆)) ∈
(( bday ‘𝐴) +no ( bday
‘𝐵))) |
| 179 | 124, 64, 178 | syl2anc 584 |
. . . . . . . . . . . . 13
⊢ (𝜑 → ((
bday ‘𝑉) +no
( bday ‘𝑆)) ∈ (( bday
‘𝐴) +no ( bday ‘𝐵))) |
| 180 | 60, 179 | jca 511 |
. . . . . . . . . . . 12
⊢ (𝜑 → (((
bday ‘𝐴) +no
( bday ‘𝑊)) ∈ (( bday
‘𝐴) +no ( bday ‘𝐵)) ∧ (( bday
‘𝑉) +no ( bday ‘𝑆)) ∈ (( bday
‘𝐴) +no ( bday ‘𝐵)))) |
| 181 | 72, 135 | jca 511 |
. . . . . . . . . . . 12
⊢ (𝜑 → (((
bday ‘𝐴) +no
( bday ‘𝑆)) ∈ (( bday
‘𝐴) +no ( bday ‘𝐵)) ∧ (( bday
‘𝑉) +no ( bday ‘𝑊)) ∈ (( bday
‘𝐴) +no ( bday ‘𝐵)))) |
| 182 | | naddcl 8605 |
. . . . . . . . . . . . . . . 16
⊢ ((( bday ‘𝑉) ∈ On ∧ (
bday ‘𝑆)
∈ On) → (( bday ‘𝑉) +no ( bday
‘𝑆)) ∈
On) |
| 183 | 125, 69, 182 | mp2an 692 |
. . . . . . . . . . . . . . 15
⊢ (( bday ‘𝑉) +no ( bday
‘𝑆)) ∈
On |
| 184 | 78, 183 | onun2i 6440 |
. . . . . . . . . . . . . 14
⊢ ((( bday ‘𝐴) +no ( bday
‘𝑊)) ∪
(( bday ‘𝑉) +no ( bday
‘𝑆))) ∈
On |
| 185 | 84, 143 | onun2i 6440 |
. . . . . . . . . . . . . 14
⊢ ((( bday ‘𝐴) +no ( bday
‘𝑆)) ∪
(( bday ‘𝑉) +no ( bday
‘𝑊))) ∈
On |
| 186 | | onunel 6424 |
. . . . . . . . . . . . . 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
‘𝐵))))) |
| 187 | 184, 185,
89, 186 | mp3an 1463 |
. . . . . . . . . . . . 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
‘𝐵)))) |
| 188 | | onunel 6424 |
. . . . . . . . . . . . . . 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
‘𝐵))))) |
| 189 | 78, 183, 89, 188 | mp3an 1463 |
. . . . . . . . . . . . . 14
⊢ (((( bday ‘𝐴) +no ( bday
‘𝑊)) ∪
(( bday ‘𝑉) +no ( bday
‘𝑆))) ∈
(( bday ‘𝐴) +no ( bday
‘𝐵)) ↔
((( bday ‘𝐴) +no ( bday
‘𝑊)) ∈
(( bday ‘𝐴) +no ( bday
‘𝐵)) ∧
(( bday ‘𝑉) +no ( bday
‘𝑆)) ∈
(( bday ‘𝐴) +no ( bday
‘𝐵)))) |
| 190 | | onunel 6424 |
. . . . . . . . . . . . . . 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
‘𝐵))))) |
| 191 | 84, 143, 89, 190 | mp3an 1463 |
. . . . . . . . . . . . . 14
⊢ (((( bday ‘𝐴) +no ( bday
‘𝑆)) ∪
(( bday ‘𝑉) +no ( bday
‘𝑊))) ∈
(( bday ‘𝐴) +no ( bday
‘𝐵)) ↔
((( bday ‘𝐴) +no ( bday
‘𝑆)) ∈
(( bday ‘𝐴) +no ( bday
‘𝐵)) ∧
(( bday ‘𝑉) +no ( bday
‘𝑊)) ∈
(( bday ‘𝐴) +no ( bday
‘𝐵)))) |
| 192 | 189, 191 | anbi12i 628 |
. . . . . . . . . . . . 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
‘𝐵))))) |
| 193 | 187, 192 | bitri 275 |
. . . . . . . . . . . 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
‘𝐵))))) |
| 194 | 180, 181,
193 | sylanbrc 583 |
. . . . . . . . . . 11
⊢ (𝜑 → ((((
bday ‘𝐴) +no
( bday ‘𝑊)) ∪ (( bday
‘𝑉) +no ( bday ‘𝑆))) ∪ ((( bday
‘𝐴) +no ( bday ‘𝑆)) ∪ (( bday
‘𝑉) +no ( bday ‘𝑊)))) ∈ (( bday
‘𝐴) +no ( bday ‘𝐵))) |
| 195 | | elun1 4134 |
. . . . . . . . . . 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
‘𝐸)))))) |
| 196 | 194, 195 | syl 17 |
. . . . . . . . . 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 ‘𝐸)))))) |
| 197 | 176, 196 | eqeltrid 2840 |
. . . . . . . . 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 ‘𝐸)))))) |
| 198 | 7, 41, 41, 11, 4, 42, 43, 197 | mulsproplem1 28112 |
. . . . . . . 8
⊢ (𝜑 → (( 0s
·s 0s ) ∈ No
∧ ((𝐴 <s 𝑉 ∧ 𝑊 <s 𝑆) → ((𝐴 ·s 𝑆) -s (𝐴 ·s 𝑊)) <s ((𝑉 ·s 𝑆) -s (𝑉 ·s 𝑊))))) |
| 199 | 198 | simprd 495 |
. . . . . . 7
⊢ (𝜑 → ((𝐴 <s 𝑉 ∧ 𝑊 <s 𝑆) → ((𝐴 ·s 𝑆) -s (𝐴 ·s 𝑊)) <s ((𝑉 ·s 𝑆) -s (𝑉 ·s 𝑊)))) |
| 200 | 173, 39, 199 | mp2and 699 |
. . . . . 6
⊢ (𝜑 → ((𝐴 ·s 𝑆) -s (𝐴 ·s 𝑊)) <s ((𝑉 ·s 𝑆) -s (𝑉 ·s 𝑊))) |
| 201 | 7, 26, 13 | mulsproplem4 28115 |
. . . . . . . 8
⊢ (𝜑 → (𝑉 ·s 𝑆) ∈ No
) |
| 202 | 14, 201, 21, 29 | ltsubsubsbd 28079 |
. . . . . . 7
⊢ (𝜑 → (((𝐴 ·s 𝑆) -s (𝐴 ·s 𝑊)) <s ((𝑉 ·s 𝑆) -s (𝑉 ·s 𝑊)) ↔ ((𝐴 ·s 𝑆) -s (𝑉 ·s 𝑆)) <s ((𝐴 ·s 𝑊) -s (𝑉 ·s 𝑊)))) |
| 203 | 14, 201 | subscld 28059 |
. . . . . . . 8
⊢ (𝜑 → ((𝐴 ·s 𝑆) -s (𝑉 ·s 𝑆)) ∈ No
) |
| 204 | 21, 29 | subscld 28059 |
. . . . . . . 8
⊢ (𝜑 → ((𝐴 ·s 𝑊) -s (𝑉 ·s 𝑊)) ∈ No
) |
| 205 | 203, 204,
27 | ltadds2d 27993 |
. . . . . . 7
⊢ (𝜑 → (((𝐴 ·s 𝑆) -s (𝑉 ·s 𝑆)) <s ((𝐴 ·s 𝑊) -s (𝑉 ·s 𝑊)) ↔ ((𝑉 ·s 𝐵) +s ((𝐴 ·s 𝑆) -s (𝑉 ·s 𝑆))) <s ((𝑉 ·s 𝐵) +s ((𝐴 ·s 𝑊) -s (𝑉 ·s 𝑊))))) |
| 206 | 202, 205 | bitrd 279 |
. . . . . 6
⊢ (𝜑 → (((𝐴 ·s 𝑆) -s (𝐴 ·s 𝑊)) <s ((𝑉 ·s 𝑆) -s (𝑉 ·s 𝑊)) ↔ ((𝑉 ·s 𝐵) +s ((𝐴 ·s 𝑆) -s (𝑉 ·s 𝑆))) <s ((𝑉 ·s 𝐵) +s ((𝐴 ·s 𝑊) -s (𝑉 ·s 𝑊))))) |
| 207 | 200, 206 | mpbid 232 |
. . . . 5
⊢ (𝜑 → ((𝑉 ·s 𝐵) +s ((𝐴 ·s 𝑆) -s (𝑉 ·s 𝑆))) <s ((𝑉 ·s 𝐵) +s ((𝐴 ·s 𝑊) -s (𝑉 ·s 𝑊)))) |
| 208 | 27, 14, 201 | addsubsassd 28077 |
. . . . 5
⊢ (𝜑 → (((𝑉 ·s 𝐵) +s (𝐴 ·s 𝑆)) -s (𝑉 ·s 𝑆)) = ((𝑉 ·s 𝐵) +s ((𝐴 ·s 𝑆) -s (𝑉 ·s 𝑆)))) |
| 209 | 27, 21, 29 | addsubsassd 28077 |
. . . . 5
⊢ (𝜑 → (((𝑉 ·s 𝐵) +s (𝐴 ·s 𝑊)) -s (𝑉 ·s 𝑊)) = ((𝑉 ·s 𝐵) +s ((𝐴 ·s 𝑊) -s (𝑉 ·s 𝑊)))) |
| 210 | 207, 208,
209 | 3brtr4d 5130 |
. . . 4
⊢ (𝜑 → (((𝑉 ·s 𝐵) +s (𝐴 ·s 𝑆)) -s (𝑉 ·s 𝑆)) <s (((𝑉 ·s 𝐵) +s (𝐴 ·s 𝑊)) -s (𝑉 ·s 𝑊))) |
| 211 | | oveq1 7365 |
. . . . . . 7
⊢ (𝑅 = 𝑉 → (𝑅 ·s 𝐵) = (𝑉 ·s 𝐵)) |
| 212 | 211 | oveq1d 7373 |
. . . . . 6
⊢ (𝑅 = 𝑉 → ((𝑅 ·s 𝐵) +s (𝐴 ·s 𝑆)) = ((𝑉 ·s 𝐵) +s (𝐴 ·s 𝑆))) |
| 213 | | oveq1 7365 |
. . . . . 6
⊢ (𝑅 = 𝑉 → (𝑅 ·s 𝑆) = (𝑉 ·s 𝑆)) |
| 214 | 212, 213 | oveq12d 7376 |
. . . . 5
⊢ (𝑅 = 𝑉 → (((𝑅 ·s 𝐵) +s (𝐴 ·s 𝑆)) -s (𝑅 ·s 𝑆)) = (((𝑉 ·s 𝐵) +s (𝐴 ·s 𝑆)) -s (𝑉 ·s 𝑆))) |
| 215 | 214 | breq1d 5108 |
. . . 4
⊢ (𝑅 = 𝑉 → ((((𝑅 ·s 𝐵) +s (𝐴 ·s 𝑆)) -s (𝑅 ·s 𝑆)) <s (((𝑉 ·s 𝐵) +s (𝐴 ·s 𝑊)) -s (𝑉 ·s 𝑊)) ↔ (((𝑉 ·s 𝐵) +s (𝐴 ·s 𝑆)) -s (𝑉 ·s 𝑆)) <s (((𝑉 ·s 𝐵) +s (𝐴 ·s 𝑊)) -s (𝑉 ·s 𝑊)))) |
| 216 | 210, 215 | syl5ibrcom 247 |
. . 3
⊢ (𝜑 → (𝑅 = 𝑉 → (((𝑅 ·s 𝐵) +s (𝐴 ·s 𝑆)) -s (𝑅 ·s 𝑆)) <s (((𝑉 ·s 𝐵) +s (𝐴 ·s 𝑊)) -s (𝑉 ·s 𝑊)))) |
| 217 | 17 | adantr 480 |
. . . . 5
⊢ ((𝜑 ∧ 𝑉 <s 𝑅) → (((𝑅 ·s 𝐵) +s (𝐴 ·s 𝑆)) -s (𝑅 ·s 𝑆)) ∈ No
) |
| 218 | 27, 14 | addscld 27976 |
. . . . . . 7
⊢ (𝜑 → ((𝑉 ·s 𝐵) +s (𝐴 ·s 𝑆)) ∈ No
) |
| 219 | 218, 201 | subscld 28059 |
. . . . . 6
⊢ (𝜑 → (((𝑉 ·s 𝐵) +s (𝐴 ·s 𝑆)) -s (𝑉 ·s 𝑆)) ∈ No
) |
| 220 | 219 | adantr 480 |
. . . . 5
⊢ ((𝜑 ∧ 𝑉 <s 𝑅) → (((𝑉 ·s 𝐵) +s (𝐴 ·s 𝑆)) -s (𝑉 ·s 𝑆)) ∈ No
) |
| 221 | 30 | adantr 480 |
. . . . 5
⊢ ((𝜑 ∧ 𝑉 <s 𝑅) → (((𝑉 ·s 𝐵) +s (𝐴 ·s 𝑊)) -s (𝑉 ·s 𝑊)) ∈ No
) |
| 222 | | sltsright 27857 |
. . . . . . . . . . 11
⊢ (𝐵 ∈
No → {𝐵}
<<s ( R ‘𝐵)) |
| 223 | 9, 222 | syl 17 |
. . . . . . . . . 10
⊢ (𝜑 → {𝐵} <<s ( R ‘𝐵)) |
| 224 | 223, 118,
12 | sltssepcd 27768 |
. . . . . . . . 9
⊢ (𝜑 → 𝐵 <s 𝑆) |
| 225 | 49 | uneq1i 4116 |
. . . . . . . . . . . . 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
‘𝐵))))) |
| 226 | | 0un 4348 |
. . . . . . . . . . . . 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
‘𝐵)))) |
| 227 | 225, 226 | eqtri 2759 |
. . . . . . . . . . . 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
‘𝐵)))) |
| 228 | 128, 67 | jca 511 |
. . . . . . . . . . . . . 14
⊢ (𝜑 → (((
bday ‘𝑉) +no
( bday ‘𝐵)) ∈ (( bday
‘𝐴) +no ( bday ‘𝐵)) ∧ (( bday
‘𝑅) +no ( bday ‘𝑆)) ∈ (( bday
‘𝐴) +no ( bday ‘𝐵)))) |
| 229 | 179, 132 | jca 511 |
. . . . . . . . . . . . . 14
⊢ (𝜑 → (((
bday ‘𝑉) +no
( bday ‘𝑆)) ∈ (( bday
‘𝐴) +no ( bday ‘𝐵)) ∧ (( bday
‘𝑅) +no ( bday ‘𝐵)) ∈ (( bday
‘𝐴) +no ( bday ‘𝐵)))) |
| 230 | 138, 81 | onun2i 6440 |
. . . . . . . . . . . . . . . 16
⊢ ((( bday ‘𝑉) +no ( bday
‘𝐵)) ∪
(( bday ‘𝑅) +no ( bday
‘𝑆))) ∈
On |
| 231 | 183, 141 | onun2i 6440 |
. . . . . . . . . . . . . . . 16
⊢ ((( bday ‘𝑉) +no ( bday
‘𝑆)) ∪
(( bday ‘𝑅) +no ( bday
‘𝐵))) ∈
On |
| 232 | | onunel 6424 |
. . . . . . . . . . . . . . . 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
‘𝐵))))) |
| 233 | 230, 231,
89, 232 | mp3an 1463 |
. . . . . . . . . . . . . . 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
‘𝐵)))) |
| 234 | | onunel 6424 |
. . . . . . . . . . . . . . . . 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
‘𝐵))))) |
| 235 | 138, 81, 89, 234 | mp3an 1463 |
. . . . . . . . . . . . . . . 16
⊢ (((( bday ‘𝑉) +no ( bday
‘𝐵)) ∪
(( bday ‘𝑅) +no ( bday
‘𝑆))) ∈
(( bday ‘𝐴) +no ( bday
‘𝐵)) ↔
((( bday ‘𝑉) +no ( bday
‘𝐵)) ∈
(( bday ‘𝐴) +no ( bday
‘𝐵)) ∧
(( bday ‘𝑅) +no ( bday
‘𝑆)) ∈
(( bday ‘𝐴) +no ( bday
‘𝐵)))) |
| 236 | | onunel 6424 |
. . . . . . . . . . . . . . . . 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
‘𝐵))))) |
| 237 | 183, 141,
89, 236 | mp3an 1463 |
. . . . . . . . . . . . . . . 16
⊢ (((( bday ‘𝑉) +no ( bday
‘𝑆)) ∪
(( bday ‘𝑅) +no ( bday
‘𝐵))) ∈
(( bday ‘𝐴) +no ( bday
‘𝐵)) ↔
((( bday ‘𝑉) +no ( bday
‘𝑆)) ∈
(( bday ‘𝐴) +no ( bday
‘𝐵)) ∧
(( bday ‘𝑅) +no ( bday
‘𝐵)) ∈
(( bday ‘𝐴) +no ( bday
‘𝐵)))) |
| 238 | 235, 237 | anbi12i 628 |
. . . . . . . . . . . . . . 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
‘𝐵))))) |
| 239 | 233, 238 | bitri 275 |
. . . . . . . . . . . . . 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
‘𝐵))))) |
| 240 | 228, 229,
239 | sylanbrc 583 |
. . . . . . . . . . . . 13
⊢ (𝜑 → ((((
bday ‘𝑉) +no
( bday ‘𝐵)) ∪ (( bday
‘𝑅) +no ( bday ‘𝑆))) ∪ ((( bday
‘𝑉) +no ( bday ‘𝑆)) ∪ (( bday
‘𝑅) +no ( bday ‘𝐵)))) ∈ (( bday
‘𝐴) +no ( bday ‘𝐵))) |
| 241 | | elun1 4134 |
. . . . . . . . . . . . 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
‘𝐸)))))) |
| 242 | 240, 241 | syl 17 |
. . . . . . . . . . . 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 ‘𝐸)))))) |
| 243 | 227, 242 | eqeltrid 2840 |
. . . . . . . . . . 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 ‘𝐸)))))) |
| 244 | 7, 41, 41, 4, 2, 9,
43, 243 | mulsproplem1 28112 |
. . . . . . . . . 10
⊢ (𝜑 → (( 0s
·s 0s ) ∈ No
∧ ((𝑉 <s 𝑅 ∧ 𝐵 <s 𝑆) → ((𝑉 ·s 𝑆) -s (𝑉 ·s 𝐵)) <s ((𝑅 ·s 𝑆) -s (𝑅 ·s 𝐵))))) |
| 245 | 244 | simprd 495 |
. . . . . . . . 9
⊢ (𝜑 → ((𝑉 <s 𝑅 ∧ 𝐵 <s 𝑆) → ((𝑉 ·s 𝑆) -s (𝑉 ·s 𝐵)) <s ((𝑅 ·s 𝑆) -s (𝑅 ·s 𝐵)))) |
| 246 | 224, 245 | mpan2d 694 |
. . . . . . . 8
⊢ (𝜑 → (𝑉 <s 𝑅 → ((𝑉 ·s 𝑆) -s (𝑉 ·s 𝐵)) <s ((𝑅 ·s 𝑆) -s (𝑅 ·s 𝐵)))) |
| 247 | 246 | imp 406 |
. . . . . . 7
⊢ ((𝜑 ∧ 𝑉 <s 𝑅) → ((𝑉 ·s 𝑆) -s (𝑉 ·s 𝐵)) <s ((𝑅 ·s 𝑆) -s (𝑅 ·s 𝐵))) |
| 248 | 201, 27, 16, 10 | ltsubsubs2bd 28080 |
. . . . . . . . 9
⊢ (𝜑 → (((𝑉 ·s 𝑆) -s (𝑉 ·s 𝐵)) <s ((𝑅 ·s 𝑆) -s (𝑅 ·s 𝐵)) ↔ ((𝑅 ·s 𝐵) -s (𝑅 ·s 𝑆)) <s ((𝑉 ·s 𝐵) -s (𝑉 ·s 𝑆)))) |
| 249 | 10, 16 | subscld 28059 |
. . . . . . . . . 10
⊢ (𝜑 → ((𝑅 ·s 𝐵) -s (𝑅 ·s 𝑆)) ∈ No
) |
| 250 | 27, 201 | subscld 28059 |
. . . . . . . . . 10
⊢ (𝜑 → ((𝑉 ·s 𝐵) -s (𝑉 ·s 𝑆)) ∈ No
) |
| 251 | 249, 250,
14 | ltadds1d 27994 |
. . . . . . . . 9
⊢ (𝜑 → (((𝑅 ·s 𝐵) -s (𝑅 ·s 𝑆)) <s ((𝑉 ·s 𝐵) -s (𝑉 ·s 𝑆)) ↔ (((𝑅 ·s 𝐵) -s (𝑅 ·s 𝑆)) +s (𝐴 ·s 𝑆)) <s (((𝑉 ·s 𝐵) -s (𝑉 ·s 𝑆)) +s (𝐴 ·s 𝑆)))) |
| 252 | 248, 251 | bitrd 279 |
. . . . . . . 8
⊢ (𝜑 → (((𝑉 ·s 𝑆) -s (𝑉 ·s 𝐵)) <s ((𝑅 ·s 𝑆) -s (𝑅 ·s 𝐵)) ↔ (((𝑅 ·s 𝐵) -s (𝑅 ·s 𝑆)) +s (𝐴 ·s 𝑆)) <s (((𝑉 ·s 𝐵) -s (𝑉 ·s 𝑆)) +s (𝐴 ·s 𝑆)))) |
| 253 | 252 | adantr 480 |
. . . . . . 7
⊢ ((𝜑 ∧ 𝑉 <s 𝑅) → (((𝑉 ·s 𝑆) -s (𝑉 ·s 𝐵)) <s ((𝑅 ·s 𝑆) -s (𝑅 ·s 𝐵)) ↔ (((𝑅 ·s 𝐵) -s (𝑅 ·s 𝑆)) +s (𝐴 ·s 𝑆)) <s (((𝑉 ·s 𝐵) -s (𝑉 ·s 𝑆)) +s (𝐴 ·s 𝑆)))) |
| 254 | 247, 253 | mpbid 232 |
. . . . . 6
⊢ ((𝜑 ∧ 𝑉 <s 𝑅) → (((𝑅 ·s 𝐵) -s (𝑅 ·s 𝑆)) +s (𝐴 ·s 𝑆)) <s (((𝑉 ·s 𝐵) -s (𝑉 ·s 𝑆)) +s (𝐴 ·s 𝑆))) |
| 255 | 10, 14, 16 | addsubsd 28078 |
. . . . . . 7
⊢ (𝜑 → (((𝑅 ·s 𝐵) +s (𝐴 ·s 𝑆)) -s (𝑅 ·s 𝑆)) = (((𝑅 ·s 𝐵) -s (𝑅 ·s 𝑆)) +s (𝐴 ·s 𝑆))) |
| 256 | 255 | adantr 480 |
. . . . . 6
⊢ ((𝜑 ∧ 𝑉 <s 𝑅) → (((𝑅 ·s 𝐵) +s (𝐴 ·s 𝑆)) -s (𝑅 ·s 𝑆)) = (((𝑅 ·s 𝐵) -s (𝑅 ·s 𝑆)) +s (𝐴 ·s 𝑆))) |
| 257 | 27, 14, 201 | addsubsd 28078 |
. . . . . . 7
⊢ (𝜑 → (((𝑉 ·s 𝐵) +s (𝐴 ·s 𝑆)) -s (𝑉 ·s 𝑆)) = (((𝑉 ·s 𝐵) -s (𝑉 ·s 𝑆)) +s (𝐴 ·s 𝑆))) |
| 258 | 257 | adantr 480 |
. . . . . 6
⊢ ((𝜑 ∧ 𝑉 <s 𝑅) → (((𝑉 ·s 𝐵) +s (𝐴 ·s 𝑆)) -s (𝑉 ·s 𝑆)) = (((𝑉 ·s 𝐵) -s (𝑉 ·s 𝑆)) +s (𝐴 ·s 𝑆))) |
| 259 | 254, 256,
258 | 3brtr4d 5130 |
. . . . 5
⊢ ((𝜑 ∧ 𝑉 <s 𝑅) → (((𝑅 ·s 𝐵) +s (𝐴 ·s 𝑆)) -s (𝑅 ·s 𝑆)) <s (((𝑉 ·s 𝐵) +s (𝐴 ·s 𝑆)) -s (𝑉 ·s 𝑆))) |
| 260 | 210 | adantr 480 |
. . . . 5
⊢ ((𝜑 ∧ 𝑉 <s 𝑅) → (((𝑉 ·s 𝐵) +s (𝐴 ·s 𝑆)) -s (𝑉 ·s 𝑆)) <s (((𝑉 ·s 𝐵) +s (𝐴 ·s 𝑊)) -s (𝑉 ·s 𝑊))) |
| 261 | 217, 220,
221, 259, 260 | ltstrd 27731 |
. . . 4
⊢ ((𝜑 ∧ 𝑉 <s 𝑅) → (((𝑅 ·s 𝐵) +s (𝐴 ·s 𝑆)) -s (𝑅 ·s 𝑆)) <s (((𝑉 ·s 𝐵) +s (𝐴 ·s 𝑊)) -s (𝑉 ·s 𝑊))) |
| 262 | 261 | ex 412 |
. . 3
⊢ (𝜑 → (𝑉 <s 𝑅 → (((𝑅 ·s 𝐵) +s (𝐴 ·s 𝑆)) -s (𝑅 ·s 𝑆)) <s (((𝑉 ·s 𝐵) +s (𝐴 ·s 𝑊)) -s (𝑉 ·s 𝑊)))) |
| 263 | 172, 216,
262 | 3jaod 1431 |
. 2
⊢ (𝜑 → ((𝑅 <s 𝑉 ∨ 𝑅 = 𝑉 ∨ 𝑉 <s 𝑅) → (((𝑅 ·s 𝐵) +s (𝐴 ·s 𝑆)) -s (𝑅 ·s 𝑆)) <s (((𝑉 ·s 𝐵) +s (𝐴 ·s 𝑊)) -s (𝑉 ·s 𝑊)))) |
| 264 | 6, 263 | mpd 15 |
1
⊢ (𝜑 → (((𝑅 ·s 𝐵) +s (𝐴 ·s 𝑆)) -s (𝑅 ·s 𝑆)) <s (((𝑉 ·s 𝐵) +s (𝐴 ·s 𝑊)) -s (𝑉 ·s 𝑊))) |