(%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, m, n, nr1, nr2, ord_no, rad_c, rcs, rm0, rm1, rm2, rm3, rm4, found, h_new, ratio, term], n : glob_max_terms, m : - 1 - 1 + n, while (m >= 10) and ((omniabs(array_y_higher ) < glob_small_float) 1, m or (omniabs(array_y_higher ) < glob_small_float) 1, m - 1 or (omniabs(array_y_higher ) < 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 - 1) rm0 array_y_higher 1, m - 2 - convfloat(m - 2) rm1, if omniabs(hdrc) > glob_small_float glob_h convfloat(m - 1) rm0 then (rcs : ------, ord_no : 2.0 - convfloat(m) + --------------------, hdrc 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 : false, if (not found) 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 : true, array_type_pole : 2, 1, 2 1, 2 1 if glob_display_flag then (if reached_interval() then omniout_str(ALWAYS, "Complex estimate of poles used"))), if (not found) 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 > 0.0) and ((array_complex_pole = glob_large_float) or (array_complex_pole = glob_large_float) or (array_complex_pole <= 0.0) or (array_complex_pole <= 1, 2 1, 1 1, 2 1, 1 1, 2 0.0))) then (array_poles : array_real_pole , 1, 1 1, 1 array_poles : array_real_pole , found : true, 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"))), if (not found) 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 : true, array_type_pole : 3, if reached_interval() 1 then omniout_str(ALWAYS, "NO POLE")), if (not found) and ((array_real_pole < array_complex_pole ) 1, 1 1, 1 and (array_real_pole > 0.0) and (array_real_pole > 1, 1 1, 2 0.0)) then (array_poles : array_real_pole , 1, 1 1, 1 array_poles : array_real_pole , found : true, 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"))), if (not found) 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, found : true, 1, 2 1, 2 1 if glob_display_flag then (if reached_interval() then omniout_str(ALWAYS, "Complex estimate of poles used"))), if not found 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")), 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, m, n, nr1, nr2, ord_no, rad_c, rcs, rm0, rm1, rm2, rm3, rm4, found, h_new, ratio, term], n : glob_max_terms, m : - 1 - 1 + n, while (m >= 10) and ((omniabs(array_y_higher ) < glob_small_float) 1, m or (omniabs(array_y_higher ) < glob_small_float) 1, m - 1 or (omniabs(array_y_higher ) < 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 - 1) rm0 array_y_higher 1, m - 2 - convfloat(m - 2) rm1, if omniabs(hdrc) > glob_small_float glob_h convfloat(m - 1) rm0 then (rcs : ------, ord_no : 2.0 - convfloat(m) + --------------------, hdrc 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 : false, if (not found) 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 : true, array_type_pole : 2, 1, 2 1, 2 1 if glob_display_flag then (if reached_interval() then omniout_str(ALWAYS, "Complex estimate of poles used"))), if (not found) 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 > 0.0) and ((array_complex_pole = glob_large_float) or (array_complex_pole = glob_large_float) or (array_complex_pole <= 0.0) or (array_complex_pole <= 1, 2 1, 1 1, 2 1, 1 1, 2 0.0))) then (array_poles : array_real_pole , 1, 1 1, 1 array_poles : array_real_pole , found : true, 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"))), if (not found) 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 : true, array_type_pole : 3, if reached_interval() 1 then omniout_str(ALWAYS, "NO POLE")), if (not found) and ((array_real_pole < array_complex_pole ) 1, 1 1, 1 and (array_real_pole > 0.0) and (array_real_pole > 1, 1 1, 2 0.0)) then (array_poles : array_real_pole , 1, 1 1, 1 array_poles : array_real_pole , found : true, 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"))), if (not found) 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, found : true, 1, 2 1, 2 1 if glob_display_flag then (if reached_interval() then omniout_str(ALWAYS, "Complex estimate of poles used"))), if not found 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")), 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, temp2], array_tmp1 : array_const_0D2 array_x , 1 1 1 array_tmp2 : array_const_0D3 + array_tmp1 , 1 1 1 array_tmp3 : expt(array_tmp2 , array_const_2D0 ), 1 1 1 array_tmp4 : array_tmp3 + array_const_0D0 , 1 1 1 if not array_y_set_initial then (if 1 <= glob_max_terms 1, 2 then (temporary : array_tmp4 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_const_0D2 array_x , array_tmp2 : array_tmp1 , 2 1 2 2 2 (array_const_2D0 - 0) array_tmp2 array_tmp3 1 2 1 ---------------------------------------------- array_tmp2 1 array_tmp3 : ----------------------------------------------, 2 1 array_tmp4 : array_tmp3 , if not array_y_set_initial 2 2 1, 3 then (if 2 <= glob_max_terms then (temporary : array_tmp4 expt(glob_h, 1) factorial_3(1, 2), array_y : temporary, 2 3 temporary 2.0 array_y_higher : temporary, temporary : -------------, 1, 3 glob_h array_y_higher : temporary, 0)), kkk : 3, 2, 2 (array_const_2D0 - 1) array_tmp2 array_tmp3 1 2 2 ---------------------------------------------- array_tmp2 1 array_tmp3 : ----------------------------------------------, 3 2 array_tmp4 : array_tmp3 , if not array_y_set_initial 3 3 1, 4 then (if 3 <= glob_max_terms then (temporary : array_tmp4 expt(glob_h, 1) factorial_3(2, 3), array_y : temporary, 3 4 temporary 3.0 array_y_higher : temporary, temporary : -------------, 1, 4 glob_h array_y_higher : temporary, 0)), kkk : 4, 2, 3 (array_const_2D0 - 2) array_tmp2 array_tmp3 1 2 3 ---------------------------------------------- array_tmp2 1 array_tmp3 : ----------------------------------------------, 4 3 array_tmp4 : array_tmp3 , if not array_y_set_initial 4 4 1, 5 then (if 4 <= glob_max_terms then (temporary : array_tmp4 expt(glob_h, 1) factorial_3(3, 4), array_y : temporary, 4 5 temporary 4.0 array_y_higher : temporary, temporary : -------------, 1, 5 glob_h array_y_higher : temporary, 0)), kkk : 5, 2, 4 (array_const_2D0 - 3) array_tmp2 array_tmp3 1 2 4 ---------------------------------------------- array_tmp2 1 array_tmp3 : ----------------------------------------------, 5 4 array_tmp4 : array_tmp3 , if not array_y_set_initial 5 5 1, 6 then (if 5 <= glob_max_terms then (temporary : array_tmp4 expt(glob_h, 1) factorial_3(4, 5), array_y : temporary, 5 6 temporary 5.0 array_y_higher : temporary, temporary : -------------, 1, 6 glob_h array_y_higher : temporary, 0)), kkk : 6, 2, 5 while kkk <= glob_max_terms do (array_tmp3 : kkk (array_const_2D0 - (kkk - 2)) array_tmp2 array_tmp3 1 2 kkk - 1 ------------------------------------------------------------ array_tmp2 1 ------------------------------------------------------------, kkk - 1 array_tmp4 : array_tmp3 , 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_tmp4 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, temp2], array_tmp1 : array_const_0D2 array_x , 1 1 1 array_tmp2 : array_const_0D3 + array_tmp1 , 1 1 1 array_tmp3 : expt(array_tmp2 , array_const_2D0 ), 1 1 1 array_tmp4 : array_tmp3 + array_const_0D0 , 1 1 1 if not array_y_set_initial then (if 1 <= glob_max_terms 1, 2 then (temporary : array_tmp4 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_const_0D2 array_x , array_tmp2 : array_tmp1 , 2 1 2 2 2 (array_const_2D0 - 0) array_tmp2 array_tmp3 1 2 1 ---------------------------------------------- array_tmp2 1 array_tmp3 : ----------------------------------------------, 2 1 array_tmp4 : array_tmp3 , if not array_y_set_initial 2 2 1, 3 then (if 2 <= glob_max_terms then (temporary : array_tmp4 expt(glob_h, 1) factorial_3(1, 2), array_y : temporary, 2 3 temporary 2.0 array_y_higher : temporary, temporary : -------------, 1, 3 glob_h array_y_higher : temporary, 0)), kkk : 3, 2, 2 (array_const_2D0 - 1) array_tmp2 array_tmp3 1 2 2 ---------------------------------------------- array_tmp2 1 array_tmp3 : ----------------------------------------------, 3 2 array_tmp4 : array_tmp3 , if not array_y_set_initial 3 3 1, 4 then (if 3 <= glob_max_terms then (temporary : array_tmp4 expt(glob_h, 1) factorial_3(2, 3), array_y : temporary, 3 4 temporary 3.0 array_y_higher : temporary, temporary : -------------, 1, 4 glob_h array_y_higher : temporary, 0)), kkk : 4, 2, 3 (array_const_2D0 - 2) array_tmp2 array_tmp3 1 2 3 ---------------------------------------------- array_tmp2 1 array_tmp3 : ----------------------------------------------, 4 3 array_tmp4 : array_tmp3 , if not array_y_set_initial 4 4 1, 5 then (if 4 <= glob_max_terms then (temporary : array_tmp4 expt(glob_h, 1) factorial_3(3, 4), array_y : temporary, 4 5 temporary 4.0 array_y_higher : temporary, temporary : -------------, 1, 5 glob_h array_y_higher : temporary, 0)), kkk : 5, 2, 4 (array_const_2D0 - 3) array_tmp2 array_tmp3 1 2 4 ---------------------------------------------- array_tmp2 1 array_tmp3 : ----------------------------------------------, 5 4 array_tmp4 : array_tmp3 , if not array_y_set_initial 5 5 1, 6 then (if 5 <= glob_max_terms then (temporary : array_tmp4 expt(glob_h, 1) factorial_3(4, 5), array_y : temporary, 5 6 temporary 5.0 array_y_higher : temporary, temporary : -------------, 1, 6 glob_h array_y_higher : temporary, 0)), kkk : 6, 2, 5 while kkk <= glob_max_terms do (array_tmp3 : kkk (array_const_2D0 - (kkk - 2)) array_tmp2 array_tmp3 1 2 kkk - 1 ------------------------------------------------------------ array_tmp2 1 ------------------------------------------------------------, kkk - 1 array_tmp4 : array_tmp3 , 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_tmp4 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() := 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 (%o27) 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 (%i28) logditto(file) := (printf(file, ""), printf(file, "ditto"), printf(file, "")) (%o28) logditto(file) := (printf(file, ""), printf(file, "ditto"), printf(file, "")) (%i29) logitem_integer(file, n) := (printf(file, ""), printf(file, "~d", n), printf(file, "")) (%o29) logitem_integer(file, n) := (printf(file, ""), printf(file, "~d", n), printf(file, "")) (%i30) logitem_str(file, str) := (printf(file, ""), printf(file, str), printf(file, "")) (%o30) logitem_str(file, str) := (printf(file, ""), printf(file, str), printf(file, "")) (%i31) 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, "")) (%o31) 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, "")) (%i32) log_revs(file, revs) := printf(file, revs) (%o32) log_revs(file, revs) := printf(file, revs) (%i33) logitem_float(file, x) := (printf(file, ""), printf(file, "~g", x), printf(file, "")) (%o33) logitem_float(file, x) := (printf(file, ""), printf(file, "~g", x), printf(file, "")) (%i34) 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, "")) (%o34) 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, "")) (%i35) logstart(file) := printf(file, "") (%o35) logstart(file) := printf(file, "") (%i36) logend(file) := printf(file, "~%") (%o36) logend(file) := printf(file, "~%") (%i37) 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()) (%o37) 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()) (%i38) 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 (%o38) 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 (%i39) 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 (%o39) 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 (%i40) factorial_2(nnn) := nnn! (%o40) factorial_2(nnn) := nnn! (%i41) 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 (%o41) 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 (%i42) 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) (%o42) 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) (%i43) convfp(mmm) := mmm (%o43) convfp(mmm) := mmm (%i44) convfloat(mmm) := mmm (%o44) convfloat(mmm) := mmm (%i45) elapsed_time_seconds() := block([t], t : elapsed_real_time(), t) (%o45) elapsed_time_seconds() := block([t], t : elapsed_real_time(), t) (%i46) Si(x) := 0.0 (%o46) Si(x) := 0.0 (%i47) Ci(x) := 0.0 (%o47) Ci(x) := 0.0 (%i48) ln(x) := log(x) (%o48) ln(x) := log(x) (%i49) arcsin(x) := asin(x) (%o49) arcsin(x) := asin(x) (%i50) arccos(x) := acos(x) (%o50) arccos(x) := acos(x) (%i51) arctan(x) := atan(x) (%o51) arctan(x) := atan(x) (%i52) omniabs(x) := abs(x) (%o52) omniabs(x) := abs(x) (%i53) expt(x, y) := (if (x = 0.0) and (y < 0.0) y then print("expt error x = ", x, "y = ", y), x ) (%o53) expt(x, y) := (if (x = 0.0) and (y < 0.0) y then print("expt error x = ", x, "y = ", y), x ) (%i54) 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) (%o54) 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) 5.0 expt(0.3 + 0.2 x, 3.0) (%i55) exact_soln_y(x) := block(--------------------------) 3.0 5.0 expt(0.3 + 0.2 x, 3.0) (%o55) exact_soln_y(x) := block(--------------------------) 3.0 (%i56) 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, log10norm, 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_log10normmin, 0.1, float), 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_hmax, 1.0, float), define_variable(glob_hmin, 1.0E-11, float), define_variable(glob_hmin_init, 0.001, 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_log10_abserr, 1.0E-11, float), define_variable(glob_log10_relerr, 1.0E-11, float), 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-51, 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_log10abserr, 0.0, float), define_variable(glob_log10relerr, 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/expt_lin_cpostode.ode#################"), omniout_str(ALWAYS, "diff ( y , x , 1 ) = expt((0.2 * x + 0.3) , 2.0);"), 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:0.1,"), omniout_str(ALWAYS, "x_end:5.0,"), omniout_str(ALWAYS, "array_y_init[0 + 1] : exact_soln_y(x_start),"), omniout_str(ALWAYS, "glob_h:0.05,"), omniout_str(ALWAYS, "glob_look_poles:true,"), omniout_str(ALWAYS, "glob_max_iter:1000000,"), 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, " (5.0/3.0 * expt((0.2 * x + 0.3),3.0)) "), 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, glob_log10_abserr : - 8.0, glob_log10_relerr : - 8.0, glob_hmax : 0.01, 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_c1, 1 + max_terms), array(array_tmp3_a1, 1 + max_terms), array(array_tmp3_a2, 1 + max_terms), array(array_tmp3, 1 + max_terms), array(array_tmp4, 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_c1 : 0.0, term : 1 + term), term term : 1, while term <= max_terms do (array_tmp3_a1 : 0.0, term term : 1 + term), term : 1, while term <= max_terms do (array_tmp3_a2 : 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_tmp4 : 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_c1, 1 + 1 + max_terms), term : 1, while term <= 1 + max_terms do (array_tmp3_c1 : 0.0, term : 1 + term), term array(array_tmp3_a1, 1 + 1 + max_terms), term : 1, while term <= 1 + max_terms do (array_tmp3_a1 : 0.0, term : 1 + term), term array(array_tmp3_a2, 1 + 1 + max_terms), term : 1, while term <= 1 + max_terms do (array_tmp3_a2 : 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_tmp4, 1 + 1 + max_terms), term : 1, while term <= 1 + max_terms do (array_tmp4 : 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_0D2, 1 + 1 + max_terms), term : 1, 1 while term <= 1 + max_terms do (array_const_0D2 : 0.0, term : 1 + term), term array_const_0D2 : 0.2, array(array_const_0D3, 1 + 1 + max_terms), term : 1, 1 while term <= 1 + max_terms do (array_const_0D3 : 0.0, term : 1 + term), term array_const_0D3 : 0.3, 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 : 0.1, iiif, jjjf x_end : 5.0, array_y_init : exact_soln_y(x_start), glob_h : 0.05, 1 + 0 glob_look_poles : true, glob_max_iter : 1000000, 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), glob_abserr : expt(10.0, glob_log10_abserr), glob_relerr : expt(10.0, glob_log10_relerr), 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, 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_log10normmin : - glob_large_float, if omniabs(array_y_higher ) > glob_small_float 1, 1 then (tmp : omniabs(array_y_higher ), log10norm : log10(tmp), 1, 1 if log10norm < glob_log10normmin then glob_log10normmin : log10norm), display_alot(current_iter), 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 ) = expt((0.2 * x + 0.3) , 2.0);"), 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-12T22:50:08-06:00"), logitem_str(html_log_file, "Maxima"), logitem_str(html_log_file, "expt_lin_c"), logitem_str(html_log_file, "diff ( y , x , 1 ) = expt((0.2 * x + 0.3) , 2.0);"), 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, " 156 "), logitem_str(html_log_file, "expt_lin_c diffeq.max"), logitem_str(html_log_file, "expt_lin_c maxima results"), logitem_str(html_log_file, "Languages compared - single equations"), logend(html_log_file)), if glob_html_log then close(html_log_file))) (%o56) 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, log10norm, 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_log10normmin, 0.1, float), 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_hmax, 1.0, float), define_variable(glob_hmin, 1.0E-11, float), define_variable(glob_hmin_init, 0.001, 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_log10_abserr, 1.0E-11, float), define_variable(glob_log10_relerr, 1.0E-11, float), 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-51, 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_log10abserr, 0.0, float), define_variable(glob_log10relerr, 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/expt_lin_cpostode.ode#################"), omniout_str(ALWAYS, "diff ( y , x , 1 ) = expt((0.2 * x + 0.3) , 2.0);"), 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:0.1,"), omniout_str(ALWAYS, "x_end:5.0,"), omniout_str(ALWAYS, "array_y_init[0 + 1] : exact_soln_y(x_start),"), omniout_str(ALWAYS, "glob_h:0.05,"), omniout_str(ALWAYS, "glob_look_poles:true,"), omniout_str(ALWAYS, "glob_max_iter:1000000,"), 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, " (5.0/3.0 * expt((0.2 * x + 0.3),3.0)) "), 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, glob_log10_abserr : - 8.0, glob_log10_relerr : - 8.0, glob_hmax : 0.01, 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_c1, 1 + max_terms), array(array_tmp3_a1, 1 + max_terms), array(array_tmp3_a2, 1 + max_terms), array(array_tmp3, 1 + max_terms), array(array_tmp4, 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_c1 : 0.0, term : 1 + term), term term : 1, while term <= max_terms do (array_tmp3_a1 : 0.0, term term : 1 + term), term : 1, while term <= max_terms do (array_tmp3_a2 : 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_tmp4 : 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_c1, 1 + 1 + max_terms), term : 1, while term <= 1 + max_terms do (array_tmp3_c1 : 0.0, term : 1 + term), term array(array_tmp3_a1, 1 + 1 + max_terms), term : 1, while term <= 1 + max_terms do (array_tmp3_a1 : 0.0, term : 1 + term), term array(array_tmp3_a2, 1 + 1 + max_terms), term : 1, while term <= 1 + max_terms do (array_tmp3_a2 : 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_tmp4, 1 + 1 + max_terms), term : 1, while term <= 1 + max_terms do (array_tmp4 : 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_0D2, 1 + 1 + max_terms), term : 1, 1 while term <= 1 + max_terms do (array_const_0D2 : 0.0, term : 1 + term), term array_const_0D2 : 0.2, array(array_const_0D3, 1 + 1 + max_terms), term : 1, 1 while term <= 1 + max_terms do (array_const_0D3 : 0.0, term : 1 + term), term array_const_0D3 : 0.3, 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 : 0.1, iiif, jjjf x_end : 5.0, array_y_init : exact_soln_y(x_start), glob_h : 0.05, 1 + 0 glob_look_poles : true, glob_max_iter : 1000000, 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), glob_abserr : expt(10.0, glob_log10_abserr), glob_relerr : expt(10.0, glob_log10_relerr), 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, 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_log10normmin : - glob_large_float, if omniabs(array_y_higher ) > glob_small_float 1, 1 then (tmp : omniabs(array_y_higher ), log10norm : log10(tmp), 1, 1 if log10norm < glob_log10normmin then glob_log10normmin : log10norm), display_alot(current_iter), 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 ) = expt((0.2 * x + 0.3) , 2.0);"), 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-12T22:50:08-06:00"), logitem_str(html_log_file, "Maxima"), logitem_str(html_log_file, "expt_lin_c"), logitem_str(html_log_file, "diff ( y , x , 1 ) = expt((0.2 * x + 0.3) , 2.0);"), 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, " 156 "), logitem_str(html_log_file, "expt_lin_c diffeq.max"), logitem_str(html_log_file, "expt_lin_c maxima results"), logitem_str(html_log_file, "Languages compared - single equations"), logend(html_log_file)), if glob_html_log then close(html_log_file))) (%i57) main() "##############ECHO OF PROBLEM#################" "##############temp/expt_lin_cpostode.ode#################" "diff ( y , x , 1 ) = expt((0.2 * x + 0.3) , 2.0);" "!" "/* BEGIN FIRST INPUT BLOCK */" "Digits:32," "max_terms:30," "!" "/* END FIRST INPUT BLOCK */" "/* BEGIN SECOND INPUT BLOCK */" "x_start:0.1," "x_end:5.0," "array_y_init[0 + 1] : exact_soln_y(x_start)," "glob_h:0.05," "glob_look_poles:true," "glob_max_iter:1000000," "/* 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(" " (5.0/3.0 * expt((0.2 * x + 0.3),3.0)) " "));" "/* 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.9 "" estimated_steps = 4900. "" step_error = 2.040816326530612300000000000000E-14 "" est_needed_step_err = 2.040816326530612300000000000000E-14 "" hn_div_ho = 0.5 "" hn_div_ho_2 = 0.25 "" hn_div_ho_3 = 0.125 "" max_value3 = 0.0 "" value3 = 0.0 "" best_h = 1.000E-3 "" "START of Soultion" x[1] = 0.1 " " y[1] (analytic) = 5.46133333333333500E-2 " " y[1] (numeric) = 5.46133333333333500E-2 " " absolute error = 0.0 " " relative error = 0.0 "%" Correct digits = 16 h = 1.000E-3 " " " " "TOP MAIN SOLVE Loop" x[1] = 0.1 " " y[1] (analytic) = 5.46133333333333500E-2 " " y[1] (numeric) = 5.46133333333333500E-2 " " absolute error = 0.0 " " relative error = 0.0 "%" Correct digits = 16 h = 1.000E-3 " " "NO POLE" " " "TOP MAIN SOLVE Loop" x[1] = 0.101 " " y[1] (analytic) = 5.471579734666666000E-2 " " y[1] (numeric) = 5.47157973466666700E-2 " " absolute error = 1.387778780781445700000000000000000E-17 " " relative error = 2.536340230936962600000000000000E-14 "%" Correct digits = 16 h = 1.000E-3 " " "NO POLE" " " "TOP MAIN SOLVE Loop" x[1] = 0.10200000000000001 " " y[1] (analytic) = 5.48183894400000100E-2 " " y[1] (numeric) = 5.48183894400000100E-2 " " absolute error = 6.938893903907228000000000000000000E-18 " " relative error = 1.265796747184994600000000000000E-14 "%" Correct digits = 16 h = 1.000E-3 " " "NO POLE" " " "TOP MAIN SOLVE Loop" x[1] = 0.10300000000000001 " " y[1] (analytic) = 5.49211096933333300E-2 " " y[1] (numeric) = 5.492110969333335000E-2 " " absolute error = 1.387778780781445700000000000000000E-17 " " relative error = 2.526858595047476000000000000000E-14 "%" Correct digits = 16 h = 1.000E-3 " " "NO POLE" " " "TOP MAIN SOLVE Loop" x[1] = 0.10400000000000001 " " y[1] (analytic) = 5.50239581866666500E-2 " " y[1] (numeric) = 5.50239581866666800E-2 " " absolute error = 2.081668171172168500000000000000000E-17 " " relative error = 3.783203244139924400000000000000E-14 "%" Correct digits = 16 h = 1.000E-3 " " "NO POLE" " " "TOP MAIN SOLVE Loop" x[1] = 0.10500000000000001 " " y[1] (analytic) = 5.512693500E-2 " " y[1] (numeric) = 5.512693500000001000E-2 " " absolute error = 1.387778780781445700000000000000000E-17 " " relative error = 2.517424160769043000000000000000E-14 "%" Correct digits = 16 h = 1.000E-3 " " "NO POLE" " " "TOP MAIN SOLVE Loop" x[1] = 0.10600000000000001 " " y[1] (analytic) = 5.523004021333332000E-2 " " y[1] (numeric) = 5.52300402133333500E-2 " " absolute error = 2.775557561562891400000000000000000E-17 " " relative error = 5.02544910494711500000000000000E-14 "%" Correct digits = 16 h = 1.000E-3 " " "NO POLE" " " "TOP MAIN SOLVE Loop" x[1] = 0.10700000000000001 " " y[1] (analytic) = 5.53332739066666800E-2 " " y[1] (numeric) = 5.53332739066666900E-2 " " absolute error = 6.938893903907228000000000000000000E-18 " " relative error = 1.254018317371099000000000000000E-14 "%" Correct digits = 16 h = 1.000E-3 " " "NO POLE" " " "TOP MAIN SOLVE Loop" x[1] = 0.10800000000000001 " " y[1] (analytic) = 5.54366361600E-2 " " y[1] (numeric) = 5.543663616000003000E-2 " " absolute error = 2.775557561562891400000000000000000E-17 " " relative error = 5.00672074249263300000000000000E-14 "%" Correct digits = 16 h = 1.000E-3 " " "NO POLE" " " "TOP MAIN SOLVE Loop" x[1] = 0.10900000000000001 " " y[1] (analytic) = 5.55401270533333200E-2 " " y[1] (numeric) = 5.55401270533333500E-2 " " absolute error = 4.16333634234433700000000000000000E-17 " " relative error = 7.49608717737794300000000000000E-14 "%" Correct digits = 16 h = 1.000E-3 " " "NO POLE" " " "TOP MAIN SOLVE Loop" x[1] = 0.11000000000000001 " " y[1] (analytic) = 5.56437466666666800E-2 " " y[1] (numeric) = 5.564374666666669000E-2 " " absolute error = 1.387778780781445700000000000000000E-17 " " relative error = 2.49404266232272400000000000000E-14 "%" Correct digits = 16 h = 1.000E-3 " " "NO POLE" " " "TOP MAIN SOLVE Loop" x[1] = 0.11100000000000002 " " y[1] (analytic) = 5.574749508000000000E-2 " " y[1] (numeric) = 5.57474950800000300E-2 " " absolute error = 3.46944695195361400000000000000000E-17 " " relative error = 6.2235028622807400000000000000E-14 "%" Correct digits = 16 h = 1.000E-3 " " "NO POLE" " " "TOP MAIN SOLVE Loop" x[1] = 0.11200000000000002 " " y[1] (analytic) = 5.58513723733333400E-2 " " y[1] (numeric) = 5.58513723733333600E-2 " " absolute error = 2.081668171172168500000000000000000E-17 " " relative error = 3.72715670665610500000000000000E-14 "%" Correct digits = 16 h = 1.000E-3 " " "NO POLE" " " "TOP MAIN SOLVE Loop" x[1] = 0.11300000000000002 " " y[1] (analytic) = 5.59553786266666600E-2 " " y[1] (numeric) = 5.59553786266666900E-2 " " absolute error = 2.775557561562891400000000000000000E-17 " " relative error = 4.960305210480951400000000000000E-14 "%" Correct digits = 16 h = 1.000E-3 " " "NO POLE" " " "TOP MAIN SOLVE Loop" x[1] = 0.11400000000000002 " " y[1] (analytic) = 5.60595139199999900E-2 " " y[1] (numeric) = 5.605951392000003000E-2 " " absolute error = 3.46944695195361400000000000000000E-17 " " relative error = 6.18886377949103500000000000000E-14 "%" Correct digits = 16 h = 1.000E-3 " " "NO POLE" " " "TOP MAIN SOLVE Loop" x[1] = 0.11500000000000002 " " y[1] (analytic) = 5.616377833333335000E-2 " " y[1] (numeric) = 5.61637783333333600E-2 " " absolute error = 1.387778780781445700000000000000000E-17 " " relative error = 2.47094982204535100000000000000E-14 "%" Correct digits = 16 h = 1.000E-3 " " "NO POLE" " " "TOP MAIN SOLVE Loop" x[1] = 0.11600000000000002 " " y[1] (analytic) = 5.62681719466666700E-2 " " y[1] (numeric) = 5.626817194666669000E-2 " " absolute error = 2.775557561562891400000000000000000E-17 " " relative error = 4.9327310014508400000000000000E-14 "%" Correct digits = 16 h = 1.000E-3 " " "NO POLE" " " "TOP MAIN SOLVE Loop" x[1] = 0.11700000000000002 " " y[1] (analytic) = 5.637269484000001000E-2 " " y[1] (numeric) = 5.63726948400000300E-2 " " absolute error = 1.387778780781445700000000000000000E-17 " " relative error = 2.4617925127055099000000000000E-14 "%" Correct digits = 16 h = 1.000E-3 " " "NO POLE" " " "TOP MAIN SOLVE Loop" x[1] = 0.11800000000000002 " " y[1] (analytic) = 5.64773470933333300E-2 " " y[1] (numeric) = 5.64773470933333600E-2 " " absolute error = 2.775557561562891400000000000000000E-17 " " relative error = 4.9144616459694196000000000000E-14 "%" Correct digits = 16 h = 1.000E-3 " " "NO POLE" " " "TOP MAIN SOLVE Loop" x[1] = 0.11900000000000002 " " y[1] (analytic) = 5.65821287866666600E-2 " " y[1] (numeric) = 5.65821287866667000E-2 " " absolute error = 3.46944695195361400000000000000000E-17 " " relative error = 6.13170099172934400000000000000E-14 "%" Correct digits = 16 h = 1.000E-3 " " "NO POLE" " " "TOP MAIN SOLVE Loop" x[1] = 0.12000000000000002 " " y[1] (analytic) = 5.66870400E-2 " " y[1] (numeric) = 5.66870400000000300E-2 " " absolute error = 2.775557561562891400000000000000000E-17 " " relative error = 4.89628239816877250000000000000E-14 "%" Correct digits = 16 h = 1.000E-3 " " "NO POLE" " " "TOP MAIN SOLVE Loop" x[1] = 0.12100000000000002 " " y[1] (analytic) = 5.67920808133333300E-2 " " y[1] (numeric) = 5.67920808133333600E-2 " " absolute error = 2.775557561562891400000000000000000E-17 " " relative error = 4.88722639109793130000000000000E-14 "%" Correct digits = 16 h = 1.000E-3 " " "NO POLE" " " "TOP MAIN SOLVE Loop" x[1] = 0.12200000000000003 " " y[1] (analytic) = 5.68972513066666900E-2 " " y[1] (numeric) = 5.689725130666670000E-2 " " absolute error = 1.387778780781445700000000000000000E-17 " " relative error = 2.439096351599745700000000000000E-14 "%" Correct digits = 16 h = 1.000E-3 " " "NO POLE" " " "TOP MAIN SOLVE Loop" x[1] = 0.12300000000000003 " " y[1] (analytic) = 5.70025515600E-2 " " y[1] (numeric) = 5.70025515600000300E-2 " " absolute error = 2.775557561562891400000000000000000E-17 " " relative error = 4.869181265756818400000000000000E-14 "%" Correct digits = 16 h = 1.000E-3 " " "NO POLE" " " "TOP MAIN SOLVE Loop" x[1] = 0.12400000000000003 " " y[1] (analytic) = 5.71079816533333300E-2 " " y[1] (numeric) = 5.71079816533333600E-2 " " absolute error = 3.46944695195361400000000000000000E-17 " " relative error = 6.07524001288374500000000000000E-14 "%" Correct digits = 16 h = 1.000E-3 " " "NO POLE" " " "TOP MAIN SOLVE Loop" x[1] = 0.12500000000000003 " " y[1] (analytic) = 5.72135416666666800E-2 " " y[1] (numeric) = 5.721354166666669000E-2 " " absolute error = 1.387778780781445700000000000000000E-17 " " relative error = 2.425612434319868200000000000000E-14 "%" Correct digits = 16 h = 1.000E-3 " " "NO POLE" " " "TOP MAIN SOLVE Loop" x[1] = 0.12600000000000003 " " y[1] (analytic) = 5.73192316799999900E-2 " " y[1] (numeric) = 5.73192316800000300E-2 " " absolute error = 3.46944695195361400000000000000000E-17 " " relative error = 6.05284971599538100000000000000E-14 "%" Correct digits = 16 h = 1.000E-3 " " "NO POLE" " " "TOP MAIN SOLVE Loop" x[1] = 0.12700000000000003 " " y[1] (analytic) = 5.742505177333336000E-2 " " y[1] (numeric) = 5.74250517733333600E-2 " " absolute error = 6.938893903907228000000000000000000E-18 " " relative error = 1.208339163767104100000000000000E-14 "%" Correct digits = 16 h = 1.000E-3 " " "NO POLE" " " "TOP MAIN SOLVE Loop" x[1] = 0.12800000000000003 " " y[1] (analytic) = 5.75310020266666700E-2 " " y[1] (numeric) = 5.753100202666670000E-2 " " absolute error = 2.775557561562891400000000000000000E-17 " " relative error = 4.82445544799718600000000000000E-14 "%" Correct digits = 16 h = 1.000E-3 " " "NO POLE" " " "TOP MAIN SOLVE Loop" x[1] = 0.12900000000000003 " " y[1] (analytic) = 5.763708251999999000E-2 " " y[1] (numeric) = 5.76370825200000300E-2 " " absolute error = 3.46944695195361400000000000000000E-17 " " relative error = 6.01947010546503800000000000000E-14 "%" Correct digits = 16 h = 1.000E-3 " " "NO POLE" " " "TOP MAIN SOLVE Loop" x[1] = 0.13000000000000003 " " y[1] (analytic) = 5.77432933333333500E-2 " " y[1] (numeric) = 5.77432933333333700E-2 " " absolute error = 2.081668171172168500000000000000000E-17 " " relative error = 3.605038872922214400000000000000E-14 "%" Correct digits = 16 h = 1.000E-3 " " "NO POLE" " " "TOP MAIN SOLVE Loop" x[1] = 0.13100000000000003 " " y[1] (analytic) = 5.78496345466666600E-2 " " y[1] (numeric) = 5.784963454666670000E-2 " " absolute error = 3.46944695195361400000000000000000E-17 " " relative error = 5.99735327481602300000000000000E-14 "%" Correct digits = 16 h = 1.000E-3 " " "NO POLE" " " "TOP MAIN SOLVE Loop" x[1] = 0.13200000000000003 " " y[1] (analytic) = 5.795610624000000000E-2 " " y[1] (numeric) = 5.79561062400000300E-2 " " absolute error = 2.081668171172168500000000000000000E-17 " " relative error = 3.59180128932721100000000000000E-14 "%" Correct digits = 16 h = 1.000E-3 " " "NO POLE" " " "TOP MAIN SOLVE Loop" x[1] = 0.13300000000000003 " " y[1] (analytic) = 5.80627084933333300E-2 " " y[1] (numeric) = 5.80627084933333600E-2 " " absolute error = 2.775557561562891400000000000000000E-17 " " relative error = 4.780275728752090000000000000000E-14 "%" Correct digits = 16 h = 1.000E-3 " " "NO POLE" " " "TOP MAIN SOLVE Loop" x[1] = 0.13400000000000004 " " y[1] (analytic) = 5.81694413866666600E-2 " " y[1] (numeric) = 5.816944138666670000E-2 " " absolute error = 3.46944695195361400000000000000000E-17 " " relative error = 5.96438072851919400000000000000E-14 "%" Correct digits = 16 h = 1.000E-3 " " "NO POLE" " " "TOP MAIN SOLVE Loop" x[1] = 0.13500000000000004 " " y[1] (analytic) = 5.827630500000002000E-2 " " y[1] (numeric) = 5.82763050000000300E-2 " " absolute error = 1.387778780781445700000000000000000E-17 " " relative error = 2.381377441108260600000000000000E-14 "%" Correct digits = 16 h = 1.000E-3 " " "NO POLE" " " "TOP MAIN SOLVE Loop" x[1] = 0.13600000000000004 " " y[1] (analytic) = 5.83832994133333300E-2 " " y[1] (numeric) = 5.83832994133333600E-2 " " absolute error = 2.775557561562891400000000000000000E-17 " " relative error = 4.7540265614536703000000000000E-14 "%" Correct digits = 16 h = 1.000E-3 " " "NO POLE" " " "TOP MAIN SOLVE Loop" x[1] = 0.13700000000000004 " " y[1] (analytic) = 5.849042470666668000E-2 " " y[1] (numeric) = 5.8490424706666700E-2 " " absolute error = 2.081668171172168500000000000000000E-17 " " relative error = 3.55898966644860400000000000000E-14 "%" Correct digits = 16 h = 1.000E-3 " " "NO POLE" " " "TOP MAIN SOLVE Loop" x[1] = 0.13800000000000004 " " y[1] (analytic) = 5.85976809600E-2 " " y[1] (numeric) = 5.85976809600000300E-2 " " absolute error = 2.775557561562891400000000000000000E-17 " " relative error = 4.736633798626851400000000000000E-14 "%" Correct digits = 16 h = 1.000E-3 " " "NO POLE" " " "TOP MAIN SOLVE Loop" x[1] = 0.13900000000000004 " " y[1] (analytic) = 5.87050682533333400E-2 " " y[1] (numeric) = 5.87050682533333600E-2 " " absolute error = 2.775557561562891400000000000000000E-17 " " relative error = 4.72796922675461200000000000000E-14 "%" Correct digits = 16 h = 1.000E-3 " " "NO POLE" " " "TOP MAIN SOLVE Loop" x[1] = 0.14000000000000004 " " y[1] (analytic) = 5.88125866666666800E-2 " " y[1] (numeric) = 5.881258666666669000E-2 " " absolute error = 1.387778780781445700000000000000000E-17 " " relative error = 2.35966288754988500000000000000E-14 "%" Correct digits = 16 h = 1.000E-3 " " "NO POLE" " " "TOP MAIN SOLVE Loop" x[1] = 0.14100000000000004 " " y[1] (analytic) = 5.89202362799999900E-2 " " y[1] (numeric) = 5.892023628000003000E-2 " " absolute error = 3.46944695195361400000000000000000E-17 " " relative error = 5.88837922418734600000000000000E-14 "%" Correct digits = 16 h = 1.000E-3 " " "NO POLE" " " "TOP MAIN SOLVE Loop" x[1] = 0.14200000000000004 " " y[1] (analytic) = 5.90280171733333600E-2 " " y[1] (numeric) = 5.90280171733333600E-2 " " absolute error = 0.0 " " relative error = 0.0 "%" Correct digits = 16 h = 1.000E-3 " " "NO POLE" " " "TOP MAIN SOLVE Loop" x[1] = 0.14300000000000004 " " y[1] (analytic) = 5.91359294266666700E-2 " " y[1] (numeric) = 5.91359294266666900E-2 " " absolute error = 2.081668171172168500000000000000000E-17 " " relative error = 3.52014112461630500000000000000E-14 "%" Correct digits = 16 h = 1.000E-3 " " "NO POLE" " " "TOP MAIN SOLVE Loop" x[1] = 0.14400000000000004 " " y[1] (analytic) = 5.924397311999999000E-2 " " y[1] (numeric) = 5.92439731200000300E-2 " " absolute error = 2.775557561562891400000000000000000E-17 " " relative error = 4.68496188792223200000000000000E-14 "%" Correct digits = 16 h = 1.000E-3 " " "NO POLE" " " "TOP MAIN SOLVE Loop" x[1] = 0.14500000000000005 " " y[1] (analytic) = 5.93521483333333400E-2 " " y[1] (numeric) = 5.935214833333335000E-2 " " absolute error = 1.387778780781445700000000000000000E-17 " " relative error = 2.338211538674905300000000000000E-14 "%" Correct digits = 16 h = 1.000E-3 " " "NO POLE" " " "TOP MAIN SOLVE Loop" x[1] = 0.14600000000000005 " " y[1] (analytic) = 5.94604551466666700E-2 " " y[1] (numeric) = 5.94604551466666900E-2 " " absolute error = 2.081668171172168500000000000000000E-17 " " relative error = 3.5009287534672800000000000000E-14 "%" Correct digits = 16 h = 1.000E-3 " " "NO POLE" " " "TOP MAIN SOLVE Loop" x[1] = 0.14700000000000005 " " y[1] (analytic) = 5.956889364000002000E-2 " " y[1] (numeric) = 5.95688936400000200E-2 " " absolute error = 6.938893903907228000000000000000000E-18 " " relative error = 1.164851901705929900000000000000E-14 "%" Correct digits = 16 h = 1.000E-3 " " "NO POLE" " " "TOP MAIN SOLVE Loop" x[1] = 0.14800000000000005 " " y[1] (analytic) = 5.96774638933333400E-2 " " y[1] (numeric) = 5.96774638933333600E-2 " " absolute error = 2.081668171172168500000000000000000E-17 " " relative error = 3.488198115946939400000000000000E-14 "%" Correct digits = 16 h = 1.000E-3 " " "NO POLE" " " "TOP MAIN SOLVE Loop" x[1] = 0.14900000000000005 " " y[1] (analytic) = 5.97861659866666500E-2 " " y[1] (numeric) = 5.978616598666670000E-2 " " absolute error = 4.16333634234433700000000000000000E-17 " " relative error = 6.96371187821750100000000000000E-14 "%" Correct digits = 16 h = 1.000E-3 " " "NO POLE" " " "TOP MAIN SOLVE Loop" x[1] = 0.15000000000000005 " " y[1] (analytic) = 5.98950000000000100E-2 " " y[1] (numeric) = 5.98950000000000300E-2 " " absolute error = 2.081668171172168500000000000000000E-17 " " relative error = 3.475529127927486400000000000000E-14 "%" Correct digits = 16 h = 1.000E-3 " " "NO POLE" " " "TOP MAIN SOLVE Loop" x[1] = 0.15100000000000005 " " y[1] (analytic) = 6.00039660133333300E-2 " " y[1] (numeric) = 6.00039660133333700E-2 " " absolute error = 3.46944695195361400000000000000000E-17 " " relative error = 5.78202939316157400000000000000E-14 "%" Correct digits = 16 h = 1.000E-3 " " "NO POLE" " " "TOP MAIN SOLVE Loop" x[1] = 0.15200000000000005 " " y[1] (analytic) = 6.01130641066666800E-2 " " y[1] (numeric) = 6.011306410666670000E-2 " " absolute error = 2.081668171172168500000000000000000E-17 " " relative error = 3.462921416679717300000000000000E-14 "%" Correct digits = 16 h = 1.000E-3 " " "NO POLE" " " "TOP MAIN SOLVE Loop" x[1] = 0.15300000000000005 " " y[1] (analytic) = 6.022229436000001000E-2 " " y[1] (numeric) = 6.02222943600000400E-2 " " absolute error = 3.46944695195361400000000000000000E-17 " " relative error = 5.76106737351083200000000000000E-14 "%" Correct digits = 16 h = 1.000E-3 " " "NO POLE" " " "TOP MAIN SOLVE Loop" x[1] = 0.15400000000000005 " " y[1] (analytic) = 6.03316568533333300E-2 " " y[1] (numeric) = 6.033165685333337000E-2 " " absolute error = 4.16333634234433700000000000000000E-17 " " relative error = 6.90074922435071800000000000000E-14 "%" Correct digits = 16 h = 1.000E-3 " " "NO POLE" " " "TOP MAIN SOLVE Loop" x[1] = 0.15500000000000005 " " y[1] (analytic) = 6.04411516666666700E-2 " " y[1] (numeric) = 6.044115166666670000E-2 " " absolute error = 3.46944695195361400000000000000000E-17 " " relative error = 5.74020655841840300000000000000E-14 "%" Correct digits = 16 h = 1.000E-3 " " "NO POLE" " " "TOP MAIN SOLVE Loop" x[1] = 0.15600000000000006 " " y[1] (analytic) = 6.05507788800E-2 " " y[1] (numeric) = 6.05507788800000300E-2 " " absolute error = 3.46944695195361400000000000000000E-17 " " relative error = 5.7298139117737700000000000000E-14 "%" Correct digits = 16 h = 1.000E-3 " " "NO POLE" " " "TOP MAIN SOLVE Loop" x[1] = 0.15700000000000006 " " y[1] (analytic) = 6.066053857333334000E-2 " " y[1] (numeric) = 6.066053857333338000E-2 " " absolute error = 2.775557561562891400000000000000000E-17 " " relative error = 4.575557070281336400000000000000E-14 "%" Correct digits = 16 h = 1.000E-3 " " "NO POLE" " " "TOP MAIN SOLVE Loop" x[1] = 0.15800000000000006 " " y[1] (analytic) = 6.07704308266666800E-2 " " y[1] (numeric) = 6.07704308266667100E-2 " " absolute error = 3.46944695195361400000000000000000E-17 " " relative error = 5.70910376108636400000000000000E-14 "%" Correct digits = 16 h = 1.000E-3 " " "NO POLE" " " "TOP MAIN SOLVE Loop" x[1] = 0.15900000000000006 " " y[1] (analytic) = 6.08804557200E-2 " " y[1] (numeric) = 6.08804557200000400E-2 " " absolute error = 4.16333634234433700000000000000000E-17 " " relative error = 6.83854332742228300000000000000E-14 "%" Correct digits = 16 h = 1.000E-3 " " "NO POLE" " " "TOP MAIN SOLVE Loop" x[1] = 0.16000000000000006 " " y[1] (analytic) = 6.09906133333333500E-2 " " y[1] (numeric) = 6.099061333333338000E-2 " " absolute error = 2.081668171172168500000000000000000E-17 " " relative error = 3.413095978876587400000000000000E-14 "%" Correct digits = 16 h = 1.000E-3 " " "NO POLE" " " "TOP MAIN SOLVE Loop" x[1] = 0.16100000000000006 " " y[1] (analytic) = 6.11009037466666700E-2 " " y[1] (numeric) = 6.110090374666670000E-2 " " absolute error = 3.46944695195361400000000000000000E-17 " " relative error = 5.67822526216380000000000000000E-14 "%" Correct digits = 16 h = 1.000E-3 " " "NO POLE" " " "TOP MAIN SOLVE Loop" x[1] = 0.16200000000000006 " " y[1] (analytic) = 6.12113270400000200E-2 " " y[1] (numeric) = 6.12113270400000400E-2 " " absolute error = 2.081668171172168500000000000000000E-17 " " relative error = 3.40078915428814740000000000000E-14 "%" Correct digits = 16 h = 1.000E-3 " " "NO POLE" " " "TOP MAIN SOLVE Loop" x[1] = 0.16300000000000006 " " y[1] (analytic) = 6.132188329333335000E-2 " " y[1] (numeric) = 6.13218832933333700E-2 " " absolute error = 2.775557561562891400000000000000000E-17 " " relative error = 4.52621056709234860000000000000E-14 "%" Correct digits = 16 h = 1.000E-3 " " "NO POLE" " " "TOP MAIN SOLVE Loop" x[1] = 0.16400000000000006 " " y[1] (analytic) = 6.143257258666667000E-2 " " y[1] (numeric) = 6.143257258666670000E-2 " " absolute error = 4.16333634234433700000000000000000E-17 " " relative error = 6.77708285205029500000000000000E-14 "%" Correct digits = 16 h = 1.000E-3 " " "NO POLE" " " "TOP MAIN SOLVE Loop" x[1] = 0.16500000000000006 " " y[1] (analytic) = 6.154339500000001000E-2 " " y[1] (numeric) = 6.15433950000000500E-2 " " absolute error = 2.775557561562891400000000000000000E-17 " " relative error = 4.509919482932150400000000000000E-14 "%" Correct digits = 16 h = 1.000E-3 " " "NO POLE" " " "TOP MAIN SOLVE Loop" x[1] = 0.16600000000000006 " " y[1] (analytic) = 6.16543506133333400E-2 " " y[1] (numeric) = 6.165435061333338000E-2 " " absolute error = 3.46944695195361400000000000000000E-17 " " relative error = 5.62725406632263400000000000000E-14 "%" Correct digits = 16 h = 1.000E-3 " " "NO POLE" " " "TOP MAIN SOLVE Loop" x[1] = 0.16700000000000007 " " y[1] (analytic) = 6.17654395066666800E-2 " " y[1] (numeric) = 6.17654395066667100E-2 " " absolute error = 2.775557561562891400000000000000000E-17 " " relative error = 4.493706486559219700000000000000E-14 "%" Correct digits = 16 h = 1.000E-3 " " "NO POLE" " " "TOP MAIN SOLVE Loop" x[1] = 0.16800000000000007 " " y[1] (analytic) = 6.18766617600000100E-2 " " y[1] (numeric) = 6.18766617600000400E-2 " " absolute error = 3.46944695195361400000000000000000E-17 " " relative error = 5.6070364064087710000000000000E-14 "%" Correct digits = 16 h = 1.000E-3 " " "NO POLE" " " "TOP MAIN SOLVE Loop" x[1] = 0.16900000000000007 " " y[1] (analytic) = 6.19880174533333300E-2 " " y[1] (numeric) = 6.19880174533333800E-2 " " absolute error = 4.8572257327350600000000000000000E-17 " " relative error = 7.83574944365940200000000000000E-14 "%" Correct digits = 16 h = 1.000E-3 " " "NO POLE" " " "TOP MAIN SOLVE Loop" x[1] = 0.17000000000000007 " " y[1] (analytic) = 6.20995066666666800E-2 " " y[1] (numeric) = 6.209950666666672000E-2 " " absolute error = 3.46944695195361400000000000000000E-17 " " relative error = 5.586915481594186000000000000000E-14 "%" Correct digits = 16 h = 1.000E-3 " " "NO POLE" " " "TOP MAIN SOLVE Loop" x[1] = 0.17100000000000007 " " y[1] (analytic) = 6.22111294800E-2 " " y[1] (numeric) = 6.221112948000005000E-2 " " absolute error = 4.16333634234433700000000000000000E-17 " " relative error = 6.69226933692433700000000000000E-14 "%" Correct digits = 16 h = 1.000E-3 " " "NO POLE" " " "TOP MAIN SOLVE Loop" x[1] = 0.17200000000000007 " " y[1] (analytic) = 6.23228859733333600E-2 " " y[1] (numeric) = 6.232288597333338000E-2 " " absolute error = 1.387778780781445700000000000000000E-17 " " relative error = 2.226756285604692400000000000000E-14 "%" Correct digits = 16 h = 1.000E-3 " " "NO POLE" " " "TOP MAIN SOLVE Loop" x[1] = 0.17300000000000007 " " y[1] (analytic) = 6.24347762266666700E-2 " " y[1] (numeric) = 6.243477622666670000E-2 " " absolute error = 3.46944695195361400000000000000000E-17 " " relative error = 5.55691420973135500000000000000E-14 "%" Correct digits = 16 h = 1.000E-3 " " "NO POLE" " " "TOP MAIN SOLVE Loop" x[1] = 0.17400000000000007 " " y[1] (analytic) = 6.25468003200E-2 " " y[1] (numeric) = 6.25468003200000400E-2 " " absolute error = 4.16333634234433700000000000000000E-17 " " relative error = 6.65635383591807200000000000000E-14 "%" Correct digits = 16 h = 1.000E-3 " " "NO POLE" " " "TOP MAIN SOLVE Loop" x[1] = 0.17500000000000007 " " y[1] (analytic) = 6.26589583333333500E-2 " " y[1] (numeric) = 6.26589583333333700E-2 " " absolute error = 2.775557561562891400000000000000000E-17 " " relative error = 4.42962608282996100000000000000E-14 "%" Correct digits = 16 h = 1.000E-3 " " "NO POLE" " " "TOP MAIN SOLVE Loop" x[1] = 0.17600000000000007 " " y[1] (analytic) = 6.27712503466666600E-2 " " y[1] (numeric) = 6.27712503466667100E-2 " " absolute error = 4.16333634234433700000000000000000E-17 " " relative error = 6.63255283167291900000000000000E-14 "%" Correct digits = 16 h = 1.000E-3 " " "NO POLE" " " "TOP MAIN SOLVE Loop" x[1] = 0.17700000000000007 " " y[1] (analytic) = 6.28836764400000200E-2 " " y[1] (numeric) = 6.28836764400000500E-2 " " absolute error = 2.775557561562891400000000000000000E-17 " " relative error = 4.413796582347039300000000000000E-14 "%" Correct digits = 16 h = 1.000E-3 " " "NO POLE" " " "TOP MAIN SOLVE Loop" x[1] = 0.17800000000000007 " " y[1] (analytic) = 6.29962366933333400E-2 " " y[1] (numeric) = 6.29962366933333900E-2 " " absolute error = 4.16333634234433700000000000000000E-17 " " relative error = 6.60886516540904200000000000000E-14 "%" Correct digits = 16 h = 1.000E-3 " " "NO POLE" " " "TOP MAIN SOLVE Loop" x[1] = 0.17900000000000008 " " y[1] (analytic) = 6.31089311866666600E-2 " " y[1] (numeric) = 6.31089311866667200E-2 " " absolute error = 5.55111512312578300000000000000000E-17 " " relative error = 8.79608483101452800000000000000E-14 "%" Correct digits = 16 h = 1.000E-3 " " "NO POLE" " " "TOP MAIN SOLVE Loop" x[1] = 0.18000000000000008 " " y[1] (analytic) = 6.32217600000000200E-2 " " y[1] (numeric) = 6.32217600000000400E-2 " " absolute error = 2.775557561562891400000000000000000E-17 " " relative error = 4.390193442199158400000000000000E-14 "%" Correct digits = 16 h = 1.000E-3 " " "NO POLE" " " "TOP MAIN SOLVE Loop" x[1] = 0.18100000000000008 " " y[1] (analytic) = 6.33347232133333300E-2 " " y[1] (numeric) = 6.33347232133333800E-2 " " absolute error = 4.16333634234433700000000000000000E-17 " " relative error = 6.57354470204405100000000000000E-14 "%" Correct digits = 16 h = 1.000E-3 " " "NO POLE" " " "TOP MAIN SOLVE Loop" x[1] = 0.18200000000000008 " " y[1] (analytic) = 6.34478209066666900E-2 " " y[1] (numeric) = 6.3447820906666700E-2 " " absolute error = 1.387778780781445700000000000000000E-17 " " relative error = 2.187275718771969400000000000000E-14 "%" Correct digits = 16 h = 1.000E-3 " " "NO POLE" " " "TOP MAIN SOLVE Loop" x[1] = 0.18300000000000008 " " y[1] (analytic) = 6.35610531600E-2 " " y[1] (numeric) = 6.35610531600000400E-2 " " absolute error = 2.775557561562891400000000000000000E-17 " " relative error = 4.36675829548651100000000000000E-14 "%" Correct digits = 16 h = 1.000E-3 " " "NO POLE" " " "TOP MAIN SOLVE Loop" x[1] = 0.18400000000000008 " " y[1] (analytic) = 6.36744200533333400E-2 " " y[1] (numeric) = 6.36744200533333600E-2 " " absolute error = 2.775557561562891400000000000000000E-17 " " relative error = 4.35898365346413850000000000000E-14 "%" Correct digits = 16 h = 1.000E-3 " " "NO POLE" " " "TOP MAIN SOLVE Loop" x[1] = 0.18500000000000008 " " y[1] (analytic) = 6.37879216666666800E-2 " " y[1] (numeric) = 6.37879216666666900E-2 " " absolute error = 1.387778780781445700000000000000000E-17 " " relative error = 2.17561372830657700000000000000E-14 "%" Correct digits = 16 h = 1.000E-3 " " "NO POLE" " " "TOP MAIN SOLVE Loop" x[1] = 0.18600000000000008 " " y[1] (analytic) = 6.39015580800E-2 " " y[1] (numeric) = 6.39015580800000300E-2 " " absolute error = 2.775557561562891400000000000000000E-17 " " relative error = 4.34348965026502100000000000000E-14 "%" Correct digits = 16 h = 1.000E-3 " " "NO POLE" " " "TOP MAIN SOLVE Loop" x[1] = 0.18700000000000008 " " y[1] (analytic) = 6.40153293733333600E-2 " " y[1] (numeric) = 6.40153293733333600E-2 " " absolute error = 0.0 " " relative error = 0.0 "%" Correct digits = 16 h = 1.000E-3 " " "NO POLE" " " "TOP MAIN SOLVE Loop" x[1] = 0.18800000000000008 " " y[1] (analytic) = 6.41292356266666800E-2 " " y[1] (numeric) = 6.4129235626666700E-2 " " absolute error = 1.387778780781445700000000000000000E-17 " " relative error = 2.16403449568697100000000000000E-14 "%" Correct digits = 16 h = 1.000E-3 " " "NO POLE" " " "TOP MAIN SOLVE Loop" x[1] = 0.18900000000000008 " " y[1] (analytic) = 6.42432769200E-2 " " y[1] (numeric) = 6.42432769200000400E-2 " " absolute error = 4.16333634234433700000000000000000E-17 " " relative error = 6.48057904569345200000000000000E-14 "%" Correct digits = 16 h = 1.000E-3 " " "NO POLE" " " "TOP MAIN SOLVE Loop" x[1] = 0.19000000000000009 " " y[1] (analytic) = 6.43574533333333400E-2 " " y[1] (numeric) = 6.43574533333333700E-2 " " absolute error = 2.775557561562891400000000000000000E-17 " " relative error = 4.31272124331451300000000000000E-14 "%" Correct digits = 16 h = 1.000E-3 " " "NO POLE" " " "TOP MAIN SOLVE Loop" x[1] = 0.1910000000000001 " " y[1] (analytic) = 6.44717649466666800E-2 " " y[1] (numeric) = 6.4471764946666710E-2 " " absolute error = 2.775557561562891400000000000000000E-17 " " relative error = 4.30507457622562500000000000000E-14 "%" Correct digits = 16 h = 1.000E-3 " " "NO POLE" " " "TOP MAIN SOLVE Loop" x[1] = 0.1920000000000001 " " y[1] (analytic) = 6.45862118400000300E-2 " " y[1] (numeric) = 6.45862118400000300E-2 " " absolute error = 0.0 " " relative error = 0.0 "%" Correct digits = 16 h = 1.000E-3 " " "NO POLE" " " "TOP MAIN SOLVE Loop" x[1] = 0.1930000000000001 " " y[1] (analytic) = 6.47007940933333400E-2 " " y[1] (numeric) = 6.47007940933333600E-2 " " absolute error = 2.775557561562891400000000000000000E-17 " " relative error = 4.28983538835558200000000000000E-14 "%" Correct digits = 16 h = 1.000E-3 " " "NO POLE" " " "TOP MAIN SOLVE Loop" x[1] = 0.1940000000000001 " " y[1] (analytic) = 6.48155117866666600E-2 " " y[1] (numeric) = 6.4815511786666690E-2 " " absolute error = 4.16333634234433700000000000000000E-17 " " relative error = 6.42336414166953500000000000000E-14 "%" Correct digits = 16 h = 1.000E-3 " " "NO POLE" " " "TOP MAIN SOLVE Loop" x[1] = 0.1950000000000001 " " y[1] (analytic) = 6.49303650000000200E-2 " " y[1] (numeric) = 6.49303650000000300E-2 " " absolute error = 1.387778780781445700000000000000000E-17 " " relative error = 2.137334020502495700000000000000E-14 "%" Correct digits = 16 h = 1.000E-3 " " "NO POLE" " " "TOP MAIN SOLVE Loop" x[1] = 0.1960000000000001 " " y[1] (analytic) = 6.50453538133333300E-2 " " y[1] (numeric) = 6.50453538133333600E-2 " " absolute error = 2.775557561562891400000000000000000E-17 " " relative error = 4.26711117527035900000000000000E-14 "%" Correct digits = 16 h = 1.000E-3 " " "NO POLE" " " "TOP MAIN SOLVE Loop" x[1] = 0.1970000000000001 " " y[1] (analytic) = 6.5160478306666700E-2 " " y[1] (numeric) = 6.51604783066666900E-2 " " absolute error = 1.387778780781445700000000000000000E-17 " " relative error = 2.129786055667211300000000000000E-14 "%" Correct digits = 16 h = 1.000E-3 " " "NO POLE" " " "TOP MAIN SOLVE Loop" x[1] = 0.1980000000000001 " " y[1] (analytic) = 6.52757385600E-2 " " y[1] (numeric) = 6.52757385600000200E-2 " " absolute error = 1.387778780781445700000000000000000E-17 " " relative error = 2.1260253984040800000000000000E-14 "%" Correct digits = 16 h = 1.000E-3 " " "NO POLE" " " "TOP MAIN SOLVE Loop" x[1] = 0.1990000000000001 " " y[1] (analytic) = 6.53911346533333300E-2 " " y[1] (numeric) = 6.53911346533333500E-2 " " absolute error = 2.775557561562891400000000000000000E-17 " " relative error = 4.244547179487437000000000000000E-14 "%" Correct digits = 16 h = 1.000E-3 " " "NO POLE" " " "TOP MAIN SOLVE Loop" x[1] = 0.2000000000000001 " " y[1] (analytic) = 6.55066666666666900E-2 " " y[1] (numeric) = 6.55066666666666900E-2 " " absolute error = 0.0 " " relative error = 0.0 "%" Correct digits = 16 h = 1.000E-3 " " "NO POLE" " " "TOP MAIN SOLVE Loop" x[1] = 0.2010000000000001 " " y[1] (analytic) = 6.56223346800E-2 " " y[1] (numeric) = 6.56223346800000200E-2 " " absolute error = 1.387778780781445700000000000000000E-17 " " relative error = 2.114796414283024500000000000000E-14 "%" Correct digits = 16 h = 1.000E-3 " " "NO POLE" " " "TOP MAIN SOLVE Loop" x[1] = 0.2020000000000001 " " y[1] (analytic) = 6.57381387733333500E-2 " " y[1] (numeric) = 6.57381387733333500E-2 " " absolute error = 0.0 " " relative error = 0.0 "%" Correct digits = 16 h = 1.000E-3 " " "NO POLE" " " "TOP MAIN SOLVE Loop" x[1] = 0.2030000000000001 " " y[1] (analytic) = 6.58540790266666800E-2 " " y[1] (numeric) = 6.58540790266666900E-2 " " absolute error = 1.387778780781445700000000000000000E-17 " " relative error = 2.107354322303230700000000000000E-14 "%" Correct digits = 16 h = 1.000E-3 " " "NO POLE" " " "TOP MAIN SOLVE Loop" x[1] = 0.2040000000000001 " " y[1] (analytic) = 6.59701555199999800E-2 " " y[1] (numeric) = 6.59701555200000300E-2 " " absolute error = 4.16333634234433700000000000000000E-17 " " relative error = 6.31093910500506400000000000000E-14 "%" Correct digits = 16 h = 1.000E-3 " " "NO POLE" " " "TOP MAIN SOLVE Loop" x[1] = 0.2050000000000001 " " y[1] (analytic) = 6.60863683333333600E-2 " " y[1] (numeric) = 6.60863683333333700E-2 " " absolute error = 1.387778780781445700000000000000000E-17 " " relative error = 2.099947108277491500000000000000E-14 "%" Correct digits = 16 h = 1.000E-3 " " "NO POLE" " " "TOP MAIN SOLVE Loop" x[1] = 0.2060000000000001 " " y[1] (analytic) = 6.62027175466666700E-2 " " y[1] (numeric) = 6.6202717546666710E-2 " " absolute error = 4.16333634234433700000000000000000E-17 " " relative error = 6.28876954999555400000000000000E-14 "%" Correct digits = 16 h = 1.000E-3 " " "NO POLE" " " "TOP MAIN SOLVE Loop" x[1] = 0.2070000000000001 " " y[1] (analytic) = 6.63192032400000200E-2 " " y[1] (numeric) = 6.63192032400000500E-2 " " absolute error = 1.387778780781445700000000000000000E-17 " " relative error = 2.09257456812209590000000000000E-14 "%" Correct digits = 16 h = 1.000E-3 " " "NO POLE" " " "TOP MAIN SOLVE Loop" x[1] = 0.2080000000000001 " " y[1] (analytic) = 6.64358254933333600E-2 " " y[1] (numeric) = 6.64358254933333800E-2 " " absolute error = 2.775557561562891400000000000000000E-17 " " relative error = 4.177802474722634400000000000000E-14 "%" Correct digits = 16 h = 1.000E-3 " " "NO POLE" " " "TOP MAIN SOLVE Loop" x[1] = 0.2090000000000001 " " y[1] (analytic) = 6.65525843866666700E-2 " " y[1] (numeric) = 6.65525843866667100E-2 " " absolute error = 4.16333634234433700000000000000000E-17 " " relative error = 6.25570949755398500000000000000E-14 "%" Correct digits = 16 h = 1.000E-3 " " "NO POLE" " " "TOP MAIN SOLVE Loop" x[1] = 0.2100000000000001 " " y[1] (analytic) = 6.66694800000000100E-2 " " y[1] (numeric) = 6.66694800000000500E-2 " " absolute error = 2.775557561562891400000000000000000E-17 " " relative error = 4.16316065696461200000000000000E-14 "%" Correct digits = 16 h = 1.000E-3 " " "NO POLE" " " "TOP MAIN SOLVE Loop" x[1] = 0.2110000000000001 " " y[1] (analytic) = 6.67865124133333400E-2 " " y[1] (numeric) = 6.67865124133333800E-2 " " absolute error = 2.775557561562891400000000000000000E-17 " " relative error = 4.15586540046486260000000000000E-14 "%" Correct digits = 16 h = 1.000E-3 " " "NO POLE" " " "TOP MAIN SOLVE Loop" x[1] = 0.2120000000000001 " " y[1] (analytic) = 6.69036817066667000E-2 " " y[1] (numeric) = 6.6903681706666710E-2 " " absolute error = 1.387778780781445700000000000000000E-17 " " relative error = 2.074293589500858200000000000000E-14 "%" Correct digits = 16 h = 1.000E-3 " " "NO POLE" " " "TOP MAIN SOLVE Loop" x[1] = 0.2130000000000001 " " y[1] (analytic) = 6.70209879600000100E-2 " " y[1] (numeric) = 6.70209879600000400E-2 " " absolute error = 2.775557561562891400000000000000000E-17 " " relative error = 4.14132594288138700000000000000E-14 "%" Correct digits = 16 h = 1.000E-3 " " "NO POLE" " " "TOP MAIN SOLVE Loop" x[1] = 0.2140000000000001 " " y[1] (analytic) = 6.71384312533333200E-2 " " y[1] (numeric) = 6.71384312533333900E-2 " " absolute error = 5.55111512312578300000000000000000E-17 " " relative error = 8.26816328516787900000000000000E-14 "%" Correct digits = 16 h = 1.000E-3 " " "NO POLE" " " "TOP MAIN SOLVE Loop" x[1] = 0.2150000000000001 " " y[1] (analytic) = 6.72560116666666800E-2 " " y[1] (numeric) = 6.72560116666667200E-2 " " absolute error = 2.775557561562891400000000000000000E-17 " " relative error = 4.126854228762584000000000000000E-14 "%" Correct digits = 16 h = 1.000E-3 " " "NO POLE" " " "TOP MAIN SOLVE Loop" x[1] = 0.2160000000000001 " " y[1] (analytic) = 6.73737292800E-2 " " y[1] (numeric) = 6.73737292800000500E-2 " " absolute error = 4.16333634234433700000000000000000E-17 " " relative error = 6.17946547836447300000000000000E-14 "%" Correct digits = 16 h = 1.000E-3 " " "NO POLE" " " "TOP MAIN SOLVE Loop" x[1] = 0.2170000000000001 " " y[1] (analytic) = 6.74915841733333500E-2 " " y[1] (numeric) = 6.74915841733333900E-2 " " absolute error = 2.775557561562891400000000000000000E-17 " " relative error = 4.11244986402251900000000000000E-14 "%" Correct digits = 16 h = 1.000E-3 " " "NO POLE" " " "TOP MAIN SOLVE Loop" x[1] = 0.2180000000000001 " " y[1] (analytic) = 6.76095764266666700E-2 " " y[1] (numeric) = 6.76095764266667200E-2 " " absolute error = 4.16333634234433700000000000000000E-17 " " relative error = 6.15790922290444500000000000000E-14 "%" Correct digits = 16 h = 1.000E-3 " " "NO POLE" " " "TOP MAIN SOLVE Loop" x[1] = 0.2190000000000001 " " y[1] (analytic) = 6.77277061200000100E-2 " " y[1] (numeric) = 6.77277061200000500E-2 " " absolute error = 4.16333634234433700000000000000000E-17 " " relative error = 6.14716868598463100000000000000E-14 "%" Correct digits = 16 h = 1.000E-3 " " "NO POLE" " " "TOP MAIN SOLVE Loop" x[1] = 0.2200000000000001 " " y[1] (analytic) = 6.78459733333333500E-2 " " y[1] (numeric) = 6.78459733333333800E-2 " " absolute error = 2.775557561562891400000000000000000E-17 " " relative error = 4.09096874169131300000000000000E-14 "%" Correct digits = 16 h = 1.000E-3 " " "NO POLE" " " "TOP MAIN SOLVE Loop" x[1] = 0.2210000000000001 " " y[1] (analytic) = 6.79643781466666800E-2 " " y[1] (numeric) = 6.79643781466667200E-2 " " absolute error = 2.775557561562891400000000000000000E-17 " " relative error = 4.083841620051692500000000000000E-14 "%" Correct digits = 16 h = 1.000E-3 " " "NO POLE" " " "TOP MAIN SOLVE Loop" x[1] = 0.22200000000000011 " " y[1] (analytic) = 6.80829206400000300E-2 " " y[1] (numeric) = 6.80829206400000400E-2 " " absolute error = 1.387778780781445700000000000000000E-17 " " relative error = 2.038365522124940500000000000000E-14 "%" Correct digits = 16 h = 1.000E-3 " " "NO POLE" " " "TOP MAIN SOLVE Loop" x[1] = 0.22300000000000011 " " y[1] (analytic) = 6.82016008933333600E-2 " " y[1] (numeric) = 6.82016008933333800E-2 " " absolute error = 2.775557561562891400000000000000000E-17 " " relative error = 4.06963696629912900000000000000E-14 "%" Correct digits = 16 h = 1.000E-3 " " "NO POLE" " " "TOP MAIN SOLVE Loop" x[1] = 0.22400000000000012 " " y[1] (analytic) = 6.83204189866666800E-2 " " y[1] (numeric) = 6.83204189866667200E-2 " " absolute error = 4.16333634234433700000000000000000E-17 " " relative error = 6.0938390075693890000000000000E-14 "%" Correct digits = 16 h = 1.000E-3 " " "NO POLE" " " "TOP MAIN SOLVE Loop" x[1] = 0.22500000000000012 " " y[1] (analytic) = 6.84393750000000200E-2 " " y[1] (numeric) = 6.84393750000000600E-2 " " absolute error = 2.775557561562891400000000000000000E-17 " " relative error = 4.05549811283766160000000000000E-14 "%" Correct digits = 16 h = 1.000E-3 " " "NO POLE" " " "TOP MAIN SOLVE Loop" x[1] = 0.22600000000000012 " " y[1] (analytic) = 6.85584690133333300E-2 " " y[1] (numeric) = 6.85584690133333900E-2 " " absolute error = 5.55111512312578300000000000000000E-17 " " relative error = 8.09690648437058200000000000000E-14 "%" Correct digits = 16 h = 1.000E-3 " " "NO POLE" " " "TOP MAIN SOLVE Loop" x[1] = 0.22700000000000012 " " y[1] (analytic) = 6.8677701106666700E-2 " " y[1] (numeric) = 6.86777011066667200E-2 " " absolute error = 2.775557561562891400000000000000000E-17 " " relative error = 4.04142467909931500000000000000E-14 "%" Correct digits = 16 h = 1.000E-3 " " "NO POLE" " " "TOP MAIN SOLVE Loop" x[1] = 0.22800000000000012 " " y[1] (analytic) = 6.87970713600E-2 " " y[1] (numeric) = 6.87970713600000600E-2 " " absolute error = 5.55111512312578300000000000000000E-17 " " relative error = 8.06882475284160500000000000000E-14 "%" Correct digits = 16 h = 1.000E-3 " " "NO POLE" " " "TOP MAIN SOLVE Loop" x[1] = 0.22900000000000012 " " y[1] (analytic) = 6.89165798533333400E-2 " " y[1] (numeric) = 6.8916579853333390E-2 " " absolute error = 5.55111512312578300000000000000000E-17 " " relative error = 8.05483257430873200000000000000E-14 "%" Correct digits = 16 h = 1.000E-3 " " "NO POLE" " " "TOP MAIN SOLVE Loop" x[1] = 0.23000000000000012 " " y[1] (analytic) = 6.90362266666666900E-2 " " y[1] (numeric) = 6.90362266666667300E-2 " " absolute error = 4.16333634234433700000000000000000E-17 " " relative error = 6.03065454670128200000000000000E-14 "%" Correct digits = 16 h = 1.000E-3 " " "NO POLE" " " "TOP MAIN SOLVE Loop" x[1] = 0.23100000000000012 " " y[1] (analytic) = 6.91560118800E-2 " " y[1] (numeric) = 6.91560118800000700E-2 " " absolute error = 5.55111512312578300000000000000000E-17 " " relative error = 8.02694512338004200000000000000E-14 "%" Correct digits = 16 h = 1.000E-3 " " "NO POLE" " " "TOP MAIN SOLVE Loop" x[1] = 0.23200000000000012 " " y[1] (analytic) = 6.92759355733333500E-2 " " y[1] (numeric) = 6.92759355733333900E-2 " " absolute error = 4.16333634234433700000000000000000E-17 " " relative error = 6.00978724846979300000000000000E-14 "%" Correct digits = 16 h = 1.000E-3 " " "NO POLE" " " "TOP MAIN SOLVE Loop" x[1] = 0.23300000000000012 " " y[1] (analytic) = 6.93959978266666800E-2 " " y[1] (numeric) = 6.93959978266667200E-2 " " absolute error = 4.16333634234433700000000000000000E-17 " " relative error = 5.99938969498396400000000000000E-14 "%" Correct digits = 16 h = 1.000E-3 " " "NO POLE" " " "TOP MAIN SOLVE Loop" x[1] = 0.23400000000000012 " " y[1] (analytic) = 6.95161987200E-2 " " y[1] (numeric) = 6.95161987200000600E-2 " " absolute error = 5.55111512312578300000000000000000E-17 " " relative error = 7.98535481706181300000000000000E-14 "%" Correct digits = 16 h = 1.000E-3 " " "NO POLE" " " "TOP MAIN SOLVE Loop" x[1] = 0.23500000000000013 " " y[1] (analytic) = 6.96365383333333600E-2 " " y[1] (numeric) = 6.9636538333333400E-2 " " absolute error = 4.16333634234433700000000000000000E-17 " " relative error = 5.9786664328652410000000000000E-14 "%" Correct digits = 16 h = 1.000E-3 " " "NO POLE" " " "TOP MAIN SOLVE Loop" x[1] = 0.23600000000000013 " " y[1] (analytic) = 6.97570167466666800E-2 " " y[1] (numeric) = 6.97570167466667300E-2 " " absolute error = 5.55111512312578300000000000000000E-17 " " relative error = 7.95778744851648300000000000000E-14 "%" Correct digits = 16 h = 1.000E-3 " " "NO POLE" " " "TOP MAIN SOLVE Loop" x[1] = 0.23700000000000013 " " y[1] (analytic) = 6.98776340400000300E-2 " " y[1] (numeric) = 6.98776340400000700E-2 " " absolute error = 4.16333634234433700000000000000000E-17 " " relative error = 5.95803850479700000000000000E-14 "%" Correct digits = 16 h = 1.000E-3 " " "NO POLE" " " "TOP MAIN SOLVE Loop" x[1] = 0.23800000000000013 " " y[1] (analytic) = 6.99983902933333500E-2 " " y[1] (numeric) = 6.9998390293333410E-2 " " absolute error = 5.55111512312578300000000000000000E-17 " " relative error = 7.93034682635333600000000000000E-14 "%" Correct digits = 16 h = 1.000E-3 " " "NO POLE" " " "TOP MAIN SOLVE Loop" x[1] = 0.23900000000000013 " " y[1] (analytic) = 7.01192855866666800E-2 " " y[1] (numeric) = 7.01192855866667500E-2 " " absolute error = 6.93889390390722800000000000000000E-17 " " relative error = 9.89584227199638300000000000000E-14 "%" Correct digits = 16 h = 1.000E-3 " " "NO POLE" " " "TOP MAIN SOLVE Loop" x[1] = 0.24000000000000013 " " y[1] (analytic) = 7.02403200000000200E-2 " " y[1] (numeric) = 7.02403200000000800E-2 " " absolute error = 5.55111512312578300000000000000000E-17 " " relative error = 7.90303222298215700000000000000E-14 "%" Correct digits = 16 h = 1.000E-3 " " "NO POLE" " " "TOP MAIN SOLVE Loop" x[1] = 0.24100000000000013 " " y[1] (analytic) = 7.03614936133333400E-2 " " y[1] (numeric) = 7.03614936133334100E-2 " " absolute error = 6.93889390390722800000000000000000E-17 " " relative error = 9.86177744042705200000000000000E-14 "%" Correct digits = 16 h = 1.000E-3 " " "NO POLE" " " "TOP MAIN SOLVE Loop" x[1] = 0.24200000000000013 " " y[1] (analytic) = 7.04828065066667000E-2 " " y[1] (numeric) = 7.04828065066667400E-2 " " absolute error = 5.55111512312578300000000000000000E-17 " " relative error = 7.87584291581908700000000000000E-14 "%" Correct digits = 16 h = 1.000E-3 " " "NO POLE" " " "TOP MAIN SOLVE Loop" x[1] = 0.24300000000000013 " " y[1] (analytic) = 7.06042587600000300E-2 " " y[1] (numeric) = 7.06042587600000800E-2 " " absolute error = 5.55111512312578300000000000000000E-17 " " relative error = 7.8622950238671710000000000000E-14 "%" Correct digits = 16 h = 1.000E-3 " " "NO POLE" " " "TOP MAIN SOLVE Loop" x[1] = 0.24400000000000013 " " y[1] (analytic) = 7.07258504533333400E-2 " " y[1] (numeric) = 7.07258504533334200E-2 " " absolute error = 8.32667268468867400000000000000000E-17 " " relative error = 1.17731672808696980000000000000E-13 "%" Correct digits = 15 h = 1.000E-3 " " "NO POLE" " " "TOP MAIN SOLVE Loop" x[1] = 0.24500000000000013 " " y[1] (analytic) = 7.08475816666666900E-2 " " y[1] (numeric) = 7.08475816666667600E-2 " " absolute error = 6.93889390390722800000000000000000E-17 " " relative error = 9.79411539628025400000000000000E-14 "%" Correct digits = 16 h = 1.000E-3 " " "NO POLE" " " "TOP MAIN SOLVE Loop" x[1] = 0.24600000000000014 " " y[1] (analytic) = 7.09694524800000200E-2 " " y[1] (numeric) = 7.09694524800000800E-2 " " absolute error = 6.93889390390722800000000000000000E-17 " " relative error = 9.77729665571632700000000000000E-14 "%" Correct digits = 16 h = 1.000E-3 " " "NO POLE" " " "TOP MAIN SOLVE Loop" x[1] = 0.24700000000000014 " " y[1] (analytic) = 7.10914629733333500E-2 " " y[1] (numeric) = 7.10914629733334200E-2 " " absolute error = 6.93889390390722800000000000000000E-17 " " relative error = 9.760516401962399000000000000E-14 "%" Correct digits = 16 h = 1.000E-3 " " "NO POLE" " " "TOP MAIN SOLVE Loop" x[1] = 0.24800000000000014 " " y[1] (analytic) = 7.1213613226666690E-2 " " y[1] (numeric) = 7.12136132266667500E-2 " " absolute error = 5.55111512312578300000000000000000E-17 " " relative error = 7.79501961999466200000000000000E-14 "%" Correct digits = 16 h = 1.000E-3 " " "NO POLE" " " "TOP MAIN SOLVE Loop" x[1] = 0.24900000000000014 " " y[1] (analytic) = 7.13359033200E-2 " " y[1] (numeric) = 7.13359033200000800E-2 " " absolute error = 8.32667268468867400000000000000000E-17 " " relative error = 1.16724850981934330000000000000E-13 "%" Correct digits = 15 h = 1.000E-3 " " "NO POLE" " " "TOP MAIN SOLVE Loop" x[1] = 0.2500000000000001 " " y[1] (analytic) = 7.14583333333333600E-2 " " y[1] (numeric) = 7.14583333333334100E-2 " " absolute error = 5.55111512312578300000000000000000E-17 " " relative error = 7.76832437055502900000000000000E-14 "%" Correct digits = 16 h = 1.000E-3 " " "NO POLE" " " "TOP MAIN SOLVE Loop" x[1] = 0.2510000000000001 " " y[1] (analytic) = 7.15809033466666700E-2 " " y[1] (numeric) = 7.15809033466667600E-2 " " absolute error = 8.32667268468867400000000000000000E-17 " " relative error = 1.16325336722317650000000000000E-13 "%" Correct digits = 15 h = 1.000E-3 " " "NO POLE" " " "TOP MAIN SOLVE Loop" x[1] = 0.2520000000000001 " " y[1] (analytic) = 7.17036134400000200E-2 " " y[1] (numeric) = 7.17036134400000900E-2 " " absolute error = 6.93889390390722800000000000000000E-17 " " relative error = 9.6771885976339800000000000000E-14 "%" Correct digits = 16 h = 1.000E-3 " " "NO POLE" " " "TOP MAIN SOLVE Loop" x[1] = 0.2530000000000001 " " y[1] (analytic) = 7.18264636933333400E-2 " " y[1] (numeric) = 7.18264636933334300E-2 " " absolute error = 8.32667268468867400000000000000000E-17 " " relative error = 1.15927643608347720000000000000E-13 "%" Correct digits = 15 h = 1.000E-3 " " "NO POLE" " " "TOP MAIN SOLVE Loop" x[1] = 0.2540000000000001 " " y[1] (analytic) = 7.19494541866666600E-2 " " y[1] (numeric) = 7.19494541866667600E-2 " " absolute error = 9.7144514654701200000000000000000E-17 " " relative error = 1.35017722862314030000000000000E-13 "%" Correct digits = 15 h = 1.000E-3 " " "NO POLE" " " "TOP MAIN SOLVE Loop" x[1] = 0.2550000000000001 " " y[1] (analytic) = 7.20725850000000200E-2 " " y[1] (numeric) = 7.20725850000000900E-2 " " absolute error = 6.93889390390722800000000000000000E-17 " " relative error = 9.6276467729126490000000000000E-14 "%" Correct digits = 16 h = 1.000E-3 " " "NO POLE" " " "TOP MAIN SOLVE Loop" x[1] = 0.2560000000000001 " " y[1] (analytic) = 7.21958562133333400E-2 " " y[1] (numeric) = 7.21958562133334200E-2 " " absolute error = 8.32667268468867400000000000000000E-17 " " relative error = 1.15334495931234350000000000000E-13 "%" Correct digits = 15 h = 1.000E-3 " " "NO POLE" " " "TOP MAIN SOLVE Loop" x[1] = 0.2570000000000001 " " y[1] (analytic) = 7.23192679066667000E-2 " " y[1] (numeric) = 7.23192679066667600E-2 " " absolute error = 6.93889390390722800000000000000000E-17 " " relative error = 9.59480661898068400000000000000E-14 "%" Correct digits = 16 h = 1.000E-3 " " "NO POLE" " " "TOP MAIN SOLVE Loop" x[1] = 0.2580000000000001 " " y[1] (analytic) = 7.24428201600000200E-2 " " y[1] (numeric) = 7.2442820160000100E-2 " " absolute error = 8.32667268468867400000000000000000E-17 " " relative error = 1.14941310488714570000000000000E-13 "%" Correct digits = 15 h = 1.000E-3 " " "NO POLE" " " "TOP MAIN SOLVE Loop" x[1] = 0.2590000000000001 " " y[1] (analytic) = 7.25665130533333400E-2 " " y[1] (numeric) = 7.25665130533334400E-2 " " absolute error = 9.7144514654701200000000000000000E-17 " " relative error = 1.33869619149681430000000000000E-13 "%" Correct digits = 15 h = 1.000E-3 " " "NO POLE" " " "TOP MAIN SOLVE Loop" x[1] = 0.2600000000000001 " " y[1] (analytic) = 7.2690346666666690E-2 " " y[1] (numeric) = 7.26903466666667600E-2 " " absolute error = 6.93889390390722800000000000000000E-17 " " relative error = 9.54582585185161600000000000000E-14 "%" Correct digits = 16 h = 1.000E-3 " " "NO POLE" " " "TOP MAIN SOLVE Loop" x[1] = 0.2610000000000001 " " y[1] (analytic) = 7.28143210800000100E-2 " " y[1] (numeric) = 7.2814321080000100E-2 " " absolute error = 9.7144514654701200000000000000000E-17 " " relative error = 1.33414022425574740000000000000E-13 "%" Correct digits = 15 h = 1.000E-3 " " "NO POLE" " " "TOP MAIN SOLVE Loop" x[1] = 0.2620000000000001 " " y[1] (analytic) = 7.29384363733333700E-2 " " y[1] (numeric) = 7.29384363733334400E-2 " " absolute error = 6.93889390390722800000000000000000E-17 " " relative error = 9.51335708430969300000000000000E-14 "%" Correct digits = 16 h = 1.000E-3 " " "NO POLE" " " "TOP MAIN SOLVE Loop" x[1] = 0.2630000000000001 " " y[1] (analytic) = 7.30626926266666900E-2 " " y[1] (numeric) = 7.30626926266667700E-2 " " absolute error = 8.32667268468867400000000000000000E-17 " " relative error = 1.13966134908769780000000000000E-13 "%" Correct digits = 15 h = 1.000E-3 " " "NO POLE" " " "TOP MAIN SOLVE Loop" x[1] = 0.2640000000000001 " " y[1] (analytic) = 7.31870899200E-2 " " y[1] (numeric) = 7.3187089920000100E-2 " " absolute error = 9.7144514654701200000000000000000E-17 " " relative error = 1.32734495606928460000000000000E-13 "%" Correct digits = 15 h = 1.000E-3 " " "NO POLE" " " "TOP MAIN SOLVE Loop" x[1] = 0.2650000000000001 " " y[1] (analytic) = 7.33116283333333600E-2 " " y[1] (numeric) = 7.33116283333334300E-2 " " absolute error = 8.32667268468867400000000000000000E-17 " " relative error = 1.13579153457470000000000000E-13 "%" Correct digits = 15 h = 1.000E-3 " " "NO POLE" " " "TOP MAIN SOLVE Loop" x[1] = 0.2660000000000001 " " y[1] (analytic) = 7.34363079466666800E-2 " " y[1] (numeric) = 7.34363079466667700E-2 " " absolute error = 8.32667268468867400000000000000000E-17 " " relative error = 1.13386319621840770000000000000E-13 "%" Correct digits = 15 h = 1.000E-3 " " "NO POLE" " " "TOP MAIN SOLVE Loop" x[1] = 0.2670000000000001 " " y[1] (analytic) = 7.35611288400000300E-2 " " y[1] (numeric) = 7.3561128840000100E-2 " " absolute error = 6.93889390390722800000000000000000E-17 " " relative error = 9.43282683847844200000000000000E-14 "%" Correct digits = 16 h = 1.000E-3 " " "NO POLE" " " "TOP MAIN SOLVE Loop" x[1] = 0.2680000000000001 " " y[1] (analytic) = 7.36860910933333600E-2 " " y[1] (numeric) = 7.36860910933334400E-2 " " absolute error = 6.93889390390722800000000000000000E-17 " " relative error = 9.41682996200488300000000000000E-14 "%" Correct digits = 16 h = 1.000E-3 " " "NO POLE" " " "TOP MAIN SOLVE Loop" x[1] = 0.26900000000000013 " " y[1] (analytic) = 7.38111947866666600E-2 " " y[1] (numeric) = 7.38111947866667700E-2 " " absolute error = 1.11022302462515650000000000000000E-16 " " relative error = 1.50413907786479620000000000000E-13 "%" Correct digits = 15 h = 1.000E-3 " " "NO POLE" " " "TOP MAIN SOLVE Loop" x[1] = 0.27000000000000013 " " y[1] (analytic) = 7.39364400000000400E-2 " " y[1] (numeric) = 7.3936440000000100E-2 " " absolute error = 6.93889390390722800000000000000000E-17 " " relative error = 9.38494456036458400000000000000E-14 "%" Correct digits = 16 h = 1.000E-3 " " "NO POLE" " " "TOP MAIN SOLVE Loop" x[1] = 0.27100000000000013 " " y[1] (analytic) = 7.40618268133333400E-2 " " y[1] (numeric) = 7.40618268133334400E-2 " " absolute error = 9.7144514654701200000000000000000E-17 " " relative error = 1.3116678163981269000000000000E-13 "%" Correct digits = 15 h = 1.000E-3 " " "NO POLE" " " "TOP MAIN SOLVE Loop" x[1] = 0.27200000000000013 " " y[1] (analytic) = 7.41873553066666900E-2 " " y[1] (numeric) = 7.41873553066667700E-2 " " absolute error = 8.32667268468867400000000000000000E-17 " " relative error = 1.12238435381189760000000000000E-13 "%" Correct digits = 15 h = 1.000E-3 " " "NO POLE" " " "TOP MAIN SOLVE Loop" x[1] = 0.27300000000000013 " " y[1] (analytic) = 7.43130255600000200E-2 " " y[1] (numeric) = 7.4313025560000100E-2 " " absolute error = 8.32667268468867400000000000000000E-17 " " relative error = 1.12048629724620120000000000000E-13 "%" Correct digits = 15 h = 1.000E-3 " " "NO POLE" " " "TOP MAIN SOLVE Loop" x[1] = 0.27400000000000013 " " y[1] (analytic) = 7.44388376533333500E-2 " " y[1] (numeric) = 7.44388376533334300E-2 " " absolute error = 9.7144514654701200000000000000000E-17 " " relative error = 1.30502460432160040000000000000E-13 "%" Correct digits = 15 h = 1.000E-3 " " "NO POLE" " " "TOP MAIN SOLVE Loop" x[1] = 0.27500000000000013 " " y[1] (analytic) = 7.45647916666666900E-2 " " y[1] (numeric) = 7.45647916666667600E-2 " " absolute error = 8.32667268468867400000000000000000E-17 " " relative error = 1.11670300400115190000000000000E-13 "%" Correct digits = 15 h = 1.000E-3 " " "NO POLE" " " "TOP MAIN SOLVE Loop" x[1] = 0.27600000000000013 " " y[1] (analytic) = 7.46908876800000100E-2 " " y[1] (numeric) = 7.4690887680000100E-2 " " absolute error = 8.32667268468867400000000000000000E-17 " " relative error = 1.11481774327851610000000000000E-13 "%" Correct digits = 15 h = 1.000E-3 " " "NO POLE" " " "TOP MAIN SOLVE Loop" x[1] = 0.27700000000000014 " " y[1] (analytic) = 7.48171257733333700E-2 " " y[1] (numeric) = 7.48171257733334300E-2 " " absolute error = 5.55111512312578300000000000000000E-17 " " relative error = 7.41957815907482300000000000000E-14 "%" Correct digits = 16 h = 1.000E-3 " " "NO POLE" " " "TOP MAIN SOLVE Loop" x[1] = 0.27800000000000014 " " y[1] (analytic) = 7.49435060266666800E-2 " " y[1] (numeric) = 7.49435060266667600E-2 " " absolute error = 6.93889390390722800000000000000000E-17 " " relative error = 9.25883278190668600000000000000E-14 "%" Correct digits = 16 h = 1.000E-3 " " "NO POLE" " " "TOP MAIN SOLVE Loop" x[1] = 0.27900000000000014 " " y[1] (analytic) = 7.50700285200000100E-2 " " y[1] (numeric) = 7.5070028520000100E-2 " " absolute error = 8.32667268468867400000000000000000E-17 " " relative error = 1.10918736130096160000000000000E-13 "%" Correct digits = 15 h = 1.000E-3 " " "NO POLE" " " "TOP MAIN SOLVE Loop" x[1] = 0.28000000000000014 " " y[1] (analytic) = 7.51966933333333500E-2 " " y[1] (numeric) = 7.51966933333334300E-2 " " absolute error = 6.93889390390722800000000000000000E-17 " " relative error = 9.22765828697861200000000000000E-14 "%" Correct digits = 16 h = 1.000E-3 " " "NO POLE" " " "TOP MAIN SOLVE Loop" x[1] = 0.28100000000000014 " " y[1] (analytic) = 7.53235005466666800E-2 " " y[1] (numeric) = 7.53235005466667600E-2 " " absolute error = 8.32667268468867400000000000000000E-17 " " relative error = 1.10545482143781720000000000000E-13 "%" Correct digits = 15 h = 1.000E-3 " " "NO POLE" " " "TOP MAIN SOLVE Loop" x[1] = 0.28200000000000014 " " y[1] (analytic) = 7.54504502400000300E-2 " " y[1] (numeric) = 7.54504502400000900E-2 " " absolute error = 5.55111512312578300000000000000000E-17 " " relative error = 7.35729887027613900000000000000E-14 "%" Correct digits = 16 h = 1.000E-3 " " "NO POLE" " " "TOP MAIN SOLVE Loop" x[1] = 0.28300000000000014 " " y[1] (analytic) = 7.55775424933333500E-2 " " y[1] (numeric) = 7.55775424933334300E-2 " " absolute error = 8.32667268468867400000000000000000E-17 " " relative error = 1.10173901002710770000000000000E-13 "%" Correct digits = 15 h = 1.000E-3 " " "NO POLE" " " "TOP MAIN SOLVE Loop" x[1] = 0.28400000000000014 " " y[1] (analytic) = 7.57047773866666800E-2 " " y[1] (numeric) = 7.57047773866667600E-2 " " absolute error = 8.32667268468867400000000000000000E-17 " " relative error = 1.0998873482131380000000000000E-13 "%" Correct digits = 15 h = 1.000E-3 " " "NO POLE" " " "TOP MAIN SOLVE Loop" x[1] = 0.28500000000000014 " " y[1] (analytic) = 7.58321550000000200E-2 " " y[1] (numeric) = 7.58321550000000800E-2 " " absolute error = 5.55111512312578300000000000000000E-17 " " relative error = 7.32026555638011400000000000000E-14 "%" Correct digits = 16 h = 1.000E-3 " " "NO POLE" " " "TOP MAIN SOLVE Loop" x[1] = 0.28600000000000014 " " y[1] (analytic) = 7.59596754133333500E-2 " " y[1] (numeric) = 7.59596754133334200E-2 " " absolute error = 6.93889390390722800000000000000000E-17 " " relative error = 9.13497045129451700000000000000E-14 "%" Correct digits = 16 h = 1.000E-3 " " "NO POLE" " " "TOP MAIN SOLVE Loop" x[1] = 0.28700000000000014 " " y[1] (analytic) = 7.60873387066666900E-2 " " y[1] (numeric) = 7.60873387066667400E-2 " " absolute error = 5.55111512312578300000000000000000E-17 " " relative error = 7.29571465829097300000000000000E-14 "%" Correct digits = 16 h = 1.000E-3 " " "NO POLE" " " "TOP MAIN SOLVE Loop" x[1] = 0.28800000000000014 " " y[1] (analytic) = 7.62151449600000100E-2 " " y[1] (numeric) = 7.62151449600000800E-2 " " absolute error = 6.93889390390722800000000000000000E-17 " " relative error = 9.104350464135400000000000000E-14 "%" Correct digits = 16 h = 1.000E-3 " " "NO POLE" " " "TOP MAIN SOLVE Loop" x[1] = 0.28900000000000015 " " y[1] (analytic) = 7.63430942533333400E-2 " " y[1] (numeric) = 7.63430942533334100E-2 " " absolute error = 6.93889390390722800000000000000000E-17 " " relative error = 9.08909177938416900000000000000E-14 "%" Correct digits = 16 h = 1.000E-3 " " "NO POLE" " " "TOP MAIN SOLVE Loop" x[1] = 0.29000000000000015 " " y[1] (analytic) = 7.64711866666666900E-2 " " y[1] (numeric) = 7.64711866666667500E-2 " " absolute error = 5.55111512312578300000000000000000E-17 " " relative error = 7.25909373856425200000000000000E-14 "%" Correct digits = 16 h = 1.000E-3 " " "NO POLE" " " "TOP MAIN SOLVE Loop" x[1] = 0.29100000000000015 " " y[1] (analytic) = 7.65994222800000300E-2 " " y[1] (numeric) = 7.65994222800000700E-2 " " absolute error = 5.55111512312578300000000000000000E-17 " " relative error = 7.24694124041085500000000000000E-14 "%" Correct digits = 16 h = 1.000E-3 " " "NO POLE" " " "TOP MAIN SOLVE Loop" x[1] = 0.29200000000000015 " " y[1] (analytic) = 7.67278011733333800E-2 " " y[1] (numeric) = 7.67278011733334200E-2 " " absolute error = 4.16333634234433700000000000000000E-17 " " relative error = 5.42611188992510600000000000000E-14 "%" Correct digits = 16 h = 1.000E-3 " " "NO POLE" " " "TOP MAIN SOLVE Loop" x[1] = 0.29300000000000015 " " y[1] (analytic) = 7.68563234266667000E-2 " " y[1] (numeric) = 7.68563234266667500E-2 " " absolute error = 5.55111512312578300000000000000000E-17 " " relative error = 7.22271750147200400000000000000E-14 "%" Correct digits = 16 h = 1.000E-3 " " "NO POLE" " " "TOP MAIN SOLVE Loop" x[1] = 0.29400000000000015 " " y[1] (analytic) = 7.69849891200E-2 " " y[1] (numeric) = 7.69849891200000800E-2 " " absolute error = 8.32667268468867400000000000000000E-17 " " relative error = 1.08159691647283480000000000000E-13 "%" Correct digits = 15 h = 1.000E-3 " " "NO POLE" " " "TOP MAIN SOLVE Loop" x[1] = 0.29500000000000015 " " y[1] (analytic) = 7.71137983333333600E-2 " " y[1] (numeric) = 7.71137983333334200E-2 " " absolute error = 5.55111512312578300000000000000000E-17 " " relative error = 7.19860160321819700000000000000E-14 "%" Correct digits = 16 h = 1.000E-3 " " "NO POLE" " " "TOP MAIN SOLVE Loop" x[1] = 0.29600000000000015 " " y[1] (analytic) = 7.72427511466666900E-2 " " y[1] (numeric) = 7.72427511466667400E-2 " " absolute error = 5.55111512312578300000000000000000E-17 " " relative error = 7.18658390686455300000000000000E-14 "%" Correct digits = 16 h = 1.000E-3 " " "NO POLE" " " "TOP MAIN SOLVE Loop" x[1] = 0.29700000000000015 " " y[1] (analytic) = 7.73718476400000400E-2 " " y[1] (numeric) = 7.73718476400000700E-2 " " absolute error = 4.16333634234433700000000000000000E-17 " " relative error = 5.380944709651676000000000000000E-14 "%" Correct digits = 16 h = 1.000E-3 " " "NO POLE" " " "TOP MAIN SOLVE Loop" x[1] = 0.29800000000000015 " " y[1] (analytic) = 7.75010878933333400E-2 " " y[1] (numeric) = 7.7501087893333410E-2 " " absolute error = 5.55111512312578300000000000000000E-17 " " relative error = 7.16262864692418100000000000000E-14 "%" Correct digits = 16 h = 1.000E-3 " " "NO POLE" " " "TOP MAIN SOLVE Loop" x[1] = 0.29900000000000015 " " y[1] (analytic) = 7.76304719866666700E-2 " " y[1] (numeric) = 7.76304719866667400E-2 " " absolute error = 6.93889390390722800000000000000000E-17 " " relative error = 8.93836366871376100000000000000E-14 "%" Correct digits = 16 h = 1.000E-3 " " "NO POLE" " " "TOP MAIN SOLVE Loop" x[1] = 0.30000000000000016 " " y[1] (analytic) = 7.77600000000000300E-2 " " y[1] (numeric) = 7.77600000000000700E-2 " " absolute error = 5.55111512312578300000000000000000E-17 " " relative error = 7.13877973653006900000000000000E-14 "%" Correct digits = 16 h = 1.000E-3 " " "NO POLE" " " "TOP MAIN SOLVE Loop" x[1] = 0.30100000000000016 " " y[1] (analytic) = 7.78896720133333400E-2 " " y[1] (numeric) = 7.78896720133334100E-2 " " absolute error = 6.93889390390722800000000000000000E-17 " " relative error = 8.90861872254310100000000000000E-14 "%" Correct digits = 16 h = 1.000E-3 " " "NO POLE" " " "TOP MAIN SOLVE Loop" x[1] = 0.30200000000000016 " " y[1] (analytic) = 7.8019488106666700E-2 " " y[1] (numeric) = 7.80194881066667500E-2 " " absolute error = 4.16333634234433700000000000000000E-17 " " relative error = 5.33627743962163200000000000000E-14 "%" Correct digits = 16 h = 1.000E-3 " " "NO POLE" " " "TOP MAIN SOLVE Loop" x[1] = 0.30300000000000016 " " y[1] (analytic) = 7.81494483600000200E-2 " " y[1] (numeric) = 7.81494483600000800E-2 " " absolute error = 6.93889390390722800000000000000000E-17 " " relative error = 8.87900560979369500000000000000E-14 "%" Correct digits = 16 h = 1.000E-3 " " "NO POLE" " " "TOP MAIN SOLVE Loop" x[1] = 0.30400000000000016 " " y[1] (analytic) = 7.82795528533333500E-2 " " y[1] (numeric) = 7.82795528533334200E-2 " " absolute error = 6.93889390390722800000000000000000E-17 " " relative error = 8.8642482627719200000000000000E-14 "%" Correct digits = 16 h = 1.000E-3 " " "NO POLE" " " "TOP MAIN SOLVE Loop" x[1] = 0.30500000000000016 " " y[1] (analytic) = 7.8409801666666690E-2 " " y[1] (numeric) = 7.84098016666667600E-2 " " absolute error = 5.55111512312578300000000000000000E-17 " " relative error = 7.0796188807166100000000000000E-14 "%" Correct digits = 16 h = 1.000E-3 " " "NO POLE" " " "TOP MAIN SOLVE Loop" x[1] = 0.30600000000000016 " " y[1] (analytic) = 7.85401948800000200E-2 " " y[1] (numeric) = 7.85401948800000800E-2 " " absolute error = 5.55111512312578300000000000000000E-17 " " relative error = 7.06786522697991600000000000000E-14 "%" Correct digits = 16 h = 1.000E-3 " " "NO POLE" " " "TOP MAIN SOLVE Loop" x[1] = 0.30700000000000016 " " y[1] (analytic) = 7.86707325733333700E-2 " " y[1] (numeric) = 7.86707325733334100E-2 " " absolute error = 4.16333634234433700000000000000000E-17 " " relative error = 5.29210318267147200000000000000E-14 "%" Correct digits = 16 h = 1.000E-3 " " "NO POLE" " " "TOP MAIN SOLVE Loop" x[1] = 0.30800000000000016 " " y[1] (analytic) = 7.8801414826666690E-2 " " y[1] (numeric) = 7.88014148266667500E-2 " " absolute error = 5.55111512312578300000000000000000E-17 " " relative error = 7.04443585858976800000000000000E-14 "%" Correct digits = 16 h = 1.000E-3 " " "NO POLE" " " "TOP MAIN SOLVE Loop" x[1] = 0.30900000000000016 " " y[1] (analytic) = 7.89322417200E-2 " " y[1] (numeric) = 7.89322417200000800E-2 " " absolute error = 8.32667268468867400000000000000000E-17 " " relative error = 1.05491400006429130000000000000E-13 "%" Correct digits = 15 h = 1.000E-3 " " "NO POLE" " " "TOP MAIN SOLVE Loop" x[1] = 0.31000000000000016 " " y[1] (analytic) = 7.90632133333333500E-2 " " y[1] (numeric) = 7.90632133333334300E-2 " " absolute error = 6.93889390390722800000000000000000E-17 " " relative error = 8.77638741376802200000000000000E-14 "%" Correct digits = 16 h = 1.000E-3 " " "NO POLE" " " "TOP MAIN SOLVE Loop" x[1] = 0.31100000000000017 " " y[1] (analytic) = 7.9194329746666690E-2 " " y[1] (numeric) = 7.91943297466667500E-2 " " absolute error = 5.55111512312578300000000000000000E-17 " " relative error = 7.00948557918621800000000000000E-14 "%" Correct digits = 16 h = 1.000E-3 " " "NO POLE" " " "TOP MAIN SOLVE Loop" x[1] = 0.31200000000000017 " " y[1] (analytic) = 7.93255910400000400E-2 " " y[1] (numeric) = 7.93255910400000900E-2 " " absolute error = 4.16333634234433700000000000000000E-17 " " relative error = 5.24841515551389800000000000000E-14 "%" Correct digits = 16 h = 1.000E-3 " " "NO POLE" " " "TOP MAIN SOLVE Loop" x[1] = 0.31300000000000017 " " y[1] (analytic) = 7.94569972933333500E-2 " " y[1] (numeric) = 7.94569972933334200E-2 " " absolute error = 5.55111512312578300000000000000000E-17 " " relative error = 6.98631374482047700000000000000E-14 "%" Correct digits = 16 h = 1.000E-3 " " "NO POLE" " " "TOP MAIN SOLVE Loop" x[1] = 0.31400000000000017 " " y[1] (analytic) = 7.95885485866666900E-2 " " y[1] (numeric) = 7.95885485866667500E-2 " " absolute error = 6.93889390390722800000000000000000E-17 " " relative error = 8.71845765141857100000000000000E-14 "%" Correct digits = 16 h = 1.000E-3 " " "NO POLE" " " "TOP MAIN SOLVE Loop" x[1] = 0.31500000000000017 " " y[1] (analytic) = 7.97202450000000200E-2 " " y[1] (numeric) = 7.97202450000000800E-2 " " absolute error = 5.55111512312578300000000000000000E-17 " " relative error = 6.96324393273726300000000000000E-14 "%" Correct digits = 16 h = 1.000E-3 " " "NO POLE" " " "TOP MAIN SOLVE Loop" x[1] = 0.31600000000000017 " " y[1] (analytic) = 7.98520866133333400E-2 " " y[1] (numeric) = 7.98520866133334200E-2 " " absolute error = 6.93889390390722800000000000000000E-17 " " relative error = 8.68968388704397700000000000000E-14 "%" Correct digits = 16 h = 1.000E-3 " " "NO POLE" " " "TOP MAIN SOLVE Loop" x[1] = 0.31700000000000017 " " y[1] (analytic) = 7.99840735066667100E-2 " " y[1] (numeric) = 7.99840735066667500E-2 " " absolute error = 4.16333634234433700000000000000000E-17 " " relative error = 5.20520668655031800000000000000E-14 "%" Correct digits = 16 h = 1.000E-3 " " "NO POLE" " " "TOP MAIN SOLVE Loop" x[1] = 0.31800000000000017 " " y[1] (analytic) = 8.01162057600000300E-2 " " y[1] (numeric) = 8.01162057600000900E-2 " " absolute error = 5.55111512312578300000000000000000E-17 " " relative error = 6.92882928050158800000000000000E-14 "%" Correct digits = 16 h = 1.000E-3 " " "NO POLE" " " "TOP MAIN SOLVE Loop" x[1] = 0.3190000000000002 " " y[1] (analytic) = 8.02484834533333500E-2 " " y[1] (numeric) = 8.02484834533334200E-2 " " absolute error = 6.93889390390722800000000000000000E-17 " " relative error = 8.64676016954561100000000000000E-14 "%" Correct digits = 16 h = 1.000E-3 " " "NO POLE" " " "TOP MAIN SOLVE Loop" x[1] = 0.3200000000000002 " " y[1] (analytic) = 8.0380906666666700E-2 " " y[1] (numeric) = 8.03809066666667500E-2 " " absolute error = 5.55111512312578300000000000000000E-17 " " relative error = 6.90601207839794700000000000000E-14 "%" Correct digits = 16 h = 1.000E-3 " " "NO POLE" " " "TOP MAIN SOLVE Loop" x[1] = 0.3210000000000002 " " y[1] (analytic) = 8.05134754800000100E-2 " " y[1] (numeric) = 8.05134754800000900E-2 " " absolute error = 6.93889390390722800000000000000000E-17 " " relative error = 8.61830129992449200000000000000E-14 "%" Correct digits = 16 h = 1.000E-3 " " "NO POLE" " " "TOP MAIN SOLVE Loop" x[1] = 0.3220000000000002 " " y[1] (analytic) = 8.06461899733333800E-2 " " y[1] (numeric) = 8.06461899733334200E-2 " " absolute error = 4.16333634234433700000000000000000E-17 " " relative error = 5.1624712137312300000000000000E-14 "%" Correct digits = 16 h = 1.000E-3 " " "NO POLE" " " "TOP MAIN SOLVE Loop" x[1] = 0.3230000000000002 " " y[1] (analytic) = 8.07790502266666900E-2 " " y[1] (numeric) = 8.07790502266667600E-2 " " absolute error = 6.93889390390722800000000000000000E-17 " " relative error = 8.58996718138754200000000000000E-14 "%" Correct digits = 16 h = 1.000E-3 " " "NO POLE" " " "TOP MAIN SOLVE Loop" x[1] = 0.3240000000000002 " " y[1] (analytic) = 8.09120563200000000E-2 " " y[1] (numeric) = 8.09120563200000900E-2 " " absolute error = 8.32667268468867400000000000000000E-17 " " relative error = 1.02910160282633540000000000000E-13 "%" Correct digits = 15 h = 1.000E-3 " " "NO POLE" " " "TOP MAIN SOLVE Loop" x[1] = 0.3250000000000002 " " y[1] (analytic) = 8.10452083333333700E-2 " " y[1] (numeric) = 8.10452083333334200E-2 " " absolute error = 5.55111512312578300000000000000000E-17 " " relative error = 6.84940570489303700000000000000E-14 "%" Correct digits = 16 h = 1.000E-3 " " "NO POLE" " " "TOP MAIN SOLVE Loop" x[1] = 0.3260000000000002 " " y[1] (analytic) = 8.11785063466666800E-2 " " y[1] (numeric) = 8.11785063466667700E-2 " " absolute error = 8.32667268468867400000000000000000E-17 " " relative error = 1.02572381033105580000000000000E-13 "%" Correct digits = 15 h = 1.000E-3 " " "NO POLE" " " "TOP MAIN SOLVE Loop" x[1] = 0.3270000000000002 " " y[1] (analytic) = 8.13119504400000500E-2 " " y[1] (numeric) = 8.1311950440000100E-2 " " absolute error = 5.55111512312578300000000000000000E-17 " " relative error = 6.82693637661777800000000000000E-14 "%" Correct digits = 16 h = 1.000E-3 " " "NO POLE" " " "TOP MAIN SOLVE Loop" x[1] = 0.3280000000000002 " " y[1] (analytic) = 8.14455406933333600E-2 " " y[1] (numeric) = 8.14455406933334300E-2 " " absolute error = 6.93889390390722800000000000000000E-17 " " relative error = 8.51967320105863600000000000000E-14 "%" Correct digits = 16 h = 1.000E-3 " " "NO POLE" " " "TOP MAIN SOLVE Loop" x[1] = 0.3290000000000002 " " y[1] (analytic) = 8.15792771866666900E-2 " " y[1] (numeric) = 8.15792771866667500E-2 " " absolute error = 6.93889390390722800000000000000000E-17 " " relative error = 8.50570652646248400000000000000E-14 "%" Correct digits = 16 h = 1.000E-3 " " "NO POLE" " " "TOP MAIN SOLVE Loop" x[1] = 0.3300000000000002 " " y[1] (analytic) = 8.17131600000000400E-2 " " y[1] (numeric) = 8.17131600000000800E-2 " " absolute error = 5.55111512312578300000000000000000E-17 " " relative error = 6.79341629074898100000000000000E-14 "%" Correct digits = 16 h = 1.000E-3 " " "NO POLE" " " "TOP MAIN SOLVE Loop" x[1] = 0.3310000000000002 " " y[1] (analytic) = 8.18471892133333500E-2 " " y[1] (numeric) = 8.18471892133334300E-2 " " absolute error = 6.93889390390722800000000000000000E-17 " " relative error = 8.4778646287059600000000000000E-14 "%" Correct digits = 16 h = 1.000E-3 " " "NO POLE" " " "TOP MAIN SOLVE Loop" x[1] = 0.3320000000000002 " " y[1] (analytic) = 8.19813649066667200E-2 " " y[1] (numeric) = 8.19813649066667500E-2 " " absolute error = 4.16333634234433700000000000000000E-17 " " relative error = 5.07839354356221000000000000000E-14 "%" Correct digits = 16 h = 1.000E-3 " " "NO POLE" " " "TOP MAIN SOLVE Loop" x[1] = 0.3330000000000002 " " y[1] (analytic) = 8.21156871600000400E-2 " " y[1] (numeric) = 8.21156871600000800E-2 " " absolute error = 5.55111512312578300000000000000000E-17 " " relative error = 6.76011528991969100000000000000E-14 "%" Correct digits = 16 h = 1.000E-3 " " "NO POLE" " " "TOP MAIN SOLVE Loop" x[1] = 0.3340000000000002 " " y[1] (analytic) = 8.22501560533333500E-2 " " y[1] (numeric) = 8.22501560533334200E-2 " " absolute error = 8.32667268468867400000000000000000E-17 " " relative error = 1.01235949987613680000000000000E-13 "%" Correct digits = 15 h = 1.000E-3 " " "NO POLE" " " "TOP MAIN SOLVE Loop" x[1] = 0.3350000000000002 " " y[1] (analytic) = 8.2384771666666700E-2 " " y[1] (numeric) = 8.23847716666667600E-2 " " absolute error = 5.55111512312578300000000000000000E-17 " " relative error = 6.7380354534280900000000000000E-14 "%" Correct digits = 16 h = 1.000E-3 " " "NO POLE" " " "TOP MAIN SOLVE Loop" x[1] = 0.3360000000000002 " " y[1] (analytic) = 8.25195340800000100E-2 " " y[1] (numeric) = 8.2519534080000100E-2 " " absolute error = 8.32667268468867400000000000000000E-17 " " relative error = 1.00905473807162250000000000000E-13 "%" Correct digits = 15 h = 1.000E-3 " " "NO POLE" " " "TOP MAIN SOLVE Loop" x[1] = 0.3370000000000002 " " y[1] (analytic) = 8.26544433733333700E-2 " " y[1] (numeric) = 8.26544433733334300E-2 " " absolute error = 5.55111512312578300000000000000000E-17 " " relative error = 6.71605166833260300000000000000E-14 "%" Correct digits = 16 h = 1.000E-3 " " "NO POLE" " " "TOP MAIN SOLVE Loop" x[1] = 0.3380000000000002 " " y[1] (analytic) = 8.27894996266666800E-2 " " y[1] (numeric) = 8.27894996266667600E-2 " " absolute error = 8.32667268468867400000000000000000E-17 " " relative error = 1.00576434478251570000000000000E-13 "%" Correct digits = 15 h = 1.000E-3 " " "NO POLE" " " "TOP MAIN SOLVE Loop" x[1] = 0.3390000000000002 " " y[1] (analytic) = 8.29247029200000300E-2 " " y[1] (numeric) = 8.29247029200000900E-2 " " absolute error = 6.93889390390722800000000000000000E-17 " " relative error = 8.36770426612367900000000000000E-14 "%" Correct digits = 16 h = 1.000E-3 " " "NO POLE" " " "TOP MAIN SOLVE Loop" x[1] = 0.3400000000000002 " " y[1] (analytic) = 8.30600533333333700E-2 " " y[1] (numeric) = 8.30600533333334300E-2 " " absolute error = 5.55111512312578300000000000000000E-17 " " relative error = 6.68325494669292400000000000000E-14 "%" Correct digits = 16 h = 1.000E-3 " " "NO POLE" " " "TOP MAIN SOLVE Loop" x[1] = 0.3410000000000002 " " y[1] (analytic) = 8.31955509466666900E-2 " " y[1] (numeric) = 8.31955509466667500E-2 " " absolute error = 6.93889390390722800000000000000000E-17 " " relative error = 8.34046271098736300000000000000E-14 "%" Correct digits = 16 h = 1.000E-3 " " "NO POLE" " " "TOP MAIN SOLVE Loop" x[1] = 0.3420000000000002 " " y[1] (analytic) = 8.33311958400000500E-2 " " y[1] (numeric) = 8.33311958400000800E-2 " " absolute error = 2.775557561562891400000000000000000E-17 " " relative error = 3.330754507462123600000000000000E-14 "%" Correct digits = 16 h = 1.000E-3 " " "NO POLE" " " "TOP MAIN SOLVE Loop" x[1] = 0.3430000000000002 " " y[1] (analytic) = 8.34669880933333600E-2 " " y[1] (numeric) = 8.34669880933334200E-2 " " absolute error = 5.55111512312578300000000000000000E-17 " " relative error = 6.65067142103952200000000000000E-14 "%" Correct digits = 16 h = 1.000E-3 " " "NO POLE" " " "TOP MAIN SOLVE Loop" x[1] = 0.3440000000000002 " " y[1] (analytic) = 8.36029277866666800E-2 " " y[1] (numeric) = 8.36029277866667600E-2 " " absolute error = 6.93889390390722800000000000000000E-17 " " relative error = 8.29982165410942600000000000000E-14 "%" Correct digits = 16 h = 1.000E-3 " " "NO POLE" " " "TOP MAIN SOLVE Loop" x[1] = 0.3450000000000002 " " y[1] (analytic) = 8.37390150000000300E-2 " " y[1] (numeric) = 8.37390150000000800E-2 " " absolute error = 5.55111512312578300000000000000000E-17 " " relative error = 6.6290666580276600000000000000E-14 "%" Correct digits = 16 h = 1.000E-3 " " "NO POLE" " " "TOP MAIN SOLVE Loop" x[1] = 0.3460000000000002 " " y[1] (analytic) = 8.38752498133333400E-2 " " y[1] (numeric) = 8.38752498133334100E-2 " " absolute error = 6.93889390390722800000000000000000E-17 " " relative error = 8.27287420228246800000000000000E-14 "%" Correct digits = 16 h = 1.000E-3 " " "NO POLE" " " "TOP MAIN SOLVE Loop" x[1] = 0.3470000000000002 " " y[1] (analytic) = 8.40116323066667300E-2 " " y[1] (numeric) = 8.40116323066667500E-2 " " absolute error = 2.775557561562891400000000000000000E-17 " " relative error = 3.30377768572726270000000000000E-14 "%" Correct digits = 16 h = 1.000E-3 " " "NO POLE" " " "TOP MAIN SOLVE Loop" x[1] = 0.3480000000000002 " " y[1] (analytic) = 8.41481625600000300E-2 " " y[1] (numeric) = 8.41481625600000800E-2 " " absolute error = 5.55111512312578300000000000000000E-17 " " relative error = 6.59683462389054500000000000000E-14 "%" Correct digits = 16 h = 1.000E-3 " " "NO POLE" " " "TOP MAIN SOLVE Loop" x[1] = 0.3490000000000002 " " y[1] (analytic) = 8.42848406533333500E-2 " " y[1] (numeric) = 8.42848406533334100E-2 " " absolute error = 6.93889390390722800000000000000000E-17 " " relative error = 8.23267132039455900000000000000E-14 "%" Correct digits = 16 h = 1.000E-3 " " "NO POLE" " " "TOP MAIN SOLVE Loop" x[1] = 0.3500000000000002 " " y[1] (analytic) = 8.44216666666667200E-2 " " y[1] (numeric) = 8.44216666666667400E-2 " " absolute error = 2.775557561562891400000000000000000E-17 " " relative error = 3.287731303057536000000000000000E-14 "%" Correct digits = 16 h = 1.000E-3 " " "NO POLE" " " "TOP MAIN SOLVE Loop" x[1] = 0.3510000000000002 " " y[1] (analytic) = 8.45586406800E-2 " " y[1] (numeric) = 8.45586406800000700E-2 " " absolute error = 6.93889390390722800000000000000000E-17 " " relative error = 8.20601401359616600000000000000E-14 "%" Correct digits = 16 h = 1.000E-3 " " "NO POLE" " " "TOP MAIN SOLVE Loop" x[1] = 0.3520000000000002 " " y[1] (analytic) = 8.46957627733333700E-2 " " y[1] (numeric) = 8.4695762773333400E-2 " " absolute error = 2.775557561562891400000000000000000E-17 " " relative error = 3.27709140419570200000000000000E-14 "%" Correct digits = 16 h = 1.000E-3 " " "NO POLE" " " "TOP MAIN SOLVE Loop" x[1] = 0.3530000000000002 " " y[1] (analytic) = 8.4833033026666690E-2 " " y[1] (numeric) = 8.48330330266667400E-2 " " absolute error = 4.16333634234433700000000000000000E-17 " " relative error = 4.9076830024875100000000000000E-14 "%" Correct digits = 16 h = 1.000E-3 " " "NO POLE" " " "TOP MAIN SOLVE Loop" x[1] = 0.3540000000000002 " " y[1] (analytic) = 8.49704515200000300E-2 " " y[1] (numeric) = 8.49704515200000700E-2 " " absolute error = 4.16333634234433700000000000000000E-17 " " relative error = 4.89974605038362800000000000000E-14 "%" Correct digits = 16 h = 1.000E-3 " " "NO POLE" " " "TOP MAIN SOLVE Loop" x[1] = 0.3550000000000002 " " y[1] (analytic) = 8.51080183333333700E-2 " " y[1] (numeric) = 8.51080183333334100E-2 " " absolute error = 4.16333634234433700000000000000000E-17 " " relative error = 4.89182620377582760000000000000E-14 "%" Correct digits = 16 h = 1.000E-3 " " "NO POLE" " " "TOP MAIN SOLVE Loop" x[1] = 0.3560000000000002 " " y[1] (analytic) = 8.52457335466666900E-2 " " y[1] (numeric) = 8.52457335466667500E-2 " " absolute error = 5.55111512312578300000000000000000E-17 " " relative error = 6.51189788880976100000000000000E-14 "%" Correct digits = 16 h = 1.000E-3 " " "NO POLE" " " "TOP MAIN SOLVE Loop" x[1] = 0.3570000000000002 " " y[1] (analytic) = 8.53835972400000500E-2 " " y[1] (numeric) = 8.53835972400000900E-2 " " absolute error = 2.775557561562891400000000000000000E-17 " " relative error = 3.25069176198003200000000000000E-14 "%" Correct digits = 16 h = 1.000E-3 " " "NO POLE" " " "TOP MAIN SOLVE Loop" x[1] = 0.3580000000000002 " " y[1] (analytic) = 8.55216094933333600E-2 " " y[1] (numeric) = 8.55216094933334200E-2 " " absolute error = 5.55111512312578300000000000000000E-17 " " relative error = 6.490891782805499000000000000E-14 "%" Correct digits = 16 h = 1.000E-3 " " "NO POLE" " " "TOP MAIN SOLVE Loop" x[1] = 0.3590000000000002 " " y[1] (analytic) = 8.56597703866666800E-2 " " y[1] (numeric) = 8.56597703866667400E-2 " " absolute error = 6.93889390390722800000000000000000E-17 " " relative error = 8.1005282556621200000000000000E-14 "%" Correct digits = 16 h = 1.000E-3 " " "NO POLE" " " "TOP MAIN SOLVE Loop" x[1] = 0.3600000000000002 " " y[1] (analytic) = 8.57980800000000400E-2 " " y[1] (numeric) = 8.57980800000000900E-2 " " absolute error = 4.16333634234433700000000000000000E-17 " " relative error = 4.85248194638427200000000000000E-14 "%" Correct digits = 16 h = 1.000E-3 " " "NO POLE" " " "TOP MAIN SOLVE Loop" x[1] = 0.3610000000000002 " " y[1] (analytic) = 8.59365384133333500E-2 " " y[1] (numeric) = 8.59365384133334200E-2 " " absolute error = 6.93889390390722800000000000000000E-17 " " relative error = 8.07443961791069300000000000000E-14 "%" Correct digits = 16 h = 1.000E-3 " " "NO POLE" " " "TOP MAIN SOLVE Loop" x[1] = 0.3620000000000002 " " y[1] (analytic) = 8.6075145706666700E-2 " " y[1] (numeric) = 8.60751457066667400E-2 " " absolute error = 4.16333634234433700000000000000000E-17 " " relative error = 4.83686238131093600000000000000E-14 "%" Correct digits = 16 h = 1.000E-3 " " "NO POLE" " " "TOP MAIN SOLVE Loop" x[1] = 0.3630000000000002 " " y[1] (analytic) = 8.62139019600000300E-2 " " y[1] (numeric) = 8.62139019600000700E-2 " " absolute error = 4.16333634234433700000000000000000E-17 " " relative error = 4.829077733050484700000000000000E-14 "%" Correct digits = 16 h = 1.000E-3 " " "NO POLE" " " "TOP MAIN SOLVE Loop" x[1] = 0.3640000000000002 " " y[1] (analytic) = 8.63528072533333600E-2 " " y[1] (numeric) = 8.63528072533334100E-2 " " absolute error = 5.55111512312578300000000000000000E-17 " " relative error = 6.42841304144342200000000000000E-14 "%" Correct digits = 16 h = 1.000E-3 " " "NO POLE" " " "TOP MAIN SOLVE Loop" x[1] = 0.3650000000000002 " " y[1] (analytic) = 8.6491861666666690E-2 " " y[1] (numeric) = 8.64918616666667600E-2 " " absolute error = 5.55111512312578300000000000000000E-17 " " relative error = 6.41807797422533700000000000000E-14 "%" Correct digits = 16 h = 1.000E-3 " " "NO POLE" " " "TOP MAIN SOLVE Loop" x[1] = 0.3660000000000002 " " y[1] (analytic) = 8.66310652800000300E-2 " " y[1] (numeric) = 8.66310652800000900E-2 " " absolute error = 5.55111512312578300000000000000000E-17 " " relative error = 6.40776504962052400000000000000E-14 "%" Correct digits = 16 h = 1.000E-3 " " "NO POLE" " " "TOP MAIN SOLVE Loop" x[1] = 0.3670000000000002 " " y[1] (analytic) = 8.67704181733334000E-2 " " y[1] (numeric) = 8.67704181733334200E-2 " " absolute error = 2.775557561562891400000000000000000E-17 " " relative error = 3.19873710418038100000000000000E-14 "%" Correct digits = 16 h = 1.000E-3 " " "NO POLE" " " "TOP MAIN SOLVE Loop" x[1] = 0.3680000000000002 " " y[1] (analytic) = 8.69099204266666900E-2 " " y[1] (numeric) = 8.69099204266667600E-2 " " absolute error = 6.93889390390722800000000000000000E-17 " " relative error = 7.98400673921012800000000000000E-14 "%" Correct digits = 16 h = 1.000E-3 " " "NO POLE" " " "TOP MAIN SOLVE Loop" x[1] = 0.3690000000000002 " " y[1] (analytic) = 8.70495721200000200E-2 " " y[1] (numeric) = 8.7049572120000100E-2 " " absolute error = 8.32667268468867400000000000000000E-17 " " relative error = 9.56543780963121500000000000000E-14 "%" Correct digits = 16 h = 1.000E-3 " " "NO POLE" " " "TOP MAIN SOLVE Loop" x[1] = 0.3700000000000002 " " y[1] (analytic) = 8.71893733333333600E-2 " " y[1] (numeric) = 8.71893733333334300E-2 " " absolute error = 6.93889390390722800000000000000000E-17 " " relative error = 7.95841699352416400000000000000E-14 "%" Correct digits = 16 h = 1.000E-3 " " "NO POLE" " " "TOP MAIN SOLVE Loop" x[1] = 0.3710000000000002 " " y[1] (analytic) = 8.73293241466667000E-2 " " y[1] (numeric) = 8.73293241466667600E-2 " " absolute error = 6.93889390390722800000000000000000E-17 " " relative error = 7.94566312256532300000000000000E-14 "%" Correct digits = 16 h = 1.000E-3 " " "NO POLE" " " "TOP MAIN SOLVE Loop" x[1] = 0.3720000000000002 " " y[1] (analytic) = 8.74694246400000500E-2 " " y[1] (numeric) = 8.7469424640000090E-2 " " absolute error = 5.55111512312578300000000000000000E-17 " " relative error = 6.34634919112894300000000000000E-14 "%" Correct digits = 16 h = 1.000E-3 " " "NO POLE" " " "TOP MAIN SOLVE Loop" x[1] = 0.3730000000000002 " " y[1] (analytic) = 8.76096748933333800E-2 " " y[1] (numeric) = 8.76096748933334300E-2 " " absolute error = 5.55111512312578300000000000000000E-17 " " relative error = 6.33618961591214900000000000000E-14 "%" Correct digits = 16 h = 1.000E-3 " " "NO POLE" " " "TOP MAIN SOLVE Loop" x[1] = 0.3740000000000002 " " y[1] (analytic) = 8.77500749866666900E-2 " " y[1] (numeric) = 8.77500749866667700E-2 " " absolute error = 8.32667268468867400000000000000000E-17 " " relative error = 9.48907757167601500000000000000E-14 "%" Correct digits = 16 h = 1.000E-3 " " "NO POLE" " " "TOP MAIN SOLVE Loop" x[1] = 0.3750000000000002 " " y[1] (analytic) = 8.78906250000000600E-2 " " y[1] (numeric) = 8.78906250000001100E-2 " " absolute error = 5.55111512312578300000000000000000E-17 " " relative error = 6.31593542897866500000000000000E-14 "%" Correct digits = 16 h = 1.000E-3 " " "NO POLE" " " "TOP MAIN SOLVE Loop" x[1] = 0.3760000000000002 " " y[1] (analytic) = 8.80313250133333500E-2 " " y[1] (numeric) = 8.80313250133334400E-2 " " absolute error = 8.32667268468867400000000000000000E-17 " " relative error = 9.45876105287237600000000000000E-14 "%" Correct digits = 16 h = 1.000E-3 " " "NO POLE" " " "TOP MAIN SOLVE Loop" x[1] = 0.3770000000000002 " " y[1] (analytic) = 8.81721751066667100E-2 " " y[1] (numeric) = 8.81721751066667700E-2 " " absolute error = 6.93889390390722800000000000000000E-17 " " relative error = 7.8697093448277400000000000000E-14 "%" Correct digits = 16 h = 1.000E-3 " " "NO POLE" " " "TOP MAIN SOLVE Loop" x[1] = 0.3780000000000002 " " y[1] (analytic) = 8.83131753600000400E-2 " " y[1] (numeric) = 8.8313175360000110E-2 " " absolute error = 6.93889390390722800000000000000000E-17 " " relative error = 7.8571446170081690000000000000E-14 "%" Correct digits = 16 h = 1.000E-3 " " "NO POLE" " " "TOP MAIN SOLVE Loop" x[1] = 0.3790000000000002 " " y[1] (analytic) = 8.84543258533333500E-2 " " y[1] (numeric) = 8.84543258533334500E-2 " " absolute error = 9.7144514654701200000000000000000E-17 " " relative error = 1.09824492717040330000000000000E-13 "%" Correct digits = 15 h = 1.000E-3 " " "NO POLE" " " "TOP MAIN SOLVE Loop" x[1] = 0.3800000000000002 " " y[1] (analytic) = 8.8595626666666700E-2 " " y[1] (numeric) = 8.85956266666667700E-2 " " absolute error = 6.93889390390722800000000000000000E-17 " " relative error = 7.83209529067863600000000000000E-14 "%" Correct digits = 16 h = 1.000E-3 " " "NO POLE" " " "TOP MAIN SOLVE Loop" x[1] = 0.3810000000000002 " " y[1] (analytic) = 8.87370778800000300E-2 " " y[1] (numeric) = 8.87370778800001100E-2 " " absolute error = 8.32667268468867400000000000000000E-17 " " relative error = 9.38353266032594700000000000000E-14 "%" Correct digits = 16 h = 1.000E-3 " " "NO POLE" " " "TOP MAIN SOLVE Loop" x[1] = 0.38200000000000023 " " y[1] (analytic) = 8.88786795733333900E-2 " " y[1] (numeric) = 8.88786795733334500E-2 " " absolute error = 6.93889390390722800000000000000000E-17 " " relative error = 7.80715233081515200000000000000E-14 "%" Correct digits = 16 h = 1.000E-3 " " "NO POLE" " " "TOP MAIN SOLVE Loop" x[1] = 0.38300000000000023 " " y[1] (analytic) = 8.9020431826666700E-2 " " y[1] (numeric) = 8.90204318266667900E-2 " " absolute error = 8.32667268468867400000000000000000E-17 " " relative error = 9.35366467430947600000000000000E-14 "%" Correct digits = 16 h = 1.000E-3 " " "NO POLE" " " "TOP MAIN SOLVE Loop" x[1] = 0.38400000000000023 " " y[1] (analytic) = 8.91623347200000100E-2 " " y[1] (numeric) = 8.91623347200001200E-2 " " absolute error = 1.11022302462515650000000000000000E-16 " " relative error = 1.24517042775027540000000000000E-13 "%" Correct digits = 15 h = 1.000E-3 " " "NO POLE" " " "TOP MAIN SOLVE Loop" x[1] = 0.38500000000000023 " " y[1] (analytic) = 8.93043883333333700E-2 " " y[1] (numeric) = 8.93043883333334500E-2 " " absolute error = 8.32667268468867400000000000000000E-17 " " relative error = 9.32392331450603100000000000000E-14 "%" Correct digits = 16 h = 1.000E-3 " " "NO POLE" " " "TOP MAIN SOLVE Loop" x[1] = 0.38600000000000023 " " y[1] (analytic) = 8.94465927466666900E-2 " " y[1] (numeric) = 8.94465927466667900E-2 " " absolute error = 9.7144514654701200000000000000000E-17 " " relative error = 1.08606165614197060000000000000E-13 "%" Correct digits = 15 h = 1.000E-3 " " "NO POLE" " " "TOP MAIN SOLVE Loop" x[1] = 0.38700000000000023 " " y[1] (analytic) = 8.95889480400000500E-2 " " y[1] (numeric) = 8.95889480400001200E-2 " " absolute error = 6.93889390390722800000000000000000E-17 " " relative error = 7.74525659215143700000000000000E-14 "%" Correct digits = 16 h = 1.000E-3 " " "NO POLE" " " "TOP MAIN SOLVE Loop" x[1] = 0.38800000000000023 " " y[1] (analytic) = 8.97314542933333600E-2 " " y[1] (numeric) = 8.97314542933334500E-2 " " absolute error = 8.32667268468867400000000000000000E-17 " " relative error = 9.2795472337589300000000000000E-14 "%" Correct digits = 16 h = 1.000E-3 " " "NO POLE" " " "TOP MAIN SOLVE Loop" x[1] = 0.38900000000000023 " " y[1] (analytic) = 8.9874111586666690E-2 " " y[1] (numeric) = 8.98741115866667800E-2 " " absolute error = 8.32667268468867400000000000000000E-17 " " relative error = 9.26481779645650500000000000000E-14 "%" Correct digits = 16 h = 1.000E-3 " " "NO POLE" " " "TOP MAIN SOLVE Loop" x[1] = 0.39000000000000024 " " y[1] (analytic) = 9.00169200000000400E-2 " " y[1] (numeric) = 9.00169200000001100E-2 " " absolute error = 6.93889390390722800000000000000000E-17 " " relative error = 7.7084329300616210000000000000E-14 "%" Correct digits = 16 h = 1.000E-3 " " "NO POLE" " " "TOP MAIN SOLVE Loop" x[1] = 0.39100000000000024 " " y[1] (analytic) = 9.01598796133333700E-2 " " y[1] (numeric) = 9.01598796133334400E-2 " " absolute error = 6.93889390390722800000000000000000E-17 " " relative error = 7.69621025856057600000000000000E-14 "%" Correct digits = 16 h = 1.000E-3 " " "NO POLE" " " "TOP MAIN SOLVE Loop" x[1] = 0.39200000000000024 " " y[1] (analytic) = 9.03029905066667000E-2 " " y[1] (numeric) = 9.03029905066667800E-2 " " absolute error = 6.93889390390722800000000000000000E-17 " " relative error = 7.68401341414596700000000000000E-14 "%" Correct digits = 16 h = 1.000E-3 " " "NO POLE" " " "TOP MAIN SOLVE Loop" x[1] = 0.39300000000000024 " " y[1] (analytic) = 9.04462527600000500E-2 " " y[1] (numeric) = 9.04462527600001100E-2 " " absolute error = 6.93889390390722800000000000000000E-17 " " relative error = 7.67184232863648600000000000000E-14 "%" Correct digits = 16 h = 1.000E-3 " " "NO POLE" " " "TOP MAIN SOLVE Loop" x[1] = 0.39400000000000024 " " y[1] (analytic) = 9.05896664533333500E-2 " " y[1] (numeric) = 9.05896664533334400E-2 " " absolute error = 8.32667268468867400000000000000000E-17 " " relative error = 9.19163632088004400000000000000E-14 "%" Correct digits = 16 h = 1.000E-3 " " "NO POLE" " " "TOP MAIN SOLVE Loop" x[1] = 0.39500000000000024 " " y[1] (analytic) = 9.07332316666667100E-2 " " y[1] (numeric) = 9.07332316666667800E-2 " " absolute error = 5.55111512312578300000000000000000E-17 " " relative error = 6.11806173014901400000000000000E-14 "%" Correct digits = 16 h = 1.000E-3 " " "NO POLE" " " "TOP MAIN SOLVE Loop" x[1] = 0.39600000000000024 " " y[1] (analytic) = 9.08769484800000300E-2 " " y[1] (numeric) = 9.08769484800001100E-2 " " absolute error = 8.32667268468867400000000000000000E-17 " " relative error = 9.16257953635094500000000000000E-14 "%" Correct digits = 16 h = 1.000E-3 " " "NO POLE" " " "TOP MAIN SOLVE Loop" x[1] = 0.39700000000000024 " " y[1] (analytic) = 9.10208169733334000E-2 " " y[1] (numeric) = 9.10208169733334400E-2 " " absolute error = 5.55111512312578300000000000000000E-17 " " relative error = 6.09873137565015300000000000000E-14 "%" Correct digits = 16 h = 1.000E-3 " " "NO POLE" " " "TOP MAIN SOLVE Loop" x[1] = 0.39800000000000024 " " y[1] (analytic) = 9.1164837226666700E-2 " " y[1] (numeric) = 9.11648372266667800E-2 " " absolute error = 8.32667268468867400000000000000000E-17 " " relative error = 9.13364509606455200000000000000E-14 "%" Correct digits = 16 h = 1.000E-3 " " "NO POLE" " " "TOP MAIN SOLVE Loop" x[1] = 0.39900000000000024 " " y[1] (analytic) = 9.13090093200000200E-2 " " y[1] (numeric) = 9.13090093200001200E-2 " " absolute error = 9.7144514654701200000000000000000E-17 " " relative error = 1.06390941461482910000000000000E-13 "%" Correct digits = 15 h = 1.000E-3 " " "NO POLE" " " "TOP MAIN SOLVE Loop" x[1] = 0.40000000000000024 " " y[1] (analytic) = 9.14533333333333900E-2 " " y[1] (numeric) = 9.14533333333334500E-2 " " absolute error = 6.93889390390722800000000000000000E-17 " " relative error = 7.58736029731800300000000000000E-14 "%" Correct digits = 16 h = 1.000E-3 " " "NO POLE" " " "TOP MAIN SOLVE Loop" x[1] = 0.40100000000000025 " " y[1] (analytic) = 9.15978093466666800E-2 " " y[1] (numeric) = 9.1597809346666790E-2 " " absolute error = 1.11022302462515650000000000000000E-16 " " relative error = 1.21206285668179950000000000000E-13 "%" Correct digits = 15 h = 1.000E-3 " " "NO POLE" " " "TOP MAIN SOLVE Loop" x[1] = 0.40200000000000025 " " y[1] (analytic) = 9.17424374400000500E-2 " " y[1] (numeric) = 9.17424374400001200E-2 " " absolute error = 8.32667268468867400000000000000000E-17 " " relative error = 9.07614067931686900000000000000E-14 "%" Correct digits = 16 h = 1.000E-3 " " "NO POLE" " " "TOP MAIN SOLVE Loop" x[1] = 0.40300000000000025 " " y[1] (analytic) = 9.18872176933333700E-2 " " y[1] (numeric) = 9.18872176933334700E-2 " " absolute error = 9.7144514654701200000000000000000E-17 " " relative error = 1.05721467134758250000000000000E-13 "%" Correct digits = 15 h = 1.000E-3 " " "NO POLE" " " "TOP MAIN SOLVE Loop" x[1] = 0.40400000000000025 " " y[1] (analytic) = 9.20321501866666800E-2 " " y[1] (numeric) = 9.2032150186666800E-2 " " absolute error = 1.11022302462515650000000000000000E-16 " " relative error = 1.20634259046791450000000000000E-13 "%" Correct digits = 15 h = 1.000E-3 " " "NO POLE" " " "TOP MAIN SOLVE Loop" x[1] = 0.40500000000000025 " " y[1] (analytic) = 9.21772350000000400E-2 " " y[1] (numeric) = 9.21772350000001400E-2 " " absolute error = 9.7144514654701200000000000000000E-17 " " relative error = 1.05388835599919170000000000000E-13 "%" Correct digits = 15 h = 1.000E-3 " " "NO POLE" " " "TOP MAIN SOLVE Loop" x[1] = 0.40600000000000025 " " y[1] (analytic) = 9.23224722133333500E-2 " " y[1] (numeric) = 9.23224722133334600E-2 " " absolute error = 1.11022302462515650000000000000000E-16 " " relative error = 1.2025490630923730000000000000E-13 "%" Correct digits = 15 h = 1.000E-3 " " "NO POLE" " " "TOP MAIN SOLVE Loop" x[1] = 0.40700000000000025 " " y[1] (analytic) = 9.24678619066667300E-2 " " y[1] (numeric) = 9.2467861906666790E-2 " " absolute error = 6.93889390390722800000000000000000E-17 " " relative error = 7.5041141439077110000000000000E-14 "%" Correct digits = 16 h = 1.000E-3 " " "NO POLE" " " "TOP MAIN SOLVE Loop" x[1] = 0.40800000000000025 " " y[1] (analytic) = 9.26134041600000300E-2 " " y[1] (numeric) = 9.26134041600001300E-2 " " absolute error = 9.7144514654701200000000000000000E-17 " " relative error = 1.04892499671940740000000000000E-13 "%" Correct digits = 15 h = 1.000E-3 " " "NO POLE" " " "TOP MAIN SOLVE Loop" x[1] = 0.40900000000000025 " " y[1] (analytic) = 9.27590990533333600E-2 " " y[1] (numeric) = 9.27590990533334700E-2 " " absolute error = 1.11022302462515650000000000000000E-16 " " relative error = 1.19688853811184150000000000000E-13 "%" Correct digits = 15 h = 1.000E-3 " " "NO POLE" " " "TOP MAIN SOLVE Loop" x[1] = 0.41000000000000025 " " y[1] (analytic) = 9.29049466666667200E-2 " " y[1] (numeric) = 9.29049466666668100E-2 " " absolute error = 8.32667268468867400000000000000000E-17 " " relative error = 8.96257194416558800000000000000E-14 "%" Correct digits = 16 h = 1.000E-3 " " "NO POLE" " " "TOP MAIN SOLVE Loop" x[1] = 0.41100000000000025 " " y[1] (analytic) = 9.30509470800000500E-2 " " y[1] (numeric) = 9.30509470800001500E-2 " " absolute error = 9.7144514654701200000000000000000E-17 " " relative error = 1.04399275561571370000000000000E-13 "%" Correct digits = 15 h = 1.000E-3 " " "NO POLE" " " "TOP MAIN SOLVE Loop" x[1] = 0.41200000000000025 " " y[1] (analytic) = 9.3197100373333400E-2 " " y[1] (numeric) = 9.31971003733334900E-2 " " absolute error = 8.32667268468867400000000000000000E-17 " " relative error = 8.9344761278336890000000000000E-14 "%" Correct digits = 16 h = 1.000E-3 " " "NO POLE" " " "TOP MAIN SOLVE Loop" x[1] = 0.41300000000000026 " " y[1] (analytic) = 9.3343406626666690E-2 " " y[1] (numeric) = 9.33434066266668200E-2 " " absolute error = 1.2490009027033011000000000000000E-16 " " relative error = 1.33807083739590240000000000000E-13 "%" Correct digits = 15 h = 1.000E-3 " " "NO POLE" " " "TOP MAIN SOLVE Loop" x[1] = 0.41400000000000026 " " y[1] (analytic) = 9.34898659200000300E-2 " " y[1] (numeric) = 9.34898659200001500E-2 " " absolute error = 1.2490009027033011000000000000000E-16 " " relative error = 1.33597464325393350000000000000E-13 "%" Correct digits = 15 h = 1.000E-3 " " "NO POLE" " " "TOP MAIN SOLVE Loop" x[1] = 0.41500000000000026 " " y[1] (analytic) = 9.36364783333333800E-2 " " y[1] (numeric) = 9.36364783333334800E-2 " " absolute error = 9.7144514654701200000000000000000E-17 " " relative error = 1.03746441967712270000000000000E-13 "%" Correct digits = 15 h = 1.000E-3 " " "NO POLE" " " "TOP MAIN SOLVE Loop" x[1] = 0.41600000000000026 " " y[1] (analytic) = 9.3783243946666710E-2 " " y[1] (numeric) = 9.37832439466668200E-2 " " absolute error = 1.11022302462515650000000000000000E-16 " " relative error = 1.1838181085488211000000000000E-13 "%" Correct digits = 15 h = 1.000E-3 " " "NO POLE" " " "TOP MAIN SOLVE Loop" x[1] = 0.41700000000000026 " " y[1] (analytic) = 9.39301628400000500E-2 " " y[1] (numeric) = 9.39301628400001500E-2 " " absolute error = 9.7144514654701200000000000000000E-17 " " relative error = 1.03422065625688790000000000000E-13 "%" Correct digits = 15 h = 1.000E-3 " " "NO POLE" " " "TOP MAIN SOLVE Loop" x[1] = 0.41800000000000026 " " y[1] (analytic) = 9.40772350933333800E-2 " " y[1] (numeric) = 9.40772350933334900E-2 " " absolute error = 1.11022302462515650000000000000000E-16 " " relative error = 1.18011867963988520000000000000E-13 "%" Correct digits = 15 h = 1.000E-3 " " "NO POLE" " " "TOP MAIN SOLVE Loop" x[1] = 0.41900000000000026 " " y[1] (analytic) = 9.4224460786666700E-2 " " y[1] (numeric) = 9.42244607866668200E-2 " " absolute error = 1.2490009027033011000000000000000E-16 " " relative error = 1.32555908760375930000000000000E-13 "%" Correct digits = 15 h = 1.000E-3 " " "NO POLE" " " "TOP MAIN SOLVE Loop" x[1] = 0.42000000000000026 " " y[1] (analytic) = 9.43718400000000700E-2 " " y[1] (numeric) = 9.43718400000001600E-2 " " absolute error = 9.7144514654701200000000000000000E-17 " " relative error = 1.0293803178437670000000000000E-13 "%" Correct digits = 15 h = 1.000E-3 " " "NO POLE" " " "TOP MAIN SOLVE Loop" x[1] = 0.42100000000000026 " " y[1] (analytic) = 9.45193728133333800E-2 " " y[1] (numeric) = 9.4519372813333500E-2 " " absolute error = 1.2490009027033011000000000000000E-16 " " relative error = 1.32142318080120670000000000000E-13 "%" Correct digits = 15 h = 1.000E-3 " " "NO POLE" " " "TOP MAIN SOLVE Loop" x[1] = 0.42200000000000026 " " y[1] (analytic) = 9.46670593066667300E-2 " " y[1] (numeric) = 9.46670593066668300E-2 " " absolute error = 9.7144514654701200000000000000000E-17 " " relative error = 1.02617019442854920000000000000E-13 "%" Correct digits = 15 h = 1.000E-3 " " "NO POLE" " " "TOP MAIN SOLVE Loop" x[1] = 0.42300000000000026 " " y[1] (analytic) = 9.48148995600000400E-2 " " y[1] (numeric) = 9.48148995600001700E-2 " " absolute error = 1.2490009027033011000000000000000E-16 " " relative error = 1.31730446216727580000000000000E-13 "%" Correct digits = 15 h = 1.000E-3 " " "NO POLE" " " "TOP MAIN SOLVE Loop" x[1] = 0.42400000000000027 " " y[1] (analytic) = 9.49628936533333500E-2 " " y[1] (numeric) = 9.4962893653333500E-2 " " absolute error = 1.52655665885959020000000000000000E-16 " " relative error = 1.6075296361885932000000000000E-13 "%" Correct digits = 15 h = 1.000E-3 " " "NO POLE" " " "TOP MAIN SOLVE Loop" x[1] = 0.42500000000000027 " " y[1] (analytic) = 9.51110416666667200E-2 " " y[1] (numeric) = 9.51110416666668400E-2 " " absolute error = 1.2490009027033011000000000000000E-16 " " relative error = 1.31320284250554560000000000000E-13 "%" Correct digits = 15 h = 1.000E-3 " " "NO POLE" " " "TOP MAIN SOLVE Loop" x[1] = 0.42600000000000027 " " y[1] (analytic) = 9.52593436800000400E-2 " " y[1] (numeric) = 9.52593436800001700E-2 " " absolute error = 1.38777878078144570000000000000000E-16 " " relative error = 1.45684268563023240000000000000E-13 "%" Correct digits = 15 h = 1.000E-3 " " "NO POLE" " " "TOP MAIN SOLVE Loop" x[1] = 0.42700000000000027 " " y[1] (analytic) = 9.54077997733333800E-2 " " y[1] (numeric) = 9.54077997733335100E-2 " " absolute error = 1.2490009027033011000000000000000E-16 " " relative error = 1.30911823317447330000000000000E-13 "%" Correct digits = 15 h = 1.000E-3 " " "NO POLE" " " "TOP MAIN SOLVE Loop" x[1] = 0.42800000000000027 " " y[1] (analytic) = 9.55564100266667200E-2 " " y[1] (numeric) = 9.55564100266668400E-2 " " absolute error = 1.2490009027033011000000000000000E-16 " " relative error = 1.30708227983318460000000000000E-13 "%" Correct digits = 15 h = 1.000E-3 " " "NO POLE" " " "TOP MAIN SOLVE Loop" x[1] = 0.42900000000000027 " " y[1] (analytic) = 9.57051745200000400E-2 " " y[1] (numeric) = 9.57051745200001700E-2 " " absolute error = 1.38777878078144570000000000000000E-16 " " relative error = 1.45005616231485360000000000000E-13 "%" Correct digits = 15 h = 1.000E-3 " " "NO POLE" " " "TOP MAIN SOLVE Loop" x[1] = 0.43000000000000027 " " y[1] (analytic) = 9.58540933333333800E-2 " " y[1] (numeric) = 9.5854093333333500E-2 " " absolute error = 1.2490009027033011000000000000000E-16 " " relative error = 1.30302302099910370000000000000E-13 "%" Correct digits = 15 h = 1.000E-3 " " "NO POLE" " " "TOP MAIN SOLVE Loop" x[1] = 0.43100000000000027 " " y[1] (analytic) = 9.6003166546666700E-2 " " y[1] (numeric) = 9.60031665466668400E-2 " " absolute error = 1.38777878078144570000000000000000E-16 " " relative error = 1.44555521520933650000000000000E-13 "%" Correct digits = 15 h = 1.000E-3 " " "NO POLE" " " "TOP MAIN SOLVE Loop" x[1] = 0.4320000000000003 " " y[1] (analytic) = 9.61523942400000600E-2 " " y[1] (numeric) = 9.61523942400001700E-2 " " absolute error = 1.11022302462515650000000000000000E-16 " " relative error = 1.15464938070496420000000000000E-13 "%" Correct digits = 15 h = 1.000E-3 " " "NO POLE" " " "TOP MAIN SOLVE Loop" x[1] = 0.4330000000000003 " " y[1] (analytic) = 9.63017764933333800E-2 " " y[1] (numeric) = 9.6301776493333500E-2 " " absolute error = 1.2490009027033011000000000000000E-16 " " relative error = 1.29696558898865670000000000000E-13 "%" Correct digits = 15 h = 1.000E-3 " " "NO POLE" " " "TOP MAIN SOLVE Loop" x[1] = 0.4340000000000003 " " y[1] (analytic) = 9.64513133866667000E-2 " " y[1] (numeric) = 9.64513133866668400E-2 " " absolute error = 1.2490009027033011000000000000000E-16 " " relative error = 1.2949547899841882000000000000E-13 "%" Correct digits = 15 h = 1.000E-3 " " "NO POLE" " " "TOP MAIN SOLVE Loop" x[1] = 0.4350000000000003 " " y[1] (analytic) = 9.66010050000000400E-2 " " y[1] (numeric) = 9.66010050000001700E-2 " " absolute error = 1.2490009027033011000000000000000E-16 " " relative error = 1.29294814552219250000000000000E-13 "%" Correct digits = 15 h = 1.000E-3 " " "NO POLE" " " "TOP MAIN SOLVE Loop" x[1] = 0.4360000000000003 " " y[1] (analytic) = 9.67508514133333700E-2 " " y[1] (numeric) = 9.6750851413333500E-2 " " absolute error = 1.38777878078144570000000000000000E-16 " " relative error = 1.4343840498650060000000000000E-13 "%" Correct digits = 15 h = 1.000E-3 " " "NO POLE" " " "TOP MAIN SOLVE Loop" x[1] = 0.4370000000000003 " " y[1] (analytic) = 9.69008527066667300E-2 " " y[1] (numeric) = 9.69008527066668300E-2 " " absolute error = 9.7144514654701200000000000000000E-17 " " relative error = 1.00251454905946040000000000000E-13 "%" Correct digits = 15 h = 1.000E-3 " " "NO POLE" " " "TOP MAIN SOLVE Loop" x[1] = 0.4380000000000003 " " y[1] (analytic) = 9.70510089600000500E-2 " " y[1] (numeric) = 9.70510089600001700E-2 " " absolute error = 1.2490009027033011000000000000000E-16 " " relative error = 1.28695303231528670000000000000E-13 "%" Correct digits = 15 h = 1.000E-3 " " "NO POLE" " " "TOP MAIN SOLVE Loop" x[1] = 0.4390000000000003 " " y[1] (analytic) = 9.72013202533333700E-2 " " y[1] (numeric) = 9.7201320253333500E-2 " " absolute error = 1.38777878078144570000000000000000E-16 " " relative error = 1.42773655456995080000000000000E-13 "%" Correct digits = 15 h = 1.000E-3 " " "NO POLE" " " "TOP MAIN SOLVE Loop" x[1] = 0.4400000000000003 " " y[1] (analytic) = 9.7351786666666710E-2 " " y[1] (numeric) = 9.73517866666668300E-2 " " absolute error = 1.2490009027033011000000000000000E-16 " " relative error = 1.2829768671630960000000000000E-13 "%" Correct digits = 15 h = 1.000E-3 " " "NO POLE" " " "TOP MAIN SOLVE Loop" x[1] = 0.4410000000000003 " " y[1] (analytic) = 9.75024082800000300E-2 " " y[1] (numeric) = 9.75024082800001600E-2 " " absolute error = 1.2490009027033011000000000000000E-16 " " relative error = 1.2809949259063580000000000000E-13 "%" Correct digits = 15 h = 1.000E-3 " " "NO POLE" " " "TOP MAIN SOLVE Loop" x[1] = 0.4420000000000003 " " y[1] (analytic) = 9.76531851733333900E-2 " " y[1] (numeric) = 9.76531851733334900E-2 " " absolute error = 9.7144514654701200000000000000000E-17 " " relative error = 9.94791050412443800000000000000E-14 "%" Correct digits = 16 h = 1.000E-3 " " "NO POLE" " " "TOP MAIN SOLVE Loop" x[1] = 0.4430000000000003 " " y[1] (analytic) = 9.78041174266667300E-2 " " y[1] (numeric) = 9.78041174266668300E-2 " " absolute error = 9.7144514654701200000000000000000E-17 " " relative error = 9.93255879309374600000000000000E-14 "%" Correct digits = 16 h = 1.000E-3 " " "NO POLE" " " "TOP MAIN SOLVE Loop" x[1] = 0.4440000000000003 " " y[1] (analytic) = 9.79552051200000400E-2 " " y[1] (numeric) = 9.79552051200001600E-2 " " absolute error = 1.11022302462515650000000000000000E-16 " " relative error = 1.1333987032798079000000000000E-13 "%" Correct digits = 15 h = 1.000E-3 " " "NO POLE" " " "TOP MAIN SOLVE Loop" x[1] = 0.4450000000000003 " " y[1] (analytic) = 9.81064483333333800E-2 " " y[1] (numeric) = 9.81064483333334800E-2 " " absolute error = 9.7144514654701200000000000000000E-17 " " relative error = 9.90195000481886100000000000000E-14 "%" Correct digits = 16 h = 1.000E-3 " " "NO POLE" " " "TOP MAIN SOLVE Loop" x[1] = 0.4460000000000003 " " y[1] (analytic) = 9.82578471466666900E-2 " " y[1] (numeric) = 9.82578471466668100E-2 " " absolute error = 1.2490009027033011000000000000000E-16 " " relative error = 1.27114621271820970000000000000E-13 "%" Correct digits = 15 h = 1.000E-3 " " "NO POLE" " " "TOP MAIN SOLVE Loop" x[1] = 0.4470000000000003 " " y[1] (analytic) = 9.84094016400000600E-2 " " y[1] (numeric) = 9.84094016400001400E-2 " " absolute error = 8.32667268468867400000000000000000E-17 " " relative error = 8.46125730461119500000000000000E-14 "%" Correct digits = 16 h = 1.000E-3 " " "NO POLE" " " "TOP MAIN SOLVE Loop" x[1] = 0.4480000000000003 " " y[1] (analytic) = 9.85611118933333800E-2 " " y[1] (numeric) = 9.85611118933334900E-2 " " absolute error = 1.11022302462515650000000000000000E-16 " " relative error = 1.12643110786603410000000000000E-13 "%" Correct digits = 15 h = 1.000E-3 " " "NO POLE" " " "TOP MAIN SOLVE Loop" x[1] = 0.4490000000000003 " " y[1] (analytic) = 9.8712977986666700E-2 " " y[1] (numeric) = 9.87129779866668100E-2 " " absolute error = 1.11022302462515650000000000000000E-16 " " relative error = 1.12469813723491950000000000000E-13 "%" Correct digits = 15 h = 1.000E-3 " " "NO POLE" " " "TOP MAIN SOLVE Loop" x[1] = 0.4500000000000003 " " y[1] (analytic) = 9.88650000000000500E-2 " " y[1] (numeric) = 9.88650000000001500E-2 " " absolute error = 9.7144514654701200000000000000000E-17 " " relative error = 9.82597629643464800000000000000E-14 "%" Correct digits = 16 h = 1.000E-3 " " "NO POLE" " " "TOP MAIN SOLVE Loop" x[1] = 0.4510000000000003 " " y[1] (analytic) = 9.90171780133333700E-2 " " y[1] (numeric) = 9.90171780133334800E-2 " " absolute error = 1.11022302462515650000000000000000E-16 " " relative error = 1.12124284583797880000000000000E-13 "%" Correct digits = 15 h = 1.000E-3 " " "NO POLE" " " "TOP MAIN SOLVE Loop" x[1] = 0.4520000000000003 " " y[1] (analytic) = 9.91695121066667400E-2 " " y[1] (numeric) = 9.91695121066668100E-2 " " absolute error = 8.32667268468867400000000000000000E-17 " " relative error = 8.39640380173747800000000000000E-14 "%" Correct digits = 16 h = 1.000E-3 " " "NO POLE" " " "TOP MAIN SOLVE Loop" x[1] = 0.4530000000000003 " " y[1] (analytic) = 9.93220023600000500E-2 " " y[1] (numeric) = 9.93220023600001500E-2 " " absolute error = 9.7144514654701200000000000000000E-17 " " relative error = 9.78076482012450900000000000000E-14 "%" Correct digits = 16 h = 1.000E-3 " " "NO POLE" " " "TOP MAIN SOLVE Loop" x[1] = 0.4540000000000003 " " y[1] (analytic) = 9.94746488533333600E-2 " " y[1] (numeric) = 9.94746488533334800E-2 " " absolute error = 1.2490009027033011000000000000000E-16 " " relative error = 1.2555971969751240000000000000E-13 "%" Correct digits = 15 h = 1.000E-3 " " "NO POLE" " " "TOP MAIN SOLVE Loop" x[1] = 0.4550000000000003 " " y[1] (analytic) = 9.96274516666667100E-2 " " y[1] (numeric) = 9.96274516666668200E-2 " " absolute error = 1.11022302462515650000000000000000E-16 " " relative error = 1.11437460865679680000000000000E-13 "%" Correct digits = 15 h = 1.000E-3 " " "NO POLE" " " "TOP MAIN SOLVE Loop" x[1] = 0.4560000000000003 " " y[1] (analytic) = 9.97804108800000300E-2 " " y[1] (numeric) = 9.97804108800001600E-2 " " absolute error = 1.2490009027033011000000000000000E-16 " " relative error = 1.25174960865354650000000000000E-13 "%" Correct digits = 15 h = 1.000E-3 " " "NO POLE" " " "TOP MAIN SOLVE Loop" x[1] = 0.4570000000000003 " " y[1] (analytic) = 9.9933526573333410E-2 " " y[1] (numeric) = 9.99335265733334900E-2 " " absolute error = 8.32667268468867400000000000000000E-17 " " relative error = 8.33221139111745400000000000000E-14 "%" Correct digits = 16 h = 1.000E-3 " " "NO POLE" " " "TOP MAIN SOLVE Loop" x[1] = 0.4580000000000003 " " y[1] (analytic) = 0.10008679882666673 " " y[1] (numeric) = 0.10008679882666682 " " absolute error = 9.7144514654701200000000000000000E-17 " " relative error = 9.70602674813677900000000000000E-14 "%" Correct digits = 16 h = 1.000E-3 " " "NO POLE" " " "TOP MAIN SOLVE Loop" x[1] = 0.4590000000000003 " " y[1] (analytic) = 0.10024022772000003 " " y[1] (numeric) = 0.10024022772000016 " " absolute error = 1.2490009027033011000000000000000E-16 " " relative error = 1.24600764694202630000000000000E-13 "%" Correct digits = 15 h = 1.000E-3 " " "NO POLE" " " "TOP MAIN SOLVE Loop" x[1] = 0.4600000000000003 " " y[1] (analytic) = 0.10039381333333339 " " y[1] (numeric) = 0.1003938133333335 " " absolute error = 1.11022302462515650000000000000000E-16 " " relative error = 1.10586796911372350000000000000E-13 "%" Correct digits = 15 h = 1.000E-3 " " "NO POLE" " " "TOP MAIN SOLVE Loop" x[1] = 0.4610000000000003 " " y[1] (analytic) = 0.10054755574666671 " " y[1] (numeric) = 0.10054755574666684 " " absolute error = 1.2490009027033011000000000000000E-16 " " relative error = 1.2421991697642110000000000000E-13 "%" Correct digits = 15 h = 1.000E-3 " " "NO POLE" " " "TOP MAIN SOLVE Loop" x[1] = 0.4620000000000003 " " y[1] (analytic) = 0.10070145504000008 " " y[1] (numeric) = 0.10070145504000017 " " absolute error = 8.32667268468867400000000000000000E-17 " " relative error = 8.26867167051478900000000000000E-14 "%" Correct digits = 16 h = 1.000E-3 " " "NO POLE" " " "TOP MAIN SOLVE Loop" x[1] = 0.4630000000000003 " " y[1] (analytic) = 0.10085551129333338 " " y[1] (numeric) = 0.1008555112933335 " " absolute error = 1.2490009027033011000000000000000E-16 " " relative error = 1.238406197823580000000000000E-13 "%" Correct digits = 15 h = 1.000E-3 " " "NO POLE" " " "TOP MAIN SOLVE Loop" x[1] = 0.4640000000000003 " " y[1] (analytic) = 0.10100972458666671 " " y[1] (numeric) = 0.10100972458666684 " " absolute error = 1.2490009027033011000000000000000E-16 " " relative error = 1.2365155016650439000000000000E-13 "%" Correct digits = 15 h = 1.000E-3 " " "NO POLE" " " "TOP MAIN SOLVE Loop" x[1] = 0.4650000000000003 " " y[1] (analytic) = 0.10116409500000005 " " y[1] (numeric) = 0.10116409500000016 " " absolute error = 1.11022302462515650000000000000000E-16 " " relative error = 1.0974476909274540000000000000E-13 "%" Correct digits = 15 h = 1.000E-3 " " "NO POLE" " " "TOP MAIN SOLVE Loop" x[1] = 0.4660000000000003 " " y[1] (analytic) = 0.10131862261333337 " " y[1] (numeric) = 0.10131862261333349 " " absolute error = 1.2490009027033011000000000000000E-16 " " relative error = 1.2327456399302990000000000000E-13 "%" Correct digits = 15 h = 1.000E-3 " " "NO POLE" " " "TOP MAIN SOLVE Loop" x[1] = 0.4670000000000003 " " y[1] (analytic) = 0.10147330750666675 " " y[1] (numeric) = 0.10147330750666683 " " absolute error = 8.32667268468867400000000000000000E-17 " " relative error = 8.20577636551525200000000000000E-14 "%" Correct digits = 16 h = 1.000E-3 " " "NO POLE" " " "TOP MAIN SOLVE Loop" x[1] = 0.4680000000000003 " " y[1] (analytic) = 0.10162814976000005 " " y[1] (numeric) = 0.10162814976000016 " " absolute error = 1.11022302462515650000000000000000E-16 " " relative error = 1.09243652201383530000000000000E-13 "%" Correct digits = 15 h = 1.000E-3 " " "NO POLE" " " "TOP MAIN SOLVE Loop" x[1] = 0.4690000000000003 " " y[1] (analytic) = 0.10178314945333337 " " y[1] (numeric) = 0.1017831494533335 " " absolute error = 1.2490009027033011000000000000000E-16 " " relative error = 1.22711952755594040000000000000E-13 "%" Correct digits = 15 h = 1.000E-3 " " "NO POLE" " " "TOP MAIN SOLVE Loop" x[1] = 0.4700000000000003 " " y[1] (analytic) = 0.10193830666666673 " " y[1] (numeric) = 0.10193830666666684 " " absolute error = 1.11022302462515650000000000000000E-16 " " relative error = 1.08911268092330750000000000000E-13 "%" Correct digits = 15 h = 1.000E-3 " " "NO POLE" " " "TOP MAIN SOLVE Loop" x[1] = 0.4710000000000003 " " y[1] (analytic) = 0.10209362148000004 " " y[1] (numeric) = 0.10209362148000017 " " absolute error = 1.38777878078144570000000000000000E-16 " " relative error = 1.35931977009289380000000000000E-13 "%" Correct digits = 15 h = 1.000E-3 " " "NO POLE" " " "TOP MAIN SOLVE Loop" x[1] = 0.4720000000000003 " " y[1] (analytic) = 0.1022490939733334 " " y[1] (numeric) = 0.10224909397333351 " " absolute error = 1.11022302462515650000000000000000E-16 " " relative error = 1.0858023103018430000000000000E-13 "%" Correct digits = 15 h = 1.000E-3 " " "NO POLE" " " "TOP MAIN SOLVE Loop" x[1] = 0.4730000000000003 " " y[1] (analytic) = 0.10240472422666672 " " y[1] (numeric) = 0.10240472422666684 " " absolute error = 1.2490009027033011000000000000000E-16 " " relative error = 1.21967117448479490000000000000E-13 "%" Correct digits = 15 h = 1.000E-3 " " "NO POLE" " " "TOP MAIN SOLVE Loop" x[1] = 0.4740000000000003 " " y[1] (analytic) = 0.10256051232000003 " " y[1] (numeric) = 0.10256051232000017 " " absolute error = 1.38777878078144570000000000000000E-16 " " relative error = 1.35313167747390330000000000000E-13 "%" Correct digits = 15 h = 1.000E-3 " " "NO POLE" " " "TOP MAIN SOLVE Loop" x[1] = 0.4750000000000003 " " y[1] (analytic) = 0.1027164583333334 " " y[1] (numeric) = 0.10271645833333351 " " absolute error = 1.11022302462515650000000000000000E-16 " " relative error = 1.08086186248973160000000000000E-13 "%" Correct digits = 15 h = 1.000E-3 " " "NO POLE" " " "TOP MAIN SOLVE Loop" x[1] = 0.4760000000000003 " " y[1] (analytic) = 0.10287256234666671 " " y[1] (numeric) = 0.10287256234666685 " " absolute error = 1.38777878078144570000000000000000E-16 " " relative error = 1.34902713524799520000000000000E-13 "%" Correct digits = 15 h = 1.000E-3 " " "NO POLE" " " "TOP MAIN SOLVE Loop" x[1] = 0.4770000000000003 " " y[1] (analytic) = 0.10302882444000007 " " y[1] (numeric) = 0.10302882444000018 " " absolute error = 1.11022302462515650000000000000000E-16 " " relative error = 1.07758487069966210000000000000E-13 "%" Correct digits = 15 h = 1.000E-3 " " "NO POLE" " " "TOP MAIN SOLVE Loop" x[1] = 0.4780000000000003 " " y[1] (analytic) = 0.10318524469333339 " " y[1] (numeric) = 0.10318524469333351 " " absolute error = 1.2490009027033011000000000000000E-16 " " relative error = 1.21044525931525620000000000000E-13 "%" Correct digits = 15 h = 1.000E-3 " " "NO POLE" " " "TOP MAIN SOLVE Loop" x[1] = 0.4790000000000003 " " y[1] (analytic) = 0.10334182318666671 " " y[1] (numeric) = 0.10334182318666685 " " absolute error = 1.38777878078144570000000000000000E-16 " " relative error = 1.34290139073189730000000000000E-13 "%" Correct digits = 15 h = 1.000E-3 " " "NO POLE" " " "TOP MAIN SOLVE Loop" x[1] = 0.4800000000000003 " " y[1] (analytic) = 0.10349856000000007 " " y[1] (numeric) = 0.10349856000000018 " " absolute error = 1.11022302462515650000000000000000E-16 " " relative error = 1.07269417528626070000000000000E-13 "%" Correct digits = 15 h = 1.000E-3 " " "NO POLE" " " "TOP MAIN SOLVE Loop" x[1] = 0.4810000000000003 " " y[1] (analytic) = 0.10365545521333339 " " y[1] (numeric) = 0.10365545521333351 " " absolute error = 1.2490009027033011000000000000000E-16 " " relative error = 1.2049543365882010000000000000E-13 "%" Correct digits = 15 h = 1.000E-3 " " "NO POLE" " " "TOP MAIN SOLVE Loop" x[1] = 0.4820000000000003 " " y[1] (analytic) = 0.10381250890666674 " " y[1] (numeric) = 0.10381250890666685 " " absolute error = 1.11022302462515650000000000000000E-16 " " relative error = 1.06945014268300680000000000000E-13 "%" Correct digits = 15 h = 1.000E-3 " " "NO POLE" " " "TOP MAIN SOLVE Loop" x[1] = 0.4830000000000003 " " y[1] (analytic) = 0.10396972116000006 " " y[1] (numeric) = 0.10396972116000018 " " absolute error = 1.2490009027033011000000000000000E-16 " " relative error = 1.20131215970195870000000000000E-13 "%" Correct digits = 15 h = 1.000E-3 " " "NO POLE" " " "TOP MAIN SOLVE Loop" x[1] = 0.4840000000000003 " " y[1] (analytic) = 0.10412709205333338 " " y[1] (numeric) = 0.10412709205333351 " " absolute error = 1.2490009027033011000000000000000E-16 " " relative error = 1.19949657488136620000000000000E-13 "%" Correct digits = 15 h = 1.000E-3 " " "NO POLE" " " "TOP MAIN SOLVE Loop" x[1] = 0.4850000000000003 " " y[1] (analytic) = 0.10428462166666673 " " y[1] (numeric) = 0.10428462166666684 " " absolute error = 1.11022302462515650000000000000000E-16 " " relative error = 1.06460857495734240000000000000E-13 "%" Correct digits = 15 h = 1.000E-3 " " "NO POLE" " " "TOP MAIN SOLVE Loop" x[1] = 0.4860000000000003 " " y[1] (analytic) = 0.10444231008000004 " " y[1] (numeric) = 0.10444231008000017 " " absolute error = 1.2490009027033011000000000000000E-16 " " relative error = 1.1958763663371670000000000000E-13 "%" Correct digits = 15 h = 1.000E-3 " " "NO POLE" " " "TOP MAIN SOLVE Loop" x[1] = 0.4870000000000003 " " y[1] (analytic) = 0.10460015737333342 " " y[1] (numeric) = 0.1046001573733335 " " absolute error = 8.32667268468867400000000000000000E-17 " " relative error = 7.96047816158588600000000000000E-14 "%" Correct digits = 16 h = 1.000E-3 " " "NO POLE" " " "TOP MAIN SOLVE Loop" x[1] = 0.4880000000000003 " " y[1] (analytic) = 0.10475816362666672 " " y[1] (numeric) = 0.10475816362666683 " " absolute error = 1.11022302462515650000000000000000E-16 " " relative error = 1.05979618789589360000000000000E-13 "%" Correct digits = 15 h = 1.000E-3 " " "NO POLE" " " "TOP MAIN SOLVE Loop" x[1] = 0.4890000000000003 " " y[1] (analytic) = 0.10491632892000002 " " y[1] (numeric) = 0.10491632892000016 " " absolute error = 1.38777878078144570000000000000000E-16 " " relative error = 1.32274813183717450000000000000E-13 "%" Correct digits = 15 h = 1.000E-3 " " "NO POLE" " " "TOP MAIN SOLVE Loop" x[1] = 0.4900000000000003 " " y[1] (analytic) = 0.1050746533333334 " " y[1] (numeric) = 0.10507465333333349 " " absolute error = 8.32667268468867400000000000000000E-17 " " relative error = 7.92453024638926800000000000000E-14 "%" Correct digits = 16 h = 1.000E-3 " " "NO POLE" " " "TOP MAIN SOLVE Loop" x[1] = 0.4910000000000003 " " y[1] (analytic) = 0.10523313694666671 " " y[1] (numeric) = 0.10523313694666682 " " absolute error = 1.11022302462515650000000000000000E-16 " " relative error = 1.05501276198563730000000000000E-13 "%" Correct digits = 15 h = 1.000E-3 " " "NO POLE" " " "TOP MAIN SOLVE Loop" x[1] = 0.4920000000000003 " " y[1] (analytic) = 0.10539177984000009 " " y[1] (numeric) = 0.10539177984000016 " " absolute error = 6.93889390390722800000000000000000E-17 " " relative error = 6.58390428024032700000000000000E-14 "%" Correct digits = 16 h = 1.000E-3 " " "NO POLE" " " "TOP MAIN SOLVE Loop" x[1] = 0.4930000000000003 " " y[1] (analytic) = 0.1055505820933334 " " y[1] (numeric) = 0.1055505820933335 " " absolute error = 9.7144514654701200000000000000000E-17 " " relative error = 9.20359819226774900000000000000E-14 "%" Correct digits = 16 h = 1.000E-3 " " "NO POLE" " " "TOP MAIN SOLVE Loop" x[1] = 0.4940000000000003 " " y[1] (analytic) = 0.10570954378666671 " " y[1] (numeric) = 0.10570954378666683 " " absolute error = 1.2490009027033011000000000000000E-16 " " relative error = 1.18154033965364560000000000000E-13 "%" Correct digits = 15 h = 1.000E-3 " " "NO POLE" " " "TOP MAIN SOLVE Loop" x[1] = 0.49500000000000033 " " y[1] (analytic) = 0.10586866500000007 " " y[1] (numeric) = 0.10586866500000017 " " absolute error = 9.7144514654701200000000000000000E-17 " " relative error = 9.1759459377995500000000000000E-14 "%" Correct digits = 16 h = 1.000E-3 " " "NO POLE" " " "TOP MAIN SOLVE Loop" x[1] = 0.49600000000000033 " " y[1] (analytic) = 0.1060279458133334 " " y[1] (numeric) = 0.1060279458133335 " " absolute error = 9.7144514654701200000000000000000E-17 " " relative error = 9.16216134430522200000000000000E-14 "%" Correct digits = 16 h = 1.000E-3 " " "NO POLE" " " "TOP MAIN SOLVE Loop" x[1] = 0.49700000000000033 " " y[1] (analytic) = 0.10618738630666674 " " y[1] (numeric) = 0.10618738630666683 " " absolute error = 8.32667268468867400000000000000000E-17 " " relative error = 7.84148944079048400000000000000E-14 "%" Correct digits = 16 h = 1.000E-3 " " "NO POLE" " " "TOP MAIN SOLVE Loop" x[1] = 0.49800000000000033 " " y[1] (analytic) = 0.10634698656000005 " " y[1] (numeric) = 0.10634698656000016 " " absolute error = 1.11022302462515650000000000000000E-16 " " relative error = 1.04396284327133090000000000000E-13 "%" Correct digits = 15 h = 1.000E-3 " " "NO POLE" " " "TOP MAIN SOLVE Loop" x[1] = 0.49900000000000033 " " y[1] (analytic) = 0.10650674665333339 " " y[1] (numeric) = 0.1065067466533335 " " absolute error = 1.11022302462515650000000000000000E-16 " " relative error = 1.04239689926761030000000000000E-13 "%" Correct digits = 15 h = 1.000E-3 " " "NO POLE" " " "TOP MAIN SOLVE Loop" x[1] = 0.5000000000000003 " " y[1] (analytic) = 0.10666666666666672 " " y[1] (numeric) = 0.10666666666666683 " " absolute error = 1.11022302462515650000000000000000E-16 " " relative error = 1.04083408558608370000000000000E-13 "%" Correct digits = 15 h = 1.000E-3 " " "NO POLE" " " "TOP MAIN SOLVE Loop" x[1] = 0.5010000000000003 " " y[1] (analytic) = 0.10682674668000004 " " y[1] (numeric) = 0.10682674668000015 " " absolute error = 1.11022302462515650000000000000000E-16 " " relative error = 1.03927439440876550000000000000E-13 "%" Correct digits = 15 h = 1.000E-3 " " "NO POLE" " " "TOP MAIN SOLVE Loop" x[1] = 0.5020000000000003 " " y[1] (analytic) = 0.1069869867733334 " " y[1] (numeric) = 0.10698698677333349 " " absolute error = 8.32667268468867400000000000000000E-17 " " relative error = 7.78288363455816500000000000000E-14 "%" Correct digits = 16 h = 1.000E-3 " " "NO POLE" " " "TOP MAIN SOLVE Loop" x[1] = 0.5030000000000003 " " y[1] (analytic) = 0.10714738702666672 " " y[1] (numeric) = 0.10714738702666682 " " absolute error = 9.7144514654701200000000000000000E-17 " " relative error = 9.0664380486034600000000000000E-14 "%" Correct digits = 16 h = 1.000E-3 " " "NO POLE" " " "TOP MAIN SOLVE Loop" x[1] = 0.5040000000000003 " " y[1] (analytic) = 0.10730794752000004 " " y[1] (numeric) = 0.10730794752000015 " " absolute error = 1.11022302462515650000000000000000E-16 " " relative error = 1.03461397807299720000000000000E-13 "%" Correct digits = 15 h = 1.000E-3 " " "NO POLE" " " "TOP MAIN SOLVE Loop" x[1] = 0.5050000000000003 " " y[1] (analytic) = 0.10746866833333339 " " y[1] (numeric) = 0.10746866833333349 " " absolute error = 9.7144514654701200000000000000000E-17 " " relative error = 9.0393336179983200000000000000E-14 "%" Correct digits = 16 h = 1.000E-3 " " "NO POLE" " " "TOP MAIN SOLVE Loop" x[1] = 0.5060000000000003 " " y[1] (analytic) = 0.1076295495466667 " " y[1] (numeric) = 0.10762954954666683 " " absolute error = 1.2490009027033011000000000000000E-16 " " relative error = 1.16046281710186970000000000000E-13 "%" Correct digits = 15 h = 1.000E-3 " " "NO POLE" " " "TOP MAIN SOLVE Loop" x[1] = 0.5070000000000003 " " y[1] (analytic) = 0.10779059124000008 " " y[1] (numeric) = 0.10779059124000016 " " absolute error = 8.32667268468867400000000000000000E-17 " " relative error = 7.72486038799898900000000000000E-14 "%" Correct digits = 16 h = 1.000E-3 " " "NO POLE" " " "TOP MAIN SOLVE Loop" x[1] = 0.5080000000000003 " " y[1] (analytic) = 0.10795179349333338 " " y[1] (numeric) = 0.1079517934933335 " " absolute error = 1.2490009027033011000000000000000E-16 " " relative error = 1.15699875128099080000000000000E-13 "%" Correct digits = 15 h = 1.000E-3 " " "NO POLE" " " "TOP MAIN SOLVE Loop" x[1] = 0.5090000000000003 " " y[1] (analytic) = 0.1081131563866667 " " y[1] (numeric) = 0.10811315638666684 " " absolute error = 1.38777878078144570000000000000000E-16 " " relative error = 1.28363543084252850000000000000E-13 "%" Correct digits = 15 h = 1.000E-3 " " "NO POLE" " " "TOP MAIN SOLVE Loop" x[1] = 0.5100000000000003 " " y[1] (analytic) = 0.10827468000000007 " " y[1] (numeric) = 0.10827468000000018 " " absolute error = 1.11022302462515650000000000000000E-16 " " relative error = 1.02537640806249050000000000000E-13 "%" Correct digits = 15 h = 1.000E-3 " " "NO POLE" " " "TOP MAIN SOLVE Loop" x[1] = 0.5110000000000003 " " y[1] (analytic) = 0.10843636441333337 " " y[1] (numeric) = 0.10843636441333351 " " absolute error = 1.38777878078144570000000000000000E-16 " " relative error = 1.27980939631244570000000000000E-13 "%" Correct digits = 15 h = 1.000E-3 " " "NO POLE" " " "TOP MAIN SOLVE Loop" x[1] = 0.5120000000000003 " " y[1] (analytic) = 0.10859820970666677 " " y[1] (numeric) = 0.10859820970666685 " " absolute error = 8.32667268468867400000000000000000E-17 " " relative error = 7.66741248053696500000000000000E-14 "%" Correct digits = 16 h = 1.000E-3 " " "NO POLE" " " "TOP MAIN SOLVE Loop" x[1] = 0.5130000000000003 " " y[1] (analytic) = 0.10876021596000006 " " y[1] (numeric) = 0.10876021596000018 " " absolute error = 1.2490009027033011000000000000000E-16 " " relative error = 1.14839869678326130000000000000E-13 "%" Correct digits = 15 h = 1.000E-3 " " "NO POLE" " " "TOP MAIN SOLVE Loop" x[1] = 0.5140000000000003 " " y[1] (analytic) = 0.10892238325333338 " " y[1] (numeric) = 0.10892238325333352 " " absolute error = 1.38777878078144570000000000000000E-16 " " relative error = 1.2740988025883790000000000000E-13 "%" Correct digits = 15 h = 1.000E-3 " " "NO POLE" " " "TOP MAIN SOLVE Loop" x[1] = 0.5150000000000003 " " y[1] (analytic) = 0.10908471166666672 " " y[1] (numeric) = 0.10908471166666685 " " absolute error = 1.2490009027033011000000000000000E-16 " " relative error = 1.1449825402847550000000000000E-13 "%" Correct digits = 15 h = 1.000E-3 " " "NO POLE" " " "TOP MAIN SOLVE Loop" x[1] = 0.5160000000000003 " " y[1] (analytic) = 0.10924720128000005 " " y[1] (numeric) = 0.10924720128000018 " " absolute error = 1.2490009027033011000000000000000E-16 " " relative error = 1.14327954223936390000000000000E-13 "%" Correct digits = 15 h = 1.000E-3 " " "NO POLE" " " "TOP MAIN SOLVE Loop" x[1] = 0.5170000000000003 " " y[1] (analytic) = 0.10940985217333342 " " y[1] (numeric) = 0.10940985217333352 " " absolute error = 9.7144514654701200000000000000000E-17 " " relative error = 8.8789549318464700000000000000E-14 "%" Correct digits = 16 h = 1.000E-3 " " "NO POLE" " " "TOP MAIN SOLVE Loop" x[1] = 0.5180000000000003 " " y[1] (analytic) = 0.10957266442666673 " " y[1] (numeric) = 0.10957266442666685 " " absolute error = 1.2490009027033011000000000000000E-16 " " relative error = 1.1398836646335411000000000000E-13 "%" Correct digits = 15 h = 1.000E-3 " " "NO POLE" " " "TOP MAIN SOLVE Loop" x[1] = 0.5190000000000003 " " y[1] (analytic) = 0.10973563812000006 " " y[1] (numeric) = 0.10973563812000019 " " absolute error = 1.2490009027033011000000000000000E-16 " " relative error = 1.13819076837870250000000000000E-13 "%" Correct digits = 15 h = 1.000E-3 " " "NO POLE" " " "TOP MAIN SOLVE Loop" x[1] = 0.5200000000000004 " " y[1] (analytic) = 0.10989877333333341 " " y[1] (numeric) = 0.10989877333333352 " " absolute error = 1.11022302462515650000000000000000E-16 " " relative error = 1.01022330909713130000000000000E-13 "%" Correct digits = 15 h = 1.000E-3 " " "NO POLE" " " "TOP MAIN SOLVE Loop" x[1] = 0.5210000000000004 " " y[1] (analytic) = 0.11006207014666673 " " y[1] (numeric) = 0.11006207014666686 " " absolute error = 1.2490009027033011000000000000000E-16 " " relative error = 1.13481501941486750000000000000E-13 "%" Correct digits = 15 h = 1.000E-3 " " "NO POLE" " " "TOP MAIN SOLVE Loop" x[1] = 0.5220000000000004 " " y[1] (analytic) = 0.11022552864000008 " " y[1] (numeric) = 0.1102255286400002 " " absolute error = 1.11022302462515650000000000000000E-16 " " relative error = 1.0072285779197110000000000000E-13 "%" Correct digits = 15 h = 1.000E-3 " " "NO POLE" " " "TOP MAIN SOLVE Loop" x[1] = 0.5230000000000004 " " y[1] (analytic) = 0.1103891488933334 " " y[1] (numeric) = 0.11038914889333352 " " absolute error = 1.2490009027033011000000000000000E-16 " " relative error = 1.1314526067323730000000000000E-13 "%" Correct digits = 15 h = 1.000E-3 " " "NO POLE" " " "TOP MAIN SOLVE Loop" x[1] = 0.5240000000000004 " " y[1] (analytic) = 0.11055293098666671 " " y[1] (numeric) = 0.11055293098666685 " " absolute error = 1.38777878078144570000000000000000E-16 " " relative error = 1.25530708991226950000000000000E-13 "%" Correct digits = 15 h = 1.000E-3 " " "NO POLE" " " "TOP MAIN SOLVE Loop" x[1] = 0.5250000000000004 " " y[1] (analytic) = 0.11071687500000006 " " y[1] (numeric) = 0.11071687500000019 " " absolute error = 1.2490009027033011000000000000000E-16 " " relative error = 1.12810346453808450000000000000E-13 "%" Correct digits = 15 h = 1.000E-3 " " "NO POLE" " " "TOP MAIN SOLVE Loop" x[1] = 0.5260000000000004 " " y[1] (analytic) = 0.11088098101333341 " " y[1] (numeric) = 0.11088098101333352 " " absolute error = 1.11022302462515650000000000000000E-16 " " relative error = 1.00127453281789820000000000000E-13 "%" Correct digits = 15 h = 1.000E-3 " " "NO POLE" " " "TOP MAIN SOLVE Loop" x[1] = 0.5270000000000004 " " y[1] (analytic) = 0.11104524910666674 " " y[1] (numeric) = 0.11104524910666685 " " absolute error = 1.11022302462515650000000000000000E-16 " " relative error = 9.99793357713763500000000000000E-14 "%" Correct digits = 16 h = 1.000E-3 " " "NO POLE" " " "TOP MAIN SOLVE Loop" x[1] = 0.5280000000000004 " " y[1] (analytic) = 0.11120967936000005 " " y[1] (numeric) = 0.11120967936000019 " " absolute error = 1.38777878078144570000000000000000E-16 " " relative error = 1.2478938782738750000000000000E-13 "%" Correct digits = 15 h = 1.000E-3 " " "NO POLE" " " "TOP MAIN SOLVE Loop" x[1] = 0.5290000000000004 " " y[1] (analytic) = 0.11137427185333337 " " y[1] (numeric) = 0.11137427185333353 " " absolute error = 1.52655665885959020000000000000000E-16 " " relative error = 1.37065467046992960000000000000E-13 "%" Correct digits = 15 h = 1.000E-3 " " "NO POLE" " " "TOP MAIN SOLVE Loop" x[1] = 0.5300000000000004 " " y[1] (analytic) = 0.11153902666666674 " " y[1] (numeric) = 0.11153902666666686 " " absolute error = 1.2490009027033011000000000000000E-16 " " relative error = 1.1197882391747310000000000000E-13 "%" Correct digits = 15 h = 1.000E-3 " " "NO POLE" " " "TOP MAIN SOLVE Loop" x[1] = 0.5310000000000004 " " y[1] (analytic) = 0.11170394388000006 " " y[1] (numeric) = 0.1117039438800002 " " absolute error = 1.38777878078144570000000000000000E-16 " " relative error = 1.24237223197087080000000000000E-13 "%" Correct digits = 15 h = 1.000E-3 " " "NO POLE" " " "TOP MAIN SOLVE Loop" x[1] = 0.5320000000000004 " " y[1] (analytic) = 0.11186902357333342 " " y[1] (numeric) = 0.11186902357333353 " " absolute error = 1.11022302462515650000000000000000E-16 " " relative error = 9.92431138810622400000000000000E-14 "%" Correct digits = 16 h = 1.000E-3 " " "NO POLE" " " "TOP MAIN SOLVE Loop" x[1] = 0.5330000000000004 " " y[1] (analytic) = 0.11203426582666673 " " y[1] (numeric) = 0.11203426582666687 " " absolute error = 1.38777878078144570000000000000000E-16 " " relative error = 1.23870922038132570000000000000E-13 "%" Correct digits = 15 h = 1.000E-3 " " "NO POLE" " " "TOP MAIN SOLVE Loop" x[1] = 0.5340000000000004 " " y[1] (analytic) = 0.11219967072000003 " " y[1] (numeric) = 0.1121996707200002 " " absolute error = 1.66533453693773480000000000000000E-16 " " relative error = 1.48425973646006650000000000000E-13 "%" Correct digits = 15 h = 1.000E-3 " " "NO POLE" " " "TOP MAIN SOLVE Loop" x[1] = 0.5350000000000004 " " y[1] (analytic) = 0.11236523833333341 " " y[1] (numeric) = 0.11236523833333353 " " absolute error = 1.2490009027033011000000000000000E-16 " " relative error = 1.11155453521855090000000000000E-13 "%" Correct digits = 15 h = 1.000E-3 " " "NO POLE" " " "TOP MAIN SOLVE Loop" x[1] = 0.5360000000000004 " " y[1] (analytic) = 0.11253096874666672 " " y[1] (numeric) = 0.11253096874666686 " " absolute error = 1.38777878078144570000000000000000E-16 " " relative error = 1.2332416544868260000000000000E-13 "%" Correct digits = 15 h = 1.000E-3 " " "NO POLE" " " "TOP MAIN SOLVE Loop" x[1] = 0.5370000000000004 " " y[1] (analytic) = 0.11269686204000008 " " y[1] (numeric) = 0.11269686204000019 " " absolute error = 1.11022302462515650000000000000000E-16 " " relative error = 9.85141027468093400000000000000E-14 "%" Correct digits = 16 h = 1.000E-3 " " "NO POLE" " " "TOP MAIN SOLVE Loop" x[1] = 0.5380000000000004 " " y[1] (analytic) = 0.1128629182933334 " " y[1] (numeric) = 0.11286291829333353 " " absolute error = 1.2490009027033011000000000000000E-16 " " relative error = 1.10665302792996910000000000000E-13 "%" Correct digits = 15 h = 1.000E-3 " " "NO POLE" " " "TOP MAIN SOLVE Loop" x[1] = 0.5390000000000004 " " y[1] (analytic) = 0.11302913758666672 " " y[1] (numeric) = 0.11302913758666687 " " absolute error = 1.52655665885959020000000000000000E-16 " " relative error = 1.35058684110464950000000000000E-13 "%" Correct digits = 15 h = 1.000E-3 " " "NO POLE" " " "TOP MAIN SOLVE Loop" x[1] = 0.5400000000000004 " " y[1] (analytic) = 0.11319552000000006 " " y[1] (numeric) = 0.1131955200000002 " " absolute error = 1.38777878078144570000000000000000E-16 " " relative error = 1.2260015067570210000000000000E-13 "%" Correct digits = 15 h = 1.000E-3 " " "NO POLE" " " "TOP MAIN SOLVE Loop" x[1] = 0.5410000000000004 " " y[1] (analytic) = 0.11336206561333338 " " y[1] (numeric) = 0.11336206561333353 " " absolute error = 1.52655665885959020000000000000000E-16 " " relative error = 1.3466203624645670000000000000E-13 "%" Correct digits = 15 h = 1.000E-3 " " "NO POLE" " " "TOP MAIN SOLVE Loop" x[1] = 0.5420000000000004 " " y[1] (analytic) = 0.11352877450666675 " " y[1] (numeric) = 0.11352877450666687 " " absolute error = 1.2490009027033011000000000000000E-16 " " relative error = 1.10016241092248920000000000000E-13 "%" Correct digits = 15 h = 1.000E-3 " " "NO POLE" " " "TOP MAIN SOLVE Loop" x[1] = 0.5430000000000004 " " y[1] (analytic) = 0.11369564676000007 " " y[1] (numeric) = 0.11369564676000021 " " absolute error = 1.38777878078144570000000000000000E-16 " " relative error = 1.22060854599904360000000000000E-13 "%" Correct digits = 15 h = 1.000E-3 " " "NO POLE" " " "TOP MAIN SOLVE Loop" x[1] = 0.5440000000000004 " " y[1] (analytic) = 0.11386268245333338 " " y[1] (numeric) = 0.11386268245333354 " " absolute error = 1.66533453693773480000000000000000E-16 " " relative error = 1.46258150700100700000000000000E-13 "%" Correct digits = 15 h = 1.000E-3 " " "NO POLE" " " "TOP MAIN SOLVE Loop" x[1] = 0.5450000000000004 " " y[1] (analytic) = 0.11402988166666675 " " y[1] (numeric) = 0.11402988166666687 " " absolute error = 1.2490009027033011000000000000000E-16 " " relative error = 1.09532771975892480000000000000E-13 "%" Correct digits = 15 h = 1.000E-3 " " "NO POLE" " " "TOP MAIN SOLVE Loop" x[1] = 0.5460000000000004 " " y[1] (analytic) = 0.11419724448000007 " " y[1] (numeric) = 0.11419724448000021 " " absolute error = 1.38777878078144570000000000000000E-16 " " relative error = 1.21524716914206650000000000000E-13 "%" Correct digits = 15 h = 1.000E-3 " " "NO POLE" " " "TOP MAIN SOLVE Loop" x[1] = 0.5470000000000004 " " y[1] (analytic) = 0.11436477097333342 " " y[1] (numeric) = 0.11436477097333354 " " absolute error = 1.2490009027033011000000000000000E-16 " " relative error = 1.09212031998431780000000000000E-13 "%" Correct digits = 15 h = 1.000E-3 " " "NO POLE" " " "TOP MAIN SOLVE Loop" x[1] = 0.5480000000000004 " " y[1] (analytic) = 0.11453246122666674 " " y[1] (numeric) = 0.11453246122666688 " " absolute error = 1.38777878078144570000000000000000E-16 " " relative error = 1.21169035041947340000000000000E-13 "%" Correct digits = 15 h = 1.000E-3 " " "NO POLE" " " "TOP MAIN SOLVE Loop" x[1] = 0.5490000000000004 " " y[1] (analytic) = 0.11470031532000004 " " y[1] (numeric) = 0.11470031532000022 " " absolute error = 1.80411241501587940000000000000000E-16 " " relative error = 1.57289228890315020000000000000E-13 "%" Correct digits = 15 h = 1.000E-3 " " "NO POLE" " " "TOP MAIN SOLVE Loop" x[1] = 0.5500000000000004 " " y[1] (analytic) = 0.11486833333333342 " " y[1] (numeric) = 0.11486833333333354 " " absolute error = 1.2490009027033011000000000000000E-16 " " relative error = 1.08733265858298650000000000000E-13 "%" Correct digits = 15 h = 1.000E-3 " " "NO POLE" " " "TOP MAIN SOLVE Loop" x[1] = 0.5510000000000004 " " y[1] (analytic) = 0.11503651534666674 " " y[1] (numeric) = 0.11503651534666688 " " absolute error = 1.38777878078144570000000000000000E-16 " " relative error = 1.20638110133927780000000000000E-13 "%" Correct digits = 15 h = 1.000E-3 " " "NO POLE" " " "TOP MAIN SOLVE Loop" x[1] = 0.5520000000000004 " " y[1] (analytic) = 0.11520486144000008 " " y[1] (numeric) = 0.11520486144000021 " " absolute error = 1.2490009027033011000000000000000E-16 " " relative error = 1.08415642108453390000000000000E-13 "%" Correct digits = 15 h = 1.000E-3 " " "NO POLE" " " "TOP MAIN SOLVE Loop" x[1] = 0.5530000000000004 " " y[1] (analytic) = 0.11537337169333339 " " y[1] (numeric) = 0.11537337169333355 " " absolute error = 1.52655665885959020000000000000000E-16 " " relative error = 1.3231447052767370000000000000E-13 "%" Correct digits = 15 h = 1.000E-3 " " "NO POLE" " " "TOP MAIN SOLVE Loop" x[1] = 0.5540000000000004 " " y[1] (analytic) = 0.11554204618666672 " " y[1] (numeric) = 0.11554204618666689 " " absolute error = 1.66533453693773480000000000000000E-16 " " relative error = 1.4413233899694520000000000000E-13 "%" Correct digits = 15 h = 1.000E-3 " " "NO POLE" " " "TOP MAIN SOLVE Loop" x[1] = 0.5550000000000004 " " y[1] (analytic) = 0.11571088500000007 " " y[1] (numeric) = 0.11571088500000022 " " absolute error = 1.52655665885959020000000000000000E-16 " " relative error = 1.31928526763889970000000000000E-13 "%" Correct digits = 15 h = 1.000E-3 " " "NO POLE" " " "TOP MAIN SOLVE Loop" x[1] = 0.5560000000000004 " " y[1] (analytic) = 0.1158798882133334 " " y[1] (numeric) = 0.11587988821333356 " " absolute error = 1.52655665885959020000000000000000E-16 " " relative error = 1.31736117664285170000000000000E-13 "%" Correct digits = 15 h = 1.000E-3 " " "NO POLE" " " "TOP MAIN SOLVE Loop" x[1] = 0.5570000000000004 " " y[1] (analytic) = 0.11604905590666677 " " y[1] (numeric) = 0.11604905590666689 " " absolute error = 1.2490009027033011000000000000000E-16 " " relative error = 1.07626976621664080000000000000E-13 "%" Correct digits = 15 h = 1.000E-3 " " "NO POLE" " " "TOP MAIN SOLVE Loop" x[1] = 0.5580000000000004 " " y[1] (analytic) = 0.11621838816000009 " " y[1] (numeric) = 0.11621838816000023 " " absolute error = 1.38777878078144570000000000000000E-16 " " relative error = 1.19411291341509920000000000000E-13 "%" Correct digits = 15 h = 1.000E-3 " " "NO POLE" " " "TOP MAIN SOLVE Loop" x[1] = 0.5590000000000004 " " y[1] (analytic) = 0.11638788505333338 " " y[1] (numeric) = 0.11638788505333356 " " absolute error = 1.80411241501587940000000000000000E-16 " " relative error = 1.55008608859003330000000000000E-13 "%" Correct digits = 15 h = 1.000E-3 " " "NO POLE" " " "TOP MAIN SOLVE Loop" x[1] = 0.5600000000000004 " " y[1] (analytic) = 0.11655754666666673 " " y[1] (numeric) = 0.11655754666666689 " " absolute error = 1.52655665885959020000000000000000E-16 " " relative error = 1.30970211926754370000000000000E-13 "%" Correct digits = 15 h = 1.000E-3 " " "NO POLE" " " "TOP MAIN SOLVE Loop" x[1] = 0.5610000000000004 " " y[1] (analytic) = 0.11672737308000006 " " y[1] (numeric) = 0.11672737308000022 " " absolute error = 1.66533453693773480000000000000000E-16 " " relative error = 1.4266872396728950000000000000E-13 "%" Correct digits = 15 h = 1.000E-3 " " "NO POLE" " " "TOP MAIN SOLVE Loop" x[1] = 0.5620000000000004 " " y[1] (analytic) = 0.11689736437333342 " " y[1] (numeric) = 0.11689736437333356 " " absolute error = 1.38777878078144570000000000000000E-16 " " relative error = 1.1871771345924590000000000000E-13 "%" Correct digits = 15 h = 1.000E-3 " " "NO POLE" " " "TOP MAIN SOLVE Loop" x[1] = 0.5630000000000004 " " y[1] (analytic) = 0.11706752062666674 " " y[1] (numeric) = 0.1170675206266669 " " absolute error = 1.52655665885959020000000000000000E-16 " " relative error = 1.30399674537213770000000000000E-13 "%" Correct digits = 15 h = 1.000E-3 " " "NO POLE" " " "TOP MAIN SOLVE Loop" x[1] = 0.5640000000000004 " " y[1] (analytic) = 0.11723784192000006 " " y[1] (numeric) = 0.11723784192000022 " " absolute error = 1.66533453693773480000000000000000E-16 " " relative error = 1.42047525753170560000000000000E-13 "%" Correct digits = 15 h = 1.000E-3 " " "NO POLE" " " "TOP MAIN SOLVE Loop" x[1] = 0.5650000000000004 " " y[1] (analytic) = 0.11740832833333342 " " y[1] (numeric) = 0.11740832833333356 " " absolute error = 1.38777878078144570000000000000000E-16 " " relative error = 1.18201051022667630000000000000E-13 "%" Correct digits = 15 h = 1.000E-3 " " "NO POLE" " " "TOP MAIN SOLVE Loop" x[1] = 0.5660000000000004 " " y[1] (analytic) = 0.11757897994666675 " " y[1] (numeric) = 0.1175789799466669 " " absolute error = 1.52655665885959020000000000000000E-16 " " relative error = 1.29832446203567070000000000000E-13 "%" Correct digits = 15 h = 1.000E-3 " " "NO POLE" " " "TOP MAIN SOLVE Loop" x[1] = 0.5670000000000004 " " y[1] (analytic) = 0.1177497968400001 " " y[1] (numeric) = 0.11774979684000023 " " absolute error = 1.2490009027033011000000000000000E-16 " " relative error = 1.06072446511348060000000000000E-13 "%" Correct digits = 15 h = 1.000E-3 " " "NO POLE" " " "TOP MAIN SOLVE Loop" x[1] = 0.5680000000000004 " " y[1] (analytic) = 0.11792077909333341 " " y[1] (numeric) = 0.11792077909333355 " " absolute error = 1.38777878078144570000000000000000E-16 " " relative error = 1.17687382279168030000000000000E-13 "%" Correct digits = 15 h = 1.000E-3 " " "NO POLE" " " "TOP MAIN SOLVE Loop" x[1] = 0.5690000000000004 " " y[1] (analytic) = 0.1180919267866667 " " y[1] (numeric) = 0.11809192678666688 " " absolute error = 1.80411241501587940000000000000000E-16 " " relative error = 1.5277186714677050000000000000E-13 "%" Correct digits = 15 h = 1.000E-3 " " "NO POLE" " " "TOP MAIN SOLVE Loop" x[1] = 0.5700000000000004 " " y[1] (analytic) = 0.11826324000000009 " " y[1] (numeric) = 0.11826324000000021 " " absolute error = 1.2490009027033011000000000000000E-16 " " relative error = 1.05611930021814060000000000000E-13 "%" Correct digits = 15 h = 1.000E-3 " " "NO POLE" " " "TOP MAIN SOLVE Loop" x[1] = 0.5710000000000004 " " y[1] (analytic) = 0.1184347188133334 " " y[1] (numeric) = 0.11843471881333355 " " absolute error = 1.52655665885959020000000000000000E-16 " " relative error = 1.28894354134923670000000000000E-13 "%" Correct digits = 15 h = 1.000E-3 " " "NO POLE" " " "TOP MAIN SOLVE Loop" x[1] = 0.5720000000000004 " " y[1] (analytic) = 0.11860636330666675 " " y[1] (numeric) = 0.11860636330666688 " " absolute error = 1.2490009027033011000000000000000E-16 " " relative error = 1.05306399073539090000000000000E-13 "%" Correct digits = 15 h = 1.000E-3 " " "NO POLE" " " "TOP MAIN SOLVE Loop" x[1] = 0.5730000000000004 " " y[1] (analytic) = 0.11877817356000009 " " y[1] (numeric) = 0.11877817356000021 " " absolute error = 1.2490009027033011000000000000000E-16 " " relative error = 1.05154075472660450000000000000E-13 "%" Correct digits = 15 h = 1.000E-3 " " "NO POLE" " " "TOP MAIN SOLVE Loop" x[1] = 0.5740000000000004 " " y[1] (analytic) = 0.11895014965333339 " " y[1] (numeric) = 0.11895014965333355 " " absolute error = 1.52655665885959020000000000000000E-16 " " relative error = 1.28335833398155880000000000000E-13 "%" Correct digits = 15 h = 1.000E-3 " " "NO POLE" " " "TOP MAIN SOLVE Loop" x[1] = 0.5750000000000004 " " y[1] (analytic) = 0.11912229166666675 " " y[1] (numeric) = 0.11912229166666688 " " absolute error = 1.2490009027033011000000000000000E-16 " " relative error = 1.04850308471088730000000000000E-13 "%" Correct digits = 15 h = 1.000E-3 " " "NO POLE" " " "TOP MAIN SOLVE Loop" x[1] = 0.5760000000000004 " " y[1] (analytic) = 0.11929459968000006 " " y[1] (numeric) = 0.11929459968000021 " " absolute error = 1.52655665885959020000000000000000E-16 " " relative error = 1.2796527780423240000000000000E-13 "%" Correct digits = 15 h = 1.000E-3 " " "NO POLE" " " "TOP MAIN SOLVE Loop" x[1] = 0.5770000000000004 " " y[1] (analytic) = 0.11946707377333345 " " y[1] (numeric) = 0.11946707377333354 " " absolute error = 9.7144514654701200000000000000000E-17 " " relative error = 8.13148858396036800000000000000E-14 "%" Correct digits = 16 h = 1.000E-3 " " "NO POLE" " " "TOP MAIN SOLVE Loop" x[1] = 0.5780000000000004 " " y[1] (analytic) = 0.11963971402666675 " " y[1] (numeric) = 0.11963971402666687 " " absolute error = 1.2490009027033011000000000000000E-16 " " relative error = 1.04396847891571250000000000000E-13 "%" Correct digits = 15 h = 1.000E-3 " " "NO POLE" " " "TOP MAIN SOLVE Loop" x[1] = 0.5790000000000004 " " y[1] (analytic) = 0.11981252052000005 " " y[1] (numeric) = 0.1198125205200002 " " absolute error = 1.52655665885959020000000000000000E-16 " " relative error = 1.27412114546473080000000000000E-13 "%" Correct digits = 15 h = 1.000E-3 " " "NO POLE" " " "TOP MAIN SOLVE Loop" x[1] = 0.5800000000000004 " " y[1] (analytic) = 0.11998549333333343 " " y[1] (numeric) = 0.11998549333333354 " " absolute error = 1.11022302462515650000000000000000E-16 " " relative error = 9.25297712066599600000000000000E-14 "%" Correct digits = 16 h = 1.000E-3 " " "NO POLE" " " "TOP MAIN SOLVE Loop" x[1] = 0.5810000000000004 " " y[1] (analytic) = 0.12015863254666674 " " y[1] (numeric) = 0.12015863254666688 " " absolute error = 1.38777878078144570000000000000000E-16 " " relative error = 1.1549555378324280000000000000E-13 "%" Correct digits = 15 h = 1.000E-3 " " "NO POLE" " " "TOP MAIN SOLVE Loop" x[1] = 0.5820000000000004 " " y[1] (analytic) = 0.1203319382400001 " " y[1] (numeric) = 0.12033193824000021 " " absolute error = 1.11022302462515650000000000000000E-16 " " relative error = 9.22633708775499600000000000000E-14 "%" Correct digits = 16 h = 1.000E-3 " " "NO POLE" " " "TOP MAIN SOLVE Loop" x[1] = 0.5830000000000004 " " y[1] (analytic) = 0.12050541049333341 " " y[1] (numeric) = 0.12050541049333355 " " absolute error = 1.38777878078144570000000000000000E-16 " " relative error = 1.15163192681561830000000000000E-13 "%" Correct digits = 15 h = 1.000E-3 " " "NO POLE" " " "TOP MAIN SOLVE Loop" x[1] = 0.5840000000000004 " " y[1] (analytic) = 0.12067904938666672 " " y[1] (numeric) = 0.12067904938666688 " " absolute error = 1.52655665885959020000000000000000E-16 " " relative error = 1.26497239298626160000000000000E-13 "%" Correct digits = 15 h = 1.000E-3 " " "NO POLE" " " "TOP MAIN SOLVE Loop" x[1] = 0.5850000000000004 " " y[1] (analytic) = 0.12085285500000008 " " y[1] (numeric) = 0.1208528550000002 " " absolute error = 1.2490009027033011000000000000000E-16 " " relative error = 1.0334889504292641000000000000E-13 "%" Correct digits = 15 h = 1.000E-3 " " "NO POLE" " " "TOP MAIN SOLVE Loop" x[1] = 0.5860000000000004 " " y[1] (analytic) = 0.12102682741333341 " " y[1] (numeric) = 0.12102682741333354 " " absolute error = 1.2490009027033011000000000000000E-16 " " relative error = 1.03200334124077020000000000000E-13 "%" Correct digits = 15 h = 1.000E-3 " " "NO POLE" " " "TOP MAIN SOLVE Loop" x[1] = 0.5870000000000004 " " y[1] (analytic) = 0.12120096670666677 " " y[1] (numeric) = 0.12120096670666687 " " absolute error = 9.7144514654701200000000000000000E-17 " " relative error = 8.01516005147157600000000000000E-14 "%" Correct digits = 16 h = 1.000E-3 " " "NO POLE" " " "TOP MAIN SOLVE Loop" x[1] = 0.5880000000000004 " " y[1] (analytic) = 0.12137527296000007 " " y[1] (numeric) = 0.12137527296000021 " " absolute error = 1.38777878078144570000000000000000E-16 " " relative error = 1.1433785044823719000000000000E-13 "%" Correct digits = 15 h = 1.000E-3 " " "NO POLE" " " "TOP MAIN SOLVE Loop" x[1] = 0.5890000000000004 " " y[1] (analytic) = 0.12154974625333338 " " y[1] (numeric) = 0.12154974625333355 " " absolute error = 1.66533453693773480000000000000000E-16 " " relative error = 1.37008474988244950000000000000E-13 "%" Correct digits = 15 h = 1.000E-3 " " "NO POLE" " " "TOP MAIN SOLVE Loop" x[1] = 0.5900000000000004 " " y[1] (analytic) = 0.12172438666666674 " " y[1] (numeric) = 0.12172438666666688 " " absolute error = 1.38777878078144570000000000000000E-16 " " relative error = 1.14009921822960210000000000000E-13 "%" Correct digits = 15 h = 1.000E-3 " " "NO POLE" " " "TOP MAIN SOLVE Loop" x[1] = 0.5910000000000004 " " y[1] (analytic) = 0.12189919428000007 " " y[1] (numeric) = 0.1218991942800002 " " absolute error = 1.38777878078144570000000000000000E-16 " " relative error = 1.1384642769612939000000000000E-13 "%" Correct digits = 15 h = 1.000E-3 " " "NO POLE" " " "TOP MAIN SOLVE Loop" x[1] = 0.5920000000000004 " " y[1] (analytic) = 0.12207416917333343 " " y[1] (numeric) = 0.12207416917333354 " " absolute error = 1.11022302462515650000000000000000E-16 " " relative error = 9.09465968225225500000000000000E-14 "%" Correct digits = 16 h = 1.000E-3 " " "NO POLE" " " "TOP MAIN SOLVE Loop" x[1] = 0.5930000000000004 " " y[1] (analytic) = 0.12224931142666674 " " y[1] (numeric) = 0.12224931142666687 " " absolute error = 1.2490009027033011000000000000000E-16 " " relative error = 1.02168338465655470000000000000E-13 "%" Correct digits = 15 h = 1.000E-3 " " "NO POLE" " " "TOP MAIN SOLVE Loop" x[1] = 0.5940000000000004 " " y[1] (analytic) = 0.12242462112000005 " " y[1] (numeric) = 0.1224246211200002 " " absolute error = 1.52655665885959020000000000000000E-16 " " relative error = 1.2469359879523469000000000000E-13 "%" Correct digits = 15 h = 1.000E-3 " " "NO POLE" " " "TOP MAIN SOLVE Loop" x[1] = 0.5950000000000004 " " y[1] (analytic) = 0.12260009833333342 " " y[1] (numeric) = 0.12260009833333353 " " absolute error = 1.11022302462515650000000000000000E-16 " " relative error = 9.05564546617741900000000000000E-14 "%" Correct digits = 16 h = 1.000E-3 " " "NO POLE" " " "TOP MAIN SOLVE Loop" x[1] = 0.5960000000000004 " " y[1] (analytic) = 0.12277574314666673 " " y[1] (numeric) = 0.12277574314666687 " " absolute error = 1.38777878078144570000000000000000E-16 " " relative error = 1.13033629055180590000000000000E-13 "%" Correct digits = 15 h = 1.000E-3 " " "NO POLE" " " "TOP MAIN SOLVE Loop" x[1] = 0.5970000000000004 " " y[1] (analytic) = 0.12295155564000008 " " y[1] (numeric) = 0.1229515556400002 " " absolute error = 1.11022302462515650000000000000000E-16 " " relative error = 9.02975988263108500000000000000E-14 "%" Correct digits = 16 h = 1.000E-3 " " "NO POLE" " " "TOP MAIN SOLVE Loop" x[1] = 0.5980000000000004 " " y[1] (analytic) = 0.12312753589333342 " " y[1] (numeric) = 0.12312753589333353 " " absolute error = 1.11022302462515650000000000000000E-16 " " relative error = 9.01685408198986100000000000000E-14 "%" Correct digits = 16 h = 1.000E-3 " " "NO POLE" " " "TOP MAIN SOLVE Loop" x[1] = 0.5990000000000004 " " y[1] (analytic) = 0.12330368398666673 " " y[1] (numeric) = 0.12330368398666686 " " absolute error = 1.2490009027033011000000000000000E-16 " " relative error = 1.01294694717990740000000000000E-13 "%" Correct digits = 15 h = 1.000E-3 " " "NO POLE" " " "TOP MAIN SOLVE Loop" x[1] = 0.6000000000000004 " " y[1] (analytic) = 0.1234800000000001 " " y[1] (numeric) = 0.12348000000000019 " " absolute error = 8.32667268468867400000000000000000E-17 " " relative error = 6.74333712721790400000000000000E-14 "%" Correct digits = 16 h = 1.000E-3 " " "NO POLE" " " "TOP MAIN SOLVE Loop" x[1] = 0.6010000000000004 " " y[1] (analytic) = 0.1236564840133334 " " y[1] (numeric) = 0.12365648401333353 " " absolute error = 1.2490009027033011000000000000000E-16 " " relative error = 1.01005694336952530000000000000E-13 "%" Correct digits = 15 h = 1.000E-3 " " "NO POLE" " " "TOP MAIN SOLVE Loop" x[1] = 0.6020000000000004 " " y[1] (analytic) = 0.12383313610666677 " " y[1] (numeric) = 0.12383313610666685 " " absolute error = 8.32667268468867400000000000000000E-17 " " relative error = 6.72410708997653600000000000000E-14 "%" Correct digits = 16 h = 1.000E-3 " " "NO POLE" " " "TOP MAIN SOLVE Loop" x[1] = 0.6030000000000004 " " y[1] (analytic) = 0.12400995636000008 " " y[1] (numeric) = 0.12400995636000019 " " absolute error = 1.11022302462515650000000000000000E-16 " " relative error = 8.95269264834015800000000000000E-14 "%" Correct digits = 16 h = 1.000E-3 " " "NO POLE" " " "TOP MAIN SOLVE Loop" x[1] = 0.6040000000000004 " " y[1] (analytic) = 0.1241869448533334 " " y[1] (numeric) = 0.12418694485333352 " " absolute error = 1.2490009027033011000000000000000E-16 " " relative error = 1.00574251518820230000000000000E-13 "%" Correct digits = 15 h = 1.000E-3 " " "NO POLE" " " "TOP MAIN SOLVE Loop" x[1] = 0.6050000000000004 " " y[1] (analytic) = 0.12436410166666675 " " y[1] (numeric) = 0.12436410166666685 " " absolute error = 9.7144514654701200000000000000000E-17 " " relative error = 7.81129870700773100000000000000E-14 "%" Correct digits = 16 h = 1.000E-3 " " "NO POLE" " " "TOP MAIN SOLVE Loop" x[1] = 0.6060000000000004 " " y[1] (analytic) = 0.12454142688000006 " " y[1] (numeric) = 0.12454142688000018 " " absolute error = 1.2490009027033011000000000000000E-16 " " relative error = 1.00287987217840090000000000000E-13 "%" Correct digits = 15 h = 1.000E-3 " " "NO POLE" " " "TOP MAIN SOLVE Loop" x[1] = 0.6070000000000004 " " y[1] (analytic) = 0.12471892057333343 " " y[1] (numeric) = 0.12471892057333352 " " absolute error = 8.32667268468867400000000000000000E-17 " " relative error = 6.6763508266515790000000000000E-14 "%" Correct digits = 16 h = 1.000E-3 " " "NO POLE" " " "TOP MAIN SOLVE Loop" x[1] = 0.6080000000000004 " " y[1] (analytic) = 0.12489658282666675 " " y[1] (numeric) = 0.12489658282666685 " " absolute error = 9.7144514654701200000000000000000E-17 " " relative error = 7.77799619942522700000000000000E-14 "%" Correct digits = 16 h = 1.000E-3 " " "NO POLE" " " "TOP MAIN SOLVE Loop" x[1] = 0.6090000000000004 " " y[1] (analytic) = 0.12507441372000005 " " y[1] (numeric) = 0.1250744137200002 " " absolute error = 1.38777878078144570000000000000000E-16 " " relative error = 1.10956249124478810000000000000E-13 "%" Correct digits = 15 h = 1.000E-3 " " "NO POLE" " " "TOP MAIN SOLVE Loop" x[1] = 0.6100000000000004 " " y[1] (analytic) = 0.12525241333333342 " " y[1] (numeric) = 0.12525241333333353 " " absolute error = 1.11022302462515650000000000000000E-16 " " relative error = 8.86388529433382900000000000000E-14 "%" Correct digits = 16 h = 1.000E-3 " " "NO POLE" " " "TOP MAIN SOLVE Loop" x[1] = 0.6110000000000004 " " y[1] (analytic) = 0.12543058174666674 " " y[1] (numeric) = 0.12543058174666688 " " absolute error = 1.38777878078144570000000000000000E-16 " " relative error = 1.10641181875752980000000000000E-13 "%" Correct digits = 15 h = 1.000E-3 " " "NO POLE" " " "TOP MAIN SOLVE Loop" x[1] = 0.6120000000000004 " " y[1] (analytic) = 0.1256089190400001 " " y[1] (numeric) = 0.1256089190400002 " " absolute error = 1.11022302462515650000000000000000E-16 " " relative error = 8.83872764060334300000000000000E-14 "%" Correct digits = 16 h = 1.000E-3 " " "NO POLE" " " "TOP MAIN SOLVE Loop" x[1] = 0.6130000000000004 " " y[1] (analytic) = 0.12578742529333342 " " y[1] (numeric) = 0.12578742529333353 " " absolute error = 1.11022302462515650000000000000000E-16 " " relative error = 8.82618450958942500000000000000E-14 "%" Correct digits = 16 h = 1.000E-3 " " "NO POLE" " " "TOP MAIN SOLVE Loop" x[1] = 0.6140000000000004 " " y[1] (analytic) = 0.12596610058666674 " " y[1] (numeric) = 0.12596610058666688 " " absolute error = 1.38777878078144570000000000000000E-16 " " relative error = 1.10170813760058500000000000000E-13 "%" Correct digits = 15 h = 1.000E-3 " " "NO POLE" " " "TOP MAIN SOLVE Loop" x[1] = 0.6150000000000004 " " y[1] (analytic) = 0.1261449450000001 " " y[1] (numeric) = 0.1261449450000002 " " absolute error = 1.11022302462515650000000000000000E-16 " " relative error = 8.80116935819470000000000000000E-14 "%" Correct digits = 16 h = 1.000E-3 " " "NO POLE" " " "TOP MAIN SOLVE Loop" x[1] = 0.6160000000000004 " " y[1] (analytic) = 0.1263239586133334 " " y[1] (numeric) = 0.12632395861333354 " " absolute error = 1.38777878078144570000000000000000E-16 " " relative error = 1.09858715323299470000000000000E-13 "%" Correct digits = 15 h = 1.000E-3 " " "NO POLE" " " "TOP MAIN SOLVE Loop" x[1] = 0.6170000000000004 " " y[1] (analytic) = 0.12650314150666678 " " y[1] (numeric) = 0.12650314150666686 " " absolute error = 8.32667268468867400000000000000000E-17 " " relative error = 6.58218648605643800000000000000E-14 "%" Correct digits = 16 h = 1.000E-3 " " "NO POLE" " " "TOP MAIN SOLVE Loop" x[1] = 0.6180000000000004 " " y[1] (analytic) = 0.12668249376000007 " " y[1] (numeric) = 0.12668249376000018 " " absolute error = 1.11022302462515650000000000000000E-16 " " relative error = 8.76382356924922600000000000000E-14 "%" Correct digits = 16 h = 1.000E-3 " " "NO POLE" " " "TOP MAIN SOLVE Loop" x[1] = 0.6190000000000004 " " y[1] (analytic) = 0.1268620154533334 " " y[1] (numeric) = 0.1268620154533335 " " absolute error = 1.11022302462515650000000000000000E-16 " " relative error = 8.751421933963801000000000000E-14 "%" Correct digits = 16 h = 1.000E-3 " " "NO POLE" " " "TOP MAIN SOLVE Loop" x[1] = 0.6200000000000004 " " y[1] (analytic) = 0.12704170666666675 " " y[1] (numeric) = 0.12704170666666684 " " absolute error = 8.32667268468867400000000000000000E-17 " " relative error = 6.55428276521526700000000000000E-14 "%" Correct digits = 16 h = 1.000E-3 " " "NO POLE" " " "TOP MAIN SOLVE Loop" x[1] = 0.6210000000000004 " " y[1] (analytic) = 0.12722156748000008 " " y[1] (numeric) = 0.12722156748000016 " " absolute error = 8.32667268468867400000000000000000E-17 " " relative error = 6.54501657983240300000000000000E-14 "%" Correct digits = 16 h = 1.000E-3 " " "NO POLE" " " "TOP MAIN SOLVE Loop" x[1] = 0.6220000000000004 " " y[1] (analytic) = 0.12740159797333345 " " y[1] (numeric) = 0.1274015979733335 " " absolute error = 5.55111512312578300000000000000000E-17 " " relative error = 4.357178568739531500000000000000E-14 "%" Correct digits = 16 h = 1.000E-3 " " "NO POLE" " " "TOP MAIN SOLVE Loop" x[1] = 0.6230000000000004 " " y[1] (analytic) = 0.12758179822666676 " " y[1] (numeric) = 0.12758179822666685 " " absolute error = 8.32667268468867400000000000000000E-17 " " relative error = 6.52653654394742500000000000000E-14 "%" Correct digits = 16 h = 1.000E-3 " " "NO POLE" " " "TOP MAIN SOLVE Loop" x[1] = 0.6240000000000004 " " y[1] (analytic) = 0.12776216832000006 " " y[1] (numeric) = 0.12776216832000017 " " absolute error = 1.11022302462515650000000000000000E-16 " " relative error = 8.6897634818190590000000000000E-14 "%" Correct digits = 16 h = 1.000E-3 " " "NO POLE" " " "TOP MAIN SOLVE Loop" x[1] = 0.6250000000000004 " " y[1] (analytic) = 0.12794270833333338 " " y[1] (numeric) = 0.12794270833333352 " " absolute error = 1.38777878078144570000000000000000E-16 " " relative error = 1.08468766908217980000000000000E-13 "%" Correct digits = 15 h = 1.000E-3 " " "NO POLE" " " "TOP MAIN SOLVE Loop" x[1] = 0.6260000000000004 " " y[1] (analytic) = 0.12812341834666674 " " y[1] (numeric) = 0.12812341834666685 " " absolute error = 1.11022302462515650000000000000000E-16 " " relative error = 8.66526228344297200000000000000E-14 "%" Correct digits = 16 h = 1.000E-3 " " "NO POLE" " " "TOP MAIN SOLVE Loop" x[1] = 0.6270000000000004 " " y[1] (analytic) = 0.1283042984400001 " " y[1] (numeric) = 0.1283042984400002 " " absolute error = 8.32667268468867400000000000000000E-17 " " relative error = 6.489784664995100000000000000E-14 "%" Correct digits = 16 h = 1.000E-3 " " "NO POLE" " " "TOP MAIN SOLVE Loop" x[1] = 0.6280000000000004 " " y[1] (analytic) = 0.12848534869333342 " " y[1] (numeric) = 0.12848534869333353 " " absolute error = 1.11022302462515650000000000000000E-16 " " relative error = 8.64085310827943200000000000000E-14 "%" Correct digits = 16 h = 1.000E-3 " " "NO POLE" " " "TOP MAIN SOLVE Loop" x[1] = 0.6290000000000004 " " y[1] (analytic) = 0.12866656918666672 " " y[1] (numeric) = 0.12866656918666686 " " absolute error = 1.38777878078144570000000000000000E-16 " " relative error = 1.07858536180294490000000000000E-13 "%" Correct digits = 15 h = 1.000E-3 " " "NO POLE" " " "TOP MAIN SOLVE Loop" x[1] = 0.6300000000000004 " " y[1] (analytic) = 0.12884796000000004 " " y[1] (numeric) = 0.12884796000000018 " " absolute error = 1.38777878078144570000000000000000E-16 " " relative error = 1.07706694058753060000000000000E-13 "%" Correct digits = 15 h = 1.000E-3 " " "NO POLE" " " "TOP MAIN SOLVE Loop" x[1] = 0.6310000000000004 " " y[1] (analytic) = 0.12902952121333341 " " y[1] (numeric) = 0.1290295212133335 " " absolute error = 8.32667268468867400000000000000000E-17 " " relative error = 6.45330820915130800000000000000E-14 "%" Correct digits = 16 h = 1.000E-3 " " "NO POLE" " " "TOP MAIN SOLVE Loop" x[1] = 0.6320000000000005 " " y[1] (analytic) = 0.12921125290666677 " " y[1] (numeric) = 0.12921125290666682 " " absolute error = 5.55111512312578300000000000000000E-17 " " relative error = 4.29615455175217760000000000000E-14 "%" Correct digits = 16 h = 1.000E-3 " " "NO POLE" " " "TOP MAIN SOLVE Loop" x[1] = 0.6330000000000005 " " y[1] (analytic) = 0.1293931551600001 " " y[1] (numeric) = 0.12939315516000016 " " absolute error = 5.55111512312578300000000000000000E-17 " " relative error = 4.2901149726672900000000000000E-14 "%" Correct digits = 16 h = 1.000E-3 " " "NO POLE" " " "TOP MAIN SOLVE Loop" x[1] = 0.6340000000000005 " " y[1] (analytic) = 0.12957522805333338 " " y[1] (numeric) = 0.1295752280533335 " " absolute error = 1.11022302462515650000000000000000E-16 " " relative error = 8.56817341790196900000000000000E-14 "%" Correct digits = 16 h = 1.000E-3 " " "NO POLE" " " "TOP MAIN SOLVE Loop" x[1] = 0.6350000000000005 " " y[1] (analytic) = 0.12975747166666673 " " y[1] (numeric) = 0.12975747166666682 " " absolute error = 8.32667268468867400000000000000000E-17 " " relative error = 6.41710460117396400000000000000E-14 "%" Correct digits = 16 h = 1.000E-3 " " "NO POLE" " " "TOP MAIN SOLVE Loop" x[1] = 0.6360000000000005 " " y[1] (analytic) = 0.12993988608000007 " " y[1] (numeric) = 0.12993988608000015 " " absolute error = 8.32667268468867400000000000000000E-17 " " relative error = 6.40809603262403400000000000000E-14 "%" Correct digits = 16 h = 1.000E-3 " " "NO POLE" " " "TOP MAIN SOLVE Loop" x[1] = 0.6370000000000005 " " y[1] (analytic) = 0.13012247137333344 " " y[1] (numeric) = 0.1301224713733335 " " absolute error = 5.55111512312578300000000000000000E-17 " " relative error = 4.26606954551233400000000000000E-14 "%" Correct digits = 16 h = 1.000E-3 " " "NO POLE" " " "TOP MAIN SOLVE Loop" x[1] = 0.6380000000000005 " " y[1] (analytic) = 0.13030522762666677 " " y[1] (numeric) = 0.13030522762666683 " " absolute error = 5.55111512312578300000000000000000E-17 " " relative error = 4.26008627914000500000000000000E-14 "%" Correct digits = 16 h = 1.000E-3 " " "NO POLE" " " "TOP MAIN SOLVE Loop" x[1] = 0.6390000000000005 " " y[1] (analytic) = 0.13048815492000007 " " y[1] (numeric) = 0.13048815492000015 " " absolute error = 8.32667268468867400000000000000000E-17 " " relative error = 6.38117129466165400000000000000E-14 "%" Correct digits = 16 h = 1.000E-3 " " "NO POLE" " " "TOP MAIN SOLVE Loop" x[1] = 0.6400000000000005 " " y[1] (analytic) = 0.13067125333333338 " " y[1] (numeric) = 0.1306712533333335 " " absolute error = 1.11022302462515650000000000000000E-16 " " relative error = 8.49630654259551600000000000000E-14 "%" Correct digits = 16 h = 1.000E-3 " " "NO POLE" " " "TOP MAIN SOLVE Loop" x[1] = 0.6410000000000005 " " y[1] (analytic) = 0.13085452294666675 " " y[1] (numeric) = 0.13085452294666683 " " absolute error = 8.32667268468867400000000000000000E-17 " " relative error = 6.36330521649789100000000000000E-14 "%" Correct digits = 16 h = 1.000E-3 " " "NO POLE" " " "TOP MAIN SOLVE Loop" x[1] = 0.6420000000000005 " " y[1] (analytic) = 0.1310379638400001 " " y[1] (numeric) = 0.13103796384000016 " " absolute error = 5.55111512312578300000000000000000E-17 " " relative error = 4.236264789571823600000000000000E-14 "%" Correct digits = 16 h = 1.000E-3 " " "NO POLE" " " "TOP MAIN SOLVE Loop" x[1] = 0.6430000000000005 " " y[1] (analytic) = 0.1312215760933334 " " y[1] (numeric) = 0.1312215760933335 " " absolute error = 8.32667268468867400000000000000000E-17 " " relative error = 6.34550577167751500000000000000E-14 "%" Correct digits = 16 h = 1.000E-3 " " "NO POLE" " " "TOP MAIN SOLVE Loop" x[1] = 0.6440000000000005 " " y[1] (analytic) = 0.13140535978666673 " " y[1] (numeric) = 0.13140535978666681 " " absolute error = 8.32667268468867400000000000000000E-17 " " relative error = 6.33663093971723600000000000000E-14 "%" Correct digits = 16 h = 1.000E-3 " " "NO POLE" " " "TOP MAIN SOLVE Loop" x[1] = 0.6450000000000005 " " y[1] (analytic) = 0.13158931500000004 " " y[1] (numeric) = 0.13158931500000015 " " absolute error = 1.11022302462515650000000000000000E-16 " " relative error = 8.43703019979362500000000000000E-14 "%" Correct digits = 16 h = 1.000E-3 " " "NO POLE" " " "TOP MAIN SOLVE Loop" x[1] = 0.6460000000000005 " " y[1] (analytic) = 0.13177344181333342 " " y[1] (numeric) = 0.13177344181333348 " " absolute error = 5.55111512312578300000000000000000E-17 " " relative error = 4.21262057569182840000000000000E-14 "%" Correct digits = 16 h = 1.000E-3 " " "NO POLE" " " "TOP MAIN SOLVE Loop" x[1] = 0.6470000000000005 " " y[1] (analytic) = 0.1319577403066668 " " y[1] (numeric) = 0.13195774030666682 " " absolute error = 2.775557561562891400000000000000000E-17 " " relative error = 2.103368514126233700000000000000E-14 "%" Correct digits = 16 h = 1.000E-3 " " "NO POLE" " " "TOP MAIN SOLVE Loop" x[1] = 0.6480000000000005 " " y[1] (analytic) = 0.13214221056000008 " " y[1] (numeric) = 0.13214221056000017 " " absolute error = 8.32667268468867400000000000000000E-17 " " relative error = 6.30129664805924400000000000000E-14 "%" Correct digits = 16 h = 1.000E-3 " " "NO POLE" " " "TOP MAIN SOLVE Loop" x[1] = 0.6490000000000005 " " y[1] (analytic) = 0.1323268526533334 " " y[1] (numeric) = 0.1323268526533335 " " absolute error = 8.32667268468867400000000000000000E-17 " " relative error = 6.29250414237742300000000000000E-14 "%" Correct digits = 16 h = 1.000E-3 " " "NO POLE" " " "TOP MAIN SOLVE Loop" x[1] = 0.6500000000000005 " " y[1] (analytic) = 0.13251166666666672 " " y[1] (numeric) = 0.13251166666666683 " " absolute error = 1.11022302462515650000000000000000E-16 " " relative error = 8.37830398298380900000000000000E-14 "%" Correct digits = 16 h = 1.000E-3 " " "NO POLE" " " "TOP MAIN SOLVE Loop" x[1] = 0.6510000000000005 " " y[1] (analytic) = 0.13269665268000008 " " y[1] (numeric) = 0.13269665268000017 " " absolute error = 8.32667268468867400000000000000000E-17 " " relative error = 6.2749681446513690000000000000E-14 "%" Correct digits = 16 h = 1.000E-3 " " "NO POLE" " " "TOP MAIN SOLVE Loop" x[1] = 0.6520000000000005 " " y[1] (analytic) = 0.13288181077333344 " " y[1] (numeric) = 0.1328818107733335 " " absolute error = 5.55111512312578300000000000000000E-17 " " relative error = 4.17748305115644400000000000000E-14 "%" Correct digits = 16 h = 1.000E-3 " " "NO POLE" " " "TOP MAIN SOLVE Loop" x[1] = 0.6530000000000005 " " y[1] (analytic) = 0.13306714102666675 " " y[1] (numeric) = 0.13306714102666684 " " absolute error = 8.32667268468867400000000000000000E-17 " " relative error = 6.2574972457099700000000000000E-14 "%" Correct digits = 16 h = 1.000E-3 " " "NO POLE" " " "TOP MAIN SOLVE Loop" x[1] = 0.6540000000000005 " " y[1] (analytic) = 0.13325264352000007 " " y[1] (numeric) = 0.13325264352000016 " " absolute error = 8.32667268468867400000000000000000E-17 " " relative error = 6.24878611390468400000000000000E-14 "%" Correct digits = 16 h = 1.000E-3 " " "NO POLE" " " "TOP MAIN SOLVE Loop" x[1] = 0.6550000000000005 " " y[1] (analytic) = 0.1334383183333334 " " y[1] (numeric) = 0.1334383183333335 " " absolute error = 1.11022302462515650000000000000000E-16 " " relative error = 8.32012152500140300000000000000E-14 "%" Correct digits = 16 h = 1.000E-3 " " "NO POLE" " " "TOP MAIN SOLVE Loop" x[1] = 0.6560000000000005 " " y[1] (analytic) = 0.13362416554666673 " " y[1] (numeric) = 0.13362416554666684 " " absolute error = 1.11022302462515650000000000000000E-16 " " relative error = 8.30854973038109400000000000000E-14 "%" Correct digits = 16 h = 1.000E-3 " " "NO POLE" " " "TOP MAIN SOLVE Loop" x[1] = 0.6570000000000005 " " y[1] (analytic) = 0.13381018524000013 " " y[1] (numeric) = 0.13381018524000018 " " absolute error = 5.55111512312578300000000000000000E-17 " " relative error = 4.148499692433261000000000000000E-14 "%" Correct digits = 16 h = 1.000E-3 " " "NO POLE" " " "TOP MAIN SOLVE Loop" x[1] = 0.6580000000000005 " " y[1] (analytic) = 0.13399637749333343 " " y[1] (numeric) = 0.1339963774933335 " " absolute error = 8.32667268468867400000000000000000E-17 " " relative error = 6.21410282908800400000000000000E-14 "%" Correct digits = 16 h = 1.000E-3 " " "NO POLE" " " "TOP MAIN SOLVE Loop" x[1] = 0.6590000000000005 " " y[1] (analytic) = 0.13418274238666675 " " y[1] (numeric) = 0.13418274238666686 " " absolute error = 1.11022302462515650000000000000000E-16 " " relative error = 8.27396284259782300000000000000E-14 "%" Correct digits = 16 h = 1.000E-3 " " "NO POLE" " " "TOP MAIN SOLVE Loop" x[1] = 0.6600000000000005 " " y[1] (analytic) = 0.13436928000000006 " " y[1] (numeric) = 0.1343692800000002 " " absolute error = 1.38777878078144570000000000000000E-16 " " relative error = 1.0328095683637250000000000000E-13 "%" Correct digits = 15 h = 1.000E-3 " " "NO POLE" " " "TOP MAIN SOLVE Loop" x[1] = 0.6610000000000005 " " y[1] (analytic) = 0.1345559904133334 " " y[1] (numeric) = 0.13455599041333355 " " absolute error = 1.38777878078144570000000000000000E-16 " " relative error = 1.0313764378073560000000000000E-13 "%" Correct digits = 15 h = 1.000E-3 " " "NO POLE" " " "TOP MAIN SOLVE Loop" x[1] = 0.6620000000000005 " " y[1] (analytic) = 0.13474287370666677 " " y[1] (numeric) = 0.13474287370666688 " " absolute error = 1.11022302462515650000000000000000E-16 " " relative error = 8.23956766012053100000000000000E-14 "%" Correct digits = 16 h = 1.000E-3 " " "NO POLE" " " "TOP MAIN SOLVE Loop" x[1] = 0.6630000000000005 " " y[1] (analytic) = 0.1349299299600001 " " y[1] (numeric) = 0.13492992996000022 " " absolute error = 1.11022302462515650000000000000000E-16 " " relative error = 8.22814497090661300000000000000E-14 "%" Correct digits = 16 h = 1.000E-3 " " "NO POLE" " " "TOP MAIN SOLVE Loop" x[1] = 0.6640000000000005 " " y[1] (analytic) = 0.13511715925333342 " " y[1] (numeric) = 0.13511715925333356 " " absolute error = 1.38777878078144570000000000000000E-16 " " relative error = 1.02709292324557830000000000000E-13 "%" Correct digits = 15 h = 1.000E-3 " " "NO POLE" " " "TOP MAIN SOLVE Loop" x[1] = 0.6650000000000005 " " y[1] (analytic) = 0.13530456166666674 " " y[1] (numeric) = 0.1353045616666669 " " absolute error = 1.66533453693773480000000000000000E-16 " " relative error = 1.23080442848661330000000000000E-13 "%" Correct digits = 15 h = 1.000E-3 " " "NO POLE" " " "TOP MAIN SOLVE Loop" x[1] = 0.6660000000000005 " " y[1] (analytic) = 0.1354921372800001 " " y[1] (numeric) = 0.13549213728000023 " " absolute error = 1.38777878078144570000000000000000E-16 " " relative error = 1.02425041677034260000000000000E-13 "%" Correct digits = 15 h = 1.000E-3 " " "NO POLE" " " "TOP MAIN SOLVE Loop" x[1] = 0.6670000000000005 " " y[1] (analytic) = 0.13567988617333346 " " y[1] (numeric) = 0.13567988617333357 " " absolute error = 1.11022302462515650000000000000000E-16 " " relative error = 8.1826647702727810000000000000E-14 "%" Correct digits = 16 h = 1.000E-3 " " "NO POLE" " " "TOP MAIN SOLVE Loop" x[1] = 0.6680000000000005 " " y[1] (analytic) = 0.13586780842666676 " " y[1] (numeric) = 0.1358678084266669 " " absolute error = 1.38777878078144570000000000000000E-16 " " relative error = 1.02141838957421970000000000000E-13 "%" Correct digits = 15 h = 1.000E-3 " " "NO POLE" " " "TOP MAIN SOLVE Loop" x[1] = 0.6690000000000005 " " y[1] (analytic) = 0.13605590412000007 " " y[1] (numeric) = 0.13605590412000024 " " absolute error = 1.66533453693773480000000000000000E-16 " " relative error = 1.22400754874182070000000000000E-13 "%" Correct digits = 15 h = 1.000E-3 " " "NO POLE" " " "TOP MAIN SOLVE Loop" x[1] = 0.6700000000000005 " " y[1] (analytic) = 0.13624417333333338 " " y[1] (numeric) = 0.13624417333333358 " " absolute error = 1.9428902930940240000000000000000E-16 " " relative error = 1.42603551077415370000000000000E-13 "%" Correct digits = 15 h = 1.000E-3 " " "NO POLE" " " "TOP MAIN SOLVE Loop" x[1] = 0.6710000000000005 " " y[1] (analytic) = 0.13643261614666677 " " y[1] (numeric) = 0.1364326161466669 " " absolute error = 1.38777878078144570000000000000000E-16 " " relative error = 1.01718989196070680000000000000E-13 "%" Correct digits = 15 h = 1.000E-3 " " "NO POLE" " " "TOP MAIN SOLVE Loop" x[1] = 0.6720000000000005 " " y[1] (analytic) = 0.13662123264000012 " " y[1] (numeric) = 0.13662123264000023 " " absolute error = 1.11022302462515650000000000000000E-16 " " relative error = 8.12628464237779200000000000000E-14 "%" Correct digits = 16 h = 1.000E-3 " " "NO POLE" " " "TOP MAIN SOLVE Loop" x[1] = 0.6730000000000005 " " y[1] (analytic) = 0.13681002289333344 " " y[1] (numeric) = 0.13681002289333355 " " absolute error = 1.11022302462515650000000000000000E-16 " " relative error = 8.11507081970714400000000000000E-14 "%" Correct digits = 16 h = 1.000E-3 " " "NO POLE" " " "TOP MAIN SOLVE Loop" x[1] = 0.6740000000000005 " " y[1] (analytic) = 0.13699898698666674 " " y[1] (numeric) = 0.13699898698666688 " " absolute error = 1.38777878078144570000000000000000E-16 " " relative error = 1.01298470251937670000000000000E-13 "%" Correct digits = 15 h = 1.000E-3 " " "NO POLE" " " "TOP MAIN SOLVE Loop" x[1] = 0.6750000000000005 " " y[1] (analytic) = 0.13718812500000008 " " y[1] (numeric) = 0.13718812500000022 " " absolute error = 1.38777878078144570000000000000000E-16 " " relative error = 1.01158812454171590000000000000E-13 "%" Correct digits = 15 h = 1.000E-3 " " "NO POLE" " " "TOP MAIN SOLVE Loop" x[1] = 0.6760000000000005 " " y[1] (analytic) = 0.13737743701333344 " " y[1] (numeric) = 0.13737743701333355 " " absolute error = 1.11022302462515650000000000000000E-16 " " relative error = 8.0815529009862200000000000000E-14 "%" Correct digits = 16 h = 1.000E-3 " " "NO POLE" " " "TOP MAIN SOLVE Loop" x[1] = 0.6770000000000005 " " y[1] (analytic) = 0.1375669231066668 " " y[1] (numeric) = 0.13756692310666688 " " absolute error = 8.32667268468867400000000000000000E-17 " " relative error = 6.05281596523920900000000000000E-14 "%" Correct digits = 16 h = 1.000E-3 " " "NO POLE" " " "TOP MAIN SOLVE Loop" x[1] = 0.6780000000000005 " " y[1] (analytic) = 0.1377565833600001 " " y[1] (numeric) = 0.1377565833600002 " " absolute error = 1.11022302462515650000000000000000E-16 " " relative error = 8.05931010733479200000000000000E-14 "%" Correct digits = 16 h = 1.000E-3 " " "NO POLE" " " "TOP MAIN SOLVE Loop" x[1] = 0.6790000000000005 " " y[1] (analytic) = 0.13794641785333342 " " y[1] (numeric) = 0.13794641785333356 " " absolute error = 1.38777878078144570000000000000000E-16 " " relative error = 1.00602741439574870000000000000E-13 "%" Correct digits = 15 h = 1.000E-3 " " "NO POLE" " " "TOP MAIN SOLVE Loop" x[1] = 0.6800000000000005 " " y[1] (analytic) = 0.13813642666666673 " " y[1] (numeric) = 0.1381364266666669 " " absolute error = 1.66533453693773480000000000000000E-16 " " relative error = 1.20557232956105670000000000000E-13 "%" Correct digits = 15 h = 1.000E-3 " " "NO POLE" " " "TOP MAIN SOLVE Loop" x[1] = 0.6810000000000005 " " y[1] (analytic) = 0.1383266098800001 " " y[1] (numeric) = 0.13832660988000023 " " absolute error = 1.38777878078144570000000000000000E-16 " " relative error = 1.00326233830595540000000000000E-13 "%" Correct digits = 15 h = 1.000E-3 " " "NO POLE" " " "TOP MAIN SOLVE Loop" x[1] = 0.6820000000000005 " " y[1] (analytic) = 0.13851696757333345 " " y[1] (numeric) = 0.13851696757333357 " " absolute error = 1.11022302462515650000000000000000E-16 " " relative error = 8.01506879680558900000000000000E-14 "%" Correct digits = 16 h = 1.000E-3 " " "NO POLE" " " "TOP MAIN SOLVE Loop" x[1] = 0.6830000000000005 " " y[1] (analytic) = 0.13870749982666677 " " y[1] (numeric) = 0.13870749982666689 " " absolute error = 1.11022302462515650000000000000000E-16 " " relative error = 8.00405908845971500000000000000E-14 "%" Correct digits = 16 h = 1.000E-3 " " "NO POLE" " " "TOP MAIN SOLVE Loop" x[1] = 0.6840000000000005 " " y[1] (analytic) = 0.13889820672000006 " " y[1] (numeric) = 0.13889820672000022 " " absolute error = 1.66533453693773480000000000000000E-16 " " relative error = 1.19896043027742140000000000000E-13 "%" Correct digits = 15 h = 1.000E-3 " " "NO POLE" " " "TOP MAIN SOLVE Loop" x[1] = 0.6850000000000005 " " y[1] (analytic) = 0.13908908833333342 " " y[1] (numeric) = 0.13908908833333355 " " absolute error = 1.38777878078144570000000000000000E-16 " " relative error = 9.97762511359316600000000000000E-14 "%" Correct digits = 16 h = 1.000E-3 " " "NO POLE" " " "TOP MAIN SOLVE Loop" x[1] = 0.6860000000000005 " " y[1] (analytic) = 0.13928014474666675 " " y[1] (numeric) = 0.1392801447466669 " " absolute error = 1.38777878078144570000000000000000E-16 " " relative error = 9.96393838695129500000000000000E-14 "%" Correct digits = 16 h = 1.000E-3 " " "NO POLE" " " "TOP MAIN SOLVE Loop" x[1] = 0.6870000000000005 " " y[1] (analytic) = 0.13947137604000012 " " y[1] (numeric) = 0.13947137604000023 " " absolute error = 1.11022302462515650000000000000000E-16 " " relative error = 7.96022134539453300000000000000E-14 "%" Correct digits = 16 h = 1.000E-3 " " "NO POLE" " " "TOP MAIN SOLVE Loop" x[1] = 0.6880000000000005 " " y[1] (analytic) = 0.13966278229333343 " " y[1] (numeric) = 0.13966278229333356 " " absolute error = 1.38777878078144570000000000000000E-16 " " relative error = 9.93663994081613800000000000000E-14 "%" Correct digits = 16 h = 1.000E-3 " " "NO POLE" " " "TOP MAIN SOLVE Loop" x[1] = 0.6890000000000005 " " y[1] (analytic) = 0.13985436358666675 " " y[1] (numeric) = 0.1398543635866669 " " absolute error = 1.38777878078144570000000000000000E-16 " " relative error = 9.9230281071741400000000000000E-14 "%" Correct digits = 16 h = 1.000E-3 " " "NO POLE" " " "TOP MAIN SOLVE Loop" x[1] = 0.6900000000000005 " " y[1] (analytic) = 0.14004612000000005 " " y[1] (numeric) = 0.14004612000000022 " " absolute error = 1.66533453693773480000000000000000E-16 " " relative error = 1.18913293487726350000000000000E-13 "%" Correct digits = 15 h = 1.000E-3 " " "NO POLE" " " "TOP MAIN SOLVE Loop" x[1] = 0.6910000000000005 " " y[1] (analytic) = 0.14023805161333344 " " y[1] (numeric) = 0.14023805161333355 " " absolute error = 1.11022302462515650000000000000000E-16 " " relative error = 7.91670314763271900000000000000E-14 "%" Correct digits = 16 h = 1.000E-3 " " "NO POLE" " " "TOP MAIN SOLVE Loop" x[1] = 0.6920000000000005 " " y[1] (analytic) = 0.1404301585066668 " " y[1] (numeric) = 0.14043015850666687 " " absolute error = 8.32667268468867400000000000000000E-17 " " relative error = 5.9294048894015690000000000000E-14 "%" Correct digits = 16 h = 1.000E-3 " " "NO POLE" " " "TOP MAIN SOLVE Loop" x[1] = 0.6930000000000005 " " y[1] (analytic) = 0.1406224407600001 " " y[1] (numeric) = 0.14062244076000022 " " absolute error = 1.11022302462515650000000000000000E-16 " " relative error = 7.89506296879010100000000000000E-14 "%" Correct digits = 16 h = 1.000E-3 " " "NO POLE" " " "TOP MAIN SOLVE Loop" x[1] = 0.6940000000000005 " " y[1] (analytic) = 0.14081489845333342 " " y[1] (numeric) = 0.14081489845333356 " " absolute error = 1.38777878078144570000000000000000E-16 " " relative error = 9.85534056427531200000000000000E-14 "%" Correct digits = 16 h = 1.000E-3 " " "NO POLE" " " "TOP MAIN SOLVE Loop" x[1] = 0.6950000000000005 " " y[1] (analytic) = 0.1410075316666667 " " y[1] (numeric) = 0.14100753166666688 " " absolute error = 1.66533453693773480000000000000000E-16 " " relative error = 1.18102523833583940000000000000E-13 "%" Correct digits = 15 h = 1.000E-3 " " "NO POLE" " " "TOP MAIN SOLVE Loop" x[1] = 0.6960000000000005 " " y[1] (analytic) = 0.1412003404800001 " " y[1] (numeric) = 0.1412003404800002 " " absolute error = 1.11022302462515650000000000000000E-16 " " relative error = 7.86275033651502200000000000000E-14 "%" Correct digits = 16 h = 1.000E-3 " " "NO POLE" " " "TOP MAIN SOLVE Loop" x[1] = 0.6970000000000005 " " y[1] (analytic) = 0.14139332497333346 " " y[1] (numeric) = 0.14139332497333354 " " absolute error = 8.32667268468867400000000000000000E-17 " " relative error = 5.88901398722964400000000000000E-14 "%" Correct digits = 16 h = 1.000E-3 " " "NO POLE" " " "TOP MAIN SOLVE Loop" x[1] = 0.6980000000000005 " " y[1] (analytic) = 0.14158648522666678 " " y[1] (numeric) = 0.14158648522666686 " " absolute error = 8.32667268468867400000000000000000E-17 " " relative error = 5.88097986284386400000000000000E-14 "%" Correct digits = 16 h = 1.000E-3 " " "NO POLE" " " "TOP MAIN SOLVE Loop" x[1] = 0.6990000000000005 " " y[1] (analytic) = 0.1417798213200001 " " y[1] (numeric) = 0.1417798213200002 " " absolute error = 8.32667268468867400000000000000000E-17 " " relative error = 5.87296034595444700000000000000E-14 "%" Correct digits = 16 h = 1.000E-3 " " "NO POLE" " " "TOP MAIN SOLVE Loop" x[1] = 0.7000000000000005 " " y[1] (analytic) = 0.1419733333333334 " " y[1] (numeric) = 0.14197333333333353 " " absolute error = 1.38777878078144570000000000000000E-16 " " relative error = 9.77492567229605300000000000000E-14 "%" Correct digits = 16 h = 1.000E-3 " " "NO POLE" " " "TOP MAIN SOLVE Loop" x[1] = 0.7010000000000005 " " y[1] (analytic) = 0.14216702134666676 " " y[1] (numeric) = 0.14216702134666687 " " absolute error = 1.11022302462515650000000000000000E-16 " " relative error = 7.80928666936009400000000000000E-14 "%" Correct digits = 16 h = 1.000E-3 " " "NO POLE" " " "TOP MAIN SOLVE Loop" x[1] = 0.7020000000000005 " " y[1] (analytic) = 0.14236088544000014 " " y[1] (numeric) = 0.1423608854400002 " " absolute error = 5.55111512312578300000000000000000E-17 " " relative error = 3.89932607258569800000000000000E-14 "%" Correct digits = 16 h = 1.000E-3 " " "NO POLE" " " "TOP MAIN SOLVE Loop" x[1] = 0.7030000000000005 " " y[1] (analytic) = 0.14255492569333345 " " y[1] (numeric) = 0.14255492569333353 " " absolute error = 8.32667268468867400000000000000000E-17 " " relative error = 5.841027691039700000000000000E-14 "%" Correct digits = 16 h = 1.000E-3 " " "NO POLE" " " "TOP MAIN SOLVE Loop" x[1] = 0.7040000000000005 " " y[1] (analytic) = 0.14274914218666676 " " y[1] (numeric) = 0.14274914218666687 " " absolute error = 1.11022302462515650000000000000000E-16 " " relative error = 7.77744095423961800000000000000E-14 "%" Correct digits = 16 h = 1.000E-3 " " "NO POLE" " " "TOP MAIN SOLVE Loop" x[1] = 0.7050000000000005 " " y[1] (analytic) = 0.14294353500000007 " " y[1] (numeric) = 0.1429435350000002 " " absolute error = 1.38777878078144570000000000000000E-16 " " relative error = 9.70858025010676400000000000000E-14 "%" Correct digits = 16 h = 1.000E-3 " " "NO POLE" " " "TOP MAIN SOLVE Loop" x[1] = 0.7060000000000005 " " y[1] (analytic) = 0.14313810421333342 " " y[1] (numeric) = 0.14313810421333353 " " absolute error = 1.11022302462515650000000000000000E-16 " " relative error = 7.75630661539625500000000000000E-14 "%" Correct digits = 16 h = 1.000E-3 " " "NO POLE" " " "TOP MAIN SOLVE Loop" x[1] = 0.7070000000000005 " " y[1] (analytic) = 0.1433328499066668 " " y[1] (numeric) = 0.14333284990666686 " " absolute error = 5.55111512312578300000000000000000E-17 " " relative error = 3.872884078381521600000000000000E-14 "%" Correct digits = 16 h = 1.000E-3 " " "NO POLE" "Finished!" "Maximum Time Reached before Solution Completed!" "diff ( y , x , 1 ) = expt((0.2 * x + 0.3) , 2.0);" Iterations = 608 "Total Elapsed Time "= 0 Years 0 Days 0 Hours 3 Minutes 0 Seconds "Elapsed Time(since restart) "= 0 Years 0 Days 0 Hours 3 Minutes 0 Seconds "Expected Time Remaining "= 0 Years 0 Days 0 Hours 21 Minutes 12 Seconds "Optimized Time Remaining "= 0 Years 0 Days 0 Hours 21 Minutes 8 Seconds "Expected Total Time "= 0 Years 0 Days 0 Hours 24 Minutes 9 Seconds "Time to Timeout " Unknown Percent Done = 12.42857142857144 "%" (%o57) true (%o57) diffeq.max