Metamath Proof Explorer


Theorem lcmineqlem12

Description: Base case for induction. (Contributed by metakunt, 12-May-2024)

Ref Expression
Hypothesis lcmineqlem12.1 โŠข ( ๐œ‘ โ†’ ๐‘ โˆˆ โ„• )
Assertion lcmineqlem12 ( ๐œ‘ โ†’ โˆซ ( 0 [,] 1 ) ( ( ๐‘ก โ†‘ ( 1 โˆ’ 1 ) ) ยท ( ( 1 โˆ’ ๐‘ก ) โ†‘ ( ๐‘ โˆ’ 1 ) ) ) d ๐‘ก = ( 1 / ( 1 ยท ( ๐‘ C 1 ) ) ) )

Proof

Step Hyp Ref Expression
1 lcmineqlem12.1 โŠข ( ๐œ‘ โ†’ ๐‘ โˆˆ โ„• )
2 elunitcn โŠข ( ๐‘ก โˆˆ ( 0 [,] 1 ) โ†’ ๐‘ก โˆˆ โ„‚ )
3 1m1e0 โŠข ( 1 โˆ’ 1 ) = 0
4 3 oveq2i โŠข ( ๐‘ก โ†‘ ( 1 โˆ’ 1 ) ) = ( ๐‘ก โ†‘ 0 )
5 simpr โŠข ( ( ๐œ‘ โˆง ๐‘ก โˆˆ โ„‚ ) โ†’ ๐‘ก โˆˆ โ„‚ )
6 5 exp0d โŠข ( ( ๐œ‘ โˆง ๐‘ก โˆˆ โ„‚ ) โ†’ ( ๐‘ก โ†‘ 0 ) = 1 )
7 4 6 eqtrid โŠข ( ( ๐œ‘ โˆง ๐‘ก โˆˆ โ„‚ ) โ†’ ( ๐‘ก โ†‘ ( 1 โˆ’ 1 ) ) = 1 )
8 7 oveq1d โŠข ( ( ๐œ‘ โˆง ๐‘ก โˆˆ โ„‚ ) โ†’ ( ( ๐‘ก โ†‘ ( 1 โˆ’ 1 ) ) ยท ( ( 1 โˆ’ ๐‘ก ) โ†‘ ( ๐‘ โˆ’ 1 ) ) ) = ( 1 ยท ( ( 1 โˆ’ ๐‘ก ) โ†‘ ( ๐‘ โˆ’ 1 ) ) ) )
9 1cnd โŠข ( ( ๐œ‘ โˆง ๐‘ก โˆˆ โ„‚ ) โ†’ 1 โˆˆ โ„‚ )
10 9 5 subcld โŠข ( ( ๐œ‘ โˆง ๐‘ก โˆˆ โ„‚ ) โ†’ ( 1 โˆ’ ๐‘ก ) โˆˆ โ„‚ )
11 nnm1nn0 โŠข ( ๐‘ โˆˆ โ„• โ†’ ( ๐‘ โˆ’ 1 ) โˆˆ โ„•0 )
12 1 11 syl โŠข ( ๐œ‘ โ†’ ( ๐‘ โˆ’ 1 ) โˆˆ โ„•0 )
13 12 adantr โŠข ( ( ๐œ‘ โˆง ๐‘ก โˆˆ โ„‚ ) โ†’ ( ๐‘ โˆ’ 1 ) โˆˆ โ„•0 )
14 10 13 expcld โŠข ( ( ๐œ‘ โˆง ๐‘ก โˆˆ โ„‚ ) โ†’ ( ( 1 โˆ’ ๐‘ก ) โ†‘ ( ๐‘ โˆ’ 1 ) ) โˆˆ โ„‚ )
15 14 mullidd โŠข ( ( ๐œ‘ โˆง ๐‘ก โˆˆ โ„‚ ) โ†’ ( 1 ยท ( ( 1 โˆ’ ๐‘ก ) โ†‘ ( ๐‘ โˆ’ 1 ) ) ) = ( ( 1 โˆ’ ๐‘ก ) โ†‘ ( ๐‘ โˆ’ 1 ) ) )
16 8 15 eqtrd โŠข ( ( ๐œ‘ โˆง ๐‘ก โˆˆ โ„‚ ) โ†’ ( ( ๐‘ก โ†‘ ( 1 โˆ’ 1 ) ) ยท ( ( 1 โˆ’ ๐‘ก ) โ†‘ ( ๐‘ โˆ’ 1 ) ) ) = ( ( 1 โˆ’ ๐‘ก ) โ†‘ ( ๐‘ โˆ’ 1 ) ) )
17 2 16 sylan2 โŠข ( ( ๐œ‘ โˆง ๐‘ก โˆˆ ( 0 [,] 1 ) ) โ†’ ( ( ๐‘ก โ†‘ ( 1 โˆ’ 1 ) ) ยท ( ( 1 โˆ’ ๐‘ก ) โ†‘ ( ๐‘ โˆ’ 1 ) ) ) = ( ( 1 โˆ’ ๐‘ก ) โ†‘ ( ๐‘ โˆ’ 1 ) ) )
18 17 itgeq2dv โŠข ( ๐œ‘ โ†’ โˆซ ( 0 [,] 1 ) ( ( ๐‘ก โ†‘ ( 1 โˆ’ 1 ) ) ยท ( ( 1 โˆ’ ๐‘ก ) โ†‘ ( ๐‘ โˆ’ 1 ) ) ) d ๐‘ก = โˆซ ( 0 [,] 1 ) ( ( 1 โˆ’ ๐‘ก ) โ†‘ ( ๐‘ โˆ’ 1 ) ) d ๐‘ก )
19 0red โŠข ( ๐œ‘ โ†’ 0 โˆˆ โ„ )
20 1red โŠข ( ๐œ‘ โ†’ 1 โˆˆ โ„ )
21 2 14 sylan2 โŠข ( ( ๐œ‘ โˆง ๐‘ก โˆˆ ( 0 [,] 1 ) ) โ†’ ( ( 1 โˆ’ ๐‘ก ) โ†‘ ( ๐‘ โˆ’ 1 ) ) โˆˆ โ„‚ )
22 19 20 21 itgioo โŠข ( ๐œ‘ โ†’ โˆซ ( 0 (,) 1 ) ( ( 1 โˆ’ ๐‘ก ) โ†‘ ( ๐‘ โˆ’ 1 ) ) d ๐‘ก = โˆซ ( 0 [,] 1 ) ( ( 1 โˆ’ ๐‘ก ) โ†‘ ( ๐‘ โˆ’ 1 ) ) d ๐‘ก )
23 eqidd โŠข ( ( ๐œ‘ โˆง ๐‘ก โˆˆ ( 0 (,) 1 ) ) โ†’ ( ๐‘ฅ โˆˆ ( 0 (,) 1 ) โ†ฆ ( ( 1 โˆ’ ๐‘ฅ ) โ†‘ ( ๐‘ โˆ’ 1 ) ) ) = ( ๐‘ฅ โˆˆ ( 0 (,) 1 ) โ†ฆ ( ( 1 โˆ’ ๐‘ฅ ) โ†‘ ( ๐‘ โˆ’ 1 ) ) ) )
24 oveq2 โŠข ( ๐‘ฅ = ๐‘ก โ†’ ( 1 โˆ’ ๐‘ฅ ) = ( 1 โˆ’ ๐‘ก ) )
25 24 oveq1d โŠข ( ๐‘ฅ = ๐‘ก โ†’ ( ( 1 โˆ’ ๐‘ฅ ) โ†‘ ( ๐‘ โˆ’ 1 ) ) = ( ( 1 โˆ’ ๐‘ก ) โ†‘ ( ๐‘ โˆ’ 1 ) ) )
26 25 adantl โŠข ( ( ๐œ‘ โˆง ๐‘ฅ = ๐‘ก ) โ†’ ( ( 1 โˆ’ ๐‘ฅ ) โ†‘ ( ๐‘ โˆ’ 1 ) ) = ( ( 1 โˆ’ ๐‘ก ) โ†‘ ( ๐‘ โˆ’ 1 ) ) )
27 26 adantlr โŠข ( ( ( ๐œ‘ โˆง ๐‘ก โˆˆ ( 0 (,) 1 ) ) โˆง ๐‘ฅ = ๐‘ก ) โ†’ ( ( 1 โˆ’ ๐‘ฅ ) โ†‘ ( ๐‘ โˆ’ 1 ) ) = ( ( 1 โˆ’ ๐‘ก ) โ†‘ ( ๐‘ โˆ’ 1 ) ) )
28 simpr โŠข ( ( ๐œ‘ โˆง ๐‘ก โˆˆ ( 0 (,) 1 ) ) โ†’ ๐‘ก โˆˆ ( 0 (,) 1 ) )
29 1cnd โŠข ( ( ๐œ‘ โˆง ๐‘ก โˆˆ ( 0 (,) 1 ) ) โ†’ 1 โˆˆ โ„‚ )
30 elioore โŠข ( ๐‘ก โˆˆ ( 0 (,) 1 ) โ†’ ๐‘ก โˆˆ โ„ )
31 recn โŠข ( ๐‘ก โˆˆ โ„ โ†’ ๐‘ก โˆˆ โ„‚ )
32 28 30 31 3syl โŠข ( ( ๐œ‘ โˆง ๐‘ก โˆˆ ( 0 (,) 1 ) ) โ†’ ๐‘ก โˆˆ โ„‚ )
33 29 32 subcld โŠข ( ( ๐œ‘ โˆง ๐‘ก โˆˆ ( 0 (,) 1 ) ) โ†’ ( 1 โˆ’ ๐‘ก ) โˆˆ โ„‚ )
34 12 adantr โŠข ( ( ๐œ‘ โˆง ๐‘ก โˆˆ ( 0 (,) 1 ) ) โ†’ ( ๐‘ โˆ’ 1 ) โˆˆ โ„•0 )
35 33 34 expcld โŠข ( ( ๐œ‘ โˆง ๐‘ก โˆˆ ( 0 (,) 1 ) ) โ†’ ( ( 1 โˆ’ ๐‘ก ) โ†‘ ( ๐‘ โˆ’ 1 ) ) โˆˆ โ„‚ )
36 23 27 28 35 fvmptd โŠข ( ( ๐œ‘ โˆง ๐‘ก โˆˆ ( 0 (,) 1 ) ) โ†’ ( ( ๐‘ฅ โˆˆ ( 0 (,) 1 ) โ†ฆ ( ( 1 โˆ’ ๐‘ฅ ) โ†‘ ( ๐‘ โˆ’ 1 ) ) ) โ€˜ ๐‘ก ) = ( ( 1 โˆ’ ๐‘ก ) โ†‘ ( ๐‘ โˆ’ 1 ) ) )
37 36 itgeq2dv โŠข ( ๐œ‘ โ†’ โˆซ ( 0 (,) 1 ) ( ( ๐‘ฅ โˆˆ ( 0 (,) 1 ) โ†ฆ ( ( 1 โˆ’ ๐‘ฅ ) โ†‘ ( ๐‘ โˆ’ 1 ) ) ) โ€˜ ๐‘ก ) d ๐‘ก = โˆซ ( 0 (,) 1 ) ( ( 1 โˆ’ ๐‘ก ) โ†‘ ( ๐‘ โˆ’ 1 ) ) d ๐‘ก )
38 cnelprrecn โŠข โ„‚ โˆˆ { โ„ , โ„‚ }
39 38 a1i โŠข ( ๐œ‘ โ†’ โ„‚ โˆˆ { โ„ , โ„‚ } )
40 1cnd โŠข ( ( ๐œ‘ โˆง ๐‘ฅ โˆˆ โ„‚ ) โ†’ 1 โˆˆ โ„‚ )
41 simpr โŠข ( ( ๐œ‘ โˆง ๐‘ฅ โˆˆ โ„‚ ) โ†’ ๐‘ฅ โˆˆ โ„‚ )
42 40 41 subcld โŠข ( ( ๐œ‘ โˆง ๐‘ฅ โˆˆ โ„‚ ) โ†’ ( 1 โˆ’ ๐‘ฅ ) โˆˆ โ„‚ )
43 nnnn0 โŠข ( ๐‘ โˆˆ โ„• โ†’ ๐‘ โˆˆ โ„•0 )
44 1 43 syl โŠข ( ๐œ‘ โ†’ ๐‘ โˆˆ โ„•0 )
45 44 adantr โŠข ( ( ๐œ‘ โˆง ๐‘ฅ โˆˆ โ„‚ ) โ†’ ๐‘ โˆˆ โ„•0 )
46 42 45 expcld โŠข ( ( ๐œ‘ โˆง ๐‘ฅ โˆˆ โ„‚ ) โ†’ ( ( 1 โˆ’ ๐‘ฅ ) โ†‘ ๐‘ ) โˆˆ โ„‚ )
47 45 nn0cnd โŠข ( ( ๐œ‘ โˆง ๐‘ฅ โˆˆ โ„‚ ) โ†’ ๐‘ โˆˆ โ„‚ )
48 12 adantr โŠข ( ( ๐œ‘ โˆง ๐‘ฅ โˆˆ โ„‚ ) โ†’ ( ๐‘ โˆ’ 1 ) โˆˆ โ„•0 )
49 42 48 expcld โŠข ( ( ๐œ‘ โˆง ๐‘ฅ โˆˆ โ„‚ ) โ†’ ( ( 1 โˆ’ ๐‘ฅ ) โ†‘ ( ๐‘ โˆ’ 1 ) ) โˆˆ โ„‚ )
50 47 49 mulcld โŠข ( ( ๐œ‘ โˆง ๐‘ฅ โˆˆ โ„‚ ) โ†’ ( ๐‘ ยท ( ( 1 โˆ’ ๐‘ฅ ) โ†‘ ( ๐‘ โˆ’ 1 ) ) ) โˆˆ โ„‚ )
51 40 negcld โŠข ( ( ๐œ‘ โˆง ๐‘ฅ โˆˆ โ„‚ ) โ†’ - 1 โˆˆ โ„‚ )
52 50 51 mulcld โŠข ( ( ๐œ‘ โˆง ๐‘ฅ โˆˆ โ„‚ ) โ†’ ( ( ๐‘ ยท ( ( 1 โˆ’ ๐‘ฅ ) โ†‘ ( ๐‘ โˆ’ 1 ) ) ) ยท - 1 ) โˆˆ โ„‚ )
53 simpr โŠข ( ( ๐œ‘ โˆง ๐‘ฆ โˆˆ โ„‚ ) โ†’ ๐‘ฆ โˆˆ โ„‚ )
54 44 adantr โŠข ( ( ๐œ‘ โˆง ๐‘ฆ โˆˆ โ„‚ ) โ†’ ๐‘ โˆˆ โ„•0 )
55 53 54 expcld โŠข ( ( ๐œ‘ โˆง ๐‘ฆ โˆˆ โ„‚ ) โ†’ ( ๐‘ฆ โ†‘ ๐‘ ) โˆˆ โ„‚ )
56 54 nn0cnd โŠข ( ( ๐œ‘ โˆง ๐‘ฆ โˆˆ โ„‚ ) โ†’ ๐‘ โˆˆ โ„‚ )
57 12 adantr โŠข ( ( ๐œ‘ โˆง ๐‘ฆ โˆˆ โ„‚ ) โ†’ ( ๐‘ โˆ’ 1 ) โˆˆ โ„•0 )
58 53 57 expcld โŠข ( ( ๐œ‘ โˆง ๐‘ฆ โˆˆ โ„‚ ) โ†’ ( ๐‘ฆ โ†‘ ( ๐‘ โˆ’ 1 ) ) โˆˆ โ„‚ )
59 56 58 mulcld โŠข ( ( ๐œ‘ โˆง ๐‘ฆ โˆˆ โ„‚ ) โ†’ ( ๐‘ ยท ( ๐‘ฆ โ†‘ ( ๐‘ โˆ’ 1 ) ) ) โˆˆ โ„‚ )
60 0cnd โŠข ( ( ๐œ‘ โˆง ๐‘ฅ โˆˆ โ„‚ ) โ†’ 0 โˆˆ โ„‚ )
61 1cnd โŠข ( ๐œ‘ โ†’ 1 โˆˆ โ„‚ )
62 39 61 dvmptc โŠข ( ๐œ‘ โ†’ ( โ„‚ D ( ๐‘ฅ โˆˆ โ„‚ โ†ฆ 1 ) ) = ( ๐‘ฅ โˆˆ โ„‚ โ†ฆ 0 ) )
63 39 dvmptid โŠข ( ๐œ‘ โ†’ ( โ„‚ D ( ๐‘ฅ โˆˆ โ„‚ โ†ฆ ๐‘ฅ ) ) = ( ๐‘ฅ โˆˆ โ„‚ โ†ฆ 1 ) )
64 39 40 60 62 41 40 63 dvmptsub โŠข ( ๐œ‘ โ†’ ( โ„‚ D ( ๐‘ฅ โˆˆ โ„‚ โ†ฆ ( 1 โˆ’ ๐‘ฅ ) ) ) = ( ๐‘ฅ โˆˆ โ„‚ โ†ฆ ( 0 โˆ’ 1 ) ) )
65 df-neg โŠข - 1 = ( 0 โˆ’ 1 )
66 65 a1i โŠข ( ๐œ‘ โ†’ - 1 = ( 0 โˆ’ 1 ) )
67 66 mpteq2dv โŠข ( ๐œ‘ โ†’ ( ๐‘ฅ โˆˆ โ„‚ โ†ฆ - 1 ) = ( ๐‘ฅ โˆˆ โ„‚ โ†ฆ ( 0 โˆ’ 1 ) ) )
68 64 67 eqtr4d โŠข ( ๐œ‘ โ†’ ( โ„‚ D ( ๐‘ฅ โˆˆ โ„‚ โ†ฆ ( 1 โˆ’ ๐‘ฅ ) ) ) = ( ๐‘ฅ โˆˆ โ„‚ โ†ฆ - 1 ) )
69 dvexp โŠข ( ๐‘ โˆˆ โ„• โ†’ ( โ„‚ D ( ๐‘ฆ โˆˆ โ„‚ โ†ฆ ( ๐‘ฆ โ†‘ ๐‘ ) ) ) = ( ๐‘ฆ โˆˆ โ„‚ โ†ฆ ( ๐‘ ยท ( ๐‘ฆ โ†‘ ( ๐‘ โˆ’ 1 ) ) ) ) )
70 1 69 syl โŠข ( ๐œ‘ โ†’ ( โ„‚ D ( ๐‘ฆ โˆˆ โ„‚ โ†ฆ ( ๐‘ฆ โ†‘ ๐‘ ) ) ) = ( ๐‘ฆ โˆˆ โ„‚ โ†ฆ ( ๐‘ ยท ( ๐‘ฆ โ†‘ ( ๐‘ โˆ’ 1 ) ) ) ) )
71 oveq1 โŠข ( ๐‘ฆ = ( 1 โˆ’ ๐‘ฅ ) โ†’ ( ๐‘ฆ โ†‘ ๐‘ ) = ( ( 1 โˆ’ ๐‘ฅ ) โ†‘ ๐‘ ) )
72 oveq1 โŠข ( ๐‘ฆ = ( 1 โˆ’ ๐‘ฅ ) โ†’ ( ๐‘ฆ โ†‘ ( ๐‘ โˆ’ 1 ) ) = ( ( 1 โˆ’ ๐‘ฅ ) โ†‘ ( ๐‘ โˆ’ 1 ) ) )
73 72 oveq2d โŠข ( ๐‘ฆ = ( 1 โˆ’ ๐‘ฅ ) โ†’ ( ๐‘ ยท ( ๐‘ฆ โ†‘ ( ๐‘ โˆ’ 1 ) ) ) = ( ๐‘ ยท ( ( 1 โˆ’ ๐‘ฅ ) โ†‘ ( ๐‘ โˆ’ 1 ) ) ) )
74 39 39 42 51 55 59 68 70 71 73 dvmptco โŠข ( ๐œ‘ โ†’ ( โ„‚ D ( ๐‘ฅ โˆˆ โ„‚ โ†ฆ ( ( 1 โˆ’ ๐‘ฅ ) โ†‘ ๐‘ ) ) ) = ( ๐‘ฅ โˆˆ โ„‚ โ†ฆ ( ( ๐‘ ยท ( ( 1 โˆ’ ๐‘ฅ ) โ†‘ ( ๐‘ โˆ’ 1 ) ) ) ยท - 1 ) ) )
75 61 negcld โŠข ( ๐œ‘ โ†’ - 1 โˆˆ โ„‚ )
76 1 nncnd โŠข ( ๐œ‘ โ†’ ๐‘ โˆˆ โ„‚ )
77 1 nnne0d โŠข ( ๐œ‘ โ†’ ๐‘ โ‰  0 )
78 75 76 77 divcld โŠข ( ๐œ‘ โ†’ ( - 1 / ๐‘ ) โˆˆ โ„‚ )
79 39 46 52 74 78 dvmptcmul โŠข ( ๐œ‘ โ†’ ( โ„‚ D ( ๐‘ฅ โˆˆ โ„‚ โ†ฆ ( ( - 1 / ๐‘ ) ยท ( ( 1 โˆ’ ๐‘ฅ ) โ†‘ ๐‘ ) ) ) ) = ( ๐‘ฅ โˆˆ โ„‚ โ†ฆ ( ( - 1 / ๐‘ ) ยท ( ( ๐‘ ยท ( ( 1 โˆ’ ๐‘ฅ ) โ†‘ ( ๐‘ โˆ’ 1 ) ) ) ยท - 1 ) ) ) )
80 78 adantr โŠข ( ( ๐œ‘ โˆง ๐‘ฅ โˆˆ โ„‚ ) โ†’ ( - 1 / ๐‘ ) โˆˆ โ„‚ )
81 80 50 51 mulassd โŠข ( ( ๐œ‘ โˆง ๐‘ฅ โˆˆ โ„‚ ) โ†’ ( ( ( - 1 / ๐‘ ) ยท ( ๐‘ ยท ( ( 1 โˆ’ ๐‘ฅ ) โ†‘ ( ๐‘ โˆ’ 1 ) ) ) ) ยท - 1 ) = ( ( - 1 / ๐‘ ) ยท ( ( ๐‘ ยท ( ( 1 โˆ’ ๐‘ฅ ) โ†‘ ( ๐‘ โˆ’ 1 ) ) ) ยท - 1 ) ) )
82 81 eqcomd โŠข ( ( ๐œ‘ โˆง ๐‘ฅ โˆˆ โ„‚ ) โ†’ ( ( - 1 / ๐‘ ) ยท ( ( ๐‘ ยท ( ( 1 โˆ’ ๐‘ฅ ) โ†‘ ( ๐‘ โˆ’ 1 ) ) ) ยท - 1 ) ) = ( ( ( - 1 / ๐‘ ) ยท ( ๐‘ ยท ( ( 1 โˆ’ ๐‘ฅ ) โ†‘ ( ๐‘ โˆ’ 1 ) ) ) ) ยท - 1 ) )
83 80 47 49 mulassd โŠข ( ( ๐œ‘ โˆง ๐‘ฅ โˆˆ โ„‚ ) โ†’ ( ( ( - 1 / ๐‘ ) ยท ๐‘ ) ยท ( ( 1 โˆ’ ๐‘ฅ ) โ†‘ ( ๐‘ โˆ’ 1 ) ) ) = ( ( - 1 / ๐‘ ) ยท ( ๐‘ ยท ( ( 1 โˆ’ ๐‘ฅ ) โ†‘ ( ๐‘ โˆ’ 1 ) ) ) ) )
84 83 oveq1d โŠข ( ( ๐œ‘ โˆง ๐‘ฅ โˆˆ โ„‚ ) โ†’ ( ( ( ( - 1 / ๐‘ ) ยท ๐‘ ) ยท ( ( 1 โˆ’ ๐‘ฅ ) โ†‘ ( ๐‘ โˆ’ 1 ) ) ) ยท - 1 ) = ( ( ( - 1 / ๐‘ ) ยท ( ๐‘ ยท ( ( 1 โˆ’ ๐‘ฅ ) โ†‘ ( ๐‘ โˆ’ 1 ) ) ) ) ยท - 1 ) )
85 84 eqcomd โŠข ( ( ๐œ‘ โˆง ๐‘ฅ โˆˆ โ„‚ ) โ†’ ( ( ( - 1 / ๐‘ ) ยท ( ๐‘ ยท ( ( 1 โˆ’ ๐‘ฅ ) โ†‘ ( ๐‘ โˆ’ 1 ) ) ) ) ยท - 1 ) = ( ( ( ( - 1 / ๐‘ ) ยท ๐‘ ) ยท ( ( 1 โˆ’ ๐‘ฅ ) โ†‘ ( ๐‘ โˆ’ 1 ) ) ) ยท - 1 ) )
86 82 85 eqtrd โŠข ( ( ๐œ‘ โˆง ๐‘ฅ โˆˆ โ„‚ ) โ†’ ( ( - 1 / ๐‘ ) ยท ( ( ๐‘ ยท ( ( 1 โˆ’ ๐‘ฅ ) โ†‘ ( ๐‘ โˆ’ 1 ) ) ) ยท - 1 ) ) = ( ( ( ( - 1 / ๐‘ ) ยท ๐‘ ) ยท ( ( 1 โˆ’ ๐‘ฅ ) โ†‘ ( ๐‘ โˆ’ 1 ) ) ) ยท - 1 ) )
87 77 adantr โŠข ( ( ๐œ‘ โˆง ๐‘ฅ โˆˆ โ„‚ ) โ†’ ๐‘ โ‰  0 )
88 51 47 87 divcan1d โŠข ( ( ๐œ‘ โˆง ๐‘ฅ โˆˆ โ„‚ ) โ†’ ( ( - 1 / ๐‘ ) ยท ๐‘ ) = - 1 )
89 88 oveq1d โŠข ( ( ๐œ‘ โˆง ๐‘ฅ โˆˆ โ„‚ ) โ†’ ( ( ( - 1 / ๐‘ ) ยท ๐‘ ) ยท ( ( 1 โˆ’ ๐‘ฅ ) โ†‘ ( ๐‘ โˆ’ 1 ) ) ) = ( - 1 ยท ( ( 1 โˆ’ ๐‘ฅ ) โ†‘ ( ๐‘ โˆ’ 1 ) ) ) )
90 89 oveq1d โŠข ( ( ๐œ‘ โˆง ๐‘ฅ โˆˆ โ„‚ ) โ†’ ( ( ( ( - 1 / ๐‘ ) ยท ๐‘ ) ยท ( ( 1 โˆ’ ๐‘ฅ ) โ†‘ ( ๐‘ โˆ’ 1 ) ) ) ยท - 1 ) = ( ( - 1 ยท ( ( 1 โˆ’ ๐‘ฅ ) โ†‘ ( ๐‘ โˆ’ 1 ) ) ) ยท - 1 ) )
91 86 90 eqtrd โŠข ( ( ๐œ‘ โˆง ๐‘ฅ โˆˆ โ„‚ ) โ†’ ( ( - 1 / ๐‘ ) ยท ( ( ๐‘ ยท ( ( 1 โˆ’ ๐‘ฅ ) โ†‘ ( ๐‘ โˆ’ 1 ) ) ) ยท - 1 ) ) = ( ( - 1 ยท ( ( 1 โˆ’ ๐‘ฅ ) โ†‘ ( ๐‘ โˆ’ 1 ) ) ) ยท - 1 ) )
92 51 51 49 mul32d โŠข ( ( ๐œ‘ โˆง ๐‘ฅ โˆˆ โ„‚ ) โ†’ ( ( - 1 ยท - 1 ) ยท ( ( 1 โˆ’ ๐‘ฅ ) โ†‘ ( ๐‘ โˆ’ 1 ) ) ) = ( ( - 1 ยท ( ( 1 โˆ’ ๐‘ฅ ) โ†‘ ( ๐‘ โˆ’ 1 ) ) ) ยท - 1 ) )
93 92 eqcomd โŠข ( ( ๐œ‘ โˆง ๐‘ฅ โˆˆ โ„‚ ) โ†’ ( ( - 1 ยท ( ( 1 โˆ’ ๐‘ฅ ) โ†‘ ( ๐‘ โˆ’ 1 ) ) ) ยท - 1 ) = ( ( - 1 ยท - 1 ) ยท ( ( 1 โˆ’ ๐‘ฅ ) โ†‘ ( ๐‘ โˆ’ 1 ) ) ) )
94 91 93 eqtrd โŠข ( ( ๐œ‘ โˆง ๐‘ฅ โˆˆ โ„‚ ) โ†’ ( ( - 1 / ๐‘ ) ยท ( ( ๐‘ ยท ( ( 1 โˆ’ ๐‘ฅ ) โ†‘ ( ๐‘ โˆ’ 1 ) ) ) ยท - 1 ) ) = ( ( - 1 ยท - 1 ) ยท ( ( 1 โˆ’ ๐‘ฅ ) โ†‘ ( ๐‘ โˆ’ 1 ) ) ) )
95 40 40 mul2negd โŠข ( ( ๐œ‘ โˆง ๐‘ฅ โˆˆ โ„‚ ) โ†’ ( - 1 ยท - 1 ) = ( 1 ยท 1 ) )
96 1t1e1 โŠข ( 1 ยท 1 ) = 1
97 95 96 eqtrdi โŠข ( ( ๐œ‘ โˆง ๐‘ฅ โˆˆ โ„‚ ) โ†’ ( - 1 ยท - 1 ) = 1 )
98 97 oveq1d โŠข ( ( ๐œ‘ โˆง ๐‘ฅ โˆˆ โ„‚ ) โ†’ ( ( - 1 ยท - 1 ) ยท ( ( 1 โˆ’ ๐‘ฅ ) โ†‘ ( ๐‘ โˆ’ 1 ) ) ) = ( 1 ยท ( ( 1 โˆ’ ๐‘ฅ ) โ†‘ ( ๐‘ โˆ’ 1 ) ) ) )
99 49 mullidd โŠข ( ( ๐œ‘ โˆง ๐‘ฅ โˆˆ โ„‚ ) โ†’ ( 1 ยท ( ( 1 โˆ’ ๐‘ฅ ) โ†‘ ( ๐‘ โˆ’ 1 ) ) ) = ( ( 1 โˆ’ ๐‘ฅ ) โ†‘ ( ๐‘ โˆ’ 1 ) ) )
100 98 99 eqtrd โŠข ( ( ๐œ‘ โˆง ๐‘ฅ โˆˆ โ„‚ ) โ†’ ( ( - 1 ยท - 1 ) ยท ( ( 1 โˆ’ ๐‘ฅ ) โ†‘ ( ๐‘ โˆ’ 1 ) ) ) = ( ( 1 โˆ’ ๐‘ฅ ) โ†‘ ( ๐‘ โˆ’ 1 ) ) )
101 94 100 eqtrd โŠข ( ( ๐œ‘ โˆง ๐‘ฅ โˆˆ โ„‚ ) โ†’ ( ( - 1 / ๐‘ ) ยท ( ( ๐‘ ยท ( ( 1 โˆ’ ๐‘ฅ ) โ†‘ ( ๐‘ โˆ’ 1 ) ) ) ยท - 1 ) ) = ( ( 1 โˆ’ ๐‘ฅ ) โ†‘ ( ๐‘ โˆ’ 1 ) ) )
102 101 mpteq2dva โŠข ( ๐œ‘ โ†’ ( ๐‘ฅ โˆˆ โ„‚ โ†ฆ ( ( - 1 / ๐‘ ) ยท ( ( ๐‘ ยท ( ( 1 โˆ’ ๐‘ฅ ) โ†‘ ( ๐‘ โˆ’ 1 ) ) ) ยท - 1 ) ) ) = ( ๐‘ฅ โˆˆ โ„‚ โ†ฆ ( ( 1 โˆ’ ๐‘ฅ ) โ†‘ ( ๐‘ โˆ’ 1 ) ) ) )
103 79 102 eqtrd โŠข ( ๐œ‘ โ†’ ( โ„‚ D ( ๐‘ฅ โˆˆ โ„‚ โ†ฆ ( ( - 1 / ๐‘ ) ยท ( ( 1 โˆ’ ๐‘ฅ ) โ†‘ ๐‘ ) ) ) ) = ( ๐‘ฅ โˆˆ โ„‚ โ†ฆ ( ( 1 โˆ’ ๐‘ฅ ) โ†‘ ( ๐‘ โˆ’ 1 ) ) ) )
104 80 46 mulcld โŠข ( ( ๐œ‘ โˆง ๐‘ฅ โˆˆ โ„‚ ) โ†’ ( ( - 1 / ๐‘ ) ยท ( ( 1 โˆ’ ๐‘ฅ ) โ†‘ ๐‘ ) ) โˆˆ โ„‚ )
105 103 104 49 resdvopclptsd โŠข ( ๐œ‘ โ†’ ( โ„ D ( ๐‘ฅ โˆˆ ( 0 [,] 1 ) โ†ฆ ( ( - 1 / ๐‘ ) ยท ( ( 1 โˆ’ ๐‘ฅ ) โ†‘ ๐‘ ) ) ) ) = ( ๐‘ฅ โˆˆ ( 0 (,) 1 ) โ†ฆ ( ( 1 โˆ’ ๐‘ฅ ) โ†‘ ( ๐‘ โˆ’ 1 ) ) ) )
106 105 fveq1d โŠข ( ๐œ‘ โ†’ ( ( โ„ D ( ๐‘ฅ โˆˆ ( 0 [,] 1 ) โ†ฆ ( ( - 1 / ๐‘ ) ยท ( ( 1 โˆ’ ๐‘ฅ ) โ†‘ ๐‘ ) ) ) ) โ€˜ ๐‘ก ) = ( ( ๐‘ฅ โˆˆ ( 0 (,) 1 ) โ†ฆ ( ( 1 โˆ’ ๐‘ฅ ) โ†‘ ( ๐‘ โˆ’ 1 ) ) ) โ€˜ ๐‘ก ) )
107 106 ralrimivw โŠข ( ๐œ‘ โ†’ โˆ€ ๐‘ก โˆˆ ( 0 (,) 1 ) ( ( โ„ D ( ๐‘ฅ โˆˆ ( 0 [,] 1 ) โ†ฆ ( ( - 1 / ๐‘ ) ยท ( ( 1 โˆ’ ๐‘ฅ ) โ†‘ ๐‘ ) ) ) ) โ€˜ ๐‘ก ) = ( ( ๐‘ฅ โˆˆ ( 0 (,) 1 ) โ†ฆ ( ( 1 โˆ’ ๐‘ฅ ) โ†‘ ( ๐‘ โˆ’ 1 ) ) ) โ€˜ ๐‘ก ) )
108 itgeq2 โŠข ( โˆ€ ๐‘ก โˆˆ ( 0 (,) 1 ) ( ( โ„ D ( ๐‘ฅ โˆˆ ( 0 [,] 1 ) โ†ฆ ( ( - 1 / ๐‘ ) ยท ( ( 1 โˆ’ ๐‘ฅ ) โ†‘ ๐‘ ) ) ) ) โ€˜ ๐‘ก ) = ( ( ๐‘ฅ โˆˆ ( 0 (,) 1 ) โ†ฆ ( ( 1 โˆ’ ๐‘ฅ ) โ†‘ ( ๐‘ โˆ’ 1 ) ) ) โ€˜ ๐‘ก ) โ†’ โˆซ ( 0 (,) 1 ) ( ( โ„ D ( ๐‘ฅ โˆˆ ( 0 [,] 1 ) โ†ฆ ( ( - 1 / ๐‘ ) ยท ( ( 1 โˆ’ ๐‘ฅ ) โ†‘ ๐‘ ) ) ) ) โ€˜ ๐‘ก ) d ๐‘ก = โˆซ ( 0 (,) 1 ) ( ( ๐‘ฅ โˆˆ ( 0 (,) 1 ) โ†ฆ ( ( 1 โˆ’ ๐‘ฅ ) โ†‘ ( ๐‘ โˆ’ 1 ) ) ) โ€˜ ๐‘ก ) d ๐‘ก )
109 107 108 syl โŠข ( ๐œ‘ โ†’ โˆซ ( 0 (,) 1 ) ( ( โ„ D ( ๐‘ฅ โˆˆ ( 0 [,] 1 ) โ†ฆ ( ( - 1 / ๐‘ ) ยท ( ( 1 โˆ’ ๐‘ฅ ) โ†‘ ๐‘ ) ) ) ) โ€˜ ๐‘ก ) d ๐‘ก = โˆซ ( 0 (,) 1 ) ( ( ๐‘ฅ โˆˆ ( 0 (,) 1 ) โ†ฆ ( ( 1 โˆ’ ๐‘ฅ ) โ†‘ ( ๐‘ โˆ’ 1 ) ) ) โ€˜ ๐‘ก ) d ๐‘ก )
110 0le1 โŠข 0 โ‰ค 1
111 110 a1i โŠข ( ๐œ‘ โ†’ 0 โ‰ค 1 )
112 nfv โŠข โ„ฒ ๐‘ฅ ๐œ‘
113 ax-1cn โŠข 1 โˆˆ โ„‚
114 ssid โŠข โ„‚ โІ โ„‚
115 cncfmptc โŠข ( ( 1 โˆˆ โ„‚ โˆง โ„‚ โІ โ„‚ โˆง โ„‚ โІ โ„‚ ) โ†’ ( ๐‘ฅ โˆˆ โ„‚ โ†ฆ 1 ) โˆˆ ( โ„‚ โ€“cnโ†’ โ„‚ ) )
116 113 114 114 115 mp3an โŠข ( ๐‘ฅ โˆˆ โ„‚ โ†ฆ 1 ) โˆˆ ( โ„‚ โ€“cnโ†’ โ„‚ )
117 116 a1i โŠข ( ๐œ‘ โ†’ ( ๐‘ฅ โˆˆ โ„‚ โ†ฆ 1 ) โˆˆ ( โ„‚ โ€“cnโ†’ โ„‚ ) )
118 cncfmptid โŠข ( ( โ„‚ โІ โ„‚ โˆง โ„‚ โІ โ„‚ ) โ†’ ( ๐‘ฅ โˆˆ โ„‚ โ†ฆ ๐‘ฅ ) โˆˆ ( โ„‚ โ€“cnโ†’ โ„‚ ) )
119 114 114 118 mp2an โŠข ( ๐‘ฅ โˆˆ โ„‚ โ†ฆ ๐‘ฅ ) โˆˆ ( โ„‚ โ€“cnโ†’ โ„‚ )
120 119 a1i โŠข ( ๐œ‘ โ†’ ( ๐‘ฅ โˆˆ โ„‚ โ†ฆ ๐‘ฅ ) โˆˆ ( โ„‚ โ€“cnโ†’ โ„‚ ) )
121 117 120 subcncf โŠข ( ๐œ‘ โ†’ ( ๐‘ฅ โˆˆ โ„‚ โ†ฆ ( 1 โˆ’ ๐‘ฅ ) ) โˆˆ ( โ„‚ โ€“cnโ†’ โ„‚ ) )
122 expcncf โŠข ( ( ๐‘ โˆ’ 1 ) โˆˆ โ„•0 โ†’ ( ๐‘ฆ โˆˆ โ„‚ โ†ฆ ( ๐‘ฆ โ†‘ ( ๐‘ โˆ’ 1 ) ) ) โˆˆ ( โ„‚ โ€“cnโ†’ โ„‚ ) )
123 12 122 syl โŠข ( ๐œ‘ โ†’ ( ๐‘ฆ โˆˆ โ„‚ โ†ฆ ( ๐‘ฆ โ†‘ ( ๐‘ โˆ’ 1 ) ) ) โˆˆ ( โ„‚ โ€“cnโ†’ โ„‚ ) )
124 ssidd โŠข ( ๐œ‘ โ†’ โ„‚ โІ โ„‚ )
125 112 121 123 124 72 cncfcompt2 โŠข ( ๐œ‘ โ†’ ( ๐‘ฅ โˆˆ โ„‚ โ†ฆ ( ( 1 โˆ’ ๐‘ฅ ) โ†‘ ( ๐‘ โˆ’ 1 ) ) ) โˆˆ ( โ„‚ โ€“cnโ†’ โ„‚ ) )
126 125 resopunitintvd โŠข ( ๐œ‘ โ†’ ( ๐‘ฅ โˆˆ ( 0 (,) 1 ) โ†ฆ ( ( 1 โˆ’ ๐‘ฅ ) โ†‘ ( ๐‘ โˆ’ 1 ) ) ) โˆˆ ( ( 0 (,) 1 ) โ€“cnโ†’ โ„‚ ) )
127 105 eleq1d โŠข ( ๐œ‘ โ†’ ( ( โ„ D ( ๐‘ฅ โˆˆ ( 0 [,] 1 ) โ†ฆ ( ( - 1 / ๐‘ ) ยท ( ( 1 โˆ’ ๐‘ฅ ) โ†‘ ๐‘ ) ) ) ) โˆˆ ( ( 0 (,) 1 ) โ€“cnโ†’ โ„‚ ) โ†” ( ๐‘ฅ โˆˆ ( 0 (,) 1 ) โ†ฆ ( ( 1 โˆ’ ๐‘ฅ ) โ†‘ ( ๐‘ โˆ’ 1 ) ) ) โˆˆ ( ( 0 (,) 1 ) โ€“cnโ†’ โ„‚ ) ) )
128 126 127 mpbird โŠข ( ๐œ‘ โ†’ ( โ„ D ( ๐‘ฅ โˆˆ ( 0 [,] 1 ) โ†ฆ ( ( - 1 / ๐‘ ) ยท ( ( 1 โˆ’ ๐‘ฅ ) โ†‘ ๐‘ ) ) ) ) โˆˆ ( ( 0 (,) 1 ) โ€“cnโ†’ โ„‚ ) )
129 ioossicc โŠข ( 0 (,) 1 ) โІ ( 0 [,] 1 )
130 129 a1i โŠข ( ๐œ‘ โ†’ ( 0 (,) 1 ) โІ ( 0 [,] 1 ) )
131 ioombl โŠข ( 0 (,) 1 ) โˆˆ dom vol
132 131 a1i โŠข ( ๐œ‘ โ†’ ( 0 (,) 1 ) โˆˆ dom vol )
133 elunitcn โŠข ( ๐‘ฅ โˆˆ ( 0 [,] 1 ) โ†’ ๐‘ฅ โˆˆ โ„‚ )
134 133 49 sylan2 โŠข ( ( ๐œ‘ โˆง ๐‘ฅ โˆˆ ( 0 [,] 1 ) ) โ†’ ( ( 1 โˆ’ ๐‘ฅ ) โ†‘ ( ๐‘ โˆ’ 1 ) ) โˆˆ โ„‚ )
135 114 a1i โŠข ( ๐œ‘ โ†’ โ„‚ โІ โ„‚ )
136 112 121 123 135 72 cncfcompt2 โŠข ( ๐œ‘ โ†’ ( ๐‘ฅ โˆˆ โ„‚ โ†ฆ ( ( 1 โˆ’ ๐‘ฅ ) โ†‘ ( ๐‘ โˆ’ 1 ) ) ) โˆˆ ( โ„‚ โ€“cnโ†’ โ„‚ ) )
137 136 resclunitintvd โŠข ( ๐œ‘ โ†’ ( ๐‘ฅ โˆˆ ( 0 [,] 1 ) โ†ฆ ( ( 1 โˆ’ ๐‘ฅ ) โ†‘ ( ๐‘ โˆ’ 1 ) ) ) โˆˆ ( ( 0 [,] 1 ) โ€“cnโ†’ โ„‚ ) )
138 19 20 137 3jca โŠข ( ๐œ‘ โ†’ ( 0 โˆˆ โ„ โˆง 1 โˆˆ โ„ โˆง ( ๐‘ฅ โˆˆ ( 0 [,] 1 ) โ†ฆ ( ( 1 โˆ’ ๐‘ฅ ) โ†‘ ( ๐‘ โˆ’ 1 ) ) ) โˆˆ ( ( 0 [,] 1 ) โ€“cnโ†’ โ„‚ ) ) )
139 cnicciblnc โŠข ( ( 0 โˆˆ โ„ โˆง 1 โˆˆ โ„ โˆง ( ๐‘ฅ โˆˆ ( 0 [,] 1 ) โ†ฆ ( ( 1 โˆ’ ๐‘ฅ ) โ†‘ ( ๐‘ โˆ’ 1 ) ) ) โˆˆ ( ( 0 [,] 1 ) โ€“cnโ†’ โ„‚ ) ) โ†’ ( ๐‘ฅ โˆˆ ( 0 [,] 1 ) โ†ฆ ( ( 1 โˆ’ ๐‘ฅ ) โ†‘ ( ๐‘ โˆ’ 1 ) ) ) โˆˆ ๐ฟ1 )
140 138 139 syl โŠข ( ๐œ‘ โ†’ ( ๐‘ฅ โˆˆ ( 0 [,] 1 ) โ†ฆ ( ( 1 โˆ’ ๐‘ฅ ) โ†‘ ( ๐‘ โˆ’ 1 ) ) ) โˆˆ ๐ฟ1 )
141 130 132 134 140 iblss โŠข ( ๐œ‘ โ†’ ( ๐‘ฅ โˆˆ ( 0 (,) 1 ) โ†ฆ ( ( 1 โˆ’ ๐‘ฅ ) โ†‘ ( ๐‘ โˆ’ 1 ) ) ) โˆˆ ๐ฟ1 )
142 105 141 eqeltrd โŠข ( ๐œ‘ โ†’ ( โ„ D ( ๐‘ฅ โˆˆ ( 0 [,] 1 ) โ†ฆ ( ( - 1 / ๐‘ ) ยท ( ( 1 โˆ’ ๐‘ฅ ) โ†‘ ๐‘ ) ) ) ) โˆˆ ๐ฟ1 )
143 cncfmptc โŠข ( ( ( - 1 / ๐‘ ) โˆˆ โ„‚ โˆง โ„‚ โІ โ„‚ โˆง โ„‚ โІ โ„‚ ) โ†’ ( ๐‘ฅ โˆˆ โ„‚ โ†ฆ ( - 1 / ๐‘ ) ) โˆˆ ( โ„‚ โ€“cnโ†’ โ„‚ ) )
144 114 114 143 mp3an23 โŠข ( ( - 1 / ๐‘ ) โˆˆ โ„‚ โ†’ ( ๐‘ฅ โˆˆ โ„‚ โ†ฆ ( - 1 / ๐‘ ) ) โˆˆ ( โ„‚ โ€“cnโ†’ โ„‚ ) )
145 78 144 syl โŠข ( ๐œ‘ โ†’ ( ๐‘ฅ โˆˆ โ„‚ โ†ฆ ( - 1 / ๐‘ ) ) โˆˆ ( โ„‚ โ€“cnโ†’ โ„‚ ) )
146 145 resclunitintvd โŠข ( ๐œ‘ โ†’ ( ๐‘ฅ โˆˆ ( 0 [,] 1 ) โ†ฆ ( - 1 / ๐‘ ) ) โˆˆ ( ( 0 [,] 1 ) โ€“cnโ†’ โ„‚ ) )
147 expcncf โŠข ( ๐‘ โˆˆ โ„•0 โ†’ ( ๐‘ฆ โˆˆ โ„‚ โ†ฆ ( ๐‘ฆ โ†‘ ๐‘ ) ) โˆˆ ( โ„‚ โ€“cnโ†’ โ„‚ ) )
148 44 147 syl โŠข ( ๐œ‘ โ†’ ( ๐‘ฆ โˆˆ โ„‚ โ†ฆ ( ๐‘ฆ โ†‘ ๐‘ ) ) โˆˆ ( โ„‚ โ€“cnโ†’ โ„‚ ) )
149 112 121 148 124 71 cncfcompt2 โŠข ( ๐œ‘ โ†’ ( ๐‘ฅ โˆˆ โ„‚ โ†ฆ ( ( 1 โˆ’ ๐‘ฅ ) โ†‘ ๐‘ ) ) โˆˆ ( โ„‚ โ€“cnโ†’ โ„‚ ) )
150 149 resclunitintvd โŠข ( ๐œ‘ โ†’ ( ๐‘ฅ โˆˆ ( 0 [,] 1 ) โ†ฆ ( ( 1 โˆ’ ๐‘ฅ ) โ†‘ ๐‘ ) ) โˆˆ ( ( 0 [,] 1 ) โ€“cnโ†’ โ„‚ ) )
151 146 150 mulcncf โŠข ( ๐œ‘ โ†’ ( ๐‘ฅ โˆˆ ( 0 [,] 1 ) โ†ฆ ( ( - 1 / ๐‘ ) ยท ( ( 1 โˆ’ ๐‘ฅ ) โ†‘ ๐‘ ) ) ) โˆˆ ( ( 0 [,] 1 ) โ€“cnโ†’ โ„‚ ) )
152 19 20 111 128 142 151 ftc2 โŠข ( ๐œ‘ โ†’ โˆซ ( 0 (,) 1 ) ( ( โ„ D ( ๐‘ฅ โˆˆ ( 0 [,] 1 ) โ†ฆ ( ( - 1 / ๐‘ ) ยท ( ( 1 โˆ’ ๐‘ฅ ) โ†‘ ๐‘ ) ) ) ) โ€˜ ๐‘ก ) d ๐‘ก = ( ( ( ๐‘ฅ โˆˆ ( 0 [,] 1 ) โ†ฆ ( ( - 1 / ๐‘ ) ยท ( ( 1 โˆ’ ๐‘ฅ ) โ†‘ ๐‘ ) ) ) โ€˜ 1 ) โˆ’ ( ( ๐‘ฅ โˆˆ ( 0 [,] 1 ) โ†ฆ ( ( - 1 / ๐‘ ) ยท ( ( 1 โˆ’ ๐‘ฅ ) โ†‘ ๐‘ ) ) ) โ€˜ 0 ) ) )
153 eqidd โŠข ( ๐œ‘ โ†’ ( ๐‘ฅ โˆˆ ( 0 [,] 1 ) โ†ฆ ( ( - 1 / ๐‘ ) ยท ( ( 1 โˆ’ ๐‘ฅ ) โ†‘ ๐‘ ) ) ) = ( ๐‘ฅ โˆˆ ( 0 [,] 1 ) โ†ฆ ( ( - 1 / ๐‘ ) ยท ( ( 1 โˆ’ ๐‘ฅ ) โ†‘ ๐‘ ) ) ) )
154 simpr โŠข ( ( ๐œ‘ โˆง ๐‘ฅ = 1 ) โ†’ ๐‘ฅ = 1 )
155 154 oveq2d โŠข ( ( ๐œ‘ โˆง ๐‘ฅ = 1 ) โ†’ ( 1 โˆ’ ๐‘ฅ ) = ( 1 โˆ’ 1 ) )
156 155 3 eqtrdi โŠข ( ( ๐œ‘ โˆง ๐‘ฅ = 1 ) โ†’ ( 1 โˆ’ ๐‘ฅ ) = 0 )
157 156 oveq1d โŠข ( ( ๐œ‘ โˆง ๐‘ฅ = 1 ) โ†’ ( ( 1 โˆ’ ๐‘ฅ ) โ†‘ ๐‘ ) = ( 0 โ†‘ ๐‘ ) )
158 0exp โŠข ( ๐‘ โˆˆ โ„• โ†’ ( 0 โ†‘ ๐‘ ) = 0 )
159 1 158 syl โŠข ( ๐œ‘ โ†’ ( 0 โ†‘ ๐‘ ) = 0 )
160 159 adantr โŠข ( ( ๐œ‘ โˆง ๐‘ฅ = 1 ) โ†’ ( 0 โ†‘ ๐‘ ) = 0 )
161 157 160 eqtrd โŠข ( ( ๐œ‘ โˆง ๐‘ฅ = 1 ) โ†’ ( ( 1 โˆ’ ๐‘ฅ ) โ†‘ ๐‘ ) = 0 )
162 161 oveq2d โŠข ( ( ๐œ‘ โˆง ๐‘ฅ = 1 ) โ†’ ( ( - 1 / ๐‘ ) ยท ( ( 1 โˆ’ ๐‘ฅ ) โ†‘ ๐‘ ) ) = ( ( - 1 / ๐‘ ) ยท 0 ) )
163 78 mul01d โŠข ( ๐œ‘ โ†’ ( ( - 1 / ๐‘ ) ยท 0 ) = 0 )
164 163 adantr โŠข ( ( ๐œ‘ โˆง ๐‘ฅ = 1 ) โ†’ ( ( - 1 / ๐‘ ) ยท 0 ) = 0 )
165 162 164 eqtrd โŠข ( ( ๐œ‘ โˆง ๐‘ฅ = 1 ) โ†’ ( ( - 1 / ๐‘ ) ยท ( ( 1 โˆ’ ๐‘ฅ ) โ†‘ ๐‘ ) ) = 0 )
166 1elunit โŠข 1 โˆˆ ( 0 [,] 1 )
167 166 a1i โŠข ( ๐œ‘ โ†’ 1 โˆˆ ( 0 [,] 1 ) )
168 0cnd โŠข ( ๐œ‘ โ†’ 0 โˆˆ โ„‚ )
169 153 165 167 168 fvmptd โŠข ( ๐œ‘ โ†’ ( ( ๐‘ฅ โˆˆ ( 0 [,] 1 ) โ†ฆ ( ( - 1 / ๐‘ ) ยท ( ( 1 โˆ’ ๐‘ฅ ) โ†‘ ๐‘ ) ) ) โ€˜ 1 ) = 0 )
170 simpr โŠข ( ( ๐œ‘ โˆง ๐‘ฅ = 0 ) โ†’ ๐‘ฅ = 0 )
171 170 oveq2d โŠข ( ( ๐œ‘ โˆง ๐‘ฅ = 0 ) โ†’ ( 1 โˆ’ ๐‘ฅ ) = ( 1 โˆ’ 0 ) )
172 1m0e1 โŠข ( 1 โˆ’ 0 ) = 1
173 171 172 eqtrdi โŠข ( ( ๐œ‘ โˆง ๐‘ฅ = 0 ) โ†’ ( 1 โˆ’ ๐‘ฅ ) = 1 )
174 173 oveq1d โŠข ( ( ๐œ‘ โˆง ๐‘ฅ = 0 ) โ†’ ( ( 1 โˆ’ ๐‘ฅ ) โ†‘ ๐‘ ) = ( 1 โ†‘ ๐‘ ) )
175 44 nn0zd โŠข ( ๐œ‘ โ†’ ๐‘ โˆˆ โ„ค )
176 1exp โŠข ( ๐‘ โˆˆ โ„ค โ†’ ( 1 โ†‘ ๐‘ ) = 1 )
177 175 176 syl โŠข ( ๐œ‘ โ†’ ( 1 โ†‘ ๐‘ ) = 1 )
178 177 adantr โŠข ( ( ๐œ‘ โˆง ๐‘ฅ = 0 ) โ†’ ( 1 โ†‘ ๐‘ ) = 1 )
179 174 178 eqtrd โŠข ( ( ๐œ‘ โˆง ๐‘ฅ = 0 ) โ†’ ( ( 1 โˆ’ ๐‘ฅ ) โ†‘ ๐‘ ) = 1 )
180 179 oveq2d โŠข ( ( ๐œ‘ โˆง ๐‘ฅ = 0 ) โ†’ ( ( - 1 / ๐‘ ) ยท ( ( 1 โˆ’ ๐‘ฅ ) โ†‘ ๐‘ ) ) = ( ( - 1 / ๐‘ ) ยท 1 ) )
181 78 adantr โŠข ( ( ๐œ‘ โˆง ๐‘ฅ = 0 ) โ†’ ( - 1 / ๐‘ ) โˆˆ โ„‚ )
182 181 mulridd โŠข ( ( ๐œ‘ โˆง ๐‘ฅ = 0 ) โ†’ ( ( - 1 / ๐‘ ) ยท 1 ) = ( - 1 / ๐‘ ) )
183 180 182 eqtrd โŠข ( ( ๐œ‘ โˆง ๐‘ฅ = 0 ) โ†’ ( ( - 1 / ๐‘ ) ยท ( ( 1 โˆ’ ๐‘ฅ ) โ†‘ ๐‘ ) ) = ( - 1 / ๐‘ ) )
184 0elunit โŠข 0 โˆˆ ( 0 [,] 1 )
185 184 a1i โŠข ( ๐œ‘ โ†’ 0 โˆˆ ( 0 [,] 1 ) )
186 153 183 185 78 fvmptd โŠข ( ๐œ‘ โ†’ ( ( ๐‘ฅ โˆˆ ( 0 [,] 1 ) โ†ฆ ( ( - 1 / ๐‘ ) ยท ( ( 1 โˆ’ ๐‘ฅ ) โ†‘ ๐‘ ) ) ) โ€˜ 0 ) = ( - 1 / ๐‘ ) )
187 169 186 oveq12d โŠข ( ๐œ‘ โ†’ ( ( ( ๐‘ฅ โˆˆ ( 0 [,] 1 ) โ†ฆ ( ( - 1 / ๐‘ ) ยท ( ( 1 โˆ’ ๐‘ฅ ) โ†‘ ๐‘ ) ) ) โ€˜ 1 ) โˆ’ ( ( ๐‘ฅ โˆˆ ( 0 [,] 1 ) โ†ฆ ( ( - 1 / ๐‘ ) ยท ( ( 1 โˆ’ ๐‘ฅ ) โ†‘ ๐‘ ) ) ) โ€˜ 0 ) ) = ( 0 โˆ’ ( - 1 / ๐‘ ) ) )
188 152 187 eqtrd โŠข ( ๐œ‘ โ†’ โˆซ ( 0 (,) 1 ) ( ( โ„ D ( ๐‘ฅ โˆˆ ( 0 [,] 1 ) โ†ฆ ( ( - 1 / ๐‘ ) ยท ( ( 1 โˆ’ ๐‘ฅ ) โ†‘ ๐‘ ) ) ) ) โ€˜ ๐‘ก ) d ๐‘ก = ( 0 โˆ’ ( - 1 / ๐‘ ) ) )
189 df-neg โŠข - - ( 1 / ๐‘ ) = ( 0 โˆ’ - ( 1 / ๐‘ ) )
190 189 a1i โŠข ( ๐œ‘ โ†’ - - ( 1 / ๐‘ ) = ( 0 โˆ’ - ( 1 / ๐‘ ) ) )
191 61 76 77 divnegd โŠข ( ๐œ‘ โ†’ - ( 1 / ๐‘ ) = ( - 1 / ๐‘ ) )
192 191 oveq2d โŠข ( ๐œ‘ โ†’ ( 0 โˆ’ - ( 1 / ๐‘ ) ) = ( 0 โˆ’ ( - 1 / ๐‘ ) ) )
193 190 192 eqtr2d โŠข ( ๐œ‘ โ†’ ( 0 โˆ’ ( - 1 / ๐‘ ) ) = - - ( 1 / ๐‘ ) )
194 76 77 reccld โŠข ( ๐œ‘ โ†’ ( 1 / ๐‘ ) โˆˆ โ„‚ )
195 194 negnegd โŠข ( ๐œ‘ โ†’ - - ( 1 / ๐‘ ) = ( 1 / ๐‘ ) )
196 193 195 eqtrd โŠข ( ๐œ‘ โ†’ ( 0 โˆ’ ( - 1 / ๐‘ ) ) = ( 1 / ๐‘ ) )
197 188 196 eqtrd โŠข ( ๐œ‘ โ†’ โˆซ ( 0 (,) 1 ) ( ( โ„ D ( ๐‘ฅ โˆˆ ( 0 [,] 1 ) โ†ฆ ( ( - 1 / ๐‘ ) ยท ( ( 1 โˆ’ ๐‘ฅ ) โ†‘ ๐‘ ) ) ) ) โ€˜ ๐‘ก ) d ๐‘ก = ( 1 / ๐‘ ) )
198 109 197 eqtr3d โŠข ( ๐œ‘ โ†’ โˆซ ( 0 (,) 1 ) ( ( ๐‘ฅ โˆˆ ( 0 (,) 1 ) โ†ฆ ( ( 1 โˆ’ ๐‘ฅ ) โ†‘ ( ๐‘ โˆ’ 1 ) ) ) โ€˜ ๐‘ก ) d ๐‘ก = ( 1 / ๐‘ ) )
199 37 198 eqtr3d โŠข ( ๐œ‘ โ†’ โˆซ ( 0 (,) 1 ) ( ( 1 โˆ’ ๐‘ก ) โ†‘ ( ๐‘ โˆ’ 1 ) ) d ๐‘ก = ( 1 / ๐‘ ) )
200 22 199 eqtr3d โŠข ( ๐œ‘ โ†’ โˆซ ( 0 [,] 1 ) ( ( 1 โˆ’ ๐‘ก ) โ†‘ ( ๐‘ โˆ’ 1 ) ) d ๐‘ก = ( 1 / ๐‘ ) )
201 bcn1 โŠข ( ๐‘ โˆˆ โ„•0 โ†’ ( ๐‘ C 1 ) = ๐‘ )
202 44 201 syl โŠข ( ๐œ‘ โ†’ ( ๐‘ C 1 ) = ๐‘ )
203 202 oveq2d โŠข ( ๐œ‘ โ†’ ( 1 ยท ( ๐‘ C 1 ) ) = ( 1 ยท ๐‘ ) )
204 76 mullidd โŠข ( ๐œ‘ โ†’ ( 1 ยท ๐‘ ) = ๐‘ )
205 203 204 eqtrd โŠข ( ๐œ‘ โ†’ ( 1 ยท ( ๐‘ C 1 ) ) = ๐‘ )
206 205 oveq2d โŠข ( ๐œ‘ โ†’ ( 1 / ( 1 ยท ( ๐‘ C 1 ) ) ) = ( 1 / ๐‘ ) )
207 200 206 eqtr4d โŠข ( ๐œ‘ โ†’ โˆซ ( 0 [,] 1 ) ( ( 1 โˆ’ ๐‘ก ) โ†‘ ( ๐‘ โˆ’ 1 ) ) d ๐‘ก = ( 1 / ( 1 ยท ( ๐‘ C 1 ) ) ) )
208 18 207 eqtrd โŠข ( ๐œ‘ โ†’ โˆซ ( 0 [,] 1 ) ( ( ๐‘ก โ†‘ ( 1 โˆ’ 1 ) ) ยท ( ( 1 โˆ’ ๐‘ก ) โ†‘ ( ๐‘ โˆ’ 1 ) ) ) d ๐‘ก = ( 1 / ( 1 ยท ( ๐‘ C 1 ) ) ) )