Metamath Proof Explorer


Theorem mertenslem1

Description: Lemma for mertens . (Contributed by Mario Carneiro, 29-Apr-2014)

Ref Expression
Hypotheses mertens.1 โŠข ( ( ๐œ‘ โˆง ๐‘— โˆˆ โ„•0 ) โ†’ ( ๐น โ€˜ ๐‘— ) = ๐ด )
mertens.2 โŠข ( ( ๐œ‘ โˆง ๐‘— โˆˆ โ„•0 ) โ†’ ( ๐พ โ€˜ ๐‘— ) = ( abs โ€˜ ๐ด ) )
mertens.3 โŠข ( ( ๐œ‘ โˆง ๐‘— โˆˆ โ„•0 ) โ†’ ๐ด โˆˆ โ„‚ )
mertens.4 โŠข ( ( ๐œ‘ โˆง ๐‘˜ โˆˆ โ„•0 ) โ†’ ( ๐บ โ€˜ ๐‘˜ ) = ๐ต )
mertens.5 โŠข ( ( ๐œ‘ โˆง ๐‘˜ โˆˆ โ„•0 ) โ†’ ๐ต โˆˆ โ„‚ )
mertens.6 โŠข ( ( ๐œ‘ โˆง ๐‘˜ โˆˆ โ„•0 ) โ†’ ( ๐ป โ€˜ ๐‘˜ ) = ฮฃ ๐‘— โˆˆ ( 0 ... ๐‘˜ ) ( ๐ด ยท ( ๐บ โ€˜ ( ๐‘˜ โˆ’ ๐‘— ) ) ) )
mertens.7 โŠข ( ๐œ‘ โ†’ seq 0 ( + , ๐พ ) โˆˆ dom โ‡ )
mertens.8 โŠข ( ๐œ‘ โ†’ seq 0 ( + , ๐บ ) โˆˆ dom โ‡ )
mertens.9 โŠข ( ๐œ‘ โ†’ ๐ธ โˆˆ โ„+ )
mertens.10 โŠข ๐‘‡ = { ๐‘ง โˆฃ โˆƒ ๐‘› โˆˆ ( 0 ... ( ๐‘  โˆ’ 1 ) ) ๐‘ง = ( abs โ€˜ ฮฃ ๐‘˜ โˆˆ ( โ„คโ‰ฅ โ€˜ ( ๐‘› + 1 ) ) ( ๐บ โ€˜ ๐‘˜ ) ) }
mertens.11 โŠข ( ๐œ“ โ†” ( ๐‘  โˆˆ โ„• โˆง โˆ€ ๐‘› โˆˆ ( โ„คโ‰ฅ โ€˜ ๐‘  ) ( abs โ€˜ ฮฃ ๐‘˜ โˆˆ ( โ„คโ‰ฅ โ€˜ ( ๐‘› + 1 ) ) ( ๐บ โ€˜ ๐‘˜ ) ) < ( ( ๐ธ / 2 ) / ( ฮฃ ๐‘— โˆˆ โ„•0 ( ๐พ โ€˜ ๐‘— ) + 1 ) ) ) )
mertens.12 โŠข ( ๐œ‘ โ†’ ( ๐œ“ โˆง ( ๐‘ก โˆˆ โ„•0 โˆง โˆ€ ๐‘š โˆˆ ( โ„คโ‰ฅ โ€˜ ๐‘ก ) ( ๐พ โ€˜ ๐‘š ) < ( ( ( ๐ธ / 2 ) / ๐‘  ) / ( sup ( ๐‘‡ , โ„ , < ) + 1 ) ) ) ) )
mertens.13 โŠข ( ๐œ‘ โ†’ ( 0 โ‰ค sup ( ๐‘‡ , โ„ , < ) โˆง ( ๐‘‡ โŠ† โ„ โˆง ๐‘‡ โ‰  โˆ… โˆง โˆƒ ๐‘ง โˆˆ โ„ โˆ€ ๐‘ค โˆˆ ๐‘‡ ๐‘ค โ‰ค ๐‘ง ) ) )
Assertion mertenslem1 ( ๐œ‘ โ†’ โˆƒ ๐‘ฆ โˆˆ โ„•0 โˆ€ ๐‘š โˆˆ ( โ„คโ‰ฅ โ€˜ ๐‘ฆ ) ( abs โ€˜ ฮฃ ๐‘— โˆˆ ( 0 ... ๐‘š ) ( ๐ด ยท ฮฃ ๐‘˜ โˆˆ ( โ„คโ‰ฅ โ€˜ ( ( ๐‘š โˆ’ ๐‘— ) + 1 ) ) ๐ต ) ) < ๐ธ )

Proof

