ILE Home Intuitionistic Logic Explorer < Previous   Next >
Nearby theorems
Mirrors  >  Home  >  ILE Home  >  Th. List  >  mertenslemi1 GIF version

Theorem mertenslemi1 11545
Description: Lemma for mertensabs 11547. (Contributed by Mario Carneiro, 29-Apr-2014.) (Revised by Jim Kingdon, 2-Dec-2022.)
Hypotheses
Ref Expression
mertens.1 ((๐œ‘ โˆง ๐‘— โˆˆ โ„•0) โ†’ (๐นโ€˜๐‘—) = ๐ด)
mertens.2 ((๐œ‘ โˆง ๐‘— โˆˆ โ„•0) โ†’ (๐พโ€˜๐‘—) = (absโ€˜๐ด))
mertens.3 ((๐œ‘ โˆง ๐‘— โˆˆ โ„•0) โ†’ ๐ด โˆˆ โ„‚)
mertens.4 ((๐œ‘ โˆง ๐‘˜ โˆˆ โ„•0) โ†’ (๐บโ€˜๐‘˜) = ๐ต)
mertens.5 ((๐œ‘ โˆง ๐‘˜ โˆˆ โ„•0) โ†’ ๐ต โˆˆ โ„‚)
mertens.6 ((๐œ‘ โˆง ๐‘˜ โˆˆ โ„•0) โ†’ (๐ปโ€˜๐‘˜) = ฮฃ๐‘— โˆˆ (0...๐‘˜)(๐ด ยท (๐บโ€˜(๐‘˜ โˆ’ ๐‘—))))
mertens.7 (๐œ‘ โ†’ seq0( + , ๐พ) โˆˆ dom โ‡ )
mertens.8 (๐œ‘ โ†’ seq0( + , ๐บ) โˆˆ dom โ‡ )
mertens.9 (๐œ‘ โ†’ ๐ธ โˆˆ โ„+)
mertens.10 ๐‘‡ = {๐‘ง โˆฃ โˆƒ๐‘› โˆˆ (0...(๐‘  โˆ’ 1))๐‘ง = (absโ€˜ฮฃ๐‘˜ โˆˆ (โ„คโ‰ฅโ€˜(๐‘› + 1))(๐บโ€˜๐‘˜))}
mertens.11 (๐œ“ โ†” (๐‘  โˆˆ โ„• โˆง โˆ€๐‘› โˆˆ (โ„คโ‰ฅโ€˜๐‘ )(absโ€˜ฮฃ๐‘˜ โˆˆ (โ„คโ‰ฅโ€˜(๐‘› + 1))(๐บโ€˜๐‘˜)) < ((๐ธ / 2) / (ฮฃ๐‘— โˆˆ โ„•0 (๐พโ€˜๐‘—) + 1))))
mertens.p (๐œ‘ โ†’ ๐‘ƒ โˆˆ โ„)
mertens.i12 (๐œ‘ โ†’ (๐œ“ โˆง (๐‘ก โˆˆ โ„•0 โˆง โˆ€๐‘š โˆˆ (โ„คโ‰ฅโ€˜๐‘ก)(๐พโ€˜๐‘š) < (((๐ธ / 2) / ๐‘ ) / (๐‘ƒ + 1)))))
mertens.pge0 (๐œ‘ โ†’ 0 โ‰ค ๐‘ƒ)
mertens.pub (๐œ‘ โ†’ โˆ€๐‘ค โˆˆ ๐‘‡ ๐‘ค โ‰ค ๐‘ƒ)
Assertion
Ref Expression
mertenslemi1 (๐œ‘ โ†’ โˆƒ๐‘ฆ โˆˆ โ„•0 โˆ€๐‘š โˆˆ (โ„คโ‰ฅโ€˜๐‘ฆ)(absโ€˜ฮฃ๐‘— โˆˆ (0...๐‘š)(๐ด ยท ฮฃ๐‘˜ โˆˆ (โ„คโ‰ฅโ€˜((๐‘š โˆ’ ๐‘—) + 1))๐ต)) < ๐ธ)
Distinct variable groups:   ๐‘—,๐‘š,๐‘›,๐‘ ,๐‘ก,๐‘ฆ,๐‘ง,๐ต   ๐‘—,๐‘˜,๐บ,๐‘š,๐‘›,๐‘ ,๐‘ฆ,๐‘ง   ๐œ‘,๐‘—,๐‘˜,๐‘š,๐‘ฆ,๐‘ง   ๐‘ก,๐‘˜,๐ด,๐‘š,๐‘›,๐‘ ,๐‘ฆ   ๐‘—,๐ธ,๐‘˜,๐‘š,๐‘›,๐‘ ,๐‘ก,๐‘ฆ,๐‘ง   ๐‘—,๐พ,๐‘˜,๐‘š,๐‘›,๐‘ ,๐‘ก,๐‘ฆ,๐‘ง   ๐‘—,๐น,๐‘š,๐‘›,๐‘ฆ   ๐œ“,๐‘—,๐‘˜,๐‘š,๐‘›,๐‘ก,๐‘ฆ,๐‘ง   ๐‘ค,๐‘—,๐‘‡,๐‘˜,๐‘š,๐‘›,๐‘ก,๐‘ฆ,๐‘ง   ๐‘˜,๐ป,๐‘š,๐‘ฆ   ๐‘ค,๐ต   ๐‘ƒ,๐‘—,๐‘š,๐‘ค
Allowed substitution hints:   ๐œ‘(๐‘ค,๐‘ก,๐‘›,๐‘ )   ๐œ“(๐‘ค,๐‘ )   ๐ด(๐‘ง,๐‘ค,๐‘—)   ๐ต(๐‘˜)   ๐‘ƒ(๐‘ฆ,๐‘ง,๐‘ก,๐‘˜,๐‘›,๐‘ )   ๐‘‡(๐‘ )   ๐ธ(๐‘ค)   ๐น(๐‘ง,๐‘ค,๐‘ก,๐‘˜,๐‘ )   ๐บ(๐‘ค,๐‘ก)   ๐ป(๐‘ง,๐‘ค,๐‘ก,๐‘—,๐‘›,๐‘ )   ๐พ(๐‘ค)

