Step | Hyp | Ref
| Expression |
1 | | 2nn0 12486 |
. . 3
β’ 2 β
β0 |
2 | | fz12pr 13555 |
. . . . 5
β’ (1...2) =
{1, 2} |
3 | 2 | eqcomi 2742 |
. . . 4
β’ {1, 2} =
(1...2) |
4 | | ehl2eudis.e |
. . . 4
β’ πΈ =
(πΌhilβ2) |
5 | | ehl2eudis.x |
. . . 4
β’ π = (β βm
{1, 2}) |
6 | | ehl2eudis.d |
. . . 4
β’ π· = (distβπΈ) |
7 | 3, 4, 5, 6 | ehleudis 24927 |
. . 3
β’ (2 β
β0 β π· = (π β π, π β π β¦ (ββΞ£π β {1, 2} (((πβπ) β (πβπ))β2)))) |
8 | 1, 7 | ax-mp 5 |
. 2
β’ π· = (π β π, π β π β¦ (ββΞ£π β {1, 2} (((πβπ) β (πβπ))β2))) |
9 | | fveq2 6889 |
. . . . . . 7
β’ (π = 1 β (πβπ) = (πβ1)) |
10 | | fveq2 6889 |
. . . . . . 7
β’ (π = 1 β (πβπ) = (πβ1)) |
11 | 9, 10 | oveq12d 7424 |
. . . . . 6
β’ (π = 1 β ((πβπ) β (πβπ)) = ((πβ1) β (πβ1))) |
12 | 11 | oveq1d 7421 |
. . . . 5
β’ (π = 1 β (((πβπ) β (πβπ))β2) = (((πβ1) β (πβ1))β2)) |
13 | | fveq2 6889 |
. . . . . . 7
β’ (π = 2 β (πβπ) = (πβ2)) |
14 | | fveq2 6889 |
. . . . . . 7
β’ (π = 2 β (πβπ) = (πβ2)) |
15 | 13, 14 | oveq12d 7424 |
. . . . . 6
β’ (π = 2 β ((πβπ) β (πβπ)) = ((πβ2) β (πβ2))) |
16 | 15 | oveq1d 7421 |
. . . . 5
β’ (π = 2 β (((πβπ) β (πβπ))β2) = (((πβ2) β (πβ2))β2)) |
17 | 5 | eleq2i 2826 |
. . . . . . . . . . . 12
β’ (π β π β π β (β βm {1,
2})) |
18 | | reex 11198 |
. . . . . . . . . . . . 13
β’ β
β V |
19 | | prex 5432 |
. . . . . . . . . . . . 13
β’ {1, 2}
β V |
20 | 18, 19 | elmap 8862 |
. . . . . . . . . . . 12
β’ (π β (β
βm {1, 2}) β π:{1, 2}βΆβ) |
21 | 17, 20 | bitri 275 |
. . . . . . . . . . 11
β’ (π β π β π:{1, 2}βΆβ) |
22 | | id 22 |
. . . . . . . . . . . 12
β’ (π:{1, 2}βΆβ β
π:{1,
2}βΆβ) |
23 | | 1ex 11207 |
. . . . . . . . . . . . . 14
β’ 1 β
V |
24 | 23 | prid1 4766 |
. . . . . . . . . . . . 13
β’ 1 β
{1, 2} |
25 | 24 | a1i 11 |
. . . . . . . . . . . 12
β’ (π:{1, 2}βΆβ β 1
β {1, 2}) |
26 | 22, 25 | ffvelcdmd 7085 |
. . . . . . . . . . 11
β’ (π:{1, 2}βΆβ β
(πβ1) β
β) |
27 | 21, 26 | sylbi 216 |
. . . . . . . . . 10
β’ (π β π β (πβ1) β β) |
28 | 27 | adantr 482 |
. . . . . . . . 9
β’ ((π β π β§ π β π) β (πβ1) β β) |
29 | 5 | eleq2i 2826 |
. . . . . . . . . . . 12
β’ (π β π β π β (β βm {1,
2})) |
30 | 18, 19 | elmap 8862 |
. . . . . . . . . . . 12
β’ (π β (β
βm {1, 2}) β π:{1, 2}βΆβ) |
31 | 29, 30 | bitri 275 |
. . . . . . . . . . 11
β’ (π β π β π:{1, 2}βΆβ) |
32 | | id 22 |
. . . . . . . . . . . 12
β’ (π:{1, 2}βΆβ β
π:{1,
2}βΆβ) |
33 | 24 | a1i 11 |
. . . . . . . . . . . 12
β’ (π:{1, 2}βΆβ β 1
β {1, 2}) |
34 | 32, 33 | ffvelcdmd 7085 |
. . . . . . . . . . 11
β’ (π:{1, 2}βΆβ β
(πβ1) β
β) |
35 | 31, 34 | sylbi 216 |
. . . . . . . . . 10
β’ (π β π β (πβ1) β β) |
36 | 35 | adantl 483 |
. . . . . . . . 9
β’ ((π β π β§ π β π) β (πβ1) β β) |
37 | 28, 36 | resubcld 11639 |
. . . . . . . 8
β’ ((π β π β§ π β π) β ((πβ1) β (πβ1)) β β) |
38 | 37 | resqcld 14087 |
. . . . . . 7
β’ ((π β π β§ π β π) β (((πβ1) β (πβ1))β2) β
β) |
39 | 38 | recnd 11239 |
. . . . . 6
β’ ((π β π β§ π β π) β (((πβ1) β (πβ1))β2) β
β) |
40 | | 2ex 12286 |
. . . . . . . . . . . . . 14
β’ 2 β
V |
41 | 40 | prid2 4767 |
. . . . . . . . . . . . 13
β’ 2 β
{1, 2} |
42 | 41 | a1i 11 |
. . . . . . . . . . . 12
β’ (π:{1, 2}βΆβ β 2
β {1, 2}) |
43 | 22, 42 | ffvelcdmd 7085 |
. . . . . . . . . . 11
β’ (π:{1, 2}βΆβ β
(πβ2) β
β) |
44 | 21, 43 | sylbi 216 |
. . . . . . . . . 10
β’ (π β π β (πβ2) β β) |
45 | 44 | adantr 482 |
. . . . . . . . 9
β’ ((π β π β§ π β π) β (πβ2) β β) |
46 | 41 | a1i 11 |
. . . . . . . . . . . 12
β’ (π:{1, 2}βΆβ β 2
β {1, 2}) |
47 | 32, 46 | ffvelcdmd 7085 |
. . . . . . . . . . 11
β’ (π:{1, 2}βΆβ β
(πβ2) β
β) |
48 | 31, 47 | sylbi 216 |
. . . . . . . . . 10
β’ (π β π β (πβ2) β β) |
49 | 48 | adantl 483 |
. . . . . . . . 9
β’ ((π β π β§ π β π) β (πβ2) β β) |
50 | 45, 49 | resubcld 11639 |
. . . . . . . 8
β’ ((π β π β§ π β π) β ((πβ2) β (πβ2)) β β) |
51 | 50 | resqcld 14087 |
. . . . . . 7
β’ ((π β π β§ π β π) β (((πβ2) β (πβ2))β2) β
β) |
52 | 51 | recnd 11239 |
. . . . . 6
β’ ((π β π β§ π β π) β (((πβ2) β (πβ2))β2) β
β) |
53 | 39, 52 | jca 513 |
. . . . 5
β’ ((π β π β§ π β π) β ((((πβ1) β (πβ1))β2) β β β§
(((πβ2) β
(πβ2))β2) β
β)) |
54 | 23, 40 | pm3.2i 472 |
. . . . . 6
β’ (1 β
V β§ 2 β V) |
55 | 54 | a1i 11 |
. . . . 5
β’ ((π β π β§ π β π) β (1 β V β§ 2 β
V)) |
56 | | 1ne2 12417 |
. . . . . 6
β’ 1 β
2 |
57 | 56 | a1i 11 |
. . . . 5
β’ ((π β π β§ π β π) β 1 β 2) |
58 | 12, 16, 53, 55, 57 | sumpr 15691 |
. . . 4
β’ ((π β π β§ π β π) β Ξ£π β {1, 2} (((πβπ) β (πβπ))β2) = ((((πβ1) β (πβ1))β2) + (((πβ2) β (πβ2))β2))) |
59 | 58 | fveq2d 6893 |
. . 3
β’ ((π β π β§ π β π) β (ββΞ£π β {1, 2} (((πβπ) β (πβπ))β2)) = (ββ((((πβ1) β (πβ1))β2) + (((πβ2) β (πβ2))β2)))) |
60 | 59 | mpoeq3ia 7484 |
. 2
β’ (π β π, π β π β¦ (ββΞ£π β {1, 2} (((πβπ) β (πβπ))β2))) = (π β π, π β π β¦ (ββ((((πβ1) β (πβ1))β2) + (((πβ2) β (πβ2))β2)))) |
61 | 8, 60 | eqtri 2761 |
1
β’ π· = (π β π, π β π β¦ (ββ((((πβ1) β (πβ1))β2) + (((πβ2) β (πβ2))β2)))) |