Step | Hyp | Ref
| Expression |
1 | | iftrue 4533 |
. . . . . 6
β’ (if(π½ = 0, (π β 1), π) < π β if(if(π½ = 0, (π β 1), π) < π, 0, (((!βif(π½ = 0, (π β 1), π)) / (!β(if(π½ = 0, (π β 1), π) β π))) Β· ((π₯ β π½)β(if(π½ = 0, (π β 1), π) β π)))) = 0) |
2 | | 0cnd 11203 |
. . . . . 6
β’ (if(π½ = 0, (π β 1), π) < π β 0 β β) |
3 | 1, 2 | eqeltrd 2833 |
. . . . 5
β’ (if(π½ = 0, (π β 1), π) < π β if(if(π½ = 0, (π β 1), π) < π, 0, (((!βif(π½ = 0, (π β 1), π)) / (!β(if(π½ = 0, (π β 1), π) β π))) Β· ((π₯ β π½)β(if(π½ = 0, (π β 1), π) β π)))) β β) |
4 | 3 | adantl 482 |
. . . 4
β’ (((π β§ π₯ β π) β§ if(π½ = 0, (π β 1), π) < π) β if(if(π½ = 0, (π β 1), π) < π, 0, (((!βif(π½ = 0, (π β 1), π)) / (!β(if(π½ = 0, (π β 1), π) β π))) Β· ((π₯ β π½)β(if(π½ = 0, (π β 1), π) β π)))) β β) |
5 | | simpr 485 |
. . . . . 6
β’ (((π β§ π₯ β π) β§ Β¬ if(π½ = 0, (π β 1), π) < π) β Β¬ if(π½ = 0, (π β 1), π) < π) |
6 | 5 | iffalsed 4538 |
. . . . 5
β’ (((π β§ π₯ β π) β§ Β¬ if(π½ = 0, (π β 1), π) < π) β if(if(π½ = 0, (π β 1), π) < π, 0, (((!βif(π½ = 0, (π β 1), π)) / (!β(if(π½ = 0, (π β 1), π) β π))) Β· ((π₯ β π½)β(if(π½ = 0, (π β 1), π) β π)))) = (((!βif(π½ = 0, (π β 1), π)) / (!β(if(π½ = 0, (π β 1), π) β π))) Β· ((π₯ β π½)β(if(π½ = 0, (π β 1), π) β π)))) |
7 | | etransclem20.p |
. . . . . . . . . . . . 13
β’ (π β π β β) |
8 | | nnm1nn0 12509 |
. . . . . . . . . . . . 13
β’ (π β β β (π β 1) β
β0) |
9 | 7, 8 | syl 17 |
. . . . . . . . . . . 12
β’ (π β (π β 1) β
β0) |
10 | 7 | nnnn0d 12528 |
. . . . . . . . . . . 12
β’ (π β π β
β0) |
11 | 9, 10 | ifcld 4573 |
. . . . . . . . . . 11
β’ (π β if(π½ = 0, (π β 1), π) β
β0) |
12 | 11 | faccld 14240 |
. . . . . . . . . 10
β’ (π β (!βif(π½ = 0, (π β 1), π)) β β) |
13 | 12 | nncnd 12224 |
. . . . . . . . 9
β’ (π β (!βif(π½ = 0, (π β 1), π)) β β) |
14 | 13 | adantr 481 |
. . . . . . . 8
β’ ((π β§ Β¬ if(π½ = 0, (π β 1), π) < π) β (!βif(π½ = 0, (π β 1), π)) β β) |
15 | 11 | nn0zd 12580 |
. . . . . . . . . . . . 13
β’ (π β if(π½ = 0, (π β 1), π) β β€) |
16 | | etransclem20.n |
. . . . . . . . . . . . . 14
β’ (π β π β
β0) |
17 | 16 | nn0zd 12580 |
. . . . . . . . . . . . 13
β’ (π β π β β€) |
18 | 15, 17 | zsubcld 12667 |
. . . . . . . . . . . 12
β’ (π β (if(π½ = 0, (π β 1), π) β π) β β€) |
19 | 18 | adantr 481 |
. . . . . . . . . . 11
β’ ((π β§ Β¬ if(π½ = 0, (π β 1), π) < π) β (if(π½ = 0, (π β 1), π) β π) β β€) |
20 | 16 | nn0red 12529 |
. . . . . . . . . . . . . 14
β’ (π β π β β) |
21 | 20 | adantr 481 |
. . . . . . . . . . . . 13
β’ ((π β§ Β¬ if(π½ = 0, (π β 1), π) < π) β π β β) |
22 | 11 | nn0red 12529 |
. . . . . . . . . . . . . 14
β’ (π β if(π½ = 0, (π β 1), π) β β) |
23 | 22 | adantr 481 |
. . . . . . . . . . . . 13
β’ ((π β§ Β¬ if(π½ = 0, (π β 1), π) < π) β if(π½ = 0, (π β 1), π) β β) |
24 | | simpr 485 |
. . . . . . . . . . . . 13
β’ ((π β§ Β¬ if(π½ = 0, (π β 1), π) < π) β Β¬ if(π½ = 0, (π β 1), π) < π) |
25 | 21, 23, 24 | nltled 11360 |
. . . . . . . . . . . 12
β’ ((π β§ Β¬ if(π½ = 0, (π β 1), π) < π) β π β€ if(π½ = 0, (π β 1), π)) |
26 | 23, 21 | subge0d 11800 |
. . . . . . . . . . . 12
β’ ((π β§ Β¬ if(π½ = 0, (π β 1), π) < π) β (0 β€ (if(π½ = 0, (π β 1), π) β π) β π β€ if(π½ = 0, (π β 1), π))) |
27 | 25, 26 | mpbird 256 |
. . . . . . . . . . 11
β’ ((π β§ Β¬ if(π½ = 0, (π β 1), π) < π) β 0 β€ (if(π½ = 0, (π β 1), π) β π)) |
28 | | elnn0z 12567 |
. . . . . . . . . . 11
β’
((if(π½ = 0, (π β 1), π) β π) β β0 β
((if(π½ = 0, (π β 1), π) β π) β β€ β§ 0 β€ (if(π½ = 0, (π β 1), π) β π))) |
29 | 19, 27, 28 | sylanbrc 583 |
. . . . . . . . . 10
β’ ((π β§ Β¬ if(π½ = 0, (π β 1), π) < π) β (if(π½ = 0, (π β 1), π) β π) β
β0) |
30 | 29 | faccld 14240 |
. . . . . . . . 9
β’ ((π β§ Β¬ if(π½ = 0, (π β 1), π) < π) β (!β(if(π½ = 0, (π β 1), π) β π)) β β) |
31 | 30 | nncnd 12224 |
. . . . . . . 8
β’ ((π β§ Β¬ if(π½ = 0, (π β 1), π) < π) β (!β(if(π½ = 0, (π β 1), π) β π)) β β) |
32 | 30 | nnne0d 12258 |
. . . . . . . 8
β’ ((π β§ Β¬ if(π½ = 0, (π β 1), π) < π) β (!β(if(π½ = 0, (π β 1), π) β π)) β 0) |
33 | 14, 31, 32 | divcld 11986 |
. . . . . . 7
β’ ((π β§ Β¬ if(π½ = 0, (π β 1), π) < π) β ((!βif(π½ = 0, (π β 1), π)) / (!β(if(π½ = 0, (π β 1), π) β π))) β β) |
34 | 33 | adantlr 713 |
. . . . . 6
β’ (((π β§ π₯ β π) β§ Β¬ if(π½ = 0, (π β 1), π) < π) β ((!βif(π½ = 0, (π β 1), π)) / (!β(if(π½ = 0, (π β 1), π) β π))) β β) |
35 | | etransclem20.s |
. . . . . . . . . . 11
β’ (π β π β {β, β}) |
36 | | etransclem20.x |
. . . . . . . . . . 11
β’ (π β π β
((TopOpenββfld) βΎt π)) |
37 | 35, 36 | dvdmsscn 44638 |
. . . . . . . . . 10
β’ (π β π β β) |
38 | 37 | sselda 3981 |
. . . . . . . . 9
β’ ((π β§ π₯ β π) β π₯ β β) |
39 | | etransclem20.J |
. . . . . . . . . . 11
β’ (π β π½ β (0...π)) |
40 | | elfzelz 13497 |
. . . . . . . . . . . 12
β’ (π½ β (0...π) β π½ β β€) |
41 | 40 | zcnd 12663 |
. . . . . . . . . . 11
β’ (π½ β (0...π) β π½ β β) |
42 | 39, 41 | syl 17 |
. . . . . . . . . 10
β’ (π β π½ β β) |
43 | 42 | adantr 481 |
. . . . . . . . 9
β’ ((π β§ π₯ β π) β π½ β β) |
44 | 38, 43 | subcld 11567 |
. . . . . . . 8
β’ ((π β§ π₯ β π) β (π₯ β π½) β β) |
45 | 44 | adantr 481 |
. . . . . . 7
β’ (((π β§ π₯ β π) β§ Β¬ if(π½ = 0, (π β 1), π) < π) β (π₯ β π½) β β) |
46 | 29 | adantlr 713 |
. . . . . . 7
β’ (((π β§ π₯ β π) β§ Β¬ if(π½ = 0, (π β 1), π) < π) β (if(π½ = 0, (π β 1), π) β π) β
β0) |
47 | 45, 46 | expcld 14107 |
. . . . . 6
β’ (((π β§ π₯ β π) β§ Β¬ if(π½ = 0, (π β 1), π) < π) β ((π₯ β π½)β(if(π½ = 0, (π β 1), π) β π)) β β) |
48 | 34, 47 | mulcld 11230 |
. . . . 5
β’ (((π β§ π₯ β π) β§ Β¬ if(π½ = 0, (π β 1), π) < π) β (((!βif(π½ = 0, (π β 1), π)) / (!β(if(π½ = 0, (π β 1), π) β π))) Β· ((π₯ β π½)β(if(π½ = 0, (π β 1), π) β π))) β β) |
49 | 6, 48 | eqeltrd 2833 |
. . . 4
β’ (((π β§ π₯ β π) β§ Β¬ if(π½ = 0, (π β 1), π) < π) β if(if(π½ = 0, (π β 1), π) < π, 0, (((!βif(π½ = 0, (π β 1), π)) / (!β(if(π½ = 0, (π β 1), π) β π))) Β· ((π₯ β π½)β(if(π½ = 0, (π β 1), π) β π)))) β β) |
50 | 4, 49 | pm2.61dan 811 |
. . 3
β’ ((π β§ π₯ β π) β if(if(π½ = 0, (π β 1), π) < π, 0, (((!βif(π½ = 0, (π β 1), π)) / (!β(if(π½ = 0, (π β 1), π) β π))) Β· ((π₯ β π½)β(if(π½ = 0, (π β 1), π) β π)))) β β) |
51 | | eqid 2732 |
. . 3
β’ (π₯ β π β¦ if(if(π½ = 0, (π β 1), π) < π, 0, (((!βif(π½ = 0, (π β 1), π)) / (!β(if(π½ = 0, (π β 1), π) β π))) Β· ((π₯ β π½)β(if(π½ = 0, (π β 1), π) β π))))) = (π₯ β π β¦ if(if(π½ = 0, (π β 1), π) < π, 0, (((!βif(π½ = 0, (π β 1), π)) / (!β(if(π½ = 0, (π β 1), π) β π))) Β· ((π₯ β π½)β(if(π½ = 0, (π β 1), π) β π))))) |
52 | 50, 51 | fmptd 7110 |
. 2
β’ (π β (π₯ β π β¦ if(if(π½ = 0, (π β 1), π) < π, 0, (((!βif(π½ = 0, (π β 1), π)) / (!β(if(π½ = 0, (π β 1), π) β π))) Β· ((π₯ β π½)β(if(π½ = 0, (π β 1), π) β π))))):πβΆβ) |
53 | | etransclem20.h |
. . . 4
β’ π» = (π β (0...π) β¦ (π₯ β π β¦ ((π₯ β π)βif(π = 0, (π β 1), π)))) |
54 | 35, 36, 7, 53, 39, 16 | etransclem17 44953 |
. . 3
β’ (π β ((π Dπ (π»βπ½))βπ) = (π₯ β π β¦ if(if(π½ = 0, (π β 1), π) < π, 0, (((!βif(π½ = 0, (π β 1), π)) / (!β(if(π½ = 0, (π β 1), π) β π))) Β· ((π₯ β π½)β(if(π½ = 0, (π β 1), π) β π)))))) |
55 | 54 | feq1d 6699 |
. 2
β’ (π β (((π Dπ (π»βπ½))βπ):πβΆβ β (π₯ β π β¦ if(if(π½ = 0, (π β 1), π) < π, 0, (((!βif(π½ = 0, (π β 1), π)) / (!β(if(π½ = 0, (π β 1), π) β π))) Β· ((π₯ β π½)β(if(π½ = 0, (π β 1), π) β π))))):πβΆβ)) |
56 | 52, 55 | mpbird 256 |
1
β’ (π β ((π Dπ (π»βπ½))βπ):πβΆβ) |