(%i1) batch(diffeq.max) read and interpret file: /home/dennis/mastersource/mine/omnisode/diffeq.max (%i2) load(stringproc) (%o2) /usr/share/maxima/5.27.0/share/stringproc/stringproc.mac (%i3) check_sign(x0, xf) := block([ret], if xf > x0 then ret : 1.0 else ret : - 1.0, ret) (%o3) check_sign(x0, xf) := block([ret], if xf > x0 then ret : 1.0 else ret : - 1.0, ret) (%i4) est_size_answer() := block([min_size], min_size : glob_large_float, if omniabs(array_y ) < min_size then (min_size : omniabs(array_y ), 1 1 omniout_float(ALWAYS, "min_size", 32, min_size, 32, "")), if min_size < 1.0 then (min_size : 1.0, omniout_float(ALWAYS, "min_size", 32, min_size, 32, "")), min_size) (%o4) est_size_answer() := block([min_size], min_size : glob_large_float, if omniabs(array_y ) < min_size then (min_size : omniabs(array_y ), 1 1 omniout_float(ALWAYS, "min_size", 32, min_size, 32, "")), if min_size < 1.0 then (min_size : 1.0, omniout_float(ALWAYS, "min_size", 32, min_size, 32, "")), min_size) (%i5) test_suggested_h() := block([max_value3, hn_div_ho, hn_div_ho_2, hn_div_ho_3, value3, no_terms], max_value3 : 0.0, no_terms : glob_max_terms, hn_div_ho : 0.5, hn_div_ho_2 : 0.25, hn_div_ho_3 : 0.125, omniout_float(ALWAYS, "hn_div_ho", 32, hn_div_ho, 32, ""), omniout_float(ALWAYS, "hn_div_ho_2", 32, hn_div_ho_2, 32, ""), omniout_float(ALWAYS, "hn_div_ho_3", 32, hn_div_ho_3, 32, ""), value3 : omniabs(array_y hn_div_ho_3 + array_y hn_div_ho_2 no_terms no_terms - 1 + array_y hn_div_ho + array_y ), no_terms - 2 no_terms - 3 if value3 > max_value3 then (max_value3 : value3, omniout_float(ALWAYS, "value3", 32, value3, 32, "")), omniout_float(ALWAYS, "max_value3", 32, max_value3, 32, ""), max_value3) (%o5) test_suggested_h() := block([max_value3, hn_div_ho, hn_div_ho_2, hn_div_ho_3, value3, no_terms], max_value3 : 0.0, no_terms : glob_max_terms, hn_div_ho : 0.5, hn_div_ho_2 : 0.25, hn_div_ho_3 : 0.125, omniout_float(ALWAYS, "hn_div_ho", 32, hn_div_ho, 32, ""), omniout_float(ALWAYS, "hn_div_ho_2", 32, hn_div_ho_2, 32, ""), omniout_float(ALWAYS, "hn_div_ho_3", 32, hn_div_ho_3, 32, ""), value3 : omniabs(array_y hn_div_ho_3 + array_y hn_div_ho_2 no_terms no_terms - 1 + array_y hn_div_ho + array_y ), no_terms - 2 no_terms - 3 if value3 > max_value3 then (max_value3 : value3, omniout_float(ALWAYS, "value3", 32, value3, 32, "")), omniout_float(ALWAYS, "max_value3", 32, max_value3, 32, ""), max_value3) (%i6) reached_interval() := block([ret], if glob_check_sign array_x >= glob_check_sign glob_next_display 1 then ret : true else ret : false, return(ret)) (%o6) reached_interval() := block([ret], if glob_check_sign array_x >= glob_check_sign glob_next_display 1 then ret : true else ret : false, return(ret)) (%i7) display_alot(iter) := block([abserr, analytic_val_y, ind_var, numeric_val, relerr, term_no], if reached_interval() then (if iter >= 0 then (ind_var : array_x , 1 omniout_float(ALWAYS, "x[1] ", 33, ind_var, 20, " "), analytic_val_y : exact_soln_y(ind_var), omniout_float(ALWAYS, "y[1] (analytic) ", 33, analytic_val_y, 20, " "), term_no : 1, numeric_val : array_y , term_no abserr : omniabs(numeric_val - analytic_val_y), omniout_float(ALWAYS, "y[1] (numeric) ", 33, numeric_val, 20, " "), if omniabs(analytic_val_y) # 0.0 abserr 100.0 then (relerr : -----------------------, omniabs(analytic_val_y) if relerr > 1.0E-34 then glob_good_digits : 2 - floor(log10(relerr)) else glob_good_digits : 16) else (relerr : - 1.0, glob_good_digits : - 1), if glob_iter = 1 then array_1st_rel_error : relerr 1 else array_last_rel_error : relerr, omniout_float(ALWAYS, 1 "absolute error ", 4, abserr, 20, " "), omniout_float(ALWAYS, "relative error ", 4, relerr, 20, "%"), omniout_int(INFO, "Correct digits ", 32, glob_good_digits, 4, " "), omniout_float(ALWAYS, "h ", 4, glob_h, 20, " ")))) (%o7) display_alot(iter) := block([abserr, analytic_val_y, ind_var, numeric_val, relerr, term_no], if reached_interval() then (if iter >= 0 then (ind_var : array_x , 1 omniout_float(ALWAYS, "x[1] ", 33, ind_var, 20, " "), analytic_val_y : exact_soln_y(ind_var), omniout_float(ALWAYS, "y[1] (analytic) ", 33, analytic_val_y, 20, " "), term_no : 1, numeric_val : array_y , term_no abserr : omniabs(numeric_val - analytic_val_y), omniout_float(ALWAYS, "y[1] (numeric) ", 33, numeric_val, 20, " "), if omniabs(analytic_val_y) # 0.0 abserr 100.0 then (relerr : -----------------------, omniabs(analytic_val_y) if relerr > 1.0E-34 then glob_good_digits : 2 - floor(log10(relerr)) else glob_good_digits : 16) else (relerr : - 1.0, glob_good_digits : - 1), if glob_iter = 1 then array_1st_rel_error : relerr 1 else array_last_rel_error : relerr, omniout_float(ALWAYS, 1 "absolute error ", 4, abserr, 20, " "), omniout_float(ALWAYS, "relative error ", 4, relerr, 20, "%"), omniout_int(INFO, "Correct digits ", 32, glob_good_digits, 4, " "), omniout_float(ALWAYS, "h ", 4, glob_h, 20, " ")))) (%i8) adjust_for_pole(h_param) := block([hnew, sz2, tmp], block(hnew : h_param, glob_normmax : glob_small_float, if omniabs(array_y_higher ) > glob_small_float 1, 1 then (tmp : omniabs(array_y_higher ), 1, 1 if tmp < glob_normmax then glob_normmax : tmp), if glob_look_poles and (omniabs(array_pole ) > glob_small_float) 1 array_pole 1 and (array_pole # glob_large_float) then (sz2 : -----------, 1 10.0 if sz2 < hnew then (omniout_float(INFO, "glob_h adjusted to ", 20, h_param, 12, "due to singularity."), omniout_str(INFO, "Reached Optimal"), return(hnew))), if not glob_reached_optimal_h then (glob_reached_optimal_h : true, glob_curr_iter_when_opt : glob_current_iter, glob_optimal_clock_start_sec : elapsed_time_seconds(), glob_optimal_start : array_x ), hnew : sz2), return(hnew)) 1 (%o8) adjust_for_pole(h_param) := block([hnew, sz2, tmp], block(hnew : h_param, glob_normmax : glob_small_float, if omniabs(array_y_higher ) > glob_small_float 1, 1 then (tmp : omniabs(array_y_higher ), 1, 1 if tmp < glob_normmax then glob_normmax : tmp), if glob_look_poles and (omniabs(array_pole ) > glob_small_float) 1 array_pole 1 and (array_pole # glob_large_float) then (sz2 : -----------, 1 10.0 if sz2 < hnew then (omniout_float(INFO, "glob_h adjusted to ", 20, h_param, 12, "due to singularity."), omniout_str(INFO, "Reached Optimal"), return(hnew))), if not glob_reached_optimal_h then (glob_reached_optimal_h : true, glob_curr_iter_when_opt : glob_current_iter, glob_optimal_clock_start_sec : elapsed_time_seconds(), glob_optimal_start : array_x ), hnew : sz2), return(hnew)) 1 (%i9) prog_report(x_start, x_end) := block([clock_sec, opt_clock_sec, clock_sec1, expect_sec, left_sec, percent_done, total_clock_sec], clock_sec1 : elapsed_time_seconds(), total_clock_sec : convfloat(clock_sec1) - convfloat(glob_orig_start_sec), glob_clock_sec : convfloat(clock_sec1) - convfloat(glob_clock_start_sec), left_sec : - convfloat(clock_sec1) + convfloat(glob_orig_start_sec) + convfloat(glob_max_sec), expect_sec : comp_expect_sec(convfloat(x_end), convfloat(x_start), convfloat(glob_h) + convfloat(array_x ), 1 convfloat(clock_sec1) - convfloat(glob_orig_start_sec)), opt_clock_sec : convfloat(clock_sec1) - convfloat(glob_optimal_clock_start_sec), glob_optimal_expect_sec : comp_expect_sec(convfloat(x_end), convfloat(x_start), convfloat(glob_h) + convfloat(array_x ), 1 convfloat(opt_clock_sec)), glob_total_exp_sec : total_clock_sec + glob_optimal_expect_sec, percent_done : comp_percent(convfloat(x_end), convfloat(x_start), convfloat(glob_h) + convfloat(array_x )), glob_percent_done : percent_done, 1 omniout_str_noeol(INFO, "Total Elapsed Time "), omniout_timestr(convfloat(total_clock_sec)), omniout_str_noeol(INFO, "Elapsed Time(since restart) "), omniout_timestr(convfloat(glob_clock_sec)), if convfloat(percent_done) < convfloat(100.0) then (omniout_str_noeol(INFO, "Expected Time Remaining "), omniout_timestr(convfloat(expect_sec)), omniout_str_noeol(INFO, "Optimized Time Remaining "), omniout_timestr(convfloat(glob_optimal_expect_sec)), omniout_str_noeol(INFO, "Expected Total Time "), omniout_timestr(convfloat(glob_total_exp_sec))), omniout_str_noeol(INFO, "Time to Timeout "), omniout_timestr(convfloat(left_sec)), omniout_float(INFO, "Percent Done ", 33, percent_done, 4, "%")) (%o9) prog_report(x_start, x_end) := block([clock_sec, opt_clock_sec, clock_sec1, expect_sec, left_sec, percent_done, total_clock_sec], clock_sec1 : elapsed_time_seconds(), total_clock_sec : convfloat(clock_sec1) - convfloat(glob_orig_start_sec), glob_clock_sec : convfloat(clock_sec1) - convfloat(glob_clock_start_sec), left_sec : - convfloat(clock_sec1) + convfloat(glob_orig_start_sec) + convfloat(glob_max_sec), expect_sec : comp_expect_sec(convfloat(x_end), convfloat(x_start), convfloat(glob_h) + convfloat(array_x ), 1 convfloat(clock_sec1) - convfloat(glob_orig_start_sec)), opt_clock_sec : convfloat(clock_sec1) - convfloat(glob_optimal_clock_start_sec), glob_optimal_expect_sec : comp_expect_sec(convfloat(x_end), convfloat(x_start), convfloat(glob_h) + convfloat(array_x ), 1 convfloat(opt_clock_sec)), glob_total_exp_sec : total_clock_sec + glob_optimal_expect_sec, percent_done : comp_percent(convfloat(x_end), convfloat(x_start), convfloat(glob_h) + convfloat(array_x )), glob_percent_done : percent_done, 1 omniout_str_noeol(INFO, "Total Elapsed Time "), omniout_timestr(convfloat(total_clock_sec)), omniout_str_noeol(INFO, "Elapsed Time(since restart) "), omniout_timestr(convfloat(glob_clock_sec)), if convfloat(percent_done) < convfloat(100.0) then (omniout_str_noeol(INFO, "Expected Time Remaining "), omniout_timestr(convfloat(expect_sec)), omniout_str_noeol(INFO, "Optimized Time Remaining "), omniout_timestr(convfloat(glob_optimal_expect_sec)), omniout_str_noeol(INFO, "Expected Total Time "), omniout_timestr(convfloat(glob_total_exp_sec))), omniout_str_noeol(INFO, "Time to Timeout "), omniout_timestr(convfloat(left_sec)), omniout_float(INFO, "Percent Done ", 33, percent_done, 4, "%")) (%i10) check_for_pole() := block([cnt, dr1, dr2, ds1, ds2, hdrc, hdrc_BBB, m, n, nr1, nr2, ord_no, rad_c, rcs, rm0, rm1, rm2, rm3, rm4, found_sing, h_new, ratio, term], n : glob_max_terms, m : - 1 - 1 + n, while (m >= 10) and ((omniabs(array_y_higher ) < glob_small_float glob_small_float) 1, m or (omniabs(array_y_higher ) < glob_small_float glob_small_float) 1, m - 1 or (omniabs(array_y_higher ) < glob_small_float glob_small_float)) do m 1, m - 2 array_y_higher 1, m : m - 1, if m > 10 then (rm0 : ----------------------, array_y_higher 1, m - 1 array_y_higher 1, m - 1 rm1 : ----------------------, hdrc : convfloat(m) rm0 - convfloat(m - 1) rm1, array_y_higher 1, m - 2 if omniabs(hdrc) > glob_small_float glob_small_float glob_h then (rcs : ------, ord_no : hdrc rm1 convfloat((m - 2) (m - 2)) - rm0 convfloat(m - 3) -----------------------------------------------------, hdrc array_real_pole : rcs, array_real_pole : ord_no) 1, 1 1, 2 else (array_real_pole : glob_large_float, 1, 1 array_real_pole : glob_large_float)) 1, 2 else (array_real_pole : glob_large_float, 1, 1 array_real_pole : glob_large_float), n : - 1 - 1 + glob_max_terms, 1, 2 cnt : 0, while (cnt < 5) and (n >= 10) do (if omniabs(array_y_higher ) > 1, n glob_small_float then cnt : 1 + cnt else cnt : 0, n : n - 1), m : cnt + n, if m <= 10 then (rad_c : glob_large_float, ord_no : glob_large_float) elseif ((omniabs(array_y_higher ) >= glob_large_float) 1, m or (omniabs(array_y_higher ) >= glob_large_float) 1, m - 1 or (omniabs(array_y_higher ) >= glob_large_float) 1, m - 2 or (omniabs(array_y_higher ) >= glob_large_float) 1, m - 3 or (omniabs(array_y_higher ) >= glob_large_float) 1, m - 4 or (omniabs(array_y_higher ) >= glob_large_float)) 1, m - 5 or ((omniabs(array_y_higher ) <= glob_small_float) or (omniabs(array_y_higher ) <= glob_small_float) or (omniabs(array_y_higher ) <= glob_small_float) or (omniabs(array_y_higher ) <= glob_small_float) or (omniabs(array_y_higher ) <= glob_small_float) or (omniabs(array_y_higher ) <= glob_small_float)) 1, m 1, m - 1 1, m - 2 1, m - 3 1, m - 4 1, m - 5 then (rad_c : glob_large_float, ord_no : glob_large_float) array_y_higher array_y_higher 1, m 1, m - 1 else (rm0 : ----------------------, rm1 : ----------------------, array_y_higher array_y_higher 1, m - 1 1, m - 2 array_y_higher array_y_higher 1, m - 2 1, m - 3 rm2 : ----------------------, rm3 : ----------------------, array_y_higher array_y_higher 1, m - 3 1, m - 4 array_y_higher 1, m - 4 rm4 : ----------------------, nr1 : convfloat(m - 3) rm2 array_y_higher 1, m - 5 - 2.0 convfloat(m - 2) rm1 + convfloat(m - 1) rm0, nr2 : convfloat(m - 4) rm3 - 2.0 convfloat(m - 3) rm2 + convfloat(m - 2) rm1, - 1.0 2.0 - 1.0 - 1.0 2.0 - 1.0 5.0 8.0 3.0 dr1 : ----- + --- + -----, dr2 : ----- + --- + -----, ds1 : --- - --- + ---, rm3 rm2 rm1 rm4 rm3 rm2 rm3 rm2 rm1 5.0 8.0 3.0 ds2 : --- - --- + ---, if (omniabs(nr1 dr2 - nr2 dr1) <= glob_small_float) rm4 rm3 rm2 or (omniabs(dr1) <= glob_small_float) then (rad_c : glob_large_float, ord_no : glob_large_float) else (if omniabs(nr1 dr2 - nr2 dr1) > dr1 dr2 - ds2 dr1 + ds1 dr2 glob_small_float then (rcs : ---------------------------, nr1 dr2 - nr2 dr1 rcs nr1 - ds1 convfloat(m) ord_no : ------------- - ------------, 2.0 dr1 2.0 if omniabs(rcs) > glob_small_float then (if rcs > 0.0 then rad_c : sqrt(rcs) omniabs(glob_h) else rad_c : glob_large_float) else (rad_c : glob_large_float, ord_no : glob_large_float)) else (rad_c : glob_large_float, ord_no : glob_large_float)), array_complex_pole : rad_c, array_complex_pole : ord_no), 1, 1 1, 2 found_sing : 0, if (1 # found_sing) and ((array_real_pole = glob_large_float) 1, 1 or (array_real_pole = glob_large_float)) 1, 2 and ((array_complex_pole # glob_large_float) and (array_complex_pole # glob_large_float)) 1, 1 1, 2 and ((array_complex_pole > 0.0) and (array_complex_pole > 0.0)) 1, 1 1, 2 then (array_poles : array_complex_pole , 1, 1 1, 1 array_poles : array_complex_pole , found_sing : 1, 1, 2 1, 2 array_type_pole : 2, if glob_display_flag 1 then (if reached_interval() then omniout_str(ALWAYS, "Complex estimate of poles used for equation 1"))), if (1 # found_sing) and ((array_real_pole # glob_large_float) 1, 1 and (array_real_pole # glob_large_float) and (array_real_pole > 0.0) 1, 2 1, 1 and (array_real_pole > - 1.0 glob_smallish_float) 1, 2 and ((array_complex_pole = glob_large_float) or (array_complex_pole = glob_large_float) or (array_complex_pole <= 0.0) or (array_complex_pole <= 0.0))) 1, 1 1, 2 1, 1 1, 2 then (array_poles : array_real_pole , 1, 1 1, 1 array_poles : array_real_pole , found_sing : 1, array_type_pole : 1, 1, 2 1, 2 1 if glob_display_flag then (if reached_interval() then omniout_str(ALWAYS, "Real estimate of pole used for equation 1"))), if (1 # found_sing) and (((array_real_pole = glob_large_float) 1, 1 or (array_real_pole = glob_large_float)) 1, 2 and ((array_complex_pole = glob_large_float) or (array_complex_pole = glob_large_float))) 1, 1 1, 2 then (array_poles : glob_large_float, array_poles : glob_large_float, 1, 1 1, 2 found_sing : 1, array_type_pole : 3, if reached_interval() 1 then omniout_str(ALWAYS, "NO POLE for equation 1")), if (1 # found_sing) and ((array_real_pole < array_complex_pole ) 1, 1 1, 1 and (array_real_pole > 0.0) and (array_real_pole > - 1.0 1, 1 1, 2 glob_smallish_float)) then (array_poles : array_real_pole , 1, 1 1, 1 array_poles : array_real_pole , found_sing : 1, array_type_pole : 1, 1, 2 1, 2 1 if glob_display_flag then (if reached_interval() then omniout_str(ALWAYS, "Real estimate of pole used for equation 1"))), if (1 # found_sing) and ((array_complex_pole # glob_large_float) 1, 1 and (array_complex_pole # glob_large_float) 1, 2 and (array_complex_pole > 0.0) and (array_complex_pole > 1, 1 1, 2 0.0)) then (array_poles : array_complex_pole , 1, 1 1, 1 array_poles : array_complex_pole , array_type_pole : 2, 1, 2 1, 2 1 found_sing : 1, if glob_display_flag then (if reached_interval() then omniout_str(ALWAYS, "Complex estimate of poles used for equation 1"))), if 1 # found_sing then (array_poles : glob_large_float, 1, 1 array_poles : glob_large_float, array_type_pole : 3, 1, 2 1 if reached_interval() then omniout_str(ALWAYS, "NO POLE for equation 1")), array_pole : glob_large_float, array_pole : glob_large_float, 1 2 if array_pole > array_poles then (array_pole : array_poles , 1 1, 1 1 1, 1 array_pole : array_poles ), if array_pole glob_ratio_of_radius < 2 1, 2 1 omniabs(glob_h) then (h_new : array_pole glob_ratio_of_radius, term : 1, 1 ratio : 1.0, while term <= glob_max_terms do (array_y : term array_y ratio, array_y_higher : array_y_higher ratio, term 1, term 1, term ratio h_new array_x : array_x ratio, ratio : ---------------, term : 1 + term), term term omniabs(glob_h) glob_h : h_new), if reached_interval() then display_pole()) (%o10) check_for_pole() := block([cnt, dr1, dr2, ds1, ds2, hdrc, hdrc_BBB, m, n, nr1, nr2, ord_no, rad_c, rcs, rm0, rm1, rm2, rm3, rm4, found_sing, h_new, ratio, term], n : glob_max_terms, m : - 1 - 1 + n, while (m >= 10) and ((omniabs(array_y_higher ) < glob_small_float glob_small_float) 1, m or (omniabs(array_y_higher ) < glob_small_float glob_small_float) 1, m - 1 or (omniabs(array_y_higher ) < glob_small_float glob_small_float)) do m 1, m - 2 array_y_higher 1, m : m - 1, if m > 10 then (rm0 : ----------------------, array_y_higher 1, m - 1 array_y_higher 1, m - 1 rm1 : ----------------------, hdrc : convfloat(m) rm0 - convfloat(m - 1) rm1, array_y_higher 1, m - 2 if omniabs(hdrc) > glob_small_float glob_small_float glob_h then (rcs : ------, ord_no : hdrc rm1 convfloat((m - 2) (m - 2)) - rm0 convfloat(m - 3) -----------------------------------------------------, hdrc array_real_pole : rcs, array_real_pole : ord_no) 1, 1 1, 2 else (array_real_pole : glob_large_float, 1, 1 array_real_pole : glob_large_float)) 1, 2 else (array_real_pole : glob_large_float, 1, 1 array_real_pole : glob_large_float), n : - 1 - 1 + glob_max_terms, 1, 2 cnt : 0, while (cnt < 5) and (n >= 10) do (if omniabs(array_y_higher ) > 1, n glob_small_float then cnt : 1 + cnt else cnt : 0, n : n - 1), m : cnt + n, if m <= 10 then (rad_c : glob_large_float, ord_no : glob_large_float) elseif ((omniabs(array_y_higher ) >= glob_large_float) 1, m or (omniabs(array_y_higher ) >= glob_large_float) 1, m - 1 or (omniabs(array_y_higher ) >= glob_large_float) 1, m - 2 or (omniabs(array_y_higher ) >= glob_large_float) 1, m - 3 or (omniabs(array_y_higher ) >= glob_large_float) 1, m - 4 or (omniabs(array_y_higher ) >= glob_large_float)) 1, m - 5 or ((omniabs(array_y_higher ) <= glob_small_float) or (omniabs(array_y_higher ) <= glob_small_float) or (omniabs(array_y_higher ) <= glob_small_float) or (omniabs(array_y_higher ) <= glob_small_float) or (omniabs(array_y_higher ) <= glob_small_float) or (omniabs(array_y_higher ) <= glob_small_float)) 1, m 1, m - 1 1, m - 2 1, m - 3 1, m - 4 1, m - 5 then (rad_c : glob_large_float, ord_no : glob_large_float) array_y_higher array_y_higher 1, m 1, m - 1 else (rm0 : ----------------------, rm1 : ----------------------, array_y_higher array_y_higher 1, m - 1 1, m - 2 array_y_higher array_y_higher 1, m - 2 1, m - 3 rm2 : ----------------------, rm3 : ----------------------, array_y_higher array_y_higher 1, m - 3 1, m - 4 array_y_higher 1, m - 4 rm4 : ----------------------, nr1 : convfloat(m - 3) rm2 array_y_higher 1, m - 5 - 2.0 convfloat(m - 2) rm1 + convfloat(m - 1) rm0, nr2 : convfloat(m - 4) rm3 - 2.0 convfloat(m - 3) rm2 + convfloat(m - 2) rm1, - 1.0 2.0 - 1.0 - 1.0 2.0 - 1.0 5.0 8.0 3.0 dr1 : ----- + --- + -----, dr2 : ----- + --- + -----, ds1 : --- - --- + ---, rm3 rm2 rm1 rm4 rm3 rm2 rm3 rm2 rm1 5.0 8.0 3.0 ds2 : --- - --- + ---, if (omniabs(nr1 dr2 - nr2 dr1) <= glob_small_float) rm4 rm3 rm2 or (omniabs(dr1) <= glob_small_float) then (rad_c : glob_large_float, ord_no : glob_large_float) else (if omniabs(nr1 dr2 - nr2 dr1) > dr1 dr2 - ds2 dr1 + ds1 dr2 glob_small_float then (rcs : ---------------------------, nr1 dr2 - nr2 dr1 rcs nr1 - ds1 convfloat(m) ord_no : ------------- - ------------, 2.0 dr1 2.0 if omniabs(rcs) > glob_small_float then (if rcs > 0.0 then rad_c : sqrt(rcs) omniabs(glob_h) else rad_c : glob_large_float) else (rad_c : glob_large_float, ord_no : glob_large_float)) else (rad_c : glob_large_float, ord_no : glob_large_float)), array_complex_pole : rad_c, array_complex_pole : ord_no), 1, 1 1, 2 found_sing : 0, if (1 # found_sing) and ((array_real_pole = glob_large_float) 1, 1 or (array_real_pole = glob_large_float)) 1, 2 and ((array_complex_pole # glob_large_float) and (array_complex_pole # glob_large_float)) 1, 1 1, 2 and ((array_complex_pole > 0.0) and (array_complex_pole > 0.0)) 1, 1 1, 2 then (array_poles : array_complex_pole , 1, 1 1, 1 array_poles : array_complex_pole , found_sing : 1, 1, 2 1, 2 array_type_pole : 2, if glob_display_flag 1 then (if reached_interval() then omniout_str(ALWAYS, "Complex estimate of poles used for equation 1"))), if (1 # found_sing) and ((array_real_pole # glob_large_float) 1, 1 and (array_real_pole # glob_large_float) and (array_real_pole > 0.0) 1, 2 1, 1 and (array_real_pole > - 1.0 glob_smallish_float) 1, 2 and ((array_complex_pole = glob_large_float) or (array_complex_pole = glob_large_float) or (array_complex_pole <= 0.0) or (array_complex_pole <= 0.0))) 1, 1 1, 2 1, 1 1, 2 then (array_poles : array_real_pole , 1, 1 1, 1 array_poles : array_real_pole , found_sing : 1, array_type_pole : 1, 1, 2 1, 2 1 if glob_display_flag then (if reached_interval() then omniout_str(ALWAYS, "Real estimate of pole used for equation 1"))), if (1 # found_sing) and (((array_real_pole = glob_large_float) 1, 1 or (array_real_pole = glob_large_float)) 1, 2 and ((array_complex_pole = glob_large_float) or (array_complex_pole = glob_large_float))) 1, 1 1, 2 then (array_poles : glob_large_float, array_poles : glob_large_float, 1, 1 1, 2 found_sing : 1, array_type_pole : 3, if reached_interval() 1 then omniout_str(ALWAYS, "NO POLE for equation 1")), if (1 # found_sing) and ((array_real_pole < array_complex_pole ) 1, 1 1, 1 and (array_real_pole > 0.0) and (array_real_pole > - 1.0 1, 1 1, 2 glob_smallish_float)) then (array_poles : array_real_pole , 1, 1 1, 1 array_poles : array_real_pole , found_sing : 1, array_type_pole : 1, 1, 2 1, 2 1 if glob_display_flag then (if reached_interval() then omniout_str(ALWAYS, "Real estimate of pole used for equation 1"))), if (1 # found_sing) and ((array_complex_pole # glob_large_float) 1, 1 and (array_complex_pole # glob_large_float) 1, 2 and (array_complex_pole > 0.0) and (array_complex_pole > 1, 1 1, 2 0.0)) then (array_poles : array_complex_pole , 1, 1 1, 1 array_poles : array_complex_pole , array_type_pole : 2, 1, 2 1, 2 1 found_sing : 1, if glob_display_flag then (if reached_interval() then omniout_str(ALWAYS, "Complex estimate of poles used for equation 1"))), if 1 # found_sing then (array_poles : glob_large_float, 1, 1 array_poles : glob_large_float, array_type_pole : 3, 1, 2 1 if reached_interval() then omniout_str(ALWAYS, "NO POLE for equation 1")), array_pole : glob_large_float, array_pole : glob_large_float, 1 2 if array_pole > array_poles then (array_pole : array_poles , 1 1, 1 1 1, 1 array_pole : array_poles ), if array_pole glob_ratio_of_radius < 2 1, 2 1 omniabs(glob_h) then (h_new : array_pole glob_ratio_of_radius, term : 1, 1 ratio : 1.0, while term <= glob_max_terms do (array_y : term array_y ratio, array_y_higher : array_y_higher ratio, term 1, term 1, term ratio h_new array_x : array_x ratio, ratio : ---------------, term : 1 + term), term term omniabs(glob_h) glob_h : h_new), if reached_interval() then display_pole()) (%i11) get_norms() := block([iii], if not glob_initial_pass then (iii : 1, while iii <= glob_max_terms do (array_norms : 0.0, iii iii : 1 + iii), iii : 1, while iii <= glob_max_terms do (if omniabs(array_y ) > array_norms iii iii then array_norms : omniabs(array_y ), iii : 1 + iii))) iii iii (%o11) get_norms() := block([iii], if not glob_initial_pass then (iii : 1, while iii <= glob_max_terms do (array_norms : 0.0, iii iii : 1 + iii), iii : 1, while iii <= glob_max_terms do (if omniabs(array_y ) > array_norms iii iii then array_norms : omniabs(array_y ), iii : 1 + iii))) iii iii (%i12) atomall() := block([kkk, order_d, adj2, adj3, temporary, term, temp, array_const_2D0 1 temp2], array_tmp1 : exp(array_x ), array_tmp2 : ----------------, 1 1 1 array_tmp1 1 array_tmp3 : array_tmp2 + array_const_0D0 , 1 1 1 if not array_y_set_initial then (if 1 <= glob_max_terms 1, 2 then (temporary : array_tmp3 expt(glob_h, 1) factorial_3(0, 1), 1 array_y : temporary, array_y_higher : temporary, 2 1, 2 temporary 1.0 temporary : -------------, array_y_higher : temporary, 0)), kkk : 2, glob_h 2, 1 array_tmp1 array_x 1 2 array_tmp1 : --------------------, array_tmp2 : 2 1 2 - ats(2, array_tmp1, array_tmp2, 2) -----------------------------------, array_tmp3 : array_tmp2 , array_tmp1 2 2 1 if not array_y_set_initial then (if 2 <= glob_max_terms 1, 3 then (temporary : array_tmp3 expt(glob_h, 1) factorial_3(1, 2), 2 array_y : temporary, array_y_higher : temporary, 3 1, 3 temporary 2.0 temporary : -------------, array_y_higher : temporary, 0)), kkk : 3, glob_h 2, 2 array_tmp1 array_x 2 2 array_tmp1 : --------------------, array_tmp2 : 3 2 3 - ats(3, array_tmp1, array_tmp2, 2) -----------------------------------, array_tmp3 : array_tmp2 , array_tmp1 3 3 1 if not array_y_set_initial then (if 3 <= glob_max_terms 1, 4 then (temporary : array_tmp3 expt(glob_h, 1) factorial_3(2, 3), 3 array_y : temporary, array_y_higher : temporary, 4 1, 4 temporary 3.0 temporary : -------------, array_y_higher : temporary, 0)), kkk : 4, glob_h 2, 3 array_tmp1 array_x 3 2 array_tmp1 : --------------------, array_tmp2 : 4 3 4 - ats(4, array_tmp1, array_tmp2, 2) -----------------------------------, array_tmp3 : array_tmp2 , array_tmp1 4 4 1 if not array_y_set_initial then (if 4 <= glob_max_terms 1, 5 then (temporary : array_tmp3 expt(glob_h, 1) factorial_3(3, 4), 4 array_y : temporary, array_y_higher : temporary, 5 1, 5 temporary 4.0 temporary : -------------, array_y_higher : temporary, 0)), kkk : 5, glob_h 2, 4 array_tmp1 array_x 4 2 array_tmp1 : --------------------, array_tmp2 : 5 4 5 - ats(5, array_tmp1, array_tmp2, 2) -----------------------------------, array_tmp3 : array_tmp2 , array_tmp1 5 5 1 if not array_y_set_initial then (if 5 <= glob_max_terms 1, 6 then (temporary : array_tmp3 expt(glob_h, 1) factorial_3(4, 5), 5 array_y : temporary, array_y_higher : temporary, 6 1, 6 temporary 5.0 temporary : -------------, array_y_higher : temporary, 0)), kkk : 6, glob_h 2, 5 array_tmp1 array_x kkk - 1 2 while kkk <= glob_max_terms do (array_tmp1 : --------------------------, kkk kkk - 1 - ats(kkk, array_tmp1, array_tmp2, 2) array_tmp2 : -------------------------------------, kkk array_tmp1 1 array_tmp3 : array_tmp2 , order_d : 1, kkk kkk if 1 + order_d + kkk <= glob_max_terms then (if not array_y_set_initial 1, order_d + kkk then (temporary : array_tmp3 expt(glob_h, order_d) kkk factorial_3(kkk - 1, - 1 + order_d + kkk), array_y : temporary, order_d + kkk array_y_higher : temporary, term : - 1 + order_d + kkk, 1, order_d + kkk adj2 : - 1 + order_d + kkk, adj3 : 2, while term >= 1 do (if adj3 <= 1 + order_d then (if adj2 > 0 temporary convfp(adj2) then temporary : ---------------------- else temporary : temporary, glob_h array_y_higher : temporary), term : term - 1, adj2 : adj2 - 1, adj3, term adj3 : 1 + adj3))), kkk : 1 + kkk)) (%o12) atomall() := block([kkk, order_d, adj2, adj3, temporary, term, temp, array_const_2D0 1 temp2], array_tmp1 : exp(array_x ), array_tmp2 : ----------------, 1 1 1 array_tmp1 1 array_tmp3 : array_tmp2 + array_const_0D0 , 1 1 1 if not array_y_set_initial then (if 1 <= glob_max_terms 1, 2 then (temporary : array_tmp3 expt(glob_h, 1) factorial_3(0, 1), 1 array_y : temporary, array_y_higher : temporary, 2 1, 2 temporary 1.0 temporary : -------------, array_y_higher : temporary, 0)), kkk : 2, glob_h 2, 1 array_tmp1 array_x 1 2 array_tmp1 : --------------------, array_tmp2 : 2 1 2 - ats(2, array_tmp1, array_tmp2, 2) -----------------------------------, array_tmp3 : array_tmp2 , array_tmp1 2 2 1 if not array_y_set_initial then (if 2 <= glob_max_terms 1, 3 then (temporary : array_tmp3 expt(glob_h, 1) factorial_3(1, 2), 2 array_y : temporary, array_y_higher : temporary, 3 1, 3 temporary 2.0 temporary : -------------, array_y_higher : temporary, 0)), kkk : 3, glob_h 2, 2 array_tmp1 array_x 2 2 array_tmp1 : --------------------, array_tmp2 : 3 2 3 - ats(3, array_tmp1, array_tmp2, 2) -----------------------------------, array_tmp3 : array_tmp2 , array_tmp1 3 3 1 if not array_y_set_initial then (if 3 <= glob_max_terms 1, 4 then (temporary : array_tmp3 expt(glob_h, 1) factorial_3(2, 3), 3 array_y : temporary, array_y_higher : temporary, 4 1, 4 temporary 3.0 temporary : -------------, array_y_higher : temporary, 0)), kkk : 4, glob_h 2, 3 array_tmp1 array_x 3 2 array_tmp1 : --------------------, array_tmp2 : 4 3 4 - ats(4, array_tmp1, array_tmp2, 2) -----------------------------------, array_tmp3 : array_tmp2 , array_tmp1 4 4 1 if not array_y_set_initial then (if 4 <= glob_max_terms 1, 5 then (temporary : array_tmp3 expt(glob_h, 1) factorial_3(3, 4), 4 array_y : temporary, array_y_higher : temporary, 5 1, 5 temporary 4.0 temporary : -------------, array_y_higher : temporary, 0)), kkk : 5, glob_h 2, 4 array_tmp1 array_x 4 2 array_tmp1 : --------------------, array_tmp2 : 5 4 5 - ats(5, array_tmp1, array_tmp2, 2) -----------------------------------, array_tmp3 : array_tmp2 , array_tmp1 5 5 1 if not array_y_set_initial then (if 5 <= glob_max_terms 1, 6 then (temporary : array_tmp3 expt(glob_h, 1) factorial_3(4, 5), 5 array_y : temporary, array_y_higher : temporary, 6 1, 6 temporary 5.0 temporary : -------------, array_y_higher : temporary, 0)), kkk : 6, glob_h 2, 5 array_tmp1 array_x kkk - 1 2 while kkk <= glob_max_terms do (array_tmp1 : --------------------------, kkk kkk - 1 - ats(kkk, array_tmp1, array_tmp2, 2) array_tmp2 : -------------------------------------, kkk array_tmp1 1 array_tmp3 : array_tmp2 , order_d : 1, kkk kkk if 1 + order_d + kkk <= glob_max_terms then (if not array_y_set_initial 1, order_d + kkk then (temporary : array_tmp3 expt(glob_h, order_d) kkk factorial_3(kkk - 1, - 1 + order_d + kkk), array_y : temporary, order_d + kkk array_y_higher : temporary, term : - 1 + order_d + kkk, 1, order_d + kkk adj2 : - 1 + order_d + kkk, adj3 : 2, while term >= 1 do (if adj3 <= 1 + order_d then (if adj2 > 0 temporary convfp(adj2) then temporary : ---------------------- else temporary : temporary, glob_h array_y_higher : temporary), term : term - 1, adj2 : adj2 - 1, adj3, term adj3 : 1 + adj3))), kkk : 1 + kkk)) log(x) (%i13) log10(x) := --------- log(10.0) log(x) (%o13) log10(x) := --------- log(10.0) (%i14) omniout_str(iolevel, str) := if glob_iolevel >= iolevel then printf(true, "~a~%", string(str)) (%o14) omniout_str(iolevel, str) := if glob_iolevel >= iolevel then printf(true, "~a~%", string(str)) (%i15) omniout_str_noeol(iolevel, str) := if glob_iolevel >= iolevel then printf(true, "~a", string(str)) (%o15) omniout_str_noeol(iolevel, str) := if glob_iolevel >= iolevel then printf(true, "~a", string(str)) (%i16) omniout_labstr(iolevel, label, str) := if glob_iolevel >= iolevel then printf(true, "~a = ~a~%", string(label), string(str)) (%o16) omniout_labstr(iolevel, label, str) := if glob_iolevel >= iolevel then printf(true, "~a = ~a~%", string(label), string(str)) (%i17) omniout_float(iolevel, prelabel, prelen, value, vallen, postlabel) := if glob_iolevel >= iolevel then (if vallen = 4 then printf(true, "~a = ~g ~s ~%", prelabel, value, postlabel) else printf(true, "~a = ~g ~s ~%", prelabel, value, postlabel)) (%o17) omniout_float(iolevel, prelabel, prelen, value, vallen, postlabel) := if glob_iolevel >= iolevel then (if vallen = 4 then printf(true, "~a = ~g ~s ~%", prelabel, value, postlabel) else printf(true, "~a = ~g ~s ~%", prelabel, value, postlabel)) (%i18) omniout_int(iolevel, prelabel, prelen, value, vallen, postlabel) := if glob_iolevel >= iolevel then (printf(true, "~a = ~d ~a~%", prelabel, value, postlabel), newline()) (%o18) omniout_int(iolevel, prelabel, prelen, value, vallen, postlabel) := if glob_iolevel >= iolevel then (printf(true, "~a = ~d ~a~%", prelabel, value, postlabel), newline()) (%i19) omniout_float_arr(iolevel, prelabel, elemnt, prelen, value, vallen, postlabel) := if glob_iolevel >= iolevel then (sprint(prelabel, "[", elemnt, "]=", value, postlabel), newline()) (%o19) omniout_float_arr(iolevel, prelabel, elemnt, prelen, value, vallen, postlabel) := if glob_iolevel >= iolevel then (sprint(prelabel, "[", elemnt, "]=", value, postlabel), newline()) (%i20) dump_series(iolevel, dump_label, series_name, arr_series, numb) := block([i], if glob_iolevel >= iolevel then (i : 1, while i <= numb do (sprint(dump_label, series_name, "i = ", i, "series = ", array_series ), newline(), i : 1 + i))) i (%o20) dump_series(iolevel, dump_label, series_name, arr_series, numb) := block([i], if glob_iolevel >= iolevel then (i : 1, while i <= numb do (sprint(dump_label, series_name, "i = ", i, "series = ", array_series ), newline(), i : 1 + i))) i (%i21) dump_series_2(iolevel, dump_label, series_name2, arr_series2, numb, subnum, arr_x) := (array_series2, numb, subnum) := block([i, sub, ts_term], if glob_iolevel >= iolevel then (sub : 1, while sub <= subnum do (i : 1, while i <= num do (sprint(dump_label, series_name, "sub = ", sub, "i = ", i, "series2 = ", array_series2 ), i : 1 + i), sub : 1 + sub))) sub, i (%o21) dump_series_2(iolevel, dump_label, series_name2, arr_series2, numb, subnum, arr_x) := (array_series2, numb, subnum) := block([i, sub, ts_term], if glob_iolevel >= iolevel then (sub : 1, while sub <= subnum do (i : 1, while i <= num do (sprint(dump_label, series_name, "sub = ", sub, "i = ", i, "series2 = ", array_series2 ), i : 1 + i), sub : 1 + sub))) sub, i (%i22) cs_info(iolevel, str) := if glob_iolevel >= iolevel then sprint(concat("cs_info ", str, " glob_correct_start_flag = ", glob_correct_start_flag, "glob_h := ", glob_h, "glob_reached_optimal_h := ", glob_reached_optimal_h)) (%o22) cs_info(iolevel, str) := if glob_iolevel >= iolevel then sprint(concat("cs_info ", str, " glob_correct_start_flag = ", glob_correct_start_flag, "glob_h := ", glob_h, "glob_reached_optimal_h := ", glob_reached_optimal_h)) (%i23) logitem_time(fd, secs_in) := block([days, days_int, hours, hours_int, minutes, minutes_int, sec_int, seconds, secs, years, years_int], secs : convfloat(secs_in), printf(fd, "~%"), secs if secs >= 0 then (years_int : trunc(----------------), glob_sec_in_year sec_temp : mod(trunc(secs), trunc(glob_sec_in_year)), sec_temp days_int : trunc(---------------), sec_temp : glob_sec_in_day sec_temp mod(sec_temp, trunc(glob_sec_in_day)), hours_int : trunc(----------------), glob_sec_in_hour sec_temp : mod(sec_temp, trunc(glob_sec_in_hour)), sec_temp minutes_int : trunc(------------------), glob_sec_in_minute sec_int : mod(sec_temp, trunc(glob_sec_in_minute)), if years_int > 0 then printf(fd, "= ~d Years ~d Days ~d Hours ~d Minutes ~d Seconds~%", years_int, days_int, hours_int, minutes_int, sec_int) elseif days_int > 0 then printf(fd, "= ~d Days ~d Hours ~d Minutes ~d Seconds~%", days_int, hours_int, minutes_int, sec_int) elseif hours_int > 0 then printf(fd, "= ~d Hours ~d Minutes ~d Seconds~%", hours_int, minutes_int, sec_int) elseif minutes_int > 0 then printf(fd, "= ~d Minutes ~d Seconds~%", minutes_int, sec_int) else printf(fd, "= ~d Seconds~%", sec_int)) else printf(fd, " Unknown~%"), printf(fd, "~%")) (%o23) logitem_time(fd, secs_in) := block([days, days_int, hours, hours_int, minutes, minutes_int, sec_int, seconds, secs, years, years_int], secs : convfloat(secs_in), printf(fd, "~%"), secs if secs >= 0 then (years_int : trunc(----------------), glob_sec_in_year sec_temp : mod(trunc(secs), trunc(glob_sec_in_year)), sec_temp days_int : trunc(---------------), sec_temp : glob_sec_in_day sec_temp mod(sec_temp, trunc(glob_sec_in_day)), hours_int : trunc(----------------), glob_sec_in_hour sec_temp : mod(sec_temp, trunc(glob_sec_in_hour)), sec_temp minutes_int : trunc(------------------), glob_sec_in_minute sec_int : mod(sec_temp, trunc(glob_sec_in_minute)), if years_int > 0 then printf(fd, "= ~d Years ~d Days ~d Hours ~d Minutes ~d Seconds~%", years_int, days_int, hours_int, minutes_int, sec_int) elseif days_int > 0 then printf(fd, "= ~d Days ~d Hours ~d Minutes ~d Seconds~%", days_int, hours_int, minutes_int, sec_int) elseif hours_int > 0 then printf(fd, "= ~d Hours ~d Minutes ~d Seconds~%", hours_int, minutes_int, sec_int) elseif minutes_int > 0 then printf(fd, "= ~d Minutes ~d Seconds~%", minutes_int, sec_int) else printf(fd, "= ~d Seconds~%", sec_int)) else printf(fd, " Unknown~%"), printf(fd, "~%")) (%i24) omniout_timestr(secs_in) := block([days, days_int, hours, hours_int, minutes, minutes_int, sec_int, seconds, secs, years, years_int], secs : convfloat(secs_in), if secs >= 0 secs then (years_int : trunc(----------------), glob_sec_in_year sec_temp : mod(trunc(secs), trunc(glob_sec_in_year)), sec_temp days_int : trunc(---------------), sec_temp : glob_sec_in_day sec_temp mod(sec_temp, trunc(glob_sec_in_day)), hours_int : trunc(----------------), glob_sec_in_hour sec_temp : mod(sec_temp, trunc(glob_sec_in_hour)), sec_temp minutes_int : trunc(------------------), glob_sec_in_minute sec_int : mod(sec_temp, trunc(glob_sec_in_minute)), if years_int > 0 then printf(true, "= ~d Years ~d Days ~d Hours ~d Minutes ~d Seconds~%", years_int, days_int, hours_int, minutes_int, sec_int) elseif days_int > 0 then printf(true, "= ~d Days ~d Hours ~d Minutes ~d Seconds~%", days_int, hours_int, minutes_int, sec_int) elseif hours_int > 0 then printf(true, "= ~d Hours ~d Minutes ~d Seconds~%", hours_int, minutes_int, sec_int) elseif minutes_int > 0 then printf(true, "= ~d Minutes ~d Seconds~%", minutes_int, sec_int) else printf(true, "= ~d Seconds~%", sec_int)) else printf(true, " Unknown~%")) (%o24) omniout_timestr(secs_in) := block([days, days_int, hours, hours_int, minutes, minutes_int, sec_int, seconds, secs, years, years_int], secs : convfloat(secs_in), if secs >= 0 secs then (years_int : trunc(----------------), glob_sec_in_year sec_temp : mod(trunc(secs), trunc(glob_sec_in_year)), sec_temp days_int : trunc(---------------), sec_temp : glob_sec_in_day sec_temp mod(sec_temp, trunc(glob_sec_in_day)), hours_int : trunc(----------------), glob_sec_in_hour sec_temp : mod(sec_temp, trunc(glob_sec_in_hour)), sec_temp minutes_int : trunc(------------------), glob_sec_in_minute sec_int : mod(sec_temp, trunc(glob_sec_in_minute)), if years_int > 0 then printf(true, "= ~d Years ~d Days ~d Hours ~d Minutes ~d Seconds~%", years_int, days_int, hours_int, minutes_int, sec_int) elseif days_int > 0 then printf(true, "= ~d Days ~d Hours ~d Minutes ~d Seconds~%", days_int, hours_int, minutes_int, sec_int) elseif hours_int > 0 then printf(true, "= ~d Hours ~d Minutes ~d Seconds~%", hours_int, minutes_int, sec_int) elseif minutes_int > 0 then printf(true, "= ~d Minutes ~d Seconds~%", minutes_int, sec_int) else printf(true, "= ~d Seconds~%", sec_int)) else printf(true, " Unknown~%")) (%i25) ats(mmm_ats, arr_a, arr_b, jjj_ats) := block([iii_ats, lll_ats, ma_ats, ret_ats], ret_ats : 0.0, if jjj_ats <= mmm_ats then (ma_ats : 1 + mmm_ats, iii_ats : jjj_ats, while iii_ats <= mmm_ats do (lll_ats : ma_ats - iii_ats, ret_ats : arr_a arr_b + ret_ats, iii_ats : 1 + iii_ats)), iii_ats lll_ats ret_ats) (%o25) ats(mmm_ats, arr_a, arr_b, jjj_ats) := block([iii_ats, lll_ats, ma_ats, ret_ats], ret_ats : 0.0, if jjj_ats <= mmm_ats then (ma_ats : 1 + mmm_ats, iii_ats : jjj_ats, while iii_ats <= mmm_ats do (lll_ats : ma_ats - iii_ats, ret_ats : arr_a arr_b + ret_ats, iii_ats : 1 + iii_ats)), iii_ats lll_ats ret_ats) (%i26) att(mmm_att, arr_aa, arr_bb, jjj_att) := block([al_att, iii_att, lll_att, ma_att, ret_att], ret_att : 0.0, if jjj_att <= mmm_att then (ma_att : 2 + mmm_att, iii_att : jjj_att, while iii_att <= mmm_att do (lll_att : ma_att - iii_att, al_att : lll_att - 1, if lll_att <= glob_max_terms then ret_att : arr_aa arr_bb convfp(al_att) + ret_att, iii_att lll_att ret_att iii_att : 1 + iii_att), ret_att : ---------------), ret_att) convfp(mmm_att) (%o26) att(mmm_att, arr_aa, arr_bb, jjj_att) := block([al_att, iii_att, lll_att, ma_att, ret_att], ret_att : 0.0, if jjj_att <= mmm_att then (ma_att : 2 + mmm_att, iii_att : jjj_att, while iii_att <= mmm_att do (lll_att : ma_att - iii_att, al_att : lll_att - 1, if lll_att <= glob_max_terms then ret_att : arr_aa arr_bb convfp(al_att) + ret_att, iii_att lll_att ret_att iii_att : 1 + iii_att), ret_att : ---------------), ret_att) convfp(mmm_att) (%i27) display_pole_debug(typ, radius, order2) := (if typ = 1 then omniout_str(ALWAYS, "Real") else omniout_str(ALWAYS, "Complex"), omniout_float(ALWAYS, "DBG Radius of convergence ", 4, radius, 4, " "), omniout_float(ALWAYS, "DBG Order of pole ", 4, order2, 4, " ")) (%o27) display_pole_debug(typ, radius, order2) := (if typ = 1 then omniout_str(ALWAYS, "Real") else omniout_str(ALWAYS, "Complex"), omniout_float(ALWAYS, "DBG Radius of convergence ", 4, radius, 4, " "), omniout_float(ALWAYS, "DBG Order of pole ", 4, order2, 4, " ")) (%i28) display_pole() := if (array_pole # glob_large_float) 1 and (array_pole > 0.0) and (array_pole # glob_large_float) 1 2 and (array_pole > 0.0) and glob_display_flag 2 then (omniout_float(ALWAYS, "Radius of convergence ", 4, array_pole , 4, " "), omniout_float(ALWAYS, 1 "Order of pole ", 4, array_pole , 4, " ")) 2 (%o28) display_pole() := if (array_pole # glob_large_float) 1 and (array_pole > 0.0) and (array_pole # glob_large_float) 1 2 and (array_pole > 0.0) and glob_display_flag 2 then (omniout_float(ALWAYS, "Radius of convergence ", 4, array_pole , 4, " "), omniout_float(ALWAYS, 1 "Order of pole ", 4, array_pole , 4, " ")) 2 (%i29) logditto(file) := (printf(file, ""), printf(file, "ditto"), printf(file, "")) (%o29) logditto(file) := (printf(file, ""), printf(file, "ditto"), printf(file, "")) (%i30) logitem_integer(file, n) := (printf(file, ""), printf(file, "~d", n), printf(file, "")) (%o30) logitem_integer(file, n) := (printf(file, ""), printf(file, "~d", n), printf(file, "")) (%i31) logitem_str(file, str) := (printf(file, ""), printf(file, str), printf(file, "")) (%o31) logitem_str(file, str) := (printf(file, ""), printf(file, str), printf(file, "")) (%i32) logitem_good_digits(file, rel_error) := block([good_digits], printf(file, ""), if rel_error # - 1.0 then (if rel_error > + 1.0E-34 then (good_digits : 1 - floor(log10(rel_error)), printf(file, "~d", good_digits)) else (good_digits : 16, printf(file, "~d", good_digits))) else printf(file, "Unknown"), printf(file, "")) (%o32) logitem_good_digits(file, rel_error) := block([good_digits], printf(file, ""), if rel_error # - 1.0 then (if rel_error > + 1.0E-34 then (good_digits : 1 - floor(log10(rel_error)), printf(file, "~d", good_digits)) else (good_digits : 16, printf(file, "~d", good_digits))) else printf(file, "Unknown"), printf(file, "")) (%i33) log_revs(file, revs) := printf(file, revs) (%o33) log_revs(file, revs) := printf(file, revs) (%i34) logitem_float(file, x) := (printf(file, ""), printf(file, "~g", x), printf(file, "")) (%o34) logitem_float(file, x) := (printf(file, ""), printf(file, "~g", x), printf(file, "")) (%i35) logitem_pole(file, pole) := (printf(file, ""), if pole = 0 then printf(file, "NA") elseif pole = 1 then printf(file, "Real") elseif pole = 2 then printf(file, "Complex") else printf(file, "No Pole"), printf(file, "")) (%o35) logitem_pole(file, pole) := (printf(file, ""), if pole = 0 then printf(file, "NA") elseif pole = 1 then printf(file, "Real") elseif pole = 2 then printf(file, "Complex") else printf(file, "No Pole"), printf(file, "")) (%i36) logstart(file) := printf(file, "") (%o36) logstart(file) := printf(file, "") (%i37) logend(file) := printf(file, "~%") (%o37) logend(file) := printf(file, "~%") (%i38) chk_data() := block([errflag], errflag : false, if (glob_max_terms < 15) or (glob_max_terms > 512) then (omniout_str(ALWAYS, "Illegal max_terms = -- Using 30"), glob_max_terms : 30), if glob_max_iter < 2 then (omniout_str(ALWAYS, "Illegal max_iter"), errflag : true), if errflag then quit()) (%o38) chk_data() := block([errflag], errflag : false, if (glob_max_terms < 15) or (glob_max_terms > 512) then (omniout_str(ALWAYS, "Illegal max_terms = -- Using 30"), glob_max_terms : 30), if glob_max_iter < 2 then (omniout_str(ALWAYS, "Illegal max_iter"), errflag : true), if errflag then quit()) (%i39) comp_expect_sec(t_end2, t_start2, t2, clock_sec2) := block([ms2, rrr, sec_left, sub1, sub2], ms2 : clock_sec2, sub1 : t_end2 - t_start2, sub2 : t2 - t_start2, if sub1 = 0.0 then sec_left : 0.0 else (if sub2 > 0.0 sub1 then (rrr : ----, sec_left : rrr ms2 - ms2) else sec_left : 0.0), sec_left) sub2 (%o39) comp_expect_sec(t_end2, t_start2, t2, clock_sec2) := block([ms2, rrr, sec_left, sub1, sub2], ms2 : clock_sec2, sub1 : t_end2 - t_start2, sub2 : t2 - t_start2, if sub1 = 0.0 then sec_left : 0.0 else (if sub2 > 0.0 sub1 then (rrr : ----, sec_left : rrr ms2 - ms2) else sec_left : 0.0), sec_left) sub2 (%i40) comp_percent(t_end2, t_start2, t2) := block([rrr, sub1, sub2], sub1 : t_end2 - t_start2, sub2 : t2 - t_start2, 100.0 sub2 if sub2 > glob_small_float then rrr : ---------- else rrr : 0.0, rrr) sub1 (%o40) comp_percent(t_end2, t_start2, t2) := block([rrr, sub1, sub2], sub1 : t_end2 - t_start2, sub2 : t2 - t_start2, 100.0 sub2 if sub2 > glob_small_float then rrr : ---------- else rrr : 0.0, rrr) sub1 (%i41) factorial_2(nnn) := nnn! (%o41) factorial_2(nnn) := nnn! (%i42) factorial_1(nnn) := block([ret], if nnn <= glob_max_terms then (if array_fact_1 = 0 nnn then (ret : factorial_2(nnn), array_fact_1 : ret) nnn else ret : array_fact_1 ) else ret : factorial_2(nnn), ret) nnn (%o42) factorial_1(nnn) := block([ret], if nnn <= glob_max_terms then (if array_fact_1 = 0 nnn then (ret : factorial_2(nnn), array_fact_1 : ret) nnn else ret : array_fact_1 ) else ret : factorial_2(nnn), ret) nnn (%i43) factorial_3(mmm, nnn) := block([ret], if (nnn <= glob_max_terms) and (mmm <= glob_max_terms) factorial_1(mmm) then (if array_fact_2 = 0 then (ret : ----------------, mmm, nnn factorial_1(nnn) array_fact_2 : ret) else ret : array_fact_2 ) mmm, nnn mmm, nnn factorial_2(mmm) else ret : ----------------, ret) factorial_2(nnn) (%o43) factorial_3(mmm, nnn) := block([ret], if (nnn <= glob_max_terms) and (mmm <= glob_max_terms) factorial_1(mmm) then (if array_fact_2 = 0 then (ret : ----------------, mmm, nnn factorial_1(nnn) array_fact_2 : ret) else ret : array_fact_2 ) mmm, nnn mmm, nnn factorial_2(mmm) else ret : ----------------, ret) factorial_2(nnn) (%i44) convfp(mmm) := mmm (%o44) convfp(mmm) := mmm (%i45) convfloat(mmm) := mmm (%o45) convfloat(mmm) := mmm (%i46) elapsed_time_seconds() := block([t], t : elapsed_real_time(), t) (%o46) elapsed_time_seconds() := block([t], t : elapsed_real_time(), t) (%i47) Si(x) := 0.0 (%o47) Si(x) := 0.0 (%i48) Ci(x) := 0.0 (%o48) Ci(x) := 0.0 (%i49) ln(x) := log(x) (%o49) ln(x) := log(x) (%i50) arcsin(x) := asin(x) (%o50) arcsin(x) := asin(x) (%i51) arccos(x) := acos(x) (%o51) arccos(x) := acos(x) (%i52) arctan(x) := atan(x) (%o52) arctan(x) := atan(x) (%i53) omniabs(x) := abs(x) (%o53) omniabs(x) := abs(x) (%i54) expt(x, y) := (if (x = 0.0) and (y < 0.0) y then print("expt error x = ", x, "y = ", y), x ) (%o54) expt(x, y) := (if (x = 0.0) and (y < 0.0) y then print("expt error x = ", x, "y = ", y), x ) (%i55) estimated_needed_step_error(x_start, x_end, estimated_h, estimated_answer) := block([desired_abs_gbl_error, range, estimated_steps, step_error], omniout_float(ALWAYS, "glob_desired_digits_correct", 32, glob_desired_digits_correct, 32, ""), desired_abs_gbl_error : expt(10.0, - glob_desired_digits_correct) omniabs(estimated_answer), omniout_float(ALWAYS, "desired_abs_gbl_error", 32, desired_abs_gbl_error, 32, ""), range : x_end - x_start, omniout_float(ALWAYS, "range", 32, range, 32, range ""), estimated_steps : -----------, omniout_float(ALWAYS, "estimated_steps", estimated_h desired_abs_gbl_error 32, estimated_steps, 32, ""), step_error : omniabs(---------------------), estimated_steps omniout_float(ALWAYS, "step_error", 32, step_error, 32, ""), step_error) (%o55) estimated_needed_step_error(x_start, x_end, estimated_h, estimated_answer) := block([desired_abs_gbl_error, range, estimated_steps, step_error], omniout_float(ALWAYS, "glob_desired_digits_correct", 32, glob_desired_digits_correct, 32, ""), desired_abs_gbl_error : expt(10.0, - glob_desired_digits_correct) omniabs(estimated_answer), omniout_float(ALWAYS, "desired_abs_gbl_error", 32, desired_abs_gbl_error, 32, ""), range : x_end - x_start, omniout_float(ALWAYS, "range", 32, range, 32, range ""), estimated_steps : -----------, omniout_float(ALWAYS, "estimated_steps", estimated_h desired_abs_gbl_error 32, estimated_steps, 32, ""), step_error : omniabs(---------------------), estimated_steps omniout_float(ALWAYS, "step_error", 32, step_error, 32, ""), step_error) - 2.0 (%i56) exact_soln_y(x) := block(------) exp(x) - 2.0 (%o56) exact_soln_y(x) := block(------) exp(x) (%i57) main() := block([d1, d2, d3, d4, est_err_2, niii, done_once, term, ord, order_diff, term_no, html_log_file, iiif, jjjf, rows, r_order, sub_iter, calc_term, iii, temp_sum, current_iter, x_start, x_end, it, max_terms, opt_iter, tmp, subiter, est_needed_step_err, value3, min_value, est_answer, best_h, found_h, repeat_it], define_variable(glob_max_terms, 30, fixnum), define_variable(glob_iolevel, 5, fixnum), define_variable(ALWAYS, 1, fixnum), define_variable(INFO, 2, fixnum), define_variable(DEBUGL, 3, fixnum), define_variable(DEBUGMASSIVE, 4, fixnum), define_variable(MAX_UNCHANGED, 10, fixnum), define_variable(glob_check_sign, 1.0, float), define_variable(glob_desired_digits_correct, 8.0, float), define_variable(glob_max_value3, 0.0, float), define_variable(glob_ratio_of_radius, 0.01, float), define_variable(glob_percent_done, 0.0, float), define_variable(glob_subiter_method, 3, fixnum), define_variable(glob_total_exp_sec, 0.1, float), define_variable(glob_optimal_expect_sec, 0.1, float), define_variable(glob_html_log, true, boolean), define_variable(glob_good_digits, 0, fixnum), define_variable(glob_max_opt_iter, 10, fixnum), define_variable(glob_dump, false, boolean), define_variable(glob_djd_debug, true, boolean), define_variable(glob_display_flag, true, boolean), define_variable(glob_djd_debug2, true, boolean), define_variable(glob_sec_in_minute, 60, fixnum), define_variable(glob_min_in_hour, 60, fixnum), define_variable(glob_hours_in_day, 24, fixnum), define_variable(glob_days_in_year, 365, fixnum), define_variable(glob_sec_in_hour, 3600, fixnum), define_variable(glob_sec_in_day, 86400, fixnum), define_variable(glob_sec_in_year, 31536000, fixnum), define_variable(glob_almost_1, 0.999, float), define_variable(glob_clock_sec, 0.0, float), define_variable(glob_clock_start_sec, 0.0, float), define_variable(glob_not_yet_finished, true, boolean), define_variable(glob_initial_pass, true, boolean), define_variable(glob_not_yet_start_msg, true, boolean), define_variable(glob_reached_optimal_h, false, boolean), define_variable(glob_optimal_done, false, boolean), define_variable(glob_disp_incr, 0.1, float), define_variable(glob_h, 0.1, float), define_variable(glob_max_h, 0.1, float), define_variable(glob_large_float, 9.0E+100, float), define_variable(glob_last_good_h, 0.1, float), define_variable(glob_look_poles, false, boolean), define_variable(glob_neg_h, false, boolean), define_variable(glob_display_interval, 0.0, float), define_variable(glob_next_display, 0.0, float), define_variable(glob_dump_analytic, false, boolean), define_variable(glob_abserr, 1.0E-11, float), define_variable(glob_relerr, 1.0E-11, float), define_variable(glob_max_hours, 0.0, float), define_variable(glob_max_iter, 1000, fixnum), define_variable(glob_max_rel_trunc_err, 1.0E-11, float), define_variable(glob_max_trunc_err, 1.0E-11, float), define_variable(glob_no_eqs, 0, fixnum), define_variable(glob_optimal_clock_start_sec, 0.0, float), define_variable(glob_optimal_start, 0.0, float), define_variable(glob_small_float, 1.0E-201, float), define_variable(glob_smallish_float, 1.0E-101, float), define_variable(glob_unchanged_h_cnt, 0, fixnum), define_variable(glob_warned, false, boolean), define_variable(glob_warned2, false, boolean), define_variable(glob_max_sec, 10000.0, float), define_variable(glob_orig_start_sec, 0.0, float), define_variable(glob_start, 0, fixnum), define_variable(glob_curr_iter_when_opt, 0, fixnum), define_variable(glob_current_iter, 0, fixnum), define_variable(glob_iter, 0, fixnum), define_variable(glob_normmax, 0.0, float), define_variable(glob_max_minutes, 0.0, float), ALWAYS : 1, INFO : 2, DEBUGL : 3, DEBUGMASSIVE : 4, glob_iolevel : INFO, glob_orig_start_sec : elapsed_time_seconds(), MAX_UNCHANGED : 10, glob_curr_iter_when_opt : 0, glob_display_flag : true, glob_no_eqs : 1, glob_iter : - 1, opt_iter : - 1, glob_max_iter : 50000, glob_max_hours : 0.0, glob_max_minutes : 15.0, omniout_str(ALWAYS, "##############ECHO OF PROBLEM#################"), omniout_str(ALWAYS, "##############temp/div_c_exppostode.ode#################"), omniout_str(ALWAYS, "diff ( y , x , 1 ) = 2.0 / exp(x);"), omniout_str(ALWAYS, "!"), omniout_str(ALWAYS, "/* BEGIN FIRST INPUT BLOCK */"), omniout_str(ALWAYS, "Digits:32,"), omniout_str(ALWAYS, "max_terms:30,"), omniout_str(ALWAYS, "!"), omniout_str(ALWAYS, "/* END FIRST INPUT BLOCK */"), omniout_str(ALWAYS, "/* BEGIN SECOND INPUT BLOCK */"), omniout_str(ALWAYS, "x_start:1.0,"), omniout_str(ALWAYS, "/* # did poorly with x_start := -5.0; */"), omniout_str(ALWAYS, "x_end:5.0,"), omniout_str(ALWAYS, "array_y_init[0 + 1] : exact_soln_y(x_start),"), omniout_str(ALWAYS, "glob_look_poles:true,"), omniout_str(ALWAYS, "glob_max_iter:1000000,"), omniout_str(ALWAYS, "glob_display_interval:0.1,"), omniout_str(ALWAYS, "glob_max_minutes:10,"), omniout_str(ALWAYS, "/* END SECOND INPUT BLOCK */"), omniout_str(ALWAYS, "/* BEGIN OVERRIDE BLOCK */"), omniout_str(ALWAYS, "glob_desired_digits_correct:10,"), omniout_str(ALWAYS, "glob_display_interval:0.001,"), omniout_str(ALWAYS, "glob_look_poles:true,"), omniout_str(ALWAYS, "glob_max_iter:10000000,"), omniout_str(ALWAYS, "glob_max_minutes:3,"), omniout_str(ALWAYS, "glob_subiter_method:3,"), omniout_str(ALWAYS, "/* END OVERRIDE BLOCK */"), omniout_str(ALWAYS, "!"), omniout_str(ALWAYS, "/* BEGIN USER DEF BLOCK */"), omniout_str(ALWAYS, "exact_soln_y (x) := (block("), omniout_str(ALWAYS, " (- 2.0/exp(x)) "), omniout_str(ALWAYS, "));"), omniout_str(ALWAYS, "/* END USER DEF BLOCK */"), omniout_str(ALWAYS, "#######END OF ECHO OF PROBLEM#################"), glob_unchanged_h_cnt : 0, glob_warned : false, glob_warned2 : false, glob_small_float : 1.0E-200, glob_smallish_float : 1.0E-64, glob_large_float : 1.0E+100, glob_almost_1 : 0.99, Digits : 32, max_terms : 30, glob_max_terms : max_terms, glob_html_log : true, array(array_y_init, 1 + max_terms), array(array_norms, 1 + max_terms), array(array_fact_1, 1 + max_terms), array(array_pole, 1 + max_terms), array(array_1st_rel_error, 1 + max_terms), array(array_last_rel_error, 1 + max_terms), array(array_type_pole, 1 + max_terms), array(array_y, 1 + max_terms), array(array_x, 1 + max_terms), array(array_tmp0, 1 + max_terms), array(array_tmp1, 1 + max_terms), array(array_tmp2, 1 + max_terms), array(array_tmp3, 1 + max_terms), array(array_m1, 1 + max_terms), array(array_y_higher, 1 + 2, 1 + max_terms), array(array_y_higher_work, 1 + 2, 1 + max_terms), array(array_y_higher_work2, 1 + 2, 1 + max_terms), array(array_y_set_initial, 1 + 2, 1 + max_terms), array(array_poles, 1 + 1, 1 + 3), array(array_real_pole, 1 + 1, 1 + 3), array(array_complex_pole, 1 + 1, 1 + 3), array(array_fact_2, 1 + max_terms, 1 + max_terms), term : 1, while term <= max_terms do (array_y_init : 0.0, term : 1 + term), term term : 1, while term <= max_terms do (array_norms : 0.0, term term : 1 + term), term : 1, while term <= max_terms do (array_fact_1 : 0.0, term : 1 + term), term : 1, term while term <= max_terms do (array_pole : 0.0, term : 1 + term), term : 1, term while term <= max_terms do (array_1st_rel_error : 0.0, term : 1 + term), term term : 1, while term <= max_terms do (array_last_rel_error : 0.0, term term : 1 + term), term : 1, while term <= max_terms do (array_type_pole : 0.0, term : 1 + term), term : 1, term while term <= max_terms do (array_y : 0.0, term : 1 + term), term : 1, term while term <= max_terms do (array_x : 0.0, term : 1 + term), term : 1, term while term <= max_terms do (array_tmp0 : 0.0, term : 1 + term), term : 1, term while term <= max_terms do (array_tmp1 : 0.0, term : 1 + term), term : 1, term while term <= max_terms do (array_tmp2 : 0.0, term : 1 + term), term : 1, term while term <= max_terms do (array_tmp3 : 0.0, term : 1 + term), term : 1, term while term <= max_terms do (array_m1 : 0.0, term : 1 + term), ord : 1, term while ord <= 2 do (term : 1, while term <= max_terms do (array_y_higher : 0.0, term : 1 + term), ord : 1 + ord), ord, term ord : 1, while ord <= 2 do (term : 1, while term <= max_terms do (array_y_higher_work : 0.0, ord, term term : 1 + term), ord : 1 + ord), ord : 1, while ord <= 2 do (term : 1, while term <= max_terms do (array_y_higher_work2 : 0.0, term : 1 + term), ord, term ord : 1 + ord), ord : 1, while ord <= 2 do (term : 1, while term <= max_terms do (array_y_set_initial : 0.0, ord, term term : 1 + term), ord : 1 + ord), ord : 1, while ord <= 1 do (term : 1, while term <= 3 do (array_poles : 0.0, ord, term term : 1 + term), ord : 1 + ord), ord : 1, while ord <= 1 do (term : 1, while term <= 3 do (array_real_pole : 0.0, term : 1 + term), ord : 1 + ord), ord, term ord : 1, while ord <= 1 do (term : 1, while term <= 3 do (array_complex_pole : 0.0, term : 1 + term), ord, term ord : 1 + ord), ord : 1, while ord <= max_terms do (term : 1, while term <= max_terms do (array_fact_2 : 0.0, term : 1 + term), ord, term ord : 1 + ord), array(array_y, 1 + 1 + max_terms), term : 1, while term <= 1 + max_terms do (array_y : 0.0, term : 1 + term), term array(array_x, 1 + 1 + max_terms), term : 1, while term <= 1 + max_terms do (array_x : 0.0, term : 1 + term), term array(array_tmp0, 1 + 1 + max_terms), term : 1, while term <= 1 + max_terms do (array_tmp0 : 0.0, term : 1 + term), term array(array_tmp1, 1 + 1 + max_terms), term : 1, while term <= 1 + max_terms do (array_tmp1 : 0.0, term : 1 + term), term array(array_tmp2, 1 + 1 + max_terms), term : 1, while term <= 1 + max_terms do (array_tmp2 : 0.0, term : 1 + term), term array(array_tmp3, 1 + 1 + max_terms), term : 1, while term <= 1 + max_terms do (array_tmp3 : 0.0, term : 1 + term), term array(array_m1, 1 + 1 + max_terms), term : 1, while term <= 1 + max_terms do (array_m1 : 0.0, term : 1 + term), term array(array_const_1, 1 + 1 + max_terms), term : 1, while term <= 1 + max_terms do (array_const_1 : 0.0, term : 1 + term), term array_const_1 : 1, array(array_const_0D0, 1 + 1 + max_terms), term : 1, 1 while term <= 1 + max_terms do (array_const_0D0 : 0.0, term : 1 + term), term array_const_0D0 : 0.0, array(array_const_2D0, 1 + 1 + max_terms), term : 1, 1 while term <= 1 + max_terms do (array_const_2D0 : 0.0, term : 1 + term), term array_const_2D0 : 2.0, array(array_m1, 1 + 1 + max_terms), term : 1, 1 while term <= max_terms do (array_m1 : 0.0, term : 1 + term), term array_m1 : - 1.0, iiif : 0, while iiif <= glob_max_terms do (jjjf : 0, 1 while jjjf <= glob_max_terms do (array_fact_1 : 0, iiif array_fact_2 : 0, jjjf : 1 + jjjf), iiif : 1 + iiif), x_start : 1.0, iiif, jjjf x_end : 5.0, array_y_init : exact_soln_y(x_start), 1 + 0 glob_look_poles : true, glob_max_iter : 1000000, glob_display_interval : 0.1, glob_max_minutes : 10, glob_desired_digits_correct : 10, glob_display_interval : 0.001, glob_look_poles : true, glob_max_iter : 10000000, glob_max_minutes : 3, glob_subiter_method : 3, glob_last_good_h : glob_h, glob_max_terms : max_terms, glob_max_sec : convfloat(3600.0) convfloat(glob_max_hours) + convfloat(60.0) convfloat(glob_max_minutes), if glob_h > 0.0 then (glob_neg_h : false, glob_display_interval : omniabs(glob_display_interval)) else (glob_neg_h : true, glob_display_interval : - omniabs(glob_display_interval)), chk_data(), array_y_set_initial : true, 1, 1 array_y_set_initial : false, array_y_set_initial : false, 1, 2 1, 3 array_y_set_initial : false, array_y_set_initial : false, 1, 4 1, 5 array_y_set_initial : false, array_y_set_initial : false, 1, 6 1, 7 array_y_set_initial : false, array_y_set_initial : false, 1, 8 1, 9 array_y_set_initial : false, array_y_set_initial : false, 1, 10 1, 11 array_y_set_initial : false, array_y_set_initial : false, 1, 12 1, 13 array_y_set_initial : false, array_y_set_initial : false, 1, 14 1, 15 array_y_set_initial : false, array_y_set_initial : false, 1, 16 1, 17 array_y_set_initial : false, array_y_set_initial : false, 1, 18 1, 19 array_y_set_initial : false, array_y_set_initial : false, 1, 20 1, 21 array_y_set_initial : false, array_y_set_initial : false, 1, 22 1, 23 array_y_set_initial : false, array_y_set_initial : false, 1, 24 1, 25 array_y_set_initial : false, array_y_set_initial : false, 1, 26 1, 27 array_y_set_initial : false, array_y_set_initial : false, 1, 28 1, 29 array_y_set_initial : false, omniout_str(ALWAYS, "START of Optimize"), 1, 30 glob_check_sign : check_sign(x_start, x_end), glob_h : check_sign(x_start, x_end), if glob_display_interval < glob_h then glob_h : glob_display_interval, if glob_max_h < glob_h then glob_h : glob_max_h, found_h : - 1.0, best_h : 0.0, min_value : glob_large_float, est_answer : est_size_answer(), opt_iter : 1, while (opt_iter <= 20) and (found_h < 0.0) do (omniout_int(ALWAYS, "opt_iter", 32, opt_iter, 4, ""), array_x : x_start, array_x : glob_h, 1 2 glob_next_display : x_start, order_diff : 1, term_no : 1, while term_no <= order_diff do (array_y : term_no array_y_init expt(glob_h, term_no - 1) term_no ---------------------------------------------, term_no : 1 + term_no), factorial_1(term_no - 1) rows : order_diff, r_order : 1, while r_order <= rows do (term_no : 1, while term_no <= 1 - r_order + rows do (it : - 1 + r_order + term_no, array_y_init expt(glob_h, term_no - 1) it array_y_higher : ----------------------------------------, r_order, term_no factorial_1(term_no - 1) term_no : 1 + term_no), r_order : 1 + r_order), atomall(), est_needed_step_err : estimated_needed_step_error(x_start, x_end, glob_h, est_answer), omniout_float(ALWAYS, "est_needed_step_err", 32, est_needed_step_err, 16, ""), value3 : test_suggested_h(), omniout_float(ALWAYS, "value3", 32, value3, 32, ""), if (value3 < est_needed_step_err) and (found_h < 0.0) then (best_h : glob_h, found_h : 1.0), omniout_float(ALWAYS, "best_h", 32, best_h, 32, ""), opt_iter : 1 + opt_iter, glob_h : glob_h 0.5), if found_h > 0.0 then glob_h : best_h else omniout_str(ALWAYS, "No increment to obtain desired accuracy found"), if glob_html_log then html_log_file : openw("html/entry.html"), if found_h > 0.0 then (omniout_str(ALWAYS, "START of Soultion"), array_x : x_start, array_x : glob_h, glob_next_display : x_start, 1 2 order_diff : 1, term_no : 1, while term_no <= order_diff do (array_y : (array_y_init expt(glob_h, term_no - 1)) term_no term_no /factorial_1(term_no - 1), term_no : 1 + term_no), rows : order_diff, r_order : 1, while r_order <= rows do (term_no : 1, while term_no <= 1 - r_order + rows do (it : - 1 + r_order + term_no, array_y_init expt(glob_h, term_no - 1) it array_y_higher : ----------------------------------------, r_order, term_no factorial_1(term_no - 1) term_no : 1 + term_no), r_order : 1 + r_order), current_iter : 1, glob_clock_start_sec : elapsed_time_seconds(), glob_clock_sec : elapsed_time_seconds(), glob_current_iter : 0, glob_iter : 0, omniout_str(DEBUGL, " "), glob_reached_optimal_h : true, glob_optimal_clock_start_sec : elapsed_time_seconds(), while (glob_current_iter < glob_max_iter) and (glob_check_sign array_x < glob_check_sign x_end) 1 and (convfloat(glob_clock_sec) - convfloat(glob_orig_start_sec) < convfloat(glob_max_sec)) do (if reached_interval () then (omniout_str(INFO, " "), omniout_str(INFO, "TOP MAIN SOLVE Loop")), glob_iter : 1 + glob_iter, glob_clock_sec : elapsed_time_seconds(), glob_current_iter : 1 + glob_current_iter, atomall(), display_alot(current_iter), if glob_look_poles then check_for_pole(), if reached_interval() then glob_next_display : glob_display_interval + glob_next_display, array_x : glob_h + array_x , 1 1 array_x : glob_h, order_diff : 2, ord : 2, calc_term : 1, 2 iii : glob_max_terms, while iii >= calc_term do (array_y_higher_work : 2, iii array_y_higher 2, iii --------------------------- expt(glob_h, calc_term - 1) -------------------------------------, iii : iii - 1), temp_sum : 0.0, factorial_3(iii - calc_term, iii - 1) ord : 2, calc_term : 1, iii : glob_max_terms, while iii >= calc_term do (temp_sum : array_y_higher_work + temp_sum, ord, iii iii : iii - 1), array_y_higher_work2 : ord, calc_term temp_sum expt(glob_h, calc_term - 1) ------------------------------------, ord : 1, calc_term : 2, factorial_1(calc_term - 1) iii : glob_max_terms, while iii >= calc_term do (array_y_higher_work : 1, iii array_y_higher 1, iii --------------------------- expt(glob_h, calc_term - 1) -------------------------------------, iii : iii - 1), temp_sum : 0.0, factorial_3(iii - calc_term, iii - 1) ord : 1, calc_term : 2, iii : glob_max_terms, while iii >= calc_term do (temp_sum : array_y_higher_work + temp_sum, ord, iii iii : iii - 1), array_y_higher_work2 : ord, calc_term temp_sum expt(glob_h, calc_term - 1) ------------------------------------, ord : 1, calc_term : 1, factorial_1(calc_term - 1) iii : glob_max_terms, while iii >= calc_term do (array_y_higher_work : 1, iii array_y_higher 1, iii --------------------------- expt(glob_h, calc_term - 1) -------------------------------------, iii : iii - 1), temp_sum : 0.0, factorial_3(iii - calc_term, iii - 1) ord : 1, calc_term : 1, iii : glob_max_terms, while iii >= calc_term do (temp_sum : array_y_higher_work + temp_sum, ord, iii iii : iii - 1), array_y_higher_work2 : ord, calc_term temp_sum expt(glob_h, calc_term - 1) ------------------------------------, term_no : glob_max_terms, factorial_1(calc_term - 1) while term_no >= 1 do (array_y : array_y_higher_work2 , term_no 1, term_no ord : 1, while ord <= order_diff do (array_y_higher : ord, term_no array_y_higher_work2 , ord : 1 + ord), term_no : term_no - 1)), ord, term_no omniout_str(ALWAYS, "Finished!"), if glob_iter >= glob_max_iter then omniout_str(ALWAYS, "Maximum Iterations Reached before Solution Completed!"), if elapsed_time_seconds() - convfloat(glob_orig_start_sec) >= convfloat(glob_max_sec) then omniout_str(ALWAYS, "Maximum Time Reached before Solution Completed!"), glob_clock_sec : elapsed_time_seconds(), omniout_str(INFO, "diff ( y , x , 1 ) = 2.0 / exp(x);"), omniout_int(INFO, "Iterations ", 32, glob_iter, 4, " "), prog_report(x_start, x_end), if glob_html_log then (logstart(html_log_file), logitem_str(html_log_file, "2013-01-28T12:56:30-06:00"), logitem_str(html_log_file, "Maxima"), logitem_str(html_log_file, "div_c_exp"), logitem_str(html_log_file, "diff ( y , x , 1 ) = 2.0 / exp(x);"), logitem_float(html_log_file, x_start), logitem_float(html_log_file, x_end), logitem_float(html_log_file, array_x ), logitem_float(html_log_file, glob_h), 1 logitem_str(html_log_file, "16"), logitem_good_digits(html_log_file, array_last_rel_error ), logitem_integer(html_log_file, glob_max_terms), 1 logitem_float(html_log_file, array_1st_rel_error ), 1 logitem_float(html_log_file, array_last_rel_error ), 1 logitem_integer(html_log_file, glob_iter), logitem_pole(html_log_file, array_type_pole ), 1 if (array_type_pole = 1) or (array_type_pole = 2) 1 1 then (logitem_float(html_log_file, array_pole ), 1 logitem_float(html_log_file, array_pole ), 0) 2 else (logitem_str(html_log_file, "NA"), logitem_str(html_log_file, "NA"), 0), logitem_time(html_log_file, convfloat(glob_clock_sec)), if glob_percent_done < 100.0 then (logitem_time(html_log_file, convfloat(glob_total_exp_sec)), 0) else (logitem_str(html_log_file, "Done"), 0), log_revs(html_log_file, " 165 "), logitem_str(html_log_file, "div_c_exp diffeq.max"), logitem_str(html_log_file, "div_c_exp maxima results"), logitem_str(html_log_file, "All Tests - All Languages"), logend(html_log_file)), if glob_html_log then close(html_log_file))) (%o57) main() := block([d1, d2, d3, d4, est_err_2, niii, done_once, term, ord, order_diff, term_no, html_log_file, iiif, jjjf, rows, r_order, sub_iter, calc_term, iii, temp_sum, current_iter, x_start, x_end, it, max_terms, opt_iter, tmp, subiter, est_needed_step_err, value3, min_value, est_answer, best_h, found_h, repeat_it], define_variable(glob_max_terms, 30, fixnum), define_variable(glob_iolevel, 5, fixnum), define_variable(ALWAYS, 1, fixnum), define_variable(INFO, 2, fixnum), define_variable(DEBUGL, 3, fixnum), define_variable(DEBUGMASSIVE, 4, fixnum), define_variable(MAX_UNCHANGED, 10, fixnum), define_variable(glob_check_sign, 1.0, float), define_variable(glob_desired_digits_correct, 8.0, float), define_variable(glob_max_value3, 0.0, float), define_variable(glob_ratio_of_radius, 0.01, float), define_variable(glob_percent_done, 0.0, float), define_variable(glob_subiter_method, 3, fixnum), define_variable(glob_total_exp_sec, 0.1, float), define_variable(glob_optimal_expect_sec, 0.1, float), define_variable(glob_html_log, true, boolean), define_variable(glob_good_digits, 0, fixnum), define_variable(glob_max_opt_iter, 10, fixnum), define_variable(glob_dump, false, boolean), define_variable(glob_djd_debug, true, boolean), define_variable(glob_display_flag, true, boolean), define_variable(glob_djd_debug2, true, boolean), define_variable(glob_sec_in_minute, 60, fixnum), define_variable(glob_min_in_hour, 60, fixnum), define_variable(glob_hours_in_day, 24, fixnum), define_variable(glob_days_in_year, 365, fixnum), define_variable(glob_sec_in_hour, 3600, fixnum), define_variable(glob_sec_in_day, 86400, fixnum), define_variable(glob_sec_in_year, 31536000, fixnum), define_variable(glob_almost_1, 0.999, float), define_variable(glob_clock_sec, 0.0, float), define_variable(glob_clock_start_sec, 0.0, float), define_variable(glob_not_yet_finished, true, boolean), define_variable(glob_initial_pass, true, boolean), define_variable(glob_not_yet_start_msg, true, boolean), define_variable(glob_reached_optimal_h, false, boolean), define_variable(glob_optimal_done, false, boolean), define_variable(glob_disp_incr, 0.1, float), define_variable(glob_h, 0.1, float), define_variable(glob_max_h, 0.1, float), define_variable(glob_large_float, 9.0E+100, float), define_variable(glob_last_good_h, 0.1, float), define_variable(glob_look_poles, false, boolean), define_variable(glob_neg_h, false, boolean), define_variable(glob_display_interval, 0.0, float), define_variable(glob_next_display, 0.0, float), define_variable(glob_dump_analytic, false, boolean), define_variable(glob_abserr, 1.0E-11, float), define_variable(glob_relerr, 1.0E-11, float), define_variable(glob_max_hours, 0.0, float), define_variable(glob_max_iter, 1000, fixnum), define_variable(glob_max_rel_trunc_err, 1.0E-11, float), define_variable(glob_max_trunc_err, 1.0E-11, float), define_variable(glob_no_eqs, 0, fixnum), define_variable(glob_optimal_clock_start_sec, 0.0, float), define_variable(glob_optimal_start, 0.0, float), define_variable(glob_small_float, 1.0E-201, float), define_variable(glob_smallish_float, 1.0E-101, float), define_variable(glob_unchanged_h_cnt, 0, fixnum), define_variable(glob_warned, false, boolean), define_variable(glob_warned2, false, boolean), define_variable(glob_max_sec, 10000.0, float), define_variable(glob_orig_start_sec, 0.0, float), define_variable(glob_start, 0, fixnum), define_variable(glob_curr_iter_when_opt, 0, fixnum), define_variable(glob_current_iter, 0, fixnum), define_variable(glob_iter, 0, fixnum), define_variable(glob_normmax, 0.0, float), define_variable(glob_max_minutes, 0.0, float), ALWAYS : 1, INFO : 2, DEBUGL : 3, DEBUGMASSIVE : 4, glob_iolevel : INFO, glob_orig_start_sec : elapsed_time_seconds(), MAX_UNCHANGED : 10, glob_curr_iter_when_opt : 0, glob_display_flag : true, glob_no_eqs : 1, glob_iter : - 1, opt_iter : - 1, glob_max_iter : 50000, glob_max_hours : 0.0, glob_max_minutes : 15.0, omniout_str(ALWAYS, "##############ECHO OF PROBLEM#################"), omniout_str(ALWAYS, "##############temp/div_c_exppostode.ode#################"), omniout_str(ALWAYS, "diff ( y , x , 1 ) = 2.0 / exp(x);"), omniout_str(ALWAYS, "!"), omniout_str(ALWAYS, "/* BEGIN FIRST INPUT BLOCK */"), omniout_str(ALWAYS, "Digits:32,"), omniout_str(ALWAYS, "max_terms:30,"), omniout_str(ALWAYS, "!"), omniout_str(ALWAYS, "/* END FIRST INPUT BLOCK */"), omniout_str(ALWAYS, "/* BEGIN SECOND INPUT BLOCK */"), omniout_str(ALWAYS, "x_start:1.0,"), omniout_str(ALWAYS, "/* # did poorly with x_start := -5.0; */"), omniout_str(ALWAYS, "x_end:5.0,"), omniout_str(ALWAYS, "array_y_init[0 + 1] : exact_soln_y(x_start),"), omniout_str(ALWAYS, "glob_look_poles:true,"), omniout_str(ALWAYS, "glob_max_iter:1000000,"), omniout_str(ALWAYS, "glob_display_interval:0.1,"), omniout_str(ALWAYS, "glob_max_minutes:10,"), omniout_str(ALWAYS, "/* END SECOND INPUT BLOCK */"), omniout_str(ALWAYS, "/* BEGIN OVERRIDE BLOCK */"), omniout_str(ALWAYS, "glob_desired_digits_correct:10,"), omniout_str(ALWAYS, "glob_display_interval:0.001,"), omniout_str(ALWAYS, "glob_look_poles:true,"), omniout_str(ALWAYS, "glob_max_iter:10000000,"), omniout_str(ALWAYS, "glob_max_minutes:3,"), omniout_str(ALWAYS, "glob_subiter_method:3,"), omniout_str(ALWAYS, "/* END OVERRIDE BLOCK */"), omniout_str(ALWAYS, "!"), omniout_str(ALWAYS, "/* BEGIN USER DEF BLOCK */"), omniout_str(ALWAYS, "exact_soln_y (x) := (block("), omniout_str(ALWAYS, " (- 2.0/exp(x)) "), omniout_str(ALWAYS, "));"), omniout_str(ALWAYS, "/* END USER DEF BLOCK */"), omniout_str(ALWAYS, "#######END OF ECHO OF PROBLEM#################"), glob_unchanged_h_cnt : 0, glob_warned : false, glob_warned2 : false, glob_small_float : 1.0E-200, glob_smallish_float : 1.0E-64, glob_large_float : 1.0E+100, glob_almost_1 : 0.99, Digits : 32, max_terms : 30, glob_max_terms : max_terms, glob_html_log : true, array(array_y_init, 1 + max_terms), array(array_norms, 1 + max_terms), array(array_fact_1, 1 + max_terms), array(array_pole, 1 + max_terms), array(array_1st_rel_error, 1 + max_terms), array(array_last_rel_error, 1 + max_terms), array(array_type_pole, 1 + max_terms), array(array_y, 1 + max_terms), array(array_x, 1 + max_terms), array(array_tmp0, 1 + max_terms), array(array_tmp1, 1 + max_terms), array(array_tmp2, 1 + max_terms), array(array_tmp3, 1 + max_terms), array(array_m1, 1 + max_terms), array(array_y_higher, 1 + 2, 1 + max_terms), array(array_y_higher_work, 1 + 2, 1 + max_terms), array(array_y_higher_work2, 1 + 2, 1 + max_terms), array(array_y_set_initial, 1 + 2, 1 + max_terms), array(array_poles, 1 + 1, 1 + 3), array(array_real_pole, 1 + 1, 1 + 3), array(array_complex_pole, 1 + 1, 1 + 3), array(array_fact_2, 1 + max_terms, 1 + max_terms), term : 1, while term <= max_terms do (array_y_init : 0.0, term : 1 + term), term term : 1, while term <= max_terms do (array_norms : 0.0, term term : 1 + term), term : 1, while term <= max_terms do (array_fact_1 : 0.0, term : 1 + term), term : 1, term while term <= max_terms do (array_pole : 0.0, term : 1 + term), term : 1, term while term <= max_terms do (array_1st_rel_error : 0.0, term : 1 + term), term term : 1, while term <= max_terms do (array_last_rel_error : 0.0, term term : 1 + term), term : 1, while term <= max_terms do (array_type_pole : 0.0, term : 1 + term), term : 1, term while term <= max_terms do (array_y : 0.0, term : 1 + term), term : 1, term while term <= max_terms do (array_x : 0.0, term : 1 + term), term : 1, term while term <= max_terms do (array_tmp0 : 0.0, term : 1 + term), term : 1, term while term <= max_terms do (array_tmp1 : 0.0, term : 1 + term), term : 1, term while term <= max_terms do (array_tmp2 : 0.0, term : 1 + term), term : 1, term while term <= max_terms do (array_tmp3 : 0.0, term : 1 + term), term : 1, term while term <= max_terms do (array_m1 : 0.0, term : 1 + term), ord : 1, term while ord <= 2 do (term : 1, while term <= max_terms do (array_y_higher : 0.0, term : 1 + term), ord : 1 + ord), ord, term ord : 1, while ord <= 2 do (term : 1, while term <= max_terms do (array_y_higher_work : 0.0, ord, term term : 1 + term), ord : 1 + ord), ord : 1, while ord <= 2 do (term : 1, while term <= max_terms do (array_y_higher_work2 : 0.0, term : 1 + term), ord, term ord : 1 + ord), ord : 1, while ord <= 2 do (term : 1, while term <= max_terms do (array_y_set_initial : 0.0, ord, term term : 1 + term), ord : 1 + ord), ord : 1, while ord <= 1 do (term : 1, while term <= 3 do (array_poles : 0.0, ord, term term : 1 + term), ord : 1 + ord), ord : 1, while ord <= 1 do (term : 1, while term <= 3 do (array_real_pole : 0.0, term : 1 + term), ord : 1 + ord), ord, term ord : 1, while ord <= 1 do (term : 1, while term <= 3 do (array_complex_pole : 0.0, term : 1 + term), ord, term ord : 1 + ord), ord : 1, while ord <= max_terms do (term : 1, while term <= max_terms do (array_fact_2 : 0.0, term : 1 + term), ord, term ord : 1 + ord), array(array_y, 1 + 1 + max_terms), term : 1, while term <= 1 + max_terms do (array_y : 0.0, term : 1 + term), term array(array_x, 1 + 1 + max_terms), term : 1, while term <= 1 + max_terms do (array_x : 0.0, term : 1 + term), term array(array_tmp0, 1 + 1 + max_terms), term : 1, while term <= 1 + max_terms do (array_tmp0 : 0.0, term : 1 + term), term array(array_tmp1, 1 + 1 + max_terms), term : 1, while term <= 1 + max_terms do (array_tmp1 : 0.0, term : 1 + term), term array(array_tmp2, 1 + 1 + max_terms), term : 1, while term <= 1 + max_terms do (array_tmp2 : 0.0, term : 1 + term), term array(array_tmp3, 1 + 1 + max_terms), term : 1, while term <= 1 + max_terms do (array_tmp3 : 0.0, term : 1 + term), term array(array_m1, 1 + 1 + max_terms), term : 1, while term <= 1 + max_terms do (array_m1 : 0.0, term : 1 + term), term array(array_const_1, 1 + 1 + max_terms), term : 1, while term <= 1 + max_terms do (array_const_1 : 0.0, term : 1 + term), term array_const_1 : 1, array(array_const_0D0, 1 + 1 + max_terms), term : 1, 1 while term <= 1 + max_terms do (array_const_0D0 : 0.0, term : 1 + term), term array_const_0D0 : 0.0, array(array_const_2D0, 1 + 1 + max_terms), term : 1, 1 while term <= 1 + max_terms do (array_const_2D0 : 0.0, term : 1 + term), term array_const_2D0 : 2.0, array(array_m1, 1 + 1 + max_terms), term : 1, 1 while term <= max_terms do (array_m1 : 0.0, term : 1 + term), term array_m1 : - 1.0, iiif : 0, while iiif <= glob_max_terms do (jjjf : 0, 1 while jjjf <= glob_max_terms do (array_fact_1 : 0, iiif array_fact_2 : 0, jjjf : 1 + jjjf), iiif : 1 + iiif), x_start : 1.0, iiif, jjjf x_end : 5.0, array_y_init : exact_soln_y(x_start), 1 + 0 glob_look_poles : true, glob_max_iter : 1000000, glob_display_interval : 0.1, glob_max_minutes : 10, glob_desired_digits_correct : 10, glob_display_interval : 0.001, glob_look_poles : true, glob_max_iter : 10000000, glob_max_minutes : 3, glob_subiter_method : 3, glob_last_good_h : glob_h, glob_max_terms : max_terms, glob_max_sec : convfloat(3600.0) convfloat(glob_max_hours) + convfloat(60.0) convfloat(glob_max_minutes), if glob_h > 0.0 then (glob_neg_h : false, glob_display_interval : omniabs(glob_display_interval)) else (glob_neg_h : true, glob_display_interval : - omniabs(glob_display_interval)), chk_data(), array_y_set_initial : true, 1, 1 array_y_set_initial : false, array_y_set_initial : false, 1, 2 1, 3 array_y_set_initial : false, array_y_set_initial : false, 1, 4 1, 5 array_y_set_initial : false, array_y_set_initial : false, 1, 6 1, 7 array_y_set_initial : false, array_y_set_initial : false, 1, 8 1, 9 array_y_set_initial : false, array_y_set_initial : false, 1, 10 1, 11 array_y_set_initial : false, array_y_set_initial : false, 1, 12 1, 13 array_y_set_initial : false, array_y_set_initial : false, 1, 14 1, 15 array_y_set_initial : false, array_y_set_initial : false, 1, 16 1, 17 array_y_set_initial : false, array_y_set_initial : false, 1, 18 1, 19 array_y_set_initial : false, array_y_set_initial : false, 1, 20 1, 21 array_y_set_initial : false, array_y_set_initial : false, 1, 22 1, 23 array_y_set_initial : false, array_y_set_initial : false, 1, 24 1, 25 array_y_set_initial : false, array_y_set_initial : false, 1, 26 1, 27 array_y_set_initial : false, array_y_set_initial : false, 1, 28 1, 29 array_y_set_initial : false, omniout_str(ALWAYS, "START of Optimize"), 1, 30 glob_check_sign : check_sign(x_start, x_end), glob_h : check_sign(x_start, x_end), if glob_display_interval < glob_h then glob_h : glob_display_interval, if glob_max_h < glob_h then glob_h : glob_max_h, found_h : - 1.0, best_h : 0.0, min_value : glob_large_float, est_answer : est_size_answer(), opt_iter : 1, while (opt_iter <= 20) and (found_h < 0.0) do (omniout_int(ALWAYS, "opt_iter", 32, opt_iter, 4, ""), array_x : x_start, array_x : glob_h, 1 2 glob_next_display : x_start, order_diff : 1, term_no : 1, while term_no <= order_diff do (array_y : term_no array_y_init expt(glob_h, term_no - 1) term_no ---------------------------------------------, term_no : 1 + term_no), factorial_1(term_no - 1) rows : order_diff, r_order : 1, while r_order <= rows do (term_no : 1, while term_no <= 1 - r_order + rows do (it : - 1 + r_order + term_no, array_y_init expt(glob_h, term_no - 1) it array_y_higher : ----------------------------------------, r_order, term_no factorial_1(term_no - 1) term_no : 1 + term_no), r_order : 1 + r_order), atomall(), est_needed_step_err : estimated_needed_step_error(x_start, x_end, glob_h, est_answer), omniout_float(ALWAYS, "est_needed_step_err", 32, est_needed_step_err, 16, ""), value3 : test_suggested_h(), omniout_float(ALWAYS, "value3", 32, value3, 32, ""), if (value3 < est_needed_step_err) and (found_h < 0.0) then (best_h : glob_h, found_h : 1.0), omniout_float(ALWAYS, "best_h", 32, best_h, 32, ""), opt_iter : 1 + opt_iter, glob_h : glob_h 0.5), if found_h > 0.0 then glob_h : best_h else omniout_str(ALWAYS, "No increment to obtain desired accuracy found"), if glob_html_log then html_log_file : openw("html/entry.html"), if found_h > 0.0 then (omniout_str(ALWAYS, "START of Soultion"), array_x : x_start, array_x : glob_h, glob_next_display : x_start, 1 2 order_diff : 1, term_no : 1, while term_no <= order_diff do (array_y : (array_y_init expt(glob_h, term_no - 1)) term_no term_no /factorial_1(term_no - 1), term_no : 1 + term_no), rows : order_diff, r_order : 1, while r_order <= rows do (term_no : 1, while term_no <= 1 - r_order + rows do (it : - 1 + r_order + term_no, array_y_init expt(glob_h, term_no - 1) it array_y_higher : ----------------------------------------, r_order, term_no factorial_1(term_no - 1) term_no : 1 + term_no), r_order : 1 + r_order), current_iter : 1, glob_clock_start_sec : elapsed_time_seconds(), glob_clock_sec : elapsed_time_seconds(), glob_current_iter : 0, glob_iter : 0, omniout_str(DEBUGL, " "), glob_reached_optimal_h : true, glob_optimal_clock_start_sec : elapsed_time_seconds(), while (glob_current_iter < glob_max_iter) and (glob_check_sign array_x < glob_check_sign x_end) 1 and (convfloat(glob_clock_sec) - convfloat(glob_orig_start_sec) < convfloat(glob_max_sec)) do (if reached_interval () then (omniout_str(INFO, " "), omniout_str(INFO, "TOP MAIN SOLVE Loop")), glob_iter : 1 + glob_iter, glob_clock_sec : elapsed_time_seconds(), glob_current_iter : 1 + glob_current_iter, atomall(), display_alot(current_iter), if glob_look_poles then check_for_pole(), if reached_interval() then glob_next_display : glob_display_interval + glob_next_display, array_x : glob_h + array_x , 1 1 array_x : glob_h, order_diff : 2, ord : 2, calc_term : 1, 2 iii : glob_max_terms, while iii >= calc_term do (array_y_higher_work : 2, iii array_y_higher 2, iii --------------------------- expt(glob_h, calc_term - 1) -------------------------------------, iii : iii - 1), temp_sum : 0.0, factorial_3(iii - calc_term, iii - 1) ord : 2, calc_term : 1, iii : glob_max_terms, while iii >= calc_term do (temp_sum : array_y_higher_work + temp_sum, ord, iii iii : iii - 1), array_y_higher_work2 : ord, calc_term temp_sum expt(glob_h, calc_term - 1) ------------------------------------, ord : 1, calc_term : 2, factorial_1(calc_term - 1) iii : glob_max_terms, while iii >= calc_term do (array_y_higher_work : 1, iii array_y_higher 1, iii --------------------------- expt(glob_h, calc_term - 1) -------------------------------------, iii : iii - 1), temp_sum : 0.0, factorial_3(iii - calc_term, iii - 1) ord : 1, calc_term : 2, iii : glob_max_terms, while iii >= calc_term do (temp_sum : array_y_higher_work + temp_sum, ord, iii iii : iii - 1), array_y_higher_work2 : ord, calc_term temp_sum expt(glob_h, calc_term - 1) ------------------------------------, ord : 1, calc_term : 1, factorial_1(calc_term - 1) iii : glob_max_terms, while iii >= calc_term do (array_y_higher_work : 1, iii array_y_higher 1, iii --------------------------- expt(glob_h, calc_term - 1) -------------------------------------, iii : iii - 1), temp_sum : 0.0, factorial_3(iii - calc_term, iii - 1) ord : 1, calc_term : 1, iii : glob_max_terms, while iii >= calc_term do (temp_sum : array_y_higher_work + temp_sum, ord, iii iii : iii - 1), array_y_higher_work2 : ord, calc_term temp_sum expt(glob_h, calc_term - 1) ------------------------------------, term_no : glob_max_terms, factorial_1(calc_term - 1) while term_no >= 1 do (array_y : array_y_higher_work2 , term_no 1, term_no ord : 1, while ord <= order_diff do (array_y_higher : ord, term_no array_y_higher_work2 , ord : 1 + ord), term_no : term_no - 1)), ord, term_no omniout_str(ALWAYS, "Finished!"), if glob_iter >= glob_max_iter then omniout_str(ALWAYS, "Maximum Iterations Reached before Solution Completed!"), if elapsed_time_seconds() - convfloat(glob_orig_start_sec) >= convfloat(glob_max_sec) then omniout_str(ALWAYS, "Maximum Time Reached before Solution Completed!"), glob_clock_sec : elapsed_time_seconds(), omniout_str(INFO, "diff ( y , x , 1 ) = 2.0 / exp(x);"), omniout_int(INFO, "Iterations ", 32, glob_iter, 4, " "), prog_report(x_start, x_end), if glob_html_log then (logstart(html_log_file), logitem_str(html_log_file, "2013-01-28T12:56:30-06:00"), logitem_str(html_log_file, "Maxima"), logitem_str(html_log_file, "div_c_exp"), logitem_str(html_log_file, "diff ( y , x , 1 ) = 2.0 / exp(x);"), logitem_float(html_log_file, x_start), logitem_float(html_log_file, x_end), logitem_float(html_log_file, array_x ), logitem_float(html_log_file, glob_h), 1 logitem_str(html_log_file, "16"), logitem_good_digits(html_log_file, array_last_rel_error ), logitem_integer(html_log_file, glob_max_terms), 1 logitem_float(html_log_file, array_1st_rel_error ), 1 logitem_float(html_log_file, array_last_rel_error ), 1 logitem_integer(html_log_file, glob_iter), logitem_pole(html_log_file, array_type_pole ), 1 if (array_type_pole = 1) or (array_type_pole = 2) 1 1 then (logitem_float(html_log_file, array_pole ), 1 logitem_float(html_log_file, array_pole ), 0) 2 else (logitem_str(html_log_file, "NA"), logitem_str(html_log_file, "NA"), 0), logitem_time(html_log_file, convfloat(glob_clock_sec)), if glob_percent_done < 100.0 then (logitem_time(html_log_file, convfloat(glob_total_exp_sec)), 0) else (logitem_str(html_log_file, "Done"), 0), log_revs(html_log_file, " 165 "), logitem_str(html_log_file, "div_c_exp diffeq.max"), logitem_str(html_log_file, "div_c_exp maxima results"), logitem_str(html_log_file, "All Tests - All Languages"), logend(html_log_file)), if glob_html_log then close(html_log_file))) (%i58) main() "##############ECHO OF PROBLEM#################" "##############temp/div_c_exppostode.ode#################" "diff ( y , x , 1 ) = 2.0 / exp(x);" "!" "/* BEGIN FIRST INPUT BLOCK */" "Digits:32," "max_terms:30," "!" "/* END FIRST INPUT BLOCK */" "/* BEGIN SECOND INPUT BLOCK */" "x_start:1.0," "/* # did poorly with x_start := -5.0; */" "x_end:5.0," "array_y_init[0 + 1] : exact_soln_y(x_start)," "glob_look_poles:true," "glob_max_iter:1000000," "glob_display_interval:0.1," "glob_max_minutes:10," "/* END SECOND INPUT BLOCK */" "/* BEGIN OVERRIDE BLOCK */" "glob_desired_digits_correct:10," "glob_display_interval:0.001," "glob_look_poles:true," "glob_max_iter:10000000," "glob_max_minutes:3," "glob_subiter_method:3," "/* END OVERRIDE BLOCK */" "!" "/* BEGIN USER DEF BLOCK */" "exact_soln_y (x) := (block(" " (- 2.0/exp(x)) " "));" "/* END USER DEF BLOCK */" "#######END OF ECHO OF PROBLEM#################" "START of Optimize" min_size = 0.0 "" min_size = 1. "" opt_iter = 1 glob_desired_digits_correct = 10. "" desired_abs_gbl_error = 1.0000000000E-10 "" range = 4. "" estimated_steps = 4000. "" step_error = 2.500000000000000E-14 "" est_needed_step_err = 2.500000000000000E-14 "" hn_div_ho = 0.5 "" hn_div_ho_2 = 0.25 "" hn_div_ho_3 = 0.125 "" value3 = 1.824362198784131000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000E-105 "" max_value3 = 1.824362198784131000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000E-105 "" value3 = 1.824362198784131000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000E-105 "" best_h = 1.000E-3 "" "START of Soultion" " " "TOP MAIN SOLVE Loop" x[1] = 1. " " y[1] (analytic) = -0.7357588823428847 " " y[1] (numeric) = -0.7357588823428847 " " absolute error = 0.0 " " relative error = 0.0 "%" Correct digits = 16 h = 1.000E-3 " " "NO POLE for equation 1" " " "TOP MAIN SOLVE Loop" x[1] = 1.001 " " y[1] (analytic) = -0.7350234912173872 " " y[1] (numeric) = -0.7350234912173871 " " absolute error = 1.11022302462515650000000000000000E-16 " " relative error = 1.510459240950711400000000000000E-14 "%" Correct digits = 16 h = 1.000E-3 " " "NO POLE for equation 1" " " "TOP MAIN SOLVE Loop" x[1] = 1.0019999999999998 " " y[1] (analytic) = -0.7342888351154422 " " y[1] (numeric) = -0.734288835115442 " " absolute error = 2.2204460492503130000000000000000E-16 " " relative error = 3.023940911346177400000000000000E-14 "%" Correct digits = 16 h = 1.000E-3 " " "Complex estimate of poles used for equation 1" Radius of convergence = 2099.2016788883216 " " Order of pole = 279543.39764523105 " " " " "TOP MAIN SOLVE Loop" x[1] = 1.0029999999999997 " " y[1] (analytic) = -0.7335549133023934 " " y[1] (numeric) = -0.7335549133023932 " " absolute error = 2.2204460492503130000000000000000E-16 " " relative error = 3.026966364732095500000000000000E-14 "%" Correct digits = 16 h = 1.000E-3 " " "NO POLE for equation 1" " " "TOP MAIN SOLVE Loop" x[1] = 1.0039999999999996 " " y[1] (analytic) = -0.7328217250443192 " " y[1] (numeric) = -0.7328217250443189 " " absolute error = 3.33066907387546960000000000000000E-16 " " relative error = 4.544992267626944400000000000000E-14 "%" Correct digits = 16 h = 1.000E-3 " " "NO POLE for equation 1" " " "TOP MAIN SOLVE Loop" x[1] = 1.0049999999999994 " " y[1] (analytic) = -0.7320892696080311 " " y[1] (numeric) = -0.7320892696080307 " " absolute error = 4.4408920985006260000000000000000E-16 " " relative error = 6.06605271086452300000000000000E-14 "%" Correct digits = 16 h = 1.000E-3 " " "NO POLE for equation 1" " " "TOP MAIN SOLVE Loop" x[1] = 1.0059999999999993 " " y[1] (analytic) = -0.7313575462610736 " " y[1] (numeric) = -0.7313575462610731 " " absolute error = 5.5511151231257830000000000000000E-16 " " relative error = 7.59015224701625500000000000000E-14 "%" Correct digits = 16 h = 1.000E-3 " " "Complex estimate of poles used for equation 1" Radius of convergence = 4399.595330549862 " " Order of pole = 867041.9188411131 " " " " "TOP MAIN SOLVE Loop" x[1] = 1.0069999999999992 " " y[1] (analytic) = -0.7306265542717232 " " y[1] (numeric) = -0.7306265542717226 " " absolute error = 5.5511151231257830000000000000000E-16 " " relative error = 7.59774619560473700000000000000E-14 "%" Correct digits = 16 h = 1.000E-3 " " "NO POLE for equation 1" " " "TOP MAIN SOLVE Loop" x[1] = 1.0079999999999991 " " y[1] (analytic) = -0.729896292908988 " " y[1] (numeric) = -0.7298962929089874 " " absolute error = 6.6613381477509390000000000000000E-16 " " relative error = 9.12641729032805500000000000000E-14 "%" Correct digits = 16 h = 1.000E-3 " " "NO POLE for equation 1" " " "TOP MAIN SOLVE Loop" x[1] = 1.008999999999999 " " y[1] (analytic) = -0.7291667614426066 " " y[1] (numeric) = -0.7291667614426058 " " absolute error = 7.7715611723760960000000000000000E-16 " " relative error = 1.06581396510732240000000000000E-13 "%" Correct digits = 15 h = 1.000E-3 " " "NO POLE for equation 1" " " "TOP MAIN SOLVE Loop" x[1] = 1.009999999999999 " " y[1] (analytic) = -0.7284379591430474 " " y[1] (numeric) = -0.7284379591430465 " " absolute error = 8.8817841970012520000000000000000E-16 " " relative error = 1.2192917853223910000000000000E-13 "%" Correct digits = 15 h = 1.000E-3 " " "NO POLE for equation 1" " " "TOP MAIN SOLVE Loop" x[1] = 1.0109999999999988 " " y[1] (analytic) = -0.727709885281508 " " y[1] (numeric) = -0.727709885281507 " " absolute error = 9.9920072216264090000000000000000E-16 " " relative error = 1.3730756478264810000000000000E-13 "%" Correct digits = 15 h = 1.000E-3 " " "NO POLE for equation 1" " " "TOP MAIN SOLVE Loop" x[1] = 1.0119999999999987 " " y[1] (analytic) = -0.7269825391299146 " " y[1] (numeric) = -0.7269825391299135 " " absolute error = 1.1102230246251565000000000000000E-15 " " relative error = 1.52716601137892700000000000000E-13 "%" Correct digits = 15 h = 1.000E-3 " " "NO POLE for equation 1" " " "TOP MAIN SOLVE Loop" x[1] = 1.0129999999999986 " " y[1] (analytic) = -0.7262559199609209 " " y[1] (numeric) = -0.7262559199609196 " " absolute error = 1.2212453270876722000000000000000E-15 " " relative error = 1.68156333535069300000000000000E-13 "%" Correct digits = 15 h = 1.000E-3 " " "NO POLE for equation 1" " " "TOP MAIN SOLVE Loop" x[1] = 1.0139999999999985 " " y[1] (analytic) = -0.7255300270479076 " " y[1] (numeric) = -0.7255300270479063 " " absolute error = 1.3322676295501878000000000000000E-15 " " relative error = 1.83626807972513680000000000000E-13 "%" Correct digits = 15 h = 1.000E-3 " " "Complex estimate of poles used for equation 1" Radius of convergence = 2851.9364005336865 " " Order of pole = 446849.25591966446 " " " " "TOP MAIN SOLVE Loop" x[1] = 1.0149999999999983 " " y[1] (analytic) = -0.7248048596649819 " " y[1] (numeric) = -0.7248048596649804 " " absolute error = 1.4432899320127035000000000000000E-15 " " relative error = 1.99128070509877460000000000000E-13 "%" Correct digits = 15 h = 1.000E-3 " " "NO POLE for equation 1" " " "TOP MAIN SOLVE Loop" x[1] = 1.0159999999999982 " " y[1] (analytic) = -0.7240804170869761 " " y[1] (numeric) = -0.7240804170869747 " " absolute error = 1.4432899320127035000000000000000E-15 " " relative error = 1.9932729817761890000000000000E-13 "%" Correct digits = 15 h = 1.000E-3 " " "Complex estimate of poles used for equation 1" Radius of convergence = 1575.1684036939475 " " Order of pole = 101396.45371153927 " " " " "TOP MAIN SOLVE Loop" x[1] = 1.0169999999999981 " " y[1] (analytic) = -0.7233566985894478 " " y[1] (numeric) = -0.7233566985894463 " " absolute error = 1.5543122344752192000000000000000E-15 " " relative error = 2.14874934801342430000000000000E-13 "%" Correct digits = 15 h = 1.000E-3 " " "Complex estimate of poles used for equation 1" Radius of convergence = 3594.8808713706862 " " Order of pole = 556768.1495300446 " " " " "TOP MAIN SOLVE Loop" x[1] = 1.017999999999998 " " y[1] (analytic) = -0.7226337034486786 " " y[1] (numeric) = -0.7226337034486768 " " absolute error = 1.7763568394002505000000000000000E-15 " " relative error = 2.4581704823935150000000000000E-13 "%" Correct digits = 15 h = 1.000E-3 " " "Complex estimate of poles used for equation 1" Radius of convergence = 2235.4836252652594 " " Order of pole = 336670.8248976134 " " " " "TOP MAIN SOLVE Loop" x[1] = 1.018999999999998 " " y[1] (analytic) = -0.7219114309416729 " " y[1] (numeric) = -0.721911430941671 " " absolute error = 1.887379141862766000000000000000E-15 " " relative error = 2.6144192500191310000000000000E-13 "%" Correct digits = 15 h = 1.000E-3 " " "Complex estimate of poles used for equation 1" Radius of convergence = 2271.9530462835096 " " Order of pole = 421700.6578740735 " " " " "TOP MAIN SOLVE Loop" x[1] = 1.0199999999999978 " " y[1] (analytic) = -0.7211898803461582 " " y[1] (numeric) = -0.7211898803461563 " " absolute error = 1.887379141862766000000000000000E-15 " " relative error = 2.6170349769146206000000000000E-13 "%" Correct digits = 15 h = 1.000E-3 " " "NO POLE for equation 1" " " "TOP MAIN SOLVE Loop" x[1] = 1.0209999999999977 " " y[1] (analytic) = -0.720469050940584 " " y[1] (numeric) = -0.720469050940582 " " absolute error = 1.9984014443252818000000000000000E-15 " " relative error = 2.7737505750126756000000000000E-13 "%" Correct digits = 15 h = 1.000E-3 " " "NO POLE for equation 1" " " "TOP MAIN SOLVE Loop" x[1] = 1.0219999999999976 " " y[1] (analytic) = -0.7197489420041209 " " y[1] (numeric) = -0.7197489420041188 " " absolute error = 2.1094237467877974000000000000000E-15 " " relative error = 2.93077714142123750000000000000E-13 "%" Correct digits = 15 h = 1.000E-3 " " "Complex estimate of poles used for equation 1" Radius of convergence = 1731.6017407484949 " " Order of pole = 167107.11906475763 " " " " "TOP MAIN SOLVE Loop" x[1] = 1.0229999999999975 " " y[1] (analytic) = -0.7190295528166596 " " y[1] (numeric) = -0.7190295528166575 " " absolute error = 2.1094237467877974000000000000000E-15 " " relative error = 2.93370938443981430000000000000E-13 "%" Correct digits = 15 h = 1.000E-3 " " "NO POLE for equation 1" " " "TOP MAIN SOLVE Loop" x[1] = 1.0239999999999974 " " y[1] (analytic) = -0.7183108826588112 " " y[1] (numeric) = -0.7183108826588089 " " absolute error = 2.220446049250313000000000000000E-15 " " relative error = 3.09120480122949400000000000000E-13 "%" Correct digits = 15 h = 1.000E-3 " " "Complex estimate of poles used for equation 1" Radius of convergence = 2106.842465048108 " " Order of pole = 218351.7628513327 " " " " "TOP MAIN SOLVE Loop" x[1] = 1.0249999999999972 " " y[1] (analytic) = -0.7175929308119051 " " y[1] (numeric) = -0.7175929308119029 " " absolute error = 2.220446049250313000000000000000E-15 " " relative error = 3.09429755214845450000000000000E-13 "%" Correct digits = 15 h = 1.000E-3 " " "NO POLE for equation 1" " " "TOP MAIN SOLVE Loop" x[1] = 1.0259999999999971 " " y[1] (analytic) = -0.7168756965579899 " " y[1] (numeric) = -0.7168756965579874 " " absolute error = 2.4424906541753444000000000000000E-15 " " relative error = 3.40713273710174570000000000000E-13 "%" Correct digits = 15 h = 1.000E-3 " " "Complex estimate of poles used for equation 1" Radius of convergence = 2657.8639797966016 " " Order of pole = 384014.9832641492 " " " " "TOP MAIN SOLVE Loop" x[1] = 1.026999999999997 " " y[1] (analytic) = -0.7161591791798307 " " y[1] (numeric) = -0.7161591791798283 " " absolute error = 2.4424906541753444000000000000000E-15 " " relative error = 3.41054157397321370000000000000E-13 "%" Correct digits = 15 h = 1.000E-3 " " "Complex estimate of poles used for equation 1" Radius of convergence = 2247.1796418864383 " " Order of pole = 308769.0550752961 " " " " "TOP MAIN SOLVE Loop" x[1] = 1.027999999999997 " " y[1] (analytic) = -0.7154433779609105 " " y[1] (numeric) = -0.7154433779609081 " " absolute error = 2.4424906541753444000000000000000E-15 " " relative error = 3.4139538213865390000000000000E-13 "%" Correct digits = 15 h = 1.000E-3 " " "NO POLE for equation 1" " " "TOP MAIN SOLVE Loop" x[1] = 1.0289999999999968 " " y[1] (analytic) = -0.7147282921854279 " " y[1] (numeric) = -0.7147282921854253 " " absolute error = 2.55351295663786000000000000000E-15 " " relative error = 3.57270445924278700000000000000E-13 "%" Correct digits = 15 h = 1.000E-3 " " "Complex estimate of poles used for equation 1" Radius of convergence = 1365.795007812504 " " Order of pole = 170435.3260668819 " " " " "TOP MAIN SOLVE Loop" x[1] = 1.0299999999999967 " " y[1] (analytic) = -0.7140139211382971 " " y[1] (numeric) = -0.7140139211382944 " " absolute error = 2.6645352591003757000000000000000E-15 " " relative error = 3.73176933980854830000000000000E-13 "%" Correct digits = 15 h = 1.000E-3 " " "NO POLE for equation 1" " " "TOP MAIN SOLVE Loop" x[1] = 1.0309999999999966 " " y[1] (analytic) = -0.7133002641051469 " " y[1] (numeric) = -0.7133002641051441 " " absolute error = 2.7755575615628914000000000000000E-15 " " relative error = 3.89114893297410700000000000000E-13 "%" Correct digits = 15 h = 1.000E-3 " " "NO POLE for equation 1" " " "TOP MAIN SOLVE Loop" x[1] = 1.0319999999999965 " " y[1] (analytic) = -0.7125873203723202 " " y[1] (numeric) = -0.7125873203723174 " " absolute error = 2.7755575615628914000000000000000E-15 " " relative error = 3.89504202813023450000000000000E-13 "%" Correct digits = 15 h = 1.000E-3 " " "Complex estimate of poles used for equation 1" Radius of convergence = 2078.3388925675486 " " Order of pole = 345735.6998725424 " " " " "TOP MAIN SOLVE Loop" x[1] = 1.0329999999999964 " " y[1] (analytic) = -0.7118750892268733 " " y[1] (numeric) = -0.7118750892268704 " " absolute error = 2.886579864025407000000000000000E-15 " " relative error = 4.0548965790618630000000000000E-13 "%" Correct digits = 15 h = 1.000E-3 " " "Complex estimate of poles used for equation 1" Radius of convergence = 1851.8797712182422 " " Order of pole = 223600.2643715238 " " " " "TOP MAIN SOLVE Loop" x[1] = 1.0339999999999963 " " y[1] (analytic) = -0.7111635699565749 " " y[1] (numeric) = -0.7111635699565719 " " absolute error = 2.9976021664879227000000000000000E-15 " " relative error = 4.21506710006386070000000000000E-13 "%" Correct digits = 15 h = 1.000E-3 " " "Complex estimate of poles used for equation 1" Radius of convergence = 35811.8639396843 " " Order of pole = 77142068.17339122 " " " " "TOP MAIN SOLVE Loop" x[1] = 1.0349999999999961 " " y[1] (analytic) = -0.7104527618499058 " " y[1] (numeric) = -0.7104527618499027 " " absolute error = 3.1086244689504383000000000000000E-15 " " relative error = 4.3755540633779444000000000000E-13 "%" Correct digits = 15 h = 1.000E-3 " " "NO POLE for equation 1" " " "TOP MAIN SOLVE Loop" x[1] = 1.035999999999996 " " y[1] (analytic) = -0.7097426641960577 " " y[1] (numeric) = -0.7097426641960545 " " absolute error = 3.219646771412954000000000000000E-15 " " relative error = 4.53635794187450150000000000000E-13 "%" Correct digits = 15 h = 1.000E-3 " " "NO POLE for equation 1" " " "TOP MAIN SOLVE Loop" x[1] = 1.036999999999996 " " y[1] (analytic) = -0.7090332762849328 " " y[1] (numeric) = -0.7090332762849296 " " absolute error = 3.219646771412954000000000000000E-15 " " relative error = 4.5408965687515960000000000000E-13 "%" Correct digits = 15 h = 1.000E-3 " " "NO POLE for equation 1" " " "TOP MAIN SOLVE Loop" x[1] = 1.0379999999999958 " " y[1] (analytic) = -0.7083245974071436 " " y[1] (numeric) = -0.7083245974071402 " " absolute error = 3.4416913763379850000000000000000E-15 " " relative error = 4.8589183390446450000000000000E-13 "%" Correct digits = 15 h = 1.000E-3 " " "NO POLE for equation 1" " " "TOP MAIN SOLVE Loop" x[1] = 1.0389999999999957 " " y[1] (analytic) = -0.7076166268540106 " " y[1] (numeric) = -0.7076166268540072 " " absolute error = 3.4416913763379850000000000000000E-15 " " relative error = 4.8637796876528810000000000000E-13 "%" Correct digits = 15 h = 1.000E-3 " " "Complex estimate of poles used for equation 1" Radius of convergence = 1656.0242928424905 " " Order of pole = 122638.51705119033 " " " " "TOP MAIN SOLVE Loop" x[1] = 1.0399999999999956 " " y[1] (analytic) = -0.7069093639175634 " " y[1] (numeric) = -0.70690936391756 " " absolute error = 3.4416913763379850000000000000000E-15 " " relative error = 4.868645900041210000000000000E-13 "%" Correct digits = 15 h = 1.000E-3 " " "NO POLE for equation 1" " " "TOP MAIN SOLVE Loop" x[1] = 1.0409999999999955 " " y[1] (analytic) = -0.7062028078905391 " " y[1] (numeric) = -0.7062028078905356 " " absolute error = 3.552713678800501000000000000000E-15 " " relative error = 5.030727206271840000000000000E-13 "%" Correct digits = 15 h = 1.000E-3 " " "Complex estimate of poles used for equation 1" Radius of convergence = 2103.4126148905225 " " Order of pole = 375040.3853480368 " " " " "TOP MAIN SOLVE Loop" x[1] = 1.0419999999999954 " " y[1] (analytic) = -0.7054969580663815 " " y[1] (numeric) = -0.7054969580663779 " " absolute error = 3.552713678800501000000000000000E-15 " " relative error = 5.035760449680380000000000000E-13 "%" Correct digits = 15 h = 1.000E-3 " " "Complex estimate of poles used for equation 1" Radius of convergence = 21569.48067395743 " " Order of pole = 26361289.57987145 " " " " "TOP MAIN SOLVE Loop" x[1] = 1.0429999999999953 " " y[1] (analytic) = -0.7047918137392408 " " y[1] (numeric) = -0.7047918137392372 " " absolute error = 3.6637359812630166000000000000000E-15 " " relative error = 5.1983236891263430000000000000E-13 "%" Correct digits = 15 h = 1.000E-3 " " "Complex estimate of poles used for equation 1" Radius of convergence = 1998.8408053831338 " " Order of pole = 220641.86241878173 " " " " "TOP MAIN SOLVE Loop" x[1] = 1.0439999999999952 " " y[1] (analytic) = -0.7040873742039726 " " y[1] (numeric) = -0.7040873742039688 " " absolute error = 3.774758283725532000000000000000E-15 " " relative error = 5.361207176869490000000000000E-13 "%" Correct digits = 15 h = 1.000E-3 " " "NO POLE for equation 1" " " "TOP MAIN SOLVE Loop" x[1] = 1.044999999999995 " " y[1] (analytic) = -0.7033836387561373 " " y[1] (numeric) = -0.7033836387561334 " " absolute error = 3.885780586188048000000000000000E-15 " " relative error = 5.5244113910008730000000000000E-13 "%" Correct digits = 15 h = 1.000E-3 " " "Complex estimate of poles used for equation 1" Radius of convergence = 2702.565683927423 " " Order of pole = 428406.23245177884 " " " " "TOP MAIN SOLVE Loop" x[1] = 1.045999999999995 " " y[1] (analytic) = -0.7026806066919992 " " y[1] (numeric) = -0.7026806066919954 " " absolute error = 3.774758283725532000000000000000E-15 " " relative error = 5.3719403207894330000000000000E-13 "%" Correct digits = 15 h = 1.000E-3 " " "NO POLE for equation 1" " " "TOP MAIN SOLVE Loop" x[1] = 1.0469999999999948 " " y[1] (analytic) = -0.7019782773085266 " " y[1] (numeric) = -0.7019782773085226 " " absolute error = 3.9968028886505635000000000000000E-15 " " relative error = 5.6936275919745140000000000000E-13 "%" Correct digits = 15 h = 1.000E-3 " " "NO POLE for equation 1" " " "TOP MAIN SOLVE Loop" x[1] = 1.0479999999999947 " " y[1] (analytic) = -0.7012766499033897 " " y[1] (numeric) = -0.7012766499033856 " " absolute error = 4.107825191113079000000000000000E-15 " " relative error = 5.8576386247552770000000000000E-13 "%" Correct digits = 15 h = 1.000E-3 " " "NO POLE for equation 1" " " "TOP MAIN SOLVE Loop" x[1] = 1.0489999999999946 " " y[1] (analytic) = -0.700575723774961 " " y[1] (numeric) = -0.7005757237749569 " " absolute error = 4.107825191113079000000000000000E-15 " " relative error = 5.8634991931758620000000000000E-13 "%" Correct digits = 15 h = 1.000E-3 " " "Complex estimate of poles used for equation 1" Radius of convergence = 2393.5784333772867 " " Order of pole = 316099.7608422761 " " " " "TOP MAIN SOLVE Loop" x[1] = 1.0499999999999945 " " y[1] (analytic) = -0.6998754982223147 " " y[1] (numeric) = -0.6998754982223104 " " absolute error = 4.218847493575595000000000000000E-15 " " relative error = 6.0279971284771040000000000000E-13 "%" Correct digits = 15 h = 1.000E-3 " " "Complex estimate of poles used for equation 1" Radius of convergence = 1536.5356495176243 " " Order of pole = 196138.43840944592 " " " " "TOP MAIN SOLVE Loop" x[1] = 1.0509999999999944 " " y[1] (analytic) = -0.6991759725452247 " " y[1] (numeric) = -0.6991759725452205 " " absolute error = 4.218847493575595000000000000000E-15 " " relative error = 6.0340281406090620000000000000E-13 "%" Correct digits = 15 h = 1.000E-3 " " "NO POLE for equation 1" " " "TOP MAIN SOLVE Loop" x[1] = 1.0519999999999943 " " y[1] (analytic) = -0.6984771460441657 " " y[1] (numeric) = -0.6984771460441613 " " absolute error = 4.3298697960381105000000000000000E-15 " " relative error = 6.1990142706320230000000000000E-13 "%" Correct digits = 15 h = 1.000E-3 " " "NO POLE for equation 1" " " "TOP MAIN SOLVE Loop" x[1] = 1.0529999999999942 " " y[1] (analytic) = -0.6977790180203107 " " y[1] (numeric) = -0.6977790180203064 " " absolute error = 4.3298697960381105000000000000000E-15 " " relative error = 6.2052163854432170000000000000E-13 "%" Correct digits = 15 h = 1.000E-3 " " "NO POLE for equation 1" " " "TOP MAIN SOLVE Loop" x[1] = 1.053999999999994 " " y[1] (analytic) = -0.6970815877755321 " " y[1] (numeric) = -0.6970815877755276 " " absolute error = 4.440892098500626000000000000000E-15 " " relative error = 6.3706920056116050000000000000E-13 "%" Correct digits = 15 h = 1.000E-3 " " "Complex estimate of poles used for equation 1" Radius of convergence = 1416.4355575220109 " " Order of pole = 31833.11262110547 " " " " "TOP MAIN SOLVE Loop" x[1] = 1.054999999999994 " " y[1] (analytic) = -0.6963848546123993 " " y[1] (numeric) = -0.6963848546123947 " " absolute error = 4.551914400963142000000000000000E-15 " " relative error = 6.5364925311258970000000000000E-13 "%" Correct digits = 15 h = 1.000E-3 " " "NO POLE for equation 1" " " "TOP MAIN SOLVE Loop" x[1] = 1.0559999999999938 " " y[1] (analytic) = -0.6956888178341792 " " y[1] (numeric) = -0.6956888178341745 " " absolute error = 4.773959005888173000000000000000E-15 " " relative error = 6.8622045999682410000000000000E-13 "%" Correct digits = 15 h = 1.000E-3 " " "Complex estimate of poles used for equation 1" Radius of convergence = 3237.4126331937105 " " Order of pole = 670929.2114083942 " " " " "TOP MAIN SOLVE Loop" x[1] = 1.0569999999999937 " " y[1] (analytic) = -0.6949934767448348 " " y[1] (numeric) = -0.69499347674483 " " absolute error = 4.773959005888173000000000000000E-15 " " relative error = 6.8690702368144970000000000000E-13 "%" Correct digits = 15 h = 1.000E-3 " " "NO POLE for equation 1" " " "TOP MAIN SOLVE Loop" x[1] = 1.0579999999999936 " " y[1] (analytic) = -0.6942988306490252 " " y[1] (numeric) = -0.6942988306490203 " " absolute error = 4.884981308350689000000000000000E-15 " " relative error = 7.0358483879113630000000000000E-13 "%" Correct digits = 15 h = 1.000E-3 " " "NO POLE for equation 1" " " "TOP MAIN SOLVE Loop" x[1] = 1.0589999999999935 " " y[1] (analytic) = -0.693604878852104 " " y[1] (numeric) = -0.6936048788520991 " " absolute error = 4.884981308350689000000000000000E-15 " " relative error = 7.0428877553964030000000000000E-13 "%" Correct digits = 15 h = 1.000E-3 " " "Complex estimate of poles used for equation 1" Radius of convergence = 909.9227806363803 " " Order of pole = 121160.94030058177 " " " " "TOP MAIN SOLVE Loop" x[1] = 1.0599999999999934 " " y[1] (analytic) = -0.6929116206601195 " " y[1] (numeric) = -0.6929116206601145 " " absolute error = 4.9960036108132044000000000000000E-15 " " relative error = 7.2101599422645520000000000000E-13 "%" Correct digits = 15 h = 1.000E-3 " " "NO POLE for equation 1" " " "TOP MAIN SOLVE Loop" x[1] = 1.0609999999999933 " " y[1] (analytic) = -0.6922190553798134 " " y[1] (numeric) = -0.6922190553798083 " " absolute error = 5.10702591327572000000000000000E-15 " " relative error = 7.3777597908996420000000000000E-13 "%" Correct digits = 15 h = 1.000E-3 " " "Complex estimate of poles used for equation 1" Radius of convergence = 3537.364046671676 " " Order of pole = 752666.3708865304 " " " " "TOP MAIN SOLVE Loop" x[1] = 1.0619999999999932 " " y[1] (analytic) = -0.6915271823186203 " " y[1] (numeric) = -0.6915271823186152 " " absolute error = 5.10702591327572000000000000000E-15 " " relative error = 7.3851412408003710000000000000E-13 "%" Correct digits = 15 h = 1.000E-3 " " "NO POLE for equation 1" " " "TOP MAIN SOLVE Loop" x[1] = 1.062999999999993 " " y[1] (analytic) = -0.6908360007846672 " " y[1] (numeric) = -0.690836000784662 " " absolute error = 5.218048215738236000000000000000E-15 " " relative error = 7.5532372514047590000000000000E-13 "%" Correct digits = 15 h = 1.000E-3 " " "NO POLE for equation 1" " " "TOP MAIN SOLVE Loop" x[1] = 1.063999999999993 " " y[1] (analytic) = -0.6901455100867724 " " y[1] (numeric) = -0.6901455100867672 " " absolute error = 5.218048215738236000000000000000E-15 " " relative error = 7.5607942665339780000000000000E-13 "%" Correct digits = 15 h = 1.000E-3 " " "Complex estimate of poles used for equation 1" Radius of convergence = 3003.321212055137 " " Order of pole = 663427.015552173 " " " " "TOP MAIN SOLVE Loop" x[1] = 1.0649999999999928 " " y[1] (analytic) = -0.6894557095344452 " " y[1] (numeric) = -0.6894557095344399 " " absolute error = 5.329070518200751000000000000000E-15 " " relative error = 7.7293877539997520000000000000E-13 "%" Correct digits = 15 h = 1.000E-3 " " "Complex estimate of poles used for equation 1" Radius of convergence = 2439.1818544752723 " " Order of pole = 814804.4542647124 " " " " "TOP MAIN SOLVE Loop" x[1] = 1.0659999999999927 " " y[1] (analytic) = -0.6887665984378851 " " y[1] (numeric) = -0.6887665984378797 " " absolute error = 5.440092820663267000000000000000E-15 " " relative error = 7.8983110287306850000000000000E-13 "%" Correct digits = 15 h = 1.000E-3 " " "NO POLE for equation 1" " " "TOP MAIN SOLVE Loop" x[1] = 1.0669999999999926 " " y[1] (analytic) = -0.6880781761079807 " " y[1] (numeric) = -0.6880781761079753 " " absolute error = 5.440092820663267000000000000000E-15 " " relative error = 7.9062132902316440000000000000E-13 "%" Correct digits = 15 h = 1.000E-3 " " "Complex estimate of poles used for equation 1" Radius of convergence = 1603.3815535109727 " " Order of pole = 160697.98638565175 " " " " "TOP MAIN SOLVE Loop" x[1] = 1.0679999999999925 " " y[1] (analytic) = -0.6873904418563099 " " y[1] (numeric) = -0.6873904418563043 " " absolute error = 5.662137425588298000000000000000E-15 " " relative error = 8.2371489052096760000000000000E-13 "%" Correct digits = 15 h = 1.000E-3 " " "Complex estimate of poles used for equation 1" Radius of convergence = 2428.0051357596144 " " Order of pole = 346261.61132824677 " " " " "TOP MAIN SOLVE Loop" x[1] = 1.0689999999999924 " " y[1] (analytic) = -0.6867033949951381 " " y[1] (numeric) = -0.6867033949951324 " " absolute error = 5.662137425588298000000000000000E-15 " " relative error = 8.245390174062539000000000000E-13 "%" Correct digits = 15 h = 1.000E-3 " " "NO POLE for equation 1" " " "TOP MAIN SOLVE Loop" x[1] = 1.0699999999999923 " " y[1] (analytic) = -0.6860170348374186 " " y[1] (numeric) = -0.6860170348374128 " " absolute error = 5.773159728050814000000000000000E-15 " " relative error = 8.4154757606259930000000000000E-13 "%" Correct digits = 15 h = 1.000E-3 " " "NO POLE for equation 1" " " "TOP MAIN SOLVE Loop" x[1] = 1.0709999999999922 " " y[1] (analytic) = -0.6853313606967911 " " y[1] (numeric) = -0.6853313606967852 " " absolute error = 5.88418203051333000000000000000E-15 " " relative error = 8.5858934348644940000000000000E-13 "%" Correct digits = 15 h = 1.000E-3 " " "Complex estimate of poles used for equation 1" Radius of convergence = 2382.6170073367584 " " Order of pole = 373571.0507085634 " " " " "TOP MAIN SOLVE Loop" x[1] = 1.071999999999992 " " y[1] (analytic) = -0.6846463718875814 " " y[1] (numeric) = -0.6846463718875755 " " absolute error = 5.88418203051333000000000000000E-15 " " relative error = 8.5944836226774160000000000000E-13 "%" Correct digits = 15 h = 1.000E-3 " " "NO POLE for equation 1" " " "TOP MAIN SOLVE Loop" x[1] = 1.072999999999992 " " y[1] (analytic) = -0.6839620677248006 " " y[1] (numeric) = -0.6839620677247946 " " absolute error = 5.995204332975845000000000000000E-15 " " relative error = 8.76540471450250000000000000E-13 "%" Correct digits = 15 h = 1.000E-3 " " "NO POLE for equation 1" " " "TOP MAIN SOLVE Loop" x[1] = 1.0739999999999919 " " y[1] (analytic) = -0.6832784475241446 " " y[1] (numeric) = -0.6832784475241385 " " absolute error = 6.106226635438361000000000000000E-15 " " relative error = 8.9366592164061910000000000000E-13 "%" Correct digits = 15 h = 1.000E-3 " " "Complex estimate of poles used for equation 1" Radius of convergence = 2683.5716125857625 " " Order of pole = 246788.8523575571 " " " " "TOP MAIN SOLVE Loop" x[1] = 1.0749999999999917 " " y[1] (analytic) = -0.682595510601993 " " y[1] (numeric) = -0.6825955106019868 " " absolute error = 6.217248937900877000000000000000E-15 " " relative error = 9.1082476244500570000000000000E-13 "%" Correct digits = 15 h = 1.000E-3 " " "Complex estimate of poles used for equation 1" Radius of convergence = 998.6674865554304 " " Order of pole = 139717.19549643228 " " " " "TOP MAIN SOLVE Loop" x[1] = 1.0759999999999916 " " y[1] (analytic) = -0.6819132562754089 " " y[1] (numeric) = -0.6819132562754026 " " absolute error = 6.328271240363392000000000000000E-15 " " relative error = 9.2801704353545390000000000000E-13 "%" Correct digits = 15 h = 1.000E-3 " " "NO POLE for equation 1" " " "TOP MAIN SOLVE Loop" x[1] = 1.0769999999999915 " " y[1] (analytic) = -0.6812316838621378 " " y[1] (numeric) = -0.6812316838621315 " " absolute error = 6.328271240363392000000000000000E-15 " " relative error = 9.2894552474221910000000000000E-13 "%" Correct digits = 15 h = 1.000E-3 " " "NO POLE for equation 1" " " "TOP MAIN SOLVE Loop" x[1] = 1.0779999999999914 " " y[1] (analytic) = -0.6805507926806075 " " y[1] (numeric) = -0.680550792680601 " " absolute error = 6.439293542825908000000000000000E-15 " " relative error = 9.4618853024361440000000000000E-13 "%" Correct digits = 15 h = 1.000E-3 " " "NO POLE for equation 1" " " "TOP MAIN SOLVE Loop" x[1] = 1.0789999999999913 " " y[1] (analytic) = -0.6798705820499266 " " y[1] (numeric) = -0.67987058204992 " " absolute error = 6.5503158452884240000000000000000E-15 " " relative error = 9.6346510912975470000000000000E-13 "%" Correct digits = 15 h = 1.000E-3 " " "NO POLE for equation 1" " " "TOP MAIN SOLVE Loop" x[1] = 1.0799999999999912 " " y[1] (analytic) = -0.6791910512898842 " " y[1] (numeric) = -0.6791910512898777 " " absolute error = 6.5503158452884240000000000000000E-15 " " relative error = 9.6442905613205680000000000000E-13 "%" Correct digits = 15 h = 1.000E-3 " " "Complex estimate of poles used for equation 1" Radius of convergence = 2414.2019263636353 " " Order of pole = 191787.70828590626 " " " " "TOP MAIN SOLVE Loop" x[1] = 1.080999999999991 " " y[1] (analytic) = -0.6785121997209499 " " y[1] (numeric) = -0.6785121997209432 " " absolute error = 6.661338147750939000000000000000E-15 " " relative error = 9.8175657718321530000000000000E-13 "%" Correct digits = 15 h = 1.000E-3 " " "Complex estimate of poles used for equation 1" Radius of convergence = 1736.3864815333925 " " Order of pole = 147497.53949041202 " " " " "TOP MAIN SOLVE Loop" x[1] = 1.081999999999991 " " y[1] (analytic) = -0.6778340266642717 " " y[1] (numeric) = -0.6778340266642651 " " absolute error = 6.661338147750939000000000000000E-15 " " relative error = 9.8273882480235420000000000000E-13 "%" Correct digits = 15 h = 1.000E-3 " " "NO POLE for equation 1" " " "TOP MAIN SOLVE Loop" x[1] = 1.0829999999999909 " " y[1] (analytic) = -0.6771565314416769 " " y[1] (numeric) = -0.67715653144167 " " absolute error = 6.8833827526759700000000000000000E-15 " " relative error = 1.0165127903324127000000000000E-12 "%" Correct digits = 14 h = 1.000E-3 " " "NO POLE for equation 1" " " "TOP MAIN SOLVE Loop" x[1] = 1.0839999999999907 " " y[1] (analytic) = -0.6764797133756698 " " y[1] (numeric) = -0.6764797133756628 " " absolute error = 6.994405055138486000000000000000E-15 " " relative error = 1.033941582702611000000000000E-12 "%" Correct digits = 14 h = 1.000E-3 " " "NO POLE for equation 1" " " "TOP MAIN SOLVE Loop" x[1] = 1.0849999999999906 " " y[1] (analytic) = -0.6758035717894324 " " y[1] (numeric) = -0.6758035717894254 " " absolute error = 6.994405055138486000000000000000E-15 " " relative error = 1.0349760414284716000000000000E-12 "%" Correct digits = 14 h = 1.000E-3 " " "Complex estimate of poles used for equation 1" Radius of convergence = 5241.147163198914 " " Order of pole = 1777557.6770797616 " " " " "TOP MAIN SOLVE Loop" x[1] = 1.0859999999999905 " " y[1] (analytic) = -0.6751281060068232 " " y[1] (numeric) = -0.675128106006816 " " absolute error = 7.105427357601002000000000000000E-15 " " relative error = 1.052456162672213000000000000E-12 "%" Correct digits = 14 h = 1.000E-3 " " "Complex estimate of poles used for equation 1" Radius of convergence = 4242.031439249024 " " Order of pole = 1022180.8741571142 " " " " "TOP MAIN SOLVE Loop" x[1] = 1.0869999999999904 " " y[1] (analytic) = -0.6744533153523762 " " y[1] (numeric) = -0.674453315352369 " " absolute error = 7.216449660063518000000000000000E-15 " " relative error = 1.06997022563277000000000000E-12 "%" Correct digits = 14 h = 1.000E-3 " " "Complex estimate of poles used for equation 1" Radius of convergence = 1689.970133603019 " " Order of pole = 189340.26294626688 " " " " "TOP MAIN SOLVE Loop" x[1] = 1.0879999999999903 " " y[1] (analytic) = -0.6737791991513008 " " y[1] (numeric) = -0.6737791991512935 " " absolute error = 7.327471962526033000000000000000E-15 " " relative error = 1.0875182807299175000000000000E-12 "%" Correct digits = 14 h = 1.000E-3 " " "NO POLE for equation 1" " " "TOP MAIN SOLVE Loop" x[1] = 1.0889999999999902 " " y[1] (analytic) = -0.6731057567294806 " " y[1] (numeric) = -0.6731057567294733 " " absolute error = 7.327471962526033000000000000000E-15 " " relative error = 1.0886063429510862000000000000E-12 "%" Correct digits = 14 h = 1.000E-3 " " "NO POLE for equation 1" " " "TOP MAIN SOLVE Loop" x[1] = 1.08999999999999 " " y[1] (analytic) = -0.6724329874134733 " " y[1] (numeric) = -0.6724329874134659 " " absolute error = 7.438494264988549000000000000000E-15 " " relative error = 1.1062060315632138000000000000E-12 "%" Correct digits = 14 h = 1.000E-3 " " "NO POLE for equation 1" " " "TOP MAIN SOLVE Loop" x[1] = 1.09099999999999 " " y[1] (analytic) = -0.6717608905305095 " " y[1] (numeric) = -0.671760890530502 " " absolute error = 7.438494264988549000000000000000E-15 " " relative error = 1.1073127908822064000000000000E-12 "%" Correct digits = 14 h = 1.000E-3 " " "NO POLE for equation 1" " " "TOP MAIN SOLVE Loop" x[1] = 1.0919999999999899 " " y[1] (analytic) = -0.6710894654084922 " " y[1] (numeric) = -0.6710894654084846 " " absolute error = 7.66053886991358000000000000000E-15 " " relative error = 1.1415078413204727000000000000E-12 "%" Correct digits = 14 h = 1.000E-3 " " "NO POLE for equation 1" " " "TOP MAIN SOLVE Loop" x[1] = 1.0929999999999898 " " y[1] (analytic) = -0.6704187113759962 " " y[1] (numeric) = -0.6704187113759885 " " absolute error = 7.66053886991358000000000000000E-15 " " relative error = 1.1426499201060127000000000000E-12 "%" Correct digits = 14 h = 1.000E-3 " " "NO POLE for equation 1" " " "TOP MAIN SOLVE Loop" x[1] = 1.0939999999999896 " " y[1] (analytic) = -0.6697486277622675 " " y[1] (numeric) = -0.6697486277622597 " " absolute error = 7.771561172376096000000000000000E-15 " " relative error = 1.1603698537378224000000000000E-12 "%" Correct digits = 14 h = 1.000E-3 " " "NO POLE for equation 1" " " "TOP MAIN SOLVE Loop" x[1] = 1.0949999999999895 " " y[1] (analytic) = -0.6690792138972222 " " y[1] (numeric) = -0.6690792138972145 " " absolute error = 7.771561172376096000000000000000E-15 " " relative error = 1.1615308039699304000000000000E-12 "%" Correct digits = 14 h = 1.000E-3 " " "NO POLE for equation 1" " " "TOP MAIN SOLVE Loop" x[1] = 1.0959999999999894 " " y[1] (analytic) = -0.6684104691114467 " " y[1] (numeric) = -0.6684104691114389 " " absolute error = 7.882583474838611000000000000000E-15 " " relative error = 1.1793028145291237000000000000E-12 "%" Correct digits = 14 h = 1.000E-3 " " "Complex estimate of poles used for equation 1" Radius of convergence = 1881.139609872796 " " Order of pole = 219542.30868327 " " " " "TOP MAIN SOLVE Loop" x[1] = 1.0969999999999893 " " y[1] (analytic) = -0.667742392736196 " " y[1] (numeric) = -0.6677423927361881 " " absolute error = 7.882583474838611000000000000000E-15 " " relative error = 1.1804827071916599000000000000E-12 "%" Correct digits = 14 h = 1.000E-3 " " "NO POLE for equation 1" " " "TOP MAIN SOLVE Loop" x[1] = 1.0979999999999892 " " y[1] (analytic) = -0.6670749841033936 " " y[1] (numeric) = -0.6670749841033856 " " absolute error = 7.993605777301127000000000000000E-15 " " relative error = 1.1983069321727337000000000000E-12 "%" Correct digits = 14 h = 1.000E-3 " " "Complex estimate of poles used for equation 1" Radius of convergence = 2280.1478796343085 " " Order of pole = 393719.51476246794 " " " " "TOP MAIN SOLVE Loop" x[1] = 1.098999999999989 " " y[1] (analytic) = -0.666408242545631 " " y[1] (numeric) = -0.6664082425456229 " " absolute error = 8.104628079763643000000000000000E-15 " " relative error = 1.2161656417700588000000000000E-12 "%" Correct digits = 14 h = 1.000E-3 " " "NO POLE for equation 1" " " "TOP MAIN SOLVE Loop" x[1] = 1.099999999999989 " " y[1] (analytic) = -0.6657421673961664 " " y[1] (numeric) = -0.6657421673961583 " " absolute error = 8.104628079763643000000000000000E-15 " " relative error = 1.2173824156973946000000000000E-12 "%" Correct digits = 14 h = 1.000E-3 " " "Complex estimate of poles used for equation 1" Radius of convergence = 3491.93297049086 " " Order of pole = 741118.713475623 " " " " "TOP MAIN SOLVE Loop" x[1] = 1.1009999999999889 " " y[1] (analytic) = -0.6650767579889247 " " y[1] (numeric) = -0.6650767579889165 " " absolute error = 8.215650382226158000000000000000E-15 " " relative error = 1.2352935632676207000000000000E-12 "%" Correct digits = 14 h = 1.000E-3 " " "Complex estimate of poles used for equation 1" Radius of convergence = 2865.9858170736134 " " Order of pole = 433509.6609154053 " " " " "TOP MAIN SOLVE Loop" x[1] = 1.1019999999999888 " " y[1] (analytic) = -0.6644120136584966 " " y[1] (numeric) = -0.6644120136584881 " " absolute error = 8.43769498715119000000000000000E-15 " " relative error = 1.2699491902155927000000000000E-12 "%" Correct digits = 14 h = 1.000E-3 " " "NO POLE for equation 1" " " "TOP MAIN SOLVE Loop" x[1] = 1.1029999999999887 " " y[1] (analytic) = -0.6637479337401373 " " y[1] (numeric) = -0.6637479337401287 " " absolute error = 8.548717289613705000000000000000E-15 " " relative error = 1.2879463505735894000000000000E-12 "%" Correct digits = 14 h = 1.000E-3 " " "NO POLE for equation 1" " " "TOP MAIN SOLVE Loop" x[1] = 1.1039999999999885 " " y[1] (analytic) = -0.663084517569767 " " y[1] (numeric) = -0.6630845175697585 " " absolute error = 8.548717289613705000000000000000E-15 " " relative error = 1.2892349411120496000000000000E-12 "%" Correct digits = 14 h = 1.000E-3 " " "Complex estimate of poles used for equation 1" Radius of convergence = 1928.4624170758134 " " Order of pole = 181795.56126283656 " " " " "TOP MAIN SOLVE Loop" x[1] = 1.1049999999999884 " " y[1] (analytic) = -0.6624217644839697 " " y[1] (numeric) = -0.6624217644839611 " " absolute error = 8.659739592076221000000000000000E-15 " " relative error = 1.3072848834944617000000000000E-12 "%" Correct digits = 14 h = 1.000E-3 " " "Complex estimate of poles used for equation 1" Radius of convergence = 2304.151778156167 " " Order of pole = 291950.2802801536 " " " " "TOP MAIN SOLVE Loop" x[1] = 1.1059999999999883 " " y[1] (analytic) = -0.661759673819992 " " y[1] (numeric) = -0.6617596738199834 " " absolute error = 8.659739592076221000000000000000E-15 " " relative error = 1.3085928222383330000000000000E-12 "%" Correct digits = 14 h = 1.000E-3 " " "Complex estimate of poles used for equation 1" Radius of convergence = 12708.588202679925 " " Order of pole = 7657543.891977589 " " " " "TOP MAIN SOLVE Loop" x[1] = 1.1069999999999882 " " y[1] (analytic) = -0.6610982449157432 " " y[1] (numeric) = -0.6610982449157345 " " absolute error = 8.659739592076221000000000000000E-15 " " relative error = 1.309902069575136000000000000E-12 "%" Correct digits = 14 h = 1.000E-3 " " "Complex estimate of poles used for equation 1" Radius of convergence = 2021.1222952812818 " " Order of pole = 214974.55676697314 " " " " "TOP MAIN SOLVE Loop" x[1] = 1.107999999999988 " " y[1] (analytic) = -0.6604374771097946 " " y[1] (numeric) = -0.6604374771097857 " " absolute error = 8.881784197001252000000000000000E-15 " " relative error = 1.3448334633990944000000000000E-12 "%" Correct digits = 14 h = 1.000E-3 " " "NO POLE for equation 1" " " "TOP MAIN SOLVE Loop" x[1] = 1.108999999999988 " " y[1] (analytic) = -0.6597773697413779 " " y[1] (numeric) = -0.6597773697413691 " " absolute error = 8.770761894538737000000000000000E-15 " " relative error = 1.3293517323846277000000000000E-12 "%" Correct digits = 14 h = 1.000E-3 " " "Complex estimate of poles used for equation 1" Radius of convergence = 7701.716406454303 " " Order of pole = 3308841.166853843 " " " " "TOP MAIN SOLVE Loop" x[1] = 1.1099999999999879 " " y[1] (analytic) = -0.6591179221503861 " " y[1] (numeric) = -0.6591179221503772 " " absolute error = 8.881784197001252000000000000000E-15 " " relative error = 1.3475258217868274000000000000E-12 "%" Correct digits = 14 h = 1.000E-3 " " "NO POLE for equation 1" " " "TOP MAIN SOLVE Loop" x[1] = 1.1109999999999878 " " y[1] (analytic) = -0.6584591336773714 " " y[1] (numeric) = -0.6584591336773624 " " absolute error = 8.992806499463768000000000000000E-15 " " relative error = 1.3657349468661206000000000000E-12 "%" Correct digits = 14 h = 1.000E-3 " " "NO POLE for equation 1" " " "TOP MAIN SOLVE Loop" x[1] = 1.1119999999999877 " " y[1] (analytic) = -0.6578010036635451 " " y[1] (numeric) = -0.6578010036635361 " " absolute error = 8.992806499463768000000000000000E-15 " " relative error = 1.3671013649081398000000000000E-12 "%" Correct digits = 14 h = 1.000E-3 " " "NO POLE for equation 1" " " "TOP MAIN SOLVE Loop" x[1] = 1.1129999999999876 " " y[1] (analytic) = -0.6571435314507774 " " y[1] (numeric) = -0.6571435314507683 " " absolute error = 9.103828801926284000000000000000E-15 " " relative error = 1.3853638309164723000000000000E-12 "%" Correct digits = 14 h = 1.000E-3 " " "Complex estimate of poles used for equation 1" Radius of convergence = 9756.059435465215 " " Order of pole = 5178804.220535864 " " " " "TOP MAIN SOLVE Loop" x[1] = 1.1139999999999874 " " y[1] (analytic) = -0.6564867163815958 " " y[1] (numeric) = -0.6564867163815867 " " absolute error = 9.103828801926284000000000000000E-15 " " relative error = 1.386749887660256000000000000E-12 "%" Correct digits = 14 h = 1.000E-3 " " "NO POLE for equation 1" " " "TOP MAIN SOLVE Loop" x[1] = 1.1149999999999873 " " y[1] (analytic) = -0.6558305577991854 " " y[1] (numeric) = -0.6558305577991762 " " absolute error = 9.2148511043887990000000000000E-15 " " relative error = 1.4050658351925066000000000000E-12 "%" Correct digits = 14 h = 1.000E-3 " " "NO POLE for equation 1" " " "TOP MAIN SOLVE Loop" x[1] = 1.1159999999999872 " " y[1] (analytic) = -0.6551750550473875 " " y[1] (numeric) = -0.6551750550473782 " " absolute error = 9.325873406851315000000000000000E-15 " " relative error = 1.4234170448044292000000000000E-12 "%" Correct digits = 14 h = 1.000E-3 " " "Complex estimate of poles used for equation 1" Radius of convergence = 3330.744939959263 " " Order of pole = 573522.3516220682 " " " " "TOP MAIN SOLVE Loop" x[1] = 1.1169999999999871 " " y[1] (analytic) = -0.6545202074706992 " " y[1] (numeric) = -0.6545202074706897 " " absolute error = 9.43689570931383100000000000000E-15 " " relative error = 1.4418035687211828000000000000E-12 "%" Correct digits = 14 h = 1.000E-3 " " "Complex estimate of poles used for equation 1" Radius of convergence = 3896.5680455278443 " " Order of pole = 725363.9818058815 " " " " "TOP MAIN SOLVE Loop" x[1] = 1.117999999999987 " " y[1] (analytic) = -0.6538660144142727 " " y[1] (numeric) = -0.6538660144142633 " " absolute error = 9.43689570931383100000000000000E-15 " " relative error = 1.4432460934320490000000000000E-12 "%" Correct digits = 14 h = 1.000E-3 " " "Complex estimate of poles used for equation 1" Radius of convergence = 3601.1146876793796 " " Order of pole = 1014378.4590762744 " " " " "TOP MAIN SOLVE Loop" x[1] = 1.118999999999987 " " y[1] (analytic) = -0.6532124752239153 " " y[1] (numeric) = -0.6532124752239058 " " absolute error = 9.547918011776346000000000000000E-15 " " relative error = 1.4616864150525302000000000000E-12 "%" Correct digits = 14 h = 1.000E-3 " " "Complex estimate of poles used for equation 1" Radius of convergence = 1981.1000532795515 " " Order of pole = 294540.15150019835 " " " " "TOP MAIN SOLVE Loop" x[1] = 1.1199999999999868 " " y[1] (analytic) = -0.6525595892460876 " " y[1] (numeric) = -0.6525595892460779 " " absolute error = 9.658940314238862000000000000000E-15 " " relative error = 1.4801621910725407000000000000E-12 "%" Correct digits = 14 h = 1.000E-3 " " "NO POLE for equation 1" " " "TOP MAIN SOLVE Loop" x[1] = 1.1209999999999867 " " y[1] (analytic) = -0.6519073558279035 " " y[1] (numeric) = -0.6519073558278937 " " absolute error = 9.769962616701378000000000000000E-15 " " relative error = 1.4986734739775728000000000000E-12 "%" Correct digits = 14 h = 1.000E-3 " " "Complex estimate of poles used for equation 1" Radius of convergence = 1709.0413141431216 " " Order of pole = 157167.9376560468 " " " " "TOP MAIN SOLVE Loop" x[1] = 1.1219999999999866 " " y[1] (analytic) = -0.6512557743171294 " " y[1] (numeric) = -0.6512557743171197 " " absolute error = 9.769962616701378000000000000000E-15 " " relative error = 1.5001728970381287000000000000E-12 "%" Correct digits = 14 h = 1.000E-3 " " "Complex estimate of poles used for equation 1" Radius of convergence = 3286.2056803947676 " " Order of pole = 820686.0061303576 " " " " "TOP MAIN SOLVE Loop" x[1] = 1.1229999999999865 " " y[1] (analytic) = -0.6506048440621841 " " y[1] (numeric) = -0.6506048440621742 " " absolute error = 9.880984919163893000000000000000E-15 " " relative error = 1.5187382955020665000000000000E-12 "%" Correct digits = 14 h = 1.000E-3 " " "Complex estimate of poles used for equation 1" Radius of convergence = 3255.2127185030017 " " Order of pole = 625634.9644495574 " " " " "TOP MAIN SOLVE Loop" x[1] = 1.1239999999999863 " " y[1] (analytic) = -0.649954564412137 " " y[1] (numeric) = -0.6499545644121271 " " absolute error = 9.880984919163893000000000000000E-15 " " relative error = 1.5202577934199027000000000000E-12 "%" Correct digits = 14 h = 1.000E-3 " " "Complex estimate of poles used for equation 1" Radius of convergence = 3755.9874899073548 " " Order of pole = 724073.283872762 " " " " "TOP MAIN SOLVE Loop" x[1] = 1.1249999999999862 " " y[1] (analytic) = -0.6493049347167084 " " y[1] (numeric) = -0.6493049347166985 " " absolute error = 9.880984919163893000000000000000E-15 " " relative error = 1.5217788115956588000000000000E-12 "%" Correct digits = 14 h = 1.000E-3 " " "Complex estimate of poles used for equation 1" Radius of convergence = 7058.5141659143865 " " Order of pole = 1553789.3948920735 " " " " "TOP MAIN SOLVE Loop" x[1] = 1.1259999999999861 " " y[1] (analytic) = -0.6486559543262688 " " y[1] (numeric) = -0.6486559543262587 " " absolute error = 1.010302952408892500000000000000E-14 " " relative error = 1.5575328425964285000000000000E-12 "%" Correct digits = 14 h = 1.000E-3 " " "Complex estimate of poles used for equation 1" Radius of convergence = 2146.3973362204565 " " Order of pole = 202619.61124680308 " " " " "TOP MAIN SOLVE Loop" x[1] = 1.126999999999986 " " y[1] (analytic) = -0.6480076225918373 " " y[1] (numeric) = -0.6480076225918272 " " absolute error = 1.010302952408892500000000000000E-14 " " relative error = 1.5590911544651000000000000E-12 "%" Correct digits = 14 h = 1.000E-3 " " "Complex estimate of poles used for equation 1" Radius of convergence = 1599.0090790321815 " " Order of pole = 22103.92035905925 " " " " "TOP MAIN SOLVE Loop" x[1] = 1.127999999999986 " " y[1] (analytic) = -0.6473599388650826 " " y[1] (numeric) = -0.6473599388650724 " " absolute error = 1.02140518265514400000000000000E-14 " " relative error = 1.5778010366934628000000000000E-12 "%" Correct digits = 14 h = 1.000E-3 " " "Complex estimate of poles used for equation 1" Radius of convergence = 2017.1447765130806 " " Order of pole = 238001.02729895845 " " " " "TOP MAIN SOLVE Loop" x[1] = 1.1289999999999858 " " y[1] (analytic) = -0.6467129024983206 " " y[1] (numeric) = -0.6467129024983104 " " absolute error = 1.02140518265514400000000000000E-14 " " relative error = 1.5793796268937074000000000000E-12 "%" Correct digits = 14 h = 1.000E-3 " " "NO POLE for equation 1" " " "TOP MAIN SOLVE Loop" x[1] = 1.1299999999999857 " " y[1] (analytic) = -0.6460665128445151 " " y[1] (numeric) = -0.6460665128445048 " " absolute error = 1.032507412901395600000000000000E-14 " " relative error = 1.5981441420875545000000000000E-12 "%" Correct digits = 14 h = 1.000E-3 " " "Complex estimate of poles used for equation 1" Radius of convergence = 2144.853650123673 " " Order of pole = 250191.73023914508 " " " " "TOP MAIN SOLVE Loop" x[1] = 1.1309999999999856 " " y[1] (analytic) = -0.6454207692572763 " " y[1] (numeric) = -0.6454207692572659 " " absolute error = 1.043609643147647100000000000000E-14 " " relative error = 1.6169446241226330000000000000E-12 "%" Correct digits = 14 h = 1.000E-3 " " "NO POLE for equation 1" " " "TOP MAIN SOLVE Loop" x[1] = 1.1319999999999855 " " y[1] (analytic) = -0.6447756710908604 " " y[1] (numeric) = -0.64477567109085 " " absolute error = 1.043609643147647100000000000000E-14 " " relative error = 1.6185623774886257000000000000E-12 "%" Correct digits = 14 h = 1.000E-3 " " "NO POLE for equation 1" " " "TOP MAIN SOLVE Loop" x[1] = 1.1329999999999854 " " y[1] (analytic) = -0.6441312177001695 " " y[1] (numeric) = -0.6441312177001589 " " absolute error = 1.054711873393898700000000000000E-14 " " relative error = 1.6374177254747596000000000000E-12 "%" Correct digits = 14 h = 1.000E-3 " " "NO POLE for equation 1" " " "TOP MAIN SOLVE Loop" x[1] = 1.1339999999999852 " " y[1] (analytic) = -0.6434874084407498 " " y[1] (numeric) = -0.6434874084407393 " " absolute error = 1.054711873393898700000000000000E-14 " " relative error = 1.6390559621820683000000000000E-12 "%" Correct digits = 14 h = 1.000E-3 " " "NO POLE for equation 1" " " "TOP MAIN SOLVE Loop" x[1] = 1.1349999999999851 " " y[1] (analytic) = -0.6428442426687923 " " y[1] (numeric) = -0.6428442426687816 " " absolute error = 1.065814103640150300000000000000E-14 " " relative error = 1.6579663204501646000000000000E-12 "%" Correct digits = 14 h = 1.000E-3 " " "Complex estimate of poles used for equation 1" Radius of convergence = 2514.974198818317 " " Order of pole = 377317.6367061819 " " " " "TOP MAIN SOLVE Loop" x[1] = 1.135999999999985 " " y[1] (analytic) = -0.6422017197411309 " " y[1] (numeric) = -0.6422017197411202 " " absolute error = 1.076916333886401800000000000000E-14 " " relative error = 1.676912877655486200000000000E-12 "%" Correct digits = 14 h = 1.000E-3 " " "NO POLE for equation 1" " " "TOP MAIN SOLVE Loop" x[1] = 1.136999999999985 " " y[1] (analytic) = -0.6415598390152429 " " y[1] (numeric) = -0.6415598390152321 " " absolute error = 1.088018564132653400000000000000E-14 " " relative error = 1.6958956873028377000000000000E-12 "%" Correct digits = 14 h = 1.000E-3 " " "NO POLE for equation 1" " " "TOP MAIN SOLVE Loop" x[1] = 1.1379999999999848 " " y[1] (analytic) = -0.6409185998492473 " " y[1] (numeric) = -0.6409185998492364 " " absolute error = 1.088018564132653400000000000000E-14 " " relative error = 1.6975924312207044000000000000E-12 "%" Correct digits = 14 h = 1.000E-3 " " "Complex estimate of poles used for equation 1" Radius of convergence = 2977.4497699445933 " " Order of pole = 564600.37139364 " " " " "TOP MAIN SOLVE Loop" x[1] = 1.1389999999999847 " " y[1] (analytic) = -0.640278001601905 " " y[1] (numeric) = -0.640278001601894 " " absolute error = 1.09912079437890500000000000000E-14 " " relative error = 1.716630575514114000000000000E-12 "%" Correct digits = 14 h = 1.000E-3 " " "NO POLE for equation 1" " " "TOP MAIN SOLVE Loop" x[1] = 1.1399999999999846 " " y[1] (analytic) = -0.6396380436326177 " " y[1] (numeric) = -0.6396380436326066 " " absolute error = 1.110223024625156500000000000000E-14 " " relative error = 1.735705115849588100000000000E-12 "%" Correct digits = 14 h = 1.000E-3 " " "Complex estimate of poles used for equation 1" Radius of convergence = 2080.2417967401007 " " Order of pole = 220084.29433190712 " " " " "TOP MAIN SOLVE Loop" x[1] = 1.1409999999999845 " " y[1] (analytic) = -0.6389987253014272 " " y[1] (numeric) = -0.6389987253014161 " " absolute error = 1.110223024625156500000000000000E-14 " " relative error = 1.737441689107351900000000000E-12 "%" Correct digits = 14 h = 1.000E-3 " " "NO POLE for equation 1" " " "TOP MAIN SOLVE Loop" x[1] = 1.1419999999999844 " " y[1] (analytic) = -0.6383600459690153 " " y[1] (numeric) = -0.6383600459690042 " " absolute error = 1.110223024625156500000000000000E-14 " " relative error = 1.73917999980695000000000000E-12 "%" Correct digits = 14 h = 1.000E-3 " " "NO POLE for equation 1" " " "TOP MAIN SOLVE Loop" x[1] = 1.1429999999999843 " " y[1] (analytic) = -0.6377220049967026 " " y[1] (numeric) = -0.6377220049966914 " " absolute error = 1.121325254871408100000000000000E-14 " " relative error = 1.7583292501835593000000000000E-12 "%" Correct digits = 14 h = 1.000E-3 " " "NO POLE for equation 1" " " "TOP MAIN SOLVE Loop" x[1] = 1.1439999999999841 " " y[1] (analytic) = -0.6370846017464481 " " y[1] (numeric) = -0.6370846017464368 " " absolute error = 1.132427485117659700000000000000E-14 " " relative error = 1.7775150772963620000000000000E-12 "%" Correct digits = 14 h = 1.000E-3 " " "NO POLE for equation 1" " " "TOP MAIN SOLVE Loop" x[1] = 1.144999999999984 " " y[1] (analytic) = -0.6364478355808483 " " y[1] (numeric) = -0.636447835580837 " " absolute error = 1.132427485117659700000000000000E-14 " " relative error = 1.7792934814275238000000000000E-12 "%" Correct digits = 14 h = 1.000E-3 " " "NO POLE for equation 1" " " "TOP MAIN SOLVE Loop" x[1] = 1.145999999999984 " " y[1] (analytic) = -0.6358117058631372 " " y[1] (numeric) = -0.6358117058631257 " " absolute error = 1.143529715363911200000000000000E-14 " " relative error = 1.7985351713704748000000000000E-12 "%" Correct digits = 14 h = 1.000E-3 " " "NO POLE for equation 1" " " "TOP MAIN SOLVE Loop" x[1] = 1.1469999999999838 " " y[1] (analytic) = -0.635176211957185 " " y[1] (numeric) = -0.6351762119571734 " " absolute error = 1.154631945610162800000000000000E-14 " " relative error = 1.8178135828676034000000000000E-12 "%" Correct digits = 14 h = 1.000E-3 " " "NO POLE for equation 1" " " "TOP MAIN SOLVE Loop" x[1] = 1.1479999999999837 " " y[1] (analytic) = -0.6345413532274976 " " y[1] (numeric) = -0.634541353227486 " " absolute error = 1.165734175856414400000000000000E-14 " " relative error = 1.83712877013781000000000000E-12 "%" Correct digits = 14 h = 1.000E-3 " " "NO POLE for equation 1" " " "TOP MAIN SOLVE Loop" x[1] = 1.1489999999999836 " " y[1] (analytic) = -0.6339071290392163 " " y[1] (numeric) = -0.6339071290392047 " " absolute error = 1.165734175856414400000000000000E-14 " " relative error = 1.8389668177785973000000000000E-12 "%" Correct digits = 14 h = 1.000E-3 " " "NO POLE for equation 1" " " "TOP MAIN SOLVE Loop" x[1] = 1.1499999999999835 " " y[1] (analytic) = -0.6332735387581169 " " y[1] (numeric) = -0.6332735387581052 " " absolute error = 1.165734175856414400000000000000E-14 " " relative error = 1.840806704386356000000000000E-12 "%" Correct digits = 14 h = 1.000E-3 " " "NO POLE for equation 1" " " "TOP MAIN SOLVE Loop" x[1] = 1.1509999999999834 " " y[1] (analytic) = -0.632640581750609 " " y[1] (numeric) = -0.6326405817505972 " " absolute error = 1.17683640610266600000000000000E-14 " " relative error = 1.860197464484791000000000000E-12 "%" Correct digits = 14 h = 1.000E-3 " " "NO POLE for equation 1" " " "TOP MAIN SOLVE Loop" x[1] = 1.1519999999999833 " " y[1] (analytic) = -0.6320082573837356 " " y[1] (numeric) = -0.6320082573837238 " " absolute error = 1.17683640610266600000000000000E-14 " " relative error = 1.8620585923581184000000000000E-12 "%" Correct digits = 14 h = 1.000E-3 " " "NO POLE for equation 1" " " "TOP MAIN SOLVE Loop" x[1] = 1.1529999999999831 " " y[1] (analytic) = -0.6313765650251723 " " y[1] (numeric) = -0.6313765650251604 " " absolute error = 1.187938636348917500000000000000E-14 " " relative error = 1.8815057481608552000000000000E-12 "%" Correct digits = 14 h = 1.000E-3 " " "NO POLE for equation 1" " " "TOP MAIN SOLVE Loop" x[1] = 1.153999999999983 " " y[1] (analytic) = -0.6307455040432265 " " y[1] (numeric) = -0.6307455040432146 " " absolute error = 1.187938636348917500000000000000E-14 " " relative error = 1.8833881949755527000000000000E-12 "%" Correct digits = 14 h = 1.000E-3 " " "Complex estimate of poles used for equation 1" Radius of convergence = 1838.255875271702 " " Order of pole = 343578.18342338095 " " " " "TOP MAIN SOLVE Loop" x[1] = 1.154999999999983 " " y[1] (analytic) = -0.6301150738068374 " " y[1] (numeric) = -0.6301150738068254 " " absolute error = 1.19904086659516900000000000000E-14 " " relative error = 1.9028918945727946000000000000E-12 "%" Correct digits = 14 h = 1.000E-3 " " "NO POLE for equation 1" " " "TOP MAIN SOLVE Loop" x[1] = 1.1559999999999828 " " y[1] (analytic) = -0.6294852736855747 " " y[1] (numeric) = -0.6294852736855625 " " absolute error = 1.221245327087672200000000000000E-14 " " relative error = 1.9400697333829595000000000000E-12 "%" Correct digits = 14 h = 1.000E-3 " " "NO POLE for equation 1" " " "TOP MAIN SOLVE Loop" x[1] = 1.1569999999999827 " " y[1] (analytic) = -0.628856103049638 " " y[1] (numeric) = -0.6288561030496258 " " absolute error = 1.221245327087672200000000000000E-14 " " relative error = 1.9420107734746347000000000000E-12 "%" Correct digits = 14 h = 1.000E-3 " " "NO POLE for equation 1" " " "TOP MAIN SOLVE Loop" x[1] = 1.1579999999999826 " " y[1] (analytic) = -0.6282275612698568 " " y[1] (numeric) = -0.6282275612698446 " " absolute error = 1.221245327087672200000000000000E-14 " " relative error = 1.9439537555772457000000000000E-12 "%" Correct digits = 14 h = 1.000E-3 " " "Complex estimate of poles used for equation 1" Radius of convergence = 2489.7759081269037 " " Order of pole = 327706.4751973435 " " " " "TOP MAIN SOLVE Loop" x[1] = 1.1589999999999825 " " y[1] (analytic) = -0.6275996477176892 " " y[1] (numeric) = -0.627599647717677 " " absolute error = 1.221245327087672200000000000000E-14 " " relative error = 1.9458986816337737000000000000E-12 "%" Correct digits = 14 h = 1.000E-3 " " "NO POLE for equation 1" " " "TOP MAIN SOLVE Loop" x[1] = 1.1599999999999824 " " y[1] (analytic) = -0.6269723617652216 " " y[1] (numeric) = -0.6269723617652093 " " absolute error = 1.232347557333923800000000000000E-14 " " relative error = 1.965553240439956000000000000E-12 "%" Correct digits = 14 h = 1.000E-3 " " "Complex estimate of poles used for equation 1" Radius of convergence = 2349.4290233425295 " " Order of pole = 164584.63396924158 " " " " "TOP MAIN SOLVE Loop" x[1] = 1.1609999999999823 " " y[1] (analytic) = -0.6263457027851681 " " y[1] (numeric) = -0.6263457027851557 " " absolute error = 1.243449787580175300000000000000E-14 " " relative error = 1.9852451801791465000000000000E-12 "%" Correct digits = 14 h = 1.000E-3 " " "NO POLE for equation 1" " " "TOP MAIN SOLVE Loop" x[1] = 1.1619999999999822 " " y[1] (analytic) = -0.6257196701508695 " " y[1] (numeric) = -0.625719670150857 " " absolute error = 1.243449787580175300000000000000E-14 " " relative error = 1.9872314183128725000000000000E-12 "%" Correct digits = 14 h = 1.000E-3 " " "NO POLE for equation 1" " " "TOP MAIN SOLVE Loop" x[1] = 1.162999999999982 " " y[1] (analytic) = -0.6250942632362932 " " y[1] (numeric) = -0.6250942632362807 " " absolute error = 1.254552017826427000000000000000E-14 " " relative error = 2.0069805333538807000000000000E-12 "%" Correct digits = 14 h = 1.000E-3 " " "Complex estimate of poles used for equation 1" Radius of convergence = 1599.9277115038683 " " Order of pole = 144443.16181753055 " " " " "TOP MAIN SOLVE Loop" x[1] = 1.163999999999982 " " y[1] (analytic) = -0.6244694814160323 " " y[1] (numeric) = -0.6244694814160197 " " absolute error = 1.265654248072678500000000000000E-14 " " relative error = 2.026767177160860900000000000E-12 "%" Correct digits = 14 h = 1.000E-3 " " "Complex estimate of poles used for equation 1" Radius of convergence = 2808.6960105231683 " " Order of pole = 568502.9059308054 " " " " "TOP MAIN SOLVE Loop" x[1] = 1.1649999999999818 " " y[1] (analytic) = -0.6238453240653048 " " y[1] (numeric) = -0.6238453240652921 " " absolute error = 1.265654248072678500000000000000E-14 " " relative error = 2.0287949580594890000000000000E-12 "%" Correct digits = 14 h = 1.000E-3 " " "NO POLE for equation 1" " " "TOP MAIN SOLVE Loop" x[1] = 1.1659999999999817 " " y[1] (analytic) = -0.6232217905599534 " " y[1] (numeric) = -0.6232217905599406 " " absolute error = 1.2767564783189300000000000000E-14 " " relative error = 2.048639020101957000000000000E-12 "%" Correct digits = 14 h = 1.000E-3 " " "Complex estimate of poles used for equation 1" Radius of convergence = 2040.712803373329 " " Order of pole = 253237.9155512619 " " " " "TOP MAIN SOLVE Loop" x[1] = 1.1669999999999816 " " y[1] (analytic) = -0.6225988802764444 " " y[1] (numeric) = -0.6225988802764316 " " absolute error = 1.2767564783189300000000000000E-14 " " relative error = 2.0506886837830943000000000000E-12 "%" Correct digits = 14 h = 1.000E-3 " " "Complex estimate of poles used for equation 1" Radius of convergence = 1951.0022154724961 " " Order of pole = 12597.630505492123 " " " " "TOP MAIN SOLVE Loop" x[1] = 1.1679999999999815 " " y[1] (analytic) = -0.6219765925918677 " " y[1] (numeric) = -0.6219765925918548 " " absolute error = 1.287858708565181600000000000000E-14 " " relative error = 2.0705903146587645000000000000E-12 "%" Correct digits = 14 h = 1.000E-3 " " "NO POLE for equation 1" " " "TOP MAIN SOLVE Loop" x[1] = 1.1689999999999814 " " y[1] (analytic) = -0.6213549268839353 " " y[1] (numeric) = -0.6213549268839224 " " absolute error = 1.298960938811433200000000000000E-14 " " relative error = 2.0905297159638836000000000000E-12 "%" Correct digits = 14 h = 1.000E-3 " " "Complex estimate of poles used for equation 1" Radius of convergence = 2051.290162162282 " " Order of pole = 246748.44623548174 " " " " "TOP MAIN SOLVE Loop" x[1] = 1.1699999999999813 " " y[1] (analytic) = -0.6207338825309816 " " y[1] (numeric) = -0.6207338825309686 " " absolute error = 1.298960938811433200000000000000E-14 " " relative error = 2.0926212912932143000000000000E-12 "%" Correct digits = 14 h = 1.000E-3 " " "Complex estimate of poles used for equation 1" Radius of convergence = 2076.0353114495806 " " Order of pole = 310698.95850639016 " " " " "TOP MAIN SOLVE Loop" x[1] = 1.1709999999999812 " " y[1] (analytic) = -0.6201134589119622 " " y[1] (numeric) = -0.6201134589119491 " " absolute error = 1.310063169057684700000000000000E-14 " " relative error = 2.1126185059042155000000000000E-12 "%" Correct digits = 14 h = 1.000E-3 " " "NO POLE for equation 1" " " "TOP MAIN SOLVE Loop" x[1] = 1.171999999999981 " " y[1] (analytic) = -0.6194936554064534 " " y[1] (numeric) = -0.6194936554064402 " " absolute error = 1.321165399303936300000000000000E-14 " " relative error = 2.1326536402331867000000000000E-12 "%" Correct digits = 14 h = 1.000E-3 " " "NO POLE for equation 1" " " "TOP MAIN SOLVE Loop" x[1] = 1.172999999999981 " " y[1] (analytic) = -0.6188744713946515 " " y[1] (numeric) = -0.6188744713946384 " " absolute error = 1.310063169057684700000000000000E-14 " " relative error = 2.116847970971269300000000000E-12 "%" Correct digits = 14 h = 1.000E-3 " " "NO POLE for equation 1" " " "TOP MAIN SOLVE Loop" x[1] = 1.1739999999999808 " " y[1] (analytic) = -0.6182559062573727 " " y[1] (numeric) = -0.6182559062573595 " " absolute error = 1.321165399303936300000000000000E-14 " " relative error = 2.136923215665894000000000000E-12 "%" Correct digits = 14 h = 1.000E-3 " " "Complex estimate of poles used for equation 1" Radius of convergence = 3424.346665243721 " " Order of pole = 557550.0928744748 " " " " "TOP MAIN SOLVE Loop" x[1] = 1.1749999999999807 " " y[1] (analytic) = -0.6176379593760516 " " y[1] (numeric) = -0.6176379593760384 " " absolute error = 1.321165399303936300000000000000E-14 " " relative error = 2.1390612076994103000000000000E-12 "%" Correct digits = 14 h = 1.000E-3 " " "NO POLE for equation 1" " " "TOP MAIN SOLVE Loop" x[1] = 1.1759999999999806 " " y[1] (analytic) = -0.6170206301327414 " " y[1] (numeric) = -0.6170206301327281 " " absolute error = 1.332267629550187800000000000000E-14 " " relative error = 2.1591946273556092000000000000E-12 "%" Correct digits = 14 h = 1.000E-3 " " "NO POLE for equation 1" " " "TOP MAIN SOLVE Loop" x[1] = 1.1769999999999805 " " y[1] (analytic) = -0.6164039179101127 " " y[1] (numeric) = -0.6164039179100994 " " absolute error = 1.332267629550187800000000000000E-14 " " relative error = 2.161354901940234000000000000E-12 "%" Correct digits = 14 h = 1.000E-3 " " "Complex estimate of poles used for equation 1" Radius of convergence = 1771.9683417917183 " " Order of pole = 48148.30522989787 " " " " "TOP MAIN SOLVE Loop" x[1] = 1.1779999999999804 " " y[1] (analytic) = -0.6157878220914532 " " y[1] (numeric) = -0.6157878220914399 " " absolute error = 1.332267629550187800000000000000E-14 " " relative error = 2.1635173378799413000000000000E-12 "%" Correct digits = 14 h = 1.000E-3 " " "NO POLE for equation 1" " " "TOP MAIN SOLVE Loop" x[1] = 1.1789999999999803 " " y[1] (analytic) = -0.6151723420606673 " " y[1] (numeric) = -0.6151723420606539 " " absolute error = 1.343369859796439400000000000000E-14 " " relative error = 2.183729286814976000000000000E-12 "%" Correct digits = 14 h = 1.000E-3 " " "NO POLE for equation 1" " " "TOP MAIN SOLVE Loop" x[1] = 1.1799999999999802 " " y[1] (analytic) = -0.6145574772022746 " " y[1] (numeric) = -0.6145574772022612 " " absolute error = 1.343369859796439400000000000000E-14 " " relative error = 2.18591410833048000000000000E-12 "%" Correct digits = 14 h = 1.000E-3 " " "NO POLE for equation 1" " " "TOP MAIN SOLVE Loop" x[1] = 1.18099999999998 " " y[1] (analytic) = -0.6139432269014103 " " y[1] (numeric) = -0.6139432269013968 " " absolute error = 1.35447209004269100000000000000E-14 " " relative error = 2.2061845960558144000000000000E-12 "%" Correct digits = 14 h = 1.000E-3 " " "NO POLE for equation 1" " " "TOP MAIN SOLVE Loop" x[1] = 1.18199999999998 " " y[1] (analytic) = -0.6133295905438243 " " y[1] (numeric) = -0.6133295905438105 " " absolute error = 1.376676550535194000000000000000E-14 " " relative error = 2.244595029753136000000000000E-12 "%" Correct digits = 14 h = 1.000E-3 " " "Complex estimate of poles used for equation 1" Radius of convergence = 2571.8084703041836 " " Order of pole = 326323.5902588068 " " " " "TOP MAIN SOLVE Loop" x[1] = 1.1829999999999798 " " y[1] (analytic) = -0.6127165675158797 " " y[1] (numeric) = -0.6127165675158659 " " absolute error = 1.376676550535194000000000000000E-14 " " relative error = 2.246840747454597000000000000E-12 "%" Correct digits = 14 h = 1.000E-3 " " "Complex estimate of poles used for equation 1" Radius of convergence = 2943.009535389928 " " Order of pole = 368525.5025232692 " " " " "TOP MAIN SOLVE Loop" x[1] = 1.1839999999999797 " " y[1] (analytic) = -0.6121041572045537 " " y[1] (numeric) = -0.6121041572045399 " " absolute error = 1.376676550535194000000000000000E-14 " " relative error = 2.2490887119969924000000000000E-12 "%" Correct digits = 14 h = 1.000E-3 " " "Complex estimate of poles used for equation 1" Radius of convergence = 3876.8747425799743 " " Order of pole = 531153.9354898047 " " " " "TOP MAIN SOLVE Loop" x[1] = 1.1849999999999796 " " y[1] (analytic) = -0.6114923589974359 " " y[1] (numeric) = -0.6114923589974222 " " absolute error = 1.376676550535194000000000000000E-14 " " relative error = 2.251338925628287000000000000E-12 "%" Correct digits = 14 h = 1.000E-3 " " "NO POLE for equation 1" " " "TOP MAIN SOLVE Loop" x[1] = 1.1859999999999795 " " y[1] (analytic) = -0.6108811722827282 " " y[1] (numeric) = -0.6108811722827143 " " absolute error = 1.387778780781445700000000000000E-14 " " relative error = 2.271765514716426000000000000E-12 "%" Correct digits = 14 h = 1.000E-3 " " "NO POLE for equation 1" " " "TOP MAIN SOLVE Loop" x[1] = 1.1869999999999794 " " y[1] (analytic) = -0.6102705964492436 " " y[1] (numeric) = -0.6102705964492297 " " absolute error = 1.398881011027697200000000000000E-14 " " relative error = 2.2922307238245623000000000000E-12 "%" Correct digits = 14 h = 1.000E-3 " " "Complex estimate of poles used for equation 1" Radius of convergence = 2014.769644323877 " " Order of pole = 209803.03219193176 " " " " "TOP MAIN SOLVE Loop" x[1] = 1.1879999999999793 " " y[1] (analytic) = -0.6096606308864063 " " y[1] (numeric) = -0.6096606308863923 " " absolute error = 1.398881011027697200000000000000E-14 " " relative error = 2.2945241010458828000000000000E-12 "%" Correct digits = 14 h = 1.000E-3 " " "NO POLE for equation 1" " " "TOP MAIN SOLVE Loop" x[1] = 1.1889999999999792 " " y[1] (analytic) = -0.6090512749842507 " " y[1] (numeric) = -0.6090512749842366 " " absolute error = 1.409983241273948800000000000000E-14 " " relative error = 2.3150485011469835000000000000E-12 "%" Correct digits = 14 h = 1.000E-3 " " "NO POLE for equation 1" " " "TOP MAIN SOLVE Loop" x[1] = 1.189999999999979 " " y[1] (analytic) = -0.6084425281334208 " " y[1] (numeric) = -0.6084425281334067 " " absolute error = 1.409983241273948800000000000000E-14 " " relative error = 2.317364707558319000000000000E-12 "%" Correct digits = 14 h = 1.000E-3 " " "Complex estimate of poles used for equation 1" Radius of convergence = 2800.444895425836 " " Order of pole = 422080.02817410894 " " " " "TOP MAIN SOLVE Loop" x[1] = 1.190999999999979 " " y[1] (analytic) = -0.6078343897251698 " " y[1] (numeric) = -0.6078343897251556 " " absolute error = 1.421085471520200400000000000000E-14 " " relative error = 2.3379484536285275000000000000E-12 "%" Correct digits = 14 h = 1.000E-3 " " "NO POLE for equation 1" " " "TOP MAIN SOLVE Loop" x[1] = 1.1919999999999789 " " y[1] (analytic) = -0.6072268591513592 " " y[1] (numeric) = -0.6072268591513449 " " absolute error = 1.43218770176645200000000000000E-14 " " relative error = 2.3585710680980607000000000000E-12 "%" Correct digits = 14 h = 1.000E-3 " " "Complex estimate of poles used for equation 1" Radius of convergence = 2177.4967208466305 " " Order of pole = 170623.1484378174 " " " " "TOP MAIN SOLVE Loop" x[1] = 1.1929999999999787 " " y[1] (analytic) = -0.6066199358044583 " " y[1] (numeric) = -0.606619935804444 " " absolute error = 1.43218770176645200000000000000E-14 " " relative error = 2.3609308188448863000000000000E-12 "%" Correct digits = 14 h = 1.000E-3 " " "Complex estimate of poles used for equation 1" Radius of convergence = 1338.0703872404365 " " Order of pole = 278576.84319571557 " " " " "TOP MAIN SOLVE Loop" x[1] = 1.1939999999999786 " " y[1] (analytic) = -0.6060136190775437 " " y[1] (numeric) = -0.6060136190775294 " " absolute error = 1.43218770176645200000000000000E-14 " " relative error = 2.3632929305227274000000000000E-12 "%" Correct digits = 14 h = 1.000E-3 " " "Complex estimate of poles used for equation 1" Radius of convergence = 13590.832901168995 " " Order of pole = 9814183.132852877 " " " " "TOP MAIN SOLVE Loop" x[1] = 1.1949999999999785 " " y[1] (analytic) = -0.6054079083642988 " " y[1] (numeric) = -0.6054079083642844 " " absolute error = 1.443289932012703500000000000000E-14 " " relative error = 2.3839958349936463000000000000E-12 "%" Correct digits = 14 h = 1.000E-3 " " "NO POLE for equation 1" " " "TOP MAIN SOLVE Loop" x[1] = 1.1959999999999784 " " y[1] (analytic) = -0.6048028030590127 " " y[1] (numeric) = -0.6048028030589981 " " absolute error = 1.45439216225895500000000000000E-14 " " relative error = 2.404737800325712200000000000E-12 "%" Correct digits = 14 h = 1.000E-3 " " "Complex estimate of poles used for equation 1" Radius of convergence = 5124.144414935317 " " Order of pole = 1531312.3130222666 " " " " "TOP MAIN SOLVE Loop" x[1] = 1.1969999999999783 " " y[1] (analytic) = -0.6041983025565799 " " y[1] (numeric) = -0.6041983025565654 " " absolute error = 1.45439216225895500000000000000E-14 " " relative error = 2.407143740895828000000000000E-12 "%" Correct digits = 14 h = 1.000E-3 " " "Complex estimate of poles used for equation 1" Radius of convergence = 5462.119685319098 " " Order of pole = 1464306.2404762888 " " " " "TOP MAIN SOLVE Loop" x[1] = 1.1979999999999782 " " y[1] (analytic) = -0.6035944062525002 " " y[1] (numeric) = -0.6035944062524855 " " absolute error = 1.465494392505206600000000000000E-14 " " relative error = 2.4279456160038534000000000000E-12 "%" Correct digits = 14 h = 1.000E-3 " " "NO POLE for equation 1" " " "TOP MAIN SOLVE Loop" x[1] = 1.198999999999978 " " y[1] (analytic) = -0.6029911135428769 " " y[1] (numeric) = -0.6029911135428622 " " absolute error = 1.476596622751458200000000000000E-14 " " relative error = 2.4487867061186164000000000000E-12 "%" Correct digits = 14 h = 1.000E-3 " " "Complex estimate of poles used for equation 1" Radius of convergence = 2995.291458648394 " " Order of pole = 802547.4899283713 " " " " "TOP MAIN SOLVE Loop" x[1] = 1.199999999999978 " " y[1] (analytic) = -0.6023884238244175 " " y[1] (numeric) = -0.6023884238244026 " " absolute error = 1.487698852997709800000000000000E-14 " " relative error = 2.4696670688866695000000000000E-12 "%" Correct digits = 14 h = 1.000E-3 " " "NO POLE for equation 1" " " "TOP MAIN SOLVE Loop" x[1] = 1.2009999999999779 " " y[1] (analytic) = -0.601786336494432 " " y[1] (numeric) = -0.6017863364944172 " " absolute error = 1.487698852997709800000000000000E-14 " " relative error = 2.4721379712008043000000000000E-12 "%" Correct digits = 14 h = 1.000E-3 " " "Complex estimate of poles used for equation 1" Radius of convergence = 3710.76896626948 " " Order of pole = 618039.28596467 " " " " "TOP MAIN SOLVE Loop" x[1] = 1.2019999999999778 " " y[1] (analytic) = -0.6011848509508333 " " y[1] (numeric) = -0.6011848509508183 " " absolute error = 1.498801083243961300000000000000E-14 " " relative error = 2.4930785945012737000000000000E-12 "%" Correct digits = 14 h = 1.000E-3 " " "NO POLE for equation 1" " " "TOP MAIN SOLVE Loop" x[1] = 1.2029999999999776 " " y[1] (analytic) = -0.6005839665921355 " " y[1] (numeric) = -0.6005839665921205 " " absolute error = 1.498801083243961300000000000000E-14 " " relative error = 2.4955729200506893000000000000E-12 "%" Correct digits = 14 h = 1.000E-3 " " "NO POLE for equation 1" " " "TOP MAIN SOLVE Loop" x[1] = 1.2039999999999775 " " y[1] (analytic) = -0.5999836828174545 " " y[1] (numeric) = -0.5999836828174394 " " absolute error = 1.50990331349021300000000000000E-14 " " relative error = 2.5165739614782195000000000000E-12 "%" Correct digits = 14 h = 1.000E-3 " " "Complex estimate of poles used for equation 1" Radius of convergence = 2149.1748666429135 " " Order of pole = 110854.03413104975 " " " " "TOP MAIN SOLVE Loop" x[1] = 1.2049999999999774 " " y[1] (analytic) = -0.5993839990265062 " " y[1] (numeric) = -0.5993839990264911 " " absolute error = 1.50990331349021300000000000000E-14 " " relative error = 2.519091794146212000000000000E-12 "%" Correct digits = 14 h = 1.000E-3 " " "NO POLE for equation 1" " " "TOP MAIN SOLVE Loop" x[1] = 1.2059999999999773 " " y[1] (analytic) = -0.5987849146196069 " " y[1] (numeric) = -0.5987849146195917 " " absolute error = 1.521005543736464500000000000000E-14 " " relative error = 2.540153411684930600000000000E-12 "%" Correct digits = 14 h = 1.000E-3 " " "NO POLE for equation 1" " " "TOP MAIN SOLVE Loop" x[1] = 1.2069999999999772 " " y[1] (analytic) = -0.5981864289976722 " " y[1] (numeric) = -0.5981864289976568 " " absolute error = 1.53210777398271600000000000000E-14 " " relative error = 2.5612546519150103000000000000E-12 "%" Correct digits = 14 h = 1.000E-3 " " "Complex estimate of poles used for equation 1" Radius of convergence = 2249.8609556491115 " " Order of pole = 236303.68274463245 " " " " "TOP MAIN SOLVE Loop" x[1] = 1.207999999999977 " " y[1] (analytic) = -0.5975885415622163 " " y[1] (numeric) = -0.5975885415622009 " " absolute error = 1.543210004228967600000000000000E-14 " " relative error = 2.582395573038779000000000000E-12 "%" Correct digits = 14 h = 1.000E-3 " " "NO POLE for equation 1" " " "TOP MAIN SOLVE Loop" x[1] = 1.208999999999977 " " y[1] (analytic) = -0.5969912517153516 " " y[1] (numeric) = -0.5969912517153363 " " absolute error = 1.53210777398271600000000000000E-14 " " relative error = 2.5663822871448590000000000000E-12 "%" Correct digits = 14 h = 1.000E-3 " " "NO POLE for equation 1" " " "TOP MAIN SOLVE Loop" x[1] = 1.2099999999999769 " " y[1] (analytic) = -0.5963945588597885 " " y[1] (numeric) = -0.5963945588597731 " " absolute error = 1.543210004228967600000000000000E-14 " " relative error = 2.5875655324209185000000000000E-12 "%" Correct digits = 14 h = 1.000E-3 " " "Complex estimate of poles used for equation 1" Radius of convergence = 1996.965217593434 " " Order of pole = 173267.4304607496 " " " " "TOP MAIN SOLVE Loop" x[1] = 1.2109999999999768 " " y[1] (analytic) = -0.595798462398834 " " y[1] (numeric) = -0.5957984623988185 " " absolute error = 1.55431223447521920000000000000E-14 " " relative error = 2.6087885964276720000000000000E-12 "%" Correct digits = 14 h = 1.000E-3 " " "NO POLE for equation 1" " " "TOP MAIN SOLVE Loop" x[1] = 1.2119999999999767 " " y[1] (analytic) = -0.5952029617363915 " " y[1] (numeric) = -0.595202961736376 " " absolute error = 1.55431223447521920000000000000E-14 " " relative error = 2.6113986898533040000000000000E-12 "%" Correct digits = 14 h = 1.000E-3 " " "Complex estimate of poles used for equation 1" Radius of convergence = 2172.966665004855 " " Order of pole = 256273.0347335092 " " " " "TOP MAIN SOLVE Loop" x[1] = 1.2129999999999765 " " y[1] (analytic) = -0.5946080562769603 " " y[1] (numeric) = -0.5946080562769448 " " absolute error = 1.55431223447521920000000000000E-14 " " relative error = 2.614011394677844000000000000E-12 "%" Correct digits = 14 h = 1.000E-3 " " "Complex estimate of poles used for equation 1" Radius of convergence = 1960.3154318933707 " " Order of pole = 90046.22860034385 " " " " "TOP MAIN SOLVE Loop" x[1] = 1.2139999999999764 " " y[1] (analytic) = -0.594013745425635 " " y[1] (numeric) = -0.5940137454256194 " " absolute error = 1.565414464721470700000000000000E-14 " " relative error = 2.6353169043248110000000000000E-12 "%" Correct digits = 14 h = 1.000E-3 " " "Complex estimate of poles used for equation 1" Radius of convergence = 2697.538846440568 " " Order of pole = 377935.697547993 " " " " "TOP MAIN SOLVE Loop" x[1] = 1.2149999999999763 " " y[1] (analytic) = -0.5934200285881046 " " y[1] (numeric) = -0.5934200285880888 " " absolute error = 1.576516694967722300000000000000E-14 " " relative error = 2.656662429676753000000000000E-12 "%" Correct digits = 14 h = 1.000E-3 " " "Complex estimate of poles used for equation 1" Radius of convergence = 2290.869996937687 " " Order of pole = 237988.97496072762 " " " " "TOP MAIN SOLVE Loop" x[1] = 1.2159999999999762 " " y[1] (analytic) = -0.5928269051706523 " " y[1] (numeric) = -0.5928269051706364 " " absolute error = 1.58761892521397390000000000000E-14 " " relative error = 2.6780480294782820000000000000E-12 "%" Correct digits = 14 h = 1.000E-3 " " "NO POLE for equation 1" " " "TOP MAIN SOLVE Loop" x[1] = 1.216999999999976 " " y[1] (analytic) = -0.5922343745801545 " " y[1] (numeric) = -0.5922343745801385 " " absolute error = 1.598721155460225400000000000000E-14 " " relative error = 2.6994737625515025000000000000E-12 "%" Correct digits = 14 h = 1.000E-3 " " "Complex estimate of poles used for equation 1" Radius of convergence = 21427.650964617398 " " Order of pole = 28558886.423174895 " " " " "TOP MAIN SOLVE Loop" x[1] = 1.217999999999976 " " y[1] (analytic) = -0.5916424362240806 " " y[1] (numeric) = -0.5916424362240645 " " absolute error = 1.60982338570647700000000000000E-14 " " relative error = 2.720939687796105000000000000E-12 "%" Correct digits = 14 h = 1.000E-3 " " "NO POLE for equation 1" " " "TOP MAIN SOLVE Loop" x[1] = 1.2189999999999759 " " y[1] (analytic) = -0.5910510895104922 " " y[1] (numeric) = -0.5910510895104761 " " absolute error = 1.60982338570647700000000000000E-14 " " relative error = 2.7236619884073490000000000000E-12 "%" Correct digits = 14 h = 1.000E-3 " " "Complex estimate of poles used for equation 1" Radius of convergence = 3003.6533215424083 " " Order of pole = 468491.7956639865 " " " " "TOP MAIN SOLVE Loop" x[1] = 1.2199999999999758 " " y[1] (analytic) = -0.5904603338480428 " " y[1] (numeric) = -0.5904603338480265 " " absolute error = 1.620925615952728500000000000000E-14 " " relative error = 2.7451896817337773000000000000E-12 "%" Correct digits = 14 h = 1.000E-3 " " "NO POLE for equation 1" " " "TOP MAIN SOLVE Loop" x[1] = 1.2209999999999757 " " y[1] (analytic) = -0.5898701686459763 " " y[1] (numeric) = -0.58987016864596 " " absolute error = 1.6320278461989800000000000000E-14 " " relative error = 2.766757725594491000000000000E-12 "%" Correct digits = 14 h = 1.000E-3 " " "NO POLE for equation 1" " " "TOP MAIN SOLVE Loop" x[1] = 1.2219999999999756 " " y[1] (analytic) = -0.5892805933141275 " " y[1] (numeric) = -0.5892805933141112 " " absolute error = 1.6320278461989800000000000000E-14 " " relative error = 2.7695258671601897000000000000E-12 "%" Correct digits = 14 h = 1.000E-3 " " "NO POLE for equation 1" " " "TOP MAIN SOLVE Loop" x[1] = 1.2229999999999754 " " y[1] (analytic) = -0.5886916072629211 " " y[1] (numeric) = -0.5886916072629048 " " absolute error = 1.6320278461989800000000000000E-14 " " relative error = 2.7722967782519864000000000000E-12 "%" Correct digits = 14 h = 1.000E-3 " " "NO POLE for equation 1" " " "TOP MAIN SOLVE Loop" x[1] = 1.2239999999999753 " " y[1] (analytic) = -0.5881032099033713 " " y[1] (numeric) = -0.5881032099033547 " " absolute error = 1.654232306691483200000000000000E-14 " " relative error = 2.8128265223433880000000000000E-12 "%" Correct digits = 14 h = 1.000E-3 " " "NO POLE for equation 1" " " "TOP MAIN SOLVE Loop" x[1] = 1.2249999999999752 " " y[1] (analytic) = -0.5875154006470802 " " y[1] (numeric) = -0.5875154006470636 " " absolute error = 1.654232306691483200000000000000E-14 " " relative error = 2.815640755747914000000000000E-12 "%" Correct digits = 14 h = 1.000E-3 " " "NO POLE for equation 1" " " "TOP MAIN SOLVE Loop" x[1] = 1.225999999999975 " " y[1] (analytic) = -0.5869281789062387 " " y[1] (numeric) = -0.5869281789062222 " " absolute error = 1.654232306691483200000000000000E-14 " " relative error = 2.81845780479343000000000000E-12 "%" Correct digits = 14 h = 1.000E-3 " " "Complex estimate of poles used for equation 1" Radius of convergence = 2410.3215304108944 " " Order of pole = 294324.64055345394 " " " " "TOP MAIN SOLVE Loop" x[1] = 1.226999999999975 " " y[1] (analytic) = -0.5863415440936252 " " y[1] (numeric) = -0.5863415440936085 " " absolute error = 1.665334536937734800000000000000E-14 " " relative error = 2.840212421775489000000000000E-12 "%" Correct digits = 14 h = 1.000E-3 " " "Complex estimate of poles used for equation 1" Radius of convergence = 1483.598835102073 " " Order of pole = 37190.704109343285 " " " " "TOP MAIN SOLVE Loop" x[1] = 1.227999999999975 " " y[1] (analytic) = -0.5857554956226044 " " y[1] (numeric) = -0.5857554956225878 " " absolute error = 1.665334536937734800000000000000E-14 " " relative error = 2.8430540547769620000000000000E-12 "%" Correct digits = 14 h = 1.000E-3 " " "Complex estimate of poles used for equation 1" Radius of convergence = 4952.94873436076 " " Order of pole = 1553490.5555047565 " " " " "TOP MAIN SOLVE Loop" x[1] = 1.2289999999999748 " " y[1] (analytic) = -0.5851700329071282 " " y[1] (numeric) = -0.5851700329071114 " " absolute error = 1.676436767183986400000000000000E-14 " " relative error = 2.8648711877049454000000000000E-12 "%" Correct digits = 14 h = 1.000E-3 " " "Complex estimate of poles used for equation 1" Radius of convergence = 2621.007269022172 " " Order of pole = 421609.017806913 " " " " "TOP MAIN SOLVE Loop" x[1] = 1.2299999999999747 " " y[1] (analytic) = -0.5845851553617336 " " y[1] (numeric) = -0.5845851553617168 " " absolute error = 1.676436767183986400000000000000E-14 " " relative error = 2.867737491805842000000000000E-12 "%" Correct digits = 14 h = 1.000E-3 " " "Complex estimate of poles used for equation 1" Radius of convergence = 2879.6544159086543 " " Order of pole = 459124.7538428865 " " " " "TOP MAIN SOLVE Loop" x[1] = 1.2309999999999746 " " y[1] (analytic) = -0.5840008624015431 " " y[1] (numeric) = -0.5840008624015263 " " absolute error = 1.68753899743023800000000000000E-14 " " relative error = 2.889617303801055000000000000E-12 "%" Correct digits = 14 h = 1.000E-3 " " "Complex estimate of poles used for equation 1" Radius of convergence = 3409.978696858757 " " Order of pole = 588413.5125333447 " " " " "TOP MAIN SOLVE Loop" x[1] = 1.2319999999999744 " " y[1] (analytic) = -0.5834171534422636 " " y[1] (numeric) = -0.5834171534422468 " " absolute error = 1.68753899743023800000000000000E-14 " " relative error = 2.892508366395231000000000000E-12 "%" Correct digits = 14 h = 1.000E-3 " " "NO POLE for equation 1" " " "TOP MAIN SOLVE Loop" x[1] = 1.2329999999999743 " " y[1] (analytic) = -0.5828340279001863 " " y[1] (numeric) = -0.5828340279001694 " " absolute error = 1.698641227676489500000000000000E-14 " " relative error = 2.914451020981554000000000000E-12 "%" Correct digits = 14 h = 1.000E-3 " " "Complex estimate of poles used for equation 1" Radius of convergence = 2406.682921438995 " " Order of pole = 266020.9058059539 " " " " "TOP MAIN SOLVE Loop" x[1] = 1.2339999999999742 " " y[1] (analytic) = -0.5822514851921854 " " y[1] (numeric) = -0.5822514851921684 " " absolute error = 1.698641227676489500000000000000E-14 " " relative error = 2.9173669297139093000000000000E-12 "%" Correct digits = 14 h = 1.000E-3 " " "NO POLE for equation 1" " " "TOP MAIN SOLVE Loop" x[1] = 1.2349999999999741 " " y[1] (analytic) = -0.5816695247357182 " " y[1] (numeric) = -0.5816695247357011 " " absolute error = 1.70974345792274100000000000000E-14 " " relative error = 2.9393725908187535000000000000E-12 "%" Correct digits = 14 h = 1.000E-3 " " "NO POLE for equation 1" " " "TOP MAIN SOLVE Loop" x[1] = 1.235999999999974 " " y[1] (analytic) = -0.5810881459488243 " " y[1] (numeric) = -0.5810881459488071 " " absolute error = 1.720845688168992600000000000000E-14 " " relative error = 2.961419364972806000000000000E-12 "%" Correct digits = 14 h = 1.000E-3 " " "Complex estimate of poles used for equation 1" Radius of convergence = 3927.670930590713 " " Order of pole = 859240.0421377545 " " " " "TOP MAIN SOLVE Loop" x[1] = 1.236999999999974 " " y[1] (analytic) = -0.5805073482501246 " " y[1] (numeric) = -0.5805073482501074 " " absolute error = 1.720845688168992600000000000000E-14 " " relative error = 2.964382265541155000000000000E-12 "%" Correct digits = 14 h = 1.000E-3 " " "NO POLE for equation 1" " " "TOP MAIN SOLVE Loop" x[1] = 1.2379999999999738 " " y[1] (analytic) = -0.5799271310588217 " " y[1] (numeric) = -0.5799271310588043 " " absolute error = 1.731947918415244200000000000000E-14 " " relative error = 2.986492311979061000000000000E-12 "%" Correct digits = 14 h = 1.000E-3 " " "Complex estimate of poles used for equation 1" Radius of convergence = 2260.2183325684973 " " Order of pole = 276272.0296814711 " " " " "TOP MAIN SOLVE Loop" x[1] = 1.2389999999999737 " " y[1] (analytic) = -0.5793474937946981 " " y[1] (numeric) = -0.5793474937946806 " " absolute error = 1.743050148661495800000000000000E-14 " " relative error = 3.0086436332788835000000000000E-12 "%" Correct digits = 14 h = 1.000E-3 " " "NO POLE for equation 1" " " "TOP MAIN SOLVE Loop" x[1] = 1.2399999999999736 " " y[1] (analytic) = -0.5787684358781165 " " y[1] (numeric) = -0.5787684358780991 " " absolute error = 1.743050148661495800000000000000E-14 " " relative error = 3.0116537817355443000000000000E-12 "%" Correct digits = 14 h = 1.000E-3 " " "Complex estimate of poles used for equation 1" Radius of convergence = 2047.5350127424938 " " Order of pole = 214267.98116791926 " " " " "TOP MAIN SOLVE Loop" x[1] = 1.2409999999999735 " " y[1] (analytic) = -0.5781899567300192 " " y[1] (numeric) = -0.5781899567300016 " " absolute error = 1.754152378907747300000000000000E-14 " " relative error = 3.033868642112775000000000000E-12 "%" Correct digits = 14 h = 1.000E-3 " " "Complex estimate of poles used for equation 1" Radius of convergence = 3621.677613529326 " " Order of pole = 548809.4785593118 " " " " "TOP MAIN SOLVE Loop" x[1] = 1.2419999999999733 " " y[1] (analytic) = -0.5776120557719266 " " y[1] (numeric) = -0.5776120557719091 " " absolute error = 1.754152378907747300000000000000E-14 " " relative error = 3.03690402819498000000000000E-12 "%" Correct digits = 14 h = 1.000E-3 " " "NO POLE for equation 1" " " "TOP MAIN SOLVE Loop" x[1] = 1.2429999999999732 " " y[1] (analytic) = -0.5770347324259381 " " y[1] (numeric) = -0.5770347324259204 " " absolute error = 1.76525460915399900000000000000E-14 " " relative error = 3.059182593277551000000000000E-12 "%" Correct digits = 14 h = 1.000E-3 " " "Complex estimate of poles used for equation 1" Radius of convergence = 2027.5582041963667 " " Order of pole = 236044.47560914172 " " " " "TOP MAIN SOLVE Loop" x[1] = 1.2439999999999731 " " y[1] (analytic) = -0.57645798611473 " " y[1] (numeric) = -0.5764579861147122 " " absolute error = 1.776356839400250500000000000000E-14 " " relative error = 3.0815026978335760000000000000E-12 "%" Correct digits = 14 h = 1.000E-3 " " "Complex estimate of poles used for equation 1" Radius of convergence = 3476.4854247161056 " " Order of pole = 457930.03210318746 " " " " "TOP MAIN SOLVE Loop" x[1] = 1.244999999999973 " " y[1] (analytic) = -0.5758818162615561 " " y[1] (numeric) = -0.5758818162615382 " " absolute error = 1.78745906964650200000000000000E-14 " " relative error = 3.103864402682698000000000000E-12 "%" Correct digits = 14 h = 1.000E-3 " " "NO POLE for equation 1" " " "TOP MAIN SOLVE Loop" x[1] = 1.245999999999973 " " y[1] (analytic) = -0.5753062222902464 " " y[1] (numeric) = -0.5753062222902285 " " absolute error = 1.78745906964650200000000000000E-14 " " relative error = 3.1069698195350215000000000000E-12 "%" Correct digits = 14 h = 1.000E-3 " " "Complex estimate of poles used for equation 1" Radius of convergence = 1968.56302524313 " " Order of pole = 290712.4262233985 " " " " "TOP MAIN SOLVE Loop" x[1] = 1.2469999999999728 " " y[1] (analytic) = -0.5747312036252069 " " y[1] (numeric) = -0.574731203625189 " " absolute error = 1.78745906964650200000000000000E-14 " " relative error = 3.1100783433574250000000000000E-12 "%" Correct digits = 14 h = 1.000E-3 " " "NO POLE for equation 1" " " "TOP MAIN SOLVE Loop" x[1] = 1.2479999999999727 " " y[1] (analytic) = -0.574156759691419 " " y[1] (numeric) = -0.574156759691401 " " absolute error = 1.798561299892753600000000000000E-14 " " relative error = 3.1325265609681086000000000000E-12 "%" Correct digits = 14 h = 1.000E-3 " " "Complex estimate of poles used for equation 1" Radius of convergence = 2611.046404482278 " " Order of pole = 346653.30836248724 " " " " "TOP MAIN SOLVE Loop" x[1] = 1.2489999999999726 " " y[1] (analytic) = -0.5735828899144386 " " y[1] (numeric) = -0.5735828899144205 " " absolute error = 1.809663530139005200000000000000E-14 " " relative error = 3.15501658427948030000000000E-12 "%" Correct digits = 14 h = 1.000E-3 " " "Complex estimate of poles used for equation 1" Radius of convergence = 13856.376282754987 " " Order of pole = 9547665.83218595 " " " " "TOP MAIN SOLVE Loop" x[1] = 1.2499999999999725 " " y[1] (analytic) = -0.5730095937203961 " " y[1] (numeric) = -0.5730095937203777 " " absolute error = 1.831867990631508300000000000000E-14 " " relative error = 3.1969237700501413000000000000E-12 "%" Correct digits = 14 h = 1.000E-3 " " "Complex estimate of poles used for equation 1" Radius of convergence = 1919.894079107289 " " Order of pole = 224236.23086574164 " " " " "TOP MAIN SOLVE Loop" x[1] = 1.2509999999999724 " " y[1] (analytic) = -0.5724368705359948 " " y[1] (numeric) = -0.5724368705359765 " " absolute error = 1.831867990631508300000000000000E-14 " " relative error = 3.2001222928150300000000000000E-12 "%" Correct digits = 14 h = 1.000E-3 " " "NO POLE for equation 1" " " "TOP MAIN SOLVE Loop" x[1] = 1.2519999999999722 " " y[1] (analytic) = -0.5718647197885118 " " y[1] (numeric) = -0.5718647197884934 " " absolute error = 1.8429702208777599000000000000E-14 " " relative error = 3.2227381006461300000000000000E-12 "%" Correct digits = 14 h = 1.000E-3 " " "Complex estimate of poles used for equation 1" Radius of convergence = 1915.3167185129369 " " Order of pole = 265687.4338183116 " " " " "TOP MAIN SOLVE Loop" x[1] = 1.2529999999999721 " " y[1] (analytic) = -0.5712931409057963 " " y[1] (numeric) = -0.5712931409057779 " " absolute error = 1.8429702208777599000000000000E-14 " " relative error = 3.2259624506530830000000000000E-12 "%" Correct digits = 14 h = 1.000E-3 " " "NO POLE for equation 1" " " "TOP MAIN SOLVE Loop" x[1] = 1.253999999999972 " " y[1] (analytic) = -0.5707221333162693 " " y[1] (numeric) = -0.5707221333162508 " " absolute error = 1.854072451124011400000000000000E-14 " " relative error = 3.248642978590363000000000000E-12 "%" Correct digits = 14 h = 1.000E-3 " " "NO POLE for equation 1" " " "TOP MAIN SOLVE Loop" x[1] = 1.254999999999972 " " y[1] (analytic) = -0.5701516964489232 " " y[1] (numeric) = -0.5701516964489046 " " absolute error = 1.854072451124011400000000000000E-14 " " relative error = 3.2518932464320180000000000000E-12 "%" Correct digits = 14 h = 1.000E-3 " " "NO POLE for equation 1" " " "TOP MAIN SOLVE Loop" x[1] = 1.2559999999999718 " " y[1] (analytic) = -0.5695818297333209 " " y[1] (numeric) = -0.5695818297333024 " " absolute error = 1.854072451124011400000000000000E-14 " " relative error = 3.2551467661671910000000000000E-12 "%" Correct digits = 14 h = 1.000E-3 " " "Complex estimate of poles used for equation 1" Radius of convergence = 4247.637958905170 " " Order of pole = 1000757.4910839411 " " " " "TOP MAIN SOLVE Loop" x[1] = 1.2569999999999717 " " y[1] (analytic) = -0.569012532599596 " " y[1] (numeric) = -0.5690125325995774 " " absolute error = 1.86517468137026300000000000000E-14 " " relative error = 3.2779149394987983000000000000E-12 "%" Correct digits = 14 h = 1.000E-3 " " "NO POLE for equation 1" " " "TOP MAIN SOLVE Loop" x[1] = 1.2579999999999716 " " y[1] (analytic) = -0.5684438044784511 " " y[1] (numeric) = -0.5684438044784323 " " absolute error = 1.876276911616514600000000000000E-14 " " relative error = 3.3007254135490210000000000000E-12 "%" Correct digits = 14 h = 1.000E-3 " " "NO POLE for equation 1" " " "TOP MAIN SOLVE Loop" x[1] = 1.2589999999999715 " " y[1] (analytic) = -0.567875644801158 " " y[1] (numeric) = -0.5678756448011392 " " absolute error = 1.88737914186276600000000000000E-14 " " relative error = 3.3235782501706570000000000000E-12 "%" Correct digits = 14 h = 1.000E-3 " " "NO POLE for equation 1" " " "TOP MAIN SOLVE Loop" x[1] = 1.2599999999999714 " " y[1] (analytic) = -0.567308052999557 " " y[1] (numeric) = -0.5673080529995381 " " absolute error = 1.88737914186276600000000000000E-14 " " relative error = 3.3269034907640205000000000000E-12 "%" Correct digits = 14 h = 1.000E-3 " " "NO POLE for equation 1" " " "TOP MAIN SOLVE Loop" x[1] = 1.2609999999999713 " " y[1] (analytic) = -0.5667410285060562 " " y[1] (numeric) = -0.5667410285060374 " " absolute error = 1.88737914186276600000000000000E-14 " " relative error = 3.3302320582611530000000000000E-12 "%" Correct digits = 14 h = 1.000E-3 " " "Complex estimate of poles used for equation 1" Radius of convergence = 2263.948827249753 " " Order of pole = 265545.04077500047 " " " " "TOP MAIN SOLVE Loop" x[1] = 1.2619999999999711 " " y[1] (analytic) = -0.5661745707536313 " " y[1] (numeric) = -0.5661745707536123 " " absolute error = 1.898481372109017700000000000000E-14 " " relative error = 3.353173155731741000000000000E-12 "%" Correct digits = 14 h = 1.000E-3 " " "NO POLE for equation 1" " " "TOP MAIN SOLVE Loop" x[1] = 1.262999999999971 " " y[1] (analytic) = -0.5656086791758242 " " y[1] (numeric) = -0.5656086791758053 " " absolute error = 1.898481372109017700000000000000E-14 " " relative error = 3.356528006033052000000000000E-12 "%" Correct digits = 14 h = 1.000E-3 " " "NO POLE for equation 1" " " "TOP MAIN SOLVE Loop" x[1] = 1.263999999999971 " " y[1] (analytic) = -0.5650433532067436 " " y[1] (numeric) = -0.5650433532067245 " " absolute error = 1.909583602355269200000000000000E-14 " " relative error = 3.3795346702478100000000000000E-12 "%" Correct digits = 14 h = 1.000E-3 " " "Complex estimate of poles used for equation 1" Radius of convergence = 1781.8204506069708 " " Order of pole = 215063.3510171202 " " " " "TOP MAIN SOLVE Loop" x[1] = 1.2649999999999708 " " y[1] (analytic) = -0.5644785922810631 " " y[1] (numeric) = -0.564478592281044 " " absolute error = 1.909583602355269200000000000000E-14 " " relative error = 3.3829158952487900000000000000E-12 "%" Correct digits = 14 h = 1.000E-3 " " "NO POLE for equation 1" " " "TOP MAIN SOLVE Loop" x[1] = 1.2659999999999707 " " y[1] (analytic) = -0.563914395834022 " " y[1] (numeric) = -0.5639143958340028 " " absolute error = 1.920685832601520800000000000000E-14 " " relative error = 3.405988296789003700000000000E-12 "%" Correct digits = 14 h = 1.000E-3 " " "NO POLE for equation 1" " " "TOP MAIN SOLVE Loop" x[1] = 1.2669999999999706 " " y[1] (analytic) = -0.5633507633014238 " " y[1] (numeric) = -0.5633507633014044 " " absolute error = 1.931788062847772400000000000000E-14 " " relative error = 3.4291034799116077000000000000E-12 "%" Correct digits = 14 h = 1.000E-3 " " "Complex estimate of poles used for equation 1" Radius of convergence = 3529.95223986209 " " Order of pole = 889697.4037405794 " " " " "TOP MAIN SOLVE Loop" x[1] = 1.2679999999999705 " " y[1] (analytic) = -0.5627876941196357 " " y[1] (numeric) = -0.5627876941196164 " " absolute error = 1.931788062847772400000000000000E-14 " " relative error = 3.432534298514919000000000000E-12 "%" Correct digits = 14 h = 1.000E-3 " " "Complex estimate of poles used for equation 1" Radius of convergence = 2101.5360415545124 " " Order of pole = 364911.2611788677 " " " " "TOP MAIN SOLVE Loop" x[1] = 1.2689999999999704 " " y[1] (analytic) = -0.5622251877255887 " " y[1] (numeric) = -0.5622251877255693 " " absolute error = 1.94289029309402400000000000000E-14 " " relative error = 3.4557154953404740000000000000E-12 "%" Correct digits = 14 h = 1.000E-3 " " "NO POLE for equation 1" " " "TOP MAIN SOLVE Loop" x[1] = 1.2699999999999703 " " y[1] (analytic) = -0.5616632435567762 " " y[1] (numeric) = -0.5616632435567568 " " absolute error = 1.94289029309402400000000000000E-14 " " relative error = 3.459172939269659000000000000E-12 "%" Correct digits = 14 h = 1.000E-3 " " "Complex estimate of poles used for equation 1" Radius of convergence = 975.0077524787789 " " Order of pole = 142928.726697816 " " " " "TOP MAIN SOLVE Loop" x[1] = 1.2709999999999702 " " y[1] (analytic) = -0.5611018610512541 " " y[1] (numeric) = -0.5611018610512346 " " absolute error = 1.953992523340275500000000000000E-14 " " relative error = 3.48242032147134000000000000E-12 "%" Correct digits = 14 h = 1.000E-3 " " "NO POLE for equation 1" " " "TOP MAIN SOLVE Loop" x[1] = 1.27199999999997 " " y[1] (analytic) = -0.5605410396476399 " " y[1] (numeric) = -0.5605410396476203 " " absolute error = 1.96509475358652700000000000000E-14 " " relative error = 3.5057107590584263000000000000E-12 "%" Correct digits = 14 h = 1.000E-3 " " "NO POLE for equation 1" " " "TOP MAIN SOLVE Loop" x[1] = 1.27299999999997 " " y[1] (analytic) = -0.559980778785112 " " y[1] (numeric) = -0.5599807787850923 " " absolute error = 1.96509475358652700000000000000E-14 " " relative error = 3.509218223257295000000000000E-12 "%" Correct digits = 14 h = 1.000E-3 " " "NO POLE for equation 1" " " "TOP MAIN SOLVE Loop" x[1] = 1.2739999999999698 " " y[1] (analytic) = -0.5594210779034096 " " y[1] (numeric) = -0.5594210779033898 " " absolute error = 1.976196983832778600000000000000E-14 " " relative error = 3.532575124339508000000000000E-12 "%" Correct digits = 14 h = 1.000E-3 " " "Complex estimate of poles used for equation 1" Radius of convergence = 2773.4689516313247 " " Order of pole = 462180.03064452874 " " " " "TOP MAIN SOLVE Loop" x[1] = 1.2749999999999697 " " y[1] (analytic) = -0.5588619364428317 " " y[1] (numeric) = -0.5588619364428118 " " absolute error = 1.987299214079030200000000000000E-14 " " relative error = 3.5559752498590846000000000000E-12 "%" Correct digits = 14 h = 1.000E-3 " " "NO POLE for equation 1" " " "TOP MAIN SOLVE Loop" x[1] = 1.2759999999999696 " " y[1] (analytic) = -0.5583033538442367 " " y[1] (numeric) = -0.5583033538442168 " " absolute error = 1.987299214079030200000000000000E-14 " " relative error = 3.5595330036893796000000000000E-12 "%" Correct digits = 14 h = 1.000E-3 " " "Complex estimate of poles used for equation 1" Radius of convergence = 1629.219640147407 " " Order of pole = 143356.865327527 " " " " "TOP MAIN SOLVE Loop" x[1] = 1.2769999999999695 " " y[1] (analytic) = -0.5577453295490421 " " y[1] (numeric) = -0.5577453295490222 " " absolute error = 1.987299214079030200000000000000E-14 " " relative error = 3.563094317052974000000000000E-12 "%" Correct digits = 14 h = 1.000E-3 " " "NO POLE for equation 1" " " "TOP MAIN SOLVE Loop" x[1] = 1.2779999999999694 " " y[1] (analytic) = -0.5571878629992236 " " y[1] (numeric) = -0.5571878629992036 " " absolute error = 1.998401444325281800000000000000E-14 " " relative error = 3.5865846638659940000000000000E-12 "%" Correct digits = 14 h = 1.000E-3 " " "NO POLE for equation 1" " " "TOP MAIN SOLVE Loop" x[1] = 1.2789999999999693 " " y[1] (analytic) = -0.5566309536373144 " " y[1] (numeric) = -0.5566309536372945 " " absolute error = 1.987299214079030200000000000000E-14 " " relative error = 3.5702276366288827000000000000E-12 "%" Correct digits = 14 h = 1.000E-3 " " "NO POLE for equation 1" " " "TOP MAIN SOLVE Loop" x[1] = 1.2799999999999692 " " y[1] (analytic) = -0.5560746009064054 " " y[1] (numeric) = -0.5560746009063854 " " absolute error = 1.998401444325281800000000000000E-14 " " relative error = 3.593765011147558000000000000E-12 "%" Correct digits = 14 h = 1.000E-3 " " "NO POLE for equation 1" " " "TOP MAIN SOLVE Loop" x[1] = 1.280999999999969 " " y[1] (analytic) = -0.5555188042501435 " " y[1] (numeric) = -0.5555188042501235 " " absolute error = 2.009503674571533300000000000000E-14 " " relative error = 3.6173459101605454000000000000E-12 "%" Correct digits = 14 h = 1.000E-3 " " "Complex estimate of poles used for equation 1" Radius of convergence = 2076.5291526774377 " " Order of pole = 248406.01851728765 " " " " "TOP MAIN SOLVE Loop" x[1] = 1.281999999999969 " " y[1] (analytic) = -0.5549635631127323 " " y[1] (numeric) = -0.5549635631127121 " " absolute error = 2.02060590481778500000000000000E-14 " " relative error = 3.640970397199446000000000000E-12 "%" Correct digits = 14 h = 1.000E-3 " " "Complex estimate of poles used for equation 1" Radius of convergence = 4802.9571356529505 " " Order of pole = 1278321.9228181741 " " " " "TOP MAIN SOLVE Loop" x[1] = 1.2829999999999688 " " y[1] (analytic) = -0.5544088769389304 " " y[1] (numeric) = -0.5544088769389102 " " absolute error = 2.02060590481778500000000000000E-14 " " relative error = 3.644613188688824000000000000E-12 "%" Correct digits = 14 h = 1.000E-3 " " "NO POLE for equation 1" " " "TOP MAIN SOLVE Loop" x[1] = 1.2839999999999687 " " y[1] (analytic) = -0.5538547451740516 " " y[1] (numeric) = -0.5538547451740313 " " absolute error = 2.031708135064036500000000000000E-14 " " relative error = 3.668305007345495000000000000E-12 "%" Correct digits = 14 h = 1.000E-3 " " "Complex estimate of poles used for equation 1" Radius of convergence = 2649.7157303022836 " " Order of pole = 469242.7083469531 " " " " "TOP MAIN SOLVE Loop" x[1] = 1.2849999999999686 " " y[1] (analytic) = -0.5533011672639642 " " y[1] (numeric) = -0.5533011672639438 " " absolute error = 2.031708135064036500000000000000E-14 " " relative error = 3.6719751471168804000000000000E-12 "%" Correct digits = 14 h = 1.000E-3 " " "Complex estimate of poles used for equation 1" Radius of convergence = 1558.9787045106684 " " Order of pole = 261231.11693834962 " " " " "TOP MAIN SOLVE Loop" x[1] = 1.2859999999999685 " " y[1] (analytic) = -0.5527481426550901 " " y[1] (numeric) = -0.5527481426550697 " " absolute error = 2.04281036531028800000000000000E-14 " " relative error = 3.695734472300133400000000000E-12 "%" Correct digits = 14 h = 1.000E-3 " " "NO POLE for equation 1" " " "TOP MAIN SOLVE Loop" x[1] = 1.2869999999999684 " " y[1] (analytic) = -0.5521956707944047 " " y[1] (numeric) = -0.5521956707943843 " " absolute error = 2.04281036531028800000000000000E-14 " " relative error = 3.699432055255779000000000000E-12 "%" Correct digits = 14 h = 1.000E-3 " " "NO POLE for equation 1" " " "TOP MAIN SOLVE Loop" x[1] = 1.2879999999999683 " " y[1] (analytic) = -0.5516437511294362 " " y[1] (numeric) = -0.5516437511294157 " " absolute error = 2.053912595556539600000000000000E-14 " " relative error = 3.723259062304895000000000000E-12 "%" Correct digits = 14 h = 1.000E-3 " " "NO POLE for equation 1" " " "TOP MAIN SOLVE Loop" x[1] = 1.2889999999999682 " " y[1] (analytic) = -0.5510923831082647 " " y[1] (numeric) = -0.5510923831082442 " " absolute error = 2.053912595556539600000000000000E-14 " " relative error = 3.72698418361743000000000000E-12 "%" Correct digits = 14 h = 1.000E-3 " " "NO POLE for equation 1" " " "TOP MAIN SOLVE Loop" x[1] = 1.289999999999968 " " y[1] (analytic) = -0.5505415661795222 " " y[1] (numeric) = -0.5505415661795017 " " absolute error = 2.053912595556539600000000000000E-14 " " relative error = 3.730713031914457700000000000E-12 "%" Correct digits = 14 h = 1.000E-3 " " "NO POLE for equation 1" " " "TOP MAIN SOLVE Loop" x[1] = 1.290999999999968 " " y[1] (analytic) = -0.5499912997923919 " " y[1] (numeric) = -0.5499912997923713 " " absolute error = 2.065014825802791200000000000000E-14 " " relative error = 3.754631803416314000000000000E-12 "%" Correct digits = 14 h = 1.000E-3 " " "NO POLE for equation 1" " " "TOP MAIN SOLVE Loop" x[1] = 1.2919999999999678 " " y[1] (analytic) = -0.5494415833966071 " " y[1] (numeric) = -0.5494415833965864 " " absolute error = 2.065014825802791200000000000000E-14 " " relative error = 3.758388313161561000000000000E-12 "%" Correct digits = 14 h = 1.000E-3 " " "NO POLE for equation 1" " " "TOP MAIN SOLVE Loop" x[1] = 1.2929999999999677 " " y[1] (analytic) = -0.5488924164424516 " " y[1] (numeric) = -0.5488924164424308 " " absolute error = 2.076117056049042700000000000000E-14 " " relative error = 3.782375186571214600000000000E-12 "%" Correct digits = 14 h = 1.000E-3 " " "Complex estimate of poles used for equation 1" Radius of convergence = 1644.3977737871019 " " Order of pole = 121435.08147231821 " " " " "TOP MAIN SOLVE Loop" x[1] = 1.2939999999999676 " " y[1] (analytic) = -0.5483437983807583 " " y[1] (numeric) = -0.5483437983807373 " " absolute error = 2.09832151654154600000000000000E-14 " " relative error = 3.826653137571396400000000000E-12 "%" Correct digits = 14 h = 1.000E-3 " " "NO POLE for equation 1" " " "TOP MAIN SOLVE Loop" x[1] = 1.2949999999999675 " " y[1] (analytic) = -0.5477957286629089 " " y[1] (numeric) = -0.547795728662888 " " absolute error = 2.09832151654154600000000000000E-14 " " relative error = 3.830481704673472000000000000E-12 "%" Correct digits = 14 h = 1.000E-3 " " "NO POLE for equation 1" " " "TOP MAIN SOLVE Loop" x[1] = 1.2959999999999674 " " y[1] (analytic) = -0.547248206740834 " " y[1] (numeric) = -0.5472482067408129 " " absolute error = 2.109423746787797400000000000000E-14 " " relative error = 3.854601478459991000000000000E-12 "%" Correct digits = 14 h = 1.000E-3 " " "NO POLE for equation 1" " " "TOP MAIN SOLVE Loop" x[1] = 1.2969999999999673 " " y[1] (analytic) = -0.5467012320670113 " " y[1] (numeric) = -0.5467012320669902 " " absolute error = 2.109423746787797400000000000000E-14 " " relative error = 3.858458007881784300000000000E-12 "%" Correct digits = 14 h = 1.000E-3 " " "Complex estimate of poles used for equation 1" Radius of convergence = 2331.609069535808 " " Order of pole = 317794.3129157722 " " " " "TOP MAIN SOLVE Loop" x[1] = 1.2979999999999672 " " y[1] (analytic) = -0.5461548040944663 " " y[1] (numeric) = -0.5461548040944451 " " absolute error = 2.12052597703404900000000000000E-14 " " relative error = 3.882646387318548500000000000E-12 "%" Correct digits = 14 h = 1.000E-3 " " "NO POLE for equation 1" " " "TOP MAIN SOLVE Loop" x[1] = 1.298999999999967 " " y[1] (analytic) = -0.5456089222767709 " " y[1] (numeric) = -0.5456089222767496 " " absolute error = 2.131628207280300600000000000000E-14 " " relative error = 3.906879305391912000000000000E-12 "%" Correct digits = 14 h = 1.000E-3 " " "Complex estimate of poles used for equation 1" Radius of convergence = 2539.3815821362623 " " Order of pole = 585601.7198765352 " " " " "TOP MAIN SOLVE Loop" x[1] = 1.299999999999967 " " y[1] (analytic) = -0.5450635860680433 " " y[1] (numeric) = -0.5450635860680219 " " absolute error = 2.14273043752655200000000000000E-14 " " relative error = 3.931156827011121000000000000E-12 "%" Correct digits = 14 h = 1.000E-3 " " "Complex estimate of poles used for equation 1" Radius of convergence = 1438.4352880059628 " " Order of pole = 65534.563872355415 " " " " "TOP MAIN SOLVE Loop" x[1] = 1.3009999999999668 " " y[1] (analytic) = -0.544518794922947 " " y[1] (numeric) = -0.5445187949229257 " " absolute error = 2.131628207280300600000000000000E-14 " " relative error = 3.9147008829730845000000000000E-12 "%" Correct digits = 14 h = 1.000E-3 " " "NO POLE for equation 1" " " "TOP MAIN SOLVE Loop" x[1] = 1.3019999999999667 " " y[1] (analytic) = -0.5439745482966911 " " y[1] (numeric) = -0.5439745482966697 " " absolute error = 2.14273043752655200000000000000E-14 " " relative error = 3.9390270082229617000000000000E-12 "%" Correct digits = 14 h = 1.000E-3 " " "Complex estimate of poles used for equation 1" Radius of convergence = 1440.2241080959875 " " Order of pole = 304587.59368447575 " " " " "TOP MAIN SOLVE Loop" x[1] = 1.3029999999999666 " " y[1] (analytic) = -0.5434308456450289 " " y[1] (numeric) = -0.5434308456450074 " " absolute error = 2.14273043752655200000000000000E-14 " " relative error = 3.942968005401356600000000000E-12 "%" Correct digits = 14 h = 1.000E-3 " " "Complex estimate of poles used for equation 1" Radius of convergence = 6037.038930914430 " " Order of pole = 1969360.0366660217 " " " " "TOP MAIN SOLVE Loop" x[1] = 1.3039999999999665 " " y[1] (analytic) = -0.5428876864242576 " " y[1] (numeric) = -0.542887686424236 " " absolute error = 2.153832667772803700000000000000E-14 " " relative error = 3.967363271690822000000000000E-12 "%" Correct digits = 14 h = 1.000E-3 " " "NO POLE for equation 1" " " "TOP MAIN SOLVE Loop" x[1] = 1.3049999999999664 " " y[1] (analytic) = -0.542345070091218 " " y[1] (numeric) = -0.5423450700911963 " " absolute error = 2.176037128265306800000000000000E-14 " " relative error = 4.012274192700443000000000000E-12 "%" Correct digits = 14 h = 1.000E-3 " " "NO POLE for equation 1" " " "TOP MAIN SOLVE Loop" x[1] = 1.3059999999999663 " " y[1] (analytic) = -0.5418029961032936 " " y[1] (numeric) = -0.5418029961032719 " " absolute error = 2.176037128265306800000000000000E-14 " " relative error = 4.016288473699119000000000000E-12 "%" Correct digits = 14 h = 1.000E-3 " " "NO POLE for equation 1" " " "TOP MAIN SOLVE Loop" x[1] = 1.3069999999999662 " " y[1] (analytic) = -0.5412614639184105 " " y[1] (numeric) = -0.5412614639183887 " " absolute error = 2.176037128265306800000000000000E-14 " " relative error = 4.020306770986603000000000000E-12 "%" Correct digits = 14 h = 1.000E-3 " " "NO POLE for equation 1" " " "TOP MAIN SOLVE Loop" x[1] = 1.307999999999966 " " y[1] (analytic) = -0.5407204729950364 " " y[1] (numeric) = -0.5407204729950146 " " absolute error = 2.187139358511558400000000000000E-14 " " relative error = 4.044861379849465000000000000E-12 "%" Correct digits = 14 h = 1.000E-3 " " "NO POLE for equation 1" " " "TOP MAIN SOLVE Loop" x[1] = 1.308999999999966 " " y[1] (analytic) = -0.5401800227921804 " " y[1] (numeric) = -0.5401800227921585 " " absolute error = 2.187139358511558400000000000000E-14 " " relative error = 4.048908264334316000000000000E-12 "%" Correct digits = 14 h = 1.000E-3 " " "Complex estimate of poles used for equation 1" Radius of convergence = 1704.581090299314 " " Order of pole = 64983.9500233426 " " " " "TOP MAIN SOLVE Loop" x[1] = 1.3099999999999659 " " y[1] (analytic) = -0.5396401127693922 " " y[1] (numeric) = -0.5396401127693702 " " absolute error = 2.1982415887578100000000000000E-14 " " relative error = 4.0735325946705490000000000000E-12 "%" Correct digits = 14 h = 1.000E-3 " " "Complex estimate of poles used for equation 1" Radius of convergence = 9631.338530223411 " " Order of pole = 6014969.201985254 " " " " "TOP MAIN SOLVE Loop" x[1] = 1.3109999999999657 " " y[1] (analytic) = -0.5391007423867616 " " y[1] (numeric) = -0.5391007423867397 " " absolute error = 2.1982415887578100000000000000E-14 " " relative error = 4.077608164710609400000000000E-12 "%" Correct digits = 14 h = 1.000E-3 " " "Complex estimate of poles used for equation 1" Radius of convergence = 1535.165299003958 " " Order of pole = 21372.541710398185 " " " " "TOP MAIN SOLVE Loop" x[1] = 1.3119999999999656 " " y[1] (analytic) = -0.5385619111049185 " " y[1] (numeric) = -0.5385619111048964 " " absolute error = 2.209343819004061500000000000000E-14 " " relative error = 4.102302397270078000000000000E-12 "%" Correct digits = 14 h = 1.000E-3 " " "Complex estimate of poles used for equation 1" Radius of convergence = 1634.2829972133015 " " Order of pole = 135008.3262770664 " " " " "TOP MAIN SOLVE Loop" x[1] = 1.3129999999999655 " " y[1] (analytic) = -0.5380236183850313 " " y[1] (numeric) = -0.5380236183850091 " " absolute error = 2.22044604925031300000000000000E-14 " " relative error = 4.127041961308978700000000000E-12 "%" Correct digits = 14 h = 1.000E-3 " " "NO POLE for equation 1" " " "TOP MAIN SOLVE Loop" x[1] = 1.3139999999999654 " " y[1] (analytic) = -0.5374858636888074 " " y[1] (numeric) = -0.537485863688785 " " absolute error = 2.231548279496564600000000000000E-14 " " relative error = 4.1518269228166765000000000000E-12 "%" Correct digits = 14 h = 1.000E-3 " " "NO POLE for equation 1" " " "TOP MAIN SOLVE Loop" x[1] = 1.3149999999999653 " " y[1] (analytic) = -0.5369486464784918 " " y[1] (numeric) = -0.5369486464784695 " " absolute error = 2.231548279496564600000000000000E-14 " " relative error = 4.155980826345098000000000000E-12 "%" Correct digits = 14 h = 1.000E-3 " " "NO POLE for equation 1" " " "TOP MAIN SOLVE Loop" x[1] = 1.3159999999999652 " " y[1] (analytic) = -0.5364119662168675 " " y[1] (numeric) = -0.5364119662168452 " " absolute error = 2.231548279496564600000000000000E-14 " " relative error = 4.160138885854694000000000000E-12 "%" Correct digits = 14 h = 1.000E-3 " " "Complex estimate of poles used for equation 1" Radius of convergence = 4805.208100715023 " " Order of pole = 1298335.7317768373 " " " " "TOP MAIN SOLVE Loop" x[1] = 1.316999999999965 " " y[1] (analytic) = -0.5358758223672542 " " y[1] (numeric) = -0.5358758223672317 " " absolute error = 2.242650509742816200000000000000E-14 " " relative error = 4.185019021451299000000000000E-12 "%" Correct digits = 14 h = 1.000E-3 " " "NO POLE for equation 1" " " "TOP MAIN SOLVE Loop" x[1] = 1.317999999999965 " " y[1] (analytic) = -0.5353402143935079 " " y[1] (numeric) = -0.5353402143934853 " " absolute error = 2.253752739989067800000000000000E-14 " " relative error = 4.209944777906076700000000000E-12 "%" Correct digits = 14 h = 1.000E-3 " " "Complex estimate of poles used for equation 1" Radius of convergence = 2318.797462171943 " " Order of pole = 291752.2546627242 " " " " "TOP MAIN SOLVE Loop" x[1] = 1.3189999999999649 " " y[1] (analytic) = -0.5348051417600206 " " y[1] (numeric) = -0.5348051417599979 " " absolute error = 2.264854970235319300000000000000E-14 " " relative error = 4.234916221601347500000000000E-12 "%" Correct digits = 14 h = 1.000E-3 " " "NO POLE for equation 1" " " "TOP MAIN SOLVE Loop" x[1] = 1.3199999999999648 " " y[1] (analytic) = -0.5342706039317195 " " y[1] (numeric) = -0.5342706039316969 " " absolute error = 2.264854970235319300000000000000E-14 " " relative error = 4.239153255987055400000000000E-12 "%" Correct digits = 14 h = 1.000E-3 " " "NO POLE for equation 1" " " "TOP MAIN SOLVE Loop" x[1] = 1.3209999999999646 " " y[1] (analytic) = -0.533736600374067 " " y[1] (numeric) = -0.5337366003740442 " " absolute error = 2.27595720048157100000000000000E-14 " " relative error = 4.2641954831024814000000000000E-12 "%" Correct digits = 14 h = 1.000E-3 " " "Complex estimate of poles used for equation 1" Radius of convergence = 1704.8573206099952 " " Order of pole = 87749.54204968738 " " " " "TOP MAIN SOLVE Loop" x[1] = 1.3219999999999645 " " y[1] (analytic) = -0.5332031305530593 " " y[1] (numeric) = -0.5332031305530365 " " absolute error = 2.287059430727822500000000000000E-14 " " relative error = 4.289283576327832000000000000E-12 "%" Correct digits = 14 h = 1.000E-3 " " "Complex estimate of poles used for equation 1" Radius of convergence = 5632.534573274892 " " Order of pole = 1917413.815381472 " " " " "TOP MAIN SOLVE Loop" x[1] = 1.3229999999999644 " " y[1] (analytic) = -0.5326701939352266 " " y[1] (numeric) = -0.5326701939352038 " " absolute error = 2.287059430727822500000000000000E-14 " " relative error = 4.293575005261007000000000000E-12 "%" Correct digits = 14 h = 1.000E-3 " " "Complex estimate of poles used for equation 1" Radius of convergence = 4395.304859787294 " " Order of pole = 1313999.9754700132 " " " " "TOP MAIN SOLVE Loop" x[1] = 1.3239999999999643 " " y[1] (analytic) = -0.5321377899876323 " " y[1] (numeric) = -0.5321377899876093 " " absolute error = 2.29816166097407400000000000000E-14 " " relative error = 4.318734177904348700000000000E-12 "%" Correct digits = 14 h = 1.000E-3 " " "Complex estimate of poles used for equation 1" Radius of convergence = 5634.4708517240815 " " Order of pole = 1272220.7992818316 " " " " "TOP MAIN SOLVE Loop" x[1] = 1.3249999999999642 " " y[1] (analytic) = -0.5316059181778722 " " y[1] (numeric) = -0.5316059181778492 " " absolute error = 2.29816166097407400000000000000E-14 " " relative error = 4.323055072169310600000000000E-12 "%" Correct digits = 14 h = 1.000E-3 " " "Complex estimate of poles used for equation 1" Radius of convergence = 1418.1116611355521 " " Order of pole = 156569.9713666137 " " " " "TOP MAIN SOLVE Loop" x[1] = 1.325999999999964 " " y[1] (analytic) = -0.5310745779740746 " " y[1] (numeric) = -0.5310745779740516 " " absolute error = 2.309263891220325600000000000000E-14 " " relative error = 4.3482855082795110000000000000E-12 "%" Correct digits = 14 h = 1.000E-3 " " "Complex estimate of poles used for equation 1" Radius of convergence = 3794.404842681167 " " Order of pole = 1011587.1985274864 " " " " "TOP MAIN SOLVE Loop" x[1] = 1.326999999999964 " " y[1] (analytic) = -0.5305437688448993 " " y[1] (numeric) = -0.5305437688448762 " " absolute error = 2.309263891220325600000000000000E-14 " " relative error = 4.3526359686554394000000000000E-12 "%" Correct digits = 14 h = 1.000E-3 " " "Complex estimate of poles used for equation 1" Radius of convergence = 3983.598710733876 " " Order of pole = 855834.8340880274 " " " " "TOP MAIN SOLVE Loop" x[1] = 1.3279999999999639 " " y[1] (analytic) = -0.530013490259537 " " y[1] (numeric) = -0.5300134902595138 " " absolute error = 2.320366121466577200000000000000E-14 " " relative error = 4.377937852733409000000000000E-12 "%" Correct digits = 14 h = 1.000E-3 " " "NO POLE for equation 1" " " "TOP MAIN SOLVE Loop" x[1] = 1.3289999999999638 " " y[1] (analytic) = -0.5294837416877092 " " y[1] (numeric) = -0.529483741687686 " " absolute error = 2.320366121466577200000000000000E-14 " " relative error = 4.382317980284907000000000000E-12 "%" Correct digits = 14 h = 1.000E-3 " " "Complex estimate of poles used for equation 1" Radius of convergence = 2359.945050402312 " " Order of pole = 332866.06141970266 " " " " "TOP MAIN SOLVE Loop" x[1] = 1.3299999999999637 " " y[1] (analytic) = -0.5289545225996671 " " y[1] (numeric) = -0.5289545225996439 " " absolute error = 2.320366121466577200000000000000E-14 " " relative error = 4.386702490154751300000000000E-12 "%" Correct digits = 14 h = 1.000E-3 " " "NO POLE for equation 1" " " "TOP MAIN SOLVE Loop" x[1] = 1.3309999999999635 " " y[1] (analytic) = -0.5284258324661918 " " y[1] (numeric) = -0.5284258324661685 " " absolute error = 2.331468351712828700000000000000E-14 " " relative error = 4.4121013933625100000000000000E-12 "%" Correct digits = 14 h = 1.000E-3 " " "Complex estimate of poles used for equation 1" Radius of convergence = 2013.687411255679 " " Order of pole = 145739.5344957388 " " " " "TOP MAIN SOLVE Loop" x[1] = 1.3319999999999634 " " y[1] (analytic) = -0.527897670758593 " " y[1] (numeric) = -0.5278976707585695 " " absolute error = 2.342570581959080300000000000000E-14 " " relative error = 4.437546728692302600000000000E-12 "%" Correct digits = 14 h = 1.000E-3 " " "Complex estimate of poles used for equation 1" Radius of convergence = 1565.7208976245824 " " Order of pole = 363238.5960960776 " " " " "TOP MAIN SOLVE Loop" x[1] = 1.3329999999999633 " " y[1] (analytic) = -0.5273700369487089 " " y[1] (numeric) = -0.5273700369486853 " " absolute error = 2.35367281220533200000000000000E-14 " " relative error = 4.4630385636305050000000000000E-12 "%" Correct digits = 14 h = 1.000E-3 " " "NO POLE for equation 1" " " "TOP MAIN SOLVE Loop" x[1] = 1.3339999999999632 " " y[1] (analytic) = -0.5268429305089056 " " y[1] (numeric) = -0.5268429305088821 " " absolute error = 2.35367281220533200000000000000E-14 " " relative error = 4.467503834457443000000000000E-12 "%" Correct digits = 14 h = 1.000E-3 " " "NO POLE for equation 1" " " "TOP MAIN SOLVE Loop" x[1] = 1.334999999999963 " " y[1] (analytic) = -0.5263163509120768 " " y[1] (numeric) = -0.5263163509120532 " " absolute error = 2.364775042451583400000000000000E-14 " " relative error = 4.493067787754571000000000000E-12 "%" Correct digits = 14 h = 1.000E-3 " " "NO POLE for equation 1" " " "TOP MAIN SOLVE Loop" x[1] = 1.335999999999963 " " y[1] (analytic) = -0.5257902976316428 " " y[1] (numeric) = -0.5257902976316191 " " absolute error = 2.364775042451583400000000000000E-14 " " relative error = 4.497563102825251000000000000E-12 "%" Correct digits = 14 h = 1.000E-3 " " "Complex estimate of poles used for equation 1" Radius of convergence = 2925.076149317706 " " Order of pole = 381387.5750861515 " " " " "TOP MAIN SOLVE Loop" x[1] = 1.3369999999999629 " " y[1] (analytic) = -0.5252647701415503 " " y[1] (numeric) = -0.5252647701415265 " " absolute error = 2.37587727269783500000000000000E-14 " " relative error = 4.523199361071893000000000000E-12 "%" Correct digits = 14 h = 1.000E-3 " " "NO POLE for equation 1" " " "TOP MAIN SOLVE Loop" x[1] = 1.3379999999999628 " " y[1] (analytic) = -0.5247397679162715 " " y[1] (numeric) = -0.5247397679162478 " " absolute error = 2.37587727269783500000000000000E-14 " " relative error = 4.527724822786701000000000000E-12 "%" Correct digits = 14 h = 1.000E-3 " " "Complex estimate of poles used for equation 1" Radius of convergence = 1842.1347417871837 " " Order of pole = 216741.07273763005 " " " " "TOP MAIN SOLVE Loop" x[1] = 1.3389999999999627 " " y[1] (analytic) = -0.5242152904308045 " " y[1] (numeric) = -0.5242152904307806 " " absolute error = 2.386979502944086600000000000000E-14 " " relative error = 4.553433573031505000000000000E-12 "%" Correct digits = 14 h = 1.000E-3 " " "Complex estimate of poles used for equation 1" Radius of convergence = 2127.5266500583034 " " Order of pole = 288956.14440038375 " " " " "TOP MAIN SOLVE Loop" x[1] = 1.3399999999999626 " " y[1] (analytic) = -0.5236913371606716 " " y[1] (numeric) = -0.5236913371606476 " " absolute error = 2.39808173319033800000000000000E-14 " " relative error = 4.579189234238932300000000000E-12 "%" Correct digits = 14 h = 1.000E-3 " " "NO POLE for equation 1" " " "TOP MAIN SOLVE Loop" x[1] = 1.3409999999999624 " " y[1] (analytic) = -0.5231679075819194 " " y[1] (numeric) = -0.5231679075818955 " " absolute error = 2.39808173319033800000000000000E-14 " " relative error = 4.583770713831177300000000000E-12 "%" Correct digits = 14 h = 1.000E-3 " " "Complex estimate of poles used for equation 1" Radius of convergence = 2192.302791319321 " " Order of pole = 228822.04442546397 " " " " "TOP MAIN SOLVE Loop" x[1] = 1.3419999999999623 " " y[1] (analytic) = -0.5226450011711186 " " y[1] (numeric) = -0.5226450011710945 " " absolute error = 2.409183963436589700000000000000E-14 " " relative error = 4.609599169681528600000000000E-12 "%" Correct digits = 14 h = 1.000E-3 " " "Complex estimate of poles used for equation 1" Radius of convergence = 2713.0571935584053 " " Order of pole = 432072.8815169353 " " " " "TOP MAIN SOLVE Loop" x[1] = 1.3429999999999622 " " y[1] (analytic) = -0.5221226174053624 " " y[1] (numeric) = -0.5221226174053382 " " absolute error = 2.420286193682841300000000000000E-14 " " relative error = 4.635474719923489000000000000E-12 "%" Correct digits = 14 h = 1.000E-3 " " "Complex estimate of poles used for equation 1" Radius of convergence = 2835.3594147739864 " " Order of pole = 500402.8848392991 " " " " "TOP MAIN SOLVE Loop" x[1] = 1.3439999999999621 " " y[1] (analytic) = -0.521600755762267 " " y[1] (numeric) = -0.5216007557622429 " " absolute error = 2.420286193682841300000000000000E-14 " " relative error = 4.640112513153545000000000000E-12 "%" Correct digits = 14 h = 1.000E-3 " " "NO POLE for equation 1" " " "TOP MAIN SOLVE Loop" x[1] = 1.344999999999962 " " y[1] (analytic) = -0.521079415719971 " " y[1] (numeric) = -0.5210794157199468 " " absolute error = 2.420286193682841300000000000000E-14 " " relative error = 4.6447549464965004000000000E-12 "%" Correct digits = 14 h = 1.000E-3 " " "NO POLE for equation 1" " " "TOP MAIN SOLVE Loop" x[1] = 1.345999999999962 " " y[1] (analytic) = -0.5205585967571341 " " y[1] (numeric) = -0.5205585967571098 " " absolute error = 2.431388423929092800000000000000E-14 " " relative error = 4.6707295568177000000000000E-12 "%" Correct digits = 14 h = 1.000E-3 " " "NO POLE for equation 1" " " "TOP MAIN SOLVE Loop" x[1] = 1.3469999999999618 " " y[1] (analytic) = -0.5200382983529374 " " y[1] (numeric) = -0.5200382983529129 " " absolute error = 2.442490654175344400000000000000E-14 " " relative error = 4.6967514929404014000000000000E-12 "%" Correct digits = 14 h = 1.000E-3 " " "NO POLE for equation 1" " " "TOP MAIN SOLVE Loop" x[1] = 1.3479999999999617 " " y[1] (analytic) = -0.5195185199870822 " " y[1] (numeric) = -0.5195185199870578 " " absolute error = 2.442490654175344400000000000000E-14 " " relative error = 4.701450593592076000000000000E-12 "%" Correct digits = 14 h = 1.000E-3 " " "Complex estimate of poles used for equation 1" Radius of convergence = 2083.909924124434 " " Order of pole = 252441.87093595913 " " " " "TOP MAIN SOLVE Loop" x[1] = 1.3489999999999616 " " y[1] (analytic) = -0.5189992611397904 " " y[1] (numeric) = -0.5189992611397659 " " absolute error = 2.45359288442159600000000000000E-14 " " relative error = 4.727546006584256000000000000E-12 "%" Correct digits = 14 h = 1.000E-3 " " "Complex estimate of poles used for equation 1" Radius of convergence = 5071.627790558027 " " Order of pole = 865309.9815955816 " " " " "TOP MAIN SOLVE Loop" x[1] = 1.3499999999999615 " " y[1] (analytic) = -0.518480521291803 " " y[1] (numeric) = -0.5184805212917785 " " absolute error = 2.45359288442159600000000000000E-14 " " relative error = 4.732275917151965000000000000E-12 "%" Correct digits = 14 h = 1.000E-3 " " "NO POLE for equation 1" " " "TOP MAIN SOLVE Loop" x[1] = 1.3509999999999613 " " y[1] (analytic) = -0.51796229992438 " " y[1] (numeric) = -0.5179622999243555 " " absolute error = 2.45359288442159600000000000000E-14 " " relative error = 4.737010559995985000000000000E-12 "%" Correct digits = 14 h = 1.000E-3 " " "Complex estimate of poles used for equation 1" Radius of convergence = 8123.80164546622 " " Order of pole = 5263221.728686550 " " " " "TOP MAIN SOLVE Loop" x[1] = 1.3519999999999612 " " y[1] (analytic) = -0.5174445965193002 " " y[1] (numeric) = -0.5174445965192757 " " absolute error = 2.45359288442159600000000000000E-14 " " relative error = 4.74174993985096000000000000E-12 "%" Correct digits = 14 h = 1.000E-3 " " "Complex estimate of poles used for equation 1" Radius of convergence = 2156.6256812082383 " " Order of pole = 175811.21229872585 " " " " "TOP MAIN SOLVE Loop" x[1] = 1.3529999999999611 " " y[1] (analytic) = -0.51692741055886 " " y[1] (numeric) = -0.5169274105588354 " " absolute error = 2.464695114667847500000000000000E-14 " " relative error = 4.767971410150641500000000000E-12 "%" Correct digits = 14 h = 1.000E-3 " " "Complex estimate of poles used for equation 1" Radius of convergence = 1597.5606934244233 " " Order of pole = 124844.31662262214 " " " " "TOP MAIN SOLVE Loop" x[1] = 1.353999999999961 " " y[1] (analytic) = -0.5164107415258735 " " y[1] (numeric) = -0.5164107415258488 " " absolute error = 2.47579734491409900000000000000E-14 " " relative error = 4.794240603126678000000000000E-12 "%" Correct digits = 14 h = 1.000E-3 " " "NO POLE for equation 1" " " "TOP MAIN SOLVE Loop" x[1] = 1.354999999999961 " " y[1] (analytic) = -0.5158945889036715 " " y[1] (numeric) = -0.5158945889036467 " " absolute error = 2.47579734491409900000000000000E-14 " " relative error = 4.7990372416493465000000000000E-12 "%" Correct digits = 14 h = 1.000E-3 " " "NO POLE for equation 1" " " "TOP MAIN SOLVE Loop" x[1] = 1.3559999999999608 " " y[1] (analytic) = -0.5153789521761014 " " y[1] (numeric) = -0.5153789521760765 " " absolute error = 2.486899575160350700000000000000E-14 " " relative error = 4.8253805566949004000000000E-12 "%" Correct digits = 14 h = 1.000E-3 " " "Complex estimate of poles used for equation 1" Radius of convergence = 1731.42292142691 " " Order of pole = 169494.83783359185 " " " " "TOP MAIN SOLVE Loop" x[1] = 1.3569999999999607 " " y[1] (analytic) = -0.5148638308275264 " " y[1] (numeric) = -0.5148638308275015 " " absolute error = 2.486899575160350700000000000000E-14 " " relative error = 4.8302083507463045000000000000E-12 "%" Correct digits = 14 h = 1.000E-3 " " "Complex estimate of poles used for equation 1" Radius of convergence = 2686.8252714369246 " " Order of pole = 475659.0095759577 " " " " "TOP MAIN SOLVE Loop" x[1] = 1.3579999999999606 " " y[1] (analytic) = -0.5143492243428252 " " y[1] (numeric) = -0.5143492243428003 " " absolute error = 2.486899575160350700000000000000E-14 " " relative error = 4.835040975006462000000000000E-12 "%" Correct digits = 14 h = 1.000E-3 " " "Complex estimate of poles used for equation 1" Radius of convergence = 1472.240053928031 " " Order of pole = 258347.37391862646 " " " " "TOP MAIN SOLVE Loop" x[1] = 1.3589999999999605 " " y[1] (analytic) = -0.5138351322073912 " " y[1] (numeric) = -0.5138351322073662 " " absolute error = 2.498001805406602200000000000000E-14 " " relative error = 4.861485034461157000000000000E-12 "%" Correct digits = 14 h = 1.000E-3 " " "NO POLE for equation 1" " " "TOP MAIN SOLVE Loop" x[1] = 1.3599999999999604 " " y[1] (analytic) = -0.5133215539071321 " " y[1] (numeric) = -0.5133215539071071 " " absolute error = 2.498001805406602200000000000000E-14 " " relative error = 4.8663489510485850000000000000E-12 "%" Correct digits = 14 h = 1.000E-3 " " "NO POLE for equation 1" " " "TOP MAIN SOLVE Loop" x[1] = 1.3609999999999602 " " y[1] (analytic) = -0.5128084889284698 " " y[1] (numeric) = -0.5128084889284447 " " absolute error = 2.509104035652854000000000000000E-14 " " relative error = 4.892867590580861000000000000E-12 "%" Correct digits = 14 h = 1.000E-3 " " "Complex estimate of poles used for equation 1" Radius of convergence = 4314.962632413042 " " Order of pole = 730524.584333404 " " " " "TOP MAIN SOLVE Loop" x[1] = 1.3619999999999601 " " y[1] (analytic) = -0.5122959367583391 " " y[1] (numeric) = -0.512295936758314 " " absolute error = 2.509104035652854000000000000000E-14 " " relative error = 4.8977629054209180000000000000E-12 "%" Correct digits = 14 h = 1.000E-3 " " "NO POLE for equation 1" " " "TOP MAIN SOLVE Loop" x[1] = 1.36299999999996 " " y[1] (analytic) = -0.5117838968841879 " " y[1] (numeric) = -0.5117838968841627 " " absolute error = 2.520206265899105300000000000000E-14 " " relative error = 4.924356317661564600000000000E-12 "%" Correct digits = 14 h = 1.000E-3 " " "NO POLE for equation 1" " " "TOP MAIN SOLVE Loop" x[1] = 1.36399999999996 " " y[1] (analytic) = -0.5112723687939762 " " y[1] (numeric) = -0.511272368793951 " " absolute error = 2.520206265899105300000000000000E-14 " " relative error = 4.929283136978316000000000000E-12 "%" Correct digits = 14 h = 1.000E-3 " " "Complex estimate of poles used for equation 1" Radius of convergence = 7385.795023717993 " " Order of pole = 3171459.778448506 " " " " "TOP MAIN SOLVE Loop" x[1] = 1.3649999999999598 " " y[1] (analytic) = -0.5107613519761759 " " y[1] (numeric) = -0.5107613519761507 " " absolute error = 2.520206265899105300000000000000E-14 " " relative error = 4.934214885578615000000000000E-12 "%" Correct digits = 14 h = 1.000E-3 " " "Complex estimate of poles used for equation 1" Radius of convergence = 7130.251903179080 " " Order of pole = 2140950.29239483 " " " " "TOP MAIN SOLVE Loop" x[1] = 1.3659999999999597 " " y[1] (analytic) = -0.5102508459197702 " " y[1] (numeric) = -0.5102508459197449 " " absolute error = 2.53130849614535700000000000000E-14 " " relative error = 4.960909945347488000000000000E-12 "%" Correct digits = 14 h = 1.000E-3 " " "Complex estimate of poles used for equation 1" Radius of convergence = 2512.773112594458 " " Order of pole = 362196.0801855272 " " " " "TOP MAIN SOLVE Loop" x[1] = 1.3669999999999596 " " y[1] (analytic) = -0.5097408501142529 " " y[1] (numeric) = -0.5097408501142275 " " absolute error = 2.53130849614535700000000000000E-14 " " relative error = 4.965873336574833700000000000E-12 "%" Correct digits = 14 h = 1.000E-3 " " "Complex estimate of poles used for equation 1" Radius of convergence = 3086.7247706521857 " " Order of pole = 341198.82840913435 " " " " "TOP MAIN SOLVE Loop" x[1] = 1.3679999999999595 " " y[1] (analytic) = -0.5092313640496281 " " y[1] (numeric) = -0.5092313640496028 " " absolute error = 2.53130849614535700000000000000E-14 " " relative error = 4.970841693675929000000000000E-12 "%" Correct digits = 14 h = 1.000E-3 " " "NO POLE for equation 1" " " "TOP MAIN SOLVE Loop" x[1] = 1.3689999999999594 " " y[1] (analytic) = -0.5087223872164099 " " y[1] (numeric) = -0.5087223872163845 " " absolute error = 2.542410726391608500000000000000E-14 " " relative error = 4.997638771713951400000000000E-12 "%" Correct digits = 14 h = 1.000E-3 " " "NO POLE for equation 1" " " "TOP MAIN SOLVE Loop" x[1] = 1.3699999999999593 " " y[1] (analytic) = -0.5082139191056213 " " y[1] (numeric) = -0.5082139191055959 " " absolute error = 2.542410726391608500000000000000E-14 " " relative error = 5.0026389101382000000000000E-12 "%" Correct digits = 14 h = 1.000E-3 " " "Complex estimate of poles used for equation 1" Radius of convergence = 2168.890528544565 " " Order of pole = 346208.4635995307 " " " " "TOP MAIN SOLVE Loop" x[1] = 1.3709999999999591 " " y[1] (analytic) = -0.5077059592087941 " " y[1] (numeric) = -0.5077059592087687 " " absolute error = 2.542410726391608500000000000000E-14 " " relative error = 5.007644051201774000000000000E-12 "%" Correct digits = 14 h = 1.000E-3 " " "NO POLE for equation 1" " " "TOP MAIN SOLVE Loop" x[1] = 1.371999999999959 " " y[1] (analytic) = -0.5071985070179685 " " y[1] (numeric) = -0.507198507017943 " " absolute error = 2.5535129566378600000000000000E-14 " " relative error = 5.0345435195600770000000000000E-12 "%" Correct digits = 14 h = 1.000E-3 " " "NO POLE for equation 1" " " "TOP MAIN SOLVE Loop" x[1] = 1.372999999999959 " " y[1] (analytic) = -0.5066915620256921 " " y[1] (numeric) = -0.5066915620256666 " " absolute error = 2.5535129566378600000000000000E-14 " " relative error = 5.039580581190698000000000000E-12 "%" Correct digits = 14 h = 1.000E-3 " " "Complex estimate of poles used for equation 1" Radius of convergence = 2144.520272265949 " " Order of pole = 229187.4271362059 " " " " "TOP MAIN SOLVE Loop" x[1] = 1.3739999999999588 " " y[1] (analytic) = -0.50618512372502 " " y[1] (numeric) = -0.5061851237249944 " " absolute error = 2.564615186884111600000000000000E-14 " " relative error = 5.06655582449972000000000000E-12 "%" Correct digits = 14 h = 1.000E-3 " " "NO POLE for equation 1" " " "TOP MAIN SOLVE Loop" x[1] = 1.3749999999999587 " " y[1] (analytic) = -0.5056791916095138 " " y[1] (numeric) = -0.505679191609488 " " absolute error = 2.575717417130363000000000000000E-14 " " relative error = 5.093580000656496000000000000E-12 "%" Correct digits = 14 h = 1.000E-3 " " "Complex estimate of poles used for equation 1" Radius of convergence = 1906.8099558029048 " " Order of pole = 165511.14161094418 " " " " "TOP MAIN SOLVE Loop" x[1] = 1.3759999999999586 " " y[1] (analytic) = -0.5051737651732414 " " y[1] (numeric) = -0.5051737651732155 " " absolute error = 2.586819647376615000000000000000E-14 " " relative error = 5.120653180573432000000000000E-12 "%" Correct digits = 14 h = 1.000E-3 " " "NO POLE for equation 1" " " "TOP MAIN SOLVE Loop" x[1] = 1.3769999999999585 " " y[1] (analytic) = -0.5046688439107762 " " y[1] (numeric) = -0.5046688439107503 " " absolute error = 2.586819647376615000000000000000E-14 " " relative error = 5.125776394934252000000000000E-12 "%" Correct digits = 14 h = 1.000E-3 " " "Complex estimate of poles used for equation 1" Radius of convergence = 3254.024066873446 " " Order of pole = 505545.4625779776 " " " " "TOP MAIN SOLVE Loop" x[1] = 1.3779999999999584 " " y[1] (analytic) = -0.504164427317197 " " y[1] (numeric) = -0.504164427317171 " " absolute error = 2.597921877622866300000000000000E-14 " " relative error = 5.1529257854370070000000000000E-12 "%" Correct digits = 14 h = 1.000E-3 " " "Complex estimate of poles used for equation 1" Radius of convergence = 1731.285453832719 " " Order of pole = 317238.93481528095 " " " " "TOP MAIN SOLVE Loop" x[1] = 1.3789999999999583 " " y[1] (analytic) = -0.5036605148880872 " " y[1] (numeric) = -0.5036605148880611 " " absolute error = 2.60902410786911800000000000000E-14 " " relative error = 5.180124370974049000000000000E-12 "%" Correct digits = 14 h = 1.000E-3 " " "NO POLE for equation 1" " " "TOP MAIN SOLVE Loop" x[1] = 1.3799999999999581 " " y[1] (analytic) = -0.5031571061195341 " " y[1] (numeric) = -0.503157106119508 " " absolute error = 2.60902410786911800000000000000E-14 " " relative error = 5.1853070862707770000000000000E-12 "%" Correct digits = 14 h = 1.000E-3 " " "NO POLE for equation 1" " " "TOP MAIN SOLVE Loop" x[1] = 1.380999999999958 " " y[1] (analytic) = -0.5026542005081291 " " y[1] (numeric) = -0.502654200508103 " " absolute error = 2.60902410786911800000000000000E-14 " " relative error = 5.190494986875025000000000000E-12 "%" Correct digits = 14 h = 1.000E-3 " " "NO POLE for equation 1" " " "TOP MAIN SOLVE Loop" x[1] = 1.381999999999958 " " y[1] (analytic) = -0.5021517975509665 " " y[1] (numeric) = -0.5021517975509404 " " absolute error = 2.60902410786911800000000000000E-14 " " relative error = 5.195688077974692000000000000E-12 "%" Correct digits = 14 h = 1.000E-3 " " "Complex estimate of poles used for equation 1" Radius of convergence = 5597.477447646485 " " Order of pole = 2128268.6607345375 " " " " "TOP MAIN SOLVE Loop" x[1] = 1.3829999999999578 " " y[1] (analytic) = -0.5016498967456433 " " y[1] (numeric) = -0.5016498967456172 " " absolute error = 2.60902410786911800000000000000E-14 " " relative error = 5.20088636476287000000000000E-12 "%" Correct digits = 14 h = 1.000E-3 " " "NO POLE for equation 1" " " "TOP MAIN SOLVE Loop" x[1] = 1.3839999999999577 " " y[1] (analytic) = -0.5011484975902587 " " y[1] (numeric) = -0.5011484975902325 " " absolute error = 2.620126338115369400000000000000E-14 " " relative error = 5.228243426278006000000000000E-12 "%" Correct digits = 14 h = 1.000E-3 " " "NO POLE for equation 1" " " "TOP MAIN SOLVE Loop" x[1] = 1.3849999999999576 " " y[1] (analytic) = -0.5006475995834134 " " y[1] (numeric) = -0.5006475995833871 " " absolute error = 2.63122856836162100000000000000E-14 " " relative error = 5.25565002319207000000000000E-12 "%" Correct digits = 14 h = 1.000E-3 " " "NO POLE for equation 1" " " "TOP MAIN SOLVE Loop" x[1] = 1.3859999999999575 " " y[1] (analytic) = -0.5001472022242095 " " y[1] (numeric) = -0.5001472022241831 " " absolute error = 2.642330798607872600000000000000E-14 " " relative error = 5.283106227240976000000000000E-12 "%" Correct digits = 14 h = 1.000E-3 " " "Complex estimate of poles used for equation 1" Radius of convergence = 2194.9622055078953 " " Order of pole = 190901.54733620246 " " " " "TOP MAIN SOLVE Loop" x[1] = 1.3869999999999574 " " y[1] (analytic) = -0.49964730501224935 " " y[1] (numeric) = -0.49964730501222293 " " absolute error = 2.642330798607872600000000000000E-14 " " relative error = 5.288391975902068000000000000E-12 "%" Correct digits = 14 h = 1.000E-3 " " "NO POLE for equation 1" " " "TOP MAIN SOLVE Loop" x[1] = 1.3879999999999573 " " y[1] (analytic) = -0.49914790744763593 " " y[1] (numeric) = -0.49914790744760945 " " absolute error = 2.647881913730998300000000000000E-14 " " relative error = 5.304804195755903000000000000E-12 "%" Correct digits = 14 h = 1.000E-3 " " "Complex estimate of poles used for equation 1" Radius of convergence = 1807.304553571666 " " Order of pole = 182126.1427744808 " " " " "TOP MAIN SOLVE Loop" x[1] = 1.3889999999999572 " " y[1] (analytic) = -0.4986490090309716 " " y[1] (numeric) = -0.498649009030945 " " absolute error = 2.6589841439772500000000000000E-14 " " relative error = 5.332376272329257000000000000E-12 "%" Correct digits = 14 h = 1.000E-3 " " "Complex estimate of poles used for equation 1" Radius of convergence = 8543.885982992102 " " Order of pole = 3970896.910623846 " " " " "TOP MAIN SOLVE Loop" x[1] = 1.389999999999957 " " y[1] (analytic) = -0.49815060926335775 " " y[1] (numeric) = -0.49815060926333116 " " absolute error = 2.6589841439772500000000000000E-14 " " relative error = 5.3377113156786740000000000000E-12 "%" Correct digits = 14 h = 1.000E-3 " " "NO POLE for equation 1" " " "TOP MAIN SOLVE Loop" x[1] = 1.390999999999957 " " y[1] (analytic) = -0.4976527076463947 " " y[1] (numeric) = -0.4976527076463681 " " absolute error = 2.6589841439772500000000000000E-14 " " relative error = 5.34305169673985000000000000E-12 "%" Correct digits = 14 h = 1.000E-3 " " "Complex estimate of poles used for equation 1" Radius of convergence = 2546.3694544049663 " " Order of pole = 345195.92863651627 " " " " "TOP MAIN SOLVE Loop" x[1] = 1.3919999999999568 " " y[1] (analytic) = -0.4971553036821809 " " y[1] (numeric) = -0.49715530368215416 " " absolute error = 2.675637489346627000000000000000E-14 " " relative error = 5.381894690712373000000000000E-12 "%" Correct digits = 14 h = 1.000E-3 " " "Complex estimate of poles used for equation 1" Radius of convergence = 1980.977445222205 " " Order of pole = 228918.94579637368 " " " " "TOP MAIN SOLVE Loop" x[1] = 1.3929999999999567 " " y[1] (analytic) = -0.496658396873312 " " y[1] (numeric) = -0.49665839687328533 " " absolute error = 2.664535259100375700000000000000E-14 " " relative error = 5.36492542132545000000000000E-12 "%" Correct digits = 14 h = 1.000E-3 " " "NO POLE for equation 1" " " "TOP MAIN SOLVE Loop" x[1] = 1.3939999999999566 " " y[1] (analytic) = -0.49616198672288153 " " y[1] (numeric) = -0.4961619867228548 " " absolute error = 2.675637489346627000000000000000E-14 " " relative error = 5.392669251062628000000000000E-12 "%" Correct digits = 14 h = 1.000E-3 " " "Complex estimate of poles used for equation 1" Radius of convergence = 4513.67441962811 " " Order of pole = 1328977.0263924887 " " " " "TOP MAIN SOLVE Loop" x[1] = 1.3949999999999565 " " y[1] (analytic) = -0.49566607273447905 " " y[1] (numeric) = -0.49566607273445223 " " absolute error = 2.68118860446975300000000000000E-14 " " relative error = 5.409263921733102000000000000E-12 "%" Correct digits = 14 h = 1.000E-3 " " "Complex estimate of poles used for equation 1" Radius of convergence = 1015.8984920249236 " " Order of pole = 281221.73659270466 " " " " "TOP MAIN SOLVE Loop" x[1] = 1.3959999999999564 " " y[1] (analytic) = -0.49517065441219066 " " y[1] (numeric) = -0.49517065441216374 " " absolute error = 2.692290834716004600000000000000E-14 " " relative error = 5.43709690937154000000000000E-12 "%" Correct digits = 14 h = 1.000E-3 " " "NO POLE for equation 1" " " "TOP MAIN SOLVE Loop" x[1] = 1.3969999999999563 " " y[1] (analytic) = -0.4946757312605979 " " y[1] (numeric) = -0.49467573126057096 " " absolute error = 2.692290834716004600000000000000E-14 " " relative error = 5.442536725735775000000000000E-12 "%" Correct digits = 14 h = 1.000E-3 " " "Complex estimate of poles used for equation 1" Radius of convergence = 2854.0286467097512 " " Order of pole = 258002.43926426594 " " " " "TOP MAIN SOLVE Loop" x[1] = 1.3979999999999562 " " y[1] (analytic) = -0.4941813027847776 " " y[1] (numeric) = -0.49418130278475064 " " absolute error = 2.697841949839130400000000000000E-14 " " relative error = 5.459214937182832000000000000E-12 "%" Correct digits = 14 h = 1.000E-3 " " "NO POLE for equation 1" " " "TOP MAIN SOLVE Loop" x[1] = 1.398999999999956 " " y[1] (analytic) = -0.49368736849030137 " " y[1] (numeric) = -0.4936873684902743 " " absolute error = 2.70894418008538200000000000000E-14 " " relative error = 5.487165264870657000000000000E-12 "%" Correct digits = 14 h = 1.000E-3 " " "Complex estimate of poles used for equation 1" Radius of convergence = 2054.324819331757 " " Order of pole = 230244.27410256298 " " " " "TOP MAIN SOLVE Loop" x[1] = 1.399999999999956 " " y[1] (analytic) = -0.4931939278832347 " " y[1] (numeric) = -0.49319392788320754 " " absolute error = 2.714495295208508000000000000000E-14 " " relative error = 5.503910615564541000000000000E-12 "%" Correct digits = 14 h = 1.000E-3 " " "NO POLE for equation 1" " " "TOP MAIN SOLVE Loop" x[1] = 1.4009999999999558 " " y[1] (analytic) = -0.492700980470137 " " y[1] (numeric) = -0.4927009804701098 " " absolute error = 2.720046410331633500000000000000E-14 " " relative error = 5.520683981055113000000000000E-12 "%" Correct digits = 14 h = 1.000E-3 " " "Complex estimate of poles used for equation 1" Radius of convergence = 1668.4450313025488 " " Order of pole = 386213.8805921741 " " " " "TOP MAIN SOLVE Loop" x[1] = 1.4019999999999557 " " y[1] (analytic) = -0.4922085257580609 " " y[1] (numeric) = -0.4922085257580336 " " absolute error = 2.73114864057788500000000000000E-14 " " relative error = 5.548763374977271000000000000E-12 "%" Correct digits = 14 h = 1.000E-3 " " "Complex estimate of poles used for equation 1" Radius of convergence = 1917.3556150524707 " " Order of pole = 252374.94737380056 " " " " "TOP MAIN SOLVE Loop" x[1] = 1.4029999999999556 " " y[1] (analytic) = -0.4917165632545515 " " y[1] (numeric) = -0.4917165632545242 " " absolute error = 2.73114864057788500000000000000E-14 " " relative error = 5.554314913658961000000000000E-12 "%" Correct digits = 14 h = 1.000E-3 " " "NO POLE for equation 1" " " "TOP MAIN SOLVE Loop" x[1] = 1.4039999999999555 " " y[1] (analytic) = -0.4912250924676463 " " y[1] (numeric) = -0.491225092467619 " " absolute error = 2.73114864057788500000000000000E-14 " " relative error = 5.559872006656027000000000000E-12 "%" Correct digits = 14 h = 1.000E-3 " " "Complex estimate of poles used for equation 1" Radius of convergence = 1795.5481954020042 " " Order of pole = 161458.71554903474 " " " " "TOP MAIN SOLVE Loop" x[1] = 1.4049999999999554 " " y[1] (analytic) = -0.49073411290587454 " " y[1] (numeric) = -0.4907341129058472 " " absolute error = 2.73669975570101100000000000000E-14 " " relative error = 5.5767465185896390000000000000E-12 "%" Correct digits = 14 h = 1.000E-3 " " "NO POLE for equation 1" " " "TOP MAIN SOLVE Loop" x[1] = 1.4059999999999553 " " y[1] (analytic) = -0.4902436240782566 " " y[1] (numeric) = -0.4902436240782292 " " absolute error = 2.742250870824136700000000000000E-14 " " relative error = 5.5936492309921340000000000000E-12 "%" Correct digits = 14 h = 1.000E-3 " " "NO POLE for equation 1" " " "TOP MAIN SOLVE Loop" x[1] = 1.4069999999999552 " " y[1] (analytic) = -0.4897536254943036 " " y[1] (numeric) = -0.48975362549427615 " " absolute error = 2.747801985947262400000000000000E-14 " " relative error = 5.610580183401261000000000000E-12 "%" Correct digits = 14 h = 1.000E-3 " " "NO POLE for equation 1" " " "TOP MAIN SOLVE Loop" x[1] = 1.407999999999955 " " y[1] (analytic) = -0.48926411666401687 " " y[1] (numeric) = -0.4892641166639894 " " absolute error = 2.747801985947262400000000000000E-14 " " relative error = 5.6161935698100840000000000000E-12 "%" Correct digits = 14 h = 1.000E-3 " " "NO POLE for equation 1" " " "TOP MAIN SOLVE Loop" x[1] = 1.408999999999955 " " y[1] (analytic) = -0.48877509709788763 " " y[1] (numeric) = -0.48877509709786005 " " absolute error = 2.75890421619351400000000000000E-14 " " relative error = 5.644526966644916000000000000E-12 "%" Correct digits = 14 h = 1.000E-3 " " "Complex estimate of poles used for equation 1" Radius of convergence = 2684.5692689579055 " " Order of pole = 567054.8240652512 " " " " "TOP MAIN SOLVE Loop" x[1] = 1.4099999999999548 " " y[1] (analytic) = -0.48828656630689615 " " y[1] (numeric) = -0.48828656630686856 " " absolute error = 2.75890421619351400000000000000E-14 " " relative error = 5.650174316816035000000000000E-12 "%" Correct digits = 14 h = 1.000E-3 " " "Complex estimate of poles used for equation 1" Radius of convergence = 2848.764202111426 " " Order of pole = 422917.3378983699 " " " " "TOP MAIN SOLVE Loop" x[1] = 1.4109999999999547 " " y[1] (analytic) = -0.48779852380251176 " " y[1] (numeric) = -0.48779852380248406 " " absolute error = 2.770006446439765600000000000000E-14 " " relative error = 5.678587185641463000000000000E-12 "%" Correct digits = 14 h = 1.000E-3 " " "NO POLE for equation 1" " " "TOP MAIN SOLVE Loop" x[1] = 1.4119999999999546 " " y[1] (analytic) = -0.48731096909669175 " " y[1] (numeric) = -0.487310969096664 " " absolute error = 2.775557561562891400000000000000E-14 " " relative error = 5.6956599329332310000000000000E-12 "%" Correct digits = 14 h = 1.000E-3 " " "Complex estimate of poles used for equation 1" Radius of convergence = 2148.57207145317 " " Order of pole = 441605.90101071435 " " " " "TOP MAIN SOLVE Loop" x[1] = 1.4129999999999545 " " y[1] (analytic) = -0.48682390170188156 " " y[1] (numeric) = -0.48682390170185363 " " absolute error = 2.792210906932268700000000000000E-14 " " relative error = 5.735566592295517000000000000E-12 "%" Correct digits = 14 h = 1.000E-3 " " "Complex estimate of poles used for equation 1" Radius of convergence = 2651.217814627907 " " Order of pole = 359877.43731445854 " " " " "TOP MAIN SOLVE Loop" x[1] = 1.4139999999999544 " " y[1] (analytic) = -0.48633732113101347 " " y[1] (numeric) = -0.48633732113098554 " " absolute error = 2.792210906932268700000000000000E-14 " " relative error = 5.741305027627276000000000000E-12 "%" Correct digits = 14 h = 1.000E-3 " " "NO POLE for equation 1" " " "TOP MAIN SOLVE Loop" x[1] = 1.4149999999999543 " " y[1] (analytic) = -0.4858512268975071 " " y[1] (numeric) = -0.4858512268974791 " " absolute error = 2.797762022055394500000000000000E-14 " " relative error = 5.758474749402243000000000000E-12 "%" Correct digits = 14 h = 1.000E-3 " " "NO POLE for equation 1" " " "TOP MAIN SOLVE Loop" x[1] = 1.4159999999999542 " " y[1] (analytic) = -0.48536561851526816 " " y[1] (numeric) = -0.48536561851524007 " " absolute error = 2.80886425230164600000000000000E-14 " " relative error = 5.787110057144040000000000000E-12 "%" Correct digits = 14 h = 1.000E-3 " " "Complex estimate of poles used for equation 1" Radius of convergence = 2211.112676556236 " " Order of pole = 283840.14326048427 " " " " "TOP MAIN SOLVE Loop" x[1] = 1.416999999999954 " " y[1] (analytic) = -0.4848804954986881 " " y[1] (numeric) = -0.48488049549866 " " absolute error = 2.80886425230164600000000000000E-14 " " relative error = 5.792900061720972000000000000E-12 "%" Correct digits = 14 h = 1.000E-3 " " "Complex estimate of poles used for equation 1" Radius of convergence = 1868.1231942557554 " " Order of pole = 196623.2758055318 " " " " "TOP MAIN SOLVE Loop" x[1] = 1.417999999999954 " " y[1] (analytic) = -0.48439585736264407 " " y[1] (numeric) = -0.48439585736261587 " " absolute error = 2.819966482547897600000000000000E-14 " " relative error = 5.8216156056774930000000000000E-12 "%" Correct digits = 14 h = 1.000E-3 " " "Complex estimate of poles used for equation 1" Radius of convergence = 3452.770234525897 " " Order of pole = 594993.93691339 " " " " "TOP MAIN SOLVE Loop" x[1] = 1.4189999999999539 " " y[1] (analytic) = -0.48391170362249764 " " y[1] (numeric) = -0.48391170362246944 " " absolute error = 2.819966482547897600000000000000E-14 " " relative error = 5.8274401330614860000000000000E-12 "%" Correct digits = 14 h = 1.000E-3 " " "NO POLE for equation 1" " " "TOP MAIN SOLVE Loop" x[1] = 1.4199999999999537 " " y[1] (analytic) = -0.48342803379409527 " " y[1] (numeric) = -0.48342803379406696 " " absolute error = 2.831068712794149000000000000000E-14 " " relative error = 5.856236119728166000000000000E-12 "%" Correct digits = 14 h = 1.000E-3 " " "Complex estimate of poles used for equation 1" Radius of convergence = 4661.313411245209 " " Order of pole = 1087528.1909878976 " " " " "TOP MAIN SOLVE Loop" x[1] = 1.4209999999999536 " " y[1] (analytic) = -0.4829448473937669 " " y[1] (numeric) = -0.48294484739373855 " " absolute error = 2.83661982791727500000000000000E-14 " " relative error = 5.873589589422515000000000000E-12 "%" Correct digits = 14 h = 1.000E-3 " " "Complex estimate of poles used for equation 1" Radius of convergence = 3588.823553245783 " " Order of pole = 667280.6074216521 " " " " "TOP MAIN SOLVE Loop" x[1] = 1.4219999999999535 " " y[1] (analytic) = -0.4824621439383262 " " y[1] (numeric) = -0.4824621439382978 " " absolute error = 2.84217094304040100000000000000E-14 " " relative error = 5.890971921319736000000000000E-12 "%" Correct digits = 14 h = 1.000E-3 " " "NO POLE for equation 1" " " "TOP MAIN SOLVE Loop" x[1] = 1.4229999999999534 " " y[1] (analytic) = -0.4819799229450696 " " y[1] (numeric) = -0.48197992294504116 " " absolute error = 2.84217094304040100000000000000E-14 " " relative error = 5.896865839709091000000000000E-12 "%" Correct digits = 14 h = 1.000E-3 " " "Complex estimate of poles used for equation 1" Radius of convergence = 1927.9114590591878 " " Order of pole = 205793.95117194406 " " " " "TOP MAIN SOLVE Loop" x[1] = 1.4239999999999533 " " y[1] (analytic) = -0.4814981839317762 " " y[1] (numeric) = -0.48149818393174765 " " absolute error = 2.85327317328665230000000000000E-14 " " relative error = 5.9258233333044820000000000000E-12 "%" Correct digits = 14 h = 1.000E-3 " " "NO POLE for equation 1" " " "TOP MAIN SOLVE Loop" x[1] = 1.4249999999999532 " " y[1] (analytic) = -0.4810169264167068 " " y[1] (numeric) = -0.4810169264166782 " " absolute error = 2.85882428840977800000000000000E-14 " " relative error = 5.9432924943127010000000000E-12 "%" Correct digits = 14 h = 1.000E-3 " " "Complex estimate of poles used for equation 1" Radius of convergence = 2296.750977722771 " " Order of pole = 219839.68083200353 " " " " "TOP MAIN SOLVE Loop" x[1] = 1.425999999999953 " " y[1] (analytic) = -0.48053614991860394 " " y[1] (numeric) = -0.48053614991857524 " " absolute error = 2.869926518656029700000000000000E-14 " " relative error = 5.9723425992865560000000000000E-12 "%" Correct digits = 14 h = 1.000E-3 " " "Complex estimate of poles used for equation 1" Radius of convergence = 1850.9570957956755 " " Order of pole = 119731.51158654774 " " " " "TOP MAIN SOLVE Loop" x[1] = 1.426999999999953 " " y[1] (analytic) = -0.4800558539566909 " " y[1] (numeric) = -0.4800558539566623 " " absolute error = 2.86437540353290400000000000000E-14 " " relative error = 5.966754451433725000000000000E-12 "%" Correct digits = 14 h = 1.000E-3 " " "Complex estimate of poles used for equation 1" Radius of convergence = 2185.5823704484196 " " Order of pole = 337436.34386811603 " " " " "TOP MAIN SOLVE Loop" x[1] = 1.4279999999999529 " " y[1] (analytic) = -0.47957603805067195 " " y[1] (numeric) = -0.47957603805064325 " " absolute error = 2.869926518656029700000000000000E-14 " " relative error = 5.9842992371374360000000000000E-12 "%" Correct digits = 14 h = 1.000E-3 " " "Complex estimate of poles used for equation 1" Radius of convergence = 3029.2649116416874 " " Order of pole = 506187.6170371487 " " " " "TOP MAIN SOLVE Loop" x[1] = 1.4289999999999528 " " y[1] (analytic) = -0.47909670172073104 " " y[1] (numeric) = -0.47909670172070223 " " absolute error = 2.88102874890228100000000000000E-14 " " relative error = 6.013459784955176000000000000E-12 "%" Correct digits = 14 h = 1.000E-3 " " "Complex estimate of poles used for equation 1" Radius of convergence = 3280.137429196145 " " Order of pole = 722265.4518617357 " " " " "TOP MAIN SOLVE Loop" x[1] = 1.4299999999999526 " " y[1] (analytic) = -0.47861784448753175 " " y[1] (numeric) = -0.4786178444875029 " " absolute error = 2.88657986402540700000000000000E-14 " " relative error = 6.031074472612155000000000000E-12 "%" Correct digits = 14 h = 1.000E-3 " " "Complex estimate of poles used for equation 1" Radius of convergence = 2205.839313419499 " " Order of pole = 273774.6810625066 " " " " "TOP MAIN SOLVE Loop" x[1] = 1.4309999999999525 " " y[1] (analytic) = -0.47813946587221673 " " y[1] (numeric) = -0.4781394658721879 " " absolute error = 2.88102874890228100000000000000E-14 " " relative error = 6.025498739466612000000000000E-12 "%" Correct digits = 14 h = 1.000E-3 " " "Complex estimate of poles used for equation 1" Radius of convergence = 2262.9780339203553 " " Order of pole = 328461.9076607355 " " "Finished!" "Maximum Time Reached before Solution Completed!" "diff ( y , x , 1 ) = 2.0 / exp(x);" Iterations = 432 "Total Elapsed Time "= 0 Years 0 Days 0 Hours 3 Minutes 1 Seconds "Elapsed Time(since restart) "= 0 Years 0 Days 0 Hours 3 Minutes 0 Seconds "Expected Time Remaining "= 0 Years 0 Days 0 Hours 24 Minutes 55 Seconds "Optimized Time Remaining "= 0 Years 0 Days 0 Hours 24 Minutes 49 Seconds "Expected Total Time "= 0 Years 0 Days 0 Hours 27 Minutes 50 Seconds "Time to Timeout " Unknown Percent Done = 10.824999999998807 "%" (%o58) true (%o58) diffeq.max