Step Hyp Ref Expression
1 mertens.1 โŠข ( ( ๐œ‘ โˆง ๐‘— โˆˆ โ„•0 ) โ†’ ( ๐น โ€˜ ๐‘— ) = ๐ด )
2 mertens.2 โŠข ( ( ๐œ‘ โˆง ๐‘— โˆˆ โ„•0 ) โ†’ ( ๐พ โ€˜ ๐‘— ) = ( abs โ€˜ ๐ด ) )
3 mertens.3 โŠข ( ( ๐œ‘ โˆง ๐‘— โˆˆ โ„•0 ) โ†’ ๐ด โˆˆ โ„‚ )
4 mertens.4 โŠข ( ( ๐œ‘ โˆง ๐‘˜ โˆˆ โ„•0 ) โ†’ ( ๐บ โ€˜ ๐‘˜ ) = ๐ต )
5 mertens.5 โŠข ( ( ๐œ‘ โˆง ๐‘˜ โˆˆ โ„•0 ) โ†’ ๐ต โˆˆ โ„‚ )
6 mertens.6 โŠข ( ( ๐œ‘ โˆง ๐‘˜ โˆˆ โ„•0 ) โ†’ ( ๐ป โ€˜ ๐‘˜ ) = ฮฃ ๐‘— โˆˆ ( 0 ... ๐‘˜ ) ( ๐ด ยท ( ๐บ โ€˜ ( ๐‘˜ โˆ’ ๐‘— ) ) ) )
7 mertens.7 โŠข ( ๐œ‘ โ†’ seq 0 ( + , ๐พ ) โˆˆ dom โ‡ )
8 mertens.8 โŠข ( ๐œ‘ โ†’ seq 0 ( + , ๐บ ) โˆˆ dom โ‡ )
9 mertens.9 โŠข ( ๐œ‘ โ†’ ๐ธ โˆˆ โ„+ )
10 mertens.10 โŠข ๐‘‡ = { ๐‘ง โˆฃ โˆƒ ๐‘› โˆˆ ( 0 ... ( ๐‘  โˆ’ 1 ) ) ๐‘ง = ( abs โ€˜ ฮฃ ๐‘˜ โˆˆ ( โ„คโ‰ฅ โ€˜ ( ๐‘› + 1 ) ) ( ๐บ โ€˜ ๐‘˜ ) ) }
11 mertens.11 โŠข ( ๐œ“ โ†” ( ๐‘  โˆˆ โ„• โˆง โˆ€ ๐‘› โˆˆ ( โ„คโ‰ฅ โ€˜ ๐‘  ) ( abs โ€˜ ฮฃ ๐‘˜ โˆˆ ( โ„คโ‰ฅ โ€˜ ( ๐‘› + 1 ) ) ( ๐บ โ€˜ ๐‘˜ ) ) < ( ( ๐ธ / 2 ) / ( ฮฃ ๐‘— โˆˆ โ„•0 ( ๐พ โ€˜ ๐‘— ) + 1 ) ) ) )
12 mertens.12 โŠข ( ๐œ‘ โ†’ ( ๐œ“ โˆง ( ๐‘ก โˆˆ โ„•0 โˆง โˆ€ ๐‘š โˆˆ ( โ„คโ‰ฅ โ€˜ ๐‘ก ) ( ๐พ โ€˜ ๐‘š ) < ( ( ( ๐ธ / 2 ) / ๐‘  ) / ( sup ( ๐‘‡ , โ„ , < ) + 1 ) ) ) ) )
13 mertens.13 โŠข ( ๐œ‘ โ†’ ( 0 โ‰ค sup ( ๐‘‡ , โ„ , < ) โˆง ( ๐‘‡ โŠ† โ„ โˆง ๐‘‡ โ‰  โˆ… โˆง โˆƒ ๐‘ง โˆˆ โ„ โˆ€ ๐‘ค โˆˆ ๐‘‡ ๐‘ค โ‰ค ๐‘ง ) ) )
14 12 simpld โŠข ( ๐œ‘ โ†’ ๐œ“ )
15 14 11 sylib โŠข ( ๐œ‘ โ†’ ( ๐‘  โˆˆ โ„• โˆง โˆ€ ๐‘› โˆˆ ( โ„คโ‰ฅ โ€˜ ๐‘  ) ( abs โ€˜ ฮฃ ๐‘˜ โˆˆ ( โ„คโ‰ฅ โ€˜ ( ๐‘› + 1 ) ) ( ๐บ โ€˜ ๐‘˜ ) ) < ( ( ๐ธ / 2 ) / ( ฮฃ ๐‘— โˆˆ โ„•0 ( ๐พ โ€˜ ๐‘— ) + 1 ) ) ) )
16 15 simpld โŠข ( ๐œ‘ โ†’ ๐‘  โˆˆ โ„• )
17 16 nnnn0d โŠข ( ๐œ‘ โ†’ ๐‘  โˆˆ โ„•0 )
18 12 simprd โŠข ( ๐œ‘ โ†’ ( ๐‘ก โˆˆ โ„•0 โˆง โˆ€ ๐‘š โˆˆ ( โ„คโ‰ฅ โ€˜ ๐‘ก ) ( ๐พ โ€˜ ๐‘š ) < ( ( ( ๐ธ / 2 ) / ๐‘  ) / ( sup ( ๐‘‡ , โ„ , < ) + 1 ) ) ) )
19 18 simpld โŠข ( ๐œ‘ โ†’ ๐‘ก โˆˆ โ„•0 )
20 17 19 nn0addcld โŠข ( ๐œ‘ โ†’ ( ๐‘  + ๐‘ก ) โˆˆ โ„•0 )
21 fzfid โŠข ( ( ๐œ‘ โˆง ๐‘š โˆˆ ( โ„คโ‰ฅ โ€˜ ( ๐‘  + ๐‘ก ) ) ) โ†’ ( 0 ... ๐‘š ) โˆˆ Fin )
22 simpl โŠข ( ( ๐œ‘ โˆง ๐‘š โˆˆ ( โ„คโ‰ฅ โ€˜ ( ๐‘  + ๐‘ก ) ) ) โ†’ ๐œ‘ )
23 elfznn0 โŠข ( ๐‘— โˆˆ ( 0 ... ๐‘š ) โ†’ ๐‘— โˆˆ โ„•0 )
24 22 23 3 syl2an โŠข ( ( ( ๐œ‘ โˆง ๐‘š โˆˆ ( โ„คโ‰ฅ โ€˜ ( ๐‘  + ๐‘ก ) ) ) โˆง ๐‘— โˆˆ ( 0 ... ๐‘š ) ) โ†’ ๐ด โˆˆ โ„‚ )
25 eqid โŠข ( โ„คโ‰ฅ โ€˜ ( ( ๐‘š โˆ’ ๐‘— ) + 1 ) ) = ( โ„คโ‰ฅ โ€˜ ( ( ๐‘š โˆ’ ๐‘— ) + 1 ) )
26 fznn0sub โŠข ( ๐‘— โˆˆ ( 0 ... ๐‘š ) โ†’ ( ๐‘š โˆ’ ๐‘— ) โˆˆ โ„•0 )
27 26 adantl โŠข ( ( ( ๐œ‘ โˆง ๐‘š โˆˆ ( โ„คโ‰ฅ โ€˜ ( ๐‘  + ๐‘ก ) ) ) โˆง ๐‘— โˆˆ ( 0 ... ๐‘š ) ) โ†’ ( ๐‘š โˆ’ ๐‘— ) โˆˆ โ„•0 )
28 peano2nn0 โŠข ( ( ๐‘š โˆ’ ๐‘— ) โˆˆ โ„•0 โ†’ ( ( ๐‘š โˆ’ ๐‘— ) + 1 ) โˆˆ โ„•0 )
29 27 28 syl โŠข ( ( ( ๐œ‘ โˆง ๐‘š โˆˆ ( โ„คโ‰ฅ โ€˜ ( ๐‘  + ๐‘ก ) ) ) โˆง ๐‘— โˆˆ ( 0 ... ๐‘š ) ) โ†’ ( ( ๐‘š โˆ’ ๐‘— ) + 1 ) โˆˆ โ„•0 )
30 29 nn0zd โŠข ( ( ( ๐œ‘ โˆง ๐‘š โˆˆ ( โ„คโ‰ฅ โ€˜ ( ๐‘  + ๐‘ก ) ) ) โˆง ๐‘— โˆˆ ( 0 ... ๐‘š ) ) โ†’ ( ( ๐‘š โˆ’ ๐‘— ) + 1 ) โˆˆ โ„ค )
31 simplll โŠข ( ( ( ( ๐œ‘ โˆง ๐‘š โˆˆ ( โ„คโ‰ฅ โ€˜ ( ๐‘  + ๐‘ก ) ) ) โˆง ๐‘— โˆˆ ( 0 ... ๐‘š ) ) โˆง ๐‘˜ โˆˆ ( โ„คโ‰ฅ โ€˜ ( ( ๐‘š โˆ’ ๐‘— ) + 1 ) ) ) โ†’ ๐œ‘ )
32 eluznn0 โŠข ( ( ( ( ๐‘š โˆ’ ๐‘— ) + 1 ) โˆˆ โ„•0 โˆง ๐‘˜ โˆˆ ( โ„คโ‰ฅ โ€˜ ( ( ๐‘š โˆ’ ๐‘— ) + 1 ) ) ) โ†’ ๐‘˜ โˆˆ โ„•0 )
33 29 32 sylan โŠข ( ( ( ( ๐œ‘ โˆง ๐‘š โˆˆ ( โ„คโ‰ฅ โ€˜ ( ๐‘  + ๐‘ก ) ) ) โˆง ๐‘— โˆˆ ( 0 ... ๐‘š ) ) โˆง ๐‘˜ โˆˆ ( โ„คโ‰ฅ โ€˜ ( ( ๐‘š โˆ’ ๐‘— ) + 1 ) ) ) โ†’ ๐‘˜ โˆˆ โ„•0 )
34 31 33 4 syl2anc โŠข ( ( ( ( ๐œ‘ โˆง ๐‘š โˆˆ ( โ„คโ‰ฅ โ€˜ ( ๐‘  + ๐‘ก ) ) ) โˆง ๐‘— โˆˆ ( 0 ... ๐‘š ) ) โˆง ๐‘˜ โˆˆ ( โ„คโ‰ฅ โ€˜ ( ( ๐‘š โˆ’ ๐‘— ) + 1 ) ) ) โ†’ ( ๐บ โ€˜ ๐‘˜ ) = ๐ต )
35 31 33 5 syl2anc โŠข ( ( ( ( ๐œ‘ โˆง ๐‘š โˆˆ ( โ„คโ‰ฅ โ€˜ ( ๐‘  + ๐‘ก ) ) ) โˆง ๐‘— โˆˆ ( 0 ... ๐‘š ) ) โˆง ๐‘˜ โˆˆ ( โ„คโ‰ฅ โ€˜ ( ( ๐‘š โˆ’ ๐‘— ) + 1 ) ) ) โ†’ ๐ต โˆˆ โ„‚ )
36 8 ad2antrr โŠข ( ( ( ๐œ‘ โˆง ๐‘š โˆˆ ( โ„คโ‰ฅ โ€˜ ( ๐‘  + ๐‘ก ) ) ) โˆง ๐‘— โˆˆ ( 0 ... ๐‘š ) ) โ†’ seq 0 ( + , ๐บ ) โˆˆ dom โ‡ )
37 nn0uz โŠข โ„•0 = ( โ„คโ‰ฅ โ€˜ 0 )
38 simpll โŠข ( ( ( ๐œ‘ โˆง ๐‘š โˆˆ ( โ„คโ‰ฅ โ€˜ ( ๐‘  + ๐‘ก ) ) ) โˆง ๐‘— โˆˆ ( 0 ... ๐‘š ) ) โ†’ ๐œ‘ )
39 4 5 eqeltrd โŠข ( ( ๐œ‘ โˆง ๐‘˜ โˆˆ โ„•0 ) โ†’ ( ๐บ โ€˜ ๐‘˜ ) โˆˆ โ„‚ )
40 38 39 sylan โŠข ( ( ( ( ๐œ‘ โˆง ๐‘š โˆˆ ( โ„คโ‰ฅ โ€˜ ( ๐‘  + ๐‘ก ) ) ) โˆง ๐‘— โˆˆ ( 0 ... ๐‘š ) ) โˆง ๐‘˜ โˆˆ โ„•0 ) โ†’ ( ๐บ โ€˜ ๐‘˜ ) โˆˆ โ„‚ )
41 37 29 40 iserex โŠข ( ( ( ๐œ‘ โˆง ๐‘š โˆˆ ( โ„คโ‰ฅ โ€˜ ( ๐‘  + ๐‘ก ) ) ) โˆง ๐‘— โˆˆ ( 0 ... ๐‘š ) ) โ†’ ( seq 0 ( + , ๐บ ) โˆˆ dom โ‡ โ†” seq ( ( ๐‘š โˆ’ ๐‘— ) + 1 ) ( + , ๐บ ) โˆˆ dom โ‡ ) )
42 36 41 mpbid โŠข ( ( ( ๐œ‘ โˆง ๐‘š โˆˆ ( โ„คโ‰ฅ โ€˜ ( ๐‘  + ๐‘ก ) ) ) โˆง ๐‘— โˆˆ ( 0 ... ๐‘š ) ) โ†’ seq ( ( ๐‘š โˆ’ ๐‘— ) + 1 ) ( + , ๐บ ) โˆˆ dom โ‡ )
43 25 30 34 35 42 isumcl โŠข ( ( ( ๐œ‘ โˆง ๐‘š โˆˆ ( โ„คโ‰ฅ โ€˜ ( ๐‘  + ๐‘ก ) ) ) โˆง ๐‘— โˆˆ ( 0 ... ๐‘š ) ) โ†’ ฮฃ ๐‘˜ โˆˆ ( โ„คโ‰ฅ โ€˜ ( ( ๐‘š โˆ’ ๐‘— ) + 1 ) ) ๐ต โˆˆ โ„‚ )
44 24 43 mulcld โŠข ( ( ( ๐œ‘ โˆง ๐‘š โˆˆ ( โ„คโ‰ฅ โ€˜ ( ๐‘  + ๐‘ก ) ) ) โˆง ๐‘— โˆˆ ( 0 ... ๐‘š ) ) โ†’ ( ๐ด ยท ฮฃ ๐‘˜ โˆˆ ( โ„คโ‰ฅ โ€˜ ( ( ๐‘š โˆ’ ๐‘— ) + 1 ) ) ๐ต ) โˆˆ โ„‚ )
45 21 44 fsumcl โŠข ( ( ๐œ‘ โˆง ๐‘š โˆˆ ( โ„คโ‰ฅ โ€˜ ( ๐‘  + ๐‘ก ) ) ) โ†’ ฮฃ ๐‘— โˆˆ ( 0 ... ๐‘š ) ( ๐ด ยท ฮฃ ๐‘˜ โˆˆ ( โ„คโ‰ฅ โ€˜ ( ( ๐‘š โˆ’ ๐‘— ) + 1 ) ) ๐ต ) โˆˆ โ„‚ )
46 45 abscld โŠข ( ( ๐œ‘ โˆง ๐‘š โˆˆ ( โ„คโ‰ฅ โ€˜ ( ๐‘  + ๐‘ก ) ) ) โ†’ ( abs โ€˜ ฮฃ ๐‘— โˆˆ ( 0 ... ๐‘š ) ( ๐ด ยท ฮฃ ๐‘˜ โˆˆ ( โ„คโ‰ฅ โ€˜ ( ( ๐‘š โˆ’ ๐‘— ) + 1 ) ) ๐ต ) ) โˆˆ โ„ )
47 44 abscld โŠข ( ( ( ๐œ‘ โˆง ๐‘š โˆˆ ( โ„คโ‰ฅ โ€˜ ( ๐‘  + ๐‘ก ) ) ) โˆง ๐‘— โˆˆ ( 0 ... ๐‘š ) ) โ†’ ( abs โ€˜ ( ๐ด ยท ฮฃ ๐‘˜ โˆˆ ( โ„คโ‰ฅ โ€˜ ( ( ๐‘š โˆ’ ๐‘— ) + 1 ) ) ๐ต ) ) โˆˆ โ„ )
48 21 47 fsumrecl โŠข ( ( ๐œ‘ โˆง ๐‘š โˆˆ ( โ„คโ‰ฅ โ€˜ ( ๐‘  + ๐‘ก ) ) ) โ†’ ฮฃ ๐‘— โˆˆ ( 0 ... ๐‘š ) ( abs โ€˜ ( ๐ด ยท ฮฃ ๐‘˜ โˆˆ ( โ„คโ‰ฅ โ€˜ ( ( ๐‘š โˆ’ ๐‘— ) + 1 ) ) ๐ต ) ) โˆˆ โ„ )
49 9 rpred โŠข ( ๐œ‘ โ†’ ๐ธ โˆˆ โ„ )
50 49 adantr โŠข ( ( ๐œ‘ โˆง ๐‘š โˆˆ ( โ„คโ‰ฅ โ€˜ ( ๐‘  + ๐‘ก ) ) ) โ†’ ๐ธ โˆˆ โ„ )
51 21 44 fsumabs โŠข ( ( ๐œ‘ โˆง ๐‘š โˆˆ ( โ„คโ‰ฅ โ€˜ ( ๐‘  + ๐‘ก ) ) ) โ†’ ( abs โ€˜ ฮฃ ๐‘— โˆˆ ( 0 ... ๐‘š ) ( ๐ด ยท ฮฃ ๐‘˜ โˆˆ ( โ„คโ‰ฅ โ€˜ ( ( ๐‘š โˆ’ ๐‘— ) + 1 ) ) ๐ต ) ) โ‰ค ฮฃ ๐‘— โˆˆ ( 0 ... ๐‘š ) ( abs โ€˜ ( ๐ด ยท ฮฃ ๐‘˜ โˆˆ ( โ„คโ‰ฅ โ€˜ ( ( ๐‘š โˆ’ ๐‘— ) + 1 ) ) ๐ต ) ) )
52 fzfid โŠข ( ( ๐œ‘ โˆง ๐‘š โˆˆ ( โ„คโ‰ฅ โ€˜ ( ๐‘  + ๐‘ก ) ) ) โ†’ ( 0 ... ( ๐‘š โˆ’ ๐‘  ) ) โˆˆ Fin )
53 17 adantr โŠข ( ( ๐œ‘ โˆง ๐‘š โˆˆ ( โ„คโ‰ฅ โ€˜ ( ๐‘  + ๐‘ก ) ) ) โ†’ ๐‘  โˆˆ โ„•0 )
54 53 nn0ge0d โŠข ( ( ๐œ‘ โˆง ๐‘š โˆˆ ( โ„คโ‰ฅ โ€˜ ( ๐‘  + ๐‘ก ) ) ) โ†’ 0 โ‰ค ๐‘  )
55 eluzelz โŠข ( ๐‘š โˆˆ ( โ„คโ‰ฅ โ€˜ ( ๐‘  + ๐‘ก ) ) โ†’ ๐‘š โˆˆ โ„ค )
56 55 adantl โŠข ( ( ๐œ‘ โˆง ๐‘š โˆˆ ( โ„คโ‰ฅ โ€˜ ( ๐‘  + ๐‘ก ) ) ) โ†’ ๐‘š โˆˆ โ„ค )
57 56 zred โŠข ( ( ๐œ‘ โˆง ๐‘š โˆˆ ( โ„คโ‰ฅ โ€˜ ( ๐‘  + ๐‘ก ) ) ) โ†’ ๐‘š โˆˆ โ„ )
58 53 nn0red โŠข ( ( ๐œ‘ โˆง ๐‘š โˆˆ ( โ„คโ‰ฅ โ€˜ ( ๐‘  + ๐‘ก ) ) ) โ†’ ๐‘  โˆˆ โ„ )
59 57 58 subge02d โŠข ( ( ๐œ‘ โˆง ๐‘š โˆˆ ( โ„คโ‰ฅ โ€˜ ( ๐‘  + ๐‘ก ) ) ) โ†’ ( 0 โ‰ค ๐‘  โ†” ( ๐‘š โˆ’ ๐‘  ) โ‰ค ๐‘š ) )
60 54 59 mpbid โŠข ( ( ๐œ‘ โˆง ๐‘š โˆˆ ( โ„คโ‰ฅ โ€˜ ( ๐‘  + ๐‘ก ) ) ) โ†’ ( ๐‘š โˆ’ ๐‘  ) โ‰ค ๐‘š )
61 53 37 eleqtrdi โŠข ( ( ๐œ‘ โˆง ๐‘š โˆˆ ( โ„คโ‰ฅ โ€˜ ( ๐‘  + ๐‘ก ) ) ) โ†’ ๐‘  โˆˆ ( โ„คโ‰ฅ โ€˜ 0 ) )
62 16 nnzd โŠข ( ๐œ‘ โ†’ ๐‘  โˆˆ โ„ค )
63 uzid โŠข ( ๐‘  โˆˆ โ„ค โ†’ ๐‘  โˆˆ ( โ„คโ‰ฅ โ€˜ ๐‘  ) )
64 62 63 syl โŠข ( ๐œ‘ โ†’ ๐‘  โˆˆ ( โ„คโ‰ฅ โ€˜ ๐‘  ) )
65 uzaddcl โŠข ( ( ๐‘  โˆˆ ( โ„คโ‰ฅ โ€˜ ๐‘  ) โˆง ๐‘ก โˆˆ โ„•0 ) โ†’ ( ๐‘  + ๐‘ก ) โˆˆ ( โ„คโ‰ฅ โ€˜ ๐‘  ) )
66 64 19 65 syl2anc โŠข ( ๐œ‘ โ†’ ( ๐‘  + ๐‘ก ) โˆˆ ( โ„คโ‰ฅ โ€˜ ๐‘  ) )
67 eqid โŠข ( โ„คโ‰ฅ โ€˜ ๐‘  ) = ( โ„คโ‰ฅ โ€˜ ๐‘  )
68 67 uztrn2 โŠข ( ( ( ๐‘  + ๐‘ก ) โˆˆ ( โ„คโ‰ฅ โ€˜ ๐‘  ) โˆง ๐‘š โˆˆ ( โ„คโ‰ฅ โ€˜ ( ๐‘  + ๐‘ก ) ) ) โ†’ ๐‘š โˆˆ ( โ„คโ‰ฅ โ€˜ ๐‘  ) )
69 66 68 sylan โŠข ( ( ๐œ‘ โˆง ๐‘š โˆˆ ( โ„คโ‰ฅ โ€˜ ( ๐‘  + ๐‘ก ) ) ) โ†’ ๐‘š โˆˆ ( โ„คโ‰ฅ โ€˜ ๐‘  ) )
70 elfzuzb โŠข ( ๐‘  โˆˆ ( 0 ... ๐‘š ) โ†” ( ๐‘  โˆˆ ( โ„คโ‰ฅ โ€˜ 0 ) โˆง ๐‘š โˆˆ ( โ„คโ‰ฅ โ€˜ ๐‘  ) ) )
71 61 69 70 sylanbrc โŠข ( ( ๐œ‘ โˆง ๐‘š โˆˆ ( โ„คโ‰ฅ โ€˜ ( ๐‘  + ๐‘ก ) ) ) โ†’ ๐‘  โˆˆ ( 0 ... ๐‘š ) )
72 fznn0sub2 โŠข ( ๐‘  โˆˆ ( 0 ... ๐‘š ) โ†’ ( ๐‘š โˆ’ ๐‘  ) โˆˆ ( 0 ... ๐‘š ) )
73 71 72 syl โŠข ( ( ๐œ‘ โˆง ๐‘š โˆˆ ( โ„คโ‰ฅ โ€˜ ( ๐‘  + ๐‘ก ) ) ) โ†’ ( ๐‘š โˆ’ ๐‘  ) โˆˆ ( 0 ... ๐‘š ) )
74 elfzelz โŠข ( ( ๐‘š โˆ’ ๐‘  ) โˆˆ ( 0 ... ๐‘š ) โ†’ ( ๐‘š โˆ’ ๐‘  ) โˆˆ โ„ค )
75 73 74 syl โŠข ( ( ๐œ‘ โˆง ๐‘š โˆˆ ( โ„คโ‰ฅ โ€˜ ( ๐‘  + ๐‘ก ) ) ) โ†’ ( ๐‘š โˆ’ ๐‘  ) โˆˆ โ„ค )
76 eluz โŠข ( ( ( ๐‘š โˆ’ ๐‘  ) โˆˆ โ„ค โˆง ๐‘š โˆˆ โ„ค ) โ†’ ( ๐‘š โˆˆ ( โ„คโ‰ฅ โ€˜ ( ๐‘š โˆ’ ๐‘  ) ) โ†” ( ๐‘š โˆ’ ๐‘  ) โ‰ค ๐‘š ) )
77 75 56 76 syl2anc โŠข ( ( ๐œ‘ โˆง ๐‘š โˆˆ ( โ„คโ‰ฅ โ€˜ ( ๐‘  + ๐‘ก ) ) ) โ†’ ( ๐‘š โˆˆ ( โ„คโ‰ฅ โ€˜ ( ๐‘š โˆ’ ๐‘  ) ) โ†” ( ๐‘š โˆ’ ๐‘  ) โ‰ค ๐‘š ) )
78 60 77 mpbird โŠข ( ( ๐œ‘ โˆง ๐‘š โˆˆ ( โ„คโ‰ฅ โ€˜ ( ๐‘  + ๐‘ก ) ) ) โ†’ ๐‘š โˆˆ ( โ„คโ‰ฅ โ€˜ ( ๐‘š โˆ’ ๐‘  ) ) )
79 fzss2 โŠข ( ๐‘š โˆˆ ( โ„คโ‰ฅ โ€˜ ( ๐‘š โˆ’ ๐‘  ) ) โ†’ ( 0 ... ( ๐‘š โˆ’ ๐‘  ) ) โŠ† ( 0 ... ๐‘š ) )
80 78 79 syl โŠข ( ( ๐œ‘ โˆง ๐‘š โˆˆ ( โ„คโ‰ฅ โ€˜ ( ๐‘  + ๐‘ก ) ) ) โ†’ ( 0 ... ( ๐‘š โˆ’ ๐‘  ) ) โŠ† ( 0 ... ๐‘š ) )
81 80 sselda โŠข ( ( ( ๐œ‘ โˆง ๐‘š โˆˆ ( โ„คโ‰ฅ โ€˜ ( ๐‘  + ๐‘ก ) ) ) โˆง ๐‘— โˆˆ ( 0 ... ( ๐‘š โˆ’ ๐‘  ) ) ) โ†’ ๐‘— โˆˆ ( 0 ... ๐‘š ) )
82 3 abscld โŠข ( ( ๐œ‘ โˆง ๐‘— โˆˆ โ„•0 ) โ†’ ( abs โ€˜ ๐ด ) โˆˆ โ„ )
83 22 23 82 syl2an โŠข ( ( ( ๐œ‘ โˆง ๐‘š โˆˆ ( โ„คโ‰ฅ โ€˜ ( ๐‘  + ๐‘ก ) ) ) โˆง ๐‘— โˆˆ ( 0 ... ๐‘š ) ) โ†’ ( abs โ€˜ ๐ด ) โˆˆ โ„ )
84 43 abscld โŠข ( ( ( ๐œ‘ โˆง ๐‘š โˆˆ ( โ„คโ‰ฅ โ€˜ ( ๐‘  + ๐‘ก ) ) ) โˆง ๐‘— โˆˆ ( 0 ... ๐‘š ) ) โ†’ ( abs โ€˜ ฮฃ ๐‘˜ โˆˆ ( โ„คโ‰ฅ โ€˜ ( ( ๐‘š โˆ’ ๐‘— ) + 1 ) ) ๐ต ) โˆˆ โ„ )
85 83 84 remulcld โŠข ( ( ( ๐œ‘ โˆง ๐‘š โˆˆ ( โ„คโ‰ฅ โ€˜ ( ๐‘  + ๐‘ก ) ) ) โˆง ๐‘— โˆˆ ( 0 ... ๐‘š ) ) โ†’ ( ( abs โ€˜ ๐ด ) ยท ( abs โ€˜ ฮฃ ๐‘˜ โˆˆ ( โ„คโ‰ฅ โ€˜ ( ( ๐‘š โˆ’ ๐‘— ) + 1 ) ) ๐ต ) ) โˆˆ โ„ )
86 81 85 syldan โŠข ( ( ( ๐œ‘ โˆง ๐‘š โˆˆ ( โ„คโ‰ฅ โ€˜ ( ๐‘  + ๐‘ก ) ) ) โˆง ๐‘— โˆˆ ( 0 ... ( ๐‘š โˆ’ ๐‘  ) ) ) โ†’ ( ( abs โ€˜ ๐ด ) ยท ( abs โ€˜ ฮฃ ๐‘˜ โˆˆ ( โ„คโ‰ฅ โ€˜ ( ( ๐‘š โˆ’ ๐‘— ) + 1 ) ) ๐ต ) ) โˆˆ โ„ )
87 52 86 fsumrecl โŠข ( ( ๐œ‘ โˆง ๐‘š โˆˆ ( โ„คโ‰ฅ โ€˜ ( ๐‘  + ๐‘ก ) ) ) โ†’ ฮฃ ๐‘— โˆˆ ( 0 ... ( ๐‘š โˆ’ ๐‘  ) ) ( ( abs โ€˜ ๐ด ) ยท ( abs โ€˜ ฮฃ ๐‘˜ โˆˆ ( โ„คโ‰ฅ โ€˜ ( ( ๐‘š โˆ’ ๐‘— ) + 1 ) ) ๐ต ) ) โˆˆ โ„ )
88 fzfid โŠข ( ( ๐œ‘ โˆง ๐‘š โˆˆ ( โ„คโ‰ฅ โ€˜ ( ๐‘  + ๐‘ก ) ) ) โ†’ ( ( ( ๐‘š โˆ’ ๐‘  ) + 1 ) ... ๐‘š ) โˆˆ Fin )
89 elfznn0 โŠข ( ( ๐‘š โˆ’ ๐‘  ) โˆˆ ( 0 ... ๐‘š ) โ†’ ( ๐‘š โˆ’ ๐‘  ) โˆˆ โ„•0 )
90 73 89 syl โŠข ( ( ๐œ‘ โˆง ๐‘š โˆˆ ( โ„คโ‰ฅ โ€˜ ( ๐‘  + ๐‘ก ) ) ) โ†’ ( ๐‘š โˆ’ ๐‘  ) โˆˆ โ„•0 )
91 peano2nn0 โŠข ( ( ๐‘š โˆ’ ๐‘  ) โˆˆ โ„•0 โ†’ ( ( ๐‘š โˆ’ ๐‘  ) + 1 ) โˆˆ โ„•0 )
92 90 91 syl โŠข ( ( ๐œ‘ โˆง ๐‘š โˆˆ ( โ„คโ‰ฅ โ€˜ ( ๐‘  + ๐‘ก ) ) ) โ†’ ( ( ๐‘š โˆ’ ๐‘  ) + 1 ) โˆˆ โ„•0 )
93 92 37 eleqtrdi โŠข ( ( ๐œ‘ โˆง ๐‘š โˆˆ ( โ„คโ‰ฅ โ€˜ ( ๐‘  + ๐‘ก ) ) ) โ†’ ( ( ๐‘š โˆ’ ๐‘  ) + 1 ) โˆˆ ( โ„คโ‰ฅ โ€˜ 0 ) )
94 fzss1 โŠข ( ( ( ๐‘š โˆ’ ๐‘  ) + 1 ) โˆˆ ( โ„คโ‰ฅ โ€˜ 0 ) โ†’ ( ( ( ๐‘š โˆ’ ๐‘  ) + 1 ) ... ๐‘š ) โŠ† ( 0 ... ๐‘š ) )
95 93 94 syl โŠข ( ( ๐œ‘ โˆง ๐‘š โˆˆ ( โ„คโ‰ฅ โ€˜ ( ๐‘  + ๐‘ก ) ) ) โ†’ ( ( ( ๐‘š โˆ’ ๐‘  ) + 1 ) ... ๐‘š ) โŠ† ( 0 ... ๐‘š ) )
96 95 sselda โŠข ( ( ( ๐œ‘ โˆง ๐‘š โˆˆ ( โ„คโ‰ฅ โ€˜ ( ๐‘  + ๐‘ก ) ) ) โˆง ๐‘— โˆˆ ( ( ( ๐‘š โˆ’ ๐‘  ) + 1 ) ... ๐‘š ) ) โ†’ ๐‘— โˆˆ ( 0 ... ๐‘š ) )
97 96 85 syldan โŠข ( ( ( ๐œ‘ โˆง ๐‘š โˆˆ ( โ„คโ‰ฅ โ€˜ ( ๐‘  + ๐‘ก ) ) ) โˆง ๐‘— โˆˆ ( ( ( ๐‘š โˆ’ ๐‘  ) + 1 ) ... ๐‘š ) ) โ†’ ( ( abs โ€˜ ๐ด ) ยท ( abs โ€˜ ฮฃ ๐‘˜ โˆˆ ( โ„คโ‰ฅ โ€˜ ( ( ๐‘š โˆ’ ๐‘— ) + 1 ) ) ๐ต ) ) โˆˆ โ„ )
98 88 97 fsumrecl โŠข ( ( ๐œ‘ โˆง ๐‘š โˆˆ ( โ„คโ‰ฅ โ€˜ ( ๐‘  + ๐‘ก ) ) ) โ†’ ฮฃ ๐‘— โˆˆ ( ( ( ๐‘š โˆ’ ๐‘  ) + 1 ) ... ๐‘š ) ( ( abs โ€˜ ๐ด ) ยท ( abs โ€˜ ฮฃ ๐‘˜ โˆˆ ( โ„คโ‰ฅ โ€˜ ( ( ๐‘š โˆ’ ๐‘— ) + 1 ) ) ๐ต ) ) โˆˆ โ„ )
99 9 rphalfcld โŠข ( ๐œ‘ โ†’ ( ๐ธ / 2 ) โˆˆ โ„+ )
100 99 rpred โŠข ( ๐œ‘ โ†’ ( ๐ธ / 2 ) โˆˆ โ„ )
101 100 adantr โŠข ( ( ๐œ‘ โˆง ๐‘š โˆˆ ( โ„คโ‰ฅ โ€˜ ( ๐‘  + ๐‘ก ) ) ) โ†’ ( ๐ธ / 2 ) โˆˆ โ„ )
102 elfznn0 โŠข ( ๐‘— โˆˆ ( 0 ... ( ๐‘š โˆ’ ๐‘  ) ) โ†’ ๐‘— โˆˆ โ„•0 )
103 22 102 82 syl2an โŠข ( ( ( ๐œ‘ โˆง ๐‘š โˆˆ ( โ„คโ‰ฅ โ€˜ ( ๐‘  + ๐‘ก ) ) ) โˆง ๐‘— โˆˆ ( 0 ... ( ๐‘š โˆ’ ๐‘  ) ) ) โ†’ ( abs โ€˜ ๐ด ) โˆˆ โ„ )
104 52 103 fsumrecl โŠข ( ( ๐œ‘ โˆง ๐‘š โˆˆ ( โ„คโ‰ฅ โ€˜ ( ๐‘  + ๐‘ก ) ) ) โ†’ ฮฃ ๐‘— โˆˆ ( 0 ... ( ๐‘š โˆ’ ๐‘  ) ) ( abs โ€˜ ๐ด ) โˆˆ โ„ )
105 104 101 remulcld โŠข ( ( ๐œ‘ โˆง ๐‘š โˆˆ ( โ„คโ‰ฅ โ€˜ ( ๐‘  + ๐‘ก ) ) ) โ†’ ( ฮฃ ๐‘— โˆˆ ( 0 ... ( ๐‘š โˆ’ ๐‘  ) ) ( abs โ€˜ ๐ด ) ยท ( ๐ธ / 2 ) ) โˆˆ โ„ )
106 0zd โŠข ( ๐œ‘ โ†’ 0 โˆˆ โ„ค )
107 eqidd โŠข ( ( ๐œ‘ โˆง ๐‘— โˆˆ โ„•0 ) โ†’ ( ๐พ โ€˜ ๐‘— ) = ( ๐พ โ€˜ ๐‘— ) )
108 2 82 eqeltrd โŠข ( ( ๐œ‘ โˆง ๐‘— โˆˆ โ„•0 ) โ†’ ( ๐พ โ€˜ ๐‘— ) โˆˆ โ„ )
109 37 106 107 108 7 isumrecl โŠข ( ๐œ‘ โ†’ ฮฃ ๐‘— โˆˆ โ„•0 ( ๐พ โ€˜ ๐‘— ) โˆˆ โ„ )
110 3 absge0d โŠข ( ( ๐œ‘ โˆง ๐‘— โˆˆ โ„•0 ) โ†’ 0 โ‰ค ( abs โ€˜ ๐ด ) )
111 110 2 breqtrrd โŠข ( ( ๐œ‘ โˆง ๐‘— โˆˆ โ„•0 ) โ†’ 0 โ‰ค ( ๐พ โ€˜ ๐‘— ) )
112 37 106 107 108 7 111 isumge0 โŠข ( ๐œ‘ โ†’ 0 โ‰ค ฮฃ ๐‘— โˆˆ โ„•0 ( ๐พ โ€˜ ๐‘— ) )
113 109 112 ge0p1rpd โŠข ( ๐œ‘ โ†’ ( ฮฃ ๐‘— โˆˆ โ„•0 ( ๐พ โ€˜ ๐‘— ) + 1 ) โˆˆ โ„+ )
114 113 adantr โŠข ( ( ๐œ‘ โˆง ๐‘š โˆˆ ( โ„คโ‰ฅ โ€˜ ( ๐‘  + ๐‘ก ) ) ) โ†’ ( ฮฃ ๐‘— โˆˆ โ„•0 ( ๐พ โ€˜ ๐‘— ) + 1 ) โˆˆ โ„+ )
115 105 114 rerpdivcld โŠข ( ( ๐œ‘ โˆง ๐‘š โˆˆ ( โ„คโ‰ฅ โ€˜ ( ๐‘  + ๐‘ก ) ) ) โ†’ ( ( ฮฃ ๐‘— โˆˆ ( 0 ... ( ๐‘š โˆ’ ๐‘  ) ) ( abs โ€˜ ๐ด ) ยท ( ๐ธ / 2 ) ) / ( ฮฃ ๐‘— โˆˆ โ„•0 ( ๐พ โ€˜ ๐‘— ) + 1 ) ) โˆˆ โ„ )
116 99 113 rpdivcld โŠข ( ๐œ‘ โ†’ ( ( ๐ธ / 2 ) / ( ฮฃ ๐‘— โˆˆ โ„•0 ( ๐พ โ€˜ ๐‘— ) + 1 ) ) โˆˆ โ„+ )
117 116 rpred โŠข ( ๐œ‘ โ†’ ( ( ๐ธ / 2 ) / ( ฮฃ ๐‘— โˆˆ โ„•0 ( ๐พ โ€˜ ๐‘— ) + 1 ) ) โˆˆ โ„ )
118 117 ad2antrr โŠข ( ( ( ๐œ‘ โˆง ๐‘š โˆˆ ( โ„คโ‰ฅ โ€˜ ( ๐‘  + ๐‘ก ) ) ) โˆง ๐‘— โˆˆ ( 0 ... ( ๐‘š โˆ’ ๐‘  ) ) ) โ†’ ( ( ๐ธ / 2 ) / ( ฮฃ ๐‘— โˆˆ โ„•0 ( ๐พ โ€˜ ๐‘— ) + 1 ) ) โˆˆ โ„ )
119 103 118 remulcld โŠข ( ( ( ๐œ‘ โˆง ๐‘š โˆˆ ( โ„คโ‰ฅ โ€˜ ( ๐‘  + ๐‘ก ) ) ) โˆง ๐‘— โˆˆ ( 0 ... ( ๐‘š โˆ’ ๐‘  ) ) ) โ†’ ( ( abs โ€˜ ๐ด ) ยท ( ( ๐ธ / 2 ) / ( ฮฃ ๐‘— โˆˆ โ„•0 ( ๐พ โ€˜ ๐‘— ) + 1 ) ) ) โˆˆ โ„ )
120 81 30 syldan โŠข ( ( ( ๐œ‘ โˆง ๐‘š โˆˆ ( โ„คโ‰ฅ โ€˜ ( ๐‘  + ๐‘ก ) ) ) โˆง ๐‘— โˆˆ ( 0 ... ( ๐‘š โˆ’ ๐‘  ) ) ) โ†’ ( ( ๐‘š โˆ’ ๐‘— ) + 1 ) โˆˆ โ„ค )
121 simplll โŠข ( ( ( ( ๐œ‘ โˆง ๐‘š โˆˆ ( โ„คโ‰ฅ โ€˜ ( ๐‘  + ๐‘ก ) ) ) โˆง ๐‘— โˆˆ ( 0 ... ( ๐‘š โˆ’ ๐‘  ) ) ) โˆง ๐‘˜ โˆˆ ( โ„คโ‰ฅ โ€˜ ( ( ๐‘š โˆ’ ๐‘— ) + 1 ) ) ) โ†’ ๐œ‘ )
122 81 29 syldan โŠข ( ( ( ๐œ‘ โˆง ๐‘š โˆˆ ( โ„คโ‰ฅ โ€˜ ( ๐‘  + ๐‘ก ) ) ) โˆง ๐‘— โˆˆ ( 0 ... ( ๐‘š โˆ’ ๐‘  ) ) ) โ†’ ( ( ๐‘š โˆ’ ๐‘— ) + 1 ) โˆˆ โ„•0 )
123 122 32 sylan โŠข ( ( ( ( ๐œ‘ โˆง ๐‘š โˆˆ ( โ„คโ‰ฅ โ€˜ ( ๐‘  + ๐‘ก ) ) ) โˆง ๐‘— โˆˆ ( 0 ... ( ๐‘š โˆ’ ๐‘  ) ) ) โˆง ๐‘˜ โˆˆ ( โ„คโ‰ฅ โ€˜ ( ( ๐‘š โˆ’ ๐‘— ) + 1 ) ) ) โ†’ ๐‘˜ โˆˆ โ„•0 )
124 121 123 4 syl2anc โŠข ( ( ( ( ๐œ‘ โˆง ๐‘š โˆˆ ( โ„คโ‰ฅ โ€˜ ( ๐‘  + ๐‘ก ) ) ) โˆง ๐‘— โˆˆ ( 0 ... ( ๐‘š โˆ’ ๐‘  ) ) ) โˆง ๐‘˜ โˆˆ ( โ„คโ‰ฅ โ€˜ ( ( ๐‘š โˆ’ ๐‘— ) + 1 ) ) ) โ†’ ( ๐บ โ€˜ ๐‘˜ ) = ๐ต )
125 121 123 5 syl2anc โŠข ( ( ( ( ๐œ‘ โˆง ๐‘š โˆˆ ( โ„คโ‰ฅ โ€˜ ( ๐‘  + ๐‘ก ) ) ) โˆง ๐‘— โˆˆ ( 0 ... ( ๐‘š โˆ’ ๐‘  ) ) ) โˆง ๐‘˜ โˆˆ ( โ„คโ‰ฅ โ€˜ ( ( ๐‘š โˆ’ ๐‘— ) + 1 ) ) ) โ†’ ๐ต โˆˆ โ„‚ )
126 81 42 syldan โŠข ( ( ( ๐œ‘ โˆง ๐‘š โˆˆ ( โ„คโ‰ฅ โ€˜ ( ๐‘  + ๐‘ก ) ) ) โˆง ๐‘— โˆˆ ( 0 ... ( ๐‘š โˆ’ ๐‘  ) ) ) โ†’ seq ( ( ๐‘š โˆ’ ๐‘— ) + 1 ) ( + , ๐บ ) โˆˆ dom โ‡ )
127 25 120 124 125 126 isumcl โŠข ( ( ( ๐œ‘ โˆง ๐‘š โˆˆ ( โ„คโ‰ฅ โ€˜ ( ๐‘  + ๐‘ก ) ) ) โˆง ๐‘— โˆˆ ( 0 ... ( ๐‘š โˆ’ ๐‘  ) ) ) โ†’ ฮฃ ๐‘˜ โˆˆ ( โ„คโ‰ฅ โ€˜ ( ( ๐‘š โˆ’ ๐‘— ) + 1 ) ) ๐ต โˆˆ โ„‚ )
128 127 abscld โŠข ( ( ( ๐œ‘ โˆง ๐‘š โˆˆ ( โ„คโ‰ฅ โ€˜ ( ๐‘  + ๐‘ก ) ) ) โˆง ๐‘— โˆˆ ( 0 ... ( ๐‘š โˆ’ ๐‘  ) ) ) โ†’ ( abs โ€˜ ฮฃ ๐‘˜ โˆˆ ( โ„คโ‰ฅ โ€˜ ( ( ๐‘š โˆ’ ๐‘— ) + 1 ) ) ๐ต ) โˆˆ โ„ )
129 82 110 jca โŠข ( ( ๐œ‘ โˆง ๐‘— โˆˆ โ„•0 ) โ†’ ( ( abs โ€˜ ๐ด ) โˆˆ โ„ โˆง 0 โ‰ค ( abs โ€˜ ๐ด ) ) )
130 22 102 129 syl2an โŠข ( ( ( ๐œ‘ โˆง ๐‘š โˆˆ ( โ„คโ‰ฅ โ€˜ ( ๐‘  + ๐‘ก ) ) ) โˆง ๐‘— โˆˆ ( 0 ... ( ๐‘š โˆ’ ๐‘  ) ) ) โ†’ ( ( abs โ€˜ ๐ด ) โˆˆ โ„ โˆง 0 โ‰ค ( abs โ€˜ ๐ด ) ) )
131 124 sumeq2dv โŠข ( ( ( ๐œ‘ โˆง ๐‘š โˆˆ ( โ„คโ‰ฅ โ€˜ ( ๐‘  + ๐‘ก ) ) ) โˆง ๐‘— โˆˆ ( 0 ... ( ๐‘š โˆ’ ๐‘  ) ) ) โ†’ ฮฃ ๐‘˜ โˆˆ ( โ„คโ‰ฅ โ€˜ ( ( ๐‘š โˆ’ ๐‘— ) + 1 ) ) ( ๐บ โ€˜ ๐‘˜ ) = ฮฃ ๐‘˜ โˆˆ ( โ„คโ‰ฅ โ€˜ ( ( ๐‘š โˆ’ ๐‘— ) + 1 ) ) ๐ต )
132 131 fveq2d โŠข ( ( ( ๐œ‘ โˆง ๐‘š โˆˆ ( โ„คโ‰ฅ โ€˜ ( ๐‘  + ๐‘ก ) ) ) โˆง ๐‘— โˆˆ ( 0 ... ( ๐‘š โˆ’ ๐‘  ) ) ) โ†’ ( abs โ€˜ ฮฃ ๐‘˜ โˆˆ ( โ„คโ‰ฅ โ€˜ ( ( ๐‘š โˆ’ ๐‘— ) + 1 ) ) ( ๐บ โ€˜ ๐‘˜ ) ) = ( abs โ€˜ ฮฃ ๐‘˜ โˆˆ ( โ„คโ‰ฅ โ€˜ ( ( ๐‘š โˆ’ ๐‘— ) + 1 ) ) ๐ต ) )
133 fvoveq1 โŠข ( ๐‘› = ( ๐‘š โˆ’ ๐‘— ) โ†’ ( โ„คโ‰ฅ โ€˜ ( ๐‘› + 1 ) ) = ( โ„คโ‰ฅ โ€˜ ( ( ๐‘š โˆ’ ๐‘— ) + 1 ) ) )
134 133 sumeq1d โŠข ( ๐‘› = ( ๐‘š โˆ’ ๐‘— ) โ†’ ฮฃ ๐‘˜ โˆˆ ( โ„คโ‰ฅ โ€˜ ( ๐‘› + 1 ) ) ( ๐บ โ€˜ ๐‘˜ ) = ฮฃ ๐‘˜ โˆˆ ( โ„คโ‰ฅ โ€˜ ( ( ๐‘š โˆ’ ๐‘— ) + 1 ) ) ( ๐บ โ€˜ ๐‘˜ ) )
135 134 fveq2d โŠข ( ๐‘› = ( ๐‘š โˆ’ ๐‘— ) โ†’ ( abs โ€˜ ฮฃ ๐‘˜ โˆˆ ( โ„คโ‰ฅ โ€˜ ( ๐‘› + 1 ) ) ( ๐บ โ€˜ ๐‘˜ ) ) = ( abs โ€˜ ฮฃ ๐‘˜ โˆˆ ( โ„คโ‰ฅ โ€˜ ( ( ๐‘š โˆ’ ๐‘— ) + 1 ) ) ( ๐บ โ€˜ ๐‘˜ ) ) )
136 135 breq1d โŠข ( ๐‘› = ( ๐‘š โˆ’ ๐‘— ) โ†’ ( ( abs โ€˜ ฮฃ ๐‘˜ โˆˆ ( โ„คโ‰ฅ โ€˜ ( ๐‘› + 1 ) ) ( ๐บ โ€˜ ๐‘˜ ) ) < ( ( ๐ธ / 2 ) / ( ฮฃ ๐‘— โˆˆ โ„•0 ( ๐พ โ€˜ ๐‘— ) + 1 ) ) โ†” ( abs โ€˜ ฮฃ ๐‘˜ โˆˆ ( โ„คโ‰ฅ โ€˜ ( ( ๐‘š โˆ’ ๐‘— ) + 1 ) ) ( ๐บ โ€˜ ๐‘˜ ) ) < ( ( ๐ธ / 2 ) / ( ฮฃ ๐‘— โˆˆ โ„•0 ( ๐พ โ€˜ ๐‘— ) + 1 ) ) ) )
137 15 simprd โŠข ( ๐œ‘ โ†’ โˆ€ ๐‘› โˆˆ ( โ„คโ‰ฅ โ€˜ ๐‘  ) ( abs โ€˜ ฮฃ ๐‘˜ โˆˆ ( โ„คโ‰ฅ โ€˜ ( ๐‘› + 1 ) ) ( ๐บ โ€˜ ๐‘˜ ) ) < ( ( ๐ธ / 2 ) / ( ฮฃ ๐‘— โˆˆ โ„•0 ( ๐พ โ€˜ ๐‘— ) + 1 ) ) )
138 137 ad2antrr โŠข ( ( ( ๐œ‘ โˆง ๐‘š โˆˆ ( โ„คโ‰ฅ โ€˜ ( ๐‘  + ๐‘ก ) ) ) โˆง ๐‘— โˆˆ ( 0 ... ( ๐‘š โˆ’ ๐‘  ) ) ) โ†’ โˆ€ ๐‘› โˆˆ ( โ„คโ‰ฅ โ€˜ ๐‘  ) ( abs โ€˜ ฮฃ ๐‘˜ โˆˆ ( โ„คโ‰ฅ โ€˜ ( ๐‘› + 1 ) ) ( ๐บ โ€˜ ๐‘˜ ) ) < ( ( ๐ธ / 2 ) / ( ฮฃ ๐‘— โˆˆ โ„•0 ( ๐พ โ€˜ ๐‘— ) + 1 ) ) )
139 elfzelz โŠข ( ๐‘— โˆˆ ( 0 ... ( ๐‘š โˆ’ ๐‘  ) ) โ†’ ๐‘— โˆˆ โ„ค )
140 139 adantl โŠข ( ( ( ๐œ‘ โˆง ๐‘š โˆˆ ( โ„คโ‰ฅ โ€˜ ( ๐‘  + ๐‘ก ) ) ) โˆง ๐‘— โˆˆ ( 0 ... ( ๐‘š โˆ’ ๐‘  ) ) ) โ†’ ๐‘— โˆˆ โ„ค )
141 140 zred โŠข ( ( ( ๐œ‘ โˆง ๐‘š โˆˆ ( โ„คโ‰ฅ โ€˜ ( ๐‘  + ๐‘ก ) ) ) โˆง ๐‘— โˆˆ ( 0 ... ( ๐‘š โˆ’ ๐‘  ) ) ) โ†’ ๐‘— โˆˆ โ„ )
142 55 ad2antlr โŠข ( ( ( ๐œ‘ โˆง ๐‘š โˆˆ ( โ„คโ‰ฅ โ€˜ ( ๐‘  + ๐‘ก ) ) ) โˆง ๐‘— โˆˆ ( 0 ... ( ๐‘š โˆ’ ๐‘  ) ) ) โ†’ ๐‘š โˆˆ โ„ค )
143 142 zred โŠข ( ( ( ๐œ‘ โˆง ๐‘š โˆˆ ( โ„คโ‰ฅ โ€˜ ( ๐‘  + ๐‘ก ) ) ) โˆง ๐‘— โˆˆ ( 0 ... ( ๐‘š โˆ’ ๐‘  ) ) ) โ†’ ๐‘š โˆˆ โ„ )
144 62 ad2antrr โŠข ( ( ( ๐œ‘ โˆง ๐‘š โˆˆ ( โ„คโ‰ฅ โ€˜ ( ๐‘  + ๐‘ก ) ) ) โˆง ๐‘— โˆˆ ( 0 ... ( ๐‘š โˆ’ ๐‘  ) ) ) โ†’ ๐‘  โˆˆ โ„ค )
145 144 zred โŠข ( ( ( ๐œ‘ โˆง ๐‘š โˆˆ ( โ„คโ‰ฅ โ€˜ ( ๐‘  + ๐‘ก ) ) ) โˆง ๐‘— โˆˆ ( 0 ... ( ๐‘š โˆ’ ๐‘  ) ) ) โ†’ ๐‘  โˆˆ โ„ )
146 elfzle2 โŠข ( ๐‘— โˆˆ ( 0 ... ( ๐‘š โˆ’ ๐‘  ) ) โ†’ ๐‘— โ‰ค ( ๐‘š โˆ’ ๐‘  ) )
147 146 adantl โŠข ( ( ( ๐œ‘ โˆง ๐‘š โˆˆ ( โ„คโ‰ฅ โ€˜ ( ๐‘  + ๐‘ก ) ) ) โˆง ๐‘— โˆˆ ( 0 ... ( ๐‘š โˆ’ ๐‘  ) ) ) โ†’ ๐‘— โ‰ค ( ๐‘š โˆ’ ๐‘  ) )
148 141 143 145 147 lesubd โŠข ( ( ( ๐œ‘ โˆง ๐‘š โˆˆ ( โ„คโ‰ฅ โ€˜ ( ๐‘  + ๐‘ก ) ) ) โˆง ๐‘— โˆˆ ( 0 ... ( ๐‘š โˆ’ ๐‘  ) ) ) โ†’ ๐‘  โ‰ค ( ๐‘š โˆ’ ๐‘— ) )
149 142 140 zsubcld โŠข ( ( ( ๐œ‘ โˆง ๐‘š โˆˆ ( โ„คโ‰ฅ โ€˜ ( ๐‘  + ๐‘ก ) ) ) โˆง ๐‘— โˆˆ ( 0 ... ( ๐‘š โˆ’ ๐‘  ) ) ) โ†’ ( ๐‘š โˆ’ ๐‘— ) โˆˆ โ„ค )
150 eluz โŠข ( ( ๐‘  โˆˆ โ„ค โˆง ( ๐‘š โˆ’ ๐‘— ) โˆˆ โ„ค ) โ†’ ( ( ๐‘š โˆ’ ๐‘— ) โˆˆ ( โ„คโ‰ฅ โ€˜ ๐‘  ) โ†” ๐‘  โ‰ค ( ๐‘š โˆ’ ๐‘— ) ) )
151 144 149 150 syl2anc โŠข ( ( ( ๐œ‘ โˆง ๐‘š โˆˆ ( โ„คโ‰ฅ โ€˜ ( ๐‘  + ๐‘ก ) ) ) โˆง ๐‘— โˆˆ ( 0 ... ( ๐‘š โˆ’ ๐‘  ) ) ) โ†’ ( ( ๐‘š โˆ’ ๐‘— ) โˆˆ ( โ„คโ‰ฅ โ€˜ ๐‘  ) โ†” ๐‘  โ‰ค ( ๐‘š โˆ’ ๐‘— ) ) )
152 148 151 mpbird โŠข ( ( ( ๐œ‘ โˆง ๐‘š โˆˆ ( โ„คโ‰ฅ โ€˜ ( ๐‘  + ๐‘ก ) ) ) โˆง ๐‘— โˆˆ ( 0 ... ( ๐‘š โˆ’ ๐‘  ) ) ) โ†’ ( ๐‘š โˆ’ ๐‘— ) โˆˆ ( โ„คโ‰ฅ โ€˜ ๐‘  ) )
153 136 138 152 rspcdva โŠข ( ( ( ๐œ‘ โˆง ๐‘š โˆˆ ( โ„คโ‰ฅ โ€˜ ( ๐‘  + ๐‘ก ) ) ) โˆง ๐‘— โˆˆ ( 0 ... ( ๐‘š โˆ’ ๐‘  ) ) ) โ†’ ( abs โ€˜ ฮฃ ๐‘˜ โˆˆ ( โ„คโ‰ฅ โ€˜ ( ( ๐‘š โˆ’ ๐‘— ) + 1 ) ) ( ๐บ โ€˜ ๐‘˜ ) ) < ( ( ๐ธ / 2 ) / ( ฮฃ ๐‘— โˆˆ โ„•0 ( ๐พ โ€˜ ๐‘— ) + 1 ) ) )
154 132 153 eqbrtrrd โŠข ( ( ( ๐œ‘ โˆง ๐‘š โˆˆ ( โ„คโ‰ฅ โ€˜ ( ๐‘  + ๐‘ก ) ) ) โˆง ๐‘— โˆˆ ( 0 ... ( ๐‘š โˆ’ ๐‘  ) ) ) โ†’ ( abs โ€˜ ฮฃ ๐‘˜ โˆˆ ( โ„คโ‰ฅ โ€˜ ( ( ๐‘š โˆ’ ๐‘— ) + 1 ) ) ๐ต ) < ( ( ๐ธ / 2 ) / ( ฮฃ ๐‘— โˆˆ โ„•0 ( ๐พ โ€˜ ๐‘— ) + 1 ) ) )
155 128 118 154 ltled โŠข ( ( ( ๐œ‘ โˆง ๐‘š โˆˆ ( โ„คโ‰ฅ โ€˜ ( ๐‘  + ๐‘ก ) ) ) โˆง ๐‘— โˆˆ ( 0 ... ( ๐‘š โˆ’ ๐‘  ) ) ) โ†’ ( abs โ€˜ ฮฃ ๐‘˜ โˆˆ ( โ„คโ‰ฅ โ€˜ ( ( ๐‘š โˆ’ ๐‘— ) + 1 ) ) ๐ต ) โ‰ค ( ( ๐ธ / 2 ) / ( ฮฃ ๐‘— โˆˆ โ„•0 ( ๐พ โ€˜ ๐‘— ) + 1 ) ) )
156 lemul2a โŠข ( ( ( ( abs โ€˜ ฮฃ ๐‘˜ โˆˆ ( โ„คโ‰ฅ โ€˜ ( ( ๐‘š โˆ’ ๐‘— ) + 1 ) ) ๐ต ) โˆˆ โ„ โˆง ( ( ๐ธ / 2 ) / ( ฮฃ ๐‘— โˆˆ โ„•0 ( ๐พ โ€˜ ๐‘— ) + 1 ) ) โˆˆ โ„ โˆง ( ( abs โ€˜ ๐ด ) โˆˆ โ„ โˆง 0 โ‰ค ( abs โ€˜ ๐ด ) ) ) โˆง ( abs โ€˜ ฮฃ ๐‘˜ โˆˆ ( โ„คโ‰ฅ โ€˜ ( ( ๐‘š โˆ’ ๐‘— ) + 1 ) ) ๐ต ) โ‰ค ( ( ๐ธ / 2 ) / ( ฮฃ ๐‘— โˆˆ โ„•0 ( ๐พ โ€˜ ๐‘— ) + 1 ) ) ) โ†’ ( ( abs โ€˜ ๐ด ) ยท ( abs โ€˜ ฮฃ ๐‘˜ โˆˆ ( โ„คโ‰ฅ โ€˜ ( ( ๐‘š โˆ’ ๐‘— ) + 1 ) ) ๐ต ) ) โ‰ค ( ( abs โ€˜ ๐ด ) ยท ( ( ๐ธ / 2 ) / ( ฮฃ ๐‘— โˆˆ โ„•0 ( ๐พ โ€˜ ๐‘— ) + 1 ) ) ) )
157 128 118 130 155 156 syl31anc โŠข ( ( ( ๐œ‘ โˆง ๐‘š โˆˆ ( โ„คโ‰ฅ โ€˜ ( ๐‘  + ๐‘ก ) ) ) โˆง ๐‘— โˆˆ ( 0 ... ( ๐‘š โˆ’ ๐‘  ) ) ) โ†’ ( ( abs โ€˜ ๐ด ) ยท ( abs โ€˜ ฮฃ ๐‘˜ โˆˆ ( โ„คโ‰ฅ โ€˜ ( ( ๐‘š โˆ’ ๐‘— ) + 1 ) ) ๐ต ) ) โ‰ค ( ( abs โ€˜ ๐ด ) ยท ( ( ๐ธ / 2 ) / ( ฮฃ ๐‘— โˆˆ โ„•0 ( ๐พ โ€˜ ๐‘— ) + 1 ) ) ) )
158 52 86 119 157 fsumle โŠข ( ( ๐œ‘ โˆง ๐‘š โˆˆ ( โ„คโ‰ฅ โ€˜ ( ๐‘  + ๐‘ก ) ) ) โ†’ ฮฃ ๐‘— โˆˆ ( 0 ... ( ๐‘š โˆ’ ๐‘  ) ) ( ( abs โ€˜ ๐ด ) ยท ( abs โ€˜ ฮฃ ๐‘˜ โˆˆ ( โ„คโ‰ฅ โ€˜ ( ( ๐‘š โˆ’ ๐‘— ) + 1 ) ) ๐ต ) ) โ‰ค ฮฃ ๐‘— โˆˆ ( 0 ... ( ๐‘š โˆ’ ๐‘  ) ) ( ( abs โ€˜ ๐ด ) ยท ( ( ๐ธ / 2 ) / ( ฮฃ ๐‘— โˆˆ โ„•0 ( ๐พ โ€˜ ๐‘— ) + 1 ) ) ) )
159 104 recnd โŠข ( ( ๐œ‘ โˆง ๐‘š โˆˆ ( โ„คโ‰ฅ โ€˜ ( ๐‘  + ๐‘ก ) ) ) โ†’ ฮฃ ๐‘— โˆˆ ( 0 ... ( ๐‘š โˆ’ ๐‘  ) ) ( abs โ€˜ ๐ด ) โˆˆ โ„‚ )
160 99 rpcnd โŠข ( ๐œ‘ โ†’ ( ๐ธ / 2 ) โˆˆ โ„‚ )
161 160 adantr โŠข ( ( ๐œ‘ โˆง ๐‘š โˆˆ ( โ„คโ‰ฅ โ€˜ ( ๐‘  + ๐‘ก ) ) ) โ†’ ( ๐ธ / 2 ) โˆˆ โ„‚ )
162 peano2re โŠข ( ฮฃ ๐‘— โˆˆ โ„•0 ( ๐พ โ€˜ ๐‘— ) โˆˆ โ„ โ†’ ( ฮฃ ๐‘— โˆˆ โ„•0 ( ๐พ โ€˜ ๐‘— ) + 1 ) โˆˆ โ„ )
163 109 162 syl โŠข ( ๐œ‘ โ†’ ( ฮฃ ๐‘— โˆˆ โ„•0 ( ๐พ โ€˜ ๐‘— ) + 1 ) โˆˆ โ„ )
164 163 recnd โŠข ( ๐œ‘ โ†’ ( ฮฃ ๐‘— โˆˆ โ„•0 ( ๐พ โ€˜ ๐‘— ) + 1 ) โˆˆ โ„‚ )
165 164 adantr โŠข ( ( ๐œ‘ โˆง ๐‘š โˆˆ ( โ„คโ‰ฅ โ€˜ ( ๐‘  + ๐‘ก ) ) ) โ†’ ( ฮฃ ๐‘— โˆˆ โ„•0 ( ๐พ โ€˜ ๐‘— ) + 1 ) โˆˆ โ„‚ )
166 113 rpne0d โŠข ( ๐œ‘ โ†’ ( ฮฃ ๐‘— โˆˆ โ„•0 ( ๐พ โ€˜ ๐‘— ) + 1 ) โ‰  0 )
167 166 adantr โŠข ( ( ๐œ‘ โˆง ๐‘š โˆˆ ( โ„คโ‰ฅ โ€˜ ( ๐‘  + ๐‘ก ) ) ) โ†’ ( ฮฃ ๐‘— โˆˆ โ„•0 ( ๐พ โ€˜ ๐‘— ) + 1 ) โ‰  0 )
168 159 161 165 167 divassd โŠข ( ( ๐œ‘ โˆง ๐‘š โˆˆ ( โ„คโ‰ฅ โ€˜ ( ๐‘  + ๐‘ก ) ) ) โ†’ ( ( ฮฃ ๐‘— โˆˆ ( 0 ... ( ๐‘š โˆ’ ๐‘  ) ) ( abs โ€˜ ๐ด ) ยท ( ๐ธ / 2 ) ) / ( ฮฃ ๐‘— โˆˆ โ„•0 ( ๐พ โ€˜ ๐‘— ) + 1 ) ) = ( ฮฃ ๐‘— โˆˆ ( 0 ... ( ๐‘š โˆ’ ๐‘  ) ) ( abs โ€˜ ๐ด ) ยท ( ( ๐ธ / 2 ) / ( ฮฃ ๐‘— โˆˆ โ„•0 ( ๐พ โ€˜ ๐‘— ) + 1 ) ) ) )
169 fveq2 โŠข ( ๐‘› = ๐‘— โ†’ ( ๐พ โ€˜ ๐‘› ) = ( ๐พ โ€˜ ๐‘— ) )
170 169 cbvsumv โŠข ฮฃ ๐‘› โˆˆ โ„•0 ( ๐พ โ€˜ ๐‘› ) = ฮฃ ๐‘— โˆˆ โ„•0 ( ๐พ โ€˜ ๐‘— )
171 170 oveq1i โŠข ( ฮฃ ๐‘› โˆˆ โ„•0 ( ๐พ โ€˜ ๐‘› ) + 1 ) = ( ฮฃ ๐‘— โˆˆ โ„•0 ( ๐พ โ€˜ ๐‘— ) + 1 )
172 171 oveq2i โŠข ( ( ๐ธ / 2 ) / ( ฮฃ ๐‘› โˆˆ โ„•0 ( ๐พ โ€˜ ๐‘› ) + 1 ) ) = ( ( ๐ธ / 2 ) / ( ฮฃ ๐‘— โˆˆ โ„•0 ( ๐พ โ€˜ ๐‘— ) + 1 ) )
173 172 116 eqeltrid โŠข ( ๐œ‘ โ†’ ( ( ๐ธ / 2 ) / ( ฮฃ ๐‘› โˆˆ โ„•0 ( ๐พ โ€˜ ๐‘› ) + 1 ) ) โˆˆ โ„+ )
174 173 rpcnd โŠข ( ๐œ‘ โ†’ ( ( ๐ธ / 2 ) / ( ฮฃ ๐‘› โˆˆ โ„•0 ( ๐พ โ€˜ ๐‘› ) + 1 ) ) โˆˆ โ„‚ )
175 174 adantr โŠข ( ( ๐œ‘ โˆง ๐‘š โˆˆ ( โ„คโ‰ฅ โ€˜ ( ๐‘  + ๐‘ก ) ) ) โ†’ ( ( ๐ธ / 2 ) / ( ฮฃ ๐‘› โˆˆ โ„•0 ( ๐พ โ€˜ ๐‘› ) + 1 ) ) โˆˆ โ„‚ )
176 82 recnd โŠข ( ( ๐œ‘ โˆง ๐‘— โˆˆ โ„•0 ) โ†’ ( abs โ€˜ ๐ด ) โˆˆ โ„‚ )
177 22 102 176 syl2an โŠข ( ( ( ๐œ‘ โˆง ๐‘š โˆˆ ( โ„คโ‰ฅ โ€˜ ( ๐‘  + ๐‘ก ) ) ) โˆง ๐‘— โˆˆ ( 0 ... ( ๐‘š โˆ’ ๐‘  ) ) ) โ†’ ( abs โ€˜ ๐ด ) โˆˆ โ„‚ )
178 52 175 177 fsummulc1 โŠข ( ( ๐œ‘ โˆง ๐‘š โˆˆ ( โ„คโ‰ฅ โ€˜ ( ๐‘  + ๐‘ก ) ) ) โ†’ ( ฮฃ ๐‘— โˆˆ ( 0 ... ( ๐‘š โˆ’ ๐‘  ) ) ( abs โ€˜ ๐ด ) ยท ( ( ๐ธ / 2 ) / ( ฮฃ ๐‘› โˆˆ โ„•0 ( ๐พ โ€˜ ๐‘› ) + 1 ) ) ) = ฮฃ ๐‘— โˆˆ ( 0 ... ( ๐‘š โˆ’ ๐‘  ) ) ( ( abs โ€˜ ๐ด ) ยท ( ( ๐ธ / 2 ) / ( ฮฃ ๐‘› โˆˆ โ„•0 ( ๐พ โ€˜ ๐‘› ) + 1 ) ) ) )
179 172 oveq2i โŠข ( ฮฃ ๐‘— โˆˆ ( 0 ... ( ๐‘š โˆ’ ๐‘  ) ) ( abs โ€˜ ๐ด ) ยท ( ( ๐ธ / 2 ) / ( ฮฃ ๐‘› โˆˆ โ„•0 ( ๐พ โ€˜ ๐‘› ) + 1 ) ) ) = ( ฮฃ ๐‘— โˆˆ ( 0 ... ( ๐‘š โˆ’ ๐‘  ) ) ( abs โ€˜ ๐ด ) ยท ( ( ๐ธ / 2 ) / ( ฮฃ ๐‘— โˆˆ โ„•0 ( ๐พ โ€˜ ๐‘— ) + 1 ) ) )
180 172 oveq2i โŠข ( ( abs โ€˜ ๐ด ) ยท ( ( ๐ธ / 2 ) / ( ฮฃ ๐‘› โˆˆ โ„•0 ( ๐พ โ€˜ ๐‘› ) + 1 ) ) ) = ( ( abs โ€˜ ๐ด ) ยท ( ( ๐ธ / 2 ) / ( ฮฃ ๐‘— โˆˆ โ„•0 ( ๐พ โ€˜ ๐‘— ) + 1 ) ) )
181 180 a1i โŠข ( ๐‘— โˆˆ ( 0 ... ( ๐‘š โˆ’ ๐‘  ) ) โ†’ ( ( abs โ€˜ ๐ด ) ยท ( ( ๐ธ / 2 ) / ( ฮฃ ๐‘› โˆˆ โ„•0 ( ๐พ โ€˜ ๐‘› ) + 1 ) ) ) = ( ( abs โ€˜ ๐ด ) ยท ( ( ๐ธ / 2 ) / ( ฮฃ ๐‘— โˆˆ โ„•0 ( ๐พ โ€˜ ๐‘— ) + 1 ) ) ) )
182 181 sumeq2i โŠข ฮฃ ๐‘— โˆˆ ( 0 ... ( ๐‘š โˆ’ ๐‘  ) ) ( ( abs โ€˜ ๐ด ) ยท ( ( ๐ธ / 2 ) / ( ฮฃ ๐‘› โˆˆ โ„•0 ( ๐พ โ€˜ ๐‘› ) + 1 ) ) ) = ฮฃ ๐‘— โˆˆ ( 0 ... ( ๐‘š โˆ’ ๐‘  ) ) ( ( abs โ€˜ ๐ด ) ยท ( ( ๐ธ / 2 ) / ( ฮฃ ๐‘— โˆˆ โ„•0 ( ๐พ โ€˜ ๐‘— ) + 1 ) ) )
183 178 179 182 3eqtr3g โŠข ( ( ๐œ‘ โˆง ๐‘š โˆˆ ( โ„คโ‰ฅ โ€˜ ( ๐‘  + ๐‘ก ) ) ) โ†’ ( ฮฃ ๐‘— โˆˆ ( 0 ... ( ๐‘š โˆ’ ๐‘  ) ) ( abs โ€˜ ๐ด ) ยท ( ( ๐ธ / 2 ) / ( ฮฃ ๐‘— โˆˆ โ„•0 ( ๐พ โ€˜ ๐‘— ) + 1 ) ) ) = ฮฃ ๐‘— โˆˆ ( 0 ... ( ๐‘š โˆ’ ๐‘  ) ) ( ( abs โ€˜ ๐ด ) ยท ( ( ๐ธ / 2 ) / ( ฮฃ ๐‘— โˆˆ โ„•0 ( ๐พ โ€˜ ๐‘— ) + 1 ) ) ) )
184 168 183 eqtrd โŠข ( ( ๐œ‘ โˆง ๐‘š โˆˆ ( โ„คโ‰ฅ โ€˜ ( ๐‘  + ๐‘ก ) ) ) โ†’ ( ( ฮฃ ๐‘— โˆˆ ( 0 ... ( ๐‘š โˆ’ ๐‘  ) ) ( abs โ€˜ ๐ด ) ยท ( ๐ธ / 2 ) ) / ( ฮฃ ๐‘— โˆˆ โ„•0 ( ๐พ โ€˜ ๐‘— ) + 1 ) ) = ฮฃ ๐‘— โˆˆ ( 0 ... ( ๐‘š โˆ’ ๐‘  ) ) ( ( abs โ€˜ ๐ด ) ยท ( ( ๐ธ / 2 ) / ( ฮฃ ๐‘— โˆˆ โ„•0 ( ๐พ โ€˜ ๐‘— ) + 1 ) ) ) )
185 158 184 breqtrrd โŠข ( ( ๐œ‘ โˆง ๐‘š โˆˆ ( โ„คโ‰ฅ โ€˜ ( ๐‘  + ๐‘ก ) ) ) โ†’ ฮฃ ๐‘— โˆˆ ( 0 ... ( ๐‘š โˆ’ ๐‘  ) ) ( ( abs โ€˜ ๐ด ) ยท ( abs โ€˜ ฮฃ ๐‘˜ โˆˆ ( โ„คโ‰ฅ โ€˜ ( ( ๐‘š โˆ’ ๐‘— ) + 1 ) ) ๐ต ) ) โ‰ค ( ( ฮฃ ๐‘— โˆˆ ( 0 ... ( ๐‘š โˆ’ ๐‘  ) ) ( abs โ€˜ ๐ด ) ยท ( ๐ธ / 2 ) ) / ( ฮฃ ๐‘— โˆˆ โ„•0 ( ๐พ โ€˜ ๐‘— ) + 1 ) ) )
186 109 adantr โŠข ( ( ๐œ‘ โˆง ๐‘š โˆˆ ( โ„คโ‰ฅ โ€˜ ( ๐‘  + ๐‘ก ) ) ) โ†’ ฮฃ ๐‘— โˆˆ โ„•0 ( ๐พ โ€˜ ๐‘— ) โˆˆ โ„ )
187 163 adantr โŠข ( ( ๐œ‘ โˆง ๐‘š โˆˆ ( โ„คโ‰ฅ โ€˜ ( ๐‘  + ๐‘ก ) ) ) โ†’ ( ฮฃ ๐‘— โˆˆ โ„•0 ( ๐พ โ€˜ ๐‘— ) + 1 ) โˆˆ โ„ )
188 0zd โŠข ( ( ๐œ‘ โˆง ๐‘š โˆˆ ( โ„คโ‰ฅ โ€˜ ( ๐‘  + ๐‘ก ) ) ) โ†’ 0 โˆˆ โ„ค )
189 fz0ssnn0 โŠข ( 0 ... ( ๐‘š โˆ’ ๐‘  ) ) โŠ† โ„•0
190 189 a1i โŠข ( ( ๐œ‘ โˆง ๐‘š โˆˆ ( โ„คโ‰ฅ โ€˜ ( ๐‘  + ๐‘ก ) ) ) โ†’ ( 0 ... ( ๐‘š โˆ’ ๐‘  ) ) โŠ† โ„•0 )
191 2 adantlr โŠข ( ( ( ๐œ‘ โˆง ๐‘š โˆˆ ( โ„คโ‰ฅ โ€˜ ( ๐‘  + ๐‘ก ) ) ) โˆง ๐‘— โˆˆ โ„•0 ) โ†’ ( ๐พ โ€˜ ๐‘— ) = ( abs โ€˜ ๐ด ) )
192 82 adantlr โŠข ( ( ( ๐œ‘ โˆง ๐‘š โˆˆ ( โ„คโ‰ฅ โ€˜ ( ๐‘  + ๐‘ก ) ) ) โˆง ๐‘— โˆˆ โ„•0 ) โ†’ ( abs โ€˜ ๐ด ) โˆˆ โ„ )
193 110 adantlr โŠข ( ( ( ๐œ‘ โˆง ๐‘š โˆˆ ( โ„คโ‰ฅ โ€˜ ( ๐‘  + ๐‘ก ) ) ) โˆง ๐‘— โˆˆ โ„•0 ) โ†’ 0 โ‰ค ( abs โ€˜ ๐ด ) )
194 7 adantr โŠข ( ( ๐œ‘ โˆง ๐‘š โˆˆ ( โ„คโ‰ฅ โ€˜ ( ๐‘  + ๐‘ก ) ) ) โ†’ seq 0 ( + , ๐พ ) โˆˆ dom โ‡ )
195 37 188 52 190 191 192 193 194 isumless โŠข ( ( ๐œ‘ โˆง ๐‘š โˆˆ ( โ„คโ‰ฅ โ€˜ ( ๐‘  + ๐‘ก ) ) ) โ†’ ฮฃ ๐‘— โˆˆ ( 0 ... ( ๐‘š โˆ’ ๐‘  ) ) ( abs โ€˜ ๐ด ) โ‰ค ฮฃ ๐‘— โˆˆ โ„•0 ( abs โ€˜ ๐ด ) )
196 2 sumeq2dv โŠข ( ๐œ‘ โ†’ ฮฃ ๐‘— โˆˆ โ„•0 ( ๐พ โ€˜ ๐‘— ) = ฮฃ ๐‘— โˆˆ โ„•0 ( abs โ€˜ ๐ด ) )
197 196 adantr โŠข ( ( ๐œ‘ โˆง ๐‘š โˆˆ ( โ„คโ‰ฅ โ€˜ ( ๐‘  + ๐‘ก ) ) ) โ†’ ฮฃ ๐‘— โˆˆ โ„•0 ( ๐พ โ€˜ ๐‘— ) = ฮฃ ๐‘— โˆˆ โ„•0 ( abs โ€˜ ๐ด ) )
198 195 197 breqtrrd โŠข ( ( ๐œ‘ โˆง ๐‘š โˆˆ ( โ„คโ‰ฅ โ€˜ ( ๐‘  + ๐‘ก ) ) ) โ†’ ฮฃ ๐‘— โˆˆ ( 0 ... ( ๐‘š โˆ’ ๐‘  ) ) ( abs โ€˜ ๐ด ) โ‰ค ฮฃ ๐‘— โˆˆ โ„•0 ( ๐พ โ€˜ ๐‘— ) )
199 109 ltp1d โŠข ( ๐œ‘ โ†’ ฮฃ ๐‘— โˆˆ โ„•0 ( ๐พ โ€˜ ๐‘— ) < ( ฮฃ ๐‘— โˆˆ โ„•0 ( ๐พ โ€˜ ๐‘— ) + 1 ) )
200 199 adantr โŠข ( ( ๐œ‘ โˆง ๐‘š โˆˆ ( โ„คโ‰ฅ โ€˜ ( ๐‘  + ๐‘ก ) ) ) โ†’ ฮฃ ๐‘— โˆˆ โ„•0 ( ๐พ โ€˜ ๐‘— ) < ( ฮฃ ๐‘— โˆˆ โ„•0 ( ๐พ โ€˜ ๐‘— ) + 1 ) )
201 104 186 187 198 200 lelttrd โŠข ( ( ๐œ‘ โˆง ๐‘š โˆˆ ( โ„คโ‰ฅ โ€˜ ( ๐‘  + ๐‘ก ) ) ) โ†’ ฮฃ ๐‘— โˆˆ ( 0 ... ( ๐‘š โˆ’ ๐‘  ) ) ( abs โ€˜ ๐ด ) < ( ฮฃ ๐‘— โˆˆ โ„•0 ( ๐พ โ€˜ ๐‘— ) + 1 ) )
202 99 rpregt0d โŠข ( ๐œ‘ โ†’ ( ( ๐ธ / 2 ) โˆˆ โ„ โˆง 0 < ( ๐ธ / 2 ) ) )
203 202 adantr โŠข ( ( ๐œ‘ โˆง ๐‘š โˆˆ ( โ„คโ‰ฅ โ€˜ ( ๐‘  + ๐‘ก ) ) ) โ†’ ( ( ๐ธ / 2 ) โˆˆ โ„ โˆง 0 < ( ๐ธ / 2 ) ) )
204 ltmul1 โŠข ( ( ฮฃ ๐‘— โˆˆ ( 0 ... ( ๐‘š โˆ’ ๐‘  ) ) ( abs โ€˜ ๐ด ) โˆˆ โ„ โˆง ( ฮฃ ๐‘— โˆˆ โ„•0 ( ๐พ โ€˜ ๐‘— ) + 1 ) โˆˆ โ„ โˆง ( ( ๐ธ / 2 ) โˆˆ โ„ โˆง 0 < ( ๐ธ / 2 ) ) ) โ†’ ( ฮฃ ๐‘— โˆˆ ( 0 ... ( ๐‘š โˆ’ ๐‘  ) ) ( abs โ€˜ ๐ด ) < ( ฮฃ ๐‘— โˆˆ โ„•0 ( ๐พ โ€˜ ๐‘— ) + 1 ) โ†” ( ฮฃ ๐‘— โˆˆ ( 0 ... ( ๐‘š โˆ’ ๐‘  ) ) ( abs โ€˜ ๐ด ) ยท ( ๐ธ / 2 ) ) < ( ( ฮฃ ๐‘— โˆˆ โ„•0 ( ๐พ โ€˜ ๐‘— ) + 1 ) ยท ( ๐ธ / 2 ) ) ) )
205 104 187 203 204 syl3anc โŠข ( ( ๐œ‘ โˆง ๐‘š โˆˆ ( โ„คโ‰ฅ โ€˜ ( ๐‘  + ๐‘ก ) ) ) โ†’ ( ฮฃ ๐‘— โˆˆ ( 0 ... ( ๐‘š โˆ’ ๐‘  ) ) ( abs โ€˜ ๐ด ) < ( ฮฃ ๐‘— โˆˆ โ„•0 ( ๐พ โ€˜ ๐‘— ) + 1 ) โ†” ( ฮฃ ๐‘— โˆˆ ( 0 ... ( ๐‘š โˆ’ ๐‘  ) ) ( abs โ€˜ ๐ด ) ยท ( ๐ธ / 2 ) ) < ( ( ฮฃ ๐‘— โˆˆ โ„•0 ( ๐พ โ€˜ ๐‘— ) + 1 ) ยท ( ๐ธ / 2 ) ) ) )
206 201 205 mpbid โŠข ( ( ๐œ‘ โˆง ๐‘š โˆˆ ( โ„คโ‰ฅ โ€˜ ( ๐‘  + ๐‘ก ) ) ) โ†’ ( ฮฃ ๐‘— โˆˆ ( 0 ... ( ๐‘š โˆ’ ๐‘  ) ) ( abs โ€˜ ๐ด ) ยท ( ๐ธ / 2 ) ) < ( ( ฮฃ ๐‘— โˆˆ โ„•0 ( ๐พ โ€˜ ๐‘— ) + 1 ) ยท ( ๐ธ / 2 ) ) )
207 113 rpregt0d โŠข ( ๐œ‘ โ†’ ( ( ฮฃ ๐‘— โˆˆ โ„•0 ( ๐พ โ€˜ ๐‘— ) + 1 ) โˆˆ โ„ โˆง 0 < ( ฮฃ ๐‘— โˆˆ โ„•0 ( ๐พ โ€˜ ๐‘— ) + 1 ) ) )
208 207 adantr โŠข ( ( ๐œ‘ โˆง ๐‘š โˆˆ ( โ„คโ‰ฅ โ€˜ ( ๐‘  + ๐‘ก ) ) ) โ†’ ( ( ฮฃ ๐‘— โˆˆ โ„•0 ( ๐พ โ€˜ ๐‘— ) + 1 ) โˆˆ โ„ โˆง 0 < ( ฮฃ ๐‘— โˆˆ โ„•0 ( ๐พ โ€˜ ๐‘— ) + 1 ) ) )
209 ltdivmul โŠข ( ( ( ฮฃ ๐‘— โˆˆ ( 0 ... ( ๐‘š โˆ’ ๐‘  ) ) ( abs โ€˜ ๐ด ) ยท ( ๐ธ / 2 ) ) โˆˆ โ„ โˆง ( ๐ธ / 2 ) โˆˆ โ„ โˆง ( ( ฮฃ ๐‘— โˆˆ โ„•0 ( ๐พ โ€˜ ๐‘— ) + 1 ) โˆˆ โ„ โˆง 0 < ( ฮฃ ๐‘— โˆˆ โ„•0 ( ๐พ โ€˜ ๐‘— ) + 1 ) ) ) โ†’ ( ( ( ฮฃ ๐‘— โˆˆ ( 0 ... ( ๐‘š โˆ’ ๐‘  ) ) ( abs โ€˜ ๐ด ) ยท ( ๐ธ / 2 ) ) / ( ฮฃ ๐‘— โˆˆ โ„•0 ( ๐พ โ€˜ ๐‘— ) + 1 ) ) < ( ๐ธ / 2 ) โ†” ( ฮฃ ๐‘— โˆˆ ( 0 ... ( ๐‘š โˆ’ ๐‘  ) ) ( abs โ€˜ ๐ด ) ยท ( ๐ธ / 2 ) ) < ( ( ฮฃ ๐‘— โˆˆ โ„•0 ( ๐พ โ€˜ ๐‘— ) + 1 ) ยท ( ๐ธ / 2 ) ) ) )
210 105 101 208 209 syl3anc โŠข ( ( ๐œ‘ โˆง ๐‘š โˆˆ ( โ„คโ‰ฅ โ€˜ ( ๐‘  + ๐‘ก ) ) ) โ†’ ( ( ( ฮฃ ๐‘— โˆˆ ( 0 ... ( ๐‘š โˆ’ ๐‘  ) ) ( abs โ€˜ ๐ด ) ยท ( ๐ธ / 2 ) ) / ( ฮฃ ๐‘— โˆˆ โ„•0 ( ๐พ โ€˜ ๐‘— ) + 1 ) ) < ( ๐ธ / 2 ) โ†” ( ฮฃ ๐‘— โˆˆ ( 0 ... ( ๐‘š โˆ’ ๐‘  ) ) ( abs โ€˜ ๐ด ) ยท ( ๐ธ / 2 ) ) < ( ( ฮฃ ๐‘— โˆˆ โ„•0 ( ๐พ โ€˜ ๐‘— ) + 1 ) ยท ( ๐ธ / 2 ) ) ) )
211 206 210 mpbird โŠข ( ( ๐œ‘ โˆง ๐‘š โˆˆ ( โ„คโ‰ฅ โ€˜ ( ๐‘  + ๐‘ก ) ) ) โ†’ ( ( ฮฃ ๐‘— โˆˆ ( 0 ... ( ๐‘š โˆ’ ๐‘  ) ) ( abs โ€˜ ๐ด ) ยท ( ๐ธ / 2 ) ) / ( ฮฃ ๐‘— โˆˆ โ„•0 ( ๐พ โ€˜ ๐‘— ) + 1 ) ) < ( ๐ธ / 2 ) )
212 87 115 101 185 211 lelttrd โŠข ( ( ๐œ‘ โˆง ๐‘š โˆˆ ( โ„คโ‰ฅ โ€˜ ( ๐‘  + ๐‘ก ) ) ) โ†’ ฮฃ ๐‘— โˆˆ ( 0 ... ( ๐‘š โˆ’ ๐‘  ) ) ( ( abs โ€˜ ๐ด ) ยท ( abs โ€˜ ฮฃ ๐‘˜ โˆˆ ( โ„คโ‰ฅ โ€˜ ( ( ๐‘š โˆ’ ๐‘— ) + 1 ) ) ๐ต ) ) < ( ๐ธ / 2 ) )
213 13 simprd โŠข ( ๐œ‘ โ†’ ( ๐‘‡ โŠ† โ„ โˆง ๐‘‡ โ‰  โˆ… โˆง โˆƒ ๐‘ง โˆˆ โ„ โˆ€ ๐‘ค โˆˆ ๐‘‡ ๐‘ค โ‰ค ๐‘ง ) )
214 suprcl โŠข ( ( ๐‘‡ โŠ† โ„ โˆง ๐‘‡ โ‰  โˆ… โˆง โˆƒ ๐‘ง โˆˆ โ„ โˆ€ ๐‘ค โˆˆ ๐‘‡ ๐‘ค โ‰ค ๐‘ง ) โ†’ sup ( ๐‘‡ , โ„ , < ) โˆˆ โ„ )
215 213 214 syl โŠข ( ๐œ‘ โ†’ sup ( ๐‘‡ , โ„ , < ) โˆˆ โ„ )
216 100 215 remulcld โŠข ( ๐œ‘ โ†’ ( ( ๐ธ / 2 ) ยท sup ( ๐‘‡ , โ„ , < ) ) โˆˆ โ„ )
217 13 simpld โŠข ( ๐œ‘ โ†’ 0 โ‰ค sup ( ๐‘‡ , โ„ , < ) )
218 215 217 ge0p1rpd โŠข ( ๐œ‘ โ†’ ( sup ( ๐‘‡ , โ„ , < ) + 1 ) โˆˆ โ„+ )
219 216 218 rerpdivcld โŠข ( ๐œ‘ โ†’ ( ( ( ๐ธ / 2 ) ยท sup ( ๐‘‡ , โ„ , < ) ) / ( sup ( ๐‘‡ , โ„ , < ) + 1 ) ) โˆˆ โ„ )
220 219 adantr โŠข ( ( ๐œ‘ โˆง ๐‘š โˆˆ ( โ„คโ‰ฅ โ€˜ ( ๐‘  + ๐‘ก ) ) ) โ†’ ( ( ( ๐ธ / 2 ) ยท sup ( ๐‘‡ , โ„ , < ) ) / ( sup ( ๐‘‡ , โ„ , < ) + 1 ) ) โˆˆ โ„ )
221 16 nnrpd โŠข ( ๐œ‘ โ†’ ๐‘  โˆˆ โ„+ )
222 99 221 rpdivcld โŠข ( ๐œ‘ โ†’ ( ( ๐ธ / 2 ) / ๐‘  ) โˆˆ โ„+ )
223 222 218 rpdivcld โŠข ( ๐œ‘ โ†’ ( ( ( ๐ธ / 2 ) / ๐‘  ) / ( sup ( ๐‘‡ , โ„ , < ) + 1 ) ) โˆˆ โ„+ )
224 223 rpred โŠข ( ๐œ‘ โ†’ ( ( ( ๐ธ / 2 ) / ๐‘  ) / ( sup ( ๐‘‡ , โ„ , < ) + 1 ) ) โˆˆ โ„ )
225 224 215 remulcld โŠข ( ๐œ‘ โ†’ ( ( ( ( ๐ธ / 2 ) / ๐‘  ) / ( sup ( ๐‘‡ , โ„ , < ) + 1 ) ) ยท sup ( ๐‘‡ , โ„ , < ) ) โˆˆ โ„ )
226 225 ad2antrr โŠข ( ( ( ๐œ‘ โˆง ๐‘š โˆˆ ( โ„คโ‰ฅ โ€˜ ( ๐‘  + ๐‘ก ) ) ) โˆง ๐‘— โˆˆ ( ( ( ๐‘š โˆ’ ๐‘  ) + 1 ) ... ๐‘š ) ) โ†’ ( ( ( ( ๐ธ / 2 ) / ๐‘  ) / ( sup ( ๐‘‡ , โ„ , < ) + 1 ) ) ยท sup ( ๐‘‡ , โ„ , < ) ) โˆˆ โ„ )
227 simpll โŠข ( ( ( ๐œ‘ โˆง ๐‘š โˆˆ ( โ„คโ‰ฅ โ€˜ ( ๐‘  + ๐‘ก ) ) ) โˆง ๐‘— โˆˆ ( ( ( ๐‘š โˆ’ ๐‘  ) + 1 ) ... ๐‘š ) ) โ†’ ๐œ‘ )
228 96 23 syl โŠข ( ( ( ๐œ‘ โˆง ๐‘š โˆˆ ( โ„คโ‰ฅ โ€˜ ( ๐‘  + ๐‘ก ) ) ) โˆง ๐‘— โˆˆ ( ( ( ๐‘š โˆ’ ๐‘  ) + 1 ) ... ๐‘š ) ) โ†’ ๐‘— โˆˆ โ„•0 )
229 227 228 82 syl2anc โŠข ( ( ( ๐œ‘ โˆง ๐‘š โˆˆ ( โ„คโ‰ฅ โ€˜ ( ๐‘  + ๐‘ก ) ) ) โˆง ๐‘— โˆˆ ( ( ( ๐‘š โˆ’ ๐‘  ) + 1 ) ... ๐‘š ) ) โ†’ ( abs โ€˜ ๐ด ) โˆˆ โ„ )
230 224 ad2antrr โŠข ( ( ( ๐œ‘ โˆง ๐‘š โˆˆ ( โ„คโ‰ฅ โ€˜ ( ๐‘  + ๐‘ก ) ) ) โˆง ๐‘— โˆˆ ( ( ( ๐‘š โˆ’ ๐‘  ) + 1 ) ... ๐‘š ) ) โ†’ ( ( ( ๐ธ / 2 ) / ๐‘  ) / ( sup ( ๐‘‡ , โ„ , < ) + 1 ) ) โˆˆ โ„ )
231 227 228 2 syl2anc โŠข ( ( ( ๐œ‘ โˆง ๐‘š โˆˆ ( โ„คโ‰ฅ โ€˜ ( ๐‘  + ๐‘ก ) ) ) โˆง ๐‘— โˆˆ ( ( ( ๐‘š โˆ’ ๐‘  ) + 1 ) ... ๐‘š ) ) โ†’ ( ๐พ โ€˜ ๐‘— ) = ( abs โ€˜ ๐ด ) )
232 fveq2 โŠข ( ๐‘š = ๐‘— โ†’ ( ๐พ โ€˜ ๐‘š ) = ( ๐พ โ€˜ ๐‘— ) )
233 232 breq1d โŠข ( ๐‘š = ๐‘— โ†’ ( ( ๐พ โ€˜ ๐‘š ) < ( ( ( ๐ธ / 2 ) / ๐‘  ) / ( sup ( ๐‘‡ , โ„ , < ) + 1 ) ) โ†” ( ๐พ โ€˜ ๐‘— ) < ( ( ( ๐ธ / 2 ) / ๐‘  ) / ( sup ( ๐‘‡ , โ„ , < ) + 1 ) ) ) )
234 18 simprd โŠข ( ๐œ‘ โ†’ โˆ€ ๐‘š โˆˆ ( โ„คโ‰ฅ โ€˜ ๐‘ก ) ( ๐พ โ€˜ ๐‘š ) < ( ( ( ๐ธ / 2 ) / ๐‘  ) / ( sup ( ๐‘‡ , โ„ , < ) + 1 ) ) )
235 234 ad2antrr โŠข ( ( ( ๐œ‘ โˆง ๐‘š โˆˆ ( โ„คโ‰ฅ โ€˜ ( ๐‘  + ๐‘ก ) ) ) โˆง ๐‘— โˆˆ ( ( ( ๐‘š โˆ’ ๐‘  ) + 1 ) ... ๐‘š ) ) โ†’ โˆ€ ๐‘š โˆˆ ( โ„คโ‰ฅ โ€˜ ๐‘ก ) ( ๐พ โ€˜ ๐‘š ) < ( ( ( ๐ธ / 2 ) / ๐‘  ) / ( sup ( ๐‘‡ , โ„ , < ) + 1 ) ) )
236 elfzuz โŠข ( ๐‘— โˆˆ ( ( ( ๐‘š โˆ’ ๐‘  ) + 1 ) ... ๐‘š ) โ†’ ๐‘— โˆˆ ( โ„คโ‰ฅ โ€˜ ( ( ๐‘š โˆ’ ๐‘  ) + 1 ) ) )
237 eluzle โŠข ( ๐‘š โˆˆ ( โ„คโ‰ฅ โ€˜ ( ๐‘  + ๐‘ก ) ) โ†’ ( ๐‘  + ๐‘ก ) โ‰ค ๐‘š )
238 237 adantl โŠข ( ( ๐œ‘ โˆง ๐‘š โˆˆ ( โ„คโ‰ฅ โ€˜ ( ๐‘  + ๐‘ก ) ) ) โ†’ ( ๐‘  + ๐‘ก ) โ‰ค ๐‘š )
239 19 nn0zd โŠข ( ๐œ‘ โ†’ ๐‘ก โˆˆ โ„ค )
240 239 adantr โŠข ( ( ๐œ‘ โˆง ๐‘š โˆˆ ( โ„คโ‰ฅ โ€˜ ( ๐‘  + ๐‘ก ) ) ) โ†’ ๐‘ก โˆˆ โ„ค )
241 240 zred โŠข ( ( ๐œ‘ โˆง ๐‘š โˆˆ ( โ„คโ‰ฅ โ€˜ ( ๐‘  + ๐‘ก ) ) ) โ†’ ๐‘ก โˆˆ โ„ )
242 58 241 57 leaddsub2d โŠข ( ( ๐œ‘ โˆง ๐‘š โˆˆ ( โ„คโ‰ฅ โ€˜ ( ๐‘  + ๐‘ก ) ) ) โ†’ ( ( ๐‘  + ๐‘ก ) โ‰ค ๐‘š โ†” ๐‘ก โ‰ค ( ๐‘š โˆ’ ๐‘  ) ) )
243 238 242 mpbid โŠข ( ( ๐œ‘ โˆง ๐‘š โˆˆ ( โ„คโ‰ฅ โ€˜ ( ๐‘  + ๐‘ก ) ) ) โ†’ ๐‘ก โ‰ค ( ๐‘š โˆ’ ๐‘  ) )
244 eluz โŠข ( ( ๐‘ก โˆˆ โ„ค โˆง ( ๐‘š โˆ’ ๐‘  ) โˆˆ โ„ค ) โ†’ ( ( ๐‘š โˆ’ ๐‘  ) โˆˆ ( โ„คโ‰ฅ โ€˜ ๐‘ก ) โ†” ๐‘ก โ‰ค ( ๐‘š โˆ’ ๐‘  ) ) )
245 240 75 244 syl2anc โŠข ( ( ๐œ‘ โˆง ๐‘š โˆˆ ( โ„คโ‰ฅ โ€˜ ( ๐‘  + ๐‘ก ) ) ) โ†’ ( ( ๐‘š โˆ’ ๐‘  ) โˆˆ ( โ„คโ‰ฅ โ€˜ ๐‘ก ) โ†” ๐‘ก โ‰ค ( ๐‘š โˆ’ ๐‘  ) ) )
246 243 245 mpbird โŠข ( ( ๐œ‘ โˆง ๐‘š โˆˆ ( โ„คโ‰ฅ โ€˜ ( ๐‘  + ๐‘ก ) ) ) โ†’ ( ๐‘š โˆ’ ๐‘  ) โˆˆ ( โ„คโ‰ฅ โ€˜ ๐‘ก ) )
247 peano2uz โŠข ( ( ๐‘š โˆ’ ๐‘  ) โˆˆ ( โ„คโ‰ฅ โ€˜ ๐‘ก ) โ†’ ( ( ๐‘š โˆ’ ๐‘  ) + 1 ) โˆˆ ( โ„คโ‰ฅ โ€˜ ๐‘ก ) )
248 246 247 syl โŠข ( ( ๐œ‘ โˆง ๐‘š โˆˆ ( โ„คโ‰ฅ โ€˜ ( ๐‘  + ๐‘ก ) ) ) โ†’ ( ( ๐‘š โˆ’ ๐‘  ) + 1 ) โˆˆ ( โ„คโ‰ฅ โ€˜ ๐‘ก ) )
249 uztrn โŠข ( ( ๐‘— โˆˆ ( โ„คโ‰ฅ โ€˜ ( ( ๐‘š โˆ’ ๐‘  ) + 1 ) ) โˆง ( ( ๐‘š โˆ’ ๐‘  ) + 1 ) โˆˆ ( โ„คโ‰ฅ โ€˜ ๐‘ก ) ) โ†’ ๐‘— โˆˆ ( โ„คโ‰ฅ โ€˜ ๐‘ก ) )
250 236 248 249 syl2anr โŠข ( ( ( ๐œ‘ โˆง ๐‘š โˆˆ ( โ„คโ‰ฅ โ€˜ ( ๐‘  + ๐‘ก ) ) ) โˆง ๐‘— โˆˆ ( ( ( ๐‘š โˆ’ ๐‘  ) + 1 ) ... ๐‘š ) ) โ†’ ๐‘— โˆˆ ( โ„คโ‰ฅ โ€˜ ๐‘ก ) )
251 233 235 250 rspcdva โŠข ( ( ( ๐œ‘ โˆง ๐‘š โˆˆ ( โ„คโ‰ฅ โ€˜ ( ๐‘  + ๐‘ก ) ) ) โˆง ๐‘— โˆˆ ( ( ( ๐‘š โˆ’ ๐‘  ) + 1 ) ... ๐‘š ) ) โ†’ ( ๐พ โ€˜ ๐‘— ) < ( ( ( ๐ธ / 2 ) / ๐‘  ) / ( sup ( ๐‘‡ , โ„ , < ) + 1 ) ) )
252 231 251 eqbrtrrd โŠข ( ( ( ๐œ‘ โˆง ๐‘š โˆˆ ( โ„คโ‰ฅ โ€˜ ( ๐‘  + ๐‘ก ) ) ) โˆง ๐‘— โˆˆ ( ( ( ๐‘š โˆ’ ๐‘  ) + 1 ) ... ๐‘š ) ) โ†’ ( abs โ€˜ ๐ด ) < ( ( ( ๐ธ / 2 ) / ๐‘  ) / ( sup ( ๐‘‡ , โ„ , < ) + 1 ) ) )
253 229 230 252 ltled โŠข ( ( ( ๐œ‘ โˆง ๐‘š โˆˆ ( โ„คโ‰ฅ โ€˜ ( ๐‘  + ๐‘ก ) ) ) โˆง ๐‘— โˆˆ ( ( ( ๐‘š โˆ’ ๐‘  ) + 1 ) ... ๐‘š ) ) โ†’ ( abs โ€˜ ๐ด ) โ‰ค ( ( ( ๐ธ / 2 ) / ๐‘  ) / ( sup ( ๐‘‡ , โ„ , < ) + 1 ) ) )
254 213 ad2antrr โŠข ( ( ( ๐œ‘ โˆง ๐‘š โˆˆ ( โ„คโ‰ฅ โ€˜ ( ๐‘  + ๐‘ก ) ) ) โˆง ๐‘— โˆˆ ( ( ( ๐‘š โˆ’ ๐‘  ) + 1 ) ... ๐‘š ) ) โ†’ ( ๐‘‡ โŠ† โ„ โˆง ๐‘‡ โ‰  โˆ… โˆง โˆƒ ๐‘ง โˆˆ โ„ โˆ€ ๐‘ค โˆˆ ๐‘‡ ๐‘ค โ‰ค ๐‘ง ) )
255 57 adantr โŠข ( ( ( ๐œ‘ โˆง ๐‘š โˆˆ ( โ„คโ‰ฅ โ€˜ ( ๐‘  + ๐‘ก ) ) ) โˆง ๐‘— โˆˆ ( ( ( ๐‘š โˆ’ ๐‘  ) + 1 ) ... ๐‘š ) ) โ†’ ๐‘š โˆˆ โ„ )
256 peano2zm โŠข ( ๐‘  โˆˆ โ„ค โ†’ ( ๐‘  โˆ’ 1 ) โˆˆ โ„ค )
257 62 256 syl โŠข ( ๐œ‘ โ†’ ( ๐‘  โˆ’ 1 ) โˆˆ โ„ค )
258 257 zred โŠข ( ๐œ‘ โ†’ ( ๐‘  โˆ’ 1 ) โˆˆ โ„ )
259 258 ad2antrr โŠข ( ( ( ๐œ‘ โˆง ๐‘š โˆˆ ( โ„คโ‰ฅ โ€˜ ( ๐‘  + ๐‘ก ) ) ) โˆง ๐‘— โˆˆ ( ( ( ๐‘š โˆ’ ๐‘  ) + 1 ) ... ๐‘š ) ) โ†’ ( ๐‘  โˆ’ 1 ) โˆˆ โ„ )
260 228 nn0red โŠข ( ( ( ๐œ‘ โˆง ๐‘š โˆˆ ( โ„คโ‰ฅ โ€˜ ( ๐‘  + ๐‘ก ) ) ) โˆง ๐‘— โˆˆ ( ( ( ๐‘š โˆ’ ๐‘  ) + 1 ) ... ๐‘š ) ) โ†’ ๐‘— โˆˆ โ„ )
261 56 zcnd โŠข ( ( ๐œ‘ โˆง ๐‘š โˆˆ ( โ„คโ‰ฅ โ€˜ ( ๐‘  + ๐‘ก ) ) ) โ†’ ๐‘š โˆˆ โ„‚ )
262 58 recnd โŠข ( ( ๐œ‘ โˆง ๐‘š โˆˆ ( โ„คโ‰ฅ โ€˜ ( ๐‘  + ๐‘ก ) ) ) โ†’ ๐‘  โˆˆ โ„‚ )
263 1cnd โŠข ( ( ๐œ‘ โˆง ๐‘š โˆˆ ( โ„คโ‰ฅ โ€˜ ( ๐‘  + ๐‘ก ) ) ) โ†’ 1 โˆˆ โ„‚ )
264 261 262 263 subsubd โŠข ( ( ๐œ‘ โˆง ๐‘š โˆˆ ( โ„คโ‰ฅ โ€˜ ( ๐‘  + ๐‘ก ) ) ) โ†’ ( ๐‘š โˆ’ ( ๐‘  โˆ’ 1 ) ) = ( ( ๐‘š โˆ’ ๐‘  ) + 1 ) )
265 264 adantr โŠข ( ( ( ๐œ‘ โˆง ๐‘š โˆˆ ( โ„คโ‰ฅ โ€˜ ( ๐‘  + ๐‘ก ) ) ) โˆง ๐‘— โˆˆ ( ( ( ๐‘š โˆ’ ๐‘  ) + 1 ) ... ๐‘š ) ) โ†’ ( ๐‘š โˆ’ ( ๐‘  โˆ’ 1 ) ) = ( ( ๐‘š โˆ’ ๐‘  ) + 1 ) )
266 elfzle1 โŠข ( ๐‘— โˆˆ ( ( ( ๐‘š โˆ’ ๐‘  ) + 1 ) ... ๐‘š ) โ†’ ( ( ๐‘š โˆ’ ๐‘  ) + 1 ) โ‰ค ๐‘— )
267 266 adantl โŠข ( ( ( ๐œ‘ โˆง ๐‘š โˆˆ ( โ„คโ‰ฅ โ€˜ ( ๐‘  + ๐‘ก ) ) ) โˆง ๐‘— โˆˆ ( ( ( ๐‘š โˆ’ ๐‘  ) + 1 ) ... ๐‘š ) ) โ†’ ( ( ๐‘š โˆ’ ๐‘  ) + 1 ) โ‰ค ๐‘— )
268 265 267 eqbrtrd โŠข ( ( ( ๐œ‘ โˆง ๐‘š โˆˆ ( โ„คโ‰ฅ โ€˜ ( ๐‘  + ๐‘ก ) ) ) โˆง ๐‘— โˆˆ ( ( ( ๐‘š โˆ’ ๐‘  ) + 1 ) ... ๐‘š ) ) โ†’ ( ๐‘š โˆ’ ( ๐‘  โˆ’ 1 ) ) โ‰ค ๐‘— )
269 255 259 260 268 subled โŠข ( ( ( ๐œ‘ โˆง ๐‘š โˆˆ ( โ„คโ‰ฅ โ€˜ ( ๐‘  + ๐‘ก ) ) ) โˆง ๐‘— โˆˆ ( ( ( ๐‘š โˆ’ ๐‘  ) + 1 ) ... ๐‘š ) ) โ†’ ( ๐‘š โˆ’ ๐‘— ) โ‰ค ( ๐‘  โˆ’ 1 ) )
270 96 26 syl โŠข ( ( ( ๐œ‘ โˆง ๐‘š โˆˆ ( โ„คโ‰ฅ โ€˜ ( ๐‘  + ๐‘ก ) ) ) โˆง ๐‘— โˆˆ ( ( ( ๐‘š โˆ’ ๐‘  ) + 1 ) ... ๐‘š ) ) โ†’ ( ๐‘š โˆ’ ๐‘— ) โˆˆ โ„•0 )
271 270 37 eleqtrdi โŠข ( ( ( ๐œ‘ โˆง ๐‘š โˆˆ ( โ„คโ‰ฅ โ€˜ ( ๐‘  + ๐‘ก ) ) ) โˆง ๐‘— โˆˆ ( ( ( ๐‘š โˆ’ ๐‘  ) + 1 ) ... ๐‘š ) ) โ†’ ( ๐‘š โˆ’ ๐‘— ) โˆˆ ( โ„คโ‰ฅ โ€˜ 0 ) )
272 257 ad2antrr โŠข ( ( ( ๐œ‘ โˆง ๐‘š โˆˆ ( โ„คโ‰ฅ โ€˜ ( ๐‘  + ๐‘ก ) ) ) โˆง ๐‘— โˆˆ ( ( ( ๐‘š โˆ’ ๐‘  ) + 1 ) ... ๐‘š ) ) โ†’ ( ๐‘  โˆ’ 1 ) โˆˆ โ„ค )
273 elfz5 โŠข ( ( ( ๐‘š โˆ’ ๐‘— ) โˆˆ ( โ„คโ‰ฅ โ€˜ 0 ) โˆง ( ๐‘  โˆ’ 1 ) โˆˆ โ„ค ) โ†’ ( ( ๐‘š โˆ’ ๐‘— ) โˆˆ ( 0 ... ( ๐‘  โˆ’ 1 ) ) โ†” ( ๐‘š โˆ’ ๐‘— ) โ‰ค ( ๐‘  โˆ’ 1 ) ) )
274 271 272 273 syl2anc โŠข ( ( ( ๐œ‘ โˆง ๐‘š โˆˆ ( โ„คโ‰ฅ โ€˜ ( ๐‘  + ๐‘ก ) ) ) โˆง ๐‘— โˆˆ ( ( ( ๐‘š โˆ’ ๐‘  ) + 1 ) ... ๐‘š ) ) โ†’ ( ( ๐‘š โˆ’ ๐‘— ) โˆˆ ( 0 ... ( ๐‘  โˆ’ 1 ) ) โ†” ( ๐‘š โˆ’ ๐‘— ) โ‰ค ( ๐‘  โˆ’ 1 ) ) )
275 269 274 mpbird โŠข ( ( ( ๐œ‘ โˆง ๐‘š โˆˆ ( โ„คโ‰ฅ โ€˜ ( ๐‘  + ๐‘ก ) ) ) โˆง ๐‘— โˆˆ ( ( ( ๐‘š โˆ’ ๐‘  ) + 1 ) ... ๐‘š ) ) โ†’ ( ๐‘š โˆ’ ๐‘— ) โˆˆ ( 0 ... ( ๐‘  โˆ’ 1 ) ) )
276 simplll โŠข ( ( ( ( ๐œ‘ โˆง ๐‘š โˆˆ ( โ„คโ‰ฅ โ€˜ ( ๐‘  + ๐‘ก ) ) ) โˆง ๐‘— โˆˆ ( ( ( ๐‘š โˆ’ ๐‘  ) + 1 ) ... ๐‘š ) ) โˆง ๐‘˜ โˆˆ ( โ„คโ‰ฅ โ€˜ ( ( ๐‘š โˆ’ ๐‘— ) + 1 ) ) ) โ†’ ๐œ‘ )
277 96 29 syldan โŠข ( ( ( ๐œ‘ โˆง ๐‘š โˆˆ ( โ„คโ‰ฅ โ€˜ ( ๐‘  + ๐‘ก ) ) ) โˆง ๐‘— โˆˆ ( ( ( ๐‘š โˆ’ ๐‘  ) + 1 ) ... ๐‘š ) ) โ†’ ( ( ๐‘š โˆ’ ๐‘— ) + 1 ) โˆˆ โ„•0 )
278 277 32 sylan โŠข ( ( ( ( ๐œ‘ โˆง ๐‘š โˆˆ ( โ„คโ‰ฅ โ€˜ ( ๐‘  + ๐‘ก ) ) ) โˆง ๐‘— โˆˆ ( ( ( ๐‘š โˆ’ ๐‘  ) + 1 ) ... ๐‘š ) ) โˆง ๐‘˜ โˆˆ ( โ„คโ‰ฅ โ€˜ ( ( ๐‘š โˆ’ ๐‘— ) + 1 ) ) ) โ†’ ๐‘˜ โˆˆ โ„•0 )
279 276 278 4 syl2anc โŠข ( ( ( ( ๐œ‘ โˆง ๐‘š โˆˆ ( โ„คโ‰ฅ โ€˜ ( ๐‘  + ๐‘ก ) ) ) โˆง ๐‘— โˆˆ ( ( ( ๐‘š โˆ’ ๐‘  ) + 1 ) ... ๐‘š ) ) โˆง ๐‘˜ โˆˆ ( โ„คโ‰ฅ โ€˜ ( ( ๐‘š โˆ’ ๐‘— ) + 1 ) ) ) โ†’ ( ๐บ โ€˜ ๐‘˜ ) = ๐ต )
280 279 sumeq2dv โŠข ( ( ( ๐œ‘ โˆง ๐‘š โˆˆ ( โ„คโ‰ฅ โ€˜ ( ๐‘  + ๐‘ก ) ) ) โˆง ๐‘— โˆˆ ( ( ( ๐‘š โˆ’ ๐‘  ) + 1 ) ... ๐‘š ) ) โ†’ ฮฃ ๐‘˜ โˆˆ ( โ„คโ‰ฅ โ€˜ ( ( ๐‘š โˆ’ ๐‘— ) + 1 ) ) ( ๐บ โ€˜ ๐‘˜ ) = ฮฃ ๐‘˜ โˆˆ ( โ„คโ‰ฅ โ€˜ ( ( ๐‘š โˆ’ ๐‘— ) + 1 ) ) ๐ต )
281 280 eqcomd โŠข ( ( ( ๐œ‘ โˆง ๐‘š โˆˆ ( โ„คโ‰ฅ โ€˜ ( ๐‘  + ๐‘ก ) ) ) โˆง ๐‘— โˆˆ ( ( ( ๐‘š โˆ’ ๐‘  ) + 1 ) ... ๐‘š ) ) โ†’ ฮฃ ๐‘˜ โˆˆ ( โ„คโ‰ฅ โ€˜ ( ( ๐‘š โˆ’ ๐‘— ) + 1 ) ) ๐ต = ฮฃ ๐‘˜ โˆˆ ( โ„คโ‰ฅ โ€˜ ( ( ๐‘š โˆ’ ๐‘— ) + 1 ) ) ( ๐บ โ€˜ ๐‘˜ ) )
282 281 fveq2d โŠข ( ( ( ๐œ‘ โˆง ๐‘š โˆˆ ( โ„คโ‰ฅ โ€˜ ( ๐‘  + ๐‘ก ) ) ) โˆง ๐‘— โˆˆ ( ( ( ๐‘š โˆ’ ๐‘  ) + 1 ) ... ๐‘š ) ) โ†’ ( abs โ€˜ ฮฃ ๐‘˜ โˆˆ ( โ„คโ‰ฅ โ€˜ ( ( ๐‘š โˆ’ ๐‘— ) + 1 ) ) ๐ต ) = ( abs โ€˜ ฮฃ ๐‘˜ โˆˆ ( โ„คโ‰ฅ โ€˜ ( ( ๐‘š โˆ’ ๐‘— ) + 1 ) ) ( ๐บ โ€˜ ๐‘˜ ) ) )
283 135 rspceeqv โŠข ( ( ( ๐‘š โˆ’ ๐‘— ) โˆˆ ( 0 ... ( ๐‘  โˆ’ 1 ) ) โˆง ( abs โ€˜ ฮฃ ๐‘˜ โˆˆ ( โ„คโ‰ฅ โ€˜ ( ( ๐‘š โˆ’ ๐‘— ) + 1 ) ) ๐ต ) = ( abs โ€˜ ฮฃ ๐‘˜ โˆˆ ( โ„คโ‰ฅ โ€˜ ( ( ๐‘š โˆ’ ๐‘— ) + 1 ) ) ( ๐บ โ€˜ ๐‘˜ ) ) ) โ†’ โˆƒ ๐‘› โˆˆ ( 0 ... ( ๐‘  โˆ’ 1 ) ) ( abs โ€˜ ฮฃ ๐‘˜ โˆˆ ( โ„คโ‰ฅ โ€˜ ( ( ๐‘š โˆ’ ๐‘— ) + 1 ) ) ๐ต ) = ( abs โ€˜ ฮฃ ๐‘˜ โˆˆ ( โ„คโ‰ฅ โ€˜ ( ๐‘› + 1 ) ) ( ๐บ โ€˜ ๐‘˜ ) ) )
284 275 282 283 syl2anc โŠข ( ( ( ๐œ‘ โˆง ๐‘š โˆˆ ( โ„คโ‰ฅ โ€˜ ( ๐‘  + ๐‘ก ) ) ) โˆง ๐‘— โˆˆ ( ( ( ๐‘š โˆ’ ๐‘  ) + 1 ) ... ๐‘š ) ) โ†’ โˆƒ ๐‘› โˆˆ ( 0 ... ( ๐‘  โˆ’ 1 ) ) ( abs โ€˜ ฮฃ ๐‘˜ โˆˆ ( โ„คโ‰ฅ โ€˜ ( ( ๐‘š โˆ’ ๐‘— ) + 1 ) ) ๐ต ) = ( abs โ€˜ ฮฃ ๐‘˜ โˆˆ ( โ„คโ‰ฅ โ€˜ ( ๐‘› + 1 ) ) ( ๐บ โ€˜ ๐‘˜ ) ) )
285 fvex โŠข ( abs โ€˜ ฮฃ ๐‘˜ โˆˆ ( โ„คโ‰ฅ โ€˜ ( ( ๐‘š โˆ’ ๐‘— ) + 1 ) ) ๐ต ) โˆˆ V
286 eqeq1 โŠข ( ๐‘ง = ( abs โ€˜ ฮฃ ๐‘˜ โˆˆ ( โ„คโ‰ฅ โ€˜ ( ( ๐‘š โˆ’ ๐‘— ) + 1 ) ) ๐ต ) โ†’ ( ๐‘ง = ( abs โ€˜ ฮฃ ๐‘˜ โˆˆ ( โ„คโ‰ฅ โ€˜ ( ๐‘› + 1 ) ) ( ๐บ โ€˜ ๐‘˜ ) ) โ†” ( abs โ€˜ ฮฃ ๐‘˜ โˆˆ ( โ„คโ‰ฅ โ€˜ ( ( ๐‘š โˆ’ ๐‘— ) + 1 ) ) ๐ต ) = ( abs โ€˜ ฮฃ ๐‘˜ โˆˆ ( โ„คโ‰ฅ โ€˜ ( ๐‘› + 1 ) ) ( ๐บ โ€˜ ๐‘˜ ) ) ) )
287 286 rexbidv โŠข ( ๐‘ง = ( abs โ€˜ ฮฃ ๐‘˜ โˆˆ ( โ„คโ‰ฅ โ€˜ ( ( ๐‘š โˆ’ ๐‘— ) + 1 ) ) ๐ต ) โ†’ ( โˆƒ ๐‘› โˆˆ ( 0 ... ( ๐‘  โˆ’ 1 ) ) ๐‘ง = ( abs โ€˜ ฮฃ ๐‘˜ โˆˆ ( โ„คโ‰ฅ โ€˜ ( ๐‘› + 1 ) ) ( ๐บ โ€˜ ๐‘˜ ) ) โ†” โˆƒ ๐‘› โˆˆ ( 0 ... ( ๐‘  โˆ’ 1 ) ) ( abs โ€˜ ฮฃ ๐‘˜ โˆˆ ( โ„คโ‰ฅ โ€˜ ( ( ๐‘š โˆ’ ๐‘— ) + 1 ) ) ๐ต ) = ( abs โ€˜ ฮฃ ๐‘˜ โˆˆ ( โ„คโ‰ฅ โ€˜ ( ๐‘› + 1 ) ) ( ๐บ โ€˜ ๐‘˜ ) ) ) )
288 285 287 10 elab2 โŠข ( ( abs โ€˜ ฮฃ ๐‘˜ โˆˆ ( โ„คโ‰ฅ โ€˜ ( ( ๐‘š โˆ’ ๐‘— ) + 1 ) ) ๐ต ) โˆˆ ๐‘‡ โ†” โˆƒ ๐‘› โˆˆ ( 0 ... ( ๐‘  โˆ’ 1 ) ) ( abs โ€˜ ฮฃ ๐‘˜ โˆˆ ( โ„คโ‰ฅ โ€˜ ( ( ๐‘š โˆ’ ๐‘— ) + 1 ) ) ๐ต ) = ( abs โ€˜ ฮฃ ๐‘˜ โˆˆ ( โ„คโ‰ฅ โ€˜ ( ๐‘› + 1 ) ) ( ๐บ โ€˜ ๐‘˜ ) ) )
289 284 288 sylibr โŠข ( ( ( ๐œ‘ โˆง ๐‘š โˆˆ ( โ„คโ‰ฅ โ€˜ ( ๐‘  + ๐‘ก ) ) ) โˆง ๐‘— โˆˆ ( ( ( ๐‘š โˆ’ ๐‘  ) + 1 ) ... ๐‘š ) ) โ†’ ( abs โ€˜ ฮฃ ๐‘˜ โˆˆ ( โ„คโ‰ฅ โ€˜ ( ( ๐‘š โˆ’ ๐‘— ) + 1 ) ) ๐ต ) โˆˆ ๐‘‡ )
290 suprub โŠข ( ( ( ๐‘‡ โŠ† โ„ โˆง ๐‘‡ โ‰  โˆ… โˆง โˆƒ ๐‘ง โˆˆ โ„ โˆ€ ๐‘ค โˆˆ ๐‘‡ ๐‘ค โ‰ค ๐‘ง ) โˆง ( abs โ€˜ ฮฃ ๐‘˜ โˆˆ ( โ„คโ‰ฅ โ€˜ ( ( ๐‘š โˆ’ ๐‘— ) + 1 ) ) ๐ต ) โˆˆ ๐‘‡ ) โ†’ ( abs โ€˜ ฮฃ ๐‘˜ โˆˆ ( โ„คโ‰ฅ โ€˜ ( ( ๐‘š โˆ’ ๐‘— ) + 1 ) ) ๐ต ) โ‰ค sup ( ๐‘‡ , โ„ , < ) )
291 254 289 290 syl2anc โŠข ( ( ( ๐œ‘ โˆง ๐‘š โˆˆ ( โ„คโ‰ฅ โ€˜ ( ๐‘  + ๐‘ก ) ) ) โˆง ๐‘— โˆˆ ( ( ( ๐‘š โˆ’ ๐‘  ) + 1 ) ... ๐‘š ) ) โ†’ ( abs โ€˜ ฮฃ ๐‘˜ โˆˆ ( โ„คโ‰ฅ โ€˜ ( ( ๐‘š โˆ’ ๐‘— ) + 1 ) ) ๐ต ) โ‰ค sup ( ๐‘‡ , โ„ , < ) )
292 227 228 129 syl2anc โŠข ( ( ( ๐œ‘ โˆง ๐‘š โˆˆ ( โ„คโ‰ฅ โ€˜ ( ๐‘  + ๐‘ก ) ) ) โˆง ๐‘— โˆˆ ( ( ( ๐‘š โˆ’ ๐‘  ) + 1 ) ... ๐‘š ) ) โ†’ ( ( abs โ€˜ ๐ด ) โˆˆ โ„ โˆง 0 โ‰ค ( abs โ€˜ ๐ด ) ) )
293 96 84 syldan โŠข ( ( ( ๐œ‘ โˆง ๐‘š โˆˆ ( โ„คโ‰ฅ โ€˜ ( ๐‘  + ๐‘ก ) ) ) โˆง ๐‘— โˆˆ ( ( ( ๐‘š โˆ’ ๐‘  ) + 1 ) ... ๐‘š ) ) โ†’ ( abs โ€˜ ฮฃ ๐‘˜ โˆˆ ( โ„คโ‰ฅ โ€˜ ( ( ๐‘š โˆ’ ๐‘— ) + 1 ) ) ๐ต ) โˆˆ โ„ )
294 43 absge0d โŠข ( ( ( ๐œ‘ โˆง ๐‘š โˆˆ ( โ„คโ‰ฅ โ€˜ ( ๐‘  + ๐‘ก ) ) ) โˆง ๐‘— โˆˆ ( 0 ... ๐‘š ) ) โ†’ 0 โ‰ค ( abs โ€˜ ฮฃ ๐‘˜ โˆˆ ( โ„คโ‰ฅ โ€˜ ( ( ๐‘š โˆ’ ๐‘— ) + 1 ) ) ๐ต ) )
295 96 294 syldan โŠข ( ( ( ๐œ‘ โˆง ๐‘š โˆˆ ( โ„คโ‰ฅ โ€˜ ( ๐‘  + ๐‘ก ) ) ) โˆง ๐‘— โˆˆ ( ( ( ๐‘š โˆ’ ๐‘  ) + 1 ) ... ๐‘š ) ) โ†’ 0 โ‰ค ( abs โ€˜ ฮฃ ๐‘˜ โˆˆ ( โ„คโ‰ฅ โ€˜ ( ( ๐‘š โˆ’ ๐‘— ) + 1 ) ) ๐ต ) )
296 293 295 jca โŠข ( ( ( ๐œ‘ โˆง ๐‘š โˆˆ ( โ„คโ‰ฅ โ€˜ ( ๐‘  + ๐‘ก ) ) ) โˆง ๐‘— โˆˆ ( ( ( ๐‘š โˆ’ ๐‘  ) + 1 ) ... ๐‘š ) ) โ†’ ( ( abs โ€˜ ฮฃ ๐‘˜ โˆˆ ( โ„คโ‰ฅ โ€˜ ( ( ๐‘š โˆ’ ๐‘— ) + 1 ) ) ๐ต ) โˆˆ โ„ โˆง 0 โ‰ค ( abs โ€˜ ฮฃ ๐‘˜ โˆˆ ( โ„คโ‰ฅ โ€˜ ( ( ๐‘š โˆ’ ๐‘— ) + 1 ) ) ๐ต ) ) )
297 215 ad2antrr โŠข ( ( ( ๐œ‘ โˆง ๐‘š โˆˆ ( โ„คโ‰ฅ โ€˜ ( ๐‘  + ๐‘ก ) ) ) โˆง ๐‘— โˆˆ ( ( ( ๐‘š โˆ’ ๐‘  ) + 1 ) ... ๐‘š ) ) โ†’ sup ( ๐‘‡ , โ„ , < ) โˆˆ โ„ )
298 lemul12a โŠข ( ( ( ( ( abs โ€˜ ๐ด ) โˆˆ โ„ โˆง 0 โ‰ค ( abs โ€˜ ๐ด ) ) โˆง ( ( ( ๐ธ / 2 ) / ๐‘  ) / ( sup ( ๐‘‡ , โ„ , < ) + 1 ) ) โˆˆ โ„ ) โˆง ( ( ( abs โ€˜ ฮฃ ๐‘˜ โˆˆ ( โ„คโ‰ฅ โ€˜ ( ( ๐‘š โˆ’ ๐‘— ) + 1 ) ) ๐ต ) โˆˆ โ„ โˆง 0 โ‰ค ( abs โ€˜ ฮฃ ๐‘˜ โˆˆ ( โ„คโ‰ฅ โ€˜ ( ( ๐‘š โˆ’ ๐‘— ) + 1 ) ) ๐ต ) ) โˆง sup ( ๐‘‡ , โ„ , < ) โˆˆ โ„ ) ) โ†’ ( ( ( abs โ€˜ ๐ด ) โ‰ค ( ( ( ๐ธ / 2 ) / ๐‘  ) / ( sup ( ๐‘‡ , โ„ , < ) + 1 ) ) โˆง ( abs โ€˜ ฮฃ ๐‘˜ โˆˆ ( โ„คโ‰ฅ โ€˜ ( ( ๐‘š โˆ’ ๐‘— ) + 1 ) ) ๐ต ) โ‰ค sup ( ๐‘‡ , โ„ , < ) ) โ†’ ( ( abs โ€˜ ๐ด ) ยท ( abs โ€˜ ฮฃ ๐‘˜ โˆˆ ( โ„คโ‰ฅ โ€˜ ( ( ๐‘š โˆ’ ๐‘— ) + 1 ) ) ๐ต ) ) โ‰ค ( ( ( ( ๐ธ / 2 ) / ๐‘  ) / ( sup ( ๐‘‡ , โ„ , < ) + 1 ) ) ยท sup ( ๐‘‡ , โ„ , < ) ) ) )
299 292 230 296 297 298 syl22anc โŠข ( ( ( ๐œ‘ โˆง ๐‘š โˆˆ ( โ„คโ‰ฅ โ€˜ ( ๐‘  + ๐‘ก ) ) ) โˆง ๐‘— โˆˆ ( ( ( ๐‘š โˆ’ ๐‘  ) + 1 ) ... ๐‘š ) ) โ†’ ( ( ( abs โ€˜ ๐ด ) โ‰ค ( ( ( ๐ธ / 2 ) / ๐‘  ) / ( sup ( ๐‘‡ , โ„ , < ) + 1 ) ) โˆง ( abs โ€˜ ฮฃ ๐‘˜ โˆˆ ( โ„คโ‰ฅ โ€˜ ( ( ๐‘š โˆ’ ๐‘— ) + 1 ) ) ๐ต ) โ‰ค sup ( ๐‘‡ , โ„ , < ) ) โ†’ ( ( abs โ€˜ ๐ด ) ยท ( abs โ€˜ ฮฃ ๐‘˜ โˆˆ ( โ„คโ‰ฅ โ€˜ ( ( ๐‘š โˆ’ ๐‘— ) + 1 ) ) ๐ต ) ) โ‰ค ( ( ( ( ๐ธ / 2 ) / ๐‘  ) / ( sup ( ๐‘‡ , โ„ , < ) + 1 ) ) ยท sup ( ๐‘‡ , โ„ , < ) ) ) )
300 253 291 299 mp2and โŠข ( ( ( ๐œ‘ โˆง ๐‘š โˆˆ ( โ„คโ‰ฅ โ€˜ ( ๐‘  + ๐‘ก ) ) ) โˆง ๐‘— โˆˆ ( ( ( ๐‘š โˆ’ ๐‘  ) + 1 ) ... ๐‘š ) ) โ†’ ( ( abs โ€˜ ๐ด ) ยท ( abs โ€˜ ฮฃ ๐‘˜ โˆˆ ( โ„คโ‰ฅ โ€˜ ( ( ๐‘š โˆ’ ๐‘— ) + 1 ) ) ๐ต ) ) โ‰ค ( ( ( ( ๐ธ / 2 ) / ๐‘  ) / ( sup ( ๐‘‡ , โ„ , < ) + 1 ) ) ยท sup ( ๐‘‡ , โ„ , < ) ) )
301 88 97 226 300 fsumle โŠข ( ( ๐œ‘ โˆง ๐‘š โˆˆ ( โ„คโ‰ฅ โ€˜ ( ๐‘  + ๐‘ก ) ) ) โ†’ ฮฃ ๐‘— โˆˆ ( ( ( ๐‘š โˆ’ ๐‘  ) + 1 ) ... ๐‘š ) ( ( abs โ€˜ ๐ด ) ยท ( abs โ€˜ ฮฃ ๐‘˜ โˆˆ ( โ„คโ‰ฅ โ€˜ ( ( ๐‘š โˆ’ ๐‘— ) + 1 ) ) ๐ต ) ) โ‰ค ฮฃ ๐‘— โˆˆ ( ( ( ๐‘š โˆ’ ๐‘  ) + 1 ) ... ๐‘š ) ( ( ( ( ๐ธ / 2 ) / ๐‘  ) / ( sup ( ๐‘‡ , โ„ , < ) + 1 ) ) ยท sup ( ๐‘‡ , โ„ , < ) ) )
302 225 recnd โŠข ( ๐œ‘ โ†’ ( ( ( ( ๐ธ / 2 ) / ๐‘  ) / ( sup ( ๐‘‡ , โ„ , < ) + 1 ) ) ยท sup ( ๐‘‡ , โ„ , < ) ) โˆˆ โ„‚ )
303 302 adantr โŠข ( ( ๐œ‘ โˆง ๐‘š โˆˆ ( โ„คโ‰ฅ โ€˜ ( ๐‘  + ๐‘ก ) ) ) โ†’ ( ( ( ( ๐ธ / 2 ) / ๐‘  ) / ( sup ( ๐‘‡ , โ„ , < ) + 1 ) ) ยท sup ( ๐‘‡ , โ„ , < ) ) โˆˆ โ„‚ )
304 fsumconst โŠข ( ( ( ( ( ๐‘š โˆ’ ๐‘  ) + 1 ) ... ๐‘š ) โˆˆ Fin โˆง ( ( ( ( ๐ธ / 2 ) / ๐‘  ) / ( sup ( ๐‘‡ , โ„ , < ) + 1 ) ) ยท sup ( ๐‘‡ , โ„ , < ) ) โˆˆ โ„‚ ) โ†’ ฮฃ ๐‘— โˆˆ ( ( ( ๐‘š โˆ’ ๐‘  ) + 1 ) ... ๐‘š ) ( ( ( ( ๐ธ / 2 ) / ๐‘  ) / ( sup ( ๐‘‡ , โ„ , < ) + 1 ) ) ยท sup ( ๐‘‡ , โ„ , < ) ) = ( ( โ™ฏ โ€˜ ( ( ( ๐‘š โˆ’ ๐‘  ) + 1 ) ... ๐‘š ) ) ยท ( ( ( ( ๐ธ / 2 ) / ๐‘  ) / ( sup ( ๐‘‡ , โ„ , < ) + 1 ) ) ยท sup ( ๐‘‡ , โ„ , < ) ) ) )
305 88 303 304 syl2anc โŠข ( ( ๐œ‘ โˆง ๐‘š โˆˆ ( โ„คโ‰ฅ โ€˜ ( ๐‘  + ๐‘ก ) ) ) โ†’ ฮฃ ๐‘— โˆˆ ( ( ( ๐‘š โˆ’ ๐‘  ) + 1 ) ... ๐‘š ) ( ( ( ( ๐ธ / 2 ) / ๐‘  ) / ( sup ( ๐‘‡ , โ„ , < ) + 1 ) ) ยท sup ( ๐‘‡ , โ„ , < ) ) = ( ( โ™ฏ โ€˜ ( ( ( ๐‘š โˆ’ ๐‘  ) + 1 ) ... ๐‘š ) ) ยท ( ( ( ( ๐ธ / 2 ) / ๐‘  ) / ( sup ( ๐‘‡ , โ„ , < ) + 1 ) ) ยท sup ( ๐‘‡ , โ„ , < ) ) ) )
306 1zzd โŠข ( ( ๐œ‘ โˆง ๐‘š โˆˆ ( โ„คโ‰ฅ โ€˜ ( ๐‘  + ๐‘ก ) ) ) โ†’ 1 โˆˆ โ„ค )
307 62 adantr โŠข ( ( ๐œ‘ โˆง ๐‘š โˆˆ ( โ„คโ‰ฅ โ€˜ ( ๐‘  + ๐‘ก ) ) ) โ†’ ๐‘  โˆˆ โ„ค )
308 fzen โŠข ( ( 1 โˆˆ โ„ค โˆง ๐‘  โˆˆ โ„ค โˆง ( ๐‘š โˆ’ ๐‘  ) โˆˆ โ„ค ) โ†’ ( 1 ... ๐‘  ) โ‰ˆ ( ( 1 + ( ๐‘š โˆ’ ๐‘  ) ) ... ( ๐‘  + ( ๐‘š โˆ’ ๐‘  ) ) ) )
309 306 307 75 308 syl3anc โŠข ( ( ๐œ‘ โˆง ๐‘š โˆˆ ( โ„คโ‰ฅ โ€˜ ( ๐‘  + ๐‘ก ) ) ) โ†’ ( 1 ... ๐‘  ) โ‰ˆ ( ( 1 + ( ๐‘š โˆ’ ๐‘  ) ) ... ( ๐‘  + ( ๐‘š โˆ’ ๐‘  ) ) ) )
310 ax-1cn โŠข 1 โˆˆ โ„‚
311 75 zcnd โŠข ( ( ๐œ‘ โˆง ๐‘š โˆˆ ( โ„คโ‰ฅ โ€˜ ( ๐‘  + ๐‘ก ) ) ) โ†’ ( ๐‘š โˆ’ ๐‘  ) โˆˆ โ„‚ )
312 addcom โŠข ( ( 1 โˆˆ โ„‚ โˆง ( ๐‘š โˆ’ ๐‘  ) โˆˆ โ„‚ ) โ†’ ( 1 + ( ๐‘š โˆ’ ๐‘  ) ) = ( ( ๐‘š โˆ’ ๐‘  ) + 1 ) )
313 310 311 312 sylancr โŠข ( ( ๐œ‘ โˆง ๐‘š โˆˆ ( โ„คโ‰ฅ โ€˜ ( ๐‘  + ๐‘ก ) ) ) โ†’ ( 1 + ( ๐‘š โˆ’ ๐‘  ) ) = ( ( ๐‘š โˆ’ ๐‘  ) + 1 ) )
314 262 261 pncan3d โŠข ( ( ๐œ‘ โˆง ๐‘š โˆˆ ( โ„คโ‰ฅ โ€˜ ( ๐‘  + ๐‘ก ) ) ) โ†’ ( ๐‘  + ( ๐‘š โˆ’ ๐‘  ) ) = ๐‘š )
315 313 314 oveq12d โŠข ( ( ๐œ‘ โˆง ๐‘š โˆˆ ( โ„คโ‰ฅ โ€˜ ( ๐‘  + ๐‘ก ) ) ) โ†’ ( ( 1 + ( ๐‘š โˆ’ ๐‘  ) ) ... ( ๐‘  + ( ๐‘š โˆ’ ๐‘  ) ) ) = ( ( ( ๐‘š โˆ’ ๐‘  ) + 1 ) ... ๐‘š ) )
316 309 315 breqtrd โŠข ( ( ๐œ‘ โˆง ๐‘š โˆˆ ( โ„คโ‰ฅ โ€˜ ( ๐‘  + ๐‘ก ) ) ) โ†’ ( 1 ... ๐‘  ) โ‰ˆ ( ( ( ๐‘š โˆ’ ๐‘  ) + 1 ) ... ๐‘š ) )
317 fzfid โŠข ( ( ๐œ‘ โˆง ๐‘š โˆˆ ( โ„คโ‰ฅ โ€˜ ( ๐‘  + ๐‘ก ) ) ) โ†’ ( 1 ... ๐‘  ) โˆˆ Fin )
318 hashen โŠข ( ( ( 1 ... ๐‘  ) โˆˆ Fin โˆง ( ( ( ๐‘š โˆ’ ๐‘  ) + 1 ) ... ๐‘š ) โˆˆ Fin ) โ†’ ( ( โ™ฏ โ€˜ ( 1 ... ๐‘  ) ) = ( โ™ฏ โ€˜ ( ( ( ๐‘š โˆ’ ๐‘  ) + 1 ) ... ๐‘š ) ) โ†” ( 1 ... ๐‘  ) โ‰ˆ ( ( ( ๐‘š โˆ’ ๐‘  ) + 1 ) ... ๐‘š ) ) )
319 317 88 318 syl2anc โŠข ( ( ๐œ‘ โˆง ๐‘š โˆˆ ( โ„คโ‰ฅ โ€˜ ( ๐‘  + ๐‘ก ) ) ) โ†’ ( ( โ™ฏ โ€˜ ( 1 ... ๐‘  ) ) = ( โ™ฏ โ€˜ ( ( ( ๐‘š โˆ’ ๐‘  ) + 1 ) ... ๐‘š ) ) โ†” ( 1 ... ๐‘  ) โ‰ˆ ( ( ( ๐‘š โˆ’ ๐‘  ) + 1 ) ... ๐‘š ) ) )
320 316 319 mpbird โŠข ( ( ๐œ‘ โˆง ๐‘š โˆˆ ( โ„คโ‰ฅ โ€˜ ( ๐‘  + ๐‘ก ) ) ) โ†’ ( โ™ฏ โ€˜ ( 1 ... ๐‘  ) ) = ( โ™ฏ โ€˜ ( ( ( ๐‘š โˆ’ ๐‘  ) + 1 ) ... ๐‘š ) ) )
321 hashfz1 โŠข ( ๐‘  โˆˆ โ„•0 โ†’ ( โ™ฏ โ€˜ ( 1 ... ๐‘  ) ) = ๐‘  )
322 53 321 syl โŠข ( ( ๐œ‘ โˆง ๐‘š โˆˆ ( โ„คโ‰ฅ โ€˜ ( ๐‘  + ๐‘ก ) ) ) โ†’ ( โ™ฏ โ€˜ ( 1 ... ๐‘  ) ) = ๐‘  )
323 320 322 eqtr3d โŠข ( ( ๐œ‘ โˆง ๐‘š โˆˆ ( โ„คโ‰ฅ โ€˜ ( ๐‘  + ๐‘ก ) ) ) โ†’ ( โ™ฏ โ€˜ ( ( ( ๐‘š โˆ’ ๐‘  ) + 1 ) ... ๐‘š ) ) = ๐‘  )
324 323 oveq1d โŠข ( ( ๐œ‘ โˆง ๐‘š โˆˆ ( โ„คโ‰ฅ โ€˜ ( ๐‘  + ๐‘ก ) ) ) โ†’ ( ( โ™ฏ โ€˜ ( ( ( ๐‘š โˆ’ ๐‘  ) + 1 ) ... ๐‘š ) ) ยท ( ( ( ( ๐ธ / 2 ) / ๐‘  ) / ( sup ( ๐‘‡ , โ„ , < ) + 1 ) ) ยท sup ( ๐‘‡ , โ„ , < ) ) ) = ( ๐‘  ยท ( ( ( ( ๐ธ / 2 ) / ๐‘  ) / ( sup ( ๐‘‡ , โ„ , < ) + 1 ) ) ยท sup ( ๐‘‡ , โ„ , < ) ) ) )
325 215 recnd โŠข ( ๐œ‘ โ†’ sup ( ๐‘‡ , โ„ , < ) โˆˆ โ„‚ )
326 218 rpcnne0d โŠข ( ๐œ‘ โ†’ ( ( sup ( ๐‘‡ , โ„ , < ) + 1 ) โˆˆ โ„‚ โˆง ( sup ( ๐‘‡ , โ„ , < ) + 1 ) โ‰  0 ) )
327 div23 โŠข ( ( ( ๐ธ / 2 ) โˆˆ โ„‚ โˆง sup ( ๐‘‡ , โ„ , < ) โˆˆ โ„‚ โˆง ( ( sup ( ๐‘‡ , โ„ , < ) + 1 ) โˆˆ โ„‚ โˆง ( sup ( ๐‘‡ , โ„ , < ) + 1 ) โ‰  0 ) ) โ†’ ( ( ( ๐ธ / 2 ) ยท sup ( ๐‘‡ , โ„ , < ) ) / ( sup ( ๐‘‡ , โ„ , < ) + 1 ) ) = ( ( ( ๐ธ / 2 ) / ( sup ( ๐‘‡ , โ„ , < ) + 1 ) ) ยท sup ( ๐‘‡ , โ„ , < ) ) )
328 160 325 326 327 syl3anc โŠข ( ๐œ‘ โ†’ ( ( ( ๐ธ / 2 ) ยท sup ( ๐‘‡ , โ„ , < ) ) / ( sup ( ๐‘‡ , โ„ , < ) + 1 ) ) = ( ( ( ๐ธ / 2 ) / ( sup ( ๐‘‡ , โ„ , < ) + 1 ) ) ยท sup ( ๐‘‡ , โ„ , < ) ) )
329 62 zcnd โŠข ( ๐œ‘ โ†’ ๐‘  โˆˆ โ„‚ )
330 222 rpcnd โŠข ( ๐œ‘ โ†’ ( ( ๐ธ / 2 ) / ๐‘  ) โˆˆ โ„‚ )
331 divass โŠข ( ( ๐‘  โˆˆ โ„‚ โˆง ( ( ๐ธ / 2 ) / ๐‘  ) โˆˆ โ„‚ โˆง ( ( sup ( ๐‘‡ , โ„ , < ) + 1 ) โˆˆ โ„‚ โˆง ( sup ( ๐‘‡ , โ„ , < ) + 1 ) โ‰  0 ) ) โ†’ ( ( ๐‘  ยท ( ( ๐ธ / 2 ) / ๐‘  ) ) / ( sup ( ๐‘‡ , โ„ , < ) + 1 ) ) = ( ๐‘  ยท ( ( ( ๐ธ / 2 ) / ๐‘  ) / ( sup ( ๐‘‡ , โ„ , < ) + 1 ) ) ) )
332 329 330 326 331 syl3anc โŠข ( ๐œ‘ โ†’ ( ( ๐‘  ยท ( ( ๐ธ / 2 ) / ๐‘  ) ) / ( sup ( ๐‘‡ , โ„ , < ) + 1 ) ) = ( ๐‘  ยท ( ( ( ๐ธ / 2 ) / ๐‘  ) / ( sup ( ๐‘‡ , โ„ , < ) + 1 ) ) ) )
333 16 nnne0d โŠข ( ๐œ‘ โ†’ ๐‘  โ‰  0 )
334 160 329 333 divcan2d โŠข ( ๐œ‘ โ†’ ( ๐‘  ยท ( ( ๐ธ / 2 ) / ๐‘  ) ) = ( ๐ธ / 2 ) )
335 334 oveq1d โŠข ( ๐œ‘ โ†’ ( ( ๐‘  ยท ( ( ๐ธ / 2 ) / ๐‘  ) ) / ( sup ( ๐‘‡ , โ„ , < ) + 1 ) ) = ( ( ๐ธ / 2 ) / ( sup ( ๐‘‡ , โ„ , < ) + 1 ) ) )
336 332 335 eqtr3d โŠข ( ๐œ‘ โ†’ ( ๐‘  ยท ( ( ( ๐ธ / 2 ) / ๐‘  ) / ( sup ( ๐‘‡ , โ„ , < ) + 1 ) ) ) = ( ( ๐ธ / 2 ) / ( sup ( ๐‘‡ , โ„ , < ) + 1 ) ) )
337 336 oveq1d โŠข ( ๐œ‘ โ†’ ( ( ๐‘  ยท ( ( ( ๐ธ / 2 ) / ๐‘  ) / ( sup ( ๐‘‡ , โ„ , < ) + 1 ) ) ) ยท sup ( ๐‘‡ , โ„ , < ) ) = ( ( ( ๐ธ / 2 ) / ( sup ( ๐‘‡ , โ„ , < ) + 1 ) ) ยท sup ( ๐‘‡ , โ„ , < ) ) )
338 223 rpcnd โŠข ( ๐œ‘ โ†’ ( ( ( ๐ธ / 2 ) / ๐‘  ) / ( sup ( ๐‘‡ , โ„ , < ) + 1 ) ) โˆˆ โ„‚ )
339 329 338 325 mulassd โŠข ( ๐œ‘ โ†’ ( ( ๐‘  ยท ( ( ( ๐ธ / 2 ) / ๐‘  ) / ( sup ( ๐‘‡ , โ„ , < ) + 1 ) ) ) ยท sup ( ๐‘‡ , โ„ , < ) ) = ( ๐‘  ยท ( ( ( ( ๐ธ / 2 ) / ๐‘  ) / ( sup ( ๐‘‡ , โ„ , < ) + 1 ) ) ยท sup ( ๐‘‡ , โ„ , < ) ) ) )
340 328 337 339 3eqtr2rd โŠข ( ๐œ‘ โ†’ ( ๐‘  ยท ( ( ( ( ๐ธ / 2 ) / ๐‘  ) / ( sup ( ๐‘‡ , โ„ , < ) + 1 ) ) ยท sup ( ๐‘‡ , โ„ , < ) ) ) = ( ( ( ๐ธ / 2 ) ยท sup ( ๐‘‡ , โ„ , < ) ) / ( sup ( ๐‘‡ , โ„ , < ) + 1 ) ) )
341 340 adantr โŠข ( ( ๐œ‘ โˆง ๐‘š โˆˆ ( โ„คโ‰ฅ โ€˜ ( ๐‘  + ๐‘ก ) ) ) โ†’ ( ๐‘  ยท ( ( ( ( ๐ธ / 2 ) / ๐‘  ) / ( sup ( ๐‘‡ , โ„ , < ) + 1 ) ) ยท sup ( ๐‘‡ , โ„ , < ) ) ) = ( ( ( ๐ธ / 2 ) ยท sup ( ๐‘‡ , โ„ , < ) ) / ( sup ( ๐‘‡ , โ„ , < ) + 1 ) ) )
342 305 324 341 3eqtrd โŠข ( ( ๐œ‘ โˆง ๐‘š โˆˆ ( โ„คโ‰ฅ โ€˜ ( ๐‘  + ๐‘ก ) ) ) โ†’ ฮฃ ๐‘— โˆˆ ( ( ( ๐‘š โˆ’ ๐‘  ) + 1 ) ... ๐‘š ) ( ( ( ( ๐ธ / 2 ) / ๐‘  ) / ( sup ( ๐‘‡ , โ„ , < ) + 1 ) ) ยท sup ( ๐‘‡ , โ„ , < ) ) = ( ( ( ๐ธ / 2 ) ยท sup ( ๐‘‡ , โ„ , < ) ) / ( sup ( ๐‘‡ , โ„ , < ) + 1 ) ) )
343 301 342 breqtrd โŠข ( ( ๐œ‘ โˆง ๐‘š โˆˆ ( โ„คโ‰ฅ โ€˜ ( ๐‘  + ๐‘ก ) ) ) โ†’ ฮฃ ๐‘— โˆˆ ( ( ( ๐‘š โˆ’ ๐‘  ) + 1 ) ... ๐‘š ) ( ( abs โ€˜ ๐ด ) ยท ( abs โ€˜ ฮฃ ๐‘˜ โˆˆ ( โ„คโ‰ฅ โ€˜ ( ( ๐‘š โˆ’ ๐‘— ) + 1 ) ) ๐ต ) ) โ‰ค ( ( ( ๐ธ / 2 ) ยท sup ( ๐‘‡ , โ„ , < ) ) / ( sup ( ๐‘‡ , โ„ , < ) + 1 ) ) )
344 peano2re โŠข ( sup ( ๐‘‡ , โ„ , < ) โˆˆ โ„ โ†’ ( sup ( ๐‘‡ , โ„ , < ) + 1 ) โˆˆ โ„ )
345 215 344 syl โŠข ( ๐œ‘ โ†’ ( sup ( ๐‘‡ , โ„ , < ) + 1 ) โˆˆ โ„ )
346 215 ltp1d โŠข ( ๐œ‘ โ†’ sup ( ๐‘‡ , โ„ , < ) < ( sup ( ๐‘‡ , โ„ , < ) + 1 ) )
347 215 345 99 346 ltmul2dd โŠข ( ๐œ‘ โ†’ ( ( ๐ธ / 2 ) ยท sup ( ๐‘‡ , โ„ , < ) ) < ( ( ๐ธ / 2 ) ยท ( sup ( ๐‘‡ , โ„ , < ) + 1 ) ) )
348 216 100 218 ltdivmul2d โŠข ( ๐œ‘ โ†’ ( ( ( ( ๐ธ / 2 ) ยท sup ( ๐‘‡ , โ„ , < ) ) / ( sup ( ๐‘‡ , โ„ , < ) + 1 ) ) < ( ๐ธ / 2 ) โ†” ( ( ๐ธ / 2 ) ยท sup ( ๐‘‡ , โ„ , < ) ) < ( ( ๐ธ / 2 ) ยท ( sup ( ๐‘‡ , โ„ , < ) + 1 ) ) ) )
349 347 348 mpbird โŠข ( ๐œ‘ โ†’ ( ( ( ๐ธ / 2 ) ยท sup ( ๐‘‡ , โ„ , < ) ) / ( sup ( ๐‘‡ , โ„ , < ) + 1 ) ) < ( ๐ธ / 2 ) )
350 349 adantr โŠข ( ( ๐œ‘ โˆง ๐‘š โˆˆ ( โ„คโ‰ฅ โ€˜ ( ๐‘  + ๐‘ก ) ) ) โ†’ ( ( ( ๐ธ / 2 ) ยท sup ( ๐‘‡ , โ„ , < ) ) / ( sup ( ๐‘‡ , โ„ , < ) + 1 ) ) < ( ๐ธ / 2 ) )
351 98 220 101 343 350 lelttrd โŠข ( ( ๐œ‘ โˆง ๐‘š โˆˆ ( โ„คโ‰ฅ โ€˜ ( ๐‘  + ๐‘ก ) ) ) โ†’ ฮฃ ๐‘— โˆˆ ( ( ( ๐‘š โˆ’ ๐‘  ) + 1 ) ... ๐‘š ) ( ( abs โ€˜ ๐ด ) ยท ( abs โ€˜ ฮฃ ๐‘˜ โˆˆ ( โ„คโ‰ฅ โ€˜ ( ( ๐‘š โˆ’ ๐‘— ) + 1 ) ) ๐ต ) ) < ( ๐ธ / 2 ) )
352 87 98 101 101 212 351 lt2addd โŠข ( ( ๐œ‘ โˆง ๐‘š โˆˆ ( โ„คโ‰ฅ โ€˜ ( ๐‘  + ๐‘ก ) ) ) โ†’ ( ฮฃ ๐‘— โˆˆ ( 0 ... ( ๐‘š โˆ’ ๐‘  ) ) ( ( abs โ€˜ ๐ด ) ยท ( abs โ€˜ ฮฃ ๐‘˜ โˆˆ ( โ„คโ‰ฅ โ€˜ ( ( ๐‘š โˆ’ ๐‘— ) + 1 ) ) ๐ต ) ) + ฮฃ ๐‘— โˆˆ ( ( ( ๐‘š โˆ’ ๐‘  ) + 1 ) ... ๐‘š ) ( ( abs โ€˜ ๐ด ) ยท ( abs โ€˜ ฮฃ ๐‘˜ โˆˆ ( โ„คโ‰ฅ โ€˜ ( ( ๐‘š โˆ’ ๐‘— ) + 1 ) ) ๐ต ) ) ) < ( ( ๐ธ / 2 ) + ( ๐ธ / 2 ) ) )
353 24 43 absmuld โŠข ( ( ( ๐œ‘ โˆง ๐‘š โˆˆ ( โ„คโ‰ฅ โ€˜ ( ๐‘  + ๐‘ก ) ) ) โˆง ๐‘— โˆˆ ( 0 ... ๐‘š ) ) โ†’ ( abs โ€˜ ( ๐ด ยท ฮฃ ๐‘˜ โˆˆ ( โ„คโ‰ฅ โ€˜ ( ( ๐‘š โˆ’ ๐‘— ) + 1 ) ) ๐ต ) ) = ( ( abs โ€˜ ๐ด ) ยท ( abs โ€˜ ฮฃ ๐‘˜ โˆˆ ( โ„คโ‰ฅ โ€˜ ( ( ๐‘š โˆ’ ๐‘— ) + 1 ) ) ๐ต ) ) )
354 353 sumeq2dv โŠข ( ( ๐œ‘ โˆง ๐‘š โˆˆ ( โ„คโ‰ฅ โ€˜ ( ๐‘  + ๐‘ก ) ) ) โ†’ ฮฃ ๐‘— โˆˆ ( 0 ... ๐‘š ) ( abs โ€˜ ( ๐ด ยท ฮฃ ๐‘˜ โˆˆ ( โ„คโ‰ฅ โ€˜ ( ( ๐‘š โˆ’ ๐‘— ) + 1 ) ) ๐ต ) ) = ฮฃ ๐‘— โˆˆ ( 0 ... ๐‘š ) ( ( abs โ€˜ ๐ด ) ยท ( abs โ€˜ ฮฃ ๐‘˜ โˆˆ ( โ„คโ‰ฅ โ€˜ ( ( ๐‘š โˆ’ ๐‘— ) + 1 ) ) ๐ต ) ) )
355 75 zred โŠข ( ( ๐œ‘ โˆง ๐‘š โˆˆ ( โ„คโ‰ฅ โ€˜ ( ๐‘  + ๐‘ก ) ) ) โ†’ ( ๐‘š โˆ’ ๐‘  ) โˆˆ โ„ )
356 355 ltp1d โŠข ( ( ๐œ‘ โˆง ๐‘š โˆˆ ( โ„คโ‰ฅ โ€˜ ( ๐‘  + ๐‘ก ) ) ) โ†’ ( ๐‘š โˆ’ ๐‘  ) < ( ( ๐‘š โˆ’ ๐‘  ) + 1 ) )
357 fzdisj โŠข ( ( ๐‘š โˆ’ ๐‘  ) < ( ( ๐‘š โˆ’ ๐‘  ) + 1 ) โ†’ ( ( 0 ... ( ๐‘š โˆ’ ๐‘  ) ) โˆฉ ( ( ( ๐‘š โˆ’ ๐‘  ) + 1 ) ... ๐‘š ) ) = โˆ… )
358 356 357 syl โŠข ( ( ๐œ‘ โˆง ๐‘š โˆˆ ( โ„คโ‰ฅ โ€˜ ( ๐‘  + ๐‘ก ) ) ) โ†’ ( ( 0 ... ( ๐‘š โˆ’ ๐‘  ) ) โˆฉ ( ( ( ๐‘š โˆ’ ๐‘  ) + 1 ) ... ๐‘š ) ) = โˆ… )
359 fzsplit โŠข ( ( ๐‘š โˆ’ ๐‘  ) โˆˆ ( 0 ... ๐‘š ) โ†’ ( 0 ... ๐‘š ) = ( ( 0 ... ( ๐‘š โˆ’ ๐‘  ) ) โˆช ( ( ( ๐‘š โˆ’ ๐‘  ) + 1 ) ... ๐‘š ) ) )
360 73 359 syl โŠข ( ( ๐œ‘ โˆง ๐‘š โˆˆ ( โ„คโ‰ฅ โ€˜ ( ๐‘  + ๐‘ก ) ) ) โ†’ ( 0 ... ๐‘š ) = ( ( 0 ... ( ๐‘š โˆ’ ๐‘  ) ) โˆช ( ( ( ๐‘š โˆ’ ๐‘  ) + 1 ) ... ๐‘š ) ) )
361 85 recnd โŠข ( ( ( ๐œ‘ โˆง ๐‘š โˆˆ ( โ„คโ‰ฅ โ€˜ ( ๐‘  + ๐‘ก ) ) ) โˆง ๐‘— โˆˆ ( 0 ... ๐‘š ) ) โ†’ ( ( abs โ€˜ ๐ด ) ยท ( abs โ€˜ ฮฃ ๐‘˜ โˆˆ ( โ„คโ‰ฅ โ€˜ ( ( ๐‘š โˆ’ ๐‘— ) + 1 ) ) ๐ต ) ) โˆˆ โ„‚ )
362 358 360 21 361 fsumsplit โŠข ( ( ๐œ‘ โˆง ๐‘š โˆˆ ( โ„คโ‰ฅ โ€˜ ( ๐‘  + ๐‘ก ) ) ) โ†’ ฮฃ ๐‘— โˆˆ ( 0 ... ๐‘š ) ( ( abs โ€˜ ๐ด ) ยท ( abs โ€˜ ฮฃ ๐‘˜ โˆˆ ( โ„คโ‰ฅ โ€˜ ( ( ๐‘š โˆ’ ๐‘— ) + 1 ) ) ๐ต ) ) = ( ฮฃ ๐‘— โˆˆ ( 0 ... ( ๐‘š โˆ’ ๐‘  ) ) ( ( abs โ€˜ ๐ด ) ยท ( abs โ€˜ ฮฃ ๐‘˜ โˆˆ ( โ„คโ‰ฅ โ€˜ ( ( ๐‘š โˆ’ ๐‘— ) + 1 ) ) ๐ต ) ) + ฮฃ ๐‘— โˆˆ ( ( ( ๐‘š โˆ’ ๐‘  ) + 1 ) ... ๐‘š ) ( ( abs โ€˜ ๐ด ) ยท ( abs โ€˜ ฮฃ ๐‘˜ โˆˆ ( โ„คโ‰ฅ โ€˜ ( ( ๐‘š โˆ’ ๐‘— ) + 1 ) ) ๐ต ) ) ) )
363 354 362 eqtr2d โŠข ( ( ๐œ‘ โˆง ๐‘š โˆˆ ( โ„คโ‰ฅ โ€˜ ( ๐‘  + ๐‘ก ) ) ) โ†’ ( ฮฃ ๐‘— โˆˆ ( 0 ... ( ๐‘š โˆ’ ๐‘  ) ) ( ( abs โ€˜ ๐ด ) ยท ( abs โ€˜ ฮฃ ๐‘˜ โˆˆ ( โ„คโ‰ฅ โ€˜ ( ( ๐‘š โˆ’ ๐‘— ) + 1 ) ) ๐ต ) ) + ฮฃ ๐‘— โˆˆ ( ( ( ๐‘š โˆ’ ๐‘  ) + 1 ) ... ๐‘š ) ( ( abs โ€˜ ๐ด ) ยท ( abs โ€˜ ฮฃ ๐‘˜ โˆˆ ( โ„คโ‰ฅ โ€˜ ( ( ๐‘š โˆ’ ๐‘— ) + 1 ) ) ๐ต ) ) ) = ฮฃ ๐‘— โˆˆ ( 0 ... ๐‘š ) ( abs โ€˜ ( ๐ด ยท ฮฃ ๐‘˜ โˆˆ ( โ„คโ‰ฅ โ€˜ ( ( ๐‘š โˆ’ ๐‘— ) + 1 ) ) ๐ต ) ) )
364 9 rpcnd โŠข ( ๐œ‘ โ†’ ๐ธ โˆˆ โ„‚ )
365 364 adantr โŠข ( ( ๐œ‘ โˆง ๐‘š โˆˆ ( โ„คโ‰ฅ โ€˜ ( ๐‘  + ๐‘ก ) ) ) โ†’ ๐ธ โˆˆ โ„‚ )
366 365 2halvesd โŠข ( ( ๐œ‘ โˆง ๐‘š โˆˆ ( โ„คโ‰ฅ โ€˜ ( ๐‘  + ๐‘ก ) ) ) โ†’ ( ( ๐ธ / 2 ) + ( ๐ธ / 2 ) ) = ๐ธ )
367 352 363 366 3brtr3d โŠข ( ( ๐œ‘ โˆง ๐‘š โˆˆ ( โ„คโ‰ฅ โ€˜ ( ๐‘  + ๐‘ก ) ) ) โ†’ ฮฃ ๐‘— โˆˆ ( 0 ... ๐‘š ) ( abs โ€˜ ( ๐ด ยท ฮฃ ๐‘˜ โˆˆ ( โ„คโ‰ฅ โ€˜ ( ( ๐‘š โˆ’ ๐‘— ) + 1 ) ) ๐ต ) ) < ๐ธ )
368 46 48 50 51 367 lelttrd โŠข ( ( ๐œ‘ โˆง ๐‘š โˆˆ ( โ„คโ‰ฅ โ€˜ ( ๐‘  + ๐‘ก ) ) ) โ†’ ( abs โ€˜ ฮฃ ๐‘— โˆˆ ( 0 ... ๐‘š ) ( ๐ด ยท ฮฃ ๐‘˜ โˆˆ ( โ„คโ‰ฅ โ€˜ ( ( ๐‘š โˆ’ ๐‘— ) + 1 ) ) ๐ต ) ) < ๐ธ )
369 368 ralrimiva โŠข ( ๐œ‘ โ†’ โˆ€ ๐‘š โˆˆ ( โ„คโ‰ฅ โ€˜ ( ๐‘  + ๐‘ก ) ) ( abs โ€˜ ฮฃ ๐‘— โˆˆ ( 0 ... ๐‘š ) ( ๐ด ยท ฮฃ ๐‘˜ โˆˆ ( โ„คโ‰ฅ โ€˜ ( ( ๐‘š โˆ’ ๐‘— ) + 1 ) ) ๐ต ) ) < ๐ธ )
370 fveq2 โŠข ( ๐‘ฆ = ( ๐‘  + ๐‘ก ) โ†’ ( โ„คโ‰ฅ โ€˜ ๐‘ฆ ) = ( โ„คโ‰ฅ โ€˜ ( ๐‘  + ๐‘ก ) ) )
371 370 raleqdv โŠข ( ๐‘ฆ = ( ๐‘  + ๐‘ก ) โ†’ ( โˆ€ ๐‘š โˆˆ ( โ„คโ‰ฅ โ€˜ ๐‘ฆ ) ( abs โ€˜ ฮฃ ๐‘— โˆˆ ( 0 ... ๐‘š ) ( ๐ด ยท ฮฃ ๐‘˜ โˆˆ ( โ„คโ‰ฅ โ€˜ ( ( ๐‘š โˆ’ ๐‘— ) + 1 ) ) ๐ต ) ) < ๐ธ โ†” โˆ€ ๐‘š โˆˆ ( โ„คโ‰ฅ โ€˜ ( ๐‘  + ๐‘ก ) ) ( abs โ€˜ ฮฃ ๐‘— โˆˆ ( 0 ... ๐‘š ) ( ๐ด ยท ฮฃ ๐‘˜ โˆˆ ( โ„คโ‰ฅ โ€˜ ( ( ๐‘š โˆ’ ๐‘— ) + 1 ) ) ๐ต ) ) < ๐ธ ) )
372 371 rspcev โŠข ( ( ( ๐‘  + ๐‘ก ) โˆˆ โ„•0 โˆง โˆ€ ๐‘š โˆˆ ( โ„คโ‰ฅ โ€˜ ( ๐‘  + ๐‘ก ) ) ( abs โ€˜ ฮฃ ๐‘— โˆˆ ( 0 ... ๐‘š ) ( ๐ด ยท ฮฃ ๐‘˜ โˆˆ ( โ„คโ‰ฅ โ€˜ ( ( ๐‘š โˆ’ ๐‘— ) + 1 ) ) ๐ต ) ) < ๐ธ ) โ†’ โˆƒ ๐‘ฆ โˆˆ โ„•0 โˆ€ ๐‘š โˆˆ ( โ„คโ‰ฅ โ€˜ ๐‘ฆ ) ( abs โ€˜ ฮฃ ๐‘— โˆˆ ( 0 ... ๐‘š ) ( ๐ด ยท ฮฃ ๐‘˜ โˆˆ ( โ„คโ‰ฅ โ€˜ ( ( ๐‘š โˆ’ ๐‘— ) + 1 ) ) ๐ต ) ) < ๐ธ )
373 20 369 372 syl2anc โŠข ( ๐œ‘ โ†’ โˆƒ ๐‘ฆ โˆˆ โ„•0 โˆ€ ๐‘š โˆˆ ( โ„คโ‰ฅ โ€˜ ๐‘ฆ ) ( abs โ€˜ ฮฃ ๐‘— โˆˆ ( 0 ... ๐‘š ) ( ๐ด ยท ฮฃ ๐‘˜ โˆˆ ( โ„คโ‰ฅ โ€˜ ( ( ๐‘š โˆ’ ๐‘— ) + 1 ) ) ๐ต ) ) < ๐ธ )