include(`../prg/taylor.txt'):

let(i,30): `precision':
let(a,(0+0)): `current x':
let(b,(0+1)): `ending x':
let(n,(0+20)): `bins':
let(d,largediv(largesub([b],[a]),[n](zeros([i])))): `interval':
let(d,largetrim([d],[i]+5)):

[n]:
do:
let(j,5):
anchor_start:
let(r1,tayeul([a],[i],[i]+[j])):
let(r2,tayeul([a],[i]+[j],[i]+2*[j])):
let(e,left(largeabs(largesub([r1],[r2])),[i])):
if_[e]=+0.(zeros([i])) @ done:
print_`(err)':
let(j,[j]+5):
goto_start:
anchor_done:
print_<largetrim([a],[i]),largetrim([r1],[i])>,\n:
let(a,largeadd([a],[d])): `increment':
loop