# File diffeq.rb, line 689
def estimate_trunc_err
get_norms()
d1 = $norms[$max_taylor-$max_order]
d2 = $norms[$max_taylor-1-$max_order]
d3 = $norms[$max_taylor-2-$max_order]
d4 = $norms[$max_taylor-3-$max_order]

return (d1.abs+d2.abs+d3.abs+d4.abs)
end