Step | Hyp | Ref
| Expression |
1 | | atom1d 31584 |
. . 3
β’ (π΄ β HAtoms β
βπ¦ β β
(π¦ β
0β β§ π΄ = (spanβ{π¦}))) |
2 | | atom1d 31584 |
. . 3
β’ (π΅ β HAtoms β
βπ§ β β
(π§ β
0β β§ π΅ = (spanβ{π§}))) |
3 | | reeanv 3227 |
. . . 4
β’
(βπ¦ β
β βπ§ β
β ((π¦ β
0β β§ π΄ = (spanβ{π¦})) β§ (π§ β 0β β§ π΅ = (spanβ{π§}))) β (βπ¦ β β (π¦ β 0β β§
π΄ = (spanβ{π¦})) β§ βπ§ β β (π§ β 0β β§
π΅ = (spanβ{π§})))) |
4 | | an4 655 |
. . . . . 6
β’ (((π¦ β 0β β§
π΄ = (spanβ{π¦})) β§ (π§ β 0β β§ π΅ = (spanβ{π§}))) β ((π¦ β 0β β§ π§ β 0β)
β§ (π΄ =
(spanβ{π¦}) β§
π΅ = (spanβ{π§})))) |
5 | | neeq1 3004 |
. . . . . . . . . 10
β’ (π΄ = (spanβ{π¦}) β (π΄ β π΅ β (spanβ{π¦}) β π΅)) |
6 | | neeq2 3005 |
. . . . . . . . . 10
β’ (π΅ = (spanβ{π§}) β ((spanβ{π¦}) β π΅ β (spanβ{π¦}) β (spanβ{π§}))) |
7 | 5, 6 | sylan9bb 511 |
. . . . . . . . 9
β’ ((π΄ = (spanβ{π¦}) β§ π΅ = (spanβ{π§})) β (π΄ β π΅ β (spanβ{π¦}) β (spanβ{π§}))) |
8 | 7 | adantl 483 |
. . . . . . . 8
β’ ((((π¦ β β β§ π§ β β) β§ (π¦ β 0β β§
π§ β
0β)) β§ (π΄ = (spanβ{π¦}) β§ π΅ = (spanβ{π§}))) β (π΄ β π΅ β (spanβ{π¦}) β (spanβ{π§}))) |
9 | | hvaddcl 30243 |
. . . . . . . . . . . . . 14
β’ ((π¦ β β β§ π§ β β) β (π¦ +β π§) β
β) |
10 | 9 | adantr 482 |
. . . . . . . . . . . . 13
β’ (((π¦ β β β§ π§ β β) β§
(spanβ{π¦}) β
(spanβ{π§})) β
(π¦ +β
π§) β
β) |
11 | | hvaddeq0 30300 |
. . . . . . . . . . . . . . . 16
β’ ((π¦ β β β§ π§ β β) β ((π¦ +β π§) = 0β β
π¦ = (-1
Β·β π§))) |
12 | | sneq 4637 |
. . . . . . . . . . . . . . . . . . . 20
β’ (π¦ = (-1
Β·β π§) β {π¦} = {(-1 Β·β
π§)}) |
13 | 12 | fveq2d 6892 |
. . . . . . . . . . . . . . . . . . 19
β’ (π¦ = (-1
Β·β π§) β (spanβ{π¦}) = (spanβ{(-1
Β·β π§)})) |
14 | | neg1cn 12322 |
. . . . . . . . . . . . . . . . . . . 20
β’ -1 β
β |
15 | | neg1ne0 12324 |
. . . . . . . . . . . . . . . . . . . 20
β’ -1 β
0 |
16 | | spansncol 30799 |
. . . . . . . . . . . . . . . . . . . 20
β’ ((π§ β β β§ -1 β
β β§ -1 β 0) β (spanβ{(-1
Β·β π§)}) = (spanβ{π§})) |
17 | 14, 15, 16 | mp3an23 1454 |
. . . . . . . . . . . . . . . . . . 19
β’ (π§ β β β
(spanβ{(-1 Β·β π§)}) = (spanβ{π§})) |
18 | 13, 17 | sylan9eqr 2795 |
. . . . . . . . . . . . . . . . . 18
β’ ((π§ β β β§ π¦ = (-1
Β·β π§)) β (spanβ{π¦}) = (spanβ{π§})) |
19 | 18 | ex 414 |
. . . . . . . . . . . . . . . . 17
β’ (π§ β β β (π¦ = (-1
Β·β π§) β (spanβ{π¦}) = (spanβ{π§}))) |
20 | 19 | adantl 483 |
. . . . . . . . . . . . . . . 16
β’ ((π¦ β β β§ π§ β β) β (π¦ = (-1
Β·β π§) β (spanβ{π¦}) = (spanβ{π§}))) |
21 | 11, 20 | sylbid 239 |
. . . . . . . . . . . . . . 15
β’ ((π¦ β β β§ π§ β β) β ((π¦ +β π§) = 0β β
(spanβ{π¦}) =
(spanβ{π§}))) |
22 | 21 | necon3d 2962 |
. . . . . . . . . . . . . 14
β’ ((π¦ β β β§ π§ β β) β
((spanβ{π¦}) β
(spanβ{π§}) β
(π¦ +β
π§) β
0β)) |
23 | 22 | imp 408 |
. . . . . . . . . . . . 13
β’ (((π¦ β β β§ π§ β β) β§
(spanβ{π¦}) β
(spanβ{π§})) β
(π¦ +β
π§) β
0β) |
24 | | spansna 31581 |
. . . . . . . . . . . . 13
β’ (((π¦ +β π§) β β β§ (π¦ +β π§) β 0β)
β (spanβ{(π¦
+β π§)})
β HAtoms) |
25 | 10, 23, 24 | syl2anc 585 |
. . . . . . . . . . . 12
β’ (((π¦ β β β§ π§ β β) β§
(spanβ{π¦}) β
(spanβ{π§})) β
(spanβ{(π¦
+β π§)})
β HAtoms) |
26 | 25 | adantlr 714 |
. . . . . . . . . . 11
β’ ((((π¦ β β β§ π§ β β) β§ (π¦ β 0β β§
π§ β
0β)) β§ (spanβ{π¦}) β (spanβ{π§})) β (spanβ{(π¦ +β π§)}) β HAtoms) |
27 | 26 | adantlr 714 |
. . . . . . . . . 10
β’
(((((π¦ β
β β§ π§ β
β) β§ (π¦ β
0β β§ π§ β 0β)) β§ (π΄ = (spanβ{π¦}) β§ π΅ = (spanβ{π§}))) β§ (spanβ{π¦}) β (spanβ{π§})) β (spanβ{(π¦ +β π§)}) β HAtoms) |
28 | | eqeq2 2745 |
. . . . . . . . . . . . . . . 16
β’ (π΄ = (spanβ{π¦}) β ((spanβ{(π¦ +β π§)}) = π΄ β (spanβ{(π¦ +β π§)}) = (spanβ{π¦}))) |
29 | 28 | biimpd 228 |
. . . . . . . . . . . . . . 15
β’ (π΄ = (spanβ{π¦}) β ((spanβ{(π¦ +β π§)}) = π΄ β (spanβ{(π¦ +β π§)}) = (spanβ{π¦}))) |
30 | | spansneleqi 30800 |
. . . . . . . . . . . . . . . . . . . 20
β’ ((π¦ +β π§) β β β
((spanβ{(π¦
+β π§)}) =
(spanβ{π¦}) β
(π¦ +β
π§) β
(spanβ{π¦}))) |
31 | 9, 30 | syl 17 |
. . . . . . . . . . . . . . . . . . 19
β’ ((π¦ β β β§ π§ β β) β
((spanβ{(π¦
+β π§)}) =
(spanβ{π¦}) β
(π¦ +β
π§) β
(spanβ{π¦}))) |
32 | | elspansn 30797 |
. . . . . . . . . . . . . . . . . . . . 21
β’ (π¦ β β β ((π¦ +β π§) β (spanβ{π¦}) β βπ£ β β (π¦ +β π§) = (π£ Β·β π¦))) |
33 | 32 | adantr 482 |
. . . . . . . . . . . . . . . . . . . 20
β’ ((π¦ β β β§ π§ β β) β ((π¦ +β π§) β (spanβ{π¦}) β βπ£ β β (π¦ +β π§) = (π£ Β·β π¦))) |
34 | | addcl 11188 |
. . . . . . . . . . . . . . . . . . . . . . . 24
β’ ((π£ β β β§ -1 β
β) β (π£ + -1)
β β) |
35 | 14, 34 | mpan2 690 |
. . . . . . . . . . . . . . . . . . . . . . 23
β’ (π£ β β β (π£ + -1) β
β) |
36 | 35 | ad2antlr 726 |
. . . . . . . . . . . . . . . . . . . . . 22
β’ ((((π¦ β β β§ π§ β β) β§ π£ β β) β§ (π¦ +β π§) = (π£ Β·β π¦)) β (π£ + -1) β β) |
37 | | hvmulcl 30244 |
. . . . . . . . . . . . . . . . . . . . . . . . . . 27
β’ ((π£ β β β§ π¦ β β) β (π£
Β·β π¦) β β) |
38 | 37 | ancoms 460 |
. . . . . . . . . . . . . . . . . . . . . . . . . 26
β’ ((π¦ β β β§ π£ β β) β (π£
Β·β π¦) β β) |
39 | 38 | adantlr 714 |
. . . . . . . . . . . . . . . . . . . . . . . . 25
β’ (((π¦ β β β§ π§ β β) β§ π£ β β) β (π£
Β·β π¦) β β) |
40 | | simpll 766 |
. . . . . . . . . . . . . . . . . . . . . . . . 25
β’ (((π¦ β β β§ π§ β β) β§ π£ β β) β π¦ β
β) |
41 | | simplr 768 |
. . . . . . . . . . . . . . . . . . . . . . . . 25
β’ (((π¦ β β β§ π§ β β) β§ π£ β β) β π§ β
β) |
42 | | hvsubadd 30308 |
. . . . . . . . . . . . . . . . . . . . . . . . 25
β’ (((π£
Β·β π¦) β β β§ π¦ β β β§ π§ β β) β (((π£ Β·β π¦) ββ
π¦) = π§ β (π¦ +β π§) = (π£ Β·β π¦))) |
43 | 39, 40, 41, 42 | syl3anc 1372 |
. . . . . . . . . . . . . . . . . . . . . . . 24
β’ (((π¦ β β β§ π§ β β) β§ π£ β β) β (((π£
Β·β π¦) ββ π¦) = π§ β (π¦ +β π§) = (π£ Β·β π¦))) |
44 | 43 | biimpar 479 |
. . . . . . . . . . . . . . . . . . . . . . 23
β’ ((((π¦ β β β§ π§ β β) β§ π£ β β) β§ (π¦ +β π§) = (π£ Β·β π¦)) β ((π£ Β·β π¦) ββ
π¦) = π§) |
45 | | hvsubval 30247 |
. . . . . . . . . . . . . . . . . . . . . . . . . . . 28
β’ (((π£
Β·β π¦) β β β§ π¦ β β) β ((π£ Β·β π¦) ββ
π¦) = ((π£ Β·β π¦) +β (-1
Β·β π¦))) |
46 | 37, 45 | sylancom 589 |
. . . . . . . . . . . . . . . . . . . . . . . . . . 27
β’ ((π£ β β β§ π¦ β β) β ((π£
Β·β π¦) ββ π¦) = ((π£ Β·β π¦) +β (-1
Β·β π¦))) |
47 | | ax-hvdistr2 30240 |
. . . . . . . . . . . . . . . . . . . . . . . . . . . 28
β’ ((π£ β β β§ -1 β
β β§ π¦ β
β) β ((π£ + -1)
Β·β π¦) = ((π£ Β·β π¦) +β (-1
Β·β π¦))) |
48 | 14, 47 | mp3an2 1450 |
. . . . . . . . . . . . . . . . . . . . . . . . . . 27
β’ ((π£ β β β§ π¦ β β) β ((π£ + -1)
Β·β π¦) = ((π£ Β·β π¦) +β (-1
Β·β π¦))) |
49 | 46, 48 | eqtr4d 2776 |
. . . . . . . . . . . . . . . . . . . . . . . . . 26
β’ ((π£ β β β§ π¦ β β) β ((π£
Β·β π¦) ββ π¦) = ((π£ + -1) Β·β
π¦)) |
50 | 49 | ancoms 460 |
. . . . . . . . . . . . . . . . . . . . . . . . 25
β’ ((π¦ β β β§ π£ β β) β ((π£
Β·β π¦) ββ π¦) = ((π£ + -1) Β·β
π¦)) |
51 | 50 | adantlr 714 |
. . . . . . . . . . . . . . . . . . . . . . . 24
β’ (((π¦ β β β§ π§ β β) β§ π£ β β) β ((π£
Β·β π¦) ββ π¦) = ((π£ + -1) Β·β
π¦)) |
52 | 51 | adantr 482 |
. . . . . . . . . . . . . . . . . . . . . . 23
β’ ((((π¦ β β β§ π§ β β) β§ π£ β β) β§ (π¦ +β π§) = (π£ Β·β π¦)) β ((π£ Β·β π¦) ββ
π¦) = ((π£ + -1) Β·β
π¦)) |
53 | 44, 52 | eqtr3d 2775 |
. . . . . . . . . . . . . . . . . . . . . 22
β’ ((((π¦ β β β§ π§ β β) β§ π£ β β) β§ (π¦ +β π§) = (π£ Β·β π¦)) β π§ = ((π£ + -1) Β·β
π¦)) |
54 | | oveq1 7411 |
. . . . . . . . . . . . . . . . . . . . . . 23
β’ (π€ = (π£ + -1) β (π€ Β·β π¦) = ((π£ + -1) Β·β
π¦)) |
55 | 54 | rspceeqv 3632 |
. . . . . . . . . . . . . . . . . . . . . 22
β’ (((π£ + -1) β β β§
π§ = ((π£ + -1) Β·β
π¦)) β βπ€ β β π§ = (π€ Β·β π¦)) |
56 | 36, 53, 55 | syl2anc 585 |
. . . . . . . . . . . . . . . . . . . . 21
β’ ((((π¦ β β β§ π§ β β) β§ π£ β β) β§ (π¦ +β π§) = (π£ Β·β π¦)) β βπ€ β β π§ = (π€ Β·β π¦)) |
57 | 56 | rexlimdva2 3158 |
. . . . . . . . . . . . . . . . . . . 20
β’ ((π¦ β β β§ π§ β β) β
(βπ£ β β
(π¦ +β
π§) = (π£ Β·β π¦) β βπ€ β β π§ = (π€ Β·β π¦))) |
58 | 33, 57 | sylbid 239 |
. . . . . . . . . . . . . . . . . . 19
β’ ((π¦ β β β§ π§ β β) β ((π¦ +β π§) β (spanβ{π¦}) β βπ€ β β π§ = (π€ Β·β π¦))) |
59 | 31, 58 | syld 47 |
. . . . . . . . . . . . . . . . . 18
β’ ((π¦ β β β§ π§ β β) β
((spanβ{(π¦
+β π§)}) =
(spanβ{π¦}) β
βπ€ β β
π§ = (π€ Β·β π¦))) |
60 | | elspansn 30797 |
. . . . . . . . . . . . . . . . . . 19
β’ (π¦ β β β (π§ β (spanβ{π¦}) β βπ€ β β π§ = (π€ Β·β π¦))) |
61 | 60 | adantr 482 |
. . . . . . . . . . . . . . . . . 18
β’ ((π¦ β β β§ π§ β β) β (π§ β (spanβ{π¦}) β βπ€ β β π§ = (π€ Β·β π¦))) |
62 | 59, 61 | sylibrd 259 |
. . . . . . . . . . . . . . . . 17
β’ ((π¦ β β β§ π§ β β) β
((spanβ{(π¦
+β π§)}) =
(spanβ{π¦}) β
π§ β (spanβ{π¦}))) |
63 | 62 | adantr 482 |
. . . . . . . . . . . . . . . 16
β’ (((π¦ β β β§ π§ β β) β§ π§ β 0β)
β ((spanβ{(π¦
+β π§)}) =
(spanβ{π¦}) β
π§ β (spanβ{π¦}))) |
64 | | spansneleq 30801 |
. . . . . . . . . . . . . . . . . 18
β’ ((π¦ β β β§ π§ β 0β)
β (π§ β
(spanβ{π¦}) β
(spanβ{π§}) =
(spanβ{π¦}))) |
65 | | eqcom 2740 |
. . . . . . . . . . . . . . . . . 18
β’
((spanβ{π§}) =
(spanβ{π¦}) β
(spanβ{π¦}) =
(spanβ{π§})) |
66 | 64, 65 | syl6ib 251 |
. . . . . . . . . . . . . . . . 17
β’ ((π¦ β β β§ π§ β 0β)
β (π§ β
(spanβ{π¦}) β
(spanβ{π¦}) =
(spanβ{π§}))) |
67 | 66 | adantlr 714 |
. . . . . . . . . . . . . . . 16
β’ (((π¦ β β β§ π§ β β) β§ π§ β 0β)
β (π§ β
(spanβ{π¦}) β
(spanβ{π¦}) =
(spanβ{π§}))) |
68 | 63, 67 | syld 47 |
. . . . . . . . . . . . . . 15
β’ (((π¦ β β β§ π§ β β) β§ π§ β 0β)
β ((spanβ{(π¦
+β π§)}) =
(spanβ{π¦}) β
(spanβ{π¦}) =
(spanβ{π§}))) |
69 | 29, 68 | sylan9r 510 |
. . . . . . . . . . . . . 14
β’ ((((π¦ β β β§ π§ β β) β§ π§ β 0β)
β§ π΄ =
(spanβ{π¦})) β
((spanβ{(π¦
+β π§)}) =
π΄ β (spanβ{π¦}) = (spanβ{π§}))) |
70 | 69 | necon3d 2962 |
. . . . . . . . . . . . 13
β’ ((((π¦ β β β§ π§ β β) β§ π§ β 0β)
β§ π΄ =
(spanβ{π¦})) β
((spanβ{π¦}) β
(spanβ{π§}) β
(spanβ{(π¦
+β π§)})
β π΄)) |
71 | 70 | adantlrl 719 |
. . . . . . . . . . . 12
β’ ((((π¦ β β β§ π§ β β) β§ (π¦ β 0β β§
π§ β
0β)) β§ π΄ = (spanβ{π¦})) β ((spanβ{π¦}) β (spanβ{π§}) β (spanβ{(π¦ +β π§)}) β π΄)) |
72 | 71 | adantrr 716 |
. . . . . . . . . . 11
β’ ((((π¦ β β β§ π§ β β) β§ (π¦ β 0β β§
π§ β
0β)) β§ (π΄ = (spanβ{π¦}) β§ π΅ = (spanβ{π§}))) β ((spanβ{π¦}) β (spanβ{π§}) β (spanβ{(π¦ +β π§)}) β π΄)) |
73 | 72 | imp 408 |
. . . . . . . . . 10
β’
(((((π¦ β
β β§ π§ β
β) β§ (π¦ β
0β β§ π§ β 0β)) β§ (π΄ = (spanβ{π¦}) β§ π΅ = (spanβ{π§}))) β§ (spanβ{π¦}) β (spanβ{π§})) β (spanβ{(π¦ +β π§)}) β π΄) |
74 | | eqeq2 2745 |
. . . . . . . . . . . . . . . 16
β’ (π΅ = (spanβ{π§}) β ((spanβ{(π¦ +β π§)}) = π΅ β (spanβ{(π¦ +β π§)}) = (spanβ{π§}))) |
75 | 74 | biimpd 228 |
. . . . . . . . . . . . . . 15
β’ (π΅ = (spanβ{π§}) β ((spanβ{(π¦ +β π§)}) = π΅ β (spanβ{(π¦ +β π§)}) = (spanβ{π§}))) |
76 | | spansneleqi 30800 |
. . . . . . . . . . . . . . . . . . . 20
β’ ((π¦ +β π§) β β β
((spanβ{(π¦
+β π§)}) =
(spanβ{π§}) β
(π¦ +β
π§) β
(spanβ{π§}))) |
77 | 9, 76 | syl 17 |
. . . . . . . . . . . . . . . . . . 19
β’ ((π¦ β β β§ π§ β β) β
((spanβ{(π¦
+β π§)}) =
(spanβ{π§}) β
(π¦ +β
π§) β
(spanβ{π§}))) |
78 | | elspansn 30797 |
. . . . . . . . . . . . . . . . . . . . 21
β’ (π§ β β β ((π¦ +β π§) β (spanβ{π§}) β βπ£ β β (π¦ +β π§) = (π£ Β·β π§))) |
79 | 78 | adantl 483 |
. . . . . . . . . . . . . . . . . . . 20
β’ ((π¦ β β β§ π§ β β) β ((π¦ +β π§) β (spanβ{π§}) β βπ£ β β (π¦ +β π§) = (π£ Β·β π§))) |
80 | 35 | ad2antlr 726 |
. . . . . . . . . . . . . . . . . . . . . 22
β’ ((((π¦ β β β§ π§ β β) β§ π£ β β) β§ (π¦ +β π§) = (π£ Β·β π§)) β (π£ + -1) β β) |
81 | | hvmulcl 30244 |
. . . . . . . . . . . . . . . . . . . . . . . . . . . 28
β’ ((π£ β β β§ π§ β β) β (π£
Β·β π§) β β) |
82 | 81 | ancoms 460 |
. . . . . . . . . . . . . . . . . . . . . . . . . . 27
β’ ((π§ β β β§ π£ β β) β (π£
Β·β π§) β β) |
83 | 82 | adantll 713 |
. . . . . . . . . . . . . . . . . . . . . . . . . 26
β’ (((π¦ β β β§ π§ β β) β§ π£ β β) β (π£
Β·β π§) β β) |
84 | | hvsubadd 30308 |
. . . . . . . . . . . . . . . . . . . . . . . . . 26
β’ (((π£
Β·β π§) β β β§ π§ β β β§ π¦ β β) β (((π£ Β·β π§) ββ
π§) = π¦ β (π§ +β π¦) = (π£ Β·β π§))) |
85 | 83, 41, 40, 84 | syl3anc 1372 |
. . . . . . . . . . . . . . . . . . . . . . . . 25
β’ (((π¦ β β β§ π§ β β) β§ π£ β β) β (((π£
Β·β π§) ββ π§) = π¦ β (π§ +β π¦) = (π£ Β·β π§))) |
86 | | ax-hvcom 30232 |
. . . . . . . . . . . . . . . . . . . . . . . . . . 27
β’ ((π¦ β β β§ π§ β β) β (π¦ +β π§) = (π§ +β π¦)) |
87 | 86 | adantr 482 |
. . . . . . . . . . . . . . . . . . . . . . . . . 26
β’ (((π¦ β β β§ π§ β β) β§ π£ β β) β (π¦ +β π§) = (π§ +β π¦)) |
88 | 87 | eqeq1d 2735 |
. . . . . . . . . . . . . . . . . . . . . . . . 25
β’ (((π¦ β β β§ π§ β β) β§ π£ β β) β ((π¦ +β π§) = (π£ Β·β π§) β (π§ +β π¦) = (π£ Β·β π§))) |
89 | 85, 88 | bitr4d 282 |
. . . . . . . . . . . . . . . . . . . . . . . 24
β’ (((π¦ β β β§ π§ β β) β§ π£ β β) β (((π£
Β·β π§) ββ π§) = π¦ β (π¦ +β π§) = (π£ Β·β π§))) |
90 | 89 | biimpar 479 |
. . . . . . . . . . . . . . . . . . . . . . 23
β’ ((((π¦ β β β§ π§ β β) β§ π£ β β) β§ (π¦ +β π§) = (π£ Β·β π§)) β ((π£ Β·β π§) ββ
π§) = π¦) |
91 | | hvsubval 30247 |
. . . . . . . . . . . . . . . . . . . . . . . . . . . 28
β’ (((π£
Β·β π§) β β β§ π§ β β) β ((π£ Β·β π§) ββ
π§) = ((π£ Β·β π§) +β (-1
Β·β π§))) |
92 | 81, 91 | sylancom 589 |
. . . . . . . . . . . . . . . . . . . . . . . . . . 27
β’ ((π£ β β β§ π§ β β) β ((π£
Β·β π§) ββ π§) = ((π£ Β·β π§) +β (-1
Β·β π§))) |
93 | | ax-hvdistr2 30240 |
. . . . . . . . . . . . . . . . . . . . . . . . . . . 28
β’ ((π£ β β β§ -1 β
β β§ π§ β
β) β ((π£ + -1)
Β·β π§) = ((π£ Β·β π§) +β (-1
Β·β π§))) |
94 | 14, 93 | mp3an2 1450 |
. . . . . . . . . . . . . . . . . . . . . . . . . . 27
β’ ((π£ β β β§ π§ β β) β ((π£ + -1)
Β·β π§) = ((π£ Β·β π§) +β (-1
Β·β π§))) |
95 | 92, 94 | eqtr4d 2776 |
. . . . . . . . . . . . . . . . . . . . . . . . . 26
β’ ((π£ β β β§ π§ β β) β ((π£
Β·β π§) ββ π§) = ((π£ + -1) Β·β
π§)) |
96 | 95 | ancoms 460 |
. . . . . . . . . . . . . . . . . . . . . . . . 25
β’ ((π§ β β β§ π£ β β) β ((π£
Β·β π§) ββ π§) = ((π£ + -1) Β·β
π§)) |
97 | 96 | adantll 713 |
. . . . . . . . . . . . . . . . . . . . . . . 24
β’ (((π¦ β β β§ π§ β β) β§ π£ β β) β ((π£
Β·β π§) ββ π§) = ((π£ + -1) Β·β
π§)) |
98 | 97 | adantr 482 |
. . . . . . . . . . . . . . . . . . . . . . 23
β’ ((((π¦ β β β§ π§ β β) β§ π£ β β) β§ (π¦ +β π§) = (π£ Β·β π§)) β ((π£ Β·β π§) ββ
π§) = ((π£ + -1) Β·β
π§)) |
99 | 90, 98 | eqtr3d 2775 |
. . . . . . . . . . . . . . . . . . . . . 22
β’ ((((π¦ β β β§ π§ β β) β§ π£ β β) β§ (π¦ +β π§) = (π£ Β·β π§)) β π¦ = ((π£ + -1) Β·β
π§)) |
100 | | oveq1 7411 |
. . . . . . . . . . . . . . . . . . . . . . 23
β’ (π€ = (π£ + -1) β (π€ Β·β π§) = ((π£ + -1) Β·β
π§)) |
101 | 100 | rspceeqv 3632 |
. . . . . . . . . . . . . . . . . . . . . 22
β’ (((π£ + -1) β β β§
π¦ = ((π£ + -1) Β·β
π§)) β βπ€ β β π¦ = (π€ Β·β π§)) |
102 | 80, 99, 101 | syl2anc 585 |
. . . . . . . . . . . . . . . . . . . . 21
β’ ((((π¦ β β β§ π§ β β) β§ π£ β β) β§ (π¦ +β π§) = (π£ Β·β π§)) β βπ€ β β π¦ = (π€ Β·β π§)) |
103 | 102 | rexlimdva2 3158 |
. . . . . . . . . . . . . . . . . . . 20
β’ ((π¦ β β β§ π§ β β) β
(βπ£ β β
(π¦ +β
π§) = (π£ Β·β π§) β βπ€ β β π¦ = (π€ Β·β π§))) |
104 | 79, 103 | sylbid 239 |
. . . . . . . . . . . . . . . . . . 19
β’ ((π¦ β β β§ π§ β β) β ((π¦ +β π§) β (spanβ{π§}) β βπ€ β β π¦ = (π€ Β·β π§))) |
105 | 77, 104 | syld 47 |
. . . . . . . . . . . . . . . . . 18
β’ ((π¦ β β β§ π§ β β) β
((spanβ{(π¦
+β π§)}) =
(spanβ{π§}) β
βπ€ β β
π¦ = (π€ Β·β π§))) |
106 | | elspansn 30797 |
. . . . . . . . . . . . . . . . . . 19
β’ (π§ β β β (π¦ β (spanβ{π§}) β βπ€ β β π¦ = (π€ Β·β π§))) |
107 | 106 | adantl 483 |
. . . . . . . . . . . . . . . . . 18
β’ ((π¦ β β β§ π§ β β) β (π¦ β (spanβ{π§}) β βπ€ β β π¦ = (π€ Β·β π§))) |
108 | 105, 107 | sylibrd 259 |
. . . . . . . . . . . . . . . . 17
β’ ((π¦ β β β§ π§ β β) β
((spanβ{(π¦
+β π§)}) =
(spanβ{π§}) β
π¦ β (spanβ{π§}))) |
109 | 108 | adantr 482 |
. . . . . . . . . . . . . . . 16
β’ (((π¦ β β β§ π§ β β) β§ π¦ β 0β)
β ((spanβ{(π¦
+β π§)}) =
(spanβ{π§}) β
π¦ β (spanβ{π§}))) |
110 | | spansneleq 30801 |
. . . . . . . . . . . . . . . . 17
β’ ((π§ β β β§ π¦ β 0β)
β (π¦ β
(spanβ{π§}) β
(spanβ{π¦}) =
(spanβ{π§}))) |
111 | 110 | adantll 713 |
. . . . . . . . . . . . . . . 16
β’ (((π¦ β β β§ π§ β β) β§ π¦ β 0β)
β (π¦ β
(spanβ{π§}) β
(spanβ{π¦}) =
(spanβ{π§}))) |
112 | 109, 111 | syld 47 |
. . . . . . . . . . . . . . 15
β’ (((π¦ β β β§ π§ β β) β§ π¦ β 0β)
β ((spanβ{(π¦
+β π§)}) =
(spanβ{π§}) β
(spanβ{π¦}) =
(spanβ{π§}))) |
113 | 75, 112 | sylan9r 510 |
. . . . . . . . . . . . . 14
β’ ((((π¦ β β β§ π§ β β) β§ π¦ β 0β)
β§ π΅ =
(spanβ{π§})) β
((spanβ{(π¦
+β π§)}) =
π΅ β (spanβ{π¦}) = (spanβ{π§}))) |
114 | 113 | necon3d 2962 |
. . . . . . . . . . . . 13
β’ ((((π¦ β β β§ π§ β β) β§ π¦ β 0β)
β§ π΅ =
(spanβ{π§})) β
((spanβ{π¦}) β
(spanβ{π§}) β
(spanβ{(π¦
+β π§)})
β π΅)) |
115 | 114 | adantlrr 720 |
. . . . . . . . . . . 12
β’ ((((π¦ β β β§ π§ β β) β§ (π¦ β 0β β§
π§ β
0β)) β§ π΅ = (spanβ{π§})) β ((spanβ{π¦}) β (spanβ{π§}) β (spanβ{(π¦ +β π§)}) β π΅)) |
116 | 115 | adantrl 715 |
. . . . . . . . . . 11
β’ ((((π¦ β β β§ π§ β β) β§ (π¦ β 0β β§
π§ β
0β)) β§ (π΄ = (spanβ{π¦}) β§ π΅ = (spanβ{π§}))) β ((spanβ{π¦}) β (spanβ{π§}) β (spanβ{(π¦ +β π§)}) β π΅)) |
117 | 116 | imp 408 |
. . . . . . . . . 10
β’
(((((π¦ β
β β§ π§ β
β) β§ (π¦ β
0β β§ π§ β 0β)) β§ (π΄ = (spanβ{π¦}) β§ π΅ = (spanβ{π§}))) β§ (spanβ{π¦}) β (spanβ{π§})) β (spanβ{(π¦ +β π§)}) β π΅) |
118 | | spanpr 30811 |
. . . . . . . . . . . . . 14
β’ ((π¦ β β β§ π§ β β) β
(spanβ{(π¦
+β π§)})
β (spanβ{π¦,
π§})) |
119 | 118 | adantr 482 |
. . . . . . . . . . . . 13
β’ (((π¦ β β β§ π§ β β) β§ (π΄ = (spanβ{π¦}) β§ π΅ = (spanβ{π§}))) β (spanβ{(π¦ +β π§)}) β (spanβ{π¦, π§})) |
120 | | oveq12 7413 |
. . . . . . . . . . . . . 14
β’ ((π΄ = (spanβ{π¦}) β§ π΅ = (spanβ{π§})) β (π΄ β¨β π΅) = ((spanβ{π¦}) β¨β (spanβ{π§}))) |
121 | | df-pr 4630 |
. . . . . . . . . . . . . . . . 17
β’ {π¦, π§} = ({π¦} βͺ {π§}) |
122 | 121 | fveq2i 6891 |
. . . . . . . . . . . . . . . 16
β’
(spanβ{π¦,
π§}) = (spanβ({π¦} βͺ {π§})) |
123 | | snssi 4810 |
. . . . . . . . . . . . . . . . 17
β’ (π¦ β β β {π¦} β
β) |
124 | | snssi 4810 |
. . . . . . . . . . . . . . . . 17
β’ (π§ β β β {π§} β
β) |
125 | | spanun 30776 |
. . . . . . . . . . . . . . . . 17
β’ (({π¦} β β β§ {π§} β β) β
(spanβ({π¦} βͺ
{π§})) = ((spanβ{π¦}) +β
(spanβ{π§}))) |
126 | 123, 124,
125 | syl2an 597 |
. . . . . . . . . . . . . . . 16
β’ ((π¦ β β β§ π§ β β) β
(spanβ({π¦} βͺ
{π§})) = ((spanβ{π¦}) +β
(spanβ{π§}))) |
127 | 122, 126 | eqtrid 2785 |
. . . . . . . . . . . . . . 15
β’ ((π¦ β β β§ π§ β β) β
(spanβ{π¦, π§}) = ((spanβ{π¦}) +β
(spanβ{π§}))) |
128 | | spansnch 30791 |
. . . . . . . . . . . . . . . 16
β’ (π¦ β β β
(spanβ{π¦}) β
Cβ ) |
129 | | spansnj 30878 |
. . . . . . . . . . . . . . . 16
β’
(((spanβ{π¦})
β Cβ β§ π§ β β) β ((spanβ{π¦}) +β
(spanβ{π§})) =
((spanβ{π¦})
β¨β (spanβ{π§}))) |
130 | 128, 129 | sylan 581 |
. . . . . . . . . . . . . . 15
β’ ((π¦ β β β§ π§ β β) β
((spanβ{π¦})
+β (spanβ{π§})) = ((spanβ{π¦}) β¨β (spanβ{π§}))) |
131 | 127, 130 | eqtr2d 2774 |
. . . . . . . . . . . . . 14
β’ ((π¦ β β β§ π§ β β) β
((spanβ{π¦})
β¨β (spanβ{π§})) = (spanβ{π¦, π§})) |
132 | 120, 131 | sylan9eqr 2795 |
. . . . . . . . . . . . 13
β’ (((π¦ β β β§ π§ β β) β§ (π΄ = (spanβ{π¦}) β§ π΅ = (spanβ{π§}))) β (π΄ β¨β π΅) = (spanβ{π¦, π§})) |
133 | 119, 132 | sseqtrrd 4022 |
. . . . . . . . . . . 12
β’ (((π¦ β β β§ π§ β β) β§ (π΄ = (spanβ{π¦}) β§ π΅ = (spanβ{π§}))) β (spanβ{(π¦ +β π§)}) β (π΄ β¨β π΅)) |
134 | 133 | adantlr 714 |
. . . . . . . . . . 11
β’ ((((π¦ β β β§ π§ β β) β§ (π¦ β 0β β§
π§ β
0β)) β§ (π΄ = (spanβ{π¦}) β§ π΅ = (spanβ{π§}))) β (spanβ{(π¦ +β π§)}) β (π΄ β¨β π΅)) |
135 | 134 | adantr 482 |
. . . . . . . . . 10
β’
(((((π¦ β
β β§ π§ β
β) β§ (π¦ β
0β β§ π§ β 0β)) β§ (π΄ = (spanβ{π¦}) β§ π΅ = (spanβ{π§}))) β§ (spanβ{π¦}) β (spanβ{π§})) β (spanβ{(π¦ +β π§)}) β (π΄ β¨β π΅)) |
136 | | neeq1 3004 |
. . . . . . . . . . . 12
β’ (π₯ = (spanβ{(π¦ +β π§)}) β (π₯ β π΄ β (spanβ{(π¦ +β π§)}) β π΄)) |
137 | | neeq1 3004 |
. . . . . . . . . . . 12
β’ (π₯ = (spanβ{(π¦ +β π§)}) β (π₯ β π΅ β (spanβ{(π¦ +β π§)}) β π΅)) |
138 | | sseq1 4006 |
. . . . . . . . . . . 12
β’ (π₯ = (spanβ{(π¦ +β π§)}) β (π₯ β (π΄ β¨β π΅) β (spanβ{(π¦ +β π§)}) β (π΄ β¨β π΅))) |
139 | 136, 137,
138 | 3anbi123d 1437 |
. . . . . . . . . . 11
β’ (π₯ = (spanβ{(π¦ +β π§)}) β ((π₯ β π΄ β§ π₯ β π΅ β§ π₯ β (π΄ β¨β π΅)) β ((spanβ{(π¦ +β π§)}) β π΄ β§ (spanβ{(π¦ +β π§)}) β π΅ β§ (spanβ{(π¦ +β π§)}) β (π΄ β¨β π΅)))) |
140 | 139 | rspcev 3612 |
. . . . . . . . . 10
β’
(((spanβ{(π¦
+β π§)})
β HAtoms β§ ((spanβ{(π¦ +β π§)}) β π΄ β§ (spanβ{(π¦ +β π§)}) β π΅ β§ (spanβ{(π¦ +β π§)}) β (π΄ β¨β π΅))) β βπ₯ β HAtoms (π₯ β π΄ β§ π₯ β π΅ β§ π₯ β (π΄ β¨β π΅))) |
141 | 27, 73, 117, 135, 140 | syl13anc 1373 |
. . . . . . . . 9
β’
(((((π¦ β
β β§ π§ β
β) β§ (π¦ β
0β β§ π§ β 0β)) β§ (π΄ = (spanβ{π¦}) β§ π΅ = (spanβ{π§}))) β§ (spanβ{π¦}) β (spanβ{π§})) β βπ₯ β HAtoms (π₯ β π΄ β§ π₯ β π΅ β§ π₯ β (π΄ β¨β π΅))) |
142 | 141 | ex 414 |
. . . . . . . 8
β’ ((((π¦ β β β§ π§ β β) β§ (π¦ β 0β β§
π§ β
0β)) β§ (π΄ = (spanβ{π¦}) β§ π΅ = (spanβ{π§}))) β ((spanβ{π¦}) β (spanβ{π§}) β βπ₯ β HAtoms (π₯ β π΄ β§ π₯ β π΅ β§ π₯ β (π΄ β¨β π΅)))) |
143 | 8, 142 | sylbid 239 |
. . . . . . 7
β’ ((((π¦ β β β§ π§ β β) β§ (π¦ β 0β β§
π§ β
0β)) β§ (π΄ = (spanβ{π¦}) β§ π΅ = (spanβ{π§}))) β (π΄ β π΅ β βπ₯ β HAtoms (π₯ β π΄ β§ π₯ β π΅ β§ π₯ β (π΄ β¨β π΅)))) |
144 | 143 | expl 459 |
. . . . . 6
β’ ((π¦ β β β§ π§ β β) β (((π¦ β 0β β§
π§ β
0β) β§ (π΄ = (spanβ{π¦}) β§ π΅ = (spanβ{π§}))) β (π΄ β π΅ β βπ₯ β HAtoms (π₯ β π΄ β§ π₯ β π΅ β§ π₯ β (π΄ β¨β π΅))))) |
145 | 4, 144 | biimtrid 241 |
. . . . 5
β’ ((π¦ β β β§ π§ β β) β (((π¦ β 0β β§
π΄ = (spanβ{π¦})) β§ (π§ β 0β β§ π΅ = (spanβ{π§}))) β (π΄ β π΅ β βπ₯ β HAtoms (π₯ β π΄ β§ π₯ β π΅ β§ π₯ β (π΄ β¨β π΅))))) |
146 | 145 | rexlimivv 3200 |
. . . 4
β’
(βπ¦ β
β βπ§ β
β ((π¦ β
0β β§ π΄ = (spanβ{π¦})) β§ (π§ β 0β β§ π΅ = (spanβ{π§}))) β (π΄ β π΅ β βπ₯ β HAtoms (π₯ β π΄ β§ π₯ β π΅ β§ π₯ β (π΄ β¨β π΅)))) |
147 | 3, 146 | sylbir 234 |
. . 3
β’
((βπ¦ β
β (π¦ β
0β β§ π΄ = (spanβ{π¦})) β§ βπ§ β β (π§ β 0β β§ π΅ = (spanβ{π§}))) β (π΄ β π΅ β βπ₯ β HAtoms (π₯ β π΄ β§ π₯ β π΅ β§ π₯ β (π΄ β¨β π΅)))) |
148 | 1, 2, 147 | syl2anb 599 |
. 2
β’ ((π΄ β HAtoms β§ π΅ β HAtoms) β (π΄ β π΅ β βπ₯ β HAtoms (π₯ β π΄ β§ π₯ β π΅ β§ π₯ β (π΄ β¨β π΅)))) |
149 | 148 | 3impia 1118 |
1
β’ ((π΄ β HAtoms β§ π΅ β HAtoms β§ π΄ β π΅) β βπ₯ β HAtoms (π₯ β π΄ β§ π₯ β π΅ β§ π₯ β (π΄ β¨β π΅))) |