Step | Hyp | Ref
| Expression |
1 | | qabsabv.a |
. . 3
β’ π΄ = (AbsValβπ) |
2 | 1 | a1i 11 |
. 2
β’ ((π β β β§ π β (0(,)1)) β π΄ = (AbsValβπ)) |
3 | | qrng.q |
. . . 4
β’ π = (βfld
βΎs β) |
4 | 3 | qrngbas 27112 |
. . 3
β’ β =
(Baseβπ) |
5 | 4 | a1i 11 |
. 2
β’ ((π β β β§ π β (0(,)1)) β β
= (Baseβπ)) |
6 | | qex 12942 |
. . 3
β’ β
β V |
7 | | cnfldadd 20942 |
. . . 4
β’ + =
(+gββfld) |
8 | 3, 7 | ressplusg 17232 |
. . 3
β’ (β
β V β + = (+gβπ)) |
9 | 6, 8 | mp1i 13 |
. 2
β’ ((π β β β§ π β (0(,)1)) β + =
(+gβπ)) |
10 | | cnfldmul 20943 |
. . . 4
β’ Β·
= (.rββfld) |
11 | 3, 10 | ressmulr 17249 |
. . 3
β’ (β
β V β Β· = (.rβπ)) |
12 | 6, 11 | mp1i 13 |
. 2
β’ ((π β β β§ π β (0(,)1)) β Β·
= (.rβπ)) |
13 | 3 | qrng0 27114 |
. . 3
β’ 0 =
(0gβπ) |
14 | 13 | a1i 11 |
. 2
β’ ((π β β β§ π β (0(,)1)) β 0 =
(0gβπ)) |
15 | 3 | qdrng 27113 |
. . 3
β’ π β DivRing |
16 | | drngring 20315 |
. . 3
β’ (π β DivRing β π β Ring) |
17 | 15, 16 | mp1i 13 |
. 2
β’ ((π β β β§ π β (0(,)1)) β π β Ring) |
18 | | 0red 11214 |
. . . 4
β’ ((((π β β β§ π β (0(,)1)) β§ π₯ β β) β§ π₯ = 0) β 0 β
β) |
19 | | ioossre 13382 |
. . . . . . 7
β’ (0(,)1)
β β |
20 | | simpr 486 |
. . . . . . 7
β’ ((π β β β§ π β (0(,)1)) β π β
(0(,)1)) |
21 | 19, 20 | sselid 3980 |
. . . . . 6
β’ ((π β β β§ π β (0(,)1)) β π β
β) |
22 | 21 | ad2antrr 725 |
. . . . 5
β’ ((((π β β β§ π β (0(,)1)) β§ π₯ β β) β§ Β¬
π₯ = 0) β π β
β) |
23 | | eliooord 13380 |
. . . . . . . . . 10
β’ (π β (0(,)1) β (0 <
π β§ π < 1)) |
24 | 23 | adantl 483 |
. . . . . . . . 9
β’ ((π β β β§ π β (0(,)1)) β (0 <
π β§ π < 1)) |
25 | 24 | simpld 496 |
. . . . . . . 8
β’ ((π β β β§ π β (0(,)1)) β 0 <
π) |
26 | 21, 25 | elrpd 13010 |
. . . . . . 7
β’ ((π β β β§ π β (0(,)1)) β π β
β+) |
27 | 26 | rpne0d 13018 |
. . . . . 6
β’ ((π β β β§ π β (0(,)1)) β π β 0) |
28 | 27 | ad2antrr 725 |
. . . . 5
β’ ((((π β β β§ π β (0(,)1)) β§ π₯ β β) β§ Β¬
π₯ = 0) β π β 0) |
29 | | df-ne 2942 |
. . . . . 6
β’ (π₯ β 0 β Β¬ π₯ = 0) |
30 | | pcqcl 16786 |
. . . . . . . 8
β’ ((π β β β§ (π₯ β β β§ π₯ β 0)) β (π pCnt π₯) β β€) |
31 | 30 | adantlr 714 |
. . . . . . 7
β’ (((π β β β§ π β (0(,)1)) β§ (π₯ β β β§ π₯ β 0)) β (π pCnt π₯) β β€) |
32 | 31 | anassrs 469 |
. . . . . 6
β’ ((((π β β β§ π β (0(,)1)) β§ π₯ β β) β§ π₯ β 0) β (π pCnt π₯) β β€) |
33 | 29, 32 | sylan2br 596 |
. . . . 5
β’ ((((π β β β§ π β (0(,)1)) β§ π₯ β β) β§ Β¬
π₯ = 0) β (π pCnt π₯) β β€) |
34 | 22, 28, 33 | reexpclzd 14209 |
. . . 4
β’ ((((π β β β§ π β (0(,)1)) β§ π₯ β β) β§ Β¬
π₯ = 0) β (πβ(π pCnt π₯)) β β) |
35 | 18, 34 | ifclda 4563 |
. . 3
β’ (((π β β β§ π β (0(,)1)) β§ π₯ β β) β if(π₯ = 0, 0, (πβ(π pCnt π₯))) β β) |
36 | | padic.f |
. . 3
β’ πΉ = (π₯ β β β¦ if(π₯ = 0, 0, (πβ(π pCnt π₯)))) |
37 | 35, 36 | fmptd 7111 |
. 2
β’ ((π β β β§ π β (0(,)1)) β πΉ:ββΆβ) |
38 | | 0z 12566 |
. . . 4
β’ 0 β
β€ |
39 | | zq 12935 |
. . . 4
β’ (0 β
β€ β 0 β β) |
40 | 38, 39 | ax-mp 5 |
. . 3
β’ 0 β
β |
41 | | iftrue 4534 |
. . . 4
β’ (π₯ = 0 β if(π₯ = 0, 0, (πβ(π pCnt π₯))) = 0) |
42 | | c0ex 11205 |
. . . 4
β’ 0 β
V |
43 | 41, 36, 42 | fvmpt 6996 |
. . 3
β’ (0 β
β β (πΉβ0)
= 0) |
44 | 40, 43 | mp1i 13 |
. 2
β’ ((π β β β§ π β (0(,)1)) β (πΉβ0) = 0) |
45 | 21 | 3ad2ant1 1134 |
. . . 4
β’ (((π β β β§ π β (0(,)1)) β§ π¦ β β β§ π¦ β 0) β π β
β) |
46 | | pcqcl 16786 |
. . . . . 6
β’ ((π β β β§ (π¦ β β β§ π¦ β 0)) β (π pCnt π¦) β β€) |
47 | 46 | adantlr 714 |
. . . . 5
β’ (((π β β β§ π β (0(,)1)) β§ (π¦ β β β§ π¦ β 0)) β (π pCnt π¦) β β€) |
48 | 47 | 3impb 1116 |
. . . 4
β’ (((π β β β§ π β (0(,)1)) β§ π¦ β β β§ π¦ β 0) β (π pCnt π¦) β β€) |
49 | 25 | 3ad2ant1 1134 |
. . . 4
β’ (((π β β β§ π β (0(,)1)) β§ π¦ β β β§ π¦ β 0) β 0 < π) |
50 | | expgt0 14058 |
. . . 4
β’ ((π β β β§ (π pCnt π¦) β β€ β§ 0 < π) β 0 < (πβ(π pCnt π¦))) |
51 | 45, 48, 49, 50 | syl3anc 1372 |
. . 3
β’ (((π β β β§ π β (0(,)1)) β§ π¦ β β β§ π¦ β 0) β 0 < (πβ(π pCnt π¦))) |
52 | | eqeq1 2737 |
. . . . . . 7
β’ (π₯ = π¦ β (π₯ = 0 β π¦ = 0)) |
53 | | oveq2 7414 |
. . . . . . . 8
β’ (π₯ = π¦ β (π pCnt π₯) = (π pCnt π¦)) |
54 | 53 | oveq2d 7422 |
. . . . . . 7
β’ (π₯ = π¦ β (πβ(π pCnt π₯)) = (πβ(π pCnt π¦))) |
55 | 52, 54 | ifbieq2d 4554 |
. . . . . 6
β’ (π₯ = π¦ β if(π₯ = 0, 0, (πβ(π pCnt π₯))) = if(π¦ = 0, 0, (πβ(π pCnt π¦)))) |
56 | | ovex 7439 |
. . . . . . 7
β’ (πβ(π pCnt π¦)) β V |
57 | 42, 56 | ifex 4578 |
. . . . . 6
β’ if(π¦ = 0, 0, (πβ(π pCnt π¦))) β V |
58 | 55, 36, 57 | fvmpt 6996 |
. . . . 5
β’ (π¦ β β β (πΉβπ¦) = if(π¦ = 0, 0, (πβ(π pCnt π¦)))) |
59 | 58 | 3ad2ant2 1135 |
. . . 4
β’ (((π β β β§ π β (0(,)1)) β§ π¦ β β β§ π¦ β 0) β (πΉβπ¦) = if(π¦ = 0, 0, (πβ(π pCnt π¦)))) |
60 | | simp3 1139 |
. . . . . 6
β’ (((π β β β§ π β (0(,)1)) β§ π¦ β β β§ π¦ β 0) β π¦ β 0) |
61 | 60 | neneqd 2946 |
. . . . 5
β’ (((π β β β§ π β (0(,)1)) β§ π¦ β β β§ π¦ β 0) β Β¬ π¦ = 0) |
62 | 61 | iffalsed 4539 |
. . . 4
β’ (((π β β β§ π β (0(,)1)) β§ π¦ β β β§ π¦ β 0) β if(π¦ = 0, 0, (πβ(π pCnt π¦))) = (πβ(π pCnt π¦))) |
63 | 59, 62 | eqtrd 2773 |
. . 3
β’ (((π β β β§ π β (0(,)1)) β§ π¦ β β β§ π¦ β 0) β (πΉβπ¦) = (πβ(π pCnt π¦))) |
64 | 51, 63 | breqtrrd 5176 |
. 2
β’ (((π β β β§ π β (0(,)1)) β§ π¦ β β β§ π¦ β 0) β 0 < (πΉβπ¦)) |
65 | | pcqmul 16783 |
. . . . . 6
β’ ((π β β β§ (π¦ β β β§ π¦ β 0) β§ (π§ β β β§ π§ β 0)) β (π pCnt (π¦ Β· π§)) = ((π pCnt π¦) + (π pCnt π§))) |
66 | 65 | 3adant1r 1178 |
. . . . 5
β’ (((π β β β§ π β (0(,)1)) β§ (π¦ β β β§ π¦ β 0) β§ (π§ β β β§ π§ β 0)) β (π pCnt (π¦ Β· π§)) = ((π pCnt π¦) + (π pCnt π§))) |
67 | 66 | oveq2d 7422 |
. . . 4
β’ (((π β β β§ π β (0(,)1)) β§ (π¦ β β β§ π¦ β 0) β§ (π§ β β β§ π§ β 0)) β (πβ(π pCnt (π¦ Β· π§))) = (πβ((π pCnt π¦) + (π pCnt π§)))) |
68 | 21 | recnd 11239 |
. . . . . 6
β’ ((π β β β§ π β (0(,)1)) β π β
β) |
69 | 68 | 3ad2ant1 1134 |
. . . . 5
β’ (((π β β β§ π β (0(,)1)) β§ (π¦ β β β§ π¦ β 0) β§ (π§ β β β§ π§ β 0)) β π β
β) |
70 | 27 | 3ad2ant1 1134 |
. . . . 5
β’ (((π β β β§ π β (0(,)1)) β§ (π¦ β β β§ π¦ β 0) β§ (π§ β β β§ π§ β 0)) β π β 0) |
71 | 47 | 3adant3 1133 |
. . . . 5
β’ (((π β β β§ π β (0(,)1)) β§ (π¦ β β β§ π¦ β 0) β§ (π§ β β β§ π§ β 0)) β (π pCnt π¦) β β€) |
72 | | simp1l 1198 |
. . . . . 6
β’ (((π β β β§ π β (0(,)1)) β§ (π¦ β β β§ π¦ β 0) β§ (π§ β β β§ π§ β 0)) β π β
β) |
73 | | simp3l 1202 |
. . . . . 6
β’ (((π β β β§ π β (0(,)1)) β§ (π¦ β β β§ π¦ β 0) β§ (π§ β β β§ π§ β 0)) β π§ β
β) |
74 | | simp3r 1203 |
. . . . . 6
β’ (((π β β β§ π β (0(,)1)) β§ (π¦ β β β§ π¦ β 0) β§ (π§ β β β§ π§ β 0)) β π§ β 0) |
75 | | pcqcl 16786 |
. . . . . 6
β’ ((π β β β§ (π§ β β β§ π§ β 0)) β (π pCnt π§) β β€) |
76 | 72, 73, 74, 75 | syl12anc 836 |
. . . . 5
β’ (((π β β β§ π β (0(,)1)) β§ (π¦ β β β§ π¦ β 0) β§ (π§ β β β§ π§ β 0)) β (π pCnt π§) β β€) |
77 | | expaddz 14069 |
. . . . 5
β’ (((π β β β§ π β 0) β§ ((π pCnt π¦) β β€ β§ (π pCnt π§) β β€)) β (πβ((π pCnt π¦) + (π pCnt π§))) = ((πβ(π pCnt π¦)) Β· (πβ(π pCnt π§)))) |
78 | 69, 70, 71, 76, 77 | syl22anc 838 |
. . . 4
β’ (((π β β β§ π β (0(,)1)) β§ (π¦ β β β§ π¦ β 0) β§ (π§ β β β§ π§ β 0)) β (πβ((π pCnt π¦) + (π pCnt π§))) = ((πβ(π pCnt π¦)) Β· (πβ(π pCnt π§)))) |
79 | 67, 78 | eqtrd 2773 |
. . 3
β’ (((π β β β§ π β (0(,)1)) β§ (π¦ β β β§ π¦ β 0) β§ (π§ β β β§ π§ β 0)) β (πβ(π pCnt (π¦ Β· π§))) = ((πβ(π pCnt π¦)) Β· (πβ(π pCnt π§)))) |
80 | | simp2l 1200 |
. . . . . 6
β’ (((π β β β§ π β (0(,)1)) β§ (π¦ β β β§ π¦ β 0) β§ (π§ β β β§ π§ β 0)) β π¦ β
β) |
81 | | qmulcl 12948 |
. . . . . 6
β’ ((π¦ β β β§ π§ β β) β (π¦ Β· π§) β β) |
82 | 80, 73, 81 | syl2anc 585 |
. . . . 5
β’ (((π β β β§ π β (0(,)1)) β§ (π¦ β β β§ π¦ β 0) β§ (π§ β β β§ π§ β 0)) β (π¦ Β· π§) β β) |
83 | | eqeq1 2737 |
. . . . . . 7
β’ (π₯ = (π¦ Β· π§) β (π₯ = 0 β (π¦ Β· π§) = 0)) |
84 | | oveq2 7414 |
. . . . . . . 8
β’ (π₯ = (π¦ Β· π§) β (π pCnt π₯) = (π pCnt (π¦ Β· π§))) |
85 | 84 | oveq2d 7422 |
. . . . . . 7
β’ (π₯ = (π¦ Β· π§) β (πβ(π pCnt π₯)) = (πβ(π pCnt (π¦ Β· π§)))) |
86 | 83, 85 | ifbieq2d 4554 |
. . . . . 6
β’ (π₯ = (π¦ Β· π§) β if(π₯ = 0, 0, (πβ(π pCnt π₯))) = if((π¦ Β· π§) = 0, 0, (πβ(π pCnt (π¦ Β· π§))))) |
87 | | ovex 7439 |
. . . . . . 7
β’ (πβ(π pCnt (π¦ Β· π§))) β V |
88 | 42, 87 | ifex 4578 |
. . . . . 6
β’ if((π¦ Β· π§) = 0, 0, (πβ(π pCnt (π¦ Β· π§)))) β V |
89 | 86, 36, 88 | fvmpt 6996 |
. . . . 5
β’ ((π¦ Β· π§) β β β (πΉβ(π¦ Β· π§)) = if((π¦ Β· π§) = 0, 0, (πβ(π pCnt (π¦ Β· π§))))) |
90 | 82, 89 | syl 17 |
. . . 4
β’ (((π β β β§ π β (0(,)1)) β§ (π¦ β β β§ π¦ β 0) β§ (π§ β β β§ π§ β 0)) β (πΉβ(π¦ Β· π§)) = if((π¦ Β· π§) = 0, 0, (πβ(π pCnt (π¦ Β· π§))))) |
91 | | qcn 12944 |
. . . . . . . 8
β’ (π¦ β β β π¦ β
β) |
92 | 80, 91 | syl 17 |
. . . . . . 7
β’ (((π β β β§ π β (0(,)1)) β§ (π¦ β β β§ π¦ β 0) β§ (π§ β β β§ π§ β 0)) β π¦ β
β) |
93 | | qcn 12944 |
. . . . . . . 8
β’ (π§ β β β π§ β
β) |
94 | 73, 93 | syl 17 |
. . . . . . 7
β’ (((π β β β§ π β (0(,)1)) β§ (π¦ β β β§ π¦ β 0) β§ (π§ β β β§ π§ β 0)) β π§ β
β) |
95 | | simp2r 1201 |
. . . . . . 7
β’ (((π β β β§ π β (0(,)1)) β§ (π¦ β β β§ π¦ β 0) β§ (π§ β β β§ π§ β 0)) β π¦ β 0) |
96 | 92, 94, 95, 74 | mulne0d 11863 |
. . . . . 6
β’ (((π β β β§ π β (0(,)1)) β§ (π¦ β β β§ π¦ β 0) β§ (π§ β β β§ π§ β 0)) β (π¦ Β· π§) β 0) |
97 | 96 | neneqd 2946 |
. . . . 5
β’ (((π β β β§ π β (0(,)1)) β§ (π¦ β β β§ π¦ β 0) β§ (π§ β β β§ π§ β 0)) β Β¬ (π¦ Β· π§) = 0) |
98 | 97 | iffalsed 4539 |
. . . 4
β’ (((π β β β§ π β (0(,)1)) β§ (π¦ β β β§ π¦ β 0) β§ (π§ β β β§ π§ β 0)) β if((π¦ Β· π§) = 0, 0, (πβ(π pCnt (π¦ Β· π§)))) = (πβ(π pCnt (π¦ Β· π§)))) |
99 | 90, 98 | eqtrd 2773 |
. . 3
β’ (((π β β β§ π β (0(,)1)) β§ (π¦ β β β§ π¦ β 0) β§ (π§ β β β§ π§ β 0)) β (πΉβ(π¦ Β· π§)) = (πβ(π pCnt (π¦ Β· π§)))) |
100 | 63 | 3expb 1121 |
. . . . 5
β’ (((π β β β§ π β (0(,)1)) β§ (π¦ β β β§ π¦ β 0)) β (πΉβπ¦) = (πβ(π pCnt π¦))) |
101 | 100 | 3adant3 1133 |
. . . 4
β’ (((π β β β§ π β (0(,)1)) β§ (π¦ β β β§ π¦ β 0) β§ (π§ β β β§ π§ β 0)) β (πΉβπ¦) = (πβ(π pCnt π¦))) |
102 | | eqeq1 2737 |
. . . . . . . 8
β’ (π₯ = π§ β (π₯ = 0 β π§ = 0)) |
103 | | oveq2 7414 |
. . . . . . . . 9
β’ (π₯ = π§ β (π pCnt π₯) = (π pCnt π§)) |
104 | 103 | oveq2d 7422 |
. . . . . . . 8
β’ (π₯ = π§ β (πβ(π pCnt π₯)) = (πβ(π pCnt π§))) |
105 | 102, 104 | ifbieq2d 4554 |
. . . . . . 7
β’ (π₯ = π§ β if(π₯ = 0, 0, (πβ(π pCnt π₯))) = if(π§ = 0, 0, (πβ(π pCnt π§)))) |
106 | | ovex 7439 |
. . . . . . . 8
β’ (πβ(π pCnt π§)) β V |
107 | 42, 106 | ifex 4578 |
. . . . . . 7
β’ if(π§ = 0, 0, (πβ(π pCnt π§))) β V |
108 | 105, 36, 107 | fvmpt 6996 |
. . . . . 6
β’ (π§ β β β (πΉβπ§) = if(π§ = 0, 0, (πβ(π pCnt π§)))) |
109 | 73, 108 | syl 17 |
. . . . 5
β’ (((π β β β§ π β (0(,)1)) β§ (π¦ β β β§ π¦ β 0) β§ (π§ β β β§ π§ β 0)) β (πΉβπ§) = if(π§ = 0, 0, (πβ(π pCnt π§)))) |
110 | 74 | neneqd 2946 |
. . . . . 6
β’ (((π β β β§ π β (0(,)1)) β§ (π¦ β β β§ π¦ β 0) β§ (π§ β β β§ π§ β 0)) β Β¬ π§ = 0) |
111 | 110 | iffalsed 4539 |
. . . . 5
β’ (((π β β β§ π β (0(,)1)) β§ (π¦ β β β§ π¦ β 0) β§ (π§ β β β§ π§ β 0)) β if(π§ = 0, 0, (πβ(π pCnt π§))) = (πβ(π pCnt π§))) |
112 | 109, 111 | eqtrd 2773 |
. . . 4
β’ (((π β β β§ π β (0(,)1)) β§ (π¦ β β β§ π¦ β 0) β§ (π§ β β β§ π§ β 0)) β (πΉβπ§) = (πβ(π pCnt π§))) |
113 | 101, 112 | oveq12d 7424 |
. . 3
β’ (((π β β β§ π β (0(,)1)) β§ (π¦ β β β§ π¦ β 0) β§ (π§ β β β§ π§ β 0)) β ((πΉβπ¦) Β· (πΉβπ§)) = ((πβ(π pCnt π¦)) Β· (πβ(π pCnt π§)))) |
114 | 79, 99, 113 | 3eqtr4d 2783 |
. 2
β’ (((π β β β§ π β (0(,)1)) β§ (π¦ β β β§ π¦ β 0) β§ (π§ β β β§ π§ β 0)) β (πΉβ(π¦ Β· π§)) = ((πΉβπ¦) Β· (πΉβπ§))) |
115 | | iftrue 4534 |
. . . . 5
β’ ((π¦ + π§) = 0 β if((π¦ + π§) = 0, 0, (πβ(π pCnt (π¦ + π§)))) = 0) |
116 | 115 | breq1d 5158 |
. . . 4
β’ ((π¦ + π§) = 0 β (if((π¦ + π§) = 0, 0, (πβ(π pCnt (π¦ + π§)))) β€ ((πβ(π pCnt π¦)) + (πβ(π pCnt π§))) β 0 β€ ((πβ(π pCnt π¦)) + (πβ(π pCnt π§))))) |
117 | | ifnefalse 4540 |
. . . . . 6
β’ ((π¦ + π§) β 0 β if((π¦ + π§) = 0, 0, (πβ(π pCnt (π¦ + π§)))) = (πβ(π pCnt (π¦ + π§)))) |
118 | 117 | adantl 483 |
. . . . 5
β’ ((((π β β β§ π β (0(,)1)) β§ (π¦ β β β§ π¦ β 0) β§ (π§ β β β§ π§ β 0)) β§ (π¦ + π§) β 0) β if((π¦ + π§) = 0, 0, (πβ(π pCnt (π¦ + π§)))) = (πβ(π pCnt (π¦ + π§)))) |
119 | 71 | adantr 482 |
. . . . . . 7
β’ ((((π β β β§ π β (0(,)1)) β§ (π¦ β β β§ π¦ β 0) β§ (π§ β β β§ π§ β 0)) β§ (π¦ + π§) β 0) β (π pCnt π¦) β β€) |
120 | 119 | zred 12663 |
. . . . . 6
β’ ((((π β β β§ π β (0(,)1)) β§ (π¦ β β β§ π¦ β 0) β§ (π§ β β β§ π§ β 0)) β§ (π¦ + π§) β 0) β (π pCnt π¦) β β) |
121 | 76 | adantr 482 |
. . . . . . 7
β’ ((((π β β β§ π β (0(,)1)) β§ (π¦ β β β§ π¦ β 0) β§ (π§ β β β§ π§ β 0)) β§ (π¦ + π§) β 0) β (π pCnt π§) β β€) |
122 | 121 | zred 12663 |
. . . . . 6
β’ ((((π β β β§ π β (0(,)1)) β§ (π¦ β β β§ π¦ β 0) β§ (π§ β β β§ π§ β 0)) β§ (π¦ + π§) β 0) β (π pCnt π§) β β) |
123 | 21 | 3ad2ant1 1134 |
. . . . . . . . 9
β’ (((π β β β§ π β (0(,)1)) β§ (π¦ β β β§ π¦ β 0) β§ (π§ β β β§ π§ β 0)) β π β
β) |
124 | 123 | ad2antrr 725 |
. . . . . . . 8
β’
(((((π β
β β§ π β
(0(,)1)) β§ (π¦ β
β β§ π¦ β 0)
β§ (π§ β β
β§ π§ β 0)) β§
(π¦ + π§) β 0) β§ (π pCnt π¦) β€ (π pCnt π§)) β π β β) |
125 | 70 | ad2antrr 725 |
. . . . . . . 8
β’
(((((π β
β β§ π β
(0(,)1)) β§ (π¦ β
β β§ π¦ β 0)
β§ (π§ β β
β§ π§ β 0)) β§
(π¦ + π§) β 0) β§ (π pCnt π¦) β€ (π pCnt π§)) β π β 0) |
126 | 72 | adantr 482 |
. . . . . . . . . 10
β’ ((((π β β β§ π β (0(,)1)) β§ (π¦ β β β§ π¦ β 0) β§ (π§ β β β§ π§ β 0)) β§ (π¦ + π§) β 0) β π β β) |
127 | | qaddcl 12946 |
. . . . . . . . . . . 12
β’ ((π¦ β β β§ π§ β β) β (π¦ + π§) β β) |
128 | 80, 73, 127 | syl2anc 585 |
. . . . . . . . . . 11
β’ (((π β β β§ π β (0(,)1)) β§ (π¦ β β β§ π¦ β 0) β§ (π§ β β β§ π§ β 0)) β (π¦ + π§) β β) |
129 | 128 | adantr 482 |
. . . . . . . . . 10
β’ ((((π β β β§ π β (0(,)1)) β§ (π¦ β β β§ π¦ β 0) β§ (π§ β β β§ π§ β 0)) β§ (π¦ + π§) β 0) β (π¦ + π§) β β) |
130 | | simpr 486 |
. . . . . . . . . 10
β’ ((((π β β β§ π β (0(,)1)) β§ (π¦ β β β§ π¦ β 0) β§ (π§ β β β§ π§ β 0)) β§ (π¦ + π§) β 0) β (π¦ + π§) β 0) |
131 | | pcqcl 16786 |
. . . . . . . . . 10
β’ ((π β β β§ ((π¦ + π§) β β β§ (π¦ + π§) β 0)) β (π pCnt (π¦ + π§)) β β€) |
132 | 126, 129,
130, 131 | syl12anc 836 |
. . . . . . . . 9
β’ ((((π β β β§ π β (0(,)1)) β§ (π¦ β β β§ π¦ β 0) β§ (π§ β β β§ π§ β 0)) β§ (π¦ + π§) β 0) β (π pCnt (π¦ + π§)) β β€) |
133 | 132 | adantr 482 |
. . . . . . . 8
β’
(((((π β
β β§ π β
(0(,)1)) β§ (π¦ β
β β§ π¦ β 0)
β§ (π§ β β
β§ π§ β 0)) β§
(π¦ + π§) β 0) β§ (π pCnt π¦) β€ (π pCnt π§)) β (π pCnt (π¦ + π§)) β β€) |
134 | 124, 125,
133 | reexpclzd 14209 |
. . . . . . 7
β’
(((((π β
β β§ π β
(0(,)1)) β§ (π¦ β
β β§ π¦ β 0)
β§ (π§ β β
β§ π§ β 0)) β§
(π¦ + π§) β 0) β§ (π pCnt π¦) β€ (π pCnt π§)) β (πβ(π pCnt (π¦ + π§))) β β) |
135 | 119 | adantr 482 |
. . . . . . . 8
β’
(((((π β
β β§ π β
(0(,)1)) β§ (π¦ β
β β§ π¦ β 0)
β§ (π§ β β
β§ π§ β 0)) β§
(π¦ + π§) β 0) β§ (π pCnt π¦) β€ (π pCnt π§)) β (π pCnt π¦) β β€) |
136 | 124, 125,
135 | reexpclzd 14209 |
. . . . . . 7
β’
(((((π β
β β§ π β
(0(,)1)) β§ (π¦ β
β β§ π¦ β 0)
β§ (π§ β β
β§ π§ β 0)) β§
(π¦ + π§) β 0) β§ (π pCnt π¦) β€ (π pCnt π§)) β (πβ(π pCnt π¦)) β β) |
137 | | simpl1 1192 |
. . . . . . . . . . 11
β’ ((((π β β β§ π β (0(,)1)) β§ (π¦ β β β§ π¦ β 0) β§ (π§ β β β§ π§ β 0)) β§ (π¦ + π§) β 0) β (π β β β§ π β (0(,)1))) |
138 | 137, 21 | syl 17 |
. . . . . . . . . 10
β’ ((((π β β β§ π β (0(,)1)) β§ (π¦ β β β§ π¦ β 0) β§ (π§ β β β§ π§ β 0)) β§ (π¦ + π§) β 0) β π β β) |
139 | 137, 27 | syl 17 |
. . . . . . . . . 10
β’ ((((π β β β§ π β (0(,)1)) β§ (π¦ β β β§ π¦ β 0) β§ (π§ β β β§ π§ β 0)) β§ (π¦ + π§) β 0) β π β 0) |
140 | 138, 139,
119 | reexpclzd 14209 |
. . . . . . . . 9
β’ ((((π β β β§ π β (0(,)1)) β§ (π¦ β β β§ π¦ β 0) β§ (π§ β β β§ π§ β 0)) β§ (π¦ + π§) β 0) β (πβ(π pCnt π¦)) β β) |
141 | 138, 139,
121 | reexpclzd 14209 |
. . . . . . . . 9
β’ ((((π β β β§ π β (0(,)1)) β§ (π¦ β β β§ π¦ β 0) β§ (π§ β β β§ π§ β 0)) β§ (π¦ + π§) β 0) β (πβ(π pCnt π§)) β β) |
142 | 140, 141 | readdcld 11240 |
. . . . . . . 8
β’ ((((π β β β§ π β (0(,)1)) β§ (π¦ β β β§ π¦ β 0) β§ (π§ β β β§ π§ β 0)) β§ (π¦ + π§) β 0) β ((πβ(π pCnt π¦)) + (πβ(π pCnt π§))) β β) |
143 | 142 | adantr 482 |
. . . . . . 7
β’
(((((π β
β β§ π β
(0(,)1)) β§ (π¦ β
β β§ π¦ β 0)
β§ (π§ β β
β§ π§ β 0)) β§
(π¦ + π§) β 0) β§ (π pCnt π¦) β€ (π pCnt π§)) β ((πβ(π pCnt π¦)) + (πβ(π pCnt π§))) β β) |
144 | 126 | adantr 482 |
. . . . . . . . 9
β’
(((((π β
β β§ π β
(0(,)1)) β§ (π¦ β
β β§ π¦ β 0)
β§ (π§ β β
β§ π§ β 0)) β§
(π¦ + π§) β 0) β§ (π pCnt π¦) β€ (π pCnt π§)) β π β β) |
145 | 80 | ad2antrr 725 |
. . . . . . . . 9
β’
(((((π β
β β§ π β
(0(,)1)) β§ (π¦ β
β β§ π¦ β 0)
β§ (π§ β β
β§ π§ β 0)) β§
(π¦ + π§) β 0) β§ (π pCnt π¦) β€ (π pCnt π§)) β π¦ β β) |
146 | 73 | ad2antrr 725 |
. . . . . . . . 9
β’
(((((π β
β β§ π β
(0(,)1)) β§ (π¦ β
β β§ π¦ β 0)
β§ (π§ β β
β§ π§ β 0)) β§
(π¦ + π§) β 0) β§ (π pCnt π¦) β€ (π pCnt π§)) β π§ β β) |
147 | | simpr 486 |
. . . . . . . . 9
β’
(((((π β
β β§ π β
(0(,)1)) β§ (π¦ β
β β§ π¦ β 0)
β§ (π§ β β
β§ π§ β 0)) β§
(π¦ + π§) β 0) β§ (π pCnt π¦) β€ (π pCnt π§)) β (π pCnt π¦) β€ (π pCnt π§)) |
148 | 144, 145,
146, 147 | pcadd 16819 |
. . . . . . . 8
β’
(((((π β
β β§ π β
(0(,)1)) β§ (π¦ β
β β§ π¦ β 0)
β§ (π§ β β
β§ π§ β 0)) β§
(π¦ + π§) β 0) β§ (π pCnt π¦) β€ (π pCnt π§)) β (π pCnt π¦) β€ (π pCnt (π¦ + π§))) |
149 | 137, 26 | syl 17 |
. . . . . . . . . . . 12
β’ ((((π β β β§ π β (0(,)1)) β§ (π¦ β β β§ π¦ β 0) β§ (π§ β β β§ π§ β 0)) β§ (π¦ + π§) β 0) β π β
β+) |
150 | 24 | simprd 497 |
. . . . . . . . . . . . 13
β’ ((π β β β§ π β (0(,)1)) β π < 1) |
151 | 137, 150 | syl 17 |
. . . . . . . . . . . 12
β’ ((((π β β β§ π β (0(,)1)) β§ (π¦ β β β§ π¦ β 0) β§ (π§ β β β§ π§ β 0)) β§ (π¦ + π§) β 0) β π < 1) |
152 | 149, 119,
132, 151 | ltexp2rd 14208 |
. . . . . . . . . . 11
β’ ((((π β β β§ π β (0(,)1)) β§ (π¦ β β β§ π¦ β 0) β§ (π§ β β β§ π§ β 0)) β§ (π¦ + π§) β 0) β ((π pCnt (π¦ + π§)) < (π pCnt π¦) β (πβ(π pCnt π¦)) < (πβ(π pCnt (π¦ + π§))))) |
153 | 152 | notbid 318 |
. . . . . . . . . 10
β’ ((((π β β β§ π β (0(,)1)) β§ (π¦ β β β§ π¦ β 0) β§ (π§ β β β§ π§ β 0)) β§ (π¦ + π§) β 0) β (Β¬ (π pCnt (π¦ + π§)) < (π pCnt π¦) β Β¬ (πβ(π pCnt π¦)) < (πβ(π pCnt (π¦ + π§))))) |
154 | 132 | zred 12663 |
. . . . . . . . . . 11
β’ ((((π β β β§ π β (0(,)1)) β§ (π¦ β β β§ π¦ β 0) β§ (π§ β β β§ π§ β 0)) β§ (π¦ + π§) β 0) β (π pCnt (π¦ + π§)) β β) |
155 | 120, 154 | lenltd 11357 |
. . . . . . . . . 10
β’ ((((π β β β§ π β (0(,)1)) β§ (π¦ β β β§ π¦ β 0) β§ (π§ β β β§ π§ β 0)) β§ (π¦ + π§) β 0) β ((π pCnt π¦) β€ (π pCnt (π¦ + π§)) β Β¬ (π pCnt (π¦ + π§)) < (π pCnt π¦))) |
156 | 138, 139,
132 | reexpclzd 14209 |
. . . . . . . . . . 11
β’ ((((π β β β§ π β (0(,)1)) β§ (π¦ β β β§ π¦ β 0) β§ (π§ β β β§ π§ β 0)) β§ (π¦ + π§) β 0) β (πβ(π pCnt (π¦ + π§))) β β) |
157 | 156, 140 | lenltd 11357 |
. . . . . . . . . 10
β’ ((((π β β β§ π β (0(,)1)) β§ (π¦ β β β§ π¦ β 0) β§ (π§ β β β§ π§ β 0)) β§ (π¦ + π§) β 0) β ((πβ(π pCnt (π¦ + π§))) β€ (πβ(π pCnt π¦)) β Β¬ (πβ(π pCnt π¦)) < (πβ(π pCnt (π¦ + π§))))) |
158 | 153, 155,
157 | 3bitr4d 311 |
. . . . . . . . 9
β’ ((((π β β β§ π β (0(,)1)) β§ (π¦ β β β§ π¦ β 0) β§ (π§ β β β§ π§ β 0)) β§ (π¦ + π§) β 0) β ((π pCnt π¦) β€ (π pCnt (π¦ + π§)) β (πβ(π pCnt (π¦ + π§))) β€ (πβ(π pCnt π¦)))) |
159 | 158 | biimpa 478 |
. . . . . . . 8
β’
(((((π β
β β§ π β
(0(,)1)) β§ (π¦ β
β β§ π¦ β 0)
β§ (π§ β β
β§ π§ β 0)) β§
(π¦ + π§) β 0) β§ (π pCnt π¦) β€ (π pCnt (π¦ + π§))) β (πβ(π pCnt (π¦ + π§))) β€ (πβ(π pCnt π¦))) |
160 | 148, 159 | syldan 592 |
. . . . . . 7
β’
(((((π β
β β§ π β
(0(,)1)) β§ (π¦ β
β β§ π¦ β 0)
β§ (π§ β β
β§ π§ β 0)) β§
(π¦ + π§) β 0) β§ (π pCnt π¦) β€ (π pCnt π§)) β (πβ(π pCnt (π¦ + π§))) β€ (πβ(π pCnt π¦))) |
161 | 26 | 3ad2ant1 1134 |
. . . . . . . . . . . 12
β’ (((π β β β§ π β (0(,)1)) β§ (π¦ β β β§ π¦ β 0) β§ (π§ β β β§ π§ β 0)) β π β
β+) |
162 | 161, 76 | rpexpcld 14207 |
. . . . . . . . . . 11
β’ (((π β β β§ π β (0(,)1)) β§ (π¦ β β β§ π¦ β 0) β§ (π§ β β β§ π§ β 0)) β (πβ(π pCnt π§)) β
β+) |
163 | 162 | adantr 482 |
. . . . . . . . . 10
β’ ((((π β β β§ π β (0(,)1)) β§ (π¦ β β β§ π¦ β 0) β§ (π§ β β β§ π§ β 0)) β§ (π¦ + π§) β 0) β (πβ(π pCnt π§)) β
β+) |
164 | 163 | rpge0d 13017 |
. . . . . . . . 9
β’ ((((π β β β§ π β (0(,)1)) β§ (π¦ β β β§ π¦ β 0) β§ (π§ β β β§ π§ β 0)) β§ (π¦ + π§) β 0) β 0 β€ (πβ(π pCnt π§))) |
165 | 140, 141 | addge01d 11799 |
. . . . . . . . 9
β’ ((((π β β β§ π β (0(,)1)) β§ (π¦ β β β§ π¦ β 0) β§ (π§ β β β§ π§ β 0)) β§ (π¦ + π§) β 0) β (0 β€ (πβ(π pCnt π§)) β (πβ(π pCnt π¦)) β€ ((πβ(π pCnt π¦)) + (πβ(π pCnt π§))))) |
166 | 164, 165 | mpbid 231 |
. . . . . . . 8
β’ ((((π β β β§ π β (0(,)1)) β§ (π¦ β β β§ π¦ β 0) β§ (π§ β β β§ π§ β 0)) β§ (π¦ + π§) β 0) β (πβ(π pCnt π¦)) β€ ((πβ(π pCnt π¦)) + (πβ(π pCnt π§)))) |
167 | 166 | adantr 482 |
. . . . . . 7
β’
(((((π β
β β§ π β
(0(,)1)) β§ (π¦ β
β β§ π¦ β 0)
β§ (π§ β β
β§ π§ β 0)) β§
(π¦ + π§) β 0) β§ (π pCnt π¦) β€ (π pCnt π§)) β (πβ(π pCnt π¦)) β€ ((πβ(π pCnt π¦)) + (πβ(π pCnt π§)))) |
168 | 134, 136,
143, 160, 167 | letrd 11368 |
. . . . . 6
β’
(((((π β
β β§ π β
(0(,)1)) β§ (π¦ β
β β§ π¦ β 0)
β§ (π§ β β
β§ π§ β 0)) β§
(π¦ + π§) β 0) β§ (π pCnt π¦) β€ (π pCnt π§)) β (πβ(π pCnt (π¦ + π§))) β€ ((πβ(π pCnt π¦)) + (πβ(π pCnt π§)))) |
169 | 156 | adantr 482 |
. . . . . . 7
β’
(((((π β
β β§ π β
(0(,)1)) β§ (π¦ β
β β§ π¦ β 0)
β§ (π§ β β
β§ π§ β 0)) β§
(π¦ + π§) β 0) β§ (π pCnt π§) β€ (π pCnt π¦)) β (πβ(π pCnt (π¦ + π§))) β β) |
170 | 141 | adantr 482 |
. . . . . . 7
β’
(((((π β
β β§ π β
(0(,)1)) β§ (π¦ β
β β§ π¦ β 0)
β§ (π§ β β
β§ π§ β 0)) β§
(π¦ + π§) β 0) β§ (π pCnt π§) β€ (π pCnt π¦)) β (πβ(π pCnt π§)) β β) |
171 | 142 | adantr 482 |
. . . . . . 7
β’
(((((π β
β β§ π β
(0(,)1)) β§ (π¦ β
β β§ π¦ β 0)
β§ (π§ β β
β§ π§ β 0)) β§
(π¦ + π§) β 0) β§ (π pCnt π§) β€ (π pCnt π¦)) β ((πβ(π pCnt π¦)) + (πβ(π pCnt π§))) β β) |
172 | 126 | adantr 482 |
. . . . . . . . . 10
β’
(((((π β
β β§ π β
(0(,)1)) β§ (π¦ β
β β§ π¦ β 0)
β§ (π§ β β
β§ π§ β 0)) β§
(π¦ + π§) β 0) β§ (π pCnt π§) β€ (π pCnt π¦)) β π β β) |
173 | 73 | ad2antrr 725 |
. . . . . . . . . 10
β’
(((((π β
β β§ π β
(0(,)1)) β§ (π¦ β
β β§ π¦ β 0)
β§ (π§ β β
β§ π§ β 0)) β§
(π¦ + π§) β 0) β§ (π pCnt π§) β€ (π pCnt π¦)) β π§ β β) |
174 | 80 | ad2antrr 725 |
. . . . . . . . . 10
β’
(((((π β
β β§ π β
(0(,)1)) β§ (π¦ β
β β§ π¦ β 0)
β§ (π§ β β
β§ π§ β 0)) β§
(π¦ + π§) β 0) β§ (π pCnt π§) β€ (π pCnt π¦)) β π¦ β β) |
175 | | simpr 486 |
. . . . . . . . . 10
β’
(((((π β
β β§ π β
(0(,)1)) β§ (π¦ β
β β§ π¦ β 0)
β§ (π§ β β
β§ π§ β 0)) β§
(π¦ + π§) β 0) β§ (π pCnt π§) β€ (π pCnt π¦)) β (π pCnt π§) β€ (π pCnt π¦)) |
176 | 172, 173,
174, 175 | pcadd 16819 |
. . . . . . . . 9
β’
(((((π β
β β§ π β
(0(,)1)) β§ (π¦ β
β β§ π¦ β 0)
β§ (π§ β β
β§ π§ β 0)) β§
(π¦ + π§) β 0) β§ (π pCnt π§) β€ (π pCnt π¦)) β (π pCnt π§) β€ (π pCnt (π§ + π¦))) |
177 | 92, 94 | addcomd 11413 |
. . . . . . . . . . 11
β’ (((π β β β§ π β (0(,)1)) β§ (π¦ β β β§ π¦ β 0) β§ (π§ β β β§ π§ β 0)) β (π¦ + π§) = (π§ + π¦)) |
178 | 177 | oveq2d 7422 |
. . . . . . . . . 10
β’ (((π β β β§ π β (0(,)1)) β§ (π¦ β β β§ π¦ β 0) β§ (π§ β β β§ π§ β 0)) β (π pCnt (π¦ + π§)) = (π pCnt (π§ + π¦))) |
179 | 178 | ad2antrr 725 |
. . . . . . . . 9
β’
(((((π β
β β§ π β
(0(,)1)) β§ (π¦ β
β β§ π¦ β 0)
β§ (π§ β β
β§ π§ β 0)) β§
(π¦ + π§) β 0) β§ (π pCnt π§) β€ (π pCnt π¦)) β (π pCnt (π¦ + π§)) = (π pCnt (π§ + π¦))) |
180 | 176, 179 | breqtrrd 5176 |
. . . . . . . 8
β’
(((((π β
β β§ π β
(0(,)1)) β§ (π¦ β
β β§ π¦ β 0)
β§ (π§ β β
β§ π§ β 0)) β§
(π¦ + π§) β 0) β§ (π pCnt π§) β€ (π pCnt π¦)) β (π pCnt π§) β€ (π pCnt (π¦ + π§))) |
181 | 149, 121,
132, 151 | ltexp2rd 14208 |
. . . . . . . . . . 11
β’ ((((π β β β§ π β (0(,)1)) β§ (π¦ β β β§ π¦ β 0) β§ (π§ β β β§ π§ β 0)) β§ (π¦ + π§) β 0) β ((π pCnt (π¦ + π§)) < (π pCnt π§) β (πβ(π pCnt π§)) < (πβ(π pCnt (π¦ + π§))))) |
182 | 181 | notbid 318 |
. . . . . . . . . 10
β’ ((((π β β β§ π β (0(,)1)) β§ (π¦ β β β§ π¦ β 0) β§ (π§ β β β§ π§ β 0)) β§ (π¦ + π§) β 0) β (Β¬ (π pCnt (π¦ + π§)) < (π pCnt π§) β Β¬ (πβ(π pCnt π§)) < (πβ(π pCnt (π¦ + π§))))) |
183 | 122, 154 | lenltd 11357 |
. . . . . . . . . 10
β’ ((((π β β β§ π β (0(,)1)) β§ (π¦ β β β§ π¦ β 0) β§ (π§ β β β§ π§ β 0)) β§ (π¦ + π§) β 0) β ((π pCnt π§) β€ (π pCnt (π¦ + π§)) β Β¬ (π pCnt (π¦ + π§)) < (π pCnt π§))) |
184 | 156, 141 | lenltd 11357 |
. . . . . . . . . 10
β’ ((((π β β β§ π β (0(,)1)) β§ (π¦ β β β§ π¦ β 0) β§ (π§ β β β§ π§ β 0)) β§ (π¦ + π§) β 0) β ((πβ(π pCnt (π¦ + π§))) β€ (πβ(π pCnt π§)) β Β¬ (πβ(π pCnt π§)) < (πβ(π pCnt (π¦ + π§))))) |
185 | 182, 183,
184 | 3bitr4d 311 |
. . . . . . . . 9
β’ ((((π β β β§ π β (0(,)1)) β§ (π¦ β β β§ π¦ β 0) β§ (π§ β β β§ π§ β 0)) β§ (π¦ + π§) β 0) β ((π pCnt π§) β€ (π pCnt (π¦ + π§)) β (πβ(π pCnt (π¦ + π§))) β€ (πβ(π pCnt π§)))) |
186 | 185 | biimpa 478 |
. . . . . . . 8
β’
(((((π β
β β§ π β
(0(,)1)) β§ (π¦ β
β β§ π¦ β 0)
β§ (π§ β β
β§ π§ β 0)) β§
(π¦ + π§) β 0) β§ (π pCnt π§) β€ (π pCnt (π¦ + π§))) β (πβ(π pCnt (π¦ + π§))) β€ (πβ(π pCnt π§))) |
187 | 180, 186 | syldan 592 |
. . . . . . 7
β’
(((((π β
β β§ π β
(0(,)1)) β§ (π¦ β
β β§ π¦ β 0)
β§ (π§ β β
β§ π§ β 0)) β§
(π¦ + π§) β 0) β§ (π pCnt π§) β€ (π pCnt π¦)) β (πβ(π pCnt (π¦ + π§))) β€ (πβ(π pCnt π§))) |
188 | 161, 71 | rpexpcld 14207 |
. . . . . . . . . . 11
β’ (((π β β β§ π β (0(,)1)) β§ (π¦ β β β§ π¦ β 0) β§ (π§ β β β§ π§ β 0)) β (πβ(π pCnt π¦)) β
β+) |
189 | 188 | adantr 482 |
. . . . . . . . . 10
β’ ((((π β β β§ π β (0(,)1)) β§ (π¦ β β β§ π¦ β 0) β§ (π§ β β β§ π§ β 0)) β§ (π¦ + π§) β 0) β (πβ(π pCnt π¦)) β
β+) |
190 | 189 | rpge0d 13017 |
. . . . . . . . 9
β’ ((((π β β β§ π β (0(,)1)) β§ (π¦ β β β§ π¦ β 0) β§ (π§ β β β§ π§ β 0)) β§ (π¦ + π§) β 0) β 0 β€ (πβ(π pCnt π¦))) |
191 | 141, 140 | addge02d 11800 |
. . . . . . . . 9
β’ ((((π β β β§ π β (0(,)1)) β§ (π¦ β β β§ π¦ β 0) β§ (π§ β β β§ π§ β 0)) β§ (π¦ + π§) β 0) β (0 β€ (πβ(π pCnt π¦)) β (πβ(π pCnt π§)) β€ ((πβ(π pCnt π¦)) + (πβ(π pCnt π§))))) |
192 | 190, 191 | mpbid 231 |
. . . . . . . 8
β’ ((((π β β β§ π β (0(,)1)) β§ (π¦ β β β§ π¦ β 0) β§ (π§ β β β§ π§ β 0)) β§ (π¦ + π§) β 0) β (πβ(π pCnt π§)) β€ ((πβ(π pCnt π¦)) + (πβ(π pCnt π§)))) |
193 | 192 | adantr 482 |
. . . . . . 7
β’
(((((π β
β β§ π β
(0(,)1)) β§ (π¦ β
β β§ π¦ β 0)
β§ (π§ β β
β§ π§ β 0)) β§
(π¦ + π§) β 0) β§ (π pCnt π§) β€ (π pCnt π¦)) β (πβ(π pCnt π§)) β€ ((πβ(π pCnt π¦)) + (πβ(π pCnt π§)))) |
194 | 169, 170,
171, 187, 193 | letrd 11368 |
. . . . . 6
β’
(((((π β
β β§ π β
(0(,)1)) β§ (π¦ β
β β§ π¦ β 0)
β§ (π§ β β
β§ π§ β 0)) β§
(π¦ + π§) β 0) β§ (π pCnt π§) β€ (π pCnt π¦)) β (πβ(π pCnt (π¦ + π§))) β€ ((πβ(π pCnt π¦)) + (πβ(π pCnt π§)))) |
195 | 120, 122,
168, 194 | lecasei 11317 |
. . . . 5
β’ ((((π β β β§ π β (0(,)1)) β§ (π¦ β β β§ π¦ β 0) β§ (π§ β β β§ π§ β 0)) β§ (π¦ + π§) β 0) β (πβ(π pCnt (π¦ + π§))) β€ ((πβ(π pCnt π¦)) + (πβ(π pCnt π§)))) |
196 | 118, 195 | eqbrtrd 5170 |
. . . 4
β’ ((((π β β β§ π β (0(,)1)) β§ (π¦ β β β§ π¦ β 0) β§ (π§ β β β§ π§ β 0)) β§ (π¦ + π§) β 0) β if((π¦ + π§) = 0, 0, (πβ(π pCnt (π¦ + π§)))) β€ ((πβ(π pCnt π¦)) + (πβ(π pCnt π§)))) |
197 | 188, 162 | rpaddcld 13028 |
. . . . 5
β’ (((π β β β§ π β (0(,)1)) β§ (π¦ β β β§ π¦ β 0) β§ (π§ β β β§ π§ β 0)) β ((πβ(π pCnt π¦)) + (πβ(π pCnt π§))) β
β+) |
198 | 197 | rpge0d 13017 |
. . . 4
β’ (((π β β β§ π β (0(,)1)) β§ (π¦ β β β§ π¦ β 0) β§ (π§ β β β§ π§ β 0)) β 0 β€ ((πβ(π pCnt π¦)) + (πβ(π pCnt π§)))) |
199 | 116, 196,
198 | pm2.61ne 3028 |
. . 3
β’ (((π β β β§ π β (0(,)1)) β§ (π¦ β β β§ π¦ β 0) β§ (π§ β β β§ π§ β 0)) β if((π¦ + π§) = 0, 0, (πβ(π pCnt (π¦ + π§)))) β€ ((πβ(π pCnt π¦)) + (πβ(π pCnt π§)))) |
200 | | eqeq1 2737 |
. . . . . 6
β’ (π₯ = (π¦ + π§) β (π₯ = 0 β (π¦ + π§) = 0)) |
201 | | oveq2 7414 |
. . . . . . 7
β’ (π₯ = (π¦ + π§) β (π pCnt π₯) = (π pCnt (π¦ + π§))) |
202 | 201 | oveq2d 7422 |
. . . . . 6
β’ (π₯ = (π¦ + π§) β (πβ(π pCnt π₯)) = (πβ(π pCnt (π¦ + π§)))) |
203 | 200, 202 | ifbieq2d 4554 |
. . . . 5
β’ (π₯ = (π¦ + π§) β if(π₯ = 0, 0, (πβ(π pCnt π₯))) = if((π¦ + π§) = 0, 0, (πβ(π pCnt (π¦ + π§))))) |
204 | | ovex 7439 |
. . . . . 6
β’ (πβ(π pCnt (π¦ + π§))) β V |
205 | 42, 204 | ifex 4578 |
. . . . 5
β’ if((π¦ + π§) = 0, 0, (πβ(π pCnt (π¦ + π§)))) β V |
206 | 203, 36, 205 | fvmpt 6996 |
. . . 4
β’ ((π¦ + π§) β β β (πΉβ(π¦ + π§)) = if((π¦ + π§) = 0, 0, (πβ(π pCnt (π¦ + π§))))) |
207 | 128, 206 | syl 17 |
. . 3
β’ (((π β β β§ π β (0(,)1)) β§ (π¦ β β β§ π¦ β 0) β§ (π§ β β β§ π§ β 0)) β (πΉβ(π¦ + π§)) = if((π¦ + π§) = 0, 0, (πβ(π pCnt (π¦ + π§))))) |
208 | 101, 112 | oveq12d 7424 |
. . 3
β’ (((π β β β§ π β (0(,)1)) β§ (π¦ β β β§ π¦ β 0) β§ (π§ β β β§ π§ β 0)) β ((πΉβπ¦) + (πΉβπ§)) = ((πβ(π pCnt π¦)) + (πβ(π pCnt π§)))) |
209 | 199, 207,
208 | 3brtr4d 5180 |
. 2
β’ (((π β β β§ π β (0(,)1)) β§ (π¦ β β β§ π¦ β 0) β§ (π§ β β β§ π§ β 0)) β (πΉβ(π¦ + π§)) β€ ((πΉβπ¦) + (πΉβπ§))) |
210 | 2, 5, 9, 12, 14, 17, 37, 44, 64, 114, 209 | isabvd 20421 |
1
β’ ((π β β β§ π β (0(,)1)) β πΉ β π΄) |