Step | Hyp | Ref
| Expression |
1 | | cphipfval.x |
. . . 4
β’ π = (Baseβπ) |
2 | | cphipfval.p |
. . . 4
β’ + =
(+gβπ) |
3 | | cphipfval.s |
. . . 4
β’ Β· = (
Β·π βπ) |
4 | | cphipfval.n |
. . . 4
β’ π = (normβπ) |
5 | | cphipfval.i |
. . . 4
β’ , =
(Β·πβπ) |
6 | | cphipval2.m |
. . . 4
β’ β =
(-gβπ) |
7 | | cphipval2.f |
. . . 4
β’ πΉ = (Scalarβπ) |
8 | | cphipval2.k |
. . . 4
β’ πΎ = (BaseβπΉ) |
9 | 1, 2, 3, 4, 5, 6, 7, 8 | cphipval2 24749 |
. . 3
β’ (((π β βPreHil β§ i
β πΎ) β§ π΄ β π β§ π΅ β π) β (π΄ , π΅) = (((((πβ(π΄ + π΅))β2) β ((πβ(π΄ β π΅))β2)) + (i Β· (((πβ(π΄ + (i Β· π΅)))β2) β ((πβ(π΄ β (i Β· π΅)))β2)))) /
4)) |
10 | 9 | oveq2d 7421 |
. 2
β’ (((π β βPreHil β§ i
β πΎ) β§ π΄ β π β§ π΅ β π) β (4 Β· (π΄ , π΅)) = (4 Β· (((((πβ(π΄ + π΅))β2) β ((πβ(π΄ β π΅))β2)) + (i Β· (((πβ(π΄ + (i Β· π΅)))β2) β ((πβ(π΄ β (i Β· π΅)))β2)))) /
4))) |
11 | 7, 8 | cphsubrg 24688 |
. . . . . . . . . 10
β’ (π β βPreHil β
πΎ β
(SubRingββfld)) |
12 | | cnfldbas 20940 |
. . . . . . . . . . 11
β’ β =
(Baseββfld) |
13 | 12 | subrgss 20356 |
. . . . . . . . . 10
β’ (πΎ β
(SubRingββfld) β πΎ β β) |
14 | 11, 13 | syl 17 |
. . . . . . . . 9
β’ (π β βPreHil β
πΎ β
β) |
15 | 14 | adantr 481 |
. . . . . . . 8
β’ ((π β βPreHil β§ i
β πΎ) β πΎ β
β) |
16 | 15 | 3ad2ant1 1133 |
. . . . . . 7
β’ (((π β βPreHil β§ i
β πΎ) β§ π΄ β π β§ π΅ β π) β πΎ β β) |
17 | | simp1l 1197 |
. . . . . . . 8
β’ (((π β βPreHil β§ i
β πΎ) β§ π΄ β π β§ π΅ β π) β π β βPreHil) |
18 | | cphngp 24681 |
. . . . . . . . . . 11
β’ (π β βPreHil β
π β
NrmGrp) |
19 | | ngpgrp 24099 |
. . . . . . . . . . 11
β’ (π β NrmGrp β π β Grp) |
20 | 18, 19 | syl 17 |
. . . . . . . . . 10
β’ (π β βPreHil β
π β
Grp) |
21 | 20 | adantr 481 |
. . . . . . . . 9
β’ ((π β βPreHil β§ i
β πΎ) β π β Grp) |
22 | 1, 2 | grpcl 18823 |
. . . . . . . . 9
β’ ((π β Grp β§ π΄ β π β§ π΅ β π) β (π΄ + π΅) β π) |
23 | 21, 22 | syl3an1 1163 |
. . . . . . . 8
β’ (((π β βPreHil β§ i
β πΎ) β§ π΄ β π β§ π΅ β π) β (π΄ + π΅) β π) |
24 | 1, 5, 4, 7, 8 | cphnmcl 24704 |
. . . . . . . 8
β’ ((π β βPreHil β§
(π΄ + π΅) β π) β (πβ(π΄ + π΅)) β πΎ) |
25 | 17, 23, 24 | syl2anc 584 |
. . . . . . 7
β’ (((π β βPreHil β§ i
β πΎ) β§ π΄ β π β§ π΅ β π) β (πβ(π΄ + π΅)) β πΎ) |
26 | 16, 25 | sseldd 3982 |
. . . . . 6
β’ (((π β βPreHil β§ i
β πΎ) β§ π΄ β π β§ π΅ β π) β (πβ(π΄ + π΅)) β β) |
27 | 26 | sqcld 14105 |
. . . . 5
β’ (((π β βPreHil β§ i
β πΎ) β§ π΄ β π β§ π΅ β π) β ((πβ(π΄ + π΅))β2) β β) |
28 | 1, 6 | grpsubcl 18899 |
. . . . . . . . 9
β’ ((π β Grp β§ π΄ β π β§ π΅ β π) β (π΄ β π΅) β π) |
29 | 21, 28 | syl3an1 1163 |
. . . . . . . 8
β’ (((π β βPreHil β§ i
β πΎ) β§ π΄ β π β§ π΅ β π) β (π΄ β π΅) β π) |
30 | 1, 5, 4, 7, 8 | cphnmcl 24704 |
. . . . . . . 8
β’ ((π β βPreHil β§
(π΄ β π΅) β π) β (πβ(π΄ β π΅)) β πΎ) |
31 | 17, 29, 30 | syl2anc 584 |
. . . . . . 7
β’ (((π β βPreHil β§ i
β πΎ) β§ π΄ β π β§ π΅ β π) β (πβ(π΄ β π΅)) β πΎ) |
32 | 16, 31 | sseldd 3982 |
. . . . . 6
β’ (((π β βPreHil β§ i
β πΎ) β§ π΄ β π β§ π΅ β π) β (πβ(π΄ β π΅)) β β) |
33 | 32 | sqcld 14105 |
. . . . 5
β’ (((π β βPreHil β§ i
β πΎ) β§ π΄ β π β§ π΅ β π) β ((πβ(π΄ β π΅))β2) β β) |
34 | 27, 33 | subcld 11567 |
. . . 4
β’ (((π β βPreHil β§ i
β πΎ) β§ π΄ β π β§ π΅ β π) β (((πβ(π΄ + π΅))β2) β ((πβ(π΄ β π΅))β2)) β β) |
35 | | ax-icn 11165 |
. . . . . 6
β’ i β
β |
36 | 35 | a1i 11 |
. . . . 5
β’ (((π β βPreHil β§ i
β πΎ) β§ π΄ β π β§ π΅ β π) β i β β) |
37 | 17, 20 | syl 17 |
. . . . . . . . . 10
β’ (((π β βPreHil β§ i
β πΎ) β§ π΄ β π β§ π΅ β π) β π β Grp) |
38 | | simp2 1137 |
. . . . . . . . . 10
β’ (((π β βPreHil β§ i
β πΎ) β§ π΄ β π β§ π΅ β π) β π΄ β π) |
39 | | cphlmod 24682 |
. . . . . . . . . . . . 13
β’ (π β βPreHil β
π β
LMod) |
40 | 39 | adantr 481 |
. . . . . . . . . . . 12
β’ ((π β βPreHil β§ i
β πΎ) β π β LMod) |
41 | 40 | 3ad2ant1 1133 |
. . . . . . . . . . 11
β’ (((π β βPreHil β§ i
β πΎ) β§ π΄ β π β§ π΅ β π) β π β LMod) |
42 | | simp1r 1198 |
. . . . . . . . . . 11
β’ (((π β βPreHil β§ i
β πΎ) β§ π΄ β π β§ π΅ β π) β i β πΎ) |
43 | | simp3 1138 |
. . . . . . . . . . 11
β’ (((π β βPreHil β§ i
β πΎ) β§ π΄ β π β§ π΅ β π) β π΅ β π) |
44 | 1, 7, 3, 8 | lmodvscl 20481 |
. . . . . . . . . . 11
β’ ((π β LMod β§ i β
πΎ β§ π΅ β π) β (i Β· π΅) β π) |
45 | 41, 42, 43, 44 | syl3anc 1371 |
. . . . . . . . . 10
β’ (((π β βPreHil β§ i
β πΎ) β§ π΄ β π β§ π΅ β π) β (i Β· π΅) β π) |
46 | 1, 2 | grpcl 18823 |
. . . . . . . . . 10
β’ ((π β Grp β§ π΄ β π β§ (i Β· π΅) β π) β (π΄ + (i Β· π΅)) β π) |
47 | 37, 38, 45, 46 | syl3anc 1371 |
. . . . . . . . 9
β’ (((π β βPreHil β§ i
β πΎ) β§ π΄ β π β§ π΅ β π) β (π΄ + (i Β· π΅)) β π) |
48 | 1, 5, 4, 7, 8 | cphnmcl 24704 |
. . . . . . . . 9
β’ ((π β βPreHil β§
(π΄ + (i Β· π΅)) β π) β (πβ(π΄ + (i Β· π΅))) β πΎ) |
49 | 17, 47, 48 | syl2anc 584 |
. . . . . . . 8
β’ (((π β βPreHil β§ i
β πΎ) β§ π΄ β π β§ π΅ β π) β (πβ(π΄ + (i Β· π΅))) β πΎ) |
50 | 16, 49 | sseldd 3982 |
. . . . . . 7
β’ (((π β βPreHil β§ i
β πΎ) β§ π΄ β π β§ π΅ β π) β (πβ(π΄ + (i Β· π΅))) β β) |
51 | 50 | sqcld 14105 |
. . . . . 6
β’ (((π β βPreHil β§ i
β πΎ) β§ π΄ β π β§ π΅ β π) β ((πβ(π΄ + (i Β· π΅)))β2) β β) |
52 | 1, 6 | grpsubcl 18899 |
. . . . . . . . . 10
β’ ((π β Grp β§ π΄ β π β§ (i Β· π΅) β π) β (π΄ β (i Β· π΅)) β π) |
53 | 37, 38, 45, 52 | syl3anc 1371 |
. . . . . . . . 9
β’ (((π β βPreHil β§ i
β πΎ) β§ π΄ β π β§ π΅ β π) β (π΄ β (i Β· π΅)) β π) |
54 | 1, 5, 4, 7, 8 | cphnmcl 24704 |
. . . . . . . . 9
β’ ((π β βPreHil β§
(π΄ β (i Β· π΅)) β π) β (πβ(π΄ β (i Β· π΅))) β πΎ) |
55 | 17, 53, 54 | syl2anc 584 |
. . . . . . . 8
β’ (((π β βPreHil β§ i
β πΎ) β§ π΄ β π β§ π΅ β π) β (πβ(π΄ β (i Β· π΅))) β πΎ) |
56 | 16, 55 | sseldd 3982 |
. . . . . . 7
β’ (((π β βPreHil β§ i
β πΎ) β§ π΄ β π β§ π΅ β π) β (πβ(π΄ β (i Β· π΅))) β
β) |
57 | 56 | sqcld 14105 |
. . . . . 6
β’ (((π β βPreHil β§ i
β πΎ) β§ π΄ β π β§ π΅ β π) β ((πβ(π΄ β (i Β· π΅)))β2) β
β) |
58 | 51, 57 | subcld 11567 |
. . . . 5
β’ (((π β βPreHil β§ i
β πΎ) β§ π΄ β π β§ π΅ β π) β (((πβ(π΄ + (i Β· π΅)))β2) β ((πβ(π΄ β (i Β· π΅)))β2)) β
β) |
59 | 36, 58 | mulcld 11230 |
. . . 4
β’ (((π β βPreHil β§ i
β πΎ) β§ π΄ β π β§ π΅ β π) β (i Β· (((πβ(π΄ + (i Β· π΅)))β2) β ((πβ(π΄ β (i Β· π΅)))β2))) β
β) |
60 | 34, 59 | addcld 11229 |
. . 3
β’ (((π β βPreHil β§ i
β πΎ) β§ π΄ β π β§ π΅ β π) β ((((πβ(π΄ + π΅))β2) β ((πβ(π΄ β π΅))β2)) + (i Β· (((πβ(π΄ + (i Β· π΅)))β2) β ((πβ(π΄ β (i Β· π΅)))β2)))) β
β) |
61 | | 4cn 12293 |
. . . 4
β’ 4 β
β |
62 | 61 | a1i 11 |
. . 3
β’ (((π β βPreHil β§ i
β πΎ) β§ π΄ β π β§ π΅ β π) β 4 β β) |
63 | | 4ne0 12316 |
. . . 4
β’ 4 β
0 |
64 | 63 | a1i 11 |
. . 3
β’ (((π β βPreHil β§ i
β πΎ) β§ π΄ β π β§ π΅ β π) β 4 β 0) |
65 | 60, 62, 64 | divcan2d 11988 |
. 2
β’ (((π β βPreHil β§ i
β πΎ) β§ π΄ β π β§ π΅ β π) β (4 Β· (((((πβ(π΄ + π΅))β2) β ((πβ(π΄ β π΅))β2)) + (i Β· (((πβ(π΄ + (i Β· π΅)))β2) β ((πβ(π΄ β (i Β· π΅)))β2)))) / 4)) = ((((πβ(π΄ + π΅))β2) β ((πβ(π΄ β π΅))β2)) + (i Β· (((πβ(π΄ + (i Β· π΅)))β2) β ((πβ(π΄ β (i Β· π΅)))β2))))) |
66 | 10, 65 | eqtrd 2772 |
1
β’ (((π β βPreHil β§ i
β πΎ) β§ π΄ β π β§ π΅ β π) β (4 Β· (π΄ , π΅)) = ((((πβ(π΄ + π΅))β2) β ((πβ(π΄ β π΅))β2)) + (i Β· (((πβ(π΄ + (i Β· π΅)))β2) β ((πβ(π΄ β (i Β· π΅)))β2))))) |