Step | Hyp | Ref
| Expression |
1 | | mapdh8a.h |
. . 3
β’ π» = (LHypβπΎ) |
2 | | mapdh8a.u |
. . 3
β’ π = ((DVecHβπΎ)βπ) |
3 | | mapdh8a.v |
. . 3
β’ π = (Baseβπ) |
4 | | mapdh8a.n |
. . 3
β’ π = (LSpanβπ) |
5 | | mapdh8a.k |
. . 3
β’ (π β (πΎ β HL β§ π β π»)) |
6 | | mapdh8e.x |
. . . 4
β’ (π β π β (π β { 0 })) |
7 | 6 | eldifad 3959 |
. . 3
β’ (π β π β π) |
8 | | mapdh8e.y |
. . . 4
β’ (π β π β (π β { 0 })) |
9 | 8 | eldifad 3959 |
. . 3
β’ (π β π β π) |
10 | 1, 2, 3, 4, 5, 7, 9 | dvh3dim 40255 |
. 2
β’ (π β βπ€ β π Β¬ π€ β (πβ{π, π})) |
11 | | mapdh8a.s |
. . . 4
β’ β =
(-gβπ) |
12 | | mapdh8a.o |
. . . 4
β’ 0 =
(0gβπ) |
13 | | mapdh8a.c |
. . . 4
β’ πΆ = ((LCDualβπΎ)βπ) |
14 | | mapdh8a.d |
. . . 4
β’ π· = (BaseβπΆ) |
15 | | mapdh8a.r |
. . . 4
β’ π
= (-gβπΆ) |
16 | | mapdh8a.q |
. . . 4
β’ π = (0gβπΆ) |
17 | | mapdh8a.j |
. . . 4
β’ π½ = (LSpanβπΆ) |
18 | | mapdh8a.m |
. . . 4
β’ π = ((mapdβπΎ)βπ) |
19 | | mapdh8a.i |
. . . 4
β’ πΌ = (π₯ β V β¦ if((2nd
βπ₯) = 0 , π, (β©β β π· ((πβ(πβ{(2nd βπ₯)})) = (π½β{β}) β§ (πβ(πβ{((1st
β(1st βπ₯)) β (2nd
βπ₯))})) = (π½β{((2nd
β(1st βπ₯))π
β)}))))) |
20 | 5 | 3ad2ant1 1134 |
. . . 4
β’ ((π β§ π€ β π β§ Β¬ π€ β (πβ{π, π})) β (πΎ β HL β§ π β π»)) |
21 | | mapdh8e.f |
. . . . 5
β’ (π β πΉ β π·) |
22 | 21 | 3ad2ant1 1134 |
. . . 4
β’ ((π β§ π€ β π β§ Β¬ π€ β (πβ{π, π})) β πΉ β π·) |
23 | | mapdh8e.mn |
. . . . 5
β’ (π β (πβ(πβ{π})) = (π½β{πΉ})) |
24 | 23 | 3ad2ant1 1134 |
. . . 4
β’ ((π β§ π€ β π β§ Β¬ π€ β (πβ{π, π})) β (πβ(πβ{π})) = (π½β{πΉ})) |
25 | | mapdh8e.eg |
. . . . 5
β’ (π β (πΌββ¨π, πΉ, πβ©) = πΊ) |
26 | 25 | 3ad2ant1 1134 |
. . . 4
β’ ((π β§ π€ β π β§ Β¬ π€ β (πβ{π, π})) β (πΌββ¨π, πΉ, πβ©) = πΊ) |
27 | 6 | 3ad2ant1 1134 |
. . . 4
β’ ((π β§ π€ β π β§ Β¬ π€ β (πβ{π, π})) β π β (π β { 0 })) |
28 | 8 | 3ad2ant1 1134 |
. . . 4
β’ ((π β§ π€ β π β§ Β¬ π€ β (πβ{π, π})) β π β (π β { 0 })) |
29 | | mapdh8e.t |
. . . . 5
β’ (π β π β (π β { 0 })) |
30 | 29 | 3ad2ant1 1134 |
. . . 4
β’ ((π β§ π€ β π β§ Β¬ π€ β (πβ{π, π})) β π β (π β { 0 })) |
31 | | mapdh8e.yt |
. . . . 5
β’ (π β (πβ{π}) β (πβ{π})) |
32 | 31 | 3ad2ant1 1134 |
. . . 4
β’ ((π β§ π€ β π β§ Β¬ π€ β (πβ{π, π})) β (πβ{π}) β (πβ{π})) |
33 | | eqid 2733 |
. . . . 5
β’
(LSubSpβπ) =
(LSubSpβπ) |
34 | 1, 2, 5 | dvhlmod 39919 |
. . . . . 6
β’ (π β π β LMod) |
35 | 34 | 3ad2ant1 1134 |
. . . . 5
β’ ((π β§ π€ β π β§ Β¬ π€ β (πβ{π, π})) β π β LMod) |
36 | 3, 33, 4, 34, 7, 9 | lspprcl 20577 |
. . . . . 6
β’ (π β (πβ{π, π}) β (LSubSpβπ)) |
37 | 36 | 3ad2ant1 1134 |
. . . . 5
β’ ((π β§ π€ β π β§ Β¬ π€ β (πβ{π, π})) β (πβ{π, π}) β (LSubSpβπ)) |
38 | | simp2 1138 |
. . . . 5
β’ ((π β§ π€ β π β§ Β¬ π€ β (πβ{π, π})) β π€ β π) |
39 | | simp3 1139 |
. . . . 5
β’ ((π β§ π€ β π β§ Β¬ π€ β (πβ{π, π})) β Β¬ π€ β (πβ{π, π})) |
40 | 12, 33, 35, 37, 38, 39 | lssneln0 20551 |
. . . 4
β’ ((π β§ π€ β π β§ Β¬ π€ β (πβ{π, π})) β π€ β (π β { 0 })) |
41 | 1, 2, 5 | dvhlvec 39918 |
. . . . . . . . 9
β’ (π β π β LVec) |
42 | 29 | eldifad 3959 |
. . . . . . . . 9
β’ (π β π β π) |
43 | | mapdh8e.xy |
. . . . . . . . 9
β’ (π β (πβ{π}) β (πβ{π})) |
44 | | mapdh8e.e |
. . . . . . . . . 10
β’ (π β π β (πβ{π, π})) |
45 | | prcom 4735 |
. . . . . . . . . . 11
β’ {π, π} = {π, π} |
46 | 45 | fveq2i 6891 |
. . . . . . . . . 10
β’ (πβ{π, π}) = (πβ{π, π}) |
47 | 44, 46 | eleqtrdi 2844 |
. . . . . . . . 9
β’ (π β π β (πβ{π, π})) |
48 | 3, 12, 4, 41, 6, 42, 9, 43, 47 | lspexch 20730 |
. . . . . . . 8
β’ (π β π β (πβ{π, π})) |
49 | 33, 4, 34, 36, 48 | lspsnel5a 20595 |
. . . . . . 7
β’ (π β (πβ{π}) β (πβ{π, π})) |
50 | 49 | 3ad2ant1 1134 |
. . . . . 6
β’ ((π β§ π€ β π β§ Β¬ π€ β (πβ{π, π})) β (πβ{π}) β (πβ{π, π})) |
51 | 34 | adantr 482 |
. . . . . . . . . 10
β’ ((π β§ π€ β π) β π β LMod) |
52 | 36 | adantr 482 |
. . . . . . . . . 10
β’ ((π β§ π€ β π) β (πβ{π, π}) β (LSubSpβπ)) |
53 | | simpr 486 |
. . . . . . . . . 10
β’ ((π β§ π€ β π) β π€ β π) |
54 | 3, 33, 4, 51, 52, 53 | lspsnel5 20594 |
. . . . . . . . 9
β’ ((π β§ π€ β π) β (π€ β (πβ{π, π}) β (πβ{π€}) β (πβ{π, π}))) |
55 | 54 | biimprd 247 |
. . . . . . . 8
β’ ((π β§ π€ β π) β ((πβ{π€}) β (πβ{π, π}) β π€ β (πβ{π, π}))) |
56 | 55 | con3d 152 |
. . . . . . 7
β’ ((π β§ π€ β π) β (Β¬ π€ β (πβ{π, π}) β Β¬ (πβ{π€}) β (πβ{π, π}))) |
57 | 56 | 3impia 1118 |
. . . . . 6
β’ ((π β§ π€ β π β§ Β¬ π€ β (πβ{π, π})) β Β¬ (πβ{π€}) β (πβ{π, π})) |
58 | | nssne2 4044 |
. . . . . 6
β’ (((πβ{π}) β (πβ{π, π}) β§ Β¬ (πβ{π€}) β (πβ{π, π})) β (πβ{π}) β (πβ{π€})) |
59 | 50, 57, 58 | syl2anc 585 |
. . . . 5
β’ ((π β§ π€ β π β§ Β¬ π€ β (πβ{π, π})) β (πβ{π}) β (πβ{π€})) |
60 | 59 | necomd 2997 |
. . . 4
β’ ((π β§ π€ β π β§ Β¬ π€ β (πβ{π, π})) β (πβ{π€}) β (πβ{π})) |
61 | | mapdh8e.xt |
. . . . 5
β’ (π β (πβ{π}) β (πβ{π})) |
62 | 61 | 3ad2ant1 1134 |
. . . 4
β’ ((π β§ π€ β π β§ Β¬ π€ β (πβ{π, π})) β (πβ{π}) β (πβ{π})) |
63 | 41 | 3ad2ant1 1134 |
. . . . . . 7
β’ ((π β§ π€ β π β§ Β¬ π€ β (πβ{π, π})) β π β LVec) |
64 | 7 | 3ad2ant1 1134 |
. . . . . . 7
β’ ((π β§ π€ β π β§ Β¬ π€ β (πβ{π, π})) β π β π) |
65 | 9 | 3ad2ant1 1134 |
. . . . . . 7
β’ ((π β§ π€ β π β§ Β¬ π€ β (πβ{π, π})) β π β π) |
66 | 3, 4, 63, 38, 64, 65, 39 | lspindpi 20733 |
. . . . . 6
β’ ((π β§ π€ β π β§ Β¬ π€ β (πβ{π, π})) β ((πβ{π€}) β (πβ{π}) β§ (πβ{π€}) β (πβ{π}))) |
67 | 66 | simprd 497 |
. . . . 5
β’ ((π β§ π€ β π β§ Β¬ π€ β (πβ{π, π})) β (πβ{π€}) β (πβ{π})) |
68 | 67 | necomd 2997 |
. . . 4
β’ ((π β§ π€ β π β§ Β¬ π€ β (πβ{π, π})) β (πβ{π}) β (πβ{π€})) |
69 | 43 | 3ad2ant1 1134 |
. . . . . 6
β’ ((π β§ π€ β π β§ Β¬ π€ β (πβ{π, π})) β (πβ{π}) β (πβ{π})) |
70 | 3, 12, 4, 63, 27, 65, 38, 69, 39 | lspindp2l 20735 |
. . . . 5
β’ ((π β§ π€ β π β§ Β¬ π€ β (πβ{π, π})) β ((πβ{π}) β (πβ{π€}) β§ Β¬ π β (πβ{π, π€}))) |
71 | 70 | simprd 497 |
. . . 4
β’ ((π β§ π€ β π β§ Β¬ π€ β (πβ{π, π})) β Β¬ π β (πβ{π, π€})) |
72 | 1, 2, 3, 11, 12, 4, 13, 14, 15, 16, 17, 18, 19, 20, 22, 24, 26, 27, 28, 30, 32, 40, 60, 62, 68, 71 | mapdh8d 40592 |
. . 3
β’ ((π β§ π€ β π β§ Β¬ π€ β (πβ{π, π})) β (πΌββ¨π, πΊ, πβ©) = (πΌββ¨π, πΉ, πβ©)) |
73 | 72 | rexlimdv3a 3160 |
. 2
β’ (π β (βπ€ β π Β¬ π€ β (πβ{π, π}) β (πΌββ¨π, πΊ, πβ©) = (πΌββ¨π, πΉ, πβ©))) |
74 | 10, 73 | mpd 15 |
1
β’ (π β (πΌββ¨π, πΊ, πβ©) = (πΌββ¨π, πΉ, πβ©)) |