Step | Hyp | Ref
| Expression |
1 | | expgrowth.s |
. . . . . . . . . . . . . . . . 17
β’ (π β π β {β, β}) |
2 | | cnelprrecn 11199 |
. . . . . . . . . . . . . . . . . 18
β’ β
β {β, β} |
3 | 2 | a1i 11 |
. . . . . . . . . . . . . . . . 17
β’ (π β β β {β,
β}) |
4 | | expgrowth.k |
. . . . . . . . . . . . . . . . . . . 20
β’ (π β πΎ β β) |
5 | | recnprss 25403 |
. . . . . . . . . . . . . . . . . . . . . 22
β’ (π β {β, β}
β π β
β) |
6 | 1, 5 | syl 17 |
. . . . . . . . . . . . . . . . . . . . 21
β’ (π β π β β) |
7 | 6 | sseld 3980 |
. . . . . . . . . . . . . . . . . . . 20
β’ (π β (π’ β π β π’ β β)) |
8 | | mulcl 11190 |
. . . . . . . . . . . . . . . . . . . 20
β’ ((πΎ β β β§ π’ β β) β (πΎ Β· π’) β β) |
9 | 4, 7, 8 | syl6an 683 |
. . . . . . . . . . . . . . . . . . 19
β’ (π β (π’ β π β (πΎ Β· π’) β β)) |
10 | 9 | imp 408 |
. . . . . . . . . . . . . . . . . 18
β’ ((π β§ π’ β π) β (πΎ Β· π’) β β) |
11 | 10 | negcld 11554 |
. . . . . . . . . . . . . . . . 17
β’ ((π β§ π’ β π) β -(πΎ Β· π’) β β) |
12 | 4 | negcld 11554 |
. . . . . . . . . . . . . . . . . 18
β’ (π β -πΎ β β) |
13 | 12 | adantr 482 |
. . . . . . . . . . . . . . . . 17
β’ ((π β§ π’ β π) β -πΎ β β) |
14 | | efcl 16022 |
. . . . . . . . . . . . . . . . . 18
β’ (π¦ β β β
(expβπ¦) β
β) |
15 | 14 | adantl 483 |
. . . . . . . . . . . . . . . . 17
β’ ((π β§ π¦ β β) β (expβπ¦) β
β) |
16 | 4 | adantr 482 |
. . . . . . . . . . . . . . . . . 18
β’ ((π β§ π’ β π) β πΎ β β) |
17 | 7 | imp 408 |
. . . . . . . . . . . . . . . . . . . 20
β’ ((π β§ π’ β π) β π’ β β) |
18 | | ax-1cn 11164 |
. . . . . . . . . . . . . . . . . . . . 21
β’ 1 β
β |
19 | 18 | a1i 11 |
. . . . . . . . . . . . . . . . . . . 20
β’ ((π β§ π’ β π) β 1 β β) |
20 | 1 | dvmptid 25456 |
. . . . . . . . . . . . . . . . . . . 20
β’ (π β (π D (π’ β π β¦ π’)) = (π’ β π β¦ 1)) |
21 | 1, 17, 19, 20, 4 | dvmptcmul 25463 |
. . . . . . . . . . . . . . . . . . 19
β’ (π β (π D (π’ β π β¦ (πΎ Β· π’))) = (π’ β π β¦ (πΎ Β· 1))) |
22 | 4 | mulridd 11227 |
. . . . . . . . . . . . . . . . . . . 20
β’ (π β (πΎ Β· 1) = πΎ) |
23 | 22 | mpteq2dv 5249 |
. . . . . . . . . . . . . . . . . . 19
β’ (π β (π’ β π β¦ (πΎ Β· 1)) = (π’ β π β¦ πΎ)) |
24 | 21, 23 | eqtrd 2773 |
. . . . . . . . . . . . . . . . . 18
β’ (π β (π D (π’ β π β¦ (πΎ Β· π’))) = (π’ β π β¦ πΎ)) |
25 | 1, 10, 16, 24 | dvmptneg 25465 |
. . . . . . . . . . . . . . . . 17
β’ (π β (π D (π’ β π β¦ -(πΎ Β· π’))) = (π’ β π β¦ -πΎ)) |
26 | | dvef 25479 |
. . . . . . . . . . . . . . . . . . 19
β’ (β
D exp) = exp |
27 | | eff 16021 |
. . . . . . . . . . . . . . . . . . . . . 22
β’
exp:ββΆβ |
28 | | ffn 6714 |
. . . . . . . . . . . . . . . . . . . . . 22
β’
(exp:ββΆβ β exp Fn β) |
29 | 27, 28 | ax-mp 5 |
. . . . . . . . . . . . . . . . . . . . 21
β’ exp Fn
β |
30 | | dffn5 6947 |
. . . . . . . . . . . . . . . . . . . . 21
β’ (exp Fn
β β exp = (π¦
β β β¦ (expβπ¦))) |
31 | 29, 30 | mpbi 229 |
. . . . . . . . . . . . . . . . . . . 20
β’ exp =
(π¦ β β β¦
(expβπ¦)) |
32 | 31 | oveq2i 7415 |
. . . . . . . . . . . . . . . . . . 19
β’ (β
D exp) = (β D (π¦
β β β¦ (expβπ¦))) |
33 | 26, 32, 31 | 3eqtr3i 2769 |
. . . . . . . . . . . . . . . . . 18
β’ (β
D (π¦ β β β¦
(expβπ¦))) = (π¦ β β β¦
(expβπ¦)) |
34 | 33 | a1i 11 |
. . . . . . . . . . . . . . . . 17
β’ (π β (β D (π¦ β β β¦
(expβπ¦))) = (π¦ β β β¦
(expβπ¦))) |
35 | | fveq2 6888 |
. . . . . . . . . . . . . . . . 17
β’ (π¦ = -(πΎ Β· π’) β (expβπ¦) = (expβ-(πΎ Β· π’))) |
36 | 1, 3, 11, 13, 15, 15, 25, 34, 35, 35 | dvmptco 25471 |
. . . . . . . . . . . . . . . 16
β’ (π β (π D (π’ β π β¦ (expβ-(πΎ Β· π’)))) = (π’ β π β¦ ((expβ-(πΎ Β· π’)) Β· -πΎ))) |
37 | 36 | oveq2d 7420 |
. . . . . . . . . . . . . . 15
β’ (π β (π βf Β· (π D (π’ β π β¦ (expβ-(πΎ Β· π’))))) = (π βf Β· (π’ β π β¦ ((expβ-(πΎ Β· π’)) Β· -πΎ)))) |
38 | | expgrowth.y |
. . . . . . . . . . . . . . . 16
β’ (π β π:πβΆβ) |
39 | | efcl 16022 |
. . . . . . . . . . . . . . . . . . . 20
β’ (-(πΎ Β· π’) β β β (expβ-(πΎ Β· π’)) β β) |
40 | 11, 39 | syl 17 |
. . . . . . . . . . . . . . . . . . 19
β’ ((π β§ π’ β π) β (expβ-(πΎ Β· π’)) β β) |
41 | 40, 13 | mulcld 11230 |
. . . . . . . . . . . . . . . . . 18
β’ ((π β§ π’ β π) β ((expβ-(πΎ Β· π’)) Β· -πΎ) β β) |
42 | 41 | fmpttd 7110 |
. . . . . . . . . . . . . . . . 17
β’ (π β (π’ β π β¦ ((expβ-(πΎ Β· π’)) Β· -πΎ)):πβΆβ) |
43 | 36 | feq1d 6699 |
. . . . . . . . . . . . . . . . 17
β’ (π β ((π D (π’ β π β¦ (expβ-(πΎ Β· π’)))):πβΆβ β (π’ β π β¦ ((expβ-(πΎ Β· π’)) Β· -πΎ)):πβΆβ)) |
44 | 42, 43 | mpbird 257 |
. . . . . . . . . . . . . . . 16
β’ (π β (π D (π’ β π β¦ (expβ-(πΎ Β· π’)))):πβΆβ) |
45 | | mulcom 11192 |
. . . . . . . . . . . . . . . . 17
β’ ((π₯ β β β§ π¦ β β) β (π₯ Β· π¦) = (π¦ Β· π₯)) |
46 | 45 | adantl 483 |
. . . . . . . . . . . . . . . 16
β’ ((π β§ (π₯ β β β§ π¦ β β)) β (π₯ Β· π¦) = (π¦ Β· π₯)) |
47 | 1, 38, 44, 46 | caofcom 7700 |
. . . . . . . . . . . . . . 15
β’ (π β (π βf Β· (π D (π’ β π β¦ (expβ-(πΎ Β· π’))))) = ((π D (π’ β π β¦ (expβ-(πΎ Β· π’)))) βf Β· π)) |
48 | 37, 47 | eqtr3d 2775 |
. . . . . . . . . . . . . 14
β’ (π β (π βf Β· (π’ β π β¦ ((expβ-(πΎ Β· π’)) Β· -πΎ))) = ((π D (π’ β π β¦ (expβ-(πΎ Β· π’)))) βf Β· π)) |
49 | 48 | oveq2d 7420 |
. . . . . . . . . . . . 13
β’ (π β (((π D π) βf Β· (π’ β π β¦ (expβ-(πΎ Β· π’)))) βf + (π βf Β· (π’ β π β¦ ((expβ-(πΎ Β· π’)) Β· -πΎ)))) = (((π D π) βf Β· (π’ β π β¦ (expβ-(πΎ Β· π’)))) βf + ((π D (π’ β π β¦ (expβ-(πΎ Β· π’)))) βf Β· π))) |
50 | | fconst6g 6777 |
. . . . . . . . . . . . . . . . . 18
β’ (-πΎ β β β (π Γ {-πΎ}):πβΆβ) |
51 | 12, 50 | syl 17 |
. . . . . . . . . . . . . . . . 17
β’ (π β (π Γ {-πΎ}):πβΆβ) |
52 | 40 | fmpttd 7110 |
. . . . . . . . . . . . . . . . 17
β’ (π β (π’ β π β¦ (expβ-(πΎ Β· π’))):πβΆβ) |
53 | 1, 51, 52, 46 | caofcom 7700 |
. . . . . . . . . . . . . . . 16
β’ (π β ((π Γ {-πΎ}) βf Β· (π’ β π β¦ (expβ-(πΎ Β· π’)))) = ((π’ β π β¦ (expβ-(πΎ Β· π’))) βf Β· (π Γ {-πΎ}))) |
54 | | eqidd 2734 |
. . . . . . . . . . . . . . . . 17
β’ (π β (π’ β π β¦ (expβ-(πΎ Β· π’))) = (π’ β π β¦ (expβ-(πΎ Β· π’)))) |
55 | | fconstmpt 5736 |
. . . . . . . . . . . . . . . . . 18
β’ (π Γ {-πΎ}) = (π’ β π β¦ -πΎ) |
56 | 55 | a1i 11 |
. . . . . . . . . . . . . . . . 17
β’ (π β (π Γ {-πΎ}) = (π’ β π β¦ -πΎ)) |
57 | 1, 40, 13, 54, 56 | offval2 7685 |
. . . . . . . . . . . . . . . 16
β’ (π β ((π’ β π β¦ (expβ-(πΎ Β· π’))) βf Β· (π Γ {-πΎ})) = (π’ β π β¦ ((expβ-(πΎ Β· π’)) Β· -πΎ))) |
58 | 53, 57 | eqtrd 2773 |
. . . . . . . . . . . . . . 15
β’ (π β ((π Γ {-πΎ}) βf Β· (π’ β π β¦ (expβ-(πΎ Β· π’)))) = (π’ β π β¦ ((expβ-(πΎ Β· π’)) Β· -πΎ))) |
59 | 58 | oveq2d 7420 |
. . . . . . . . . . . . . 14
β’ (π β (π βf Β· ((π Γ {-πΎ}) βf Β· (π’ β π β¦ (expβ-(πΎ Β· π’))))) = (π βf Β· (π’ β π β¦ ((expβ-(πΎ Β· π’)) Β· -πΎ)))) |
60 | 59 | oveq2d 7420 |
. . . . . . . . . . . . 13
β’ (π β (((π D π) βf Β· (π’ β π β¦ (expβ-(πΎ Β· π’)))) βf + (π βf Β· ((π Γ {-πΎ}) βf Β· (π’ β π β¦ (expβ-(πΎ Β· π’)))))) = (((π D π) βf Β· (π’ β π β¦ (expβ-(πΎ Β· π’)))) βf + (π βf Β· (π’ β π β¦ ((expβ-(πΎ Β· π’)) Β· -πΎ))))) |
61 | | expgrowth.dy |
. . . . . . . . . . . . . 14
β’ (π β dom (π D π) = π) |
62 | 36 | dmeqd 5903 |
. . . . . . . . . . . . . . 15
β’ (π β dom (π D (π’ β π β¦ (expβ-(πΎ Β· π’)))) = dom (π’ β π β¦ ((expβ-(πΎ Β· π’)) Β· -πΎ))) |
63 | | eqid 2733 |
. . . . . . . . . . . . . . . 16
β’ (π’ β π β¦ ((expβ-(πΎ Β· π’)) Β· -πΎ)) = (π’ β π β¦ ((expβ-(πΎ Β· π’)) Β· -πΎ)) |
64 | 63, 41 | dmmptd 6692 |
. . . . . . . . . . . . . . 15
β’ (π β dom (π’ β π β¦ ((expβ-(πΎ Β· π’)) Β· -πΎ)) = π) |
65 | 62, 64 | eqtrd 2773 |
. . . . . . . . . . . . . 14
β’ (π β dom (π D (π’ β π β¦ (expβ-(πΎ Β· π’)))) = π) |
66 | 1, 38, 52, 61, 65 | dvmulf 25442 |
. . . . . . . . . . . . 13
β’ (π β (π D (π βf Β· (π’ β π β¦ (expβ-(πΎ Β· π’))))) = (((π D π) βf Β· (π’ β π β¦ (expβ-(πΎ Β· π’)))) βf + ((π D (π’ β π β¦ (expβ-(πΎ Β· π’)))) βf Β· π))) |
67 | 49, 60, 66 | 3eqtr4rd 2784 |
. . . . . . . . . . . 12
β’ (π β (π D (π βf Β· (π’ β π β¦ (expβ-(πΎ Β· π’))))) = (((π D π) βf Β· (π’ β π β¦ (expβ-(πΎ Β· π’)))) βf + (π βf Β· ((π Γ {-πΎ}) βf Β· (π’ β π β¦ (expβ-(πΎ Β· π’))))))) |
68 | | ofmul12 43017 |
. . . . . . . . . . . . . 14
β’ (((π β {β, β} β§
π:πβΆβ) β§ ((π Γ {-πΎ}):πβΆβ β§ (π’ β π β¦ (expβ-(πΎ Β· π’))):πβΆβ)) β (π βf Β· ((π Γ {-πΎ}) βf Β· (π’ β π β¦ (expβ-(πΎ Β· π’))))) = ((π Γ {-πΎ}) βf Β· (π βf Β·
(π’ β π β¦ (expβ-(πΎ Β· π’)))))) |
69 | 1, 38, 51, 52, 68 | syl22anc 838 |
. . . . . . . . . . . . 13
β’ (π β (π βf Β· ((π Γ {-πΎ}) βf Β· (π’ β π β¦ (expβ-(πΎ Β· π’))))) = ((π Γ {-πΎ}) βf Β· (π βf Β·
(π’ β π β¦ (expβ-(πΎ Β· π’)))))) |
70 | 69 | oveq2d 7420 |
. . . . . . . . . . . 12
β’ (π β (((π D π) βf Β· (π’ β π β¦ (expβ-(πΎ Β· π’)))) βf + (π βf Β· ((π Γ {-πΎ}) βf Β· (π’ β π β¦ (expβ-(πΎ Β· π’)))))) = (((π D π) βf Β· (π’ β π β¦ (expβ-(πΎ Β· π’)))) βf + ((π Γ {-πΎ}) βf Β· (π βf Β·
(π’ β π β¦ (expβ-(πΎ Β· π’))))))) |
71 | 67, 70 | eqtrd 2773 |
. . . . . . . . . . 11
β’ (π β (π D (π βf Β· (π’ β π β¦ (expβ-(πΎ Β· π’))))) = (((π D π) βf Β· (π’ β π β¦ (expβ-(πΎ Β· π’)))) βf + ((π Γ {-πΎ}) βf Β· (π βf Β·
(π’ β π β¦ (expβ-(πΎ Β· π’))))))) |
72 | | oveq1 7411 |
. . . . . . . . . . . 12
β’ ((π D π) = ((π Γ {πΎ}) βf Β· π) β ((π D π) βf Β· (π’ β π β¦ (expβ-(πΎ Β· π’)))) = (((π Γ {πΎ}) βf Β· π) βf Β·
(π’ β π β¦ (expβ-(πΎ Β· π’))))) |
73 | 72 | oveq1d 7419 |
. . . . . . . . . . 11
β’ ((π D π) = ((π Γ {πΎ}) βf Β· π) β (((π D π) βf Β· (π’ β π β¦ (expβ-(πΎ Β· π’)))) βf + ((π Γ {-πΎ}) βf Β· (π βf Β·
(π’ β π β¦ (expβ-(πΎ Β· π’)))))) = ((((π Γ {πΎ}) βf Β· π) βf Β·
(π’ β π β¦ (expβ-(πΎ Β· π’)))) βf + ((π Γ {-πΎ}) βf Β· (π βf Β·
(π’ β π β¦ (expβ-(πΎ Β· π’))))))) |
74 | 71, 73 | sylan9eq 2793 |
. . . . . . . . . 10
β’ ((π β§ (π D π) = ((π Γ {πΎ}) βf Β· π)) β (π D (π βf Β· (π’ β π β¦ (expβ-(πΎ Β· π’))))) = ((((π Γ {πΎ}) βf Β· π) βf Β·
(π’ β π β¦ (expβ-(πΎ Β· π’)))) βf + ((π Γ {-πΎ}) βf Β· (π βf Β·
(π’ β π β¦ (expβ-(πΎ Β· π’))))))) |
75 | | mulass 11194 |
. . . . . . . . . . . . . . 15
β’ ((π₯ β β β§ π¦ β β β§ π§ β β) β ((π₯ Β· π¦) Β· π§) = (π₯ Β· (π¦ Β· π§))) |
76 | 75 | adantl 483 |
. . . . . . . . . . . . . 14
β’ ((π β§ (π₯ β β β§ π¦ β β β§ π§ β β)) β ((π₯ Β· π¦) Β· π§) = (π₯ Β· (π¦ Β· π§))) |
77 | 1, 51, 38, 52, 76 | caofass 7702 |
. . . . . . . . . . . . 13
β’ (π β (((π Γ {-πΎ}) βf Β· π) βf Β·
(π’ β π β¦ (expβ-(πΎ Β· π’)))) = ((π Γ {-πΎ}) βf Β· (π βf Β·
(π’ β π β¦ (expβ-(πΎ Β· π’)))))) |
78 | 77 | oveq2d 7420 |
. . . . . . . . . . . 12
β’ (π β ((((π Γ {πΎ}) βf Β· π) βf Β·
(π’ β π β¦ (expβ-(πΎ Β· π’)))) βf + (((π Γ {-πΎ}) βf Β· π) βf Β·
(π’ β π β¦ (expβ-(πΎ Β· π’))))) = ((((π Γ {πΎ}) βf Β· π) βf Β·
(π’ β π β¦ (expβ-(πΎ Β· π’)))) βf + ((π Γ {-πΎ}) βf Β· (π βf Β·
(π’ β π β¦ (expβ-(πΎ Β· π’))))))) |
79 | 78 | eqeq2d 2744 |
. . . . . . . . . . 11
β’ (π β ((π D (π βf Β· (π’ β π β¦ (expβ-(πΎ Β· π’))))) = ((((π Γ {πΎ}) βf Β· π) βf Β·
(π’ β π β¦ (expβ-(πΎ Β· π’)))) βf + (((π Γ {-πΎ}) βf Β· π) βf Β·
(π’ β π β¦ (expβ-(πΎ Β· π’))))) β (π D (π βf Β· (π’ β π β¦ (expβ-(πΎ Β· π’))))) = ((((π Γ {πΎ}) βf Β· π) βf Β·
(π’ β π β¦ (expβ-(πΎ Β· π’)))) βf + ((π Γ {-πΎ}) βf Β· (π βf Β·
(π’ β π β¦ (expβ-(πΎ Β· π’)))))))) |
80 | 79 | adantr 482 |
. . . . . . . . . 10
β’ ((π β§ (π D π) = ((π Γ {πΎ}) βf Β· π)) β ((π D (π βf Β· (π’ β π β¦ (expβ-(πΎ Β· π’))))) = ((((π Γ {πΎ}) βf Β· π) βf Β·
(π’ β π β¦ (expβ-(πΎ Β· π’)))) βf + (((π Γ {-πΎ}) βf Β· π) βf Β·
(π’ β π β¦ (expβ-(πΎ Β· π’))))) β (π D (π βf Β· (π’ β π β¦ (expβ-(πΎ Β· π’))))) = ((((π Γ {πΎ}) βf Β· π) βf Β·
(π’ β π β¦ (expβ-(πΎ Β· π’)))) βf + ((π Γ {-πΎ}) βf Β· (π βf Β·
(π’ β π β¦ (expβ-(πΎ Β· π’)))))))) |
81 | 74, 80 | mpbird 257 |
. . . . . . . . 9
β’ ((π β§ (π D π) = ((π Γ {πΎ}) βf Β· π)) β (π D (π βf Β· (π’ β π β¦ (expβ-(πΎ Β· π’))))) = ((((π Γ {πΎ}) βf Β· π) βf Β·
(π’ β π β¦ (expβ-(πΎ Β· π’)))) βf + (((π Γ {-πΎ}) βf Β· π) βf Β·
(π’ β π β¦ (expβ-(πΎ Β· π’)))))) |
82 | | mulcl 11190 |
. . . . . . . . . . . . . 14
β’ ((π₯ β β β§ π¦ β β) β (π₯ Β· π¦) β β) |
83 | 82 | adantl 483 |
. . . . . . . . . . . . 13
β’ ((π β§ (π₯ β β β§ π¦ β β)) β (π₯ Β· π¦) β β) |
84 | | fconst6g 6777 |
. . . . . . . . . . . . . 14
β’ (πΎ β β β (π Γ {πΎ}):πβΆβ) |
85 | 4, 84 | syl 17 |
. . . . . . . . . . . . 13
β’ (π β (π Γ {πΎ}):πβΆβ) |
86 | | inidm 4217 |
. . . . . . . . . . . . 13
β’ (π β© π) = π |
87 | 83, 85, 38, 1, 1, 86 | off 7683 |
. . . . . . . . . . . 12
β’ (π β ((π Γ {πΎ}) βf Β· π):πβΆβ) |
88 | 83, 51, 38, 1, 1, 86 | off 7683 |
. . . . . . . . . . . 12
β’ (π β ((π Γ {-πΎ}) βf Β· π):πβΆβ) |
89 | | adddir 11201 |
. . . . . . . . . . . . 13
β’ ((π₯ β β β§ π¦ β β β§ π§ β β) β ((π₯ + π¦) Β· π§) = ((π₯ Β· π§) + (π¦ Β· π§))) |
90 | 89 | adantl 483 |
. . . . . . . . . . . 12
β’ ((π β§ (π₯ β β β§ π¦ β β β§ π§ β β)) β ((π₯ + π¦) Β· π§) = ((π₯ Β· π§) + (π¦ Β· π§))) |
91 | 1, 52, 87, 88, 90 | caofdir 7705 |
. . . . . . . . . . 11
β’ (π β ((((π Γ {πΎ}) βf Β· π) βf + ((π Γ {-πΎ}) βf Β· π)) βf Β·
(π’ β π β¦ (expβ-(πΎ Β· π’)))) = ((((π Γ {πΎ}) βf Β· π) βf Β·
(π’ β π β¦ (expβ-(πΎ Β· π’)))) βf + (((π Γ {-πΎ}) βf Β· π) βf Β·
(π’ β π β¦ (expβ-(πΎ Β· π’)))))) |
92 | 91 | eqeq2d 2744 |
. . . . . . . . . 10
β’ (π β ((π D (π βf Β· (π’ β π β¦ (expβ-(πΎ Β· π’))))) = ((((π Γ {πΎ}) βf Β· π) βf + ((π Γ {-πΎ}) βf Β· π)) βf Β·
(π’ β π β¦ (expβ-(πΎ Β· π’)))) β (π D (π βf Β· (π’ β π β¦ (expβ-(πΎ Β· π’))))) = ((((π Γ {πΎ}) βf Β· π) βf Β·
(π’ β π β¦ (expβ-(πΎ Β· π’)))) βf + (((π Γ {-πΎ}) βf Β· π) βf Β·
(π’ β π β¦ (expβ-(πΎ Β· π’))))))) |
93 | 92 | adantr 482 |
. . . . . . . . 9
β’ ((π β§ (π D π) = ((π Γ {πΎ}) βf Β· π)) β ((π D (π βf Β· (π’ β π β¦ (expβ-(πΎ Β· π’))))) = ((((π Γ {πΎ}) βf Β· π) βf + ((π Γ {-πΎ}) βf Β· π)) βf Β·
(π’ β π β¦ (expβ-(πΎ Β· π’)))) β (π D (π βf Β· (π’ β π β¦ (expβ-(πΎ Β· π’))))) = ((((π Γ {πΎ}) βf Β· π) βf Β·
(π’ β π β¦ (expβ-(πΎ Β· π’)))) βf + (((π Γ {-πΎ}) βf Β· π) βf Β·
(π’ β π β¦ (expβ-(πΎ Β· π’))))))) |
94 | 81, 93 | mpbird 257 |
. . . . . . . 8
β’ ((π β§ (π D π) = ((π Γ {πΎ}) βf Β· π)) β (π D (π βf Β· (π’ β π β¦ (expβ-(πΎ Β· π’))))) = ((((π Γ {πΎ}) βf Β· π) βf + ((π Γ {-πΎ}) βf Β· π)) βf Β·
(π’ β π β¦ (expβ-(πΎ Β· π’))))) |
95 | | ofnegsub 12206 |
. . . . . . . . . . . . 13
β’ ((π β {β, β} β§
((π Γ {πΎ}) βf Β·
π):πβΆβ β§ ((π Γ {πΎ}) βf Β· π):πβΆβ) β (((π Γ {πΎ}) βf Β· π) βf + ((π Γ {-1})
βf Β· ((π Γ {πΎ}) βf Β· π))) = (((π Γ {πΎ}) βf Β· π) βf β
((π Γ {πΎ}) βf Β·
π))) |
96 | 1, 87, 87, 95 | syl3anc 1372 |
. . . . . . . . . . . 12
β’ (π β (((π Γ {πΎ}) βf Β· π) βf + ((π Γ {-1})
βf Β· ((π Γ {πΎ}) βf Β· π))) = (((π Γ {πΎ}) βf Β· π) βf β
((π Γ {πΎ}) βf Β·
π))) |
97 | | neg1cn 12322 |
. . . . . . . . . . . . . . . . 17
β’ -1 β
β |
98 | 97 | fconst6 6778 |
. . . . . . . . . . . . . . . 16
β’ (π Γ {-1}):πβΆβ |
99 | 98 | a1i 11 |
. . . . . . . . . . . . . . 15
β’ (π β (π Γ {-1}):πβΆβ) |
100 | 1, 99, 85, 38, 76 | caofass 7702 |
. . . . . . . . . . . . . 14
β’ (π β (((π Γ {-1}) βf Β·
(π Γ {πΎ})) βf Β·
π) = ((π Γ {-1}) βf Β·
((π Γ {πΎ}) βf Β·
π))) |
101 | 97 | a1i 11 |
. . . . . . . . . . . . . . . . 17
β’ (π β -1 β
β) |
102 | 1, 101, 4 | ofc12 7693 |
. . . . . . . . . . . . . . . 16
β’ (π β ((π Γ {-1}) βf Β·
(π Γ {πΎ})) = (π Γ {(-1 Β· πΎ)})) |
103 | 4 | mulm1d 11662 |
. . . . . . . . . . . . . . . . . 18
β’ (π β (-1 Β· πΎ) = -πΎ) |
104 | 103 | sneqd 4639 |
. . . . . . . . . . . . . . . . 17
β’ (π β {(-1 Β· πΎ)} = {-πΎ}) |
105 | 104 | xpeq2d 5705 |
. . . . . . . . . . . . . . . 16
β’ (π β (π Γ {(-1 Β· πΎ)}) = (π Γ {-πΎ})) |
106 | 102, 105 | eqtrd 2773 |
. . . . . . . . . . . . . . 15
β’ (π β ((π Γ {-1}) βf Β·
(π Γ {πΎ})) = (π Γ {-πΎ})) |
107 | 106 | oveq1d 7419 |
. . . . . . . . . . . . . 14
β’ (π β (((π Γ {-1}) βf Β·
(π Γ {πΎ})) βf Β·
π) = ((π Γ {-πΎ}) βf Β· π)) |
108 | 100, 107 | eqtr3d 2775 |
. . . . . . . . . . . . 13
β’ (π β ((π Γ {-1}) βf Β·
((π Γ {πΎ}) βf Β·
π)) = ((π Γ {-πΎ}) βf Β· π)) |
109 | 108 | oveq2d 7420 |
. . . . . . . . . . . 12
β’ (π β (((π Γ {πΎ}) βf Β· π) βf + ((π Γ {-1})
βf Β· ((π Γ {πΎ}) βf Β· π))) = (((π Γ {πΎ}) βf Β· π) βf + ((π Γ {-πΎ}) βf Β· π))) |
110 | | ofsubid 43016 |
. . . . . . . . . . . . 13
β’ ((π β {β, β} β§
((π Γ {πΎ}) βf Β·
π):πβΆβ) β (((π Γ {πΎ}) βf Β· π) βf β
((π Γ {πΎ}) βf Β·
π)) = (π Γ {0})) |
111 | 1, 87, 110 | syl2anc 585 |
. . . . . . . . . . . 12
β’ (π β (((π Γ {πΎ}) βf Β· π) βf β
((π Γ {πΎ}) βf Β·
π)) = (π Γ {0})) |
112 | 96, 109, 111 | 3eqtr3d 2781 |
. . . . . . . . . . 11
β’ (π β (((π Γ {πΎ}) βf Β· π) βf + ((π Γ {-πΎ}) βf Β· π)) = (π Γ {0})) |
113 | 112 | oveq1d 7419 |
. . . . . . . . . 10
β’ (π β ((((π Γ {πΎ}) βf Β· π) βf + ((π Γ {-πΎ}) βf Β· π)) βf Β·
(π’ β π β¦ (expβ-(πΎ Β· π’)))) = ((π Γ {0}) βf Β·
(π’ β π β¦ (expβ-(πΎ Β· π’))))) |
114 | 113 | eqeq2d 2744 |
. . . . . . . . 9
β’ (π β ((π D (π βf Β· (π’ β π β¦ (expβ-(πΎ Β· π’))))) = ((((π Γ {πΎ}) βf Β· π) βf + ((π Γ {-πΎ}) βf Β· π)) βf Β·
(π’ β π β¦ (expβ-(πΎ Β· π’)))) β (π D (π βf Β· (π’ β π β¦ (expβ-(πΎ Β· π’))))) = ((π Γ {0}) βf Β·
(π’ β π β¦ (expβ-(πΎ Β· π’)))))) |
115 | 114 | adantr 482 |
. . . . . . . 8
β’ ((π β§ (π D π) = ((π Γ {πΎ}) βf Β· π)) β ((π D (π βf Β· (π’ β π β¦ (expβ-(πΎ Β· π’))))) = ((((π Γ {πΎ}) βf Β· π) βf + ((π Γ {-πΎ}) βf Β· π)) βf Β·
(π’ β π β¦ (expβ-(πΎ Β· π’)))) β (π D (π βf Β· (π’ β π β¦ (expβ-(πΎ Β· π’))))) = ((π Γ {0}) βf Β·
(π’ β π β¦ (expβ-(πΎ Β· π’)))))) |
116 | 94, 115 | mpbid 231 |
. . . . . . 7
β’ ((π β§ (π D π) = ((π Γ {πΎ}) βf Β· π)) β (π D (π βf Β· (π’ β π β¦ (expβ-(πΎ Β· π’))))) = ((π Γ {0}) βf Β·
(π’ β π β¦ (expβ-(πΎ Β· π’))))) |
117 | | 0cnd 11203 |
. . . . . . . . 9
β’ (π β 0 β
β) |
118 | | mul02 11388 |
. . . . . . . . . 10
β’ (π₯ β β β (0
Β· π₯) =
0) |
119 | 118 | adantl 483 |
. . . . . . . . 9
β’ ((π β§ π₯ β β) β (0 Β· π₯) = 0) |
120 | 1, 52, 117, 117, 119 | caofid2 7699 |
. . . . . . . 8
β’ (π β ((π Γ {0}) βf Β·
(π’ β π β¦ (expβ-(πΎ Β· π’)))) = (π Γ {0})) |
121 | 120 | adantr 482 |
. . . . . . 7
β’ ((π β§ (π D π) = ((π Γ {πΎ}) βf Β· π)) β ((π Γ {0}) βf Β·
(π’ β π β¦ (expβ-(πΎ Β· π’)))) = (π Γ {0})) |
122 | 116, 121 | eqtrd 2773 |
. . . . . 6
β’ ((π β§ (π D π) = ((π Γ {πΎ}) βf Β· π)) β (π D (π βf Β· (π’ β π β¦ (expβ-(πΎ Β· π’))))) = (π Γ {0})) |
123 | 1 | adantr 482 |
. . . . . . 7
β’ ((π β§ (π D π) = ((π Γ {πΎ}) βf Β· π)) β π β {β, β}) |
124 | 83, 38, 52, 1, 1, 86 | off 7683 |
. . . . . . . 8
β’ (π β (π βf Β· (π’ β π β¦ (expβ-(πΎ Β· π’)))):πβΆβ) |
125 | 124 | adantr 482 |
. . . . . . 7
β’ ((π β§ (π D π) = ((π Γ {πΎ}) βf Β· π)) β (π βf Β· (π’ β π β¦ (expβ-(πΎ Β· π’)))):πβΆβ) |
126 | 122 | dmeqd 5903 |
. . . . . . . 8
β’ ((π β§ (π D π) = ((π Γ {πΎ}) βf Β· π)) β dom (π D (π βf Β· (π’ β π β¦ (expβ-(πΎ Β· π’))))) = dom (π Γ {0})) |
127 | | 0cn 11202 |
. . . . . . . . . 10
β’ 0 β
β |
128 | 127 | fconst6 6778 |
. . . . . . . . 9
β’ (π Γ {0}):πβΆβ |
129 | 128 | fdmi 6726 |
. . . . . . . 8
β’ dom
(π Γ {0}) = π |
130 | 126, 129 | eqtrdi 2789 |
. . . . . . 7
β’ ((π β§ (π D π) = ((π Γ {πΎ}) βf Β· π)) β dom (π D (π βf Β· (π’ β π β¦ (expβ-(πΎ Β· π’))))) = π) |
131 | 123, 125,
130 | dvconstbi 43026 |
. . . . . 6
β’ ((π β§ (π D π) = ((π Γ {πΎ}) βf Β· π)) β ((π D (π βf Β· (π’ β π β¦ (expβ-(πΎ Β· π’))))) = (π Γ {0}) β βπ₯ β β (π βf Β·
(π’ β π β¦ (expβ-(πΎ Β· π’)))) = (π Γ {π₯}))) |
132 | 122, 131 | mpbid 231 |
. . . . 5
β’ ((π β§ (π D π) = ((π Γ {πΎ}) βf Β· π)) β βπ₯ β β (π βf Β·
(π’ β π β¦ (expβ-(πΎ Β· π’)))) = (π Γ {π₯})) |
133 | | oveq1 7411 |
. . . . . . . . . 10
β’ ((π βf Β·
(π’ β π β¦ (expβ-(πΎ Β· π’)))) = (π Γ {π₯}) β ((π βf Β· (π’ β π β¦ (expβ-(πΎ Β· π’)))) βf / (π’ β π β¦ (expβ-(πΎ Β· π’)))) = ((π Γ {π₯}) βf / (π’ β π β¦ (expβ-(πΎ Β· π’))))) |
134 | | efne0 16036 |
. . . . . . . . . . . . . . 15
β’ (-(πΎ Β· π’) β β β (expβ-(πΎ Β· π’)) β 0) |
135 | | eldifsn 4789 |
. . . . . . . . . . . . . . 15
β’
((expβ-(πΎ
Β· π’)) β
(β β {0}) β ((expβ-(πΎ Β· π’)) β β β§ (expβ-(πΎ Β· π’)) β 0)) |
136 | 39, 134, 135 | sylanbrc 584 |
. . . . . . . . . . . . . 14
β’ (-(πΎ Β· π’) β β β (expβ-(πΎ Β· π’)) β (β β
{0})) |
137 | 11, 136 | syl 17 |
. . . . . . . . . . . . 13
β’ ((π β§ π’ β π) β (expβ-(πΎ Β· π’)) β (β β
{0})) |
138 | 137 | fmpttd 7110 |
. . . . . . . . . . . 12
β’ (π β (π’ β π β¦ (expβ-(πΎ Β· π’))):πβΆ(β β
{0})) |
139 | | ofdivcan4 43019 |
. . . . . . . . . . . 12
β’ ((π β {β, β} β§
π:πβΆβ β§ (π’ β π β¦ (expβ-(πΎ Β· π’))):πβΆ(β β {0})) β
((π βf
Β· (π’ β π β¦ (expβ-(πΎ Β· π’)))) βf / (π’ β π β¦ (expβ-(πΎ Β· π’)))) = π) |
140 | 1, 38, 138, 139 | syl3anc 1372 |
. . . . . . . . . . 11
β’ (π β ((π βf Β· (π’ β π β¦ (expβ-(πΎ Β· π’)))) βf / (π’ β π β¦ (expβ-(πΎ Β· π’)))) = π) |
141 | 140 | eqeq1d 2735 |
. . . . . . . . . 10
β’ (π β (((π βf Β· (π’ β π β¦ (expβ-(πΎ Β· π’)))) βf / (π’ β π β¦ (expβ-(πΎ Β· π’)))) = ((π Γ {π₯}) βf / (π’ β π β¦ (expβ-(πΎ Β· π’)))) β π = ((π Γ {π₯}) βf / (π’ β π β¦ (expβ-(πΎ Β· π’)))))) |
142 | 133, 141 | imbitrid 243 |
. . . . . . . . 9
β’ (π β ((π βf Β· (π’ β π β¦ (expβ-(πΎ Β· π’)))) = (π Γ {π₯}) β π = ((π Γ {π₯}) βf / (π’ β π β¦ (expβ-(πΎ Β· π’)))))) |
143 | 142 | adantr 482 |
. . . . . . . 8
β’ ((π β§ π₯ β β) β ((π βf Β· (π’ β π β¦ (expβ-(πΎ Β· π’)))) = (π Γ {π₯}) β π = ((π Γ {π₯}) βf / (π’ β π β¦ (expβ-(πΎ Β· π’)))))) |
144 | | vex 3479 |
. . . . . . . . . . . . 13
β’ π₯ β V |
145 | 144 | a1i 11 |
. . . . . . . . . . . 12
β’ ((π β§ π’ β π) β π₯ β V) |
146 | | ovexd 7439 |
. . . . . . . . . . . 12
β’ ((π β§ π’ β π) β (1 / (expβ(πΎ Β· π’))) β V) |
147 | | fconstmpt 5736 |
. . . . . . . . . . . . 13
β’ (π Γ {π₯}) = (π’ β π β¦ π₯) |
148 | 147 | a1i 11 |
. . . . . . . . . . . 12
β’ (π β (π Γ {π₯}) = (π’ β π β¦ π₯)) |
149 | | efneg 16037 |
. . . . . . . . . . . . . 14
β’ ((πΎ Β· π’) β β β (expβ-(πΎ Β· π’)) = (1 / (expβ(πΎ Β· π’)))) |
150 | 10, 149 | syl 17 |
. . . . . . . . . . . . 13
β’ ((π β§ π’ β π) β (expβ-(πΎ Β· π’)) = (1 / (expβ(πΎ Β· π’)))) |
151 | 150 | mpteq2dva 5247 |
. . . . . . . . . . . 12
β’ (π β (π’ β π β¦ (expβ-(πΎ Β· π’))) = (π’ β π β¦ (1 / (expβ(πΎ Β· π’))))) |
152 | 1, 145, 146, 148, 151 | offval2 7685 |
. . . . . . . . . . 11
β’ (π β ((π Γ {π₯}) βf / (π’ β π β¦ (expβ-(πΎ Β· π’)))) = (π’ β π β¦ (π₯ / (1 / (expβ(πΎ Β· π’)))))) |
153 | 152 | adantr 482 |
. . . . . . . . . 10
β’ ((π β§ π₯ β β) β ((π Γ {π₯}) βf / (π’ β π β¦ (expβ-(πΎ Β· π’)))) = (π’ β π β¦ (π₯ / (1 / (expβ(πΎ Β· π’)))))) |
154 | | efcl 16022 |
. . . . . . . . . . . . . . . . 17
β’ ((πΎ Β· π’) β β β (expβ(πΎ Β· π’)) β β) |
155 | | efne0 16036 |
. . . . . . . . . . . . . . . . 17
β’ ((πΎ Β· π’) β β β (expβ(πΎ Β· π’)) β 0) |
156 | 154, 155 | jca 513 |
. . . . . . . . . . . . . . . 16
β’ ((πΎ Β· π’) β β β ((expβ(πΎ Β· π’)) β β β§ (expβ(πΎ Β· π’)) β 0)) |
157 | 10, 156 | syl 17 |
. . . . . . . . . . . . . . 15
β’ ((π β§ π’ β π) β ((expβ(πΎ Β· π’)) β β β§ (expβ(πΎ Β· π’)) β 0)) |
158 | | ax-1ne0 11175 |
. . . . . . . . . . . . . . . . 17
β’ 1 β
0 |
159 | 18, 158 | pm3.2i 472 |
. . . . . . . . . . . . . . . 16
β’ (1 β
β β§ 1 β 0) |
160 | | divdiv2 11922 |
. . . . . . . . . . . . . . . 16
β’ ((π₯ β β β§ (1 β
β β§ 1 β 0) β§ ((expβ(πΎ Β· π’)) β β β§ (expβ(πΎ Β· π’)) β 0)) β (π₯ / (1 / (expβ(πΎ Β· π’)))) = ((π₯ Β· (expβ(πΎ Β· π’))) / 1)) |
161 | 159, 160 | mp3an2 1450 |
. . . . . . . . . . . . . . 15
β’ ((π₯ β β β§
((expβ(πΎ Β·
π’)) β β β§
(expβ(πΎ Β·
π’)) β 0)) β (π₯ / (1 / (expβ(πΎ Β· π’)))) = ((π₯ Β· (expβ(πΎ Β· π’))) / 1)) |
162 | 157, 161 | sylan2 594 |
. . . . . . . . . . . . . 14
β’ ((π₯ β β β§ (π β§ π’ β π)) β (π₯ / (1 / (expβ(πΎ Β· π’)))) = ((π₯ Β· (expβ(πΎ Β· π’))) / 1)) |
163 | 10, 154 | syl 17 |
. . . . . . . . . . . . . . . 16
β’ ((π β§ π’ β π) β (expβ(πΎ Β· π’)) β β) |
164 | | mulcl 11190 |
. . . . . . . . . . . . . . . 16
β’ ((π₯ β β β§
(expβ(πΎ Β·
π’)) β β) β
(π₯ Β·
(expβ(πΎ Β·
π’))) β
β) |
165 | 163, 164 | sylan2 594 |
. . . . . . . . . . . . . . 15
β’ ((π₯ β β β§ (π β§ π’ β π)) β (π₯ Β· (expβ(πΎ Β· π’))) β β) |
166 | 165 | div1d 11978 |
. . . . . . . . . . . . . 14
β’ ((π₯ β β β§ (π β§ π’ β π)) β ((π₯ Β· (expβ(πΎ Β· π’))) / 1) = (π₯ Β· (expβ(πΎ Β· π’)))) |
167 | 162, 166 | eqtrd 2773 |
. . . . . . . . . . . . 13
β’ ((π₯ β β β§ (π β§ π’ β π)) β (π₯ / (1 / (expβ(πΎ Β· π’)))) = (π₯ Β· (expβ(πΎ Β· π’)))) |
168 | 167 | ancoms 460 |
. . . . . . . . . . . 12
β’ (((π β§ π’ β π) β§ π₯ β β) β (π₯ / (1 / (expβ(πΎ Β· π’)))) = (π₯ Β· (expβ(πΎ Β· π’)))) |
169 | 168 | an32s 651 |
. . . . . . . . . . 11
β’ (((π β§ π₯ β β) β§ π’ β π) β (π₯ / (1 / (expβ(πΎ Β· π’)))) = (π₯ Β· (expβ(πΎ Β· π’)))) |
170 | 169 | mpteq2dva 5247 |
. . . . . . . . . 10
β’ ((π β§ π₯ β β) β (π’ β π β¦ (π₯ / (1 / (expβ(πΎ Β· π’))))) = (π’ β π β¦ (π₯ Β· (expβ(πΎ Β· π’))))) |
171 | 153, 170 | eqtrd 2773 |
. . . . . . . . 9
β’ ((π β§ π₯ β β) β ((π Γ {π₯}) βf / (π’ β π β¦ (expβ-(πΎ Β· π’)))) = (π’ β π β¦ (π₯ Β· (expβ(πΎ Β· π’))))) |
172 | 171 | eqeq2d 2744 |
. . . . . . . 8
β’ ((π β§ π₯ β β) β (π = ((π Γ {π₯}) βf / (π’ β π β¦ (expβ-(πΎ Β· π’)))) β π = (π’ β π β¦ (π₯ Β· (expβ(πΎ Β· π’)))))) |
173 | 143, 172 | sylibd 238 |
. . . . . . 7
β’ ((π β§ π₯ β β) β ((π βf Β· (π’ β π β¦ (expβ-(πΎ Β· π’)))) = (π Γ {π₯}) β π = (π’ β π β¦ (π₯ Β· (expβ(πΎ Β· π’)))))) |
174 | 173 | reximdva 3169 |
. . . . . 6
β’ (π β (βπ₯ β β (π βf Β· (π’ β π β¦ (expβ-(πΎ Β· π’)))) = (π Γ {π₯}) β βπ₯ β β π = (π’ β π β¦ (π₯ Β· (expβ(πΎ Β· π’)))))) |
175 | 174 | adantr 482 |
. . . . 5
β’ ((π β§ (π D π) = ((π Γ {πΎ}) βf Β· π)) β (βπ₯ β β (π βf Β·
(π’ β π β¦ (expβ-(πΎ Β· π’)))) = (π Γ {π₯}) β βπ₯ β β π = (π’ β π β¦ (π₯ Β· (expβ(πΎ Β· π’)))))) |
176 | 132, 175 | mpd 15 |
. . . 4
β’ ((π β§ (π D π) = ((π Γ {πΎ}) βf Β· π)) β βπ₯ β β π = (π’ β π β¦ (π₯ Β· (expβ(πΎ Β· π’))))) |
177 | 176 | ex 414 |
. . 3
β’ (π β ((π D π) = ((π Γ {πΎ}) βf Β· π) β βπ₯ β β π = (π’ β π β¦ (π₯ Β· (expβ(πΎ Β· π’)))))) |
178 | 1 | adantr 482 |
. . . . . . 7
β’ ((π β§ (π₯ β β β§ π = (π’ β π β¦ (π₯ Β· (expβ(πΎ Β· π’)))))) β π β {β, β}) |
179 | 4 | adantr 482 |
. . . . . . 7
β’ ((π β§ (π₯ β β β§ π = (π’ β π β¦ (π₯ Β· (expβ(πΎ Β· π’)))))) β πΎ β β) |
180 | | simprl 770 |
. . . . . . 7
β’ ((π β§ (π₯ β β β§ π = (π’ β π β¦ (π₯ Β· (expβ(πΎ Β· π’)))))) β π₯ β β) |
181 | | eqid 2733 |
. . . . . . 7
β’ (π’ β π β¦ (π₯ Β· (expβ(πΎ Β· π’)))) = (π’ β π β¦ (π₯ Β· (expβ(πΎ Β· π’)))) |
182 | 178, 179,
180, 181 | expgrowthi 43025 |
. . . . . 6
β’ ((π β§ (π₯ β β β§ π = (π’ β π β¦ (π₯ Β· (expβ(πΎ Β· π’)))))) β (π D (π’ β π β¦ (π₯ Β· (expβ(πΎ Β· π’))))) = ((π Γ {πΎ}) βf Β· (π’ β π β¦ (π₯ Β· (expβ(πΎ Β· π’)))))) |
183 | 182 | 3impb 1116 |
. . . . 5
β’ ((π β§ π₯ β β β§ π = (π’ β π β¦ (π₯ Β· (expβ(πΎ Β· π’))))) β (π D (π’ β π β¦ (π₯ Β· (expβ(πΎ Β· π’))))) = ((π Γ {πΎ}) βf Β· (π’ β π β¦ (π₯ Β· (expβ(πΎ Β· π’)))))) |
184 | | oveq2 7412 |
. . . . . . 7
β’ (π = (π’ β π β¦ (π₯ Β· (expβ(πΎ Β· π’)))) β (π D π) = (π D (π’ β π β¦ (π₯ Β· (expβ(πΎ Β· π’)))))) |
185 | | oveq2 7412 |
. . . . . . 7
β’ (π = (π’ β π β¦ (π₯ Β· (expβ(πΎ Β· π’)))) β ((π Γ {πΎ}) βf Β· π) = ((π Γ {πΎ}) βf Β· (π’ β π β¦ (π₯ Β· (expβ(πΎ Β· π’)))))) |
186 | 184, 185 | eqeq12d 2749 |
. . . . . 6
β’ (π = (π’ β π β¦ (π₯ Β· (expβ(πΎ Β· π’)))) β ((π D π) = ((π Γ {πΎ}) βf Β· π) β (π D (π’ β π β¦ (π₯ Β· (expβ(πΎ Β· π’))))) = ((π Γ {πΎ}) βf Β· (π’ β π β¦ (π₯ Β· (expβ(πΎ Β· π’))))))) |
187 | 186 | 3ad2ant3 1136 |
. . . . 5
β’ ((π β§ π₯ β β β§ π = (π’ β π β¦ (π₯ Β· (expβ(πΎ Β· π’))))) β ((π D π) = ((π Γ {πΎ}) βf Β· π) β (π D (π’ β π β¦ (π₯ Β· (expβ(πΎ Β· π’))))) = ((π Γ {πΎ}) βf Β· (π’ β π β¦ (π₯ Β· (expβ(πΎ Β· π’))))))) |
188 | 183, 187 | mpbird 257 |
. . . 4
β’ ((π β§ π₯ β β β§ π = (π’ β π β¦ (π₯ Β· (expβ(πΎ Β· π’))))) β (π D π) = ((π Γ {πΎ}) βf Β· π)) |
189 | 188 | rexlimdv3a 3160 |
. . 3
β’ (π β (βπ₯ β β π = (π’ β π β¦ (π₯ Β· (expβ(πΎ Β· π’)))) β (π D π) = ((π Γ {πΎ}) βf Β· π))) |
190 | 177, 189 | impbid 211 |
. 2
β’ (π β ((π D π) = ((π Γ {πΎ}) βf Β· π) β βπ₯ β β π = (π’ β π β¦ (π₯ Β· (expβ(πΎ Β· π’)))))) |
191 | | oveq2 7412 |
. . . . . . . 8
β’ (π’ = π‘ β (πΎ Β· π’) = (πΎ Β· π‘)) |
192 | 191 | fveq2d 6892 |
. . . . . . 7
β’ (π’ = π‘ β (expβ(πΎ Β· π’)) = (expβ(πΎ Β· π‘))) |
193 | 192 | oveq2d 7420 |
. . . . . 6
β’ (π’ = π‘ β (π₯ Β· (expβ(πΎ Β· π’))) = (π₯ Β· (expβ(πΎ Β· π‘)))) |
194 | 193 | cbvmptv 5260 |
. . . . 5
β’ (π’ β π β¦ (π₯ Β· (expβ(πΎ Β· π’)))) = (π‘ β π β¦ (π₯ Β· (expβ(πΎ Β· π‘)))) |
195 | | oveq1 7411 |
. . . . . 6
β’ (π₯ = π β (π₯ Β· (expβ(πΎ Β· π‘))) = (π Β· (expβ(πΎ Β· π‘)))) |
196 | 195 | mpteq2dv 5249 |
. . . . 5
β’ (π₯ = π β (π‘ β π β¦ (π₯ Β· (expβ(πΎ Β· π‘)))) = (π‘ β π β¦ (π Β· (expβ(πΎ Β· π‘))))) |
197 | 194, 196 | eqtrid 2785 |
. . . 4
β’ (π₯ = π β (π’ β π β¦ (π₯ Β· (expβ(πΎ Β· π’)))) = (π‘ β π β¦ (π Β· (expβ(πΎ Β· π‘))))) |
198 | 197 | eqeq2d 2744 |
. . 3
β’ (π₯ = π β (π = (π’ β π β¦ (π₯ Β· (expβ(πΎ Β· π’)))) β π = (π‘ β π β¦ (π Β· (expβ(πΎ Β· π‘)))))) |
199 | 198 | cbvrexvw 3236 |
. 2
β’
(βπ₯ β
β π = (π’ β π β¦ (π₯ Β· (expβ(πΎ Β· π’)))) β βπ β β π = (π‘ β π β¦ (π Β· (expβ(πΎ Β· π‘))))) |
200 | 190, 199 | bitrdi 287 |
1
β’ (π β ((π D π) = ((π Γ {πΎ}) βf Β· π) β βπ β β π = (π‘ β π β¦ (π Β· (expβ(πΎ Β· π‘)))))) |