Step | Hyp | Ref
| Expression |
1 | | oveq1 7397 |
. . . . . 6
โข (๐ฅ๐ = ๐ โ (๐ฅ๐ ยทs
(๐ต +s ๐ถ)) = (๐ ยทs (๐ต +s ๐ถ))) |
2 | | oveq1 7397 |
. . . . . . 7
โข (๐ฅ๐ = ๐ โ (๐ฅ๐ ยทs
๐ต) = (๐ ยทs ๐ต)) |
3 | | oveq1 7397 |
. . . . . . 7
โข (๐ฅ๐ = ๐ โ (๐ฅ๐ ยทs
๐ถ) = (๐ ยทs ๐ถ)) |
4 | 2, 3 | oveq12d 7408 |
. . . . . 6
โข (๐ฅ๐ = ๐ โ ((๐ฅ๐ ยทs
๐ต) +s (๐ฅ๐
ยทs ๐ถ)) =
((๐ ยทs
๐ต) +s (๐ ยทs ๐ถ))) |
5 | 1, 4 | eqeq12d 2747 |
. . . . 5
โข (๐ฅ๐ = ๐ โ ((๐ฅ๐ ยทs
(๐ต +s ๐ถ)) = ((๐ฅ๐ ยทs
๐ต) +s (๐ฅ๐
ยทs ๐ถ))
โ (๐
ยทs (๐ต
+s ๐ถ)) = ((๐ ยทs ๐ต) +s (๐ ยทs ๐ถ)))) |
6 | | addsdilem3.4 |
. . . . . 6
โข (๐ โ โ๐ฅ๐ โ (( L โ๐ด) โช ( R โ๐ด))(๐ฅ๐ ยทs
(๐ต +s ๐ถ)) = ((๐ฅ๐ ยทs
๐ต) +s (๐ฅ๐
ยทs ๐ถ))) |
7 | 6 | adantr 481 |
. . . . 5
โข ((๐ โง ๐) โ โ๐ฅ๐ โ (( L โ๐ด) โช ( R โ๐ด))(๐ฅ๐ ยทs
(๐ต +s ๐ถ)) = ((๐ฅ๐ ยทs
๐ต) +s (๐ฅ๐
ยทs ๐ถ))) |
8 | | addsdilem3.7 |
. . . . . 6
โข (๐ โ ๐ โ (( L โ๐ด) โช ( R โ๐ด))) |
9 | 8 | adantl 482 |
. . . . 5
โข ((๐ โง ๐) โ ๐ โ (( L โ๐ด) โช ( R โ๐ด))) |
10 | 5, 7, 9 | rspcdva 3607 |
. . . 4
โข ((๐ โง ๐) โ (๐ ยทs (๐ต +s ๐ถ)) = ((๐ ยทs ๐ต) +s (๐ ยทs ๐ถ))) |
11 | | oveq1 7397 |
. . . . . . 7
โข (๐ฆ๐ = ๐ โ (๐ฆ๐ +s ๐ถ) = (๐ +s ๐ถ)) |
12 | 11 | oveq2d 7406 |
. . . . . 6
โข (๐ฆ๐ = ๐ โ (๐ด ยทs (๐ฆ๐ +s ๐ถ)) = (๐ด ยทs (๐ +s ๐ถ))) |
13 | | oveq2 7398 |
. . . . . . 7
โข (๐ฆ๐ = ๐ โ (๐ด ยทs ๐ฆ๐) = (๐ด ยทs ๐)) |
14 | 13 | oveq1d 7405 |
. . . . . 6
โข (๐ฆ๐ = ๐ โ ((๐ด ยทs ๐ฆ๐) +s (๐ด ยทs ๐ถ)) = ((๐ด ยทs ๐) +s (๐ด ยทs ๐ถ))) |
15 | 12, 14 | eqeq12d 2747 |
. . . . 5
โข (๐ฆ๐ = ๐ โ ((๐ด ยทs (๐ฆ๐ +s ๐ถ)) = ((๐ด ยทs ๐ฆ๐) +s (๐ด ยทs ๐ถ)) โ (๐ด ยทs (๐ +s ๐ถ)) = ((๐ด ยทs ๐) +s (๐ด ยทs ๐ถ)))) |
16 | | addsdilem3.5 |
. . . . . 6
โข (๐ โ โ๐ฆ๐ โ (( L โ๐ต) โช ( R โ๐ต))(๐ด ยทs (๐ฆ๐ +s ๐ถ)) = ((๐ด ยทs ๐ฆ๐) +s (๐ด ยทs ๐ถ))) |
17 | 16 | adantr 481 |
. . . . 5
โข ((๐ โง ๐) โ โ๐ฆ๐ โ (( L โ๐ต) โช ( R โ๐ต))(๐ด ยทs (๐ฆ๐ +s ๐ถ)) = ((๐ด ยทs ๐ฆ๐) +s (๐ด ยทs ๐ถ))) |
18 | | addsdilem3.8 |
. . . . . 6
โข (๐ โ ๐ โ (( L โ๐ต) โช ( R โ๐ต))) |
19 | 18 | adantl 482 |
. . . . 5
โข ((๐ โง ๐) โ ๐ โ (( L โ๐ต) โช ( R โ๐ต))) |
20 | 15, 17, 19 | rspcdva 3607 |
. . . 4
โข ((๐ โง ๐) โ (๐ด ยทs (๐ +s ๐ถ)) = ((๐ด ยทs ๐) +s (๐ด ยทs ๐ถ))) |
21 | 10, 20 | oveq12d 7408 |
. . 3
โข ((๐ โง ๐) โ ((๐ ยทs (๐ต +s ๐ถ)) +s (๐ด ยทs (๐ +s ๐ถ))) = (((๐ ยทs ๐ต) +s (๐ ยทs ๐ถ)) +s ((๐ด ยทs ๐) +s (๐ด ยทs ๐ถ)))) |
22 | | oveq1 7397 |
. . . . 5
โข (๐ฅ๐ = ๐ โ (๐ฅ๐ ยทs
(๐ฆ๐
+s ๐ถ)) = (๐ ยทs (๐ฆ๐
+s ๐ถ))) |
23 | | oveq1 7397 |
. . . . . 6
โข (๐ฅ๐ = ๐ โ (๐ฅ๐ ยทs
๐ฆ๐) =
(๐ ยทs
๐ฆ๐)) |
24 | 23, 3 | oveq12d 7408 |
. . . . 5
โข (๐ฅ๐ = ๐ โ ((๐ฅ๐ ยทs
๐ฆ๐)
+s (๐ฅ๐ ยทs
๐ถ)) = ((๐ ยทs ๐ฆ๐) +s (๐ ยทs ๐ถ))) |
25 | 22, 24 | eqeq12d 2747 |
. . . 4
โข (๐ฅ๐ = ๐ โ ((๐ฅ๐ ยทs
(๐ฆ๐
+s ๐ถ)) = ((๐ฅ๐
ยทs ๐ฆ๐) +s (๐ฅ๐
ยทs ๐ถ))
โ (๐
ยทs (๐ฆ๐ +s ๐ถ)) = ((๐ ยทs ๐ฆ๐) +s (๐ ยทs ๐ถ)))) |
26 | 11 | oveq2d 7406 |
. . . . 5
โข (๐ฆ๐ = ๐ โ (๐ ยทs (๐ฆ๐ +s ๐ถ)) = (๐ ยทs (๐ +s ๐ถ))) |
27 | | oveq2 7398 |
. . . . . 6
โข (๐ฆ๐ = ๐ โ (๐ ยทs ๐ฆ๐) = (๐ ยทs ๐)) |
28 | 27 | oveq1d 7405 |
. . . . 5
โข (๐ฆ๐ = ๐ โ ((๐ ยทs ๐ฆ๐) +s (๐ ยทs ๐ถ)) = ((๐ ยทs ๐) +s (๐ ยทs ๐ถ))) |
29 | 26, 28 | eqeq12d 2747 |
. . . 4
โข (๐ฆ๐ = ๐ โ ((๐ ยทs (๐ฆ๐ +s ๐ถ)) = ((๐ ยทs ๐ฆ๐) +s (๐ ยทs ๐ถ)) โ (๐ ยทs (๐ +s ๐ถ)) = ((๐ ยทs ๐) +s (๐ ยทs ๐ถ)))) |
30 | | addsdilem3.6 |
. . . . 5
โข (๐ โ โ๐ฅ๐ โ (( L โ๐ด) โช ( R โ๐ด))โ๐ฆ๐ โ (( L โ๐ต) โช ( R โ๐ต))(๐ฅ๐ ยทs
(๐ฆ๐
+s ๐ถ)) = ((๐ฅ๐
ยทs ๐ฆ๐) +s (๐ฅ๐
ยทs ๐ถ))) |
31 | 30 | adantr 481 |
. . . 4
โข ((๐ โง ๐) โ โ๐ฅ๐ โ (( L โ๐ด) โช ( R โ๐ด))โ๐ฆ๐ โ (( L โ๐ต) โช ( R โ๐ต))(๐ฅ๐ ยทs
(๐ฆ๐
+s ๐ถ)) = ((๐ฅ๐
ยทs ๐ฆ๐) +s (๐ฅ๐
ยทs ๐ถ))) |
32 | 25, 29, 31, 9, 19 | rspc2dv 3619 |
. . 3
โข ((๐ โง ๐) โ (๐ ยทs (๐ +s ๐ถ)) = ((๐ ยทs ๐) +s (๐ ยทs ๐ถ))) |
33 | 21, 32 | oveq12d 7408 |
. 2
โข ((๐ โง ๐) โ (((๐ ยทs (๐ต +s ๐ถ)) +s (๐ด ยทs (๐ +s ๐ถ))) -s (๐ ยทs (๐ +s ๐ถ))) = ((((๐ ยทs ๐ต) +s (๐ ยทs ๐ถ)) +s ((๐ด ยทs ๐) +s (๐ด ยทs ๐ถ))) -s ((๐ ยทs ๐) +s (๐ ยทs ๐ถ)))) |
34 | | leftssno 27293 |
. . . . . . . . . . 11
โข ( L
โ๐ด) โ No |
35 | | rightssno 27294 |
. . . . . . . . . . 11
โข ( R
โ๐ด) โ No |
36 | 34, 35 | unssi 4178 |
. . . . . . . . . 10
โข (( L
โ๐ด) โช ( R
โ๐ด)) โ No |
37 | 36, 8 | sselid 3973 |
. . . . . . . . 9
โข (๐ โ ๐ โ No
) |
38 | 37 | adantl 482 |
. . . . . . . 8
โข ((๐ โง ๐) โ ๐ โ No
) |
39 | | addsdilem3.2 |
. . . . . . . . 9
โข (๐ โ ๐ต โ No
) |
40 | 39 | adantr 481 |
. . . . . . . 8
โข ((๐ โง ๐) โ ๐ต โ No
) |
41 | 38, 40 | mulscld 27499 |
. . . . . . 7
โข ((๐ โง ๐) โ (๐ ยทs ๐ต) โ No
) |
42 | | addsdilem3.3 |
. . . . . . . . 9
โข (๐ โ ๐ถ โ No
) |
43 | 42 | adantr 481 |
. . . . . . . 8
โข ((๐ โง ๐) โ ๐ถ โ No
) |
44 | 38, 43 | mulscld 27499 |
. . . . . . 7
โข ((๐ โง ๐) โ (๐ ยทs ๐ถ) โ No
) |
45 | | pncans 27449 |
. . . . . . 7
โข (((๐ ยทs ๐ต) โ
No โง (๐
ยทs ๐ถ)
โ No ) โ (((๐ ยทs ๐ต) +s (๐ ยทs ๐ถ)) -s (๐ ยทs ๐ถ)) = (๐ ยทs ๐ต)) |
46 | 41, 44, 45 | syl2anc 584 |
. . . . . 6
โข ((๐ โง ๐) โ (((๐ ยทs ๐ต) +s (๐ ยทs ๐ถ)) -s (๐ ยทs ๐ถ)) = (๐ ยทs ๐ต)) |
47 | 46 | oveq1d 7405 |
. . . . 5
โข ((๐ โง ๐) โ ((((๐ ยทs ๐ต) +s (๐ ยทs ๐ถ)) -s (๐ ยทs ๐ถ)) +s ((๐ด ยทs ๐) +s (๐ด ยทs ๐ถ))) = ((๐ ยทs ๐ต) +s ((๐ด ยทs ๐) +s (๐ด ยทs ๐ถ)))) |
48 | 41, 44 | addscld 27375 |
. . . . . 6
โข ((๐ โง ๐) โ ((๐ ยทs ๐ต) +s (๐ ยทs ๐ถ)) โ No
) |
49 | | addsdilem3.1 |
. . . . . . . . 9
โข (๐ โ ๐ด โ No
) |
50 | 49 | adantr 481 |
. . . . . . . 8
โข ((๐ โง ๐) โ ๐ด โ No
) |
51 | | leftssno 27293 |
. . . . . . . . . . 11
โข ( L
โ๐ต) โ No |
52 | | rightssno 27294 |
. . . . . . . . . . 11
โข ( R
โ๐ต) โ No |
53 | 51, 52 | unssi 4178 |
. . . . . . . . . 10
โข (( L
โ๐ต) โช ( R
โ๐ต)) โ No |
54 | 53, 18 | sselid 3973 |
. . . . . . . . 9
โข (๐ โ ๐ โ No
) |
55 | 54 | adantl 482 |
. . . . . . . 8
โข ((๐ โง ๐) โ ๐ โ No
) |
56 | 50, 55 | mulscld 27499 |
. . . . . . 7
โข ((๐ โง ๐) โ (๐ด ยทs ๐) โ No
) |
57 | 49, 42 | mulscld 27499 |
. . . . . . . 8
โข (๐ โ (๐ด ยทs ๐ถ) โ No
) |
58 | 57 | adantr 481 |
. . . . . . 7
โข ((๐ โง ๐) โ (๐ด ยทs ๐ถ) โ No
) |
59 | 56, 58 | addscld 27375 |
. . . . . 6
โข ((๐ โง ๐) โ ((๐ด ยทs ๐) +s (๐ด ยทs ๐ถ)) โ No
) |
60 | 48, 59, 44 | addsubsd 27458 |
. . . . 5
โข ((๐ โง ๐) โ ((((๐ ยทs ๐ต) +s (๐ ยทs ๐ถ)) +s ((๐ด ยทs ๐) +s (๐ด ยทs ๐ถ))) -s (๐ ยทs ๐ถ)) = ((((๐ ยทs ๐ต) +s (๐ ยทs ๐ถ)) -s (๐ ยทs ๐ถ)) +s ((๐ด ยทs ๐) +s (๐ด ยทs ๐ถ)))) |
61 | 41, 56, 58 | addsassd 27400 |
. . . . 5
โข ((๐ โง ๐) โ (((๐ ยทs ๐ต) +s (๐ด ยทs ๐)) +s (๐ด ยทs ๐ถ)) = ((๐ ยทs ๐ต) +s ((๐ด ยทs ๐) +s (๐ด ยทs ๐ถ)))) |
62 | 47, 60, 61 | 3eqtr4d 2781 |
. . . 4
โข ((๐ โง ๐) โ ((((๐ ยทs ๐ต) +s (๐ ยทs ๐ถ)) +s ((๐ด ยทs ๐) +s (๐ด ยทs ๐ถ))) -s (๐ ยทs ๐ถ)) = (((๐ ยทs ๐ต) +s (๐ด ยทs ๐)) +s (๐ด ยทs ๐ถ))) |
63 | 62 | oveq1d 7405 |
. . 3
โข ((๐ โง ๐) โ (((((๐ ยทs ๐ต) +s (๐ ยทs ๐ถ)) +s ((๐ด ยทs ๐) +s (๐ด ยทs ๐ถ))) -s (๐ ยทs ๐ถ)) -s (๐ ยทs ๐)) = ((((๐ ยทs ๐ต) +s (๐ด ยทs ๐)) +s (๐ด ยทs ๐ถ)) -s (๐ ยทs ๐))) |
64 | 48, 59 | addscld 27375 |
. . . . 5
โข ((๐ โง ๐) โ (((๐ ยทs ๐ต) +s (๐ ยทs ๐ถ)) +s ((๐ด ยทs ๐) +s (๐ด ยทs ๐ถ))) โ No
) |
65 | 37, 54 | mulscld 27499 |
. . . . . 6
โข (๐ โ (๐ ยทs ๐) โ No
) |
66 | 65 | adantl 482 |
. . . . 5
โข ((๐ โง ๐) โ (๐ ยทs ๐) โ No
) |
67 | 64, 44, 66 | subsubs4d 27469 |
. . . 4
โข ((๐ โง ๐) โ (((((๐ ยทs ๐ต) +s (๐ ยทs ๐ถ)) +s ((๐ด ยทs ๐) +s (๐ด ยทs ๐ถ))) -s (๐ ยทs ๐ถ)) -s (๐ ยทs ๐)) = ((((๐ ยทs ๐ต) +s (๐ ยทs ๐ถ)) +s ((๐ด ยทs ๐) +s (๐ด ยทs ๐ถ))) -s ((๐ ยทs ๐ถ) +s (๐ ยทs ๐)))) |
68 | 44, 66 | addscomd 27362 |
. . . . 5
โข ((๐ โง ๐) โ ((๐ ยทs ๐ถ) +s (๐ ยทs ๐)) = ((๐ ยทs ๐) +s (๐ ยทs ๐ถ))) |
69 | 68 | oveq2d 7406 |
. . . 4
โข ((๐ โง ๐) โ ((((๐ ยทs ๐ต) +s (๐ ยทs ๐ถ)) +s ((๐ด ยทs ๐) +s (๐ด ยทs ๐ถ))) -s ((๐ ยทs ๐ถ) +s (๐ ยทs ๐))) = ((((๐ ยทs ๐ต) +s (๐ ยทs ๐ถ)) +s ((๐ด ยทs ๐) +s (๐ด ยทs ๐ถ))) -s ((๐ ยทs ๐) +s (๐ ยทs ๐ถ)))) |
70 | 67, 69 | eqtrd 2771 |
. . 3
โข ((๐ โง ๐) โ (((((๐ ยทs ๐ต) +s (๐ ยทs ๐ถ)) +s ((๐ด ยทs ๐) +s (๐ด ยทs ๐ถ))) -s (๐ ยทs ๐ถ)) -s (๐ ยทs ๐)) = ((((๐ ยทs ๐ต) +s (๐ ยทs ๐ถ)) +s ((๐ด ยทs ๐) +s (๐ด ยทs ๐ถ))) -s ((๐ ยทs ๐) +s (๐ ยทs ๐ถ)))) |
71 | 41, 56 | addscld 27375 |
. . . 4
โข ((๐ โง ๐) โ ((๐ ยทs ๐ต) +s (๐ด ยทs ๐)) โ No
) |
72 | 71, 58, 66 | addsubsd 27458 |
. . 3
โข ((๐ โง ๐) โ ((((๐ ยทs ๐ต) +s (๐ด ยทs ๐)) +s (๐ด ยทs ๐ถ)) -s (๐ ยทs ๐)) = ((((๐ ยทs ๐ต) +s (๐ด ยทs ๐)) -s (๐ ยทs ๐)) +s (๐ด ยทs ๐ถ))) |
73 | 63, 70, 72 | 3eqtr3d 2779 |
. 2
โข ((๐ โง ๐) โ ((((๐ ยทs ๐ต) +s (๐ ยทs ๐ถ)) +s ((๐ด ยทs ๐) +s (๐ด ยทs ๐ถ))) -s ((๐ ยทs ๐) +s (๐ ยทs ๐ถ))) = ((((๐ ยทs ๐ต) +s (๐ด ยทs ๐)) -s (๐ ยทs ๐)) +s (๐ด ยทs ๐ถ))) |
74 | 33, 73 | eqtrd 2771 |
1
โข ((๐ โง ๐) โ (((๐ ยทs (๐ต +s ๐ถ)) +s (๐ด ยทs (๐ +s ๐ถ))) -s (๐ ยทs (๐ +s ๐ถ))) = ((((๐ ยทs ๐ต) +s (๐ด ยทs ๐)) -s (๐ ยทs ๐)) +s (๐ด ยทs ๐ถ))) |