Proof of Theorem mertenslemi1
StepHypRef Expression
1 mertens.i12 . . . . . . 7 (๐œ‘ โ†’ (๐œ“ โˆง (๐‘ก โˆˆ โ„•0 โˆง โˆ€๐‘š โˆˆ (โ„คโ‰ฅโ€˜๐‘ก)(๐พโ€˜๐‘š) < (((๐ธ / 2) / ๐‘ ) / (๐‘ƒ + 1)))))
21simpld 112 . . . . . 6 (๐œ‘ โ†’ ๐œ“)
3 mertens.11 . . . . . 6 (๐œ“ โ†” (๐‘  โˆˆ โ„• โˆง โˆ€๐‘› โˆˆ (โ„คโ‰ฅโ€˜๐‘ )(absโ€˜ฮฃ๐‘˜ โˆˆ (โ„คโ‰ฅโ€˜(๐‘› + 1))(๐บโ€˜๐‘˜)) < ((๐ธ / 2) / (ฮฃ๐‘— โˆˆ โ„•0 (๐พโ€˜๐‘—) + 1))))
42, 3sylib 122 . . . . 5 (๐œ‘ โ†’ (๐‘  โˆˆ โ„• โˆง โˆ€๐‘› โˆˆ (โ„คโ‰ฅโ€˜๐‘ )(absโ€˜ฮฃ๐‘˜ โˆˆ (โ„คโ‰ฅโ€˜(๐‘› + 1))(๐บโ€˜๐‘˜)) < ((๐ธ / 2) / (ฮฃ๐‘— โˆˆ โ„•0 (๐พโ€˜๐‘—) + 1))))
54simpld 112 . . . 4 (๐œ‘ โ†’ ๐‘  โˆˆ โ„•)
65nnnn0d 9231 . . 3 (๐œ‘ โ†’ ๐‘  โˆˆ โ„•0)
71simprd 114 . . . 4 (๐œ‘ โ†’ (๐‘ก โˆˆ โ„•0 โˆง โˆ€๐‘š โˆˆ (โ„คโ‰ฅโ€˜๐‘ก)(๐พโ€˜๐‘š) < (((๐ธ / 2) / ๐‘ ) / (๐‘ƒ + 1))))
87simpld 112 . . 3 (๐œ‘ โ†’ ๐‘ก โˆˆ โ„•0)
96, 8nn0addcld 9235 . 2 (๐œ‘ โ†’ (๐‘  + ๐‘ก) โˆˆ โ„•0)
10 0zd 9267 . . . . . . 7 ((๐œ‘ โˆง ๐‘š โˆˆ (โ„คโ‰ฅโ€˜(๐‘  + ๐‘ก))) โ†’ 0 โˆˆ โ„ค)
11 eluzelz 9539 . . . . . . . 8 (๐‘š โˆˆ (โ„คโ‰ฅโ€˜(๐‘  + ๐‘ก)) โ†’ ๐‘š โˆˆ โ„ค)
1211adantl 277 . . . . . . 7 ((๐œ‘ โˆง ๐‘š โˆˆ (โ„คโ‰ฅโ€˜(๐‘  + ๐‘ก))) โ†’ ๐‘š โˆˆ โ„ค)
1310, 12fzfigd 10433 . . . . . 6 ((๐œ‘ โˆง ๐‘š โˆˆ (โ„คโ‰ฅโ€˜(๐‘  + ๐‘ก))) โ†’ (0...๐‘š) โˆˆ Fin)
14 simpl 109 . . . . . . . 8 ((๐œ‘ โˆง ๐‘š โˆˆ (โ„คโ‰ฅโ€˜(๐‘  + ๐‘ก))) โ†’ ๐œ‘)
15 elfznn0 10116 . . . . . . . 8 (๐‘— โˆˆ (0...๐‘š) โ†’ ๐‘— โˆˆ โ„•0)
16 mertens.3 . . . . . . . 8 ((๐œ‘ โˆง ๐‘— โˆˆ โ„•0) โ†’ ๐ด โˆˆ โ„‚)
1714, 15, 16syl2an 289 . . . . . . 7 (((๐œ‘ โˆง ๐‘š โˆˆ (โ„คโ‰ฅโ€˜(๐‘  + ๐‘ก))) โˆง ๐‘— โˆˆ (0...๐‘š)) โ†’ ๐ด โˆˆ โ„‚)
18 eqid 2177 . . . . . . . 8 (โ„คโ‰ฅโ€˜((๐‘š โˆ’ ๐‘—) + 1)) = (โ„คโ‰ฅโ€˜((๐‘š โˆ’ ๐‘—) + 1))
19 fznn0sub 10059 . . . . . . . . . . 11 (๐‘— โˆˆ (0...๐‘š) โ†’ (๐‘š โˆ’ ๐‘—) โˆˆ โ„•0)
2019adantl 277 . . . . . . . . . 10 (((๐œ‘ โˆง ๐‘š โˆˆ (โ„คโ‰ฅโ€˜(๐‘  + ๐‘ก))) โˆง ๐‘— โˆˆ (0...๐‘š)) โ†’ (๐‘š โˆ’ ๐‘—) โˆˆ โ„•0)
21 peano2nn0 9218 . . . . . . . . . 10 ((๐‘š โˆ’ ๐‘—) โˆˆ โ„•0 โ†’ ((๐‘š โˆ’ ๐‘—) + 1) โˆˆ โ„•0)
2220, 21syl 14 . . . . . . . . 9 (((๐œ‘ โˆง ๐‘š โˆˆ (โ„คโ‰ฅโ€˜(๐‘  + ๐‘ก))) โˆง ๐‘— โˆˆ (0...๐‘š)) โ†’ ((๐‘š โˆ’ ๐‘—) + 1) โˆˆ โ„•0)
2322nn0zd 9375 . . . . . . . 8 (((๐œ‘ โˆง ๐‘š โˆˆ (โ„คโ‰ฅโ€˜(๐‘  + ๐‘ก))) โˆง ๐‘— โˆˆ (0...๐‘š)) โ†’ ((๐‘š โˆ’ ๐‘—) + 1) โˆˆ โ„ค)
24 simplll 533 . . . . . . . . 9 ((((๐œ‘ โˆง ๐‘š โˆˆ (โ„คโ‰ฅโ€˜(๐‘  + ๐‘ก))) โˆง ๐‘— โˆˆ (0...๐‘š)) โˆง ๐‘˜ โˆˆ (โ„คโ‰ฅโ€˜((๐‘š โˆ’ ๐‘—) + 1))) โ†’ ๐œ‘)
25 eluznn0 9601 . . . . . . . . . 10 ((((๐‘š โˆ’ ๐‘—) + 1) โˆˆ โ„•0 โˆง ๐‘˜ โˆˆ (โ„คโ‰ฅโ€˜((๐‘š โˆ’ ๐‘—) + 1))) โ†’ ๐‘˜ โˆˆ โ„•0)
2622, 25sylan 283 . . . . . . . . 9 ((((๐œ‘ โˆง ๐‘š โˆˆ (โ„คโ‰ฅโ€˜(๐‘  + ๐‘ก))) โˆง ๐‘— โˆˆ (0...๐‘š)) โˆง ๐‘˜ โˆˆ (โ„คโ‰ฅโ€˜((๐‘š โˆ’ ๐‘—) + 1))) โ†’ ๐‘˜ โˆˆ โ„•0)
27 mertens.4 . . . . . . . . 9 ((๐œ‘ โˆง ๐‘˜ โˆˆ โ„•0) โ†’ (๐บโ€˜๐‘˜) = ๐ต)
2824, 26, 27syl2anc 411 . . . . . . . 8 ((((๐œ‘ โˆง ๐‘š โˆˆ (โ„คโ‰ฅโ€˜(๐‘  + ๐‘ก))) โˆง ๐‘— โˆˆ (0...๐‘š)) โˆง ๐‘˜ โˆˆ (โ„คโ‰ฅโ€˜((๐‘š โˆ’ ๐‘—) + 1))) โ†’ (๐บโ€˜๐‘˜) = ๐ต)
29 mertens.5 . . . . . . . . 9 ((๐œ‘ โˆง ๐‘˜ โˆˆ โ„•0) โ†’ ๐ต โˆˆ โ„‚)
3024, 26, 29syl2anc 411 . . . . . . . 8 ((((๐œ‘ โˆง ๐‘š โˆˆ (โ„คโ‰ฅโ€˜(๐‘  + ๐‘ก))) โˆง ๐‘— โˆˆ (0...๐‘š)) โˆง ๐‘˜ โˆˆ (โ„คโ‰ฅโ€˜((๐‘š โˆ’ ๐‘—) + 1))) โ†’ ๐ต โˆˆ โ„‚)
31 mertens.8 . . . . . . . . . 10 (๐œ‘ โ†’ seq0( + , ๐บ) โˆˆ dom โ‡ )
3231ad2antrr 488 . . . . . . . . 9 (((๐œ‘ โˆง ๐‘š โˆˆ (โ„คโ‰ฅโ€˜(๐‘  + ๐‘ก))) โˆง ๐‘— โˆˆ (0...๐‘š)) โ†’ seq0( + , ๐บ) โˆˆ dom โ‡ )
33 nn0uz 9564 . . . . . . . . . 10 โ„•0 = (โ„คโ‰ฅโ€˜0)
34 simpll 527 . . . . . . . . . . 11 (((๐œ‘ โˆง ๐‘š โˆˆ (โ„คโ‰ฅโ€˜(๐‘  + ๐‘ก))) โˆง ๐‘— โˆˆ (0...๐‘š)) โ†’ ๐œ‘)
3527, 29eqeltrd 2254 . . . . . . . . . . 11 ((๐œ‘ โˆง ๐‘˜ โˆˆ โ„•0) โ†’ (๐บโ€˜๐‘˜) โˆˆ โ„‚)
3634, 35sylan 283 . . . . . . . . . 10 ((((๐œ‘ โˆง ๐‘š โˆˆ (โ„คโ‰ฅโ€˜(๐‘  + ๐‘ก))) โˆง ๐‘— โˆˆ (0...๐‘š)) โˆง ๐‘˜ โˆˆ โ„•0) โ†’ (๐บโ€˜๐‘˜) โˆˆ โ„‚)
3733, 22, 36iserex 11349 . . . . . . . . 9 (((๐œ‘ โˆง ๐‘š โˆˆ (โ„คโ‰ฅโ€˜(๐‘  + ๐‘ก))) โˆง ๐‘— โˆˆ (0...๐‘š)) โ†’ (seq0( + , ๐บ) โˆˆ dom โ‡ โ†” seq((๐‘š โˆ’ ๐‘—) + 1)( + , ๐บ) โˆˆ dom โ‡ ))
3832, 37mpbid 147 . . . . . . . 8 (((๐œ‘ โˆง ๐‘š โˆˆ (โ„คโ‰ฅโ€˜(๐‘  + ๐‘ก))) โˆง ๐‘— โˆˆ (0...๐‘š)) โ†’ seq((๐‘š โˆ’ ๐‘—) + 1)( + , ๐บ) โˆˆ dom โ‡ )
3918, 23, 28, 30, 38isumcl 11435 . . . . . . 7 (((๐œ‘ โˆง ๐‘š โˆˆ (โ„คโ‰ฅโ€˜(๐‘  + ๐‘ก))) โˆง ๐‘— โˆˆ (0...๐‘š)) โ†’ ฮฃ๐‘˜ โˆˆ (โ„คโ‰ฅโ€˜((๐‘š โˆ’ ๐‘—) + 1))๐ต โˆˆ โ„‚)
4017, 39mulcld 7980 . . . . . 6 (((๐œ‘ โˆง ๐‘š โˆˆ (โ„คโ‰ฅโ€˜(๐‘  + ๐‘ก))) โˆง ๐‘— โˆˆ (0...๐‘š)) โ†’ (๐ด ยท ฮฃ๐‘˜ โˆˆ (โ„คโ‰ฅโ€˜((๐‘š โˆ’ ๐‘—) + 1))๐ต) โˆˆ โ„‚)
4113, 40fsumcl 11410 . . . . 5 ((๐œ‘ โˆง ๐‘š โˆˆ (โ„คโ‰ฅโ€˜(๐‘  + ๐‘ก))) โ†’ ฮฃ๐‘— โˆˆ (0...๐‘š)(๐ด ยท ฮฃ๐‘˜ โˆˆ (โ„คโ‰ฅโ€˜((๐‘š โˆ’ ๐‘—) + 1))๐ต) โˆˆ โ„‚)
4241abscld 11192 . . . 4 ((๐œ‘ โˆง ๐‘š โˆˆ (โ„คโ‰ฅโ€˜(๐‘  + ๐‘ก))) โ†’ (absโ€˜ฮฃ๐‘— โˆˆ (0...๐‘š)(๐ด ยท ฮฃ๐‘˜ โˆˆ (โ„คโ‰ฅโ€˜((๐‘š โˆ’ ๐‘—) + 1))๐ต)) โˆˆ โ„)
4340abscld 11192 . . . . 5 (((๐œ‘ โˆง ๐‘š โˆˆ (โ„คโ‰ฅโ€˜(๐‘  + ๐‘ก))) โˆง ๐‘— โˆˆ (0...๐‘š)) โ†’ (absโ€˜(๐ด ยท ฮฃ๐‘˜ โˆˆ (โ„คโ‰ฅโ€˜((๐‘š โˆ’ ๐‘—) + 1))๐ต)) โˆˆ โ„)
4413, 43fsumrecl 11411 . . . 4 ((๐œ‘ โˆง ๐‘š โˆˆ (โ„คโ‰ฅโ€˜(๐‘  + ๐‘ก))) โ†’ ฮฃ๐‘— โˆˆ (0...๐‘š)(absโ€˜(๐ด ยท ฮฃ๐‘˜ โˆˆ (โ„คโ‰ฅโ€˜((๐‘š โˆ’ ๐‘—) + 1))๐ต)) โˆˆ โ„)
45 mertens.9 . . . . . 6 (๐œ‘ โ†’ ๐ธ โˆˆ โ„+)
4645rpred 9698 . . . . 5 (๐œ‘ โ†’ ๐ธ โˆˆ โ„)
4746adantr 276 . . . 4 ((๐œ‘ โˆง ๐‘š โˆˆ (โ„คโ‰ฅโ€˜(๐‘  + ๐‘ก))) โ†’ ๐ธ โˆˆ โ„)
4813, 40fsumabs 11475 . . . 4 ((๐œ‘ โˆง ๐‘š โˆˆ (โ„คโ‰ฅโ€˜(๐‘  + ๐‘ก))) โ†’ (absโ€˜ฮฃ๐‘— โˆˆ (0...๐‘š)(๐ด ยท ฮฃ๐‘˜ โˆˆ (โ„คโ‰ฅโ€˜((๐‘š โˆ’ ๐‘—) + 1))๐ต)) โ‰ค ฮฃ๐‘— โˆˆ (0...๐‘š)(absโ€˜(๐ด ยท ฮฃ๐‘˜ โˆˆ (โ„คโ‰ฅโ€˜((๐‘š โˆ’ ๐‘—) + 1))๐ต)))
495nnzd 9376 . . . . . . . . . 10 (๐œ‘ โ†’ ๐‘  โˆˆ โ„ค)
5049adantr 276 . . . . . . . . 9 ((๐œ‘ โˆง ๐‘š โˆˆ (โ„คโ‰ฅโ€˜(๐‘  + ๐‘ก))) โ†’ ๐‘  โˆˆ โ„ค)
5112, 50zsubcld 9382 . . . . . . . 8 ((๐œ‘ โˆง ๐‘š โˆˆ (โ„คโ‰ฅโ€˜(๐‘  + ๐‘ก))) โ†’ (๐‘š โˆ’ ๐‘ ) โˆˆ โ„ค)
5210, 51fzfigd 10433 . . . . . . 7 ((๐œ‘ โˆง ๐‘š โˆˆ (โ„คโ‰ฅโ€˜(๐‘  + ๐‘ก))) โ†’ (0...(๐‘š โˆ’ ๐‘ )) โˆˆ Fin)
536adantr 276 . . . . . . . . . . . . 13 ((๐œ‘ โˆง ๐‘š โˆˆ (โ„คโ‰ฅโ€˜(๐‘  + ๐‘ก))) โ†’ ๐‘  โˆˆ โ„•0)
5453nn0ge0d 9234 . . . . . . . . . . . 12 ((๐œ‘ โˆง ๐‘š โˆˆ (โ„คโ‰ฅโ€˜(๐‘  + ๐‘ก))) โ†’ 0 โ‰ค ๐‘ )
5512zred 9377 . . . . . . . . . . . . 13 ((๐œ‘ โˆง ๐‘š โˆˆ (โ„คโ‰ฅโ€˜(๐‘  + ๐‘ก))) โ†’ ๐‘š โˆˆ โ„)
5653nn0red 9232 . . . . . . . . . . . . 13 ((๐œ‘ โˆง ๐‘š โˆˆ (โ„คโ‰ฅโ€˜(๐‘  + ๐‘ก))) โ†’ ๐‘  โˆˆ โ„)
5755, 56subge02d 8496 . . . . . . . . . . . 12 ((๐œ‘ โˆง ๐‘š โˆˆ (โ„คโ‰ฅโ€˜(๐‘  + ๐‘ก))) โ†’ (0 โ‰ค ๐‘  โ†” (๐‘š โˆ’ ๐‘ ) โ‰ค ๐‘š))
5854, 57mpbid 147 . . . . . . . . . . 11 ((๐œ‘ โˆง ๐‘š โˆˆ (โ„คโ‰ฅโ€˜(๐‘  + ๐‘ก))) โ†’ (๐‘š โˆ’ ๐‘ ) โ‰ค ๐‘š)
5953, 33eleqtrdi 2270 . . . . . . . . . . . . . . 15 ((๐œ‘ โˆง ๐‘š โˆˆ (โ„คโ‰ฅโ€˜(๐‘  + ๐‘ก))) โ†’ ๐‘  โˆˆ (โ„คโ‰ฅโ€˜0))
60 uzid 9544 . . . . . . . . . . . . . . . . . 18 (๐‘  โˆˆ โ„ค โ†’ ๐‘  โˆˆ (โ„คโ‰ฅโ€˜๐‘ ))
6149, 60syl 14 . . . . . . . . . . . . . . . . 17 (๐œ‘ โ†’ ๐‘  โˆˆ (โ„คโ‰ฅโ€˜๐‘ ))
62 uzaddcl 9588 . . . . . . . . . . . . . . . . 17 ((๐‘  โˆˆ (โ„คโ‰ฅโ€˜๐‘ ) โˆง ๐‘ก โˆˆ โ„•0) โ†’ (๐‘  + ๐‘ก) โˆˆ (โ„คโ‰ฅโ€˜๐‘ ))
6361, 8, 62syl2anc 411 . . . . . . . . . . . . . . . 16 (๐œ‘ โ†’ (๐‘  + ๐‘ก) โˆˆ (โ„คโ‰ฅโ€˜๐‘ ))
64 eqid 2177 . . . . . . . . . . . . . . . . 17 (โ„คโ‰ฅโ€˜๐‘ ) = (โ„คโ‰ฅโ€˜๐‘ )
6564uztrn2 9547 . . . . . . . . . . . . . . . 16 (((๐‘  + ๐‘ก) โˆˆ (โ„คโ‰ฅโ€˜๐‘ ) โˆง ๐‘š โˆˆ (โ„คโ‰ฅโ€˜(๐‘  + ๐‘ก))) โ†’ ๐‘š โˆˆ (โ„คโ‰ฅโ€˜๐‘ ))
6663, 65sylan 283 . . . . . . . . . . . . . . 15 ((๐œ‘ โˆง ๐‘š โˆˆ (โ„คโ‰ฅโ€˜(๐‘  + ๐‘ก))) โ†’ ๐‘š โˆˆ (โ„คโ‰ฅโ€˜๐‘ ))
67 elfzuzb 10021 . . . . . . . . . . . . . . 15 (๐‘  โˆˆ (0...๐‘š) โ†” (๐‘  โˆˆ (โ„คโ‰ฅโ€˜0) โˆง ๐‘š โˆˆ (โ„คโ‰ฅโ€˜๐‘ )))
6859, 66, 67sylanbrc 417 . . . . . . . . . . . . . 14 ((๐œ‘ โˆง ๐‘š โˆˆ (โ„คโ‰ฅโ€˜(๐‘  + ๐‘ก))) โ†’ ๐‘  โˆˆ (0...๐‘š))
69 fznn0sub2 10130 . . . . . . . . . . . . . 14 (๐‘  โˆˆ (0...๐‘š) โ†’ (๐‘š โˆ’ ๐‘ ) โˆˆ (0...๐‘š))
7068, 69syl 14 . . . . . . . . . . . . 13 ((๐œ‘ โˆง ๐‘š โˆˆ (โ„คโ‰ฅโ€˜(๐‘  + ๐‘ก))) โ†’ (๐‘š โˆ’ ๐‘ ) โˆˆ (0...๐‘š))
71 elfzelz 10027 . . . . . . . . . . . . 13 ((๐‘š โˆ’ ๐‘ ) โˆˆ (0...๐‘š) โ†’ (๐‘š โˆ’ ๐‘ ) โˆˆ โ„ค)
7270, 71syl 14 . . . . . . . . . . . 12 ((๐œ‘ โˆง ๐‘š โˆˆ (โ„คโ‰ฅโ€˜(๐‘  + ๐‘ก))) โ†’ (๐‘š โˆ’ ๐‘ ) โˆˆ โ„ค)
73 eluz 9543 . . . . . . . . . . . 12 (((๐‘š โˆ’ ๐‘ ) โˆˆ โ„ค โˆง ๐‘š โˆˆ โ„ค) โ†’ (๐‘š โˆˆ (โ„คโ‰ฅโ€˜(๐‘š โˆ’ ๐‘ )) โ†” (๐‘š โˆ’ ๐‘ ) โ‰ค ๐‘š))
7472, 12, 73syl2anc 411 . . . . . . . . . . 11 ((๐œ‘ โˆง ๐‘š โˆˆ (โ„คโ‰ฅโ€˜(๐‘  + ๐‘ก))) โ†’ (๐‘š โˆˆ (โ„คโ‰ฅโ€˜(๐‘š โˆ’ ๐‘ )) โ†” (๐‘š โˆ’ ๐‘ ) โ‰ค ๐‘š))
7558, 74mpbird 167 . . . . . . . . . 10 ((๐œ‘ โˆง ๐‘š โˆˆ (โ„คโ‰ฅโ€˜(๐‘  + ๐‘ก))) โ†’ ๐‘š โˆˆ (โ„คโ‰ฅโ€˜(๐‘š โˆ’ ๐‘ )))
76 fzss2 10066 . . . . . . . . . 10 (๐‘š โˆˆ (โ„คโ‰ฅโ€˜(๐‘š โˆ’ ๐‘ )) โ†’ (0...(๐‘š โˆ’ ๐‘ )) โІ (0...๐‘š))
7775, 76syl 14 . . . . . . . . 9 ((๐œ‘ โˆง ๐‘š โˆˆ (โ„คโ‰ฅโ€˜(๐‘  + ๐‘ก))) โ†’ (0...(๐‘š โˆ’ ๐‘ )) โІ (0...๐‘š))
7877sselda 3157 . . . . . . . 8 (((๐œ‘ โˆง ๐‘š โˆˆ (โ„คโ‰ฅโ€˜(๐‘  + ๐‘ก))) โˆง ๐‘— โˆˆ (0...(๐‘š โˆ’ ๐‘ ))) โ†’ ๐‘— โˆˆ (0...๐‘š))
7916abscld 11192 . . . . . . . . . 10 ((๐œ‘ โˆง ๐‘— โˆˆ โ„•0) โ†’ (absโ€˜๐ด) โˆˆ โ„)
8014, 15, 79syl2an 289 . . . . . . . . 9 (((๐œ‘ โˆง ๐‘š โˆˆ (โ„คโ‰ฅโ€˜(๐‘  + ๐‘ก))) โˆง ๐‘— โˆˆ (0...๐‘š)) โ†’ (absโ€˜๐ด) โˆˆ โ„)
8139abscld 11192 . . . . . . . . 9 (((๐œ‘ โˆง ๐‘š โˆˆ (โ„คโ‰ฅโ€˜(๐‘  + ๐‘ก))) โˆง ๐‘— โˆˆ (0...๐‘š)) โ†’ (absโ€˜ฮฃ๐‘˜ โˆˆ (โ„คโ‰ฅโ€˜((๐‘š โˆ’ ๐‘—) + 1))๐ต) โˆˆ โ„)
8280, 81remulcld 7990 . . . . . . . 8 (((๐œ‘ โˆง ๐‘š โˆˆ (โ„คโ‰ฅโ€˜(๐‘  + ๐‘ก))) โˆง ๐‘— โˆˆ (0...๐‘š)) โ†’ ((absโ€˜๐ด) ยท (absโ€˜ฮฃ๐‘˜ โˆˆ (โ„คโ‰ฅโ€˜((๐‘š โˆ’ ๐‘—) + 1))๐ต)) โˆˆ โ„)
8378, 82syldan 282 . . . . . . 7 (((๐œ‘ โˆง ๐‘š โˆˆ (โ„คโ‰ฅโ€˜(๐‘  + ๐‘ก))) โˆง ๐‘— โˆˆ (0...(๐‘š โˆ’ ๐‘ ))) โ†’ ((absโ€˜๐ด) ยท (absโ€˜ฮฃ๐‘˜ โˆˆ (โ„คโ‰ฅโ€˜((๐‘š โˆ’ ๐‘—) + 1))๐ต)) โˆˆ โ„)
8452, 83fsumrecl 11411 . . . . . 6 ((๐œ‘ โˆง ๐‘š โˆˆ (โ„คโ‰ฅโ€˜(๐‘  + ๐‘ก))) โ†’ ฮฃ๐‘— โˆˆ (0...(๐‘š โˆ’ ๐‘ ))((absโ€˜๐ด) ยท (absโ€˜ฮฃ๐‘˜ โˆˆ (โ„คโ‰ฅโ€˜((๐‘š โˆ’ ๐‘—) + 1))๐ต)) โˆˆ โ„)
8551peano2zd 9380 . . . . . . . 8 ((๐œ‘ โˆง ๐‘š โˆˆ (โ„คโ‰ฅโ€˜(๐‘  + ๐‘ก))) โ†’ ((๐‘š โˆ’ ๐‘ ) + 1) โˆˆ โ„ค)
8685, 12fzfigd 10433 . . . . . . 7 ((๐œ‘ โˆง ๐‘š โˆˆ (โ„คโ‰ฅโ€˜(๐‘  + ๐‘ก))) โ†’ (((๐‘š โˆ’ ๐‘ ) + 1)...๐‘š) โˆˆ Fin)
87 elfznn0 10116 . . . . . . . . . . . . 13 ((๐‘š โˆ’ ๐‘ ) โˆˆ (0...๐‘š) โ†’ (๐‘š โˆ’ ๐‘ ) โˆˆ โ„•0)
8870, 87syl 14 . . . . . . . . . . . 12 ((๐œ‘ โˆง ๐‘š โˆˆ (โ„คโ‰ฅโ€˜(๐‘  + ๐‘ก))) โ†’ (๐‘š โˆ’ ๐‘ ) โˆˆ โ„•0)
89 peano2nn0 9218 . . . . . . . . . . . 12 ((๐‘š โˆ’ ๐‘ ) โˆˆ โ„•0 โ†’ ((๐‘š โˆ’ ๐‘ ) + 1) โˆˆ โ„•0)
9088, 89syl 14 . . . . . . . . . . 11 ((๐œ‘ โˆง ๐‘š โˆˆ (โ„คโ‰ฅโ€˜(๐‘  + ๐‘ก))) โ†’ ((๐‘š โˆ’ ๐‘ ) + 1) โˆˆ โ„•0)
9190, 33eleqtrdi 2270 . . . . . . . . . 10 ((๐œ‘ โˆง ๐‘š โˆˆ (โ„คโ‰ฅโ€˜(๐‘  + ๐‘ก))) โ†’ ((๐‘š โˆ’ ๐‘ ) + 1) โˆˆ (โ„คโ‰ฅโ€˜0))
92 fzss1 10065 . . . . . . . . . 10 (((๐‘š โˆ’ ๐‘ ) + 1) โˆˆ (โ„คโ‰ฅโ€˜0) โ†’ (((๐‘š โˆ’ ๐‘ ) + 1)...๐‘š) โІ (0...๐‘š))
9391, 92syl 14 . . . . . . . . 9 ((๐œ‘ โˆง ๐‘š โˆˆ (โ„คโ‰ฅโ€˜(๐‘  + ๐‘ก))) โ†’ (((๐‘š โˆ’ ๐‘ ) + 1)...๐‘š) โІ (0...๐‘š))
9493sselda 3157 . . . . . . . 8 (((๐œ‘ โˆง ๐‘š โˆˆ (โ„คโ‰ฅโ€˜(๐‘  + ๐‘ก))) โˆง ๐‘— โˆˆ (((๐‘š โˆ’ ๐‘ ) + 1)...๐‘š)) โ†’ ๐‘— โˆˆ (0...๐‘š))
9594, 82syldan 282 . . . . . . 7 (((๐œ‘ โˆง ๐‘š โˆˆ (โ„คโ‰ฅโ€˜(๐‘  + ๐‘ก))) โˆง ๐‘— โˆˆ (((๐‘š โˆ’ ๐‘ ) + 1)...๐‘š)) โ†’ ((absโ€˜๐ด) ยท (absโ€˜ฮฃ๐‘˜ โˆˆ (โ„คโ‰ฅโ€˜((๐‘š โˆ’ ๐‘—) + 1))๐ต)) โˆˆ โ„)
9686, 95fsumrecl 11411 . . . . . 6 ((๐œ‘ โˆง ๐‘š โˆˆ (โ„คโ‰ฅโ€˜(๐‘  + ๐‘ก))) โ†’ ฮฃ๐‘— โˆˆ (((๐‘š โˆ’ ๐‘ ) + 1)...๐‘š)((absโ€˜๐ด) ยท (absโ€˜ฮฃ๐‘˜ โˆˆ (โ„คโ‰ฅโ€˜((๐‘š โˆ’ ๐‘—) + 1))๐ต)) โˆˆ โ„)
9745rphalfcld 9711 . . . . . . . 8 (๐œ‘ โ†’ (๐ธ / 2) โˆˆ โ„+)
9897rpred 9698 . . . . . . 7 (๐œ‘ โ†’ (๐ธ / 2) โˆˆ โ„)
9998adantr 276 . . . . . 6 ((๐œ‘ โˆง ๐‘š โˆˆ (โ„คโ‰ฅโ€˜(๐‘  + ๐‘ก))) โ†’ (๐ธ / 2) โˆˆ โ„)
100 elfznn0 10116 . . . . . . . . . . 11 (๐‘— โˆˆ (0...(๐‘š โˆ’ ๐‘ )) โ†’ ๐‘— โˆˆ โ„•0)
10114, 100, 79syl2an 289 . . . . . . . . . 10 (((๐œ‘ โˆง ๐‘š โˆˆ (โ„คโ‰ฅโ€˜(๐‘  + ๐‘ก))) โˆง ๐‘— โˆˆ (0...(๐‘š โˆ’ ๐‘ ))) โ†’ (absโ€˜๐ด) โˆˆ โ„)
10252, 101fsumrecl 11411 . . . . . . . . 9 ((๐œ‘ โˆง ๐‘š โˆˆ (โ„คโ‰ฅโ€˜(๐‘  + ๐‘ก))) โ†’ ฮฃ๐‘— โˆˆ (0...(๐‘š โˆ’ ๐‘ ))(absโ€˜๐ด) โˆˆ โ„)
103102, 99remulcld 7990 . . . . . . . 8 ((๐œ‘ โˆง ๐‘š โˆˆ (โ„คโ‰ฅโ€˜(๐‘  + ๐‘ก))) โ†’ (ฮฃ๐‘— โˆˆ (0...(๐‘š โˆ’ ๐‘ ))(absโ€˜๐ด) ยท (๐ธ / 2)) โˆˆ โ„)
104 0zd 9267 . . . . . . . . . . 11 (๐œ‘ โ†’ 0 โˆˆ โ„ค)
105 eqidd 2178 . . . . . . . . . . 11 ((๐œ‘ โˆง ๐‘— โˆˆ โ„•0) โ†’ (๐พโ€˜๐‘—) = (๐พโ€˜๐‘—))
106 mertens.2 . . . . . . . . . . . 12 ((๐œ‘ โˆง ๐‘— โˆˆ โ„•0) โ†’ (๐พโ€˜๐‘—) = (absโ€˜๐ด))
107106, 79eqeltrd 2254 . . . . . . . . . . 11 ((๐œ‘ โˆง ๐‘— โˆˆ โ„•0) โ†’ (๐พโ€˜๐‘—) โˆˆ โ„)
108 mertens.7 . . . . . . . . . . 11 (๐œ‘ โ†’ seq0( + , ๐พ) โˆˆ dom โ‡ )
10933, 104, 105, 107, 108isumrecl 11439 . . . . . . . . . 10 (๐œ‘ โ†’ ฮฃ๐‘— โˆˆ โ„•0 (๐พโ€˜๐‘—) โˆˆ โ„)
11016absge0d 11195 . . . . . . . . . . . 12 ((๐œ‘ โˆง ๐‘— โˆˆ โ„•0) โ†’ 0 โ‰ค (absโ€˜๐ด))
111110, 106breqtrrd 4033 . . . . . . . . . . 11 ((๐œ‘ โˆง ๐‘— โˆˆ โ„•0) โ†’ 0 โ‰ค (๐พโ€˜๐‘—))
11233, 104, 105, 107, 108, 111isumge0 11440 . . . . . . . . . 10 (๐œ‘ โ†’ 0 โ‰ค ฮฃ๐‘— โˆˆ โ„•0 (๐พโ€˜๐‘—))
113109, 112ge0p1rpd 9729 . . . . . . . . 9 (๐œ‘ โ†’ (ฮฃ๐‘— โˆˆ โ„•0 (๐พโ€˜๐‘—) + 1) โˆˆ โ„+)
114113adantr 276 . . . . . . . 8 ((๐œ‘ โˆง ๐‘š โˆˆ (โ„คโ‰ฅโ€˜(๐‘  + ๐‘ก))) โ†’ (ฮฃ๐‘— โˆˆ โ„•0 (๐พโ€˜๐‘—) + 1) โˆˆ โ„+)
115103, 114rerpdivcld 9730 . . . . . . 7 ((๐œ‘ โˆง ๐‘š โˆˆ (โ„คโ‰ฅโ€˜(๐‘  + ๐‘ก))) โ†’ ((ฮฃ๐‘— โˆˆ (0...(๐‘š โˆ’ ๐‘ ))(absโ€˜๐ด) ยท (๐ธ / 2)) / (ฮฃ๐‘— โˆˆ โ„•0 (๐พโ€˜๐‘—) + 1)) โˆˆ โ„)
11697, 113rpdivcld 9716 . . . . . . . . . . . 12 (๐œ‘ โ†’ ((๐ธ / 2) / (ฮฃ๐‘— โˆˆ โ„•0 (๐พโ€˜๐‘—) + 1)) โˆˆ โ„+)
117116rpred 9698 . . . . . . . . . . 11 (๐œ‘ โ†’ ((๐ธ / 2) / (ฮฃ๐‘— โˆˆ โ„•0 (๐พโ€˜๐‘—) + 1)) โˆˆ โ„)
118117ad2antrr 488 . . . . . . . . . 10 (((๐œ‘ โˆง ๐‘š โˆˆ (โ„คโ‰ฅโ€˜(๐‘  + ๐‘ก))) โˆง ๐‘— โˆˆ (0...(๐‘š โˆ’ ๐‘ ))) โ†’ ((๐ธ / 2) / (ฮฃ๐‘— โˆˆ โ„•0 (๐พโ€˜๐‘—) + 1)) โˆˆ โ„)
119101, 118remulcld 7990 . . . . . . . . 9 (((๐œ‘ โˆง ๐‘š โˆˆ (โ„คโ‰ฅโ€˜(๐‘  + ๐‘ก))) โˆง ๐‘— โˆˆ (0...(๐‘š โˆ’ ๐‘ ))) โ†’ ((absโ€˜๐ด) ยท ((๐ธ / 2) / (ฮฃ๐‘— โˆˆ โ„•0 (๐พโ€˜๐‘—) + 1))) โˆˆ โ„)
12078, 23syldan 282 . . . . . . . . . . . 12 (((๐œ‘ โˆง ๐‘š โˆˆ (โ„คโ‰ฅโ€˜(๐‘  + ๐‘ก))) โˆง ๐‘— โˆˆ (0...(๐‘š โˆ’ ๐‘ ))) โ†’ ((๐‘š โˆ’ ๐‘—) + 1) โˆˆ โ„ค)
121 simplll 533 . . . . . . . . . . . . 13 ((((๐œ‘ โˆง ๐‘š โˆˆ (โ„คโ‰ฅโ€˜(๐‘  + ๐‘ก))) โˆง ๐‘— โˆˆ (0...(๐‘š โˆ’ ๐‘ ))) โˆง ๐‘˜ โˆˆ (โ„คโ‰ฅโ€˜((๐‘š โˆ’ ๐‘—) + 1))) โ†’ ๐œ‘)
12278, 22syldan 282 . . . . . . . . . . . . . 14 (((๐œ‘ โˆง ๐‘š โˆˆ (โ„คโ‰ฅโ€˜(๐‘  + ๐‘ก))) โˆง ๐‘— โˆˆ (0...(๐‘š โˆ’ ๐‘ ))) โ†’ ((๐‘š โˆ’ ๐‘—) + 1) โˆˆ โ„•0)
123122, 25sylan 283 . . . . . . . . . . . . 13 ((((๐œ‘ โˆง ๐‘š โˆˆ (โ„คโ‰ฅโ€˜(๐‘  + ๐‘ก))) โˆง ๐‘— โˆˆ (0...(๐‘š โˆ’ ๐‘ ))) โˆง ๐‘˜ โˆˆ (โ„คโ‰ฅโ€˜((๐‘š โˆ’ ๐‘—) + 1))) โ†’ ๐‘˜ โˆˆ โ„•0)
124121, 123, 27syl2anc 411 . . . . . . . . . . . 12 ((((๐œ‘ โˆง ๐‘š โˆˆ (โ„คโ‰ฅโ€˜(๐‘  + ๐‘ก))) โˆง ๐‘— โˆˆ (0...(๐‘š โˆ’ ๐‘ ))) โˆง ๐‘˜ โˆˆ (โ„คโ‰ฅโ€˜((๐‘š โˆ’ ๐‘—) + 1))) โ†’ (๐บโ€˜๐‘˜) = ๐ต)
125121, 123, 29syl2anc 411 . . . . . . . . . . . 12 ((((๐œ‘ โˆง ๐‘š โˆˆ (โ„คโ‰ฅโ€˜(๐‘  + ๐‘ก))) โˆง ๐‘— โˆˆ (0...(๐‘š โˆ’ ๐‘ ))) โˆง ๐‘˜ โˆˆ (โ„คโ‰ฅโ€˜((๐‘š โˆ’ ๐‘—) + 1))) โ†’ ๐ต โˆˆ โ„‚)
12678, 38syldan 282 . . . . . . . . . . . 12 (((๐œ‘ โˆง ๐‘š โˆˆ (โ„คโ‰ฅโ€˜(๐‘  + ๐‘ก))) โˆง ๐‘— โˆˆ (0...(๐‘š โˆ’ ๐‘ ))) โ†’ seq((๐‘š โˆ’ ๐‘—) + 1)( + , ๐บ) โˆˆ dom โ‡ )
12718, 120, 124, 125, 126isumcl 11435 . . . . . . . . . . 11 (((๐œ‘ โˆง ๐‘š โˆˆ (โ„คโ‰ฅโ€˜(๐‘  + ๐‘ก))) โˆง ๐‘— โˆˆ (0...(๐‘š โˆ’ ๐‘ ))) โ†’ ฮฃ๐‘˜ โˆˆ (โ„คโ‰ฅโ€˜((๐‘š โˆ’ ๐‘—) + 1))๐ต โˆˆ โ„‚)
128127abscld 11192 . . . . . . . . . 10 (((๐œ‘ โˆง ๐‘š โˆˆ (โ„คโ‰ฅโ€˜(๐‘  + ๐‘ก))) โˆง ๐‘— โˆˆ (0...(๐‘š โˆ’ ๐‘ ))) โ†’ (absโ€˜ฮฃ๐‘˜ โˆˆ (โ„คโ‰ฅโ€˜((๐‘š โˆ’ ๐‘—) + 1))๐ต) โˆˆ โ„)
12979, 110jca 306 . . . . . . . . . . 11 ((๐œ‘ โˆง ๐‘— โˆˆ โ„•0) โ†’ ((absโ€˜๐ด) โˆˆ โ„ โˆง 0 โ‰ค (absโ€˜๐ด)))
13014, 100, 129syl2an 289 . . . . . . . . . 10 (((๐œ‘ โˆง ๐‘š โˆˆ (โ„คโ‰ฅโ€˜(๐‘  + ๐‘ก))) โˆง ๐‘— โˆˆ (0...(๐‘š โˆ’ ๐‘ ))) โ†’ ((absโ€˜๐ด) โˆˆ โ„ โˆง 0 โ‰ค (absโ€˜๐ด)))
131124sumeq2dv 11378 . . . . . . . . . . . . 13 (((๐œ‘ โˆง ๐‘š โˆˆ (โ„คโ‰ฅโ€˜(๐‘  + ๐‘ก))) โˆง ๐‘— โˆˆ (0...(๐‘š โˆ’ ๐‘ ))) โ†’ ฮฃ๐‘˜ โˆˆ (โ„คโ‰ฅโ€˜((๐‘š โˆ’ ๐‘—) + 1))(๐บโ€˜๐‘˜) = ฮฃ๐‘˜ โˆˆ (โ„คโ‰ฅโ€˜((๐‘š โˆ’ ๐‘—) + 1))๐ต)
132131fveq2d 5521 . . . . . . . . . . . 12 (((๐œ‘ โˆง ๐‘š โˆˆ (โ„คโ‰ฅโ€˜(๐‘  + ๐‘ก))) โˆง ๐‘— โˆˆ (0...(๐‘š โˆ’ ๐‘ ))) โ†’ (absโ€˜ฮฃ๐‘˜ โˆˆ (โ„คโ‰ฅโ€˜((๐‘š โˆ’ ๐‘—) + 1))(๐บโ€˜๐‘˜)) = (absโ€˜ฮฃ๐‘˜ โˆˆ (โ„คโ‰ฅโ€˜((๐‘š โˆ’ ๐‘—) + 1))๐ต))
133 fvoveq1 5900 . . . . . . . . . . . . . . . 16 (๐‘› = (๐‘š โˆ’ ๐‘—) โ†’ (โ„คโ‰ฅโ€˜(๐‘› + 1)) = (โ„คโ‰ฅโ€˜((๐‘š โˆ’ ๐‘—) + 1)))
134133sumeq1d 11376 . . . . . . . . . . . . . . 15 (๐‘› = (๐‘š โˆ’ ๐‘—) โ†’ ฮฃ๐‘˜ โˆˆ (โ„คโ‰ฅโ€˜(๐‘› + 1))(๐บโ€˜๐‘˜) = ฮฃ๐‘˜ โˆˆ (โ„คโ‰ฅโ€˜((๐‘š โˆ’ ๐‘—) + 1))(๐บโ€˜๐‘˜))
135134fveq2d 5521 . . . . . . . . . . . . . 14 (๐‘› = (๐‘š โˆ’ ๐‘—) โ†’ (absโ€˜ฮฃ๐‘˜ โˆˆ (โ„คโ‰ฅโ€˜(๐‘› + 1))(๐บโ€˜๐‘˜)) = (absโ€˜ฮฃ๐‘˜ โˆˆ (โ„คโ‰ฅโ€˜((๐‘š โˆ’ ๐‘—) + 1))(๐บโ€˜๐‘˜)))
136135breq1d 4015 . . . . . . . . . . . . 13 (๐‘› = (๐‘š โˆ’ ๐‘—) โ†’ ((absโ€˜ฮฃ๐‘˜ โˆˆ (โ„คโ‰ฅโ€˜(๐‘› + 1))(๐บโ€˜๐‘˜)) < ((๐ธ / 2) / (ฮฃ๐‘— โˆˆ โ„•0 (๐พโ€˜๐‘—) + 1)) โ†” (absโ€˜ฮฃ๐‘˜ โˆˆ (โ„คโ‰ฅโ€˜((๐‘š โˆ’ ๐‘—) + 1))(๐บโ€˜๐‘˜)) < ((๐ธ / 2) / (ฮฃ๐‘— โˆˆ โ„•0 (๐พโ€˜๐‘—) + 1))))
1374simprd 114 . . . . . . . . . . . . . 14 (๐œ‘ โ†’ โˆ€๐‘› โˆˆ (โ„คโ‰ฅโ€˜๐‘ )(absโ€˜ฮฃ๐‘˜ โˆˆ (โ„คโ‰ฅโ€˜(๐‘› + 1))(๐บโ€˜๐‘˜)) < ((๐ธ / 2) / (ฮฃ๐‘— โˆˆ โ„•0 (๐พโ€˜๐‘—) + 1)))
138137ad2antrr 488 . . . . . . . . . . . . 13 (((๐œ‘ โˆง ๐‘š โˆˆ (โ„คโ‰ฅโ€˜(๐‘  + ๐‘ก))) โˆง ๐‘— โˆˆ (0...(๐‘š โˆ’ ๐‘ ))) โ†’ โˆ€๐‘› โˆˆ (โ„คโ‰ฅโ€˜๐‘ )(absโ€˜ฮฃ๐‘˜ โˆˆ (โ„คโ‰ฅโ€˜(๐‘› + 1))(๐บโ€˜๐‘˜)) < ((๐ธ / 2) / (ฮฃ๐‘— โˆˆ โ„•0 (๐พโ€˜๐‘—) + 1)))
139 elfzelz 10027 . . . . . . . . . . . . . . . . 17 (๐‘— โˆˆ (0...(๐‘š โˆ’ ๐‘ )) โ†’ ๐‘— โˆˆ โ„ค)
140139adantl 277 . . . . . . . . . . . . . . . 16 (((๐œ‘ โˆง ๐‘š โˆˆ (โ„คโ‰ฅโ€˜(๐‘  + ๐‘ก))) โˆง ๐‘— โˆˆ (0...(๐‘š โˆ’ ๐‘ ))) โ†’ ๐‘— โˆˆ โ„ค)
141140zred 9377 . . . . . . . . . . . . . . 15 (((๐œ‘ โˆง ๐‘š โˆˆ (โ„คโ‰ฅโ€˜(๐‘  + ๐‘ก))) โˆง ๐‘— โˆˆ (0...(๐‘š โˆ’ ๐‘ ))) โ†’ ๐‘— โˆˆ โ„)
14211ad2antlr 489 . . . . . . . . . . . . . . . 16 (((๐œ‘ โˆง ๐‘š โˆˆ (โ„คโ‰ฅโ€˜(๐‘  + ๐‘ก))) โˆง ๐‘— โˆˆ (0...(๐‘š โˆ’ ๐‘ ))) โ†’ ๐‘š โˆˆ โ„ค)
143142zred 9377 . . . . . . . . . . . . . . 15 (((๐œ‘ โˆง ๐‘š โˆˆ (โ„คโ‰ฅโ€˜(๐‘  + ๐‘ก))) โˆง ๐‘— โˆˆ (0...(๐‘š โˆ’ ๐‘ ))) โ†’ ๐‘š โˆˆ โ„)
14449ad2antrr 488 . . . . . . . . . . . . . . . 16 (((๐œ‘ โˆง ๐‘š โˆˆ (โ„คโ‰ฅโ€˜(๐‘  + ๐‘ก))) โˆง ๐‘— โˆˆ (0...(๐‘š โˆ’ ๐‘ ))) โ†’ ๐‘  โˆˆ โ„ค)
145144zred 9377 . . . . . . . . . . . . . . 15 (((๐œ‘ โˆง ๐‘š โˆˆ (โ„คโ‰ฅโ€˜(๐‘  + ๐‘ก))) โˆง ๐‘— โˆˆ (0...(๐‘š โˆ’ ๐‘ ))) โ†’ ๐‘  โˆˆ โ„)
146 elfzle2 10030 . . . . . . . . . . . . . . . 16 (๐‘— โˆˆ (0...(๐‘š โˆ’ ๐‘ )) โ†’ ๐‘— โ‰ค (๐‘š โˆ’ ๐‘ ))
147146adantl 277 . . . . . . . . . . . . . . 15 (((๐œ‘ โˆง ๐‘š โˆˆ (โ„คโ‰ฅโ€˜(๐‘  + ๐‘ก))) โˆง ๐‘— โˆˆ (0...(๐‘š โˆ’ ๐‘ ))) โ†’ ๐‘— โ‰ค (๐‘š โˆ’ ๐‘ ))
148141, 143, 145, 147lesubd 8508 . . . . . . . . . . . . . 14 (((๐œ‘ โˆง ๐‘š โˆˆ (โ„คโ‰ฅโ€˜(๐‘  + ๐‘ก))) โˆง ๐‘— โˆˆ (0...(๐‘š โˆ’ ๐‘ ))) โ†’ ๐‘  โ‰ค (๐‘š โˆ’ ๐‘—))
149142, 140zsubcld 9382 . . . . . . . . . . . . . . 15 (((๐œ‘ โˆง ๐‘š โˆˆ (โ„คโ‰ฅโ€˜(๐‘  + ๐‘ก))) โˆง ๐‘— โˆˆ (0...(๐‘š โˆ’ ๐‘ ))) โ†’ (๐‘š โˆ’ ๐‘—) โˆˆ โ„ค)
150 eluz 9543 . . . . . . . . . . . . . . 15 ((๐‘  โˆˆ โ„ค โˆง (๐‘š โˆ’ ๐‘—) โˆˆ โ„ค) โ†’ ((๐‘š โˆ’ ๐‘—) โˆˆ (โ„คโ‰ฅโ€˜๐‘ ) โ†” ๐‘  โ‰ค (๐‘š โˆ’ ๐‘—)))
151144, 149, 150syl2anc 411 . . . . . . . . . . . . . 14 (((๐œ‘ โˆง ๐‘š โˆˆ (โ„คโ‰ฅโ€˜(๐‘  + ๐‘ก))) โˆง ๐‘— โˆˆ (0...(๐‘š โˆ’ ๐‘ ))) โ†’ ((๐‘š โˆ’ ๐‘—) โˆˆ (โ„คโ‰ฅโ€˜๐‘ ) โ†” ๐‘  โ‰ค (๐‘š โˆ’ ๐‘—)))
152148, 151mpbird 167 . . . . . . . . . . . . 13 (((๐œ‘ โˆง ๐‘š โˆˆ (โ„คโ‰ฅโ€˜(๐‘  + ๐‘ก))) โˆง ๐‘— โˆˆ (0...(๐‘š โˆ’ ๐‘ ))) โ†’ (๐‘š โˆ’ ๐‘—) โˆˆ (โ„คโ‰ฅโ€˜๐‘ ))
153136, 138, 152rspcdva 2848 . . . . . . . . . . . 12 (((๐œ‘ โˆง ๐‘š โˆˆ (โ„คโ‰ฅโ€˜(๐‘  + ๐‘ก))) โˆง ๐‘— โˆˆ (0...(๐‘š โˆ’ ๐‘ ))) โ†’ (absโ€˜ฮฃ๐‘˜ โˆˆ (โ„คโ‰ฅโ€˜((๐‘š โˆ’ ๐‘—) + 1))(๐บโ€˜๐‘˜)) < ((๐ธ / 2) / (ฮฃ๐‘— โˆˆ โ„•0 (๐พโ€˜๐‘—) + 1)))
154132, 153eqbrtrrd 4029 . . . . . . . . . . 11 (((๐œ‘ โˆง ๐‘š โˆˆ (โ„คโ‰ฅโ€˜(๐‘  + ๐‘ก))) โˆง ๐‘— โˆˆ (0...(๐‘š โˆ’ ๐‘ ))) โ†’ (absโ€˜ฮฃ๐‘˜ โˆˆ (โ„คโ‰ฅโ€˜((๐‘š โˆ’ ๐‘—) + 1))๐ต) < ((๐ธ / 2) / (ฮฃ๐‘— โˆˆ โ„•0 (๐พโ€˜๐‘—) + 1)))
155128, 118, 154ltled 8078 . . . . . . . . . 10 (((๐œ‘ โˆง ๐‘š โˆˆ (โ„คโ‰ฅโ€˜(๐‘  + ๐‘ก))) โˆง ๐‘— โˆˆ (0...(๐‘š โˆ’ ๐‘ ))) โ†’ (absโ€˜ฮฃ๐‘˜ โˆˆ (โ„คโ‰ฅโ€˜((๐‘š โˆ’ ๐‘—) + 1))๐ต) โ‰ค ((๐ธ / 2) / (ฮฃ๐‘— โˆˆ โ„•0 (๐พโ€˜๐‘—) + 1)))
156 lemul2a 8818 . . . . . . . . . 10 ((((absโ€˜ฮฃ๐‘˜ โˆˆ (โ„คโ‰ฅโ€˜((๐‘š โˆ’ ๐‘—) + 1))๐ต) โˆˆ โ„ โˆง ((๐ธ / 2) / (ฮฃ๐‘— โˆˆ โ„•0 (๐พโ€˜๐‘—) + 1)) โˆˆ โ„ โˆง ((absโ€˜๐ด) โˆˆ โ„ โˆง 0 โ‰ค (absโ€˜๐ด))) โˆง (absโ€˜ฮฃ๐‘˜ โˆˆ (โ„คโ‰ฅโ€˜((๐‘š โˆ’ ๐‘—) + 1))๐ต) โ‰ค ((๐ธ / 2) / (ฮฃ๐‘— โˆˆ โ„•0 (๐พโ€˜๐‘—) + 1))) โ†’ ((absโ€˜๐ด) ยท (absโ€˜ฮฃ๐‘˜ โˆˆ (โ„คโ‰ฅโ€˜((๐‘š โˆ’ ๐‘—) + 1))๐ต)) โ‰ค ((absโ€˜๐ด) ยท ((๐ธ / 2) / (ฮฃ๐‘— โˆˆ โ„•0 (๐พโ€˜๐‘—) + 1))))
157128, 118, 130, 155, 156syl31anc 1241 . . . . . . . . 9 (((๐œ‘ โˆง ๐‘š โˆˆ (โ„คโ‰ฅโ€˜(๐‘  + ๐‘ก))) โˆง ๐‘— โˆˆ (0...(๐‘š โˆ’ ๐‘ ))) โ†’ ((absโ€˜๐ด) ยท (absโ€˜ฮฃ๐‘˜ โˆˆ (โ„คโ‰ฅโ€˜((๐‘š โˆ’ ๐‘—) + 1))๐ต)) โ‰ค ((absโ€˜๐ด) ยท ((๐ธ / 2) / (ฮฃ๐‘— โˆˆ โ„•0 (๐พโ€˜๐‘—) + 1))))
15852, 83, 119, 157fsumle 11473 . . . . . . . 8 ((๐œ‘ โˆง ๐‘š โˆˆ (โ„คโ‰ฅโ€˜(๐‘  + ๐‘ก))) โ†’ ฮฃ๐‘— โˆˆ (0...(๐‘š โˆ’ ๐‘ ))((absโ€˜๐ด) ยท (absโ€˜ฮฃ๐‘˜ โˆˆ (โ„คโ‰ฅโ€˜((๐‘š โˆ’ ๐‘—) + 1))๐ต)) โ‰ค ฮฃ๐‘— โˆˆ (0...(๐‘š โˆ’ ๐‘ ))((absโ€˜๐ด) ยท ((๐ธ / 2) / (ฮฃ๐‘— โˆˆ โ„•0 (๐พโ€˜๐‘—) + 1))))
159102recnd 7988 . . . . . . . . . 10 ((๐œ‘ โˆง ๐‘š โˆˆ (โ„คโ‰ฅโ€˜(๐‘  + ๐‘ก))) โ†’ ฮฃ๐‘— โˆˆ (0...(๐‘š โˆ’ ๐‘ ))(absโ€˜๐ด) โˆˆ โ„‚)
16097rpcnd 9700 . . . . . . . . . . 11 (๐œ‘ โ†’ (๐ธ / 2) โˆˆ โ„‚)
161160adantr 276 . . . . . . . . . 10 ((๐œ‘ โˆง ๐‘š โˆˆ (โ„คโ‰ฅโ€˜(๐‘  + ๐‘ก))) โ†’ (๐ธ / 2) โˆˆ โ„‚)
162 peano2re 8095 . . . . . . . . . . . . 13 (ฮฃ๐‘— โˆˆ โ„•0 (๐พโ€˜๐‘—) โˆˆ โ„ โ†’ (ฮฃ๐‘— โˆˆ โ„•0 (๐พโ€˜๐‘—) + 1) โˆˆ โ„)
163109, 162syl 14 . . . . . . . . . . . 12 (๐œ‘ โ†’ (ฮฃ๐‘— โˆˆ โ„•0 (๐พโ€˜๐‘—) + 1) โˆˆ โ„)
164163recnd 7988 . . . . . . . . . . 11 (๐œ‘ โ†’ (ฮฃ๐‘— โˆˆ โ„•0 (๐พโ€˜๐‘—) + 1) โˆˆ โ„‚)
165164adantr 276 . . . . . . . . . 10 ((๐œ‘ โˆง ๐‘š โˆˆ (โ„คโ‰ฅโ€˜(๐‘  + ๐‘ก))) โ†’ (ฮฃ๐‘— โˆˆ โ„•0 (๐พโ€˜๐‘—) + 1) โˆˆ โ„‚)
166114rpap0d 9704 . . . . . . . . . 10 ((๐œ‘ โˆง ๐‘š โˆˆ (โ„คโ‰ฅโ€˜(๐‘  + ๐‘ก))) โ†’ (ฮฃ๐‘— โˆˆ โ„•0 (๐พโ€˜๐‘—) + 1) # 0)
167159, 161, 165, 166divassapd 8785 . . . . . . . . 9 ((๐œ‘ โˆง ๐‘š โˆˆ (โ„คโ‰ฅโ€˜(๐‘  + ๐‘ก))) โ†’ ((ฮฃ๐‘— โˆˆ (0...(๐‘š โˆ’ ๐‘ ))(absโ€˜๐ด) ยท (๐ธ / 2)) / (ฮฃ๐‘— โˆˆ โ„•0 (๐พโ€˜๐‘—) + 1)) = (ฮฃ๐‘— โˆˆ (0...(๐‘š โˆ’ ๐‘ ))(absโ€˜๐ด) ยท ((๐ธ / 2) / (ฮฃ๐‘— โˆˆ โ„•0 (๐พโ€˜๐‘—) + 1))))
168 fveq2 5517 . . . . . . . . . . . . . . . . 17 (๐‘› = ๐‘— โ†’ (๐พโ€˜๐‘›) = (๐พโ€˜๐‘—))
169168cbvsumv 11371 . . . . . . . . . . . . . . . 16 ฮฃ๐‘› โˆˆ โ„•0 (๐พโ€˜๐‘›) = ฮฃ๐‘— โˆˆ โ„•0 (๐พโ€˜๐‘—)
170169oveq1i 5887 . . . . . . . . . . . . . . 15 (ฮฃ๐‘› โˆˆ โ„•0 (๐พโ€˜๐‘›) + 1) = (ฮฃ๐‘— โˆˆ โ„•0 (๐พโ€˜๐‘—) + 1)
171170oveq2i 5888 . . . . . . . . . . . . . 14 ((๐ธ / 2) / (ฮฃ๐‘› โˆˆ โ„•0 (๐พโ€˜๐‘›) + 1)) = ((๐ธ / 2) / (ฮฃ๐‘— โˆˆ โ„•0 (๐พโ€˜๐‘—) + 1))
172171, 116eqeltrid 2264 . . . . . . . . . . . . 13 (๐œ‘ โ†’ ((๐ธ / 2) / (ฮฃ๐‘› โˆˆ โ„•0 (๐พโ€˜๐‘›) + 1)) โˆˆ โ„+)
173172rpcnd 9700 . . . . . . . . . . . 12 (๐œ‘ โ†’ ((๐ธ / 2) / (ฮฃ๐‘› โˆˆ โ„•0 (๐พโ€˜๐‘›) + 1)) โˆˆ โ„‚)
174173adantr 276 . . . . . . . . . . 11 ((๐œ‘ โˆง ๐‘š โˆˆ (โ„คโ‰ฅโ€˜(๐‘  + ๐‘ก))) โ†’ ((๐ธ / 2) / (ฮฃ๐‘› โˆˆ โ„•0 (๐พโ€˜๐‘›) + 1)) โˆˆ โ„‚)
17579recnd 7988 . . . . . . . . . . . 12 ((๐œ‘ โˆง ๐‘— โˆˆ โ„•0) โ†’ (absโ€˜๐ด) โˆˆ โ„‚)
17614, 100, 175syl2an 289 . . . . . . . . . . 11 (((๐œ‘ โˆง ๐‘š โˆˆ (โ„คโ‰ฅโ€˜(๐‘  + ๐‘ก))) โˆง ๐‘— โˆˆ (0...(๐‘š โˆ’ ๐‘ ))) โ†’ (absโ€˜๐ด) โˆˆ โ„‚)
17752, 174, 176fsummulc1 11459 . . . . . . . . . 10 ((๐œ‘ โˆง ๐‘š โˆˆ (โ„คโ‰ฅโ€˜(๐‘  + ๐‘ก))) โ†’ (ฮฃ๐‘— โˆˆ (0...(๐‘š โˆ’ ๐‘ ))(absโ€˜๐ด) ยท ((๐ธ / 2) / (ฮฃ๐‘› โˆˆ โ„•0 (๐พโ€˜๐‘›) + 1))) = ฮฃ๐‘— โˆˆ (0...(๐‘š โˆ’ ๐‘ ))((absโ€˜๐ด) ยท ((๐ธ / 2) / (ฮฃ๐‘› โˆˆ โ„•0 (๐พโ€˜๐‘›) + 1))))
178171oveq2i 5888 . . . . . . . . . 10 (ฮฃ๐‘— โˆˆ (0...(๐‘š โˆ’ ๐‘ ))(absโ€˜๐ด) ยท ((๐ธ / 2) / (ฮฃ๐‘› โˆˆ โ„•0 (๐พโ€˜๐‘›) + 1))) = (ฮฃ๐‘— โˆˆ (0...(๐‘š โˆ’ ๐‘ ))(absโ€˜๐ด) ยท ((๐ธ / 2) / (ฮฃ๐‘— โˆˆ โ„•0 (๐พโ€˜๐‘—) + 1)))
179171oveq2i 5888 . . . . . . . . . . . 12 ((absโ€˜๐ด) ยท ((๐ธ / 2) / (ฮฃ๐‘› โˆˆ โ„•0 (๐พโ€˜๐‘›) + 1))) = ((absโ€˜๐ด) ยท ((๐ธ / 2) / (ฮฃ๐‘— โˆˆ โ„•0 (๐พโ€˜๐‘—) + 1)))
180179a1i 9 . . . . . . . . . . 11 (๐‘— โˆˆ (0...(๐‘š โˆ’ ๐‘ )) โ†’ ((absโ€˜๐ด) ยท ((๐ธ / 2) / (ฮฃ๐‘› โˆˆ โ„•0 (๐พโ€˜๐‘›) + 1))) = ((absโ€˜๐ด) ยท ((๐ธ / 2) / (ฮฃ๐‘— โˆˆ โ„•0 (๐พโ€˜๐‘—) + 1))))
181180sumeq2i 11374 . . . . . . . . . 10 ฮฃ๐‘— โˆˆ (0...(๐‘š โˆ’ ๐‘ ))((absโ€˜๐ด) ยท ((๐ธ / 2) / (ฮฃ๐‘› โˆˆ โ„•0 (๐พโ€˜๐‘›) + 1))) = ฮฃ๐‘— โˆˆ (0...(๐‘š โˆ’ ๐‘ ))((absโ€˜๐ด) ยท ((๐ธ / 2) / (ฮฃ๐‘— โˆˆ โ„•0 (๐พโ€˜๐‘—) + 1)))
182177, 178, 1813eqtr3g 2233 . . . . . . . . 9 ((๐œ‘ โˆง ๐‘š โˆˆ (โ„คโ‰ฅโ€˜(๐‘  + ๐‘ก))) โ†’ (ฮฃ๐‘— โˆˆ (0...(๐‘š โˆ’ ๐‘ ))(absโ€˜๐ด) ยท ((๐ธ / 2) / (ฮฃ๐‘— โˆˆ โ„•0 (๐พโ€˜๐‘—) + 1))) = ฮฃ๐‘— โˆˆ (0...(๐‘š โˆ’ ๐‘ ))((absโ€˜๐ด) ยท ((๐ธ / 2) / (ฮฃ๐‘— โˆˆ โ„•0 (๐พโ€˜๐‘—) + 1))))
183167, 182eqtrd 2210 . . . . . . . 8 ((๐œ‘ โˆง ๐‘š โˆˆ (โ„คโ‰ฅโ€˜(๐‘  + ๐‘ก))) โ†’ ((ฮฃ๐‘— โˆˆ (0...(๐‘š โˆ’ ๐‘ ))(absโ€˜๐ด) ยท (๐ธ / 2)) / (ฮฃ๐‘— โˆˆ โ„•0 (๐พโ€˜๐‘—) + 1)) = ฮฃ๐‘— โˆˆ (0...(๐‘š โˆ’ ๐‘ ))((absโ€˜๐ด) ยท ((๐ธ / 2) / (ฮฃ๐‘— โˆˆ โ„•0 (๐พโ€˜๐‘—) + 1))))
184158, 183breqtrrd 4033 . . . . . . 7 ((๐œ‘ โˆง ๐‘š โˆˆ (โ„คโ‰ฅโ€˜(๐‘  + ๐‘ก))) โ†’ ฮฃ๐‘— โˆˆ (0...(๐‘š โˆ’ ๐‘ ))((absโ€˜๐ด) ยท (absโ€˜ฮฃ๐‘˜ โˆˆ (โ„คโ‰ฅโ€˜((๐‘š โˆ’ ๐‘—) + 1))๐ต)) โ‰ค ((ฮฃ๐‘— โˆˆ (0...(๐‘š โˆ’ ๐‘ ))(absโ€˜๐ด) ยท (๐ธ / 2)) / (ฮฃ๐‘— โˆˆ โ„•0 (๐พโ€˜๐‘—) + 1)))
185109adantr 276 . . . . . . . . . 10 ((๐œ‘ โˆง ๐‘š โˆˆ (โ„คโ‰ฅโ€˜(๐‘  + ๐‘ก))) โ†’ ฮฃ๐‘— โˆˆ โ„•0 (๐พโ€˜๐‘—) โˆˆ โ„)
186163adantr 276 . . . . . . . . . 10 ((๐œ‘ โˆง ๐‘š โˆˆ (โ„คโ‰ฅโ€˜(๐‘  + ๐‘ก))) โ†’ (ฮฃ๐‘— โˆˆ โ„•0 (๐พโ€˜๐‘—) + 1) โˆˆ โ„)
187 fz0ssnn0 10118 . . . . . . . . . . . . 13 (0...(๐‘š โˆ’ ๐‘ )) โІ โ„•0
188187a1i 9 . . . . . . . . . . . 12 ((๐œ‘ โˆง ๐‘š โˆˆ (โ„คโ‰ฅโ€˜(๐‘  + ๐‘ก))) โ†’ (0...(๐‘š โˆ’ ๐‘ )) โІ โ„•0)
189106adantlr 477 . . . . . . . . . . . 12 (((๐œ‘ โˆง ๐‘š โˆˆ (โ„คโ‰ฅโ€˜(๐‘  + ๐‘ก))) โˆง ๐‘— โˆˆ โ„•0) โ†’ (๐พโ€˜๐‘—) = (absโ€˜๐ด))
190 nn0z 9275 . . . . . . . . . . . . . . 15 (๐‘— โˆˆ โ„•0 โ†’ ๐‘— โˆˆ โ„ค)
191190adantl 277 . . . . . . . . . . . . . 14 (((๐œ‘ โˆง ๐‘š โˆˆ (โ„คโ‰ฅโ€˜(๐‘  + ๐‘ก))) โˆง ๐‘— โˆˆ โ„•0) โ†’ ๐‘— โˆˆ โ„ค)
192 0zd 9267 . . . . . . . . . . . . . 14 (((๐œ‘ โˆง ๐‘š โˆˆ (โ„คโ‰ฅโ€˜(๐‘  + ๐‘ก))) โˆง ๐‘— โˆˆ โ„•0) โ†’ 0 โˆˆ โ„ค)
19351adantr 276 . . . . . . . . . . . . . 14 (((๐œ‘ โˆง ๐‘š โˆˆ (โ„คโ‰ฅโ€˜(๐‘  + ๐‘ก))) โˆง ๐‘— โˆˆ โ„•0) โ†’ (๐‘š โˆ’ ๐‘ ) โˆˆ โ„ค)
194 fzdcel 10042 . . . . . . . . . . . . . 14 ((๐‘— โˆˆ โ„ค โˆง 0 โˆˆ โ„ค โˆง (๐‘š โˆ’ ๐‘ ) โˆˆ โ„ค) โ†’ DECID ๐‘— โˆˆ (0...(๐‘š โˆ’ ๐‘ )))
195191, 192, 193, 194syl3anc 1238 . . . . . . . . . . . . 13 (((๐œ‘ โˆง ๐‘š โˆˆ (โ„คโ‰ฅโ€˜(๐‘  + ๐‘ก))) โˆง ๐‘— โˆˆ โ„•0) โ†’ DECID ๐‘— โˆˆ (0...(๐‘š โˆ’ ๐‘ )))
196195ralrimiva 2550 . . . . . . . . . . . 12 ((๐œ‘ โˆง ๐‘š โˆˆ (โ„คโ‰ฅโ€˜(๐‘  + ๐‘ก))) โ†’ โˆ€๐‘— โˆˆ โ„•0 DECID ๐‘— โˆˆ (0...(๐‘š โˆ’ ๐‘ )))
19779adantlr 477 . . . . . . . . . . . 12 (((๐œ‘ โˆง ๐‘š โˆˆ (โ„คโ‰ฅโ€˜(๐‘  + ๐‘ก))) โˆง ๐‘— โˆˆ โ„•0) โ†’ (absโ€˜๐ด) โˆˆ โ„)
198110adantlr 477 . . . . . . . . . . . 12 (((๐œ‘ โˆง ๐‘š โˆˆ (โ„คโ‰ฅโ€˜(๐‘  + ๐‘ก))) โˆง ๐‘— โˆˆ โ„•0) โ†’ 0 โ‰ค (absโ€˜๐ด))
199108adantr 276 . . . . . . . . . . . 12 ((๐œ‘ โˆง ๐‘š โˆˆ (โ„คโ‰ฅโ€˜(๐‘  + ๐‘ก))) โ†’ seq0( + , ๐พ) โˆˆ dom โ‡ )
20033, 10, 52, 188, 189, 196, 197, 198, 199isumlessdc 11506 . . . . . . . . . . 11 ((๐œ‘ โˆง ๐‘š โˆˆ (โ„คโ‰ฅโ€˜(๐‘  + ๐‘ก))) โ†’ ฮฃ๐‘— โˆˆ (0...(๐‘š โˆ’ ๐‘ ))(absโ€˜๐ด) โ‰ค ฮฃ๐‘— โˆˆ โ„•0 (absโ€˜๐ด))
201106sumeq2dv 11378 . . . . . . . . . . . 12 (๐œ‘ โ†’ ฮฃ๐‘— โˆˆ โ„•0 (๐พโ€˜๐‘—) = ฮฃ๐‘— โˆˆ โ„•0 (absโ€˜๐ด))
202201adantr 276 . . . . . . . . . . 11 ((๐œ‘ โˆง ๐‘š โˆˆ (โ„คโ‰ฅโ€˜(๐‘  + ๐‘ก))) โ†’ ฮฃ๐‘— โˆˆ โ„•0 (๐พโ€˜๐‘—) = ฮฃ๐‘— โˆˆ โ„•0 (absโ€˜๐ด))
203200, 202breqtrrd 4033 . . . . . . . . . 10 ((๐œ‘ โˆง ๐‘š โˆˆ (โ„คโ‰ฅโ€˜(๐‘  + ๐‘ก))) โ†’ ฮฃ๐‘— โˆˆ (0...(๐‘š โˆ’ ๐‘ ))(absโ€˜๐ด) โ‰ค ฮฃ๐‘— โˆˆ โ„•0 (๐พโ€˜๐‘—))
204109ltp1d 8889 . . . . . . . . . . 11 (๐œ‘ โ†’ ฮฃ๐‘— โˆˆ โ„•0 (๐พโ€˜๐‘—) < (ฮฃ๐‘— โˆˆ โ„•0 (๐พโ€˜๐‘—) + 1))
205204adantr 276 . . . . . . . . . 10 ((๐œ‘ โˆง ๐‘š โˆˆ (โ„คโ‰ฅโ€˜(๐‘  + ๐‘ก))) โ†’ ฮฃ๐‘— โˆˆ โ„•0 (๐พโ€˜๐‘—) < (ฮฃ๐‘— โˆˆ โ„•0 (๐พโ€˜๐‘—) + 1))
206102, 185, 186, 203, 205lelttrd 8084 . . . . . . . . 9 ((๐œ‘ โˆง ๐‘š โˆˆ (โ„คโ‰ฅโ€˜(๐‘  + ๐‘ก))) โ†’ ฮฃ๐‘— โˆˆ (0...(๐‘š โˆ’ ๐‘ ))(absโ€˜๐ด) < (ฮฃ๐‘— โˆˆ โ„•0 (๐พโ€˜๐‘—) + 1))
20797rpregt0d 9705 . . . . . . . . . . 11 (๐œ‘ โ†’ ((๐ธ / 2) โˆˆ โ„ โˆง 0 < (๐ธ / 2)))
208207adantr 276 . . . . . . . . . 10 ((๐œ‘ โˆง ๐‘š โˆˆ (โ„คโ‰ฅโ€˜(๐‘  + ๐‘ก))) โ†’ ((๐ธ / 2) โˆˆ โ„ โˆง 0 < (๐ธ / 2)))
209 ltmul1 8551 . . . . . . . . . 10 ((ฮฃ๐‘— โˆˆ (0...(๐‘š โˆ’ ๐‘ ))(absโ€˜๐ด) โˆˆ โ„ โˆง (ฮฃ๐‘— โˆˆ โ„•0 (๐พโ€˜๐‘—) + 1) โˆˆ โ„ โˆง ((๐ธ / 2) โˆˆ โ„ โˆง 0 < (๐ธ / 2))) โ†’ (ฮฃ๐‘— โˆˆ (0...(๐‘š โˆ’ ๐‘ ))(absโ€˜๐ด) < (ฮฃ๐‘— โˆˆ โ„•0 (๐พโ€˜๐‘—) + 1) โ†” (ฮฃ๐‘— โˆˆ (0...(๐‘š โˆ’ ๐‘ ))(absโ€˜๐ด) ยท (๐ธ / 2)) < ((ฮฃ๐‘— โˆˆ โ„•0 (๐พโ€˜๐‘—) + 1) ยท (๐ธ / 2))))
210102, 186, 208, 209syl3anc 1238 . . . . . . . . 9 ((๐œ‘ โˆง ๐‘š โˆˆ (โ„คโ‰ฅโ€˜(๐‘  + ๐‘ก))) โ†’ (ฮฃ๐‘— โˆˆ (0...(๐‘š โˆ’ ๐‘ ))(absโ€˜๐ด) < (ฮฃ๐‘— โˆˆ โ„•0 (๐พโ€˜๐‘—) + 1) โ†” (ฮฃ๐‘— โˆˆ (0...(๐‘š โˆ’ ๐‘ ))(absโ€˜๐ด) ยท (๐ธ / 2)) < ((ฮฃ๐‘— โˆˆ โ„•0 (๐พโ€˜๐‘—) + 1) ยท (๐ธ / 2))))
211206, 210mpbid 147 . . . . . . . 8 ((๐œ‘ โˆง ๐‘š โˆˆ (โ„คโ‰ฅโ€˜(๐‘  + ๐‘ก))) โ†’ (ฮฃ๐‘— โˆˆ (0...(๐‘š โˆ’ ๐‘ ))(absโ€˜๐ด) ยท (๐ธ / 2)) < ((ฮฃ๐‘— โˆˆ โ„•0 (๐พโ€˜๐‘—) + 1) ยท (๐ธ / 2)))
212113rpregt0d 9705 . . . . . . . . . 10 (๐œ‘ โ†’ ((ฮฃ๐‘— โˆˆ โ„•0 (๐พโ€˜๐‘—) + 1) โˆˆ โ„ โˆง 0 < (ฮฃ๐‘— โˆˆ โ„•0 (๐พโ€˜๐‘—) + 1)))
213212adantr 276 . . . . . . . . 9 ((๐œ‘ โˆง ๐‘š โˆˆ (โ„คโ‰ฅโ€˜(๐‘  + ๐‘ก))) โ†’ ((ฮฃ๐‘— โˆˆ โ„•0 (๐พโ€˜๐‘—) + 1) โˆˆ โ„ โˆง 0 < (ฮฃ๐‘— โˆˆ โ„•0 (๐พโ€˜๐‘—) + 1)))
214 ltdivmul 8835 . . . . . . . . 9 (((ฮฃ๐‘— โˆˆ (0...(๐‘š โˆ’ ๐‘ ))(absโ€˜๐ด) ยท (๐ธ / 2)) โˆˆ โ„ โˆง (๐ธ / 2) โˆˆ โ„ โˆง ((ฮฃ๐‘— โˆˆ โ„•0 (๐พโ€˜๐‘—) + 1) โˆˆ โ„ โˆง 0 < (ฮฃ๐‘— โˆˆ โ„•0 (๐พโ€˜๐‘—) + 1))) โ†’ (((ฮฃ๐‘— โˆˆ (0...(๐‘š โˆ’ ๐‘ ))(absโ€˜๐ด) ยท (๐ธ / 2)) / (ฮฃ๐‘— โˆˆ โ„•0 (๐พโ€˜๐‘—) + 1)) < (๐ธ / 2) โ†” (ฮฃ๐‘— โˆˆ (0...(๐‘š โˆ’ ๐‘ ))(absโ€˜๐ด) ยท (๐ธ / 2)) < ((ฮฃ๐‘— โˆˆ โ„•0 (๐พโ€˜๐‘—) + 1) ยท (๐ธ / 2))))
215103, 99, 213, 214syl3anc 1238 . . . . . . . 8 ((๐œ‘ โˆง ๐‘š โˆˆ (โ„คโ‰ฅโ€˜(๐‘  + ๐‘ก))) โ†’ (((ฮฃ๐‘— โˆˆ (0...(๐‘š โˆ’ ๐‘ ))(absโ€˜๐ด) ยท (๐ธ / 2)) / (ฮฃ๐‘— โˆˆ โ„•0 (๐พโ€˜๐‘—) + 1)) < (๐ธ / 2) โ†” (ฮฃ๐‘— โˆˆ (0...(๐‘š โˆ’ ๐‘ ))(absโ€˜๐ด) ยท (๐ธ / 2)) < ((ฮฃ๐‘— โˆˆ โ„•0 (๐พโ€˜๐‘—) + 1) ยท (๐ธ / 2))))
216211, 215mpbird 167 . . . . . . 7 ((๐œ‘ โˆง ๐‘š โˆˆ (โ„คโ‰ฅโ€˜(๐‘  + ๐‘ก))) โ†’ ((ฮฃ๐‘— โˆˆ (0...(๐‘š โˆ’ ๐‘ ))(absโ€˜๐ด) ยท (๐ธ / 2)) / (ฮฃ๐‘— โˆˆ โ„•0 (๐พโ€˜๐‘—) + 1)) < (๐ธ / 2))
21784, 115, 99, 184, 216lelttrd 8084 . . . . . 6 ((๐œ‘ โˆง ๐‘š โˆˆ (โ„คโ‰ฅโ€˜(๐‘  + ๐‘ก))) โ†’ ฮฃ๐‘— โˆˆ (0...(๐‘š โˆ’ ๐‘ ))((absโ€˜๐ด) ยท (absโ€˜ฮฃ๐‘˜ โˆˆ (โ„คโ‰ฅโ€˜((๐‘š โˆ’ ๐‘—) + 1))๐ต)) < (๐ธ / 2))
218 mertens.p . . . . . . . . . 10 (๐œ‘ โ†’ ๐‘ƒ โˆˆ โ„)
21998, 218remulcld 7990 . . . . . . . . 9 (๐œ‘ โ†’ ((๐ธ / 2) ยท ๐‘ƒ) โˆˆ โ„)
220 mertens.pge0 . . . . . . . . . 10 (๐œ‘ โ†’ 0 โ‰ค ๐‘ƒ)
221218, 220ge0p1rpd 9729 . . . . . . . . 9 (๐œ‘ โ†’ (๐‘ƒ + 1) โˆˆ โ„+)
222219, 221rerpdivcld 9730 . . . . . . . 8 (๐œ‘ โ†’ (((๐ธ / 2) ยท ๐‘ƒ) / (๐‘ƒ + 1)) โˆˆ โ„)
223222adantr 276 . . . . . . 7 ((๐œ‘ โˆง ๐‘š โˆˆ (โ„คโ‰ฅโ€˜(๐‘  + ๐‘ก))) โ†’ (((๐ธ / 2) ยท ๐‘ƒ) / (๐‘ƒ + 1)) โˆˆ โ„)
2245nnrpd 9696 . . . . . . . . . . . . . 14 (๐œ‘ โ†’ ๐‘  โˆˆ โ„+)
22597, 224rpdivcld 9716 . . . . . . . . . . . . 13 (๐œ‘ โ†’ ((๐ธ / 2) / ๐‘ ) โˆˆ โ„+)
226225, 221rpdivcld 9716 . . . . . . . . . . . 12 (๐œ‘ โ†’ (((๐ธ / 2) / ๐‘ ) / (๐‘ƒ + 1)) โˆˆ โ„+)
227226rpred 9698 . . . . . . . . . . 11 (๐œ‘ โ†’ (((๐ธ / 2) / ๐‘ ) / (๐‘ƒ + 1)) โˆˆ โ„)
228227, 218remulcld 7990 . . . . . . . . . 10 (๐œ‘ โ†’ ((((๐ธ / 2) / ๐‘ ) / (๐‘ƒ + 1)) ยท ๐‘ƒ) โˆˆ โ„)
229228ad2antrr 488 . . . . . . . . 9 (((๐œ‘ โˆง ๐‘š โˆˆ (โ„คโ‰ฅโ€˜(๐‘  + ๐‘ก))) โˆง ๐‘— โˆˆ (((๐‘š โˆ’ ๐‘ ) + 1)...๐‘š)) โ†’ ((((๐ธ / 2) / ๐‘ ) / (๐‘ƒ + 1)) ยท ๐‘ƒ) โˆˆ โ„)
230 simpll 527 . . . . . . . . . . . 12 (((๐œ‘ โˆง ๐‘š โˆˆ (โ„คโ‰ฅโ€˜(๐‘  + ๐‘ก))) โˆง ๐‘— โˆˆ (((๐‘š โˆ’ ๐‘ ) + 1)...๐‘š)) โ†’ ๐œ‘)
23194, 15syl 14 . . . . . . . . . . . 12 (((๐œ‘ โˆง ๐‘š โˆˆ (โ„คโ‰ฅโ€˜(๐‘  + ๐‘ก))) โˆง ๐‘— โˆˆ (((๐‘š โˆ’ ๐‘ ) + 1)...๐‘š)) โ†’ ๐‘— โˆˆ โ„•0)
232230, 231, 79syl2anc 411 . . . . . . . . . . 11 (((๐œ‘ โˆง ๐‘š โˆˆ (โ„คโ‰ฅโ€˜(๐‘  + ๐‘ก))) โˆง ๐‘— โˆˆ (((๐‘š โˆ’ ๐‘ ) + 1)...๐‘š)) โ†’ (absโ€˜๐ด) โˆˆ โ„)
233227ad2antrr 488 . . . . . . . . . . 11 (((๐œ‘ โˆง ๐‘š โˆˆ (โ„คโ‰ฅโ€˜(๐‘  + ๐‘ก))) โˆง ๐‘— โˆˆ (((๐‘š โˆ’ ๐‘ ) + 1)...๐‘š)) โ†’ (((๐ธ / 2) / ๐‘ ) / (๐‘ƒ + 1)) โˆˆ โ„)
234230, 231, 106syl2anc 411 . . . . . . . . . . . 12 (((๐œ‘ โˆง ๐‘š โˆˆ (โ„คโ‰ฅโ€˜(๐‘  + ๐‘ก))) โˆง ๐‘— โˆˆ (((๐‘š โˆ’ ๐‘ ) + 1)...๐‘š)) โ†’ (๐พโ€˜๐‘—) = (absโ€˜๐ด))
235 fveq2 5517 . . . . . . . . . . . . . 14 (๐‘š = ๐‘— โ†’ (๐พโ€˜๐‘š) = (๐พโ€˜๐‘—))
236235breq1d 4015 . . . . . . . . . . . . 13 (๐‘š = ๐‘— โ†’ ((๐พโ€˜๐‘š) < (((๐ธ / 2) / ๐‘ ) / (๐‘ƒ + 1)) โ†” (๐พโ€˜๐‘—) < (((๐ธ / 2) / ๐‘ ) / (๐‘ƒ + 1))))
2377simprd 114 . . . . . . . . . . . . . 14 (๐œ‘ โ†’ โˆ€๐‘š โˆˆ (โ„คโ‰ฅโ€˜๐‘ก)(๐พโ€˜๐‘š) < (((๐ธ / 2) / ๐‘ ) / (๐‘ƒ + 1)))
238237ad2antrr 488 . . . . . . . . . . . . 13 (((๐œ‘ โˆง ๐‘š โˆˆ (โ„คโ‰ฅโ€˜(๐‘  + ๐‘ก))) โˆง ๐‘— โˆˆ (((๐‘š โˆ’ ๐‘ ) + 1)...๐‘š)) โ†’ โˆ€๐‘š โˆˆ (โ„คโ‰ฅโ€˜๐‘ก)(๐พโ€˜๐‘š) < (((๐ธ / 2) / ๐‘ ) / (๐‘ƒ + 1)))
239 elfzuz 10023 . . . . . . . . . . . . . 14 (๐‘— โˆˆ (((๐‘š โˆ’ ๐‘ ) + 1)...๐‘š) โ†’ ๐‘— โˆˆ (โ„คโ‰ฅโ€˜((๐‘š โˆ’ ๐‘ ) + 1)))
240 eluzle 9542 . . . . . . . . . . . . . . . . . 18 (๐‘š โˆˆ (โ„คโ‰ฅโ€˜(๐‘  + ๐‘ก)) โ†’ (๐‘  + ๐‘ก) โ‰ค ๐‘š)
241240adantl 277 . . . . . . . . . . . . . . . . 17 ((๐œ‘ โˆง ๐‘š โˆˆ (โ„คโ‰ฅโ€˜(๐‘  + ๐‘ก))) โ†’ (๐‘  + ๐‘ก) โ‰ค ๐‘š)
2428nn0zd 9375 . . . . . . . . . . . . . . . . . . . 20 (๐œ‘ โ†’ ๐‘ก โˆˆ โ„ค)
243242adantr 276 . . . . . . . . . . . . . . . . . . 19 ((๐œ‘ โˆง ๐‘š โˆˆ (โ„คโ‰ฅโ€˜(๐‘  + ๐‘ก))) โ†’ ๐‘ก โˆˆ โ„ค)
244243zred 9377 . . . . . . . . . . . . . . . . . 18 ((๐œ‘ โˆง ๐‘š โˆˆ (โ„คโ‰ฅโ€˜(๐‘  + ๐‘ก))) โ†’ ๐‘ก โˆˆ โ„)
24556, 244, 55leaddsub2d 8506 . . . . . . . . . . . . . . . . 17 ((๐œ‘ โˆง ๐‘š โˆˆ (โ„คโ‰ฅโ€˜(๐‘  + ๐‘ก))) โ†’ ((๐‘  + ๐‘ก) โ‰ค ๐‘š โ†” ๐‘ก โ‰ค (๐‘š โˆ’ ๐‘ )))
246241, 245mpbid 147 . . . . . . . . . . . . . . . 16 ((๐œ‘ โˆง ๐‘š โˆˆ (โ„คโ‰ฅโ€˜(๐‘  + ๐‘ก))) โ†’ ๐‘ก โ‰ค (๐‘š โˆ’ ๐‘ ))
247 eluz 9543 . . . . . . . . . . . . . . . . 17 ((๐‘ก โˆˆ โ„ค โˆง (๐‘š โˆ’ ๐‘ ) โˆˆ โ„ค) โ†’ ((๐‘š โˆ’ ๐‘ ) โˆˆ (โ„คโ‰ฅโ€˜๐‘ก) โ†” ๐‘ก โ‰ค (๐‘š โˆ’ ๐‘ )))
248243, 72, 247syl2anc 411 . . . . . . . . . . . . . . . 16 ((๐œ‘ โˆง ๐‘š โˆˆ (โ„คโ‰ฅโ€˜(๐‘  + ๐‘ก))) โ†’ ((๐‘š โˆ’ ๐‘ ) โˆˆ (โ„คโ‰ฅโ€˜๐‘ก) โ†” ๐‘ก โ‰ค (๐‘š โˆ’ ๐‘ )))
249246, 248mpbird 167 . . . . . . . . . . . . . . 15 ((๐œ‘ โˆง ๐‘š โˆˆ (โ„คโ‰ฅโ€˜(๐‘  + ๐‘ก))) โ†’ (๐‘š โˆ’ ๐‘ ) โˆˆ (โ„คโ‰ฅโ€˜๐‘ก))
250 peano2uz 9585 . . . . . . . . . . . . . . 15 ((๐‘š โˆ’ ๐‘ ) โˆˆ (โ„คโ‰ฅโ€˜๐‘ก) โ†’ ((๐‘š โˆ’ ๐‘ ) + 1) โˆˆ (โ„คโ‰ฅโ€˜๐‘ก))
251249, 250syl 14 . . . . . . . . . . . . . 14 ((๐œ‘ โˆง ๐‘š โˆˆ (โ„คโ‰ฅโ€˜(๐‘  + ๐‘ก))) โ†’ ((๐‘š โˆ’ ๐‘ ) + 1) โˆˆ (โ„คโ‰ฅโ€˜๐‘ก))
252 uztrn 9546 . . . . . . . . . . . . . 14 ((๐‘— โˆˆ (โ„คโ‰ฅโ€˜((๐‘š โˆ’ ๐‘ ) + 1)) โˆง ((๐‘š โˆ’ ๐‘ ) + 1) โˆˆ (โ„คโ‰ฅโ€˜๐‘ก)) โ†’ ๐‘— โˆˆ (โ„คโ‰ฅโ€˜๐‘ก))
253239, 251, 252syl2anr 290 . . . . . . . . . . . . 13 (((๐œ‘ โˆง ๐‘š โˆˆ (โ„คโ‰ฅโ€˜(๐‘  + ๐‘ก))) โˆง ๐‘— โˆˆ (((๐‘š โˆ’ ๐‘ ) + 1)...๐‘š)) โ†’ ๐‘— โˆˆ (โ„คโ‰ฅโ€˜๐‘ก))
254236, 238, 253rspcdva 2848 . . . . . . . . . . . 12 (((๐œ‘ โˆง ๐‘š โˆˆ (โ„คโ‰ฅโ€˜(๐‘  + ๐‘ก))) โˆง ๐‘— โˆˆ (((๐‘š โˆ’ ๐‘ ) + 1)...๐‘š)) โ†’ (๐พโ€˜๐‘—) < (((๐ธ / 2) / ๐‘ ) / (๐‘ƒ + 1)))
255234, 254eqbrtrrd 4029 . . . . . . . . . . 11 (((๐œ‘ โˆง ๐‘š โˆˆ (โ„คโ‰ฅโ€˜(๐‘  + ๐‘ก))) โˆง ๐‘— โˆˆ (((๐‘š โˆ’ ๐‘ ) + 1)...๐‘š)) โ†’ (absโ€˜๐ด) < (((๐ธ / 2) / ๐‘ ) / (๐‘ƒ + 1)))
256232, 233, 255ltled 8078 . . . . . . . . . 10 (((๐œ‘ โˆง ๐‘š โˆˆ (โ„คโ‰ฅโ€˜(๐‘  + ๐‘ก))) โˆง ๐‘— โˆˆ (((๐‘š โˆ’ ๐‘ ) + 1)...๐‘š)) โ†’ (absโ€˜๐ด) โ‰ค (((๐ธ / 2) / ๐‘ ) / (๐‘ƒ + 1)))
257 breq1 4008 . . . . . . . . . . 11 (๐‘ค = (absโ€˜ฮฃ๐‘˜ โˆˆ (โ„คโ‰ฅโ€˜((๐‘š โˆ’ ๐‘—) + 1))๐ต) โ†’ (๐‘ค โ‰ค ๐‘ƒ โ†” (absโ€˜ฮฃ๐‘˜ โˆˆ (โ„คโ‰ฅโ€˜((๐‘š โˆ’ ๐‘—) + 1))๐ต) โ‰ค ๐‘ƒ))
258 mertens.pub . . . . . . . . . . . 12 (๐œ‘ โ†’ โˆ€๐‘ค โˆˆ ๐‘‡ ๐‘ค โ‰ค ๐‘ƒ)
259258ad2antrr 488 . . . . . . . . . . 11 (((๐œ‘ โˆง ๐‘š โˆˆ (โ„คโ‰ฅโ€˜(๐‘  + ๐‘ก))) โˆง ๐‘— โˆˆ (((๐‘š โˆ’ ๐‘ ) + 1)...๐‘š)) โ†’ โˆ€๐‘ค โˆˆ ๐‘‡ ๐‘ค โ‰ค ๐‘ƒ)
26055adantr 276 . . . . . . . . . . . . . . 15 (((๐œ‘ โˆง ๐‘š โˆˆ (โ„คโ‰ฅโ€˜(๐‘  + ๐‘ก))) โˆง ๐‘— โˆˆ (((๐‘š โˆ’ ๐‘ ) + 1)...๐‘š)) โ†’ ๐‘š โˆˆ โ„)
261 peano2zm 9293 . . . . . . . . . . . . . . . . . 18 (๐‘  โˆˆ โ„ค โ†’ (๐‘  โˆ’ 1) โˆˆ โ„ค)
26249, 261syl 14 . . . . . . . . . . . . . . . . 17 (๐œ‘ โ†’ (๐‘  โˆ’ 1) โˆˆ โ„ค)
263262zred 9377 . . . . . . . . . . . . . . . 16 (๐œ‘ โ†’ (๐‘  โˆ’ 1) โˆˆ โ„)
264263ad2antrr 488 . . . . . . . . . . . . . . 15 (((๐œ‘ โˆง ๐‘š โˆˆ (โ„คโ‰ฅโ€˜(๐‘  + ๐‘ก))) โˆง ๐‘— โˆˆ (((๐‘š โˆ’ ๐‘ ) + 1)...๐‘š)) โ†’ (๐‘  โˆ’ 1) โˆˆ โ„)
265231nn0red 9232 . . . . . . . . . . . . . . 15 (((๐œ‘ โˆง ๐‘š โˆˆ (โ„คโ‰ฅโ€˜(๐‘  + ๐‘ก))) โˆง ๐‘— โˆˆ (((๐‘š โˆ’ ๐‘ ) + 1)...๐‘š)) โ†’ ๐‘— โˆˆ โ„)
26612zcnd 9378 . . . . . . . . . . . . . . . . . 18 ((๐œ‘ โˆง ๐‘š โˆˆ (โ„คโ‰ฅโ€˜(๐‘  + ๐‘ก))) โ†’ ๐‘š โˆˆ โ„‚)
26756recnd 7988 . . . . . . . . . . . . . . . . . 18 ((๐œ‘ โˆง ๐‘š โˆˆ (โ„คโ‰ฅโ€˜(๐‘  + ๐‘ก))) โ†’ ๐‘  โˆˆ โ„‚)
268 1cnd 7975 . . . . . . . . . . . . . . . . . 18 ((๐œ‘ โˆง ๐‘š โˆˆ (โ„คโ‰ฅโ€˜(๐‘  + ๐‘ก))) โ†’ 1 โˆˆ โ„‚)
269266, 267, 268subsubd 8298 . . . . . . . . . . . . . . . . 17 ((๐œ‘ โˆง ๐‘š โˆˆ (โ„คโ‰ฅโ€˜(๐‘  + ๐‘ก))) โ†’ (๐‘š โˆ’ (๐‘  โˆ’ 1)) = ((๐‘š โˆ’ ๐‘ ) + 1))
270269adantr 276 . . . . . . . . . . . . . . . 16 (((๐œ‘ โˆง ๐‘š โˆˆ (โ„คโ‰ฅโ€˜(๐‘  + ๐‘ก))) โˆง ๐‘— โˆˆ (((๐‘š โˆ’ ๐‘ ) + 1)...๐‘š)) โ†’ (๐‘š โˆ’ (๐‘  โˆ’ 1)) = ((๐‘š โˆ’ ๐‘ ) + 1))
271 elfzle1 10029 . . . . . . . . . . . . . . . . 17 (๐‘— โˆˆ (((๐‘š โˆ’ ๐‘ ) + 1)...๐‘š) โ†’ ((๐‘š โˆ’ ๐‘ ) + 1) โ‰ค ๐‘—)
272271adantl 277 . . . . . . . . . . . . . . . 16 (((๐œ‘ โˆง ๐‘š โˆˆ (โ„คโ‰ฅโ€˜(๐‘  + ๐‘ก))) โˆง ๐‘— โˆˆ (((๐‘š โˆ’ ๐‘ ) + 1)...๐‘š)) โ†’ ((๐‘š โˆ’ ๐‘ ) + 1) โ‰ค ๐‘—)
273270, 272eqbrtrd 4027 . . . . . . . . . . . . . . 15 (((๐œ‘ โˆง ๐‘š โˆˆ (โ„คโ‰ฅโ€˜(๐‘  + ๐‘ก))) โˆง ๐‘— โˆˆ (((๐‘š โˆ’ ๐‘ ) + 1)...๐‘š)) โ†’ (๐‘š โˆ’ (๐‘  โˆ’ 1)) โ‰ค ๐‘—)
274260, 264, 265, 273subled 8507 . . . . . . . . . . . . . 14 (((๐œ‘ โˆง ๐‘š โˆˆ (โ„คโ‰ฅโ€˜(๐‘  + ๐‘ก))) โˆง ๐‘— โˆˆ (((๐‘š โˆ’ ๐‘ ) + 1)...๐‘š)) โ†’ (๐‘š โˆ’ ๐‘—) โ‰ค (๐‘  โˆ’ 1))
27594, 19syl 14 . . . . . . . . . . . . . . . 16 (((๐œ‘ โˆง ๐‘š โˆˆ (โ„คโ‰ฅโ€˜(๐‘  + ๐‘ก))) โˆง ๐‘— โˆˆ (((๐‘š โˆ’ ๐‘ ) + 1)...๐‘š)) โ†’ (๐‘š โˆ’ ๐‘—) โˆˆ โ„•0)
276275, 33eleqtrdi 2270 . . . . . . . . . . . . . . 15 (((๐œ‘ โˆง ๐‘š โˆˆ (โ„คโ‰ฅโ€˜(๐‘  + ๐‘ก))) โˆง ๐‘— โˆˆ (((๐‘š โˆ’ ๐‘ ) + 1)...๐‘š)) โ†’ (๐‘š โˆ’ ๐‘—) โˆˆ (โ„คโ‰ฅโ€˜0))
277262ad2antrr 488 . . . . . . . . . . . . . . 15 (((๐œ‘ โˆง ๐‘š โˆˆ (โ„คโ‰ฅโ€˜(๐‘  + ๐‘ก))) โˆง ๐‘— โˆˆ (((๐‘š โˆ’ ๐‘ ) + 1)...๐‘š)) โ†’ (๐‘  โˆ’ 1) โˆˆ โ„ค)
278 elfz5 10019 . . . . . . . . . . . . . . 15 (((๐‘š โˆ’ ๐‘—) โˆˆ (โ„คโ‰ฅโ€˜0) โˆง (๐‘  โˆ’ 1) โˆˆ โ„ค) โ†’ ((๐‘š โˆ’ ๐‘—) โˆˆ (0...(๐‘  โˆ’ 1)) โ†” (๐‘š โˆ’ ๐‘—) โ‰ค (๐‘  โˆ’ 1)))
279276, 277, 278syl2anc 411 . . . . . . . . . . . . . 14 (((๐œ‘ โˆง ๐‘š โˆˆ (โ„คโ‰ฅโ€˜(๐‘  + ๐‘ก))) โˆง ๐‘— โˆˆ (((๐‘š โˆ’ ๐‘ ) + 1)...๐‘š)) โ†’ ((๐‘š โˆ’ ๐‘—) โˆˆ (0...(๐‘  โˆ’ 1)) โ†” (๐‘š โˆ’ ๐‘—) โ‰ค (๐‘  โˆ’ 1)))
280274, 279mpbird 167 . . . . . . . . . . . . 13 (((๐œ‘ โˆง ๐‘š โˆˆ (โ„คโ‰ฅโ€˜(๐‘  + ๐‘ก))) โˆง ๐‘— โˆˆ (((๐‘š โˆ’ ๐‘ ) + 1)...๐‘š)) โ†’ (๐‘š โˆ’ ๐‘—) โˆˆ (0...(๐‘  โˆ’ 1)))
281 simplll 533 . . . . . . . . . . . . . . . . 17 ((((๐œ‘ โˆง ๐‘š โˆˆ (โ„คโ‰ฅโ€˜(๐‘  + ๐‘ก))) โˆง ๐‘— โˆˆ (((๐‘š โˆ’ ๐‘ ) + 1)...๐‘š)) โˆง ๐‘˜ โˆˆ (โ„คโ‰ฅโ€˜((๐‘š โˆ’ ๐‘—) + 1))) โ†’ ๐œ‘)
28294, 22syldan 282 . . . . . . . . . . . . . . . . . 18 (((๐œ‘ โˆง ๐‘š โˆˆ (โ„คโ‰ฅโ€˜(๐‘  + ๐‘ก))) โˆง ๐‘— โˆˆ (((๐‘š โˆ’ ๐‘ ) + 1)...๐‘š)) โ†’ ((๐‘š โˆ’ ๐‘—) + 1) โˆˆ โ„•0)
283282, 25sylan 283 . . . . . . . . . . . . . . . . 17 ((((๐œ‘ โˆง ๐‘š โˆˆ (โ„คโ‰ฅโ€˜(๐‘  + ๐‘ก))) โˆง ๐‘— โˆˆ (((๐‘š โˆ’ ๐‘ ) + 1)...๐‘š)) โˆง ๐‘˜ โˆˆ (โ„คโ‰ฅโ€˜((๐‘š โˆ’ ๐‘—) + 1))) โ†’ ๐‘˜ โˆˆ โ„•0)
284281, 283, 27syl2anc 411 . . . . . . . . . . . . . . . 16 ((((๐œ‘ โˆง ๐‘š โˆˆ (โ„คโ‰ฅโ€˜(๐‘  + ๐‘ก))) โˆง ๐‘— โˆˆ (((๐‘š โˆ’ ๐‘ ) + 1)...๐‘š)) โˆง ๐‘˜ โˆˆ (โ„คโ‰ฅโ€˜((๐‘š โˆ’ ๐‘—) + 1))) โ†’ (๐บโ€˜๐‘˜) = ๐ต)
285284sumeq2dv 11378 . . . . . . . . . . . . . . 15 (((๐œ‘ โˆง ๐‘š โˆˆ (โ„คโ‰ฅโ€˜(๐‘  + ๐‘ก))) โˆง ๐‘— โˆˆ (((๐‘š โˆ’ ๐‘ ) + 1)...๐‘š)) โ†’ ฮฃ๐‘˜ โˆˆ (โ„คโ‰ฅโ€˜((๐‘š โˆ’ ๐‘—) + 1))(๐บโ€˜๐‘˜) = ฮฃ๐‘˜ โˆˆ (โ„คโ‰ฅโ€˜((๐‘š โˆ’ ๐‘—) + 1))๐ต)
286285eqcomd 2183 . . . . . . . . . . . . . 14 (((๐œ‘ โˆง ๐‘š โˆˆ (โ„คโ‰ฅโ€˜(๐‘  + ๐‘ก))) โˆง ๐‘— โˆˆ (((๐‘š โˆ’ ๐‘ ) + 1)...๐‘š)) โ†’ ฮฃ๐‘˜ โˆˆ (โ„คโ‰ฅโ€˜((๐‘š โˆ’ ๐‘—) + 1))๐ต = ฮฃ๐‘˜ โˆˆ (โ„คโ‰ฅโ€˜((๐‘š โˆ’ ๐‘—) + 1))(๐บโ€˜๐‘˜))
287286fveq2d 5521 . . . . . . . . . . . . 13 (((๐œ‘ โˆง ๐‘š โˆˆ (โ„คโ‰ฅโ€˜(๐‘  + ๐‘ก))) โˆง ๐‘— โˆˆ (((๐‘š โˆ’ ๐‘ ) + 1)...๐‘š)) โ†’ (absโ€˜ฮฃ๐‘˜ โˆˆ (โ„คโ‰ฅโ€˜((๐‘š โˆ’ ๐‘—) + 1))๐ต) = (absโ€˜ฮฃ๐‘˜ โˆˆ (โ„คโ‰ฅโ€˜((๐‘š โˆ’ ๐‘—) + 1))(๐บโ€˜๐‘˜)))
288135rspceeqv 2861 . . . . . . . . . . . . 13 (((๐‘š โˆ’ ๐‘—) โˆˆ (0...(๐‘  โˆ’ 1)) โˆง (absโ€˜ฮฃ๐‘˜ โˆˆ (โ„คโ‰ฅโ€˜((๐‘š โˆ’ ๐‘—) + 1))๐ต) = (absโ€˜ฮฃ๐‘˜ โˆˆ (โ„คโ‰ฅโ€˜((๐‘š โˆ’ ๐‘—) + 1))(๐บโ€˜๐‘˜))) โ†’ โˆƒ๐‘› โˆˆ (0...(๐‘  โˆ’ 1))(absโ€˜ฮฃ๐‘˜ โˆˆ (โ„คโ‰ฅโ€˜((๐‘š โˆ’ ๐‘—) + 1))๐ต) = (absโ€˜ฮฃ๐‘˜ โˆˆ (โ„คโ‰ฅโ€˜(๐‘› + 1))(๐บโ€˜๐‘˜)))
289280, 287, 288syl2anc 411 . . . . . . . . . . . 12 (((๐œ‘ โˆง ๐‘š โˆˆ (โ„คโ‰ฅโ€˜(๐‘  + ๐‘ก))) โˆง ๐‘— โˆˆ (((๐‘š โˆ’ ๐‘ ) + 1)...๐‘š)) โ†’ โˆƒ๐‘› โˆˆ (0...(๐‘  โˆ’ 1))(absโ€˜ฮฃ๐‘˜ โˆˆ (โ„คโ‰ฅโ€˜((๐‘š โˆ’ ๐‘—) + 1))๐ต) = (absโ€˜ฮฃ๐‘˜ โˆˆ (โ„คโ‰ฅโ€˜(๐‘› + 1))(๐บโ€˜๐‘˜)))
29094, 39syldan 282 . . . . . . . . . . . . . 14 (((๐œ‘ โˆง ๐‘š โˆˆ (โ„คโ‰ฅโ€˜(๐‘  + ๐‘ก))) โˆง ๐‘— โˆˆ (((๐‘š โˆ’ ๐‘ ) + 1)...๐‘š)) โ†’ ฮฃ๐‘˜ โˆˆ (โ„คโ‰ฅโ€˜((๐‘š โˆ’ ๐‘—) + 1))๐ต โˆˆ โ„‚)
291290abscld 11192 . . . . . . . . . . . . 13 (((๐œ‘ โˆง ๐‘š โˆˆ (โ„คโ‰ฅโ€˜(๐‘  + ๐‘ก))) โˆง ๐‘— โˆˆ (((๐‘š โˆ’ ๐‘ ) + 1)...๐‘š)) โ†’ (absโ€˜ฮฃ๐‘˜ โˆˆ (โ„คโ‰ฅโ€˜((๐‘š โˆ’ ๐‘—) + 1))๐ต) โˆˆ โ„)
292 eqeq1 2184 . . . . . . . . . . . . . . 15 (๐‘ง = (absโ€˜ฮฃ๐‘˜ โˆˆ (โ„คโ‰ฅโ€˜((๐‘š โˆ’ ๐‘—) + 1))๐ต) โ†’ (๐‘ง = (absโ€˜ฮฃ๐‘˜ โˆˆ (โ„คโ‰ฅโ€˜(๐‘› + 1))(๐บโ€˜๐‘˜)) โ†” (absโ€˜ฮฃ๐‘˜ โˆˆ (โ„คโ‰ฅโ€˜((๐‘š โˆ’ ๐‘—) + 1))๐ต) = (absโ€˜ฮฃ๐‘˜ โˆˆ (โ„คโ‰ฅโ€˜(๐‘› + 1))(๐บโ€˜๐‘˜))))
293292rexbidv 2478 . . . . . . . . . . . . . 14 (๐‘ง = (absโ€˜ฮฃ๐‘˜ โˆˆ (โ„คโ‰ฅโ€˜((๐‘š โˆ’ ๐‘—) + 1))๐ต) โ†’ (โˆƒ๐‘› โˆˆ (0...(๐‘  โˆ’ 1))๐‘ง = (absโ€˜ฮฃ๐‘˜ โˆˆ (โ„คโ‰ฅโ€˜(๐‘› + 1))(๐บโ€˜๐‘˜)) โ†” โˆƒ๐‘› โˆˆ (0...(๐‘  โˆ’ 1))(absโ€˜ฮฃ๐‘˜ โˆˆ (โ„คโ‰ฅโ€˜((๐‘š โˆ’ ๐‘—) + 1))๐ต) = (absโ€˜ฮฃ๐‘˜ โˆˆ (โ„คโ‰ฅโ€˜(๐‘› + 1))(๐บโ€˜๐‘˜))))
294 mertens.10 . . . . . . . . . . . . . 14 ๐‘‡ = {๐‘ง โˆฃ โˆƒ๐‘› โˆˆ (0...(๐‘  โˆ’ 1))๐‘ง = (absโ€˜ฮฃ๐‘˜ โˆˆ (โ„คโ‰ฅโ€˜(๐‘› + 1))(๐บโ€˜๐‘˜))}
295293, 294elab2g 2886 . . . . . . . . . . . . 13 ((absโ€˜ฮฃ๐‘˜ โˆˆ (โ„คโ‰ฅโ€˜((๐‘š โˆ’ ๐‘—) + 1))๐ต) โˆˆ โ„ โ†’ ((absโ€˜ฮฃ๐‘˜ โˆˆ (โ„คโ‰ฅโ€˜((๐‘š โˆ’ ๐‘—) + 1))๐ต) โˆˆ ๐‘‡ โ†” โˆƒ๐‘› โˆˆ (0...(๐‘  โˆ’ 1))(absโ€˜ฮฃ๐‘˜ โˆˆ (โ„คโ‰ฅโ€˜((๐‘š โˆ’ ๐‘—) + 1))๐ต) = (absโ€˜ฮฃ๐‘˜ โˆˆ (โ„คโ‰ฅโ€˜(๐‘› + 1))(๐บโ€˜๐‘˜))))
296291, 295syl 14 . . . . . . . . . . . 12 (((๐œ‘ โˆง ๐‘š โˆˆ (โ„คโ‰ฅโ€˜(๐‘  + ๐‘ก))) โˆง ๐‘— โˆˆ (((๐‘š โˆ’ ๐‘ ) + 1)...๐‘š)) โ†’ ((absโ€˜ฮฃ๐‘˜ โˆˆ (โ„คโ‰ฅโ€˜((๐‘š โˆ’ ๐‘—) + 1))๐ต) โˆˆ ๐‘‡ โ†” โˆƒ๐‘› โˆˆ (0...(๐‘  โˆ’ 1))(absโ€˜ฮฃ๐‘˜ โˆˆ (โ„คโ‰ฅโ€˜((๐‘š โˆ’ ๐‘—) + 1))๐ต) = (absโ€˜ฮฃ๐‘˜ โˆˆ (โ„คโ‰ฅโ€˜(๐‘› + 1))(๐บโ€˜๐‘˜))))
297289, 296mpbird 167 . . . . . . . . . . 11 (((๐œ‘ โˆง ๐‘š โˆˆ (โ„คโ‰ฅโ€˜(๐‘  + ๐‘ก))) โˆง ๐‘— โˆˆ (((๐‘š โˆ’ ๐‘ ) + 1)...๐‘š)) โ†’ (absโ€˜ฮฃ๐‘˜ โˆˆ (โ„คโ‰ฅโ€˜((๐‘š โˆ’ ๐‘—) + 1))๐ต) โˆˆ ๐‘‡)
298257, 259, 297rspcdva 2848 . . . . . . . . . 10 (((๐œ‘ โˆง ๐‘š โˆˆ (โ„คโ‰ฅโ€˜(๐‘  + ๐‘ก))) โˆง ๐‘— โˆˆ (((๐‘š โˆ’ ๐‘ ) + 1)...๐‘š)) โ†’ (absโ€˜ฮฃ๐‘˜ โˆˆ (โ„คโ‰ฅโ€˜((๐‘š โˆ’ ๐‘—) + 1))๐ต) โ‰ค ๐‘ƒ)
299230, 231, 129syl2anc 411 . . . . . . . . . . 11 (((๐œ‘ โˆง ๐‘š โˆˆ (โ„คโ‰ฅโ€˜(๐‘  + ๐‘ก))) โˆง ๐‘— โˆˆ (((๐‘š โˆ’ ๐‘ ) + 1)...๐‘š)) โ†’ ((absโ€˜๐ด) โˆˆ โ„ โˆง 0 โ‰ค (absโ€˜๐ด)))
30094, 81syldan 282 . . . . . . . . . . . 12 (((๐œ‘ โˆง ๐‘š โˆˆ (โ„คโ‰ฅโ€˜(๐‘  + ๐‘ก))) โˆง ๐‘— โˆˆ (((๐‘š โˆ’ ๐‘ ) + 1)...๐‘š)) โ†’ (absโ€˜ฮฃ๐‘˜ โˆˆ (โ„คโ‰ฅโ€˜((๐‘š โˆ’ ๐‘—) + 1))๐ต) โˆˆ โ„)
30139absge0d 11195 . . . . . . . . . . . . 13 (((๐œ‘ โˆง ๐‘š โˆˆ (โ„คโ‰ฅโ€˜(๐‘  + ๐‘ก))) โˆง ๐‘— โˆˆ (0...๐‘š)) โ†’ 0 โ‰ค (absโ€˜ฮฃ๐‘˜ โˆˆ (โ„คโ‰ฅโ€˜((๐‘š โˆ’ ๐‘—) + 1))๐ต))
30294, 301syldan 282 . . . . . . . . . . . 12 (((๐œ‘ โˆง ๐‘š โˆˆ (โ„คโ‰ฅโ€˜(๐‘  + ๐‘ก))) โˆง ๐‘— โˆˆ (((๐‘š โˆ’ ๐‘ ) + 1)...๐‘š)) โ†’ 0 โ‰ค (absโ€˜ฮฃ๐‘˜ โˆˆ (โ„คโ‰ฅโ€˜((๐‘š โˆ’ ๐‘—) + 1))๐ต))
303300, 302jca 306 . . . . . . . . . . 11 (((๐œ‘ โˆง ๐‘š โˆˆ (โ„คโ‰ฅโ€˜(๐‘  + ๐‘ก))) โˆง ๐‘— โˆˆ (((๐‘š โˆ’ ๐‘ ) + 1)...๐‘š)) โ†’ ((absโ€˜ฮฃ๐‘˜ โˆˆ (โ„คโ‰ฅโ€˜((๐‘š โˆ’ ๐‘—) + 1))๐ต) โˆˆ โ„ โˆง 0 โ‰ค (absโ€˜ฮฃ๐‘˜ โˆˆ (โ„คโ‰ฅโ€˜((๐‘š โˆ’ ๐‘—) + 1))๐ต)))
304218ad2antrr 488 . . . . . . . . . . 11 (((๐œ‘ โˆง ๐‘š โˆˆ (โ„คโ‰ฅโ€˜(๐‘  + ๐‘ก))) โˆง ๐‘— โˆˆ (((๐‘š โˆ’ ๐‘ ) + 1)...๐‘š)) โ†’ ๐‘ƒ โˆˆ โ„)
305 lemul12a 8821 . . . . . . . . . . 11 (((((absโ€˜๐ด) โˆˆ โ„ โˆง 0 โ‰ค (absโ€˜๐ด)) โˆง (((๐ธ / 2) / ๐‘ ) / (๐‘ƒ + 1)) โˆˆ โ„) โˆง (((absโ€˜ฮฃ๐‘˜ โˆˆ (โ„คโ‰ฅโ€˜((๐‘š โˆ’ ๐‘—) + 1))๐ต) โˆˆ โ„ โˆง 0 โ‰ค (absโ€˜ฮฃ๐‘˜ โˆˆ (โ„คโ‰ฅโ€˜((๐‘š โˆ’ ๐‘—) + 1))๐ต)) โˆง ๐‘ƒ โˆˆ โ„)) โ†’ (((absโ€˜๐ด) โ‰ค (((๐ธ / 2) / ๐‘ ) / (๐‘ƒ + 1)) โˆง (absโ€˜ฮฃ๐‘˜ โˆˆ (โ„คโ‰ฅโ€˜((๐‘š โˆ’ ๐‘—) + 1))๐ต) โ‰ค ๐‘ƒ) โ†’ ((absโ€˜๐ด) ยท (absโ€˜ฮฃ๐‘˜ โˆˆ (โ„คโ‰ฅโ€˜((๐‘š โˆ’ ๐‘—) + 1))๐ต)) โ‰ค ((((๐ธ / 2) / ๐‘ ) / (๐‘ƒ + 1)) ยท ๐‘ƒ)))
306299, 233, 303, 304, 305syl22anc 1239 . . . . . . . . . 10 (((๐œ‘ โˆง ๐‘š โˆˆ (โ„คโ‰ฅโ€˜(๐‘  + ๐‘ก))) โˆง ๐‘— โˆˆ (((๐‘š โˆ’ ๐‘ ) + 1)...๐‘š)) โ†’ (((absโ€˜๐ด) โ‰ค (((๐ธ / 2) / ๐‘ ) / (๐‘ƒ + 1)) โˆง (absโ€˜ฮฃ๐‘˜ โˆˆ (โ„คโ‰ฅโ€˜((๐‘š โˆ’ ๐‘—) + 1))๐ต) โ‰ค ๐‘ƒ) โ†’ ((absโ€˜๐ด) ยท (absโ€˜ฮฃ๐‘˜ โˆˆ (โ„คโ‰ฅโ€˜((๐‘š โˆ’ ๐‘—) + 1))๐ต)) โ‰ค ((((๐ธ / 2) / ๐‘ ) / (๐‘ƒ + 1)) ยท ๐‘ƒ)))
307256, 298, 306mp2and 433 . . . . . . . . 9 (((๐œ‘ โˆง ๐‘š โˆˆ (โ„คโ‰ฅโ€˜(๐‘  + ๐‘ก))) โˆง ๐‘— โˆˆ (((๐‘š โˆ’ ๐‘ ) + 1)...๐‘š)) โ†’ ((absโ€˜๐ด) ยท (absโ€˜ฮฃ๐‘˜ โˆˆ (โ„คโ‰ฅโ€˜((๐‘š โˆ’ ๐‘—) + 1))๐ต)) โ‰ค ((((๐ธ / 2) / ๐‘ ) / (๐‘ƒ + 1)) ยท ๐‘ƒ))
30886, 95, 229, 307fsumle 11473 . . . . . . . 8 ((๐œ‘ โˆง ๐‘š โˆˆ (โ„คโ‰ฅโ€˜(๐‘  + ๐‘ก))) โ†’ ฮฃ๐‘— โˆˆ (((๐‘š โˆ’ ๐‘ ) + 1)...๐‘š)((absโ€˜๐ด) ยท (absโ€˜ฮฃ๐‘˜ โˆˆ (โ„คโ‰ฅโ€˜((๐‘š โˆ’ ๐‘—) + 1))๐ต)) โ‰ค ฮฃ๐‘— โˆˆ (((๐‘š โˆ’ ๐‘ ) + 1)...๐‘š)((((๐ธ / 2) / ๐‘ ) / (๐‘ƒ + 1)) ยท ๐‘ƒ))
309228recnd 7988 . . . . . . . . . . 11 (๐œ‘ โ†’ ((((๐ธ / 2) / ๐‘ ) / (๐‘ƒ + 1)) ยท ๐‘ƒ) โˆˆ โ„‚)
310309adantr 276 . . . . . . . . . 10 ((๐œ‘ โˆง ๐‘š โˆˆ (โ„คโ‰ฅโ€˜(๐‘  + ๐‘ก))) โ†’ ((((๐ธ / 2) / ๐‘ ) / (๐‘ƒ + 1)) ยท ๐‘ƒ) โˆˆ โ„‚)
311 fsumconst 11464 . . . . . . . . . 10 (((((๐‘š โˆ’ ๐‘ ) + 1)...๐‘š) โˆˆ Fin โˆง ((((๐ธ / 2) / ๐‘ ) / (๐‘ƒ + 1)) ยท ๐‘ƒ) โˆˆ โ„‚) โ†’ ฮฃ๐‘— โˆˆ (((๐‘š โˆ’ ๐‘ ) + 1)...๐‘š)((((๐ธ / 2) / ๐‘ ) / (๐‘ƒ + 1)) ยท ๐‘ƒ) = ((โ™ฏโ€˜(((๐‘š โˆ’ ๐‘ ) + 1)...๐‘š)) ยท ((((๐ธ / 2) / ๐‘ ) / (๐‘ƒ + 1)) ยท ๐‘ƒ)))
31286, 310, 311syl2anc 411 . . . . . . . . 9 ((๐œ‘ โˆง ๐‘š โˆˆ (โ„คโ‰ฅโ€˜(๐‘  + ๐‘ก))) โ†’ ฮฃ๐‘— โˆˆ (((๐‘š โˆ’ ๐‘ ) + 1)...๐‘š)((((๐ธ / 2) / ๐‘ ) / (๐‘ƒ + 1)) ยท ๐‘ƒ) = ((โ™ฏโ€˜(((๐‘š โˆ’ ๐‘ ) + 1)...๐‘š)) ยท ((((๐ธ / 2) / ๐‘ ) / (๐‘ƒ + 1)) ยท ๐‘ƒ)))
313 1zzd 9282 . . . . . . . . . . . . . 14 ((๐œ‘ โˆง ๐‘š โˆˆ (โ„คโ‰ฅโ€˜(๐‘  + ๐‘ก))) โ†’ 1 โˆˆ โ„ค)
314 fzen 10045 . . . . . . . . . . . . . 14 ((1 โˆˆ โ„ค โˆง ๐‘  โˆˆ โ„ค โˆง (๐‘š โˆ’ ๐‘ ) โˆˆ โ„ค) โ†’ (1...๐‘ ) โ‰ˆ ((1 + (๐‘š โˆ’ ๐‘ ))...(๐‘  + (๐‘š โˆ’ ๐‘ ))))
315313, 50, 72, 314syl3anc 1238 . . . . . . . . . . . . 13 ((๐œ‘ โˆง ๐‘š โˆˆ (โ„คโ‰ฅโ€˜(๐‘  + ๐‘ก))) โ†’ (1...๐‘ ) โ‰ˆ ((1 + (๐‘š โˆ’ ๐‘ ))...(๐‘  + (๐‘š โˆ’ ๐‘ ))))
316 ax-1cn 7906 . . . . . . . . . . . . . . 15 1 โˆˆ โ„‚
31772zcnd 9378 . . . . . . . . . . . . . . 15 ((๐œ‘ โˆง ๐‘š โˆˆ (โ„คโ‰ฅโ€˜(๐‘  + ๐‘ก))) โ†’ (๐‘š โˆ’ ๐‘ ) โˆˆ โ„‚)
318 addcom 8096 . . . . . . . . . . . . . . 15 ((1 โˆˆ โ„‚ โˆง (๐‘š โˆ’ ๐‘ ) โˆˆ โ„‚) โ†’ (1 + (๐‘š โˆ’ ๐‘ )) = ((๐‘š โˆ’ ๐‘ ) + 1))
319316, 317, 318sylancr 414 . . . . . . . . . . . . . 14 ((๐œ‘ โˆง ๐‘š โˆˆ (โ„คโ‰ฅโ€˜(๐‘  + ๐‘ก))) โ†’ (1 + (๐‘š โˆ’ ๐‘ )) = ((๐‘š โˆ’ ๐‘ ) + 1))
320267, 266pncan3d 8273 . . . . . . . . . . . . . 14 ((๐œ‘ โˆง ๐‘š โˆˆ (โ„คโ‰ฅโ€˜(๐‘  + ๐‘ก))) โ†’ (๐‘  + (๐‘š โˆ’ ๐‘ )) = ๐‘š)
321319, 320oveq12d 5895 . . . . . . . . . . . . 13 ((๐œ‘ โˆง ๐‘š โˆˆ (โ„คโ‰ฅโ€˜(๐‘  + ๐‘ก))) โ†’ ((1 + (๐‘š โˆ’ ๐‘ ))...(๐‘  + (๐‘š โˆ’ ๐‘ ))) = (((๐‘š โˆ’ ๐‘ ) + 1)...๐‘š))
322315, 321breqtrd 4031 . . . . . . . . . . . 12 ((๐œ‘ โˆง ๐‘š โˆˆ (โ„คโ‰ฅโ€˜(๐‘  + ๐‘ก))) โ†’ (1...๐‘ ) โ‰ˆ (((๐‘š โˆ’ ๐‘ ) + 1)...๐‘š))
323313, 50fzfigd 10433 . . . . . . . . . . . . 13 ((๐œ‘ โˆง ๐‘š โˆˆ (โ„คโ‰ฅโ€˜(๐‘  + ๐‘ก))) โ†’ (1...๐‘ ) โˆˆ Fin)
324 hashen 10766 . . . . . . . . . . . . 13 (((1...๐‘ ) โˆˆ Fin โˆง (((๐‘š โˆ’ ๐‘ ) + 1)...๐‘š) โˆˆ Fin) โ†’ ((โ™ฏโ€˜(1...๐‘ )) = (โ™ฏโ€˜(((๐‘š โˆ’ ๐‘ ) + 1)...๐‘š)) โ†” (1...๐‘ ) โ‰ˆ (((๐‘š โˆ’ ๐‘ ) + 1)...๐‘š)))
325323, 86, 324syl2anc 411 . . . . . . . . . . . 12 ((๐œ‘ โˆง ๐‘š โˆˆ (โ„คโ‰ฅโ€˜(๐‘  + ๐‘ก))) โ†’ ((โ™ฏโ€˜(1...๐‘ )) = (โ™ฏโ€˜(((๐‘š โˆ’ ๐‘ ) + 1)...๐‘š)) โ†” (1...๐‘ ) โ‰ˆ (((๐‘š โˆ’ ๐‘ ) + 1)...๐‘š)))
326322, 325mpbird 167 . . . . . . . . . . 11 ((๐œ‘ โˆง ๐‘š โˆˆ (โ„คโ‰ฅโ€˜(๐‘  + ๐‘ก))) โ†’ (โ™ฏโ€˜(1...๐‘ )) = (โ™ฏโ€˜(((๐‘š โˆ’ ๐‘ ) + 1)...๐‘š)))
327 hashfz1 10765 . . . . . . . . . . . 12 (๐‘  โˆˆ โ„•0 โ†’ (โ™ฏโ€˜(1...๐‘ )) = ๐‘ )
32853, 327syl 14 . . . . . . . . . . 11 ((๐œ‘ โˆง ๐‘š โˆˆ (โ„คโ‰ฅโ€˜(๐‘  + ๐‘ก))) โ†’ (โ™ฏโ€˜(1...๐‘ )) = ๐‘ )
329326, 328eqtr3d 2212 . . . . . . . . . 10 ((๐œ‘ โˆง ๐‘š โˆˆ (โ„คโ‰ฅโ€˜(๐‘  + ๐‘ก))) โ†’ (โ™ฏโ€˜(((๐‘š โˆ’ ๐‘ ) + 1)...๐‘š)) = ๐‘ )
330329oveq1d 5892 . . . . . . . . 9 ((๐œ‘ โˆง ๐‘š โˆˆ (โ„คโ‰ฅโ€˜(๐‘  + ๐‘ก))) โ†’ ((โ™ฏโ€˜(((๐‘š โˆ’ ๐‘ ) + 1)...๐‘š)) ยท ((((๐ธ / 2) / ๐‘ ) / (๐‘ƒ + 1)) ยท ๐‘ƒ)) = (๐‘  ยท ((((๐ธ / 2) / ๐‘ ) / (๐‘ƒ + 1)) ยท ๐‘ƒ)))
331218recnd 7988 . . . . . . . . . . . 12 (๐œ‘ โ†’ ๐‘ƒ โˆˆ โ„‚)
332221rpcnd 9700 . . . . . . . . . . . 12 (๐œ‘ โ†’ (๐‘ƒ + 1) โˆˆ โ„‚)
333221rpap0d 9704 . . . . . . . . . . . 12 (๐œ‘ โ†’ (๐‘ƒ + 1) # 0)
334160, 331, 332, 333div23apd 8787 . . . . . . . . . . 11 (๐œ‘ โ†’ (((๐ธ / 2) ยท ๐‘ƒ) / (๐‘ƒ + 1)) = (((๐ธ / 2) / (๐‘ƒ + 1)) ยท ๐‘ƒ))
33549zcnd 9378 . . . . . . . . . . . . . 14 (๐œ‘ โ†’ ๐‘  โˆˆ โ„‚)
336225rpcnd 9700 . . . . . . . . . . . . . 14 (๐œ‘ โ†’ ((๐ธ / 2) / ๐‘ ) โˆˆ โ„‚)
337335, 336, 332, 333divassapd 8785 . . . . . . . . . . . . 13 (๐œ‘ โ†’ ((๐‘  ยท ((๐ธ / 2) / ๐‘ )) / (๐‘ƒ + 1)) = (๐‘  ยท (((๐ธ / 2) / ๐‘ ) / (๐‘ƒ + 1))))
3385nnap0d 8967 . . . . . . . . . . . . . . 15 (๐œ‘ โ†’ ๐‘  # 0)
339160, 335, 338divcanap2d 8751 . . . . . . . . . . . . . 14 (๐œ‘ โ†’ (๐‘  ยท ((๐ธ / 2) / ๐‘ )) = (๐ธ / 2))
340339oveq1d 5892 . . . . . . . . . . . . 13 (๐œ‘ โ†’ ((๐‘  ยท ((๐ธ / 2) / ๐‘ )) / (๐‘ƒ + 1)) = ((๐ธ / 2) / (๐‘ƒ + 1)))
341337, 340eqtr3d 2212 . . . . . . . . . . . 12 (๐œ‘ โ†’ (๐‘  ยท (((๐ธ / 2) / ๐‘ ) / (๐‘ƒ + 1))) = ((๐ธ / 2) / (๐‘ƒ + 1)))
342341oveq1d 5892 . . . . . . . . . . 11 (๐œ‘ โ†’ ((๐‘  ยท (((๐ธ / 2) / ๐‘ ) / (๐‘ƒ + 1))) ยท ๐‘ƒ) = (((๐ธ / 2) / (๐‘ƒ + 1)) ยท ๐‘ƒ))
343226rpcnd 9700 . . . . . . . . . . . 12 (๐œ‘ โ†’ (((๐ธ / 2) / ๐‘ ) / (๐‘ƒ + 1)) โˆˆ โ„‚)
344335, 343, 331mulassd 7983 . . . . . . . . . . 11 (๐œ‘ โ†’ ((๐‘  ยท (((๐ธ / 2) / ๐‘ ) / (๐‘ƒ + 1))) ยท ๐‘ƒ) = (๐‘  ยท ((((๐ธ / 2) / ๐‘ ) / (๐‘ƒ + 1)) ยท ๐‘ƒ)))
345334, 342, 3443eqtr2rd 2217 . . . . . . . . . 10 (๐œ‘ โ†’ (๐‘  ยท ((((๐ธ / 2) / ๐‘ ) / (๐‘ƒ + 1)) ยท ๐‘ƒ)) = (((๐ธ / 2) ยท ๐‘ƒ) / (๐‘ƒ + 1)))
346345adantr 276 . . . . . . . . 9 ((๐œ‘ โˆง ๐‘š โˆˆ (โ„คโ‰ฅโ€˜(๐‘  + ๐‘ก))) โ†’ (๐‘  ยท ((((๐ธ / 2) / ๐‘ ) / (๐‘ƒ + 1)) ยท ๐‘ƒ)) = (((๐ธ / 2) ยท ๐‘ƒ) / (๐‘ƒ + 1)))
347312, 330, 3463eqtrd 2214 . . . . . . . 8 ((๐œ‘ โˆง ๐‘š โˆˆ (โ„คโ‰ฅโ€˜(๐‘  + ๐‘ก))) โ†’ ฮฃ๐‘— โˆˆ (((๐‘š โˆ’ ๐‘ ) + 1)...๐‘š)((((๐ธ / 2) / ๐‘ ) / (๐‘ƒ + 1)) ยท ๐‘ƒ) = (((๐ธ / 2) ยท ๐‘ƒ) / (๐‘ƒ + 1)))
348308, 347breqtrd 4031 . . . . . . 7 ((๐œ‘ โˆง ๐‘š โˆˆ (โ„คโ‰ฅโ€˜(๐‘  + ๐‘ก))) โ†’ ฮฃ๐‘— โˆˆ (((๐‘š โˆ’ ๐‘ ) + 1)...๐‘š)((absโ€˜๐ด) ยท (absโ€˜ฮฃ๐‘˜ โˆˆ (โ„คโ‰ฅโ€˜((๐‘š โˆ’ ๐‘—) + 1))๐ต)) โ‰ค (((๐ธ / 2) ยท ๐‘ƒ) / (๐‘ƒ + 1)))
349 peano2re 8095 . . . . . . . . . . 11 (๐‘ƒ โˆˆ โ„ โ†’ (๐‘ƒ + 1) โˆˆ โ„)
350218, 349syl 14 . . . . . . . . . 10 (๐œ‘ โ†’ (๐‘ƒ + 1) โˆˆ โ„)
351218ltp1d 8889 . . . . . . . . . 10 (๐œ‘ โ†’ ๐‘ƒ < (๐‘ƒ + 1))
352218, 350, 97, 351ltmul2dd 9755 . . . . . . . . 9 (๐œ‘ โ†’ ((๐ธ / 2) ยท ๐‘ƒ) < ((๐ธ / 2) ยท (๐‘ƒ + 1)))
353219, 98, 221ltdivmul2d 9751 . . . . . . . . 9 (๐œ‘ โ†’ ((((๐ธ / 2) ยท ๐‘ƒ) / (๐‘ƒ + 1)) < (๐ธ / 2) โ†” ((๐ธ / 2) ยท ๐‘ƒ) < ((๐ธ / 2) ยท (๐‘ƒ + 1))))
354352, 353mpbird 167 . . . . . . . 8 (๐œ‘ โ†’ (((๐ธ / 2) ยท ๐‘ƒ) / (๐‘ƒ + 1)) < (๐ธ / 2))
355354adantr 276 . . . . . . 7 ((๐œ‘ โˆง ๐‘š โˆˆ (โ„คโ‰ฅโ€˜(๐‘  + ๐‘ก))) โ†’ (((๐ธ / 2) ยท ๐‘ƒ) / (๐‘ƒ + 1)) < (๐ธ / 2))
35696, 223, 99, 348, 355lelttrd 8084 . . . . . 6 ((๐œ‘ โˆง ๐‘š โˆˆ (โ„คโ‰ฅโ€˜(๐‘  + ๐‘ก))) โ†’ ฮฃ๐‘— โˆˆ (((๐‘š โˆ’ ๐‘ ) + 1)...๐‘š)((absโ€˜๐ด) ยท (absโ€˜ฮฃ๐‘˜ โˆˆ (โ„คโ‰ฅโ€˜((๐‘š โˆ’ ๐‘—) + 1))๐ต)) < (๐ธ / 2))
35784, 96, 99, 99, 217, 356lt2addd 8526 . . . . 5 ((๐œ‘ โˆง ๐‘š โˆˆ (โ„คโ‰ฅโ€˜(๐‘  + ๐‘ก))) โ†’ (ฮฃ๐‘— โˆˆ (0...(๐‘š โˆ’ ๐‘ ))((absโ€˜๐ด) ยท (absโ€˜ฮฃ๐‘˜ โˆˆ (โ„คโ‰ฅโ€˜((๐‘š โˆ’ ๐‘—) + 1))๐ต)) + ฮฃ๐‘— โˆˆ (((๐‘š โˆ’ ๐‘ ) + 1)...๐‘š)((absโ€˜๐ด) ยท (absโ€˜ฮฃ๐‘˜ โˆˆ (โ„คโ‰ฅโ€˜((๐‘š โˆ’ ๐‘—) + 1))๐ต))) < ((๐ธ / 2) + (๐ธ / 2)))
35817, 39absmuld 11205 . . . . . . 7 (((๐œ‘ โˆง ๐‘š โˆˆ (โ„คโ‰ฅโ€˜(๐‘  + ๐‘ก))) โˆง ๐‘— โˆˆ (0...๐‘š)) โ†’ (absโ€˜(๐ด ยท ฮฃ๐‘˜ โˆˆ (โ„คโ‰ฅโ€˜((๐‘š โˆ’ ๐‘—) + 1))๐ต)) = ((absโ€˜๐ด) ยท (absโ€˜ฮฃ๐‘˜ โˆˆ (โ„คโ‰ฅโ€˜((๐‘š โˆ’ ๐‘—) + 1))๐ต)))
359358sumeq2dv 11378 . . . . . 6 ((๐œ‘ โˆง ๐‘š โˆˆ (โ„คโ‰ฅโ€˜(๐‘  + ๐‘ก))) โ†’ ฮฃ๐‘— โˆˆ (0...๐‘š)(absโ€˜(๐ด ยท ฮฃ๐‘˜ โˆˆ (โ„คโ‰ฅโ€˜((๐‘š โˆ’ ๐‘—) + 1))๐ต)) = ฮฃ๐‘— โˆˆ (0...๐‘š)((absโ€˜๐ด) ยท (absโ€˜ฮฃ๐‘˜ โˆˆ (โ„คโ‰ฅโ€˜((๐‘š โˆ’ ๐‘—) + 1))๐ต)))
36072zred 9377 . . . . . . . . 9 ((๐œ‘ โˆง ๐‘š โˆˆ (โ„คโ‰ฅโ€˜(๐‘  + ๐‘ก))) โ†’ (๐‘š โˆ’ ๐‘ ) โˆˆ โ„)
361360ltp1d 8889 . . . . . . . 8 ((๐œ‘ โˆง ๐‘š โˆˆ (โ„คโ‰ฅโ€˜(๐‘  + ๐‘ก))) โ†’ (๐‘š โˆ’ ๐‘ ) < ((๐‘š โˆ’ ๐‘ ) + 1))
362 fzdisj 10054 . . . . . . . 8 ((๐‘š โˆ’ ๐‘ ) < ((๐‘š โˆ’ ๐‘ ) + 1) โ†’ ((0...(๐‘š โˆ’ ๐‘ )) โˆฉ (((๐‘š โˆ’ ๐‘ ) + 1)...๐‘š)) = โˆ…)
363361, 362syl 14 . . . . . . 7 ((๐œ‘ โˆง ๐‘š โˆˆ (โ„คโ‰ฅโ€˜(๐‘  + ๐‘ก))) โ†’ ((0...(๐‘š โˆ’ ๐‘ )) โˆฉ (((๐‘š โˆ’ ๐‘ ) + 1)...๐‘š)) = โˆ…)
364 fzsplit 10053 . . . . . . . 8 ((๐‘š โˆ’ ๐‘ ) โˆˆ (0...๐‘š) โ†’ (0...๐‘š) = ((0...(๐‘š โˆ’ ๐‘ )) โˆช (((๐‘š โˆ’ ๐‘ ) + 1)...๐‘š)))
36570, 364syl 14 . . . . . . 7 ((๐œ‘ โˆง ๐‘š โˆˆ (โ„คโ‰ฅโ€˜(๐‘  + ๐‘ก))) โ†’ (0...๐‘š) = ((0...(๐‘š โˆ’ ๐‘ )) โˆช (((๐‘š โˆ’ ๐‘ ) + 1)...๐‘š)))
36682recnd 7988 . . . . . . 7 (((๐œ‘ โˆง ๐‘š โˆˆ (โ„คโ‰ฅโ€˜(๐‘  + ๐‘ก))) โˆง ๐‘— โˆˆ (0...๐‘š)) โ†’ ((absโ€˜๐ด) ยท (absโ€˜ฮฃ๐‘˜ โˆˆ (โ„คโ‰ฅโ€˜((๐‘š โˆ’ ๐‘—) + 1))๐ต)) โˆˆ โ„‚)
367363, 365, 13, 366fsumsplit 11417 . . . . . 6 ((๐œ‘ โˆง ๐‘š โˆˆ (โ„คโ‰ฅโ€˜(๐‘  + ๐‘ก))) โ†’ ฮฃ๐‘— โˆˆ (0...๐‘š)((absโ€˜๐ด) ยท (absโ€˜ฮฃ๐‘˜ โˆˆ (โ„คโ‰ฅโ€˜((๐‘š โˆ’ ๐‘—) + 1))๐ต)) = (ฮฃ๐‘— โˆˆ (0...(๐‘š โˆ’ ๐‘ ))((absโ€˜๐ด) ยท (absโ€˜ฮฃ๐‘˜ โˆˆ (โ„คโ‰ฅโ€˜((๐‘š โˆ’ ๐‘—) + 1))๐ต)) + ฮฃ๐‘— โˆˆ (((๐‘š โˆ’ ๐‘ ) + 1)...๐‘š)((absโ€˜๐ด) ยท (absโ€˜ฮฃ๐‘˜ โˆˆ (โ„คโ‰ฅโ€˜((๐‘š โˆ’ ๐‘—) + 1))๐ต))))
368359, 367eqtr2d 2211 . . . . 5 ((๐œ‘ โˆง ๐‘š โˆˆ (โ„คโ‰ฅโ€˜(๐‘  + ๐‘ก))) โ†’ (ฮฃ๐‘— โˆˆ (0...(๐‘š โˆ’ ๐‘ ))((absโ€˜๐ด) ยท (absโ€˜ฮฃ๐‘˜ โˆˆ (โ„คโ‰ฅโ€˜((๐‘š โˆ’ ๐‘—) + 1))๐ต)) + ฮฃ๐‘— โˆˆ (((๐‘š โˆ’ ๐‘ ) + 1)...๐‘š)((absโ€˜๐ด) ยท (absโ€˜ฮฃ๐‘˜ โˆˆ (โ„คโ‰ฅโ€˜((๐‘š โˆ’ ๐‘—) + 1))๐ต))) = ฮฃ๐‘— โˆˆ (0...๐‘š)(absโ€˜(๐ด ยท ฮฃ๐‘˜ โˆˆ (โ„คโ‰ฅโ€˜((๐‘š โˆ’ ๐‘—) + 1))๐ต)))
36945rpcnd 9700 . . . . . . 7 (๐œ‘ โ†’ ๐ธ โˆˆ โ„‚)
370369adantr 276 . . . . . 6 ((๐œ‘ โˆง ๐‘š โˆˆ (โ„คโ‰ฅโ€˜(๐‘  + ๐‘ก))) โ†’ ๐ธ โˆˆ โ„‚)
3713702halvesd 9166 . . . . 5 ((๐œ‘ โˆง ๐‘š โˆˆ (โ„คโ‰ฅโ€˜(๐‘  + ๐‘ก))) โ†’ ((๐ธ / 2) + (๐ธ / 2)) = ๐ธ)
372357, 368, 3713brtr3d 4036 . . . 4 ((๐œ‘ โˆง ๐‘š โˆˆ (โ„คโ‰ฅโ€˜(๐‘  + ๐‘ก))) โ†’ ฮฃ๐‘— โˆˆ (0...๐‘š)(absโ€˜(๐ด ยท ฮฃ๐‘˜ โˆˆ (โ„คโ‰ฅโ€˜((๐‘š โˆ’ ๐‘—) + 1))๐ต)) < ๐ธ)
37342, 44, 47, 48, 372lelttrd 8084 . . 3 ((๐œ‘ โˆง ๐‘š โˆˆ (โ„คโ‰ฅโ€˜(๐‘  + ๐‘ก))) โ†’ (absโ€˜ฮฃ๐‘— โˆˆ (0...๐‘š)(๐ด ยท ฮฃ๐‘˜ โˆˆ (โ„คโ‰ฅโ€˜((๐‘š โˆ’ ๐‘—) + 1))๐ต)) < ๐ธ)
374373ralrimiva 2550 . 2 (๐œ‘ โ†’ โˆ€๐‘š โˆˆ (โ„คโ‰ฅโ€˜(๐‘  + ๐‘ก))(absโ€˜ฮฃ๐‘— โˆˆ (0...๐‘š)(๐ด ยท ฮฃ๐‘˜ โˆˆ (โ„คโ‰ฅโ€˜((๐‘š โˆ’ ๐‘—) + 1))๐ต)) < ๐ธ)
375 fveq2 5517 . . . 4 (๐‘ฆ = (๐‘  + ๐‘ก) โ†’ (โ„คโ‰ฅโ€˜๐‘ฆ) = (โ„คโ‰ฅโ€˜(๐‘  + ๐‘ก)))
376375raleqdv 2679 . . 3 (๐‘ฆ = (๐‘  + ๐‘ก) โ†’ (โˆ€๐‘š โˆˆ (โ„คโ‰ฅโ€˜๐‘ฆ)(absโ€˜ฮฃ๐‘— โˆˆ (0...๐‘š)(๐ด ยท ฮฃ๐‘˜ โˆˆ (โ„คโ‰ฅโ€˜((๐‘š โˆ’ ๐‘—) + 1))๐ต)) < ๐ธ โ†” โˆ€๐‘š โˆˆ (โ„คโ‰ฅโ€˜(๐‘  + ๐‘ก))(absโ€˜ฮฃ๐‘— โˆˆ (0...๐‘š)(๐ด ยท ฮฃ๐‘˜ โˆˆ (โ„คโ‰ฅโ€˜((๐‘š โˆ’ ๐‘—) + 1))๐ต)) < ๐ธ))
377376rspcev 2843 . 2 (((๐‘  + ๐‘ก) โˆˆ โ„•0 โˆง โˆ€๐‘š โˆˆ (โ„คโ‰ฅโ€˜(๐‘  + ๐‘ก))(absโ€˜ฮฃ๐‘— โˆˆ (0...๐‘š)(๐ด ยท ฮฃ๐‘˜ โˆˆ (โ„คโ‰ฅโ€˜((๐‘š โˆ’ ๐‘—) + 1))๐ต)) < ๐ธ) โ†’ โˆƒ๐‘ฆ โˆˆ โ„•0 โˆ€๐‘š โˆˆ (โ„คโ‰ฅโ€˜๐‘ฆ)(absโ€˜ฮฃ๐‘— โˆˆ (0...๐‘š)(๐ด ยท ฮฃ๐‘˜ โˆˆ (โ„คโ‰ฅโ€˜((๐‘š โˆ’ ๐‘—) + 1))๐ต)) < ๐ธ)
3789, 374, 377syl2anc 411 1 (๐œ‘ โ†’ โˆƒ๐‘ฆ โˆˆ โ„•0 โˆ€๐‘š โˆˆ (โ„คโ‰ฅโ€˜๐‘ฆ)(absโ€˜ฮฃ๐‘— โˆˆ (0...๐‘š)(๐ด ยท ฮฃ๐‘˜ โˆˆ (โ„คโ‰ฅโ€˜((๐‘š โˆ’ ๐‘—) + 1))๐ต)) < ๐ธ)
Colors of variables: wff set class
Syntax hints:   โ†’ wi 4   โˆง wa 104   โ†” wb 105  DECID wdc 834   = wceq 1353   โˆˆ wcel 2148  {cab 2163  โˆ€wral 2455  โˆƒwrex 2456   โˆช cun 3129   โˆฉ cin 3130   โІ wss 3131  โˆ…c0 3424   class class class wbr 4005  dom cdm 4628  โ€˜cfv 5218  (class class class)co 5877   โ‰ˆ cen 6740  Fincfn 6742  โ„‚cc 7811  โ„cr 7812  0cc0 7813  1c1 7814   + caddc 7816   ยท cmul 7818   < clt 7994   โ‰ค cle 7995   โˆ’ cmin 8130   / cdiv 8631  โ„•cn 8921  2c2 8972  โ„•0cn0 9178  โ„คcz 9255  โ„คโ‰ฅcuz 9530  โ„+crp 9655  ...cfz 10010  seqcseq 10447  โ™ฏchash 10757  abscabs 11008   โ‡ cli 11288  ฮฃcsu 11363
This theorem was proved from axioms:  ax-mp 5  ax-1 6  ax-2 7  ax-ia1 106  ax-ia2 107  ax-ia3 108  ax-in1 614  ax-in2 615  ax-io 709  ax-5 1447  ax-7 1448  ax-gen 1449  ax-ie1 1493  ax-ie2 1494  ax-8 1504  ax-10 1505  ax-11 1506  ax-i12 1507  ax-bndl 1509  ax-4 1510  ax-17 1526  ax-i9 1530  ax-ial 1534  ax-i5r 1535  ax-13 2150  ax-14 2151  ax-ext 2159  ax-coll 4120  ax-sep 4123  ax-nul 4131  ax-pow 4176  ax-pr 4211  ax-un 4435  ax-setind 4538  ax-iinf 4589  ax-cnex 7904  ax-resscn 7905  ax-1cn 7906  ax-1re 7907  ax-icn 7908  ax-addcl 7909  ax-addrcl 7910  ax-mulcl 7911  ax-mulrcl 7912  ax-addcom 7913  ax-mulcom 7914  ax-addass 7915  ax-mulass 7916  ax-distr 7917  ax-i2m1 7918  ax-0lt1 7919  ax-1rid 7920  ax-0id 7921  ax-rnegex 7922  ax-precex 7923  ax-cnre 7924  ax-pre-ltirr 7925  ax-pre-ltwlin 7926  ax-pre-lttrn 7927  ax-pre-apti 7928  ax-pre-ltadd 7929  ax-pre-mulgt0 7930  ax-pre-mulext 7931  ax-arch 7932  ax-caucvg 7933
This theorem depends on definitions:  df-bi 117  df-dc 835  df-3or 979  df-3an 980  df-tru 1356  df-fal 1359  df-nf 1461  df-sb 1763  df-eu 2029  df-mo 2030  df-clab 2164  df-cleq 2170  df-clel 2173  df-nfc 2308  df-ne 2348  df-nel 2443  df-ral 2460  df-rex 2461  df-reu 2462  df-rmo 2463  df-rab 2464  df-v 2741  df-sbc 2965  df-csb 3060  df-dif 3133  df-un 3135  df-in 3137  df-ss 3144  df-nul 3425  df-if 3537  df-pw 3579  df-sn 3600  df-pr 3601  df-op 3603  df-uni 3812  df-int 3847  df-iun 3890  df-br 4006  df-opab 4067  df-mpt 4068  df-tr 4104  df-id 4295  df-po 4298  df-iso 4299  df-iord 4368  df-on 4370  df-ilim 4371  df-suc 4373  df-iom 4592  df-xp 4634  df-rel 4635  df-cnv 4636  df-co 4637  df-dm 4638  df-rn 4639  df-res 4640  df-ima 4641  df-iota 5180  df-fun 5220  df-fn 5221  df-f 5222  df-f1 5223  df-fo 5224  df-f1o 5225  df-fv 5226  df-isom 5227  df-riota 5833  df-ov 5880  df-oprab 5881  df-mpo 5882  df-1st 6143  df-2nd 6144  df-recs 6308  df-irdg 6373  df-frec 6394  df-1o 6419  df-oadd 6423  df-er 6537  df-en 6743  df-dom 6744  df-fin 6745  df-sup 6985  df-pnf 7996  df-mnf 7997  df-xr 7998  df-ltxr 7999  df-le 8000  df-sub 8132  df-neg 8133  df-reap 8534  df-ap 8541  df-div 8632  df-inn 8922  df-2 8980  df-3 8981  df-4 8982  df-n0 9179  df-z 9256  df-uz 9531  df-q 9622  df-rp 9656  df-ico 9896  df-fz 10011  df-fzo 10145  df-seqfrec 10448  df-exp 10522  df-ihash 10758  df-cj 10853  df-re 10854  df-im 10855  df-rsqrt 11009  df-abs 11010  df-clim 11289  df-sumdc 11364
This theorem is referenced by:  mertenslem2  11546
  Copyright terms: Public domain W3C validator