(%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) display_poles() := block([rad_given], if glob_type_given_pole = 4 then (rad_given : sqrt(expt(array_given_rad_poles , 2.0) 1, 2 + expt(array_x - array_given_rad_poles , 2.0)), 1 1, 1 omniout_float(ALWAYS, "Radius of convergence (given) for eq 1 ", 4, rad_given, 4, " "), omniout_float(ALWAYS, "Order of pole (given) ", 4, array_given_ord_poles , 4, " ")) elseif glob_type_given_pole = 3 1, 1 then omniout_str(ALWAYS, "NO POLE (given) for Equation 1") else omniout_str(ALWAYS, "NO INFO (given) for Equation 1"), if array_poles # glob_large_float then (omniout_float(ALWAYS, 1, 1 "Radius of convergence (ratio test) for eq 1 ", 4, array_poles , 4, 1, 1 " "), omniout_str(ALWAYS, "Order of pole (ratio test) Not computed")) else omniout_str(ALWAYS, "NO POLE (ratio test) for Equation 1"), if (array_real_poles > 0.0) and (array_real_poles # glob_large_float) 1, 1 1, 1 then (omniout_float(ALWAYS, "Radius of convergence (three term test) for eq 1 ", 4, array_real_poles , 1, 1 4, " "), omniout_float(ALWAYS, "Order of pole (three term test) ", 4, array_real_poles , 1, 2 4, " ")) else omniout_str(ALWAYS, "NO REAL POLE (three term test) for Equation 1"), if (array_complex_poles > 0.0) and (array_complex_poles # 1, 1 1, 1 glob_large_float) then (omniout_float(ALWAYS, "Radius of convergence (six term test) for eq 1 ", 4, array_complex_poles , 4, " "), omniout_float(ALWAYS, 1, 1 "Order of pole (six term test) ", 4, array_complex_poles , 4, " ")) else omniout_str(ALWAYS, 1, 2 "NO COMPLEX POLE (six term test) for Equation 1")) (%o3) display_poles() := block([rad_given], if glob_type_given_pole = 4 then (rad_given : sqrt(expt(array_given_rad_poles , 2.0) 1, 2 + expt(array_x - array_given_rad_poles , 2.0)), 1 1, 1 omniout_float(ALWAYS, "Radius of convergence (given) for eq 1 ", 4, rad_given, 4, " "), omniout_float(ALWAYS, "Order of pole (given) ", 4, array_given_ord_poles , 4, " ")) elseif glob_type_given_pole = 3 1, 1 then omniout_str(ALWAYS, "NO POLE (given) for Equation 1") else omniout_str(ALWAYS, "NO INFO (given) for Equation 1"), if array_poles # glob_large_float then (omniout_float(ALWAYS, 1, 1 "Radius of convergence (ratio test) for eq 1 ", 4, array_poles , 4, 1, 1 " "), omniout_str(ALWAYS, "Order of pole (ratio test) Not computed")) else omniout_str(ALWAYS, "NO POLE (ratio test) for Equation 1"), if (array_real_poles > 0.0) and (array_real_poles # glob_large_float) 1, 1 1, 1 then (omniout_float(ALWAYS, "Radius of convergence (three term test) for eq 1 ", 4, array_real_poles , 1, 1 4, " "), omniout_float(ALWAYS, "Order of pole (three term test) ", 4, array_real_poles , 1, 2 4, " ")) else omniout_str(ALWAYS, "NO REAL POLE (three term test) for Equation 1"), if (array_complex_poles > 0.0) and (array_complex_poles # 1, 1 1, 1 glob_large_float) then (omniout_float(ALWAYS, "Radius of convergence (six term test) for eq 1 ", 4, array_complex_poles , 4, " "), omniout_float(ALWAYS, 1, 1 "Order of pole (six term test) ", 4, array_complex_poles , 4, " ")) else omniout_str(ALWAYS, 1, 2 "NO COMPLEX POLE (six term test) for Equation 1")) (%i4) check_sign(x0, xf) := block([ret], if xf > x0 then ret : 1.0 else ret : - 1.0, ret) (%o4) check_sign(x0, xf) := block([ret], if xf > x0 then ret : 1.0 else ret : - 1.0, ret) (%i5) 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) (%o5) 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) (%i6) test_suggested_h() := block([max_estimated_step_error, hn_div_ho, hn_div_ho_2, hn_div_ho_3, no_terms, est_tmp], max_estimated_step_error : 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, ""), est_tmp : 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 est_tmp >= max_estimated_step_error then max_estimated_step_error : est_tmp, omniout_float(ALWAYS, "max_estimated_step_error", 32, max_estimated_step_error, 32, ""), max_estimated_step_error) (%o6) test_suggested_h() := block([max_estimated_step_error, hn_div_ho, hn_div_ho_2, hn_div_ho_3, no_terms, est_tmp], max_estimated_step_error : 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, ""), est_tmp : 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 est_tmp >= max_estimated_step_error then max_estimated_step_error : est_tmp, omniout_float(ALWAYS, "max_estimated_step_error", 32, max_estimated_step_error, 32, ""), max_estimated_step_error) (%i7) 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)) (%o7) 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)) (%i8) 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 : 3 - 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, " ")))) (%o8) 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 : 3 - 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, " ")))) (%i9) adjust_for_pole(h_param) := (block([hnew, sz2, tmp], hnew : h_param, glob_normmax : glob_small_float, if omniabs(array_y_higher ) > 1, 1 glob_small_float 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 (%o9) adjust_for_pole(h_param) := (block([hnew, sz2, tmp], hnew : h_param, glob_normmax : glob_small_float, if omniabs(array_y_higher ) > 1, 1 glob_small_float 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 (%i10) 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, "%")) (%o10) 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, "%")) (%i11) 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_sing, h_new, ratio, term, local_test, tmp_rad, tmp_ratio, prev_tmp_rad], array_pole : glob_large_float, array_pole : glob_large_float, 1 2 tmp_rad : glob_large_float, prev_tmp_rad : glob_large_float, tmp_ratio : glob_large_float, rad_c : glob_large_float, array_poles : glob_large_float, array_poles : glob_large_float, 1, 1 1, 2 found_sing : 1, n : - 10 - 1 + glob_max_terms, cnt : 0, while (cnt < 5) and (found_sing = 1) do (if (omniabs(array_y_higher ) = 1, n 0.0) or (omniabs(array_y_higher ) = 0.0) then found_sing : 0 1, 1 + n array_y_higher glob_h 1, n tmp_rad else (tmp_rad : omniabs(-------------------------), tmp_ratio : ------------, array_y_higher prev_tmp_rad 1, 1 + n if (cnt > 0) and (tmp_ratio < 2.0) and (tmp_ratio > 0.5) then (if tmp_rad < rad_c then rad_c : tmp_rad) elseif cnt = 0 then (if tmp_rad < rad_c then rad_c : tmp_rad) elseif cnt > 0 then found_sing : 0), prev_tmp_rad : tmp_rad, cnt : 1 + cnt, n : 1 + n), if found_sing = 1 then (if rad_c < array_pole 1 then (array_pole : rad_c, array_poles : rad_c)), n : glob_max_terms, 1 1, 1 m : - 1 - 1 + n, while (m >= 10) and ((omniabs(array_y_higher ) = 0.0) 1, m or (omniabs(array_y_higher ) = 0.0) 1, m - 1 or (omniabs(array_y_higher ) = 0.0)) do m : m - 1, 1, m - 2 array_y_higher array_y_higher 1, m 1, m - 1 if m > 10 then (rm0 : ----------------------, rm1 : ----------------------, array_y_higher array_y_higher 1, m - 1 1, m - 2 hdrc : convfloat(m) rm0 - convfloat(m - 1) rm1, glob_h if omniabs(hdrc) > 0.0 then (rcs : ------, hdrc rm1 convfloat((m - 2) (m - 2)) - rm0 convfloat(m - 3) ord_no : -----------------------------------------------------, hdrc array_real_poles : rcs, array_real_poles : ord_no) 1, 1 1, 2 else (array_real_poles : glob_large_float, 1, 1 array_real_poles : glob_large_float)) 1, 2 else (array_real_poles : glob_large_float, 1, 1 array_real_poles : 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 0.0 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) 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) = 0.0) rm4 rm3 rm2 or (omniabs(dr1) = 0.0) then (rad_c : glob_large_float, ord_no : glob_large_float) else (if omniabs(nr1 dr2 - nr2 dr1) # 0.0 dr1 dr2 - ds2 dr1 + ds1 dr2 then (rcs : ---------------------------, nr1 dr2 - nr2 dr1 rcs nr1 - ds1 convfloat(m) ord_no : ------------- - ------------, 2.0 dr1 2.0 if omniabs(rcs) # 0.0 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_poles : rad_c, 1, 1 array_complex_poles : ord_no), if array_pole glob_ratio_of_radius < 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_poles()) (%o11) 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_sing, h_new, ratio, term, local_test, tmp_rad, tmp_ratio, prev_tmp_rad], array_pole : glob_large_float, array_pole : glob_large_float, 1 2 tmp_rad : glob_large_float, prev_tmp_rad : glob_large_float, tmp_ratio : glob_large_float, rad_c : glob_large_float, array_poles : glob_large_float, array_poles : glob_large_float, 1, 1 1, 2 found_sing : 1, n : - 10 - 1 + glob_max_terms, cnt : 0, while (cnt < 5) and (found_sing = 1) do (if (omniabs(array_y_higher ) = 1, n 0.0) or (omniabs(array_y_higher ) = 0.0) then found_sing : 0 1, 1 + n array_y_higher glob_h 1, n tmp_rad else (tmp_rad : omniabs(-------------------------), tmp_ratio : ------------, array_y_higher prev_tmp_rad 1, 1 + n if (cnt > 0) and (tmp_ratio < 2.0) and (tmp_ratio > 0.5) then (if tmp_rad < rad_c then rad_c : tmp_rad) elseif cnt = 0 then (if tmp_rad < rad_c then rad_c : tmp_rad) elseif cnt > 0 then found_sing : 0), prev_tmp_rad : tmp_rad, cnt : 1 + cnt, n : 1 + n), if found_sing = 1 then (if rad_c < array_pole 1 then (array_pole : rad_c, array_poles : rad_c)), n : glob_max_terms, 1 1, 1 m : - 1 - 1 + n, while (m >= 10) and ((omniabs(array_y_higher ) = 0.0) 1, m or (omniabs(array_y_higher ) = 0.0) 1, m - 1 or (omniabs(array_y_higher ) = 0.0)) do m : m - 1, 1, m - 2 array_y_higher array_y_higher 1, m 1, m - 1 if m > 10 then (rm0 : ----------------------, rm1 : ----------------------, array_y_higher array_y_higher 1, m - 1 1, m - 2 hdrc : convfloat(m) rm0 - convfloat(m - 1) rm1, glob_h if omniabs(hdrc) > 0.0 then (rcs : ------, hdrc rm1 convfloat((m - 2) (m - 2)) - rm0 convfloat(m - 3) ord_no : -----------------------------------------------------, hdrc array_real_poles : rcs, array_real_poles : ord_no) 1, 1 1, 2 else (array_real_poles : glob_large_float, 1, 1 array_real_poles : glob_large_float)) 1, 2 else (array_real_poles : glob_large_float, 1, 1 array_real_poles : 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 0.0 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) 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) = 0.0) rm4 rm3 rm2 or (omniabs(dr1) = 0.0) then (rad_c : glob_large_float, ord_no : glob_large_float) else (if omniabs(nr1 dr2 - nr2 dr1) # 0.0 dr1 dr2 - ds2 dr1 + ds1 dr2 then (rcs : ---------------------------, nr1 dr2 - nr2 dr1 rcs nr1 - ds1 convfloat(m) ord_no : ------------- - ------------, 2.0 dr1 2.0 if omniabs(rcs) # 0.0 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_poles : rad_c, 1, 1 array_complex_poles : ord_no), if array_pole glob_ratio_of_radius < 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_poles()) (%i12) 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 (%o12) 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 (%i13) 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 , array_tmp3 : exp(array_x ), 1 1 1 1 1 array_tmp2 1 array_tmp4 : -----------, array_tmp5 : array_tmp4 + array_const_0D0 , 1 array_tmp3 1 1 1 1 if not array_y_set_initial then (if 1 <= glob_max_terms 1, 2 then (temporary : array_tmp5 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_tmp3 array_x 1 2 array_tmp3 : --------------------, array_tmp4 : 2 1 2 array_tmp2 - array_tmp4 array_tmp3 2 1 2 -------------------------------------, array_tmp5 : array_tmp4 , array_tmp3 2 2 1 if not array_y_set_initial then (if 2 <= glob_max_terms 1, 3 then (temporary : array_tmp5 expt(glob_h, 1) factorial_3(1, 2), 2 array_y : temporary, array_y_higher : temporary, 3 1, 3 temporary 2.0 temporary : -------------, array_y_higher : temporary, 0)), kkk : 3, glob_h 2, 2 array_tmp3 array_x 2 2 array_tmp3 : --------------------, array_tmp4 : 3 2 3 - ats(3, array_tmp3, array_tmp4, 2) -----------------------------------, array_tmp5 : array_tmp4 , array_tmp3 3 3 1 if not array_y_set_initial then (if 3 <= glob_max_terms 1, 4 then (temporary : array_tmp5 expt(glob_h, 1) factorial_3(2, 3), 3 array_y : temporary, array_y_higher : temporary, 4 1, 4 temporary 3.0 temporary : -------------, array_y_higher : temporary, 0)), kkk : 4, glob_h 2, 3 array_tmp3 array_x 3 2 array_tmp3 : --------------------, array_tmp4 : 4 3 4 - ats(4, array_tmp3, array_tmp4, 2) -----------------------------------, array_tmp5 : array_tmp4 , array_tmp3 4 4 1 if not array_y_set_initial then (if 4 <= glob_max_terms 1, 5 then (temporary : array_tmp5 expt(glob_h, 1) factorial_3(3, 4), 4 array_y : temporary, array_y_higher : temporary, 5 1, 5 temporary 4.0 temporary : -------------, array_y_higher : temporary, 0)), kkk : 5, glob_h 2, 4 array_tmp3 array_x 4 2 array_tmp3 : --------------------, array_tmp4 : 5 4 5 - ats(5, array_tmp3, array_tmp4, 2) -----------------------------------, array_tmp5 : array_tmp4 , array_tmp3 5 5 1 if not array_y_set_initial then (if 5 <= glob_max_terms 1, 6 then (temporary : array_tmp5 expt(glob_h, 1) factorial_3(4, 5), 5 array_y : temporary, array_y_higher : temporary, 6 1, 6 temporary 5.0 temporary : -------------, array_y_higher : temporary, 0)), kkk : 6, glob_h 2, 5 array_tmp3 array_x kkk - 1 2 while kkk <= glob_max_terms do (array_tmp3 : --------------------------, kkk kkk - 1 - ats(kkk, array_tmp3, array_tmp4, 2) array_tmp4 : -------------------------------------, kkk array_tmp3 1 array_tmp5 : array_tmp4 , order_d : 1, kkk kkk if order_d + kkk < glob_max_terms then (if not subscript(array_y_set_initial, 1, order_d + kkk) then (temporary : array_tmp5 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)) (%o13) 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 , array_tmp3 : exp(array_x ), 1 1 1 1 1 array_tmp2 1 array_tmp4 : -----------, array_tmp5 : array_tmp4 + array_const_0D0 , 1 array_tmp3 1 1 1 1 if not array_y_set_initial then (if 1 <= glob_max_terms 1, 2 then (temporary : array_tmp5 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_tmp3 array_x 1 2 array_tmp3 : --------------------, array_tmp4 : 2 1 2 array_tmp2 - array_tmp4 array_tmp3 2 1 2 -------------------------------------, array_tmp5 : array_tmp4 , array_tmp3 2 2 1 if not array_y_set_initial then (if 2 <= glob_max_terms 1, 3 then (temporary : array_tmp5 expt(glob_h, 1) factorial_3(1, 2), 2 array_y : temporary, array_y_higher : temporary, 3 1, 3 temporary 2.0 temporary : -------------, array_y_higher : temporary, 0)), kkk : 3, glob_h 2, 2 array_tmp3 array_x 2 2 array_tmp3 : --------------------, array_tmp4 : 3 2 3 - ats(3, array_tmp3, array_tmp4, 2) -----------------------------------, array_tmp5 : array_tmp4 , array_tmp3 3 3 1 if not array_y_set_initial then (if 3 <= glob_max_terms 1, 4 then (temporary : array_tmp5 expt(glob_h, 1) factorial_3(2, 3), 3 array_y : temporary, array_y_higher : temporary, 4 1, 4 temporary 3.0 temporary : -------------, array_y_higher : temporary, 0)), kkk : 4, glob_h 2, 3 array_tmp3 array_x 3 2 array_tmp3 : --------------------, array_tmp4 : 4 3 4 - ats(4, array_tmp3, array_tmp4, 2) -----------------------------------, array_tmp5 : array_tmp4 , array_tmp3 4 4 1 if not array_y_set_initial then (if 4 <= glob_max_terms 1, 5 then (temporary : array_tmp5 expt(glob_h, 1) factorial_3(3, 4), 4 array_y : temporary, array_y_higher : temporary, 5 1, 5 temporary 4.0 temporary : -------------, array_y_higher : temporary, 0)), kkk : 5, glob_h 2, 4 array_tmp3 array_x 4 2 array_tmp3 : --------------------, array_tmp4 : 5 4 5 - ats(5, array_tmp3, array_tmp4, 2) -----------------------------------, array_tmp5 : array_tmp4 , array_tmp3 5 5 1 if not array_y_set_initial then (if 5 <= glob_max_terms 1, 6 then (temporary : array_tmp5 expt(glob_h, 1) factorial_3(4, 5), 5 array_y : temporary, array_y_higher : temporary, 6 1, 6 temporary 5.0 temporary : -------------, array_y_higher : temporary, 0)), kkk : 6, glob_h 2, 5 array_tmp3 array_x kkk - 1 2 while kkk <= glob_max_terms do (array_tmp3 : --------------------------, kkk kkk - 1 - ats(kkk, array_tmp3, array_tmp4, 2) array_tmp4 : -------------------------------------, kkk array_tmp3 1 array_tmp5 : array_tmp4 , order_d : 1, kkk kkk if order_d + kkk < glob_max_terms then (if not subscript(array_y_set_initial, 1, order_d + kkk) then (temporary : array_tmp5 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) (%i14) log10(x) := --------- log(10.0) log(x) (%o14) log10(x) := --------- log(10.0) (%i15) omniout_str(iolevel, str) := if glob_iolevel >= iolevel then printf(true, "~a~%", string(str)) (%o15) omniout_str(iolevel, str) := if glob_iolevel >= iolevel then printf(true, "~a~%", string(str)) (%i16) omniout_str_noeol(iolevel, str) := if glob_iolevel >= iolevel then printf(true, "~a", string(str)) (%o16) omniout_str_noeol(iolevel, str) := if glob_iolevel >= iolevel then printf(true, "~a", string(str)) (%i17) omniout_labstr(iolevel, label, str) := if glob_iolevel >= iolevel then printf(true, "~a = ~a~%", string(label), string(str)) (%o17) omniout_labstr(iolevel, label, str) := if glob_iolevel >= iolevel then printf(true, "~a = ~a~%", string(label), string(str)) (%i18) 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)) (%o18) 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)) (%i19) omniout_int(iolevel, prelabel, prelen, value, vallen, postlabel) := if glob_iolevel >= iolevel then (printf(true, "~a = ~d ~a~%", prelabel, value, postlabel), newline()) (%o19) omniout_int(iolevel, prelabel, prelen, value, vallen, postlabel) := if glob_iolevel >= iolevel then (printf(true, "~a = ~d ~a~%", prelabel, value, postlabel), newline()) (%i20) omniout_float_arr(iolevel, prelabel, elemnt, prelen, value, vallen, postlabel) := if glob_iolevel >= iolevel then (sprint(prelabel, "[", elemnt, "]=", value, postlabel), newline()) (%o20) omniout_float_arr(iolevel, prelabel, elemnt, prelen, value, vallen, postlabel) := if glob_iolevel >= iolevel then (sprint(prelabel, "[", elemnt, "]=", value, postlabel), newline()) (%i21) 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 (%o21) 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 (%i22) 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 (%o22) 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 (%i23) 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)) (%o23) 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)) (%i24) 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, "~%")) (%o24) 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, "~%")) (%i25) 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~%")) (%o25) 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~%")) (%i26) 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) (%o26) 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) (%i27) 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) (%o27) 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) (%i28) display_pole_debug(typ, m, radius, order2) := (if typ = 1 then omniout_str(ALWAYS, "Real") else omniout_str(ALWAYS, "Complex"), omniout_int(ALWAYS, "m", 4, m, 4, " "), omniout_float(ALWAYS, "DBG Radius of convergence ", 4, radius, 4, " "), omniout_float(ALWAYS, "DBG Order of pole ", 4, order2, 4, " ")) (%o28) display_pole_debug(typ, m, radius, order2) := (if typ = 1 then omniout_str(ALWAYS, "Real") else omniout_str(ALWAYS, "Complex"), omniout_int(ALWAYS, "m", 4, m, 4, " "), omniout_float(ALWAYS, "DBG Radius of convergence ", 4, radius, 4, " "), omniout_float(ALWAYS, "DBG Order of pole ", 4, order2, 4, " ")) (%i29) logditto(file) := (printf(file, ""), printf(file, "ditto"), printf(file, "")) (%o29) logditto(file) := (printf(file, ""), printf(file, "ditto"), printf(file, "")) (%i30) logitem_integer(file, n) := (printf(file, ""), printf(file, "~d", n), printf(file, "")) (%o30) logitem_integer(file, n) := (printf(file, ""), printf(file, "~d", n), printf(file, "")) (%i31) logitem_str(file, str) := (printf(file, ""), printf(file, str), printf(file, "")) (%o31) logitem_str(file, str) := (printf(file, ""), printf(file, str), printf(file, "")) (%i32) logitem_good_digits(file, rel_error) := block([good_digits], printf(file, ""), if rel_error # - 1.0 then (if rel_error > + 1.0E-34 then (good_digits : 1 - floor(log10(rel_error)), printf(file, "~d", good_digits)) else (good_digits : 16, printf(file, "~d", good_digits))) else printf(file, "Unknown"), printf(file, "")) (%o32) logitem_good_digits(file, rel_error) := block([good_digits], printf(file, ""), if rel_error # - 1.0 then (if rel_error > + 1.0E-34 then (good_digits : 1 - floor(log10(rel_error)), printf(file, "~d", good_digits)) else (good_digits : 16, printf(file, "~d", good_digits))) else printf(file, "Unknown"), printf(file, "")) (%i33) log_revs(file, revs) := printf(file, revs) (%o33) log_revs(file, revs) := printf(file, revs) (%i34) logitem_float(file, x) := (printf(file, ""), printf(file, "~g", x), printf(file, "")) (%o34) logitem_float(file, x) := (printf(file, ""), printf(file, "~g", x), printf(file, "")) (%i35) logitem_pole(file, pole) := (printf(file, ""), if pole = 0 then printf(file, "NA") elseif pole = 1 then printf(file, "Real") elseif pole = 2 then printf(file, "Complex") elseif pole = 4 then printf(file, "Yes") else printf(file, "No"), printf(file, "")) (%o35) logitem_pole(file, pole) := (printf(file, ""), if pole = 0 then printf(file, "NA") elseif pole = 1 then printf(file, "Real") elseif pole = 2 then printf(file, "Complex") elseif pole = 4 then printf(file, "Yes") else printf(file, "No"), printf(file, "")) (%i36) logstart(file) := printf(file, "") (%o36) logstart(file) := printf(file, "") (%i37) logend(file) := printf(file, "~%") (%o37) logend(file) := printf(file, "~%") (%i38) chk_data() := block([errflag], errflag : false, if (glob_max_terms < 15) or (glob_max_terms > 512) then (omniout_str(ALWAYS, "Illegal max_terms = -- Using 30"), glob_max_terms : 30), if glob_max_iter < 2 then (omniout_str(ALWAYS, "Illegal max_iter"), errflag : true), if errflag then quit()) (%o38) chk_data() := block([errflag], errflag : false, if (glob_max_terms < 15) or (glob_max_terms > 512) then (omniout_str(ALWAYS, "Illegal max_terms = -- Using 30"), glob_max_terms : 30), if glob_max_iter < 2 then (omniout_str(ALWAYS, "Illegal max_iter"), errflag : true), if errflag then quit()) (%i39) comp_expect_sec(t_end2, t_start2, t2, clock_sec2) := block([ms2, rrr, sec_left, sub1, sub2], ms2 : clock_sec2, sub1 : t_end2 - t_start2, sub2 : t2 - t_start2, if sub1 = 0.0 then sec_left : 0.0 else (if sub2 > 0.0 sub1 then (rrr : ----, sec_left : rrr ms2 - ms2) else sec_left : 0.0), sec_left) sub2 (%o39) comp_expect_sec(t_end2, t_start2, t2, clock_sec2) := block([ms2, rrr, sec_left, sub1, sub2], ms2 : clock_sec2, sub1 : t_end2 - t_start2, sub2 : t2 - t_start2, if sub1 = 0.0 then sec_left : 0.0 else (if sub2 > 0.0 sub1 then (rrr : ----, sec_left : rrr ms2 - ms2) else sec_left : 0.0), sec_left) sub2 (%i40) comp_percent(t_end2, t_start2, t2) := block([rrr, sub1, sub2], sub1 : t_end2 - t_start2, sub2 : t2 - t_start2, 100.0 sub2 if sub2 > glob_small_float then rrr : ---------- else rrr : 0.0, rrr) sub1 (%o40) comp_percent(t_end2, t_start2, t2) := block([rrr, sub1, sub2], sub1 : t_end2 - t_start2, sub2 : t2 - t_start2, 100.0 sub2 if sub2 > glob_small_float then rrr : ---------- else rrr : 0.0, rrr) sub1 (%i41) factorial_2(nnn) := nnn! (%o41) factorial_2(nnn) := nnn! (%i42) factorial_1(nnn) := block([ret], if nnn <= glob_max_terms then (if array_fact_1 = 0 nnn then (ret : factorial_2(nnn), array_fact_1 : ret) nnn else ret : array_fact_1 ) else ret : factorial_2(nnn), ret) nnn (%o42) factorial_1(nnn) := block([ret], if nnn <= glob_max_terms then (if array_fact_1 = 0 nnn then (ret : factorial_2(nnn), array_fact_1 : ret) nnn else ret : array_fact_1 ) else ret : factorial_2(nnn), ret) nnn (%i43) factorial_3(mmm, nnn) := block([ret], if (nnn <= glob_max_terms) and (mmm <= glob_max_terms) factorial_1(mmm) then (if array_fact_2 = 0 then (ret : ----------------, mmm, nnn factorial_1(nnn) array_fact_2 : ret) else ret : array_fact_2 ) mmm, nnn mmm, nnn factorial_2(mmm) else ret : ----------------, ret) factorial_2(nnn) (%o43) factorial_3(mmm, nnn) := block([ret], if (nnn <= glob_max_terms) and (mmm <= glob_max_terms) factorial_1(mmm) then (if array_fact_2 = 0 then (ret : ----------------, mmm, nnn factorial_1(nnn) array_fact_2 : ret) else ret : array_fact_2 ) mmm, nnn mmm, nnn factorial_2(mmm) else ret : ----------------, ret) factorial_2(nnn) (%i44) convfp(mmm) := mmm (%o44) convfp(mmm) := mmm (%i45) convfloat(mmm) := mmm (%o45) convfloat(mmm) := mmm (%i46) elapsed_time_seconds() := block([t], t : elapsed_real_time(), t) (%o46) elapsed_time_seconds() := block([t], t : elapsed_real_time(), t) (%i47) Si(x) := 0.0 (%o47) Si(x) := 0.0 (%i48) Ci(x) := 0.0 (%o48) Ci(x) := 0.0 (%i49) ln(x) := log(x) (%o49) ln(x) := log(x) (%i50) arcsin(x) := asin(x) (%o50) arcsin(x) := asin(x) (%i51) arccos(x) := acos(x) (%o51) arccos(x) := acos(x) (%i52) arctan(x) := atan(x) (%o52) arctan(x) := atan(x) (%i53) omniabs(x) := abs(x) (%o53) omniabs(x) := abs(x) (%i54) expt(x, y) := (if (x <= 0.0) and (y < 0.0) y then print("expt error x = ", x, "y = ", y), x ) (%o54) expt(x, y) := (if (x <= 0.0) and (y < 0.0) y then print("expt error x = ", x, "y = ", y), x ) (%i55) estimated_needed_step_error(x_start, x_end, estimated_h, estimated_answer) := block([desired_abs_gbl_error, range, estimated_steps, step_error], omniout_float(ALWAYS, "glob_desired_digits_correct", 32, glob_desired_digits_correct, 32, ""), desired_abs_gbl_error : expt(10.0, - glob_desired_digits_correct) omniabs(estimated_answer), omniout_float(ALWAYS, "desired_abs_gbl_error", 32, desired_abs_gbl_error, 32, ""), range : x_end - x_start, omniout_float(ALWAYS, "range", 32, range, 32, range ""), estimated_steps : -----------, omniout_float(ALWAYS, "estimated_steps", estimated_h desired_abs_gbl_error 32, estimated_steps, 32, ""), step_error : omniabs(---------------------), estimated_steps omniout_float(ALWAYS, "step_error", 32, step_error, 32, ""), step_error) (%o55) estimated_needed_step_error(x_start, x_end, estimated_h, estimated_answer) := block([desired_abs_gbl_error, range, estimated_steps, step_error], omniout_float(ALWAYS, "glob_desired_digits_correct", 32, glob_desired_digits_correct, 32, ""), desired_abs_gbl_error : expt(10.0, - glob_desired_digits_correct) omniabs(estimated_answer), omniout_float(ALWAYS, "desired_abs_gbl_error", 32, desired_abs_gbl_error, 32, ""), range : x_end - x_start, omniout_float(ALWAYS, "range", 32, range, 32, range ""), estimated_steps : -----------, omniout_float(ALWAYS, "estimated_steps", estimated_h desired_abs_gbl_error 32, estimated_steps, 32, ""), step_error : omniabs(---------------------), estimated_steps omniout_float(ALWAYS, "step_error", 32, step_error, 32, ""), step_error) - 0.1 (2.0 x + 5.0) (%i56) exact_soln_y(x) := block(-------------------) exp(x) - 0.1 (2.0 x + 5.0) (%o56) exact_soln_y(x) := block(-------------------) exp(x) (%i57) main() := block([d1, d2, d3, d4, est_err_2, niii, done_once, term, ord, order_diff, term_no, html_log_file, iiif, jjjf, rows, r_order, sub_iter, calc_term, iii, temp_sum, current_iter, x_start, x_end, it, max_terms, opt_iter, tmp, subiter, est_needed_step_err, estimated_step_error, 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(glob_yes_pole, 4, fixnum), define_variable(glob_no_pole, 3, fixnum), define_variable(glob_not_given, 0, 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_estimated_step_error, 0.0, float), define_variable(glob_ratio_of_radius, 0.1, float), define_variable(glob_percent_done, 0.0, float), define_variable(glob_subiter_method, 3, fixnum), define_variable(glob_total_exp_sec, 0.1, float), define_variable(glob_optimal_expect_sec, 0.1, float), define_variable(glob_html_log, true, boolean), define_variable(glob_good_digits, 0, fixnum), define_variable(glob_max_opt_iter, 10, fixnum), define_variable(glob_dump, false, boolean), define_variable(glob_djd_debug, true, boolean), define_variable(glob_display_flag, true, boolean), define_variable(glob_djd_debug2, true, boolean), define_variable(glob_sec_in_minute, 60, fixnum), define_variable(glob_min_in_hour, 60, fixnum), define_variable(glob_hours_in_day, 24, fixnum), define_variable(glob_days_in_year, 365, fixnum), define_variable(glob_sec_in_hour, 3600, fixnum), define_variable(glob_sec_in_day, 86400, fixnum), define_variable(glob_sec_in_year, 31536000, fixnum), define_variable(glob_almost_1, 0.999, float), define_variable(glob_clock_sec, 0.0, float), define_variable(glob_clock_start_sec, 0.0, float), define_variable(glob_not_yet_finished, true, boolean), define_variable(glob_initial_pass, true, boolean), define_variable(glob_not_yet_start_msg, true, boolean), define_variable(glob_reached_optimal_h, false, boolean), define_variable(glob_optimal_done, false, boolean), define_variable(glob_disp_incr, 0.1, float), define_variable(glob_h, 0.1, float), define_variable(glob_max_h, 0.1, float), define_variable(glob_min_h, 1.0E-6, float), define_variable(glob_type_given_pole, 0, fixnum), define_variable(glob_large_float, 9.0E+100, float), define_variable(glob_last_good_h, 0.1, float), define_variable(glob_look_poles, false, boolean), define_variable(glob_neg_h, false, boolean), define_variable(glob_display_interval, 0.0, float), define_variable(glob_next_display, 0.0, float), define_variable(glob_dump_analytic, false, boolean), define_variable(glob_abserr, 1.0E-11, float), define_variable(glob_relerr, 1.0E-11, float), define_variable(glob_max_hours, 0.0, float), define_variable(glob_max_iter, 1000, fixnum), define_variable(glob_max_rel_trunc_err, 1.0E-11, float), define_variable(glob_max_trunc_err, 1.0E-11, float), define_variable(glob_no_eqs, 0, fixnum), define_variable(glob_optimal_clock_start_sec, 0.0, float), define_variable(glob_optimal_start, 0.0, float), define_variable(glob_small_float, 0.0, float), define_variable(glob_smallish_float, 0.0, float), define_variable(glob_unchanged_h_cnt, 0, fixnum), define_variable(glob_warned, false, boolean), define_variable(glob_warned2, false, boolean), define_variable(glob_max_sec, 10000.0, float), define_variable(glob_orig_start_sec, 0.0, float), define_variable(glob_start, 0, fixnum), define_variable(glob_curr_iter_when_opt, 0, fixnum), define_variable(glob_current_iter, 0, fixnum), define_variable(glob_iter, 0, fixnum), define_variable(glob_normmax, 0.0, float), define_variable(glob_max_minutes, 0.0, float), ALWAYS : 1, INFO : 2, DEBUGL : 3, DEBUGMASSIVE : 4, glob_iolevel : INFO, glob_orig_start_sec : elapsed_time_seconds(), MAX_UNCHANGED : 10, glob_curr_iter_when_opt : 0, glob_display_flag : true, glob_no_eqs : 1, glob_iter : - 1, opt_iter : - 1, glob_max_iter : 50000, glob_max_hours : 0.0, glob_max_minutes : 15.0, omniout_str(ALWAYS, "##############ECHO OF PROBLEM#################"), omniout_str(ALWAYS, "######\ ########temp/div_lin_exppostode.ode#################"), omniout_str(ALWAYS, "diff ( y , x , 1 ) = (0.2 * x + 0.3) / exp(x);"), omniout_str(ALWAYS, "!"), omniout_str(ALWAYS, "/* BEGIN FIRST INPUT BLOCK */"), omniout_str(ALWAYS, "Digits:32,"), omniout_str(ALWAYS, "max_terms:30,"), omniout_str(ALWAYS, "!"), omniout_str(ALWAYS, "/* END FIRST INPUT BLOCK */"), omniout_str(ALWAYS, "/* BEGIN SECOND INPUT BLOCK */"), omniout_str(ALWAYS, "x_start:1.0,"), omniout_str(ALWAYS, "/* # did poorly with x_start := -5.0; */"), omniout_str(ALWAYS, "x_end:5.0,"), omniout_str(ALWAYS, "array_y_init[0 + 1] : exact_soln_y(x_start),"), omniout_str(ALWAYS, "glob_look_poles:true,"), omniout_str(ALWAYS, "glob_max_iter:1000000,"), omniout_str(ALWAYS, "glob_display_interval:0.1,"), omniout_str(ALWAYS, "glob_max_minutes:10,"), omniout_str(ALWAYS, "/* END SECOND INPUT BLOCK */"), omniout_str(ALWAYS, "/* BEGIN OVERRIDE BLOCK */"), omniout_str(ALWAYS, "glob_desired_digits_correct:10,"), omniout_str(ALWAYS, "glob_display_interval:0.01,"), 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, " (-(0.1 * (5.0 + 2.0*x))/exp(x)) "), omniout_str(ALWAYS, "));"), omniout_str(ALWAYS, "/* END USER DEF BLOCK */"), omniout_str(ALWAYS, "#######END OF ECHO OF PROBLEM#################"), glob_unchanged_h_cnt : 0, glob_warned : false, glob_warned2 : false, glob_small_float : 0.0, glob_smallish_float : 0.0, glob_large_float : 1.0E+100, glob_almost_1 : 0.99, Digits : 32, max_terms : 30, glob_max_terms : max_terms, glob_html_log : true, array(array_y_init, 1 + max_terms), array(array_norms, 1 + max_terms), array(array_fact_1, 1 + max_terms), array(array_pole, 1 + 4), array(array_real_pole, 1 + 4), array(array_complex_pole, 1 + 4), array(array_1st_rel_error, 1 + 2), array(array_last_rel_error, 1 + 2), array(array_type_pole, 1 + 2), array(array_type_real_pole, 1 + 2), array(array_type_complex_pole, 1 + 2), array(array_y, 1 + max_terms), array(array_x, 1 + max_terms), array(array_tmp0, 1 + max_terms), array(array_tmp1, 1 + max_terms), array(array_tmp2, 1 + max_terms), array(array_tmp3, 1 + max_terms), array(array_tmp4, 1 + max_terms), array(array_tmp5, 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 + 2, 1 + 3), array(array_given_rad_poles, 1 + 2, 1 + 3), array(array_given_ord_poles, 1 + 2, 1 + 3), array(array_real_poles, 1 + 2, 1 + 3), array(array_complex_poles, 1 + 2, 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 <= 4 do (array_pole : 0.0, term : 1 + term), term : 1, term while term <= 4 do (array_real_pole : 0.0, term : 1 + term), term : 1, term while term <= 4 do (array_complex_pole : 0.0, term : 1 + term), term : 1, term while term <= 2 do (array_1st_rel_error : 0.0, term : 1 + term), term term : 1, while term <= 2 do (array_last_rel_error : 0.0, term term : 1 + term), term : 1, while term <= 2 do (array_type_pole : 0.0, term term : 1 + term), term : 1, while term <= 2 do (array_type_real_pole : 0.0, term : 1 + term), term : 1, term while term <= 2 do (array_type_complex_pole : 0.0, term : 1 + term), term term : 1, while term <= max_terms do (array_y : 0.0, term : 1 + term), term term : 1, while term <= max_terms do (array_x : 0.0, term : 1 + term), term term : 1, while term <= max_terms do (array_tmp0 : 0.0, term : 1 + term), term term : 1, while term <= max_terms do (array_tmp1 : 0.0, term : 1 + term), term term : 1, while term <= max_terms do (array_tmp2 : 0.0, term : 1 + term), term term : 1, while term <= max_terms do (array_tmp3 : 0.0, term : 1 + term), term term : 1, while term <= max_terms do (array_tmp4 : 0.0, term : 1 + term), term term : 1, while term <= max_terms do (array_tmp5 : 0.0, term : 1 + term), term term : 1, while term <= max_terms do (array_m1 : 0.0, term : 1 + term), term ord : 1, while ord <= 2 do (term : 1, while term <= max_terms do (array_y_higher : 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_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 <= 2 do (term : 1, while term <= 3 do (array_poles : 0.0, ord, term term : 1 + term), ord : 1 + ord), ord : 1, while ord <= 2 do (term : 1, while term <= 3 do (array_given_rad_poles : 0.0, term : 1 + term), ord : 1 + ord), ord, term ord : 1, while ord <= 2 do (term : 1, while term <= 3 do (array_given_ord_poles : 0.0, term : 1 + term), ord, term ord : 1 + ord), ord : 1, while ord <= 2 do (term : 1, while term <= 3 do (array_real_poles : 0.0, term : 1 + term), ord, term ord : 1 + ord), ord : 1, while ord <= 2 do (term : 1, while term <= 3 do (array_complex_poles : 0.0, term : 1 + term), ord, term ord : 1 + ord), ord : 1, while ord <= max_terms do (term : 1, while term <= max_terms do (array_fact_2 : 0.0, term : 1 + term), ord, term ord : 1 + ord), array(array_y, 1 + 1 + max_terms), term : 1, while term <= 1 + max_terms do (array_y : 0.0, term : 1 + term), term array(array_x, 1 + 1 + max_terms), term : 1, while term <= 1 + max_terms do (array_x : 0.0, term : 1 + term), term array(array_tmp0, 1 + 1 + max_terms), term : 1, while term <= 1 + max_terms do (array_tmp0 : 0.0, term : 1 + term), term array(array_tmp1, 1 + 1 + max_terms), term : 1, while term <= 1 + max_terms do (array_tmp1 : 0.0, term : 1 + term), term array(array_tmp2, 1 + 1 + max_terms), term : 1, while term <= 1 + max_terms do (array_tmp2 : 0.0, term : 1 + term), term array(array_tmp3, 1 + 1 + max_terms), term : 1, while term <= 1 + max_terms do (array_tmp3 : 0.0, term : 1 + term), term array(array_tmp4, 1 + 1 + max_terms), term : 1, while term <= 1 + max_terms do (array_tmp4 : 0.0, term : 1 + term), term array(array_tmp5, 1 + 1 + max_terms), term : 1, while term <= 1 + max_terms do (array_tmp5 : 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_m1, 1 + 1 + max_terms), term : 1, 1 while term <= max_terms do (array_m1 : 0.0, term : 1 + term), term array_m1 : - 1.0, iiif : 0, while iiif <= glob_max_terms do (jjjf : 0, 1 while jjjf <= glob_max_terms do (array_fact_1 : 0, iiif array_fact_2 : 0, jjjf : 1 + jjjf), iiif : 1 + iiif), x_start : 1.0, iiif, jjjf x_end : 5.0, array_y_init : exact_soln_y(x_start), 1 + 0 glob_look_poles : true, glob_max_iter : 1000000, glob_display_interval : 0.1, glob_max_minutes : 10, glob_desired_digits_correct : 10, glob_display_interval : 0.01, glob_look_poles : true, glob_max_iter : 10000000, glob_max_minutes : 3, glob_subiter_method : 3, glob_last_good_h : glob_h, glob_max_terms : max_terms, glob_max_sec : convfloat(3600.0) convfloat(glob_max_hours) + convfloat(60.0) convfloat(glob_max_minutes), if glob_h > 0.0 then (glob_neg_h : false, glob_display_interval : omniabs(glob_display_interval)) else (glob_neg_h : true, glob_display_interval : - omniabs(glob_display_interval)), chk_data(), array_y_set_initial : true, 1, 1 array_y_set_initial : false, array_y_set_initial : false, 1, 2 1, 3 array_y_set_initial : false, array_y_set_initial : false, 1, 4 1, 5 array_y_set_initial : false, array_y_set_initial : false, 1, 6 1, 7 array_y_set_initial : false, array_y_set_initial : false, 1, 8 1, 9 array_y_set_initial : false, array_y_set_initial : false, 1, 10 1, 11 array_y_set_initial : false, array_y_set_initial : false, 1, 12 1, 13 array_y_set_initial : false, array_y_set_initial : false, 1, 14 1, 15 array_y_set_initial : false, array_y_set_initial : false, 1, 16 1, 17 array_y_set_initial : false, array_y_set_initial : false, 1, 18 1, 19 array_y_set_initial : false, array_y_set_initial : false, 1, 20 1, 21 array_y_set_initial : false, array_y_set_initial : false, 1, 22 1, 23 array_y_set_initial : false, array_y_set_initial : false, 1, 24 1, 25 array_y_set_initial : false, array_y_set_initial : false, 1, 26 1, 27 array_y_set_initial : false, array_y_set_initial : false, 1, 28 1, 29 array_y_set_initial : false, omniout_str(ALWAYS, "START of Optimize"), 1, 30 glob_check_sign : check_sign(x_start, x_end), glob_h : check_sign(x_start, x_end), found_h : false, glob_h : glob_min_h, if glob_max_h < glob_h then glob_h : glob_max_h, if glob_display_interval < glob_h then glob_h : glob_display_interval, best_h : glob_h, min_value : glob_large_float, est_answer : est_size_answer(), opt_iter : 1, 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, ""), estimated_step_error : 0.0, while (opt_iter <= 100) and (not found_h) 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(), estimated_step_error : test_suggested_h(), omniout_float(ALWAYS, "estimated_step_error", 32, estimated_step_error, 32, ""), if ((estimated_step_error > est_needed_step_err) and (opt_iter = 1)) or (glob_h >= glob_max_h) then (found_h : true, glob_h : glob_max_h, best_h : glob_h) elseif (estimated_step_error > est_needed_step_err) glob_h and (not found_h) then (glob_h : ------, best_h : glob_h, found_h : true) 2.0 else (glob_h : glob_h 2.0, best_h : glob_h), omniout_float(ALWAYS, "best_h", 32, best_h, 32, ""), opt_iter : 1 + opt_iter), if (not found_h) and (opt_iter = 1) then (omniout_str(ALWAYS, "Beginning glob_h too large."), found_h : false), if opt_iter > 100 then (glob_h : glob_max_h, found_h : false), if glob_display_interval < glob_h then glob_h : glob_display_interval, if glob_html_log then html_log_file : openw("entry.html"), if found_h then (omniout_str(ALWAYS, "START of Soultion"), array_x : x_start, 1 array_x : glob_h, glob_next_display : x_start, order_diff : 1, term_no : 1, 2 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), current_iter : 1, glob_clock_start_sec : elapsed_time_seconds(), glob_clock_sec : elapsed_time_seconds(), glob_current_iter : 0, glob_iter : 0, omniout_str(DEBUGL, " "), glob_reached_optimal_h : true, glob_optimal_clock_start_sec : elapsed_time_seconds(), while (glob_current_iter < glob_max_iter) and (glob_check_sign array_x < glob_check_sign x_end) 1 and (convfloat(glob_clock_sec) - convfloat(glob_orig_start_sec) < convfloat(glob_max_sec)) do (if reached_interval () then (omniout_str(INFO, " "), omniout_str(INFO, "TOP MAIN SOLVE Loop")), glob_iter : 1 + glob_iter, glob_clock_sec : elapsed_time_seconds(), glob_current_iter : 1 + glob_current_iter, atomall(), display_alot(current_iter), if glob_look_poles then check_for_pole(), if reached_interval() then glob_next_display : glob_display_interval + glob_next_display, array_x : glob_h + array_x , 1 1 array_x : glob_h, order_diff : 2, ord : 2, calc_term : 1, 2 iii : glob_max_terms, while iii >= calc_term do (array_y_higher_work : 2, iii array_y_higher 2, iii --------------------------- expt(glob_h, calc_term - 1) -------------------------------------, iii : iii - 1), temp_sum : 0.0, factorial_3(iii - calc_term, iii - 1) ord : 2, calc_term : 1, iii : glob_max_terms, while iii >= calc_term do (temp_sum : array_y_higher_work + temp_sum, ord, iii iii : iii - 1), array_y_higher_work2 : ord, calc_term temp_sum expt(glob_h, calc_term - 1) ------------------------------------, ord : 1, calc_term : 2, factorial_1(calc_term - 1) iii : glob_max_terms, while iii >= calc_term do (array_y_higher_work : 1, iii array_y_higher 1, iii --------------------------- expt(glob_h, calc_term - 1) -------------------------------------, iii : iii - 1), temp_sum : 0.0, factorial_3(iii - calc_term, iii - 1) ord : 1, calc_term : 2, iii : glob_max_terms, while iii >= calc_term do (temp_sum : array_y_higher_work + temp_sum, ord, iii iii : iii - 1), array_y_higher_work2 : ord, calc_term temp_sum expt(glob_h, calc_term - 1) ------------------------------------, ord : 1, calc_term : 1, factorial_1(calc_term - 1) iii : glob_max_terms, while iii >= calc_term do (array_y_higher_work : 1, iii array_y_higher 1, iii --------------------------- expt(glob_h, calc_term - 1) -------------------------------------, iii : iii - 1), temp_sum : 0.0, factorial_3(iii - calc_term, iii - 1) ord : 1, calc_term : 1, iii : glob_max_terms, while iii >= calc_term do (temp_sum : array_y_higher_work + temp_sum, ord, iii iii : iii - 1), array_y_higher_work2 : ord, calc_term temp_sum expt(glob_h, calc_term - 1) ------------------------------------, term_no : glob_max_terms, factorial_1(calc_term - 1) while term_no >= 1 do (array_y : array_y_higher_work2 , term_no 1, term_no ord : 1, while ord <= order_diff do (array_y_higher : ord, term_no array_y_higher_work2 , ord : 1 + ord), term_no : term_no - 1)), ord, term_no omniout_str(ALWAYS, "Finished!"), if glob_iter >= glob_max_iter then omniout_str(ALWAYS, "Maximum Iterations Reached before Solution Completed!"), if elapsed_time_seconds() - convfloat(glob_orig_start_sec) >= convfloat(glob_max_sec) then omniout_str(ALWAYS, "Maximum Time Reached before Solution Completed!"), glob_clock_sec : elapsed_time_seconds(), omniout_str(INFO, "diff ( y , x , 1 ) = (0.2 * x + 0.3) / exp(x);"), omniout_int(INFO, "Iterations ", 32, glob_iter, 4, " "), prog_report(x_start, x_end), if glob_html_log then (logstart(html_log_file), logitem_str(html_log_file, "2013-05-26T00:38:17-05:00"), logitem_str(html_log_file, "Maxima"), logitem_str(html_log_file, "div_lin_exp"), logitem_str(html_log_file, "diff ( y , x , 1 ) = (0.2 * x + 0.3) / exp(x);"), logitem_float(html_log_file, x_start), logitem_float(html_log_file, x_end), logitem_float(html_log_file, array_x ), logitem_float(html_log_file, glob_h), 1 logitem_str(html_log_file, "16"), logitem_good_digits(html_log_file, array_last_rel_error ), logitem_integer(html_log_file, glob_max_terms), 1 logitem_float(html_log_file, array_1st_rel_error ), 1 logitem_float(html_log_file, array_last_rel_error ), 1 logitem_integer(html_log_file, glob_iter), logitem_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, " 189 "), logitem_str(html_log_file, "div_lin_exp diffeq.max"), logitem_str(html_log_file, "div_lin_exp maxima results"), logitem_str(html_log_file, "All Tests - All Languages"), logend(html_log_file)), if glob_html_log then close(html_log_file))) (%o57) main() := block([d1, d2, d3, d4, est_err_2, niii, done_once, term, ord, order_diff, term_no, html_log_file, iiif, jjjf, rows, r_order, sub_iter, calc_term, iii, temp_sum, current_iter, x_start, x_end, it, max_terms, opt_iter, tmp, subiter, est_needed_step_err, estimated_step_error, 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(glob_yes_pole, 4, fixnum), define_variable(glob_no_pole, 3, fixnum), define_variable(glob_not_given, 0, 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_estimated_step_error, 0.0, float), define_variable(glob_ratio_of_radius, 0.1, float), define_variable(glob_percent_done, 0.0, float), define_variable(glob_subiter_method, 3, fixnum), define_variable(glob_total_exp_sec, 0.1, float), define_variable(glob_optimal_expect_sec, 0.1, float), define_variable(glob_html_log, true, boolean), define_variable(glob_good_digits, 0, fixnum), define_variable(glob_max_opt_iter, 10, fixnum), define_variable(glob_dump, false, boolean), define_variable(glob_djd_debug, true, boolean), define_variable(glob_display_flag, true, boolean), define_variable(glob_djd_debug2, true, boolean), define_variable(glob_sec_in_minute, 60, fixnum), define_variable(glob_min_in_hour, 60, fixnum), define_variable(glob_hours_in_day, 24, fixnum), define_variable(glob_days_in_year, 365, fixnum), define_variable(glob_sec_in_hour, 3600, fixnum), define_variable(glob_sec_in_day, 86400, fixnum), define_variable(glob_sec_in_year, 31536000, fixnum), define_variable(glob_almost_1, 0.999, float), define_variable(glob_clock_sec, 0.0, float), define_variable(glob_clock_start_sec, 0.0, float), define_variable(glob_not_yet_finished, true, boolean), define_variable(glob_initial_pass, true, boolean), define_variable(glob_not_yet_start_msg, true, boolean), define_variable(glob_reached_optimal_h, false, boolean), define_variable(glob_optimal_done, false, boolean), define_variable(glob_disp_incr, 0.1, float), define_variable(glob_h, 0.1, float), define_variable(glob_max_h, 0.1, float), define_variable(glob_min_h, 1.0E-6, float), define_variable(glob_type_given_pole, 0, fixnum), define_variable(glob_large_float, 9.0E+100, float), define_variable(glob_last_good_h, 0.1, float), define_variable(glob_look_poles, false, boolean), define_variable(glob_neg_h, false, boolean), define_variable(glob_display_interval, 0.0, float), define_variable(glob_next_display, 0.0, float), define_variable(glob_dump_analytic, false, boolean), define_variable(glob_abserr, 1.0E-11, float), define_variable(glob_relerr, 1.0E-11, float), define_variable(glob_max_hours, 0.0, float), define_variable(glob_max_iter, 1000, fixnum), define_variable(glob_max_rel_trunc_err, 1.0E-11, float), define_variable(glob_max_trunc_err, 1.0E-11, float), define_variable(glob_no_eqs, 0, fixnum), define_variable(glob_optimal_clock_start_sec, 0.0, float), define_variable(glob_optimal_start, 0.0, float), define_variable(glob_small_float, 0.0, float), define_variable(glob_smallish_float, 0.0, float), define_variable(glob_unchanged_h_cnt, 0, fixnum), define_variable(glob_warned, false, boolean), define_variable(glob_warned2, false, boolean), define_variable(glob_max_sec, 10000.0, float), define_variable(glob_orig_start_sec, 0.0, float), define_variable(glob_start, 0, fixnum), define_variable(glob_curr_iter_when_opt, 0, fixnum), define_variable(glob_current_iter, 0, fixnum), define_variable(glob_iter, 0, fixnum), define_variable(glob_normmax, 0.0, float), define_variable(glob_max_minutes, 0.0, float), ALWAYS : 1, INFO : 2, DEBUGL : 3, DEBUGMASSIVE : 4, glob_iolevel : INFO, glob_orig_start_sec : elapsed_time_seconds(), MAX_UNCHANGED : 10, glob_curr_iter_when_opt : 0, glob_display_flag : true, glob_no_eqs : 1, glob_iter : - 1, opt_iter : - 1, glob_max_iter : 50000, glob_max_hours : 0.0, glob_max_minutes : 15.0, omniout_str(ALWAYS, "##############ECHO OF PROBLEM#################"), omniout_str(ALWAYS, "######\ ########temp/div_lin_exppostode.ode#################"), omniout_str(ALWAYS, "diff ( y , x , 1 ) = (0.2 * x + 0.3) / exp(x);"), omniout_str(ALWAYS, "!"), omniout_str(ALWAYS, "/* BEGIN FIRST INPUT BLOCK */"), omniout_str(ALWAYS, "Digits:32,"), omniout_str(ALWAYS, "max_terms:30,"), omniout_str(ALWAYS, "!"), omniout_str(ALWAYS, "/* END FIRST INPUT BLOCK */"), omniout_str(ALWAYS, "/* BEGIN SECOND INPUT BLOCK */"), omniout_str(ALWAYS, "x_start:1.0,"), omniout_str(ALWAYS, "/* # did poorly with x_start := -5.0; */"), omniout_str(ALWAYS, "x_end:5.0,"), omniout_str(ALWAYS, "array_y_init[0 + 1] : exact_soln_y(x_start),"), omniout_str(ALWAYS, "glob_look_poles:true,"), omniout_str(ALWAYS, "glob_max_iter:1000000,"), omniout_str(ALWAYS, "glob_display_interval:0.1,"), omniout_str(ALWAYS, "glob_max_minutes:10,"), omniout_str(ALWAYS, "/* END SECOND INPUT BLOCK */"), omniout_str(ALWAYS, "/* BEGIN OVERRIDE BLOCK */"), omniout_str(ALWAYS, "glob_desired_digits_correct:10,"), omniout_str(ALWAYS, "glob_display_interval:0.01,"), 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, " (-(0.1 * (5.0 + 2.0*x))/exp(x)) "), omniout_str(ALWAYS, "));"), omniout_str(ALWAYS, "/* END USER DEF BLOCK */"), omniout_str(ALWAYS, "#######END OF ECHO OF PROBLEM#################"), glob_unchanged_h_cnt : 0, glob_warned : false, glob_warned2 : false, glob_small_float : 0.0, glob_smallish_float : 0.0, glob_large_float : 1.0E+100, glob_almost_1 : 0.99, Digits : 32, max_terms : 30, glob_max_terms : max_terms, glob_html_log : true, array(array_y_init, 1 + max_terms), array(array_norms, 1 + max_terms), array(array_fact_1, 1 + max_terms), array(array_pole, 1 + 4), array(array_real_pole, 1 + 4), array(array_complex_pole, 1 + 4), array(array_1st_rel_error, 1 + 2), array(array_last_rel_error, 1 + 2), array(array_type_pole, 1 + 2), array(array_type_real_pole, 1 + 2), array(array_type_complex_pole, 1 + 2), array(array_y, 1 + max_terms), array(array_x, 1 + max_terms), array(array_tmp0, 1 + max_terms), array(array_tmp1, 1 + max_terms), array(array_tmp2, 1 + max_terms), array(array_tmp3, 1 + max_terms), array(array_tmp4, 1 + max_terms), array(array_tmp5, 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 + 2, 1 + 3), array(array_given_rad_poles, 1 + 2, 1 + 3), array(array_given_ord_poles, 1 + 2, 1 + 3), array(array_real_poles, 1 + 2, 1 + 3), array(array_complex_poles, 1 + 2, 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 <= 4 do (array_pole : 0.0, term : 1 + term), term : 1, term while term <= 4 do (array_real_pole : 0.0, term : 1 + term), term : 1, term while term <= 4 do (array_complex_pole : 0.0, term : 1 + term), term : 1, term while term <= 2 do (array_1st_rel_error : 0.0, term : 1 + term), term term : 1, while term <= 2 do (array_last_rel_error : 0.0, term term : 1 + term), term : 1, while term <= 2 do (array_type_pole : 0.0, term term : 1 + term), term : 1, while term <= 2 do (array_type_real_pole : 0.0, term : 1 + term), term : 1, term while term <= 2 do (array_type_complex_pole : 0.0, term : 1 + term), term term : 1, while term <= max_terms do (array_y : 0.0, term : 1 + term), term term : 1, while term <= max_terms do (array_x : 0.0, term : 1 + term), term term : 1, while term <= max_terms do (array_tmp0 : 0.0, term : 1 + term), term term : 1, while term <= max_terms do (array_tmp1 : 0.0, term : 1 + term), term term : 1, while term <= max_terms do (array_tmp2 : 0.0, term : 1 + term), term term : 1, while term <= max_terms do (array_tmp3 : 0.0, term : 1 + term), term term : 1, while term <= max_terms do (array_tmp4 : 0.0, term : 1 + term), term term : 1, while term <= max_terms do (array_tmp5 : 0.0, term : 1 + term), term term : 1, while term <= max_terms do (array_m1 : 0.0, term : 1 + term), term ord : 1, while ord <= 2 do (term : 1, while term <= max_terms do (array_y_higher : 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_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 <= 2 do (term : 1, while term <= 3 do (array_poles : 0.0, ord, term term : 1 + term), ord : 1 + ord), ord : 1, while ord <= 2 do (term : 1, while term <= 3 do (array_given_rad_poles : 0.0, term : 1 + term), ord : 1 + ord), ord, term ord : 1, while ord <= 2 do (term : 1, while term <= 3 do (array_given_ord_poles : 0.0, term : 1 + term), ord, term ord : 1 + ord), ord : 1, while ord <= 2 do (term : 1, while term <= 3 do (array_real_poles : 0.0, term : 1 + term), ord, term ord : 1 + ord), ord : 1, while ord <= 2 do (term : 1, while term <= 3 do (array_complex_poles : 0.0, term : 1 + term), ord, term ord : 1 + ord), ord : 1, while ord <= max_terms do (term : 1, while term <= max_terms do (array_fact_2 : 0.0, term : 1 + term), ord, term ord : 1 + ord), array(array_y, 1 + 1 + max_terms), term : 1, while term <= 1 + max_terms do (array_y : 0.0, term : 1 + term), term array(array_x, 1 + 1 + max_terms), term : 1, while term <= 1 + max_terms do (array_x : 0.0, term : 1 + term), term array(array_tmp0, 1 + 1 + max_terms), term : 1, while term <= 1 + max_terms do (array_tmp0 : 0.0, term : 1 + term), term array(array_tmp1, 1 + 1 + max_terms), term : 1, while term <= 1 + max_terms do (array_tmp1 : 0.0, term : 1 + term), term array(array_tmp2, 1 + 1 + max_terms), term : 1, while term <= 1 + max_terms do (array_tmp2 : 0.0, term : 1 + term), term array(array_tmp3, 1 + 1 + max_terms), term : 1, while term <= 1 + max_terms do (array_tmp3 : 0.0, term : 1 + term), term array(array_tmp4, 1 + 1 + max_terms), term : 1, while term <= 1 + max_terms do (array_tmp4 : 0.0, term : 1 + term), term array(array_tmp5, 1 + 1 + max_terms), term : 1, while term <= 1 + max_terms do (array_tmp5 : 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_m1, 1 + 1 + max_terms), term : 1, 1 while term <= max_terms do (array_m1 : 0.0, term : 1 + term), term array_m1 : - 1.0, iiif : 0, while iiif <= glob_max_terms do (jjjf : 0, 1 while jjjf <= glob_max_terms do (array_fact_1 : 0, iiif array_fact_2 : 0, jjjf : 1 + jjjf), iiif : 1 + iiif), x_start : 1.0, iiif, jjjf x_end : 5.0, array_y_init : exact_soln_y(x_start), 1 + 0 glob_look_poles : true, glob_max_iter : 1000000, glob_display_interval : 0.1, glob_max_minutes : 10, glob_desired_digits_correct : 10, glob_display_interval : 0.01, glob_look_poles : true, glob_max_iter : 10000000, glob_max_minutes : 3, glob_subiter_method : 3, glob_last_good_h : glob_h, glob_max_terms : max_terms, glob_max_sec : convfloat(3600.0) convfloat(glob_max_hours) + convfloat(60.0) convfloat(glob_max_minutes), if glob_h > 0.0 then (glob_neg_h : false, glob_display_interval : omniabs(glob_display_interval)) else (glob_neg_h : true, glob_display_interval : - omniabs(glob_display_interval)), chk_data(), array_y_set_initial : true, 1, 1 array_y_set_initial : false, array_y_set_initial : false, 1, 2 1, 3 array_y_set_initial : false, array_y_set_initial : false, 1, 4 1, 5 array_y_set_initial : false, array_y_set_initial : false, 1, 6 1, 7 array_y_set_initial : false, array_y_set_initial : false, 1, 8 1, 9 array_y_set_initial : false, array_y_set_initial : false, 1, 10 1, 11 array_y_set_initial : false, array_y_set_initial : false, 1, 12 1, 13 array_y_set_initial : false, array_y_set_initial : false, 1, 14 1, 15 array_y_set_initial : false, array_y_set_initial : false, 1, 16 1, 17 array_y_set_initial : false, array_y_set_initial : false, 1, 18 1, 19 array_y_set_initial : false, array_y_set_initial : false, 1, 20 1, 21 array_y_set_initial : false, array_y_set_initial : false, 1, 22 1, 23 array_y_set_initial : false, array_y_set_initial : false, 1, 24 1, 25 array_y_set_initial : false, array_y_set_initial : false, 1, 26 1, 27 array_y_set_initial : false, array_y_set_initial : false, 1, 28 1, 29 array_y_set_initial : false, omniout_str(ALWAYS, "START of Optimize"), 1, 30 glob_check_sign : check_sign(x_start, x_end), glob_h : check_sign(x_start, x_end), found_h : false, glob_h : glob_min_h, if glob_max_h < glob_h then glob_h : glob_max_h, if glob_display_interval < glob_h then glob_h : glob_display_interval, best_h : glob_h, min_value : glob_large_float, est_answer : est_size_answer(), opt_iter : 1, 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, ""), estimated_step_error : 0.0, while (opt_iter <= 100) and (not found_h) 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(), estimated_step_error : test_suggested_h(), omniout_float(ALWAYS, "estimated_step_error", 32, estimated_step_error, 32, ""), if ((estimated_step_error > est_needed_step_err) and (opt_iter = 1)) or (glob_h >= glob_max_h) then (found_h : true, glob_h : glob_max_h, best_h : glob_h) elseif (estimated_step_error > est_needed_step_err) glob_h and (not found_h) then (glob_h : ------, best_h : glob_h, found_h : true) 2.0 else (glob_h : glob_h 2.0, best_h : glob_h), omniout_float(ALWAYS, "best_h", 32, best_h, 32, ""), opt_iter : 1 + opt_iter), if (not found_h) and (opt_iter = 1) then (omniout_str(ALWAYS, "Beginning glob_h too large."), found_h : false), if opt_iter > 100 then (glob_h : glob_max_h, found_h : false), if glob_display_interval < glob_h then glob_h : glob_display_interval, if glob_html_log then html_log_file : openw("entry.html"), if found_h then (omniout_str(ALWAYS, "START of Soultion"), array_x : x_start, 1 array_x : glob_h, glob_next_display : x_start, order_diff : 1, term_no : 1, 2 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), current_iter : 1, glob_clock_start_sec : elapsed_time_seconds(), glob_clock_sec : elapsed_time_seconds(), glob_current_iter : 0, glob_iter : 0, omniout_str(DEBUGL, " "), glob_reached_optimal_h : true, glob_optimal_clock_start_sec : elapsed_time_seconds(), while (glob_current_iter < glob_max_iter) and (glob_check_sign array_x < glob_check_sign x_end) 1 and (convfloat(glob_clock_sec) - convfloat(glob_orig_start_sec) < convfloat(glob_max_sec)) do (if reached_interval () then (omniout_str(INFO, " "), omniout_str(INFO, "TOP MAIN SOLVE Loop")), glob_iter : 1 + glob_iter, glob_clock_sec : elapsed_time_seconds(), glob_current_iter : 1 + glob_current_iter, atomall(), display_alot(current_iter), if glob_look_poles then check_for_pole(), if reached_interval() then glob_next_display : glob_display_interval + glob_next_display, array_x : glob_h + array_x , 1 1 array_x : glob_h, order_diff : 2, ord : 2, calc_term : 1, 2 iii : glob_max_terms, while iii >= calc_term do (array_y_higher_work : 2, iii array_y_higher 2, iii --------------------------- expt(glob_h, calc_term - 1) -------------------------------------, iii : iii - 1), temp_sum : 0.0, factorial_3(iii - calc_term, iii - 1) ord : 2, calc_term : 1, iii : glob_max_terms, while iii >= calc_term do (temp_sum : array_y_higher_work + temp_sum, ord, iii iii : iii - 1), array_y_higher_work2 : ord, calc_term temp_sum expt(glob_h, calc_term - 1) ------------------------------------, ord : 1, calc_term : 2, factorial_1(calc_term - 1) iii : glob_max_terms, while iii >= calc_term do (array_y_higher_work : 1, iii array_y_higher 1, iii --------------------------- expt(glob_h, calc_term - 1) -------------------------------------, iii : iii - 1), temp_sum : 0.0, factorial_3(iii - calc_term, iii - 1) ord : 1, calc_term : 2, iii : glob_max_terms, while iii >= calc_term do (temp_sum : array_y_higher_work + temp_sum, ord, iii iii : iii - 1), array_y_higher_work2 : ord, calc_term temp_sum expt(glob_h, calc_term - 1) ------------------------------------, ord : 1, calc_term : 1, factorial_1(calc_term - 1) iii : glob_max_terms, while iii >= calc_term do (array_y_higher_work : 1, iii array_y_higher 1, iii --------------------------- expt(glob_h, calc_term - 1) -------------------------------------, iii : iii - 1), temp_sum : 0.0, factorial_3(iii - calc_term, iii - 1) ord : 1, calc_term : 1, iii : glob_max_terms, while iii >= calc_term do (temp_sum : array_y_higher_work + temp_sum, ord, iii iii : iii - 1), array_y_higher_work2 : ord, calc_term temp_sum expt(glob_h, calc_term - 1) ------------------------------------, term_no : glob_max_terms, factorial_1(calc_term - 1) while term_no >= 1 do (array_y : array_y_higher_work2 , term_no 1, term_no ord : 1, while ord <= order_diff do (array_y_higher : ord, term_no array_y_higher_work2 , ord : 1 + ord), term_no : term_no - 1)), ord, term_no omniout_str(ALWAYS, "Finished!"), if glob_iter >= glob_max_iter then omniout_str(ALWAYS, "Maximum Iterations Reached before Solution Completed!"), if elapsed_time_seconds() - convfloat(glob_orig_start_sec) >= convfloat(glob_max_sec) then omniout_str(ALWAYS, "Maximum Time Reached before Solution Completed!"), glob_clock_sec : elapsed_time_seconds(), omniout_str(INFO, "diff ( y , x , 1 ) = (0.2 * x + 0.3) / exp(x);"), omniout_int(INFO, "Iterations ", 32, glob_iter, 4, " "), prog_report(x_start, x_end), if glob_html_log then (logstart(html_log_file), logitem_str(html_log_file, "2013-05-26T00:38:17-05:00"), logitem_str(html_log_file, "Maxima"), logitem_str(html_log_file, "div_lin_exp"), logitem_str(html_log_file, "diff ( y , x , 1 ) = (0.2 * x + 0.3) / exp(x);"), logitem_float(html_log_file, x_start), logitem_float(html_log_file, x_end), logitem_float(html_log_file, array_x ), logitem_float(html_log_file, glob_h), 1 logitem_str(html_log_file, "16"), logitem_good_digits(html_log_file, array_last_rel_error ), logitem_integer(html_log_file, glob_max_terms), 1 logitem_float(html_log_file, array_1st_rel_error ), 1 logitem_float(html_log_file, array_last_rel_error ), 1 logitem_integer(html_log_file, glob_iter), logitem_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, " 189 "), logitem_str(html_log_file, "div_lin_exp diffeq.max"), logitem_str(html_log_file, "div_lin_exp maxima results"), logitem_str(html_log_file, "All Tests - All Languages"), logend(html_log_file)), if glob_html_log then close(html_log_file))) (%i58) main() "##############ECHO OF PROBLEM#################" "##############temp/div_lin_exppostode.ode#################" "diff ( y , x , 1 ) = (0.2 * x + 0.3) / exp(x);" "!" "/* BEGIN FIRST INPUT BLOCK */" "Digits:32," "max_terms:30," "!" "/* END FIRST INPUT BLOCK */" "/* BEGIN SECOND INPUT BLOCK */" "x_start:1.0," "/* # did poorly with x_start := -5.0; */" "x_end:5.0," "array_y_init[0 + 1] : exact_soln_y(x_start)," "glob_look_poles:true," "glob_max_iter:1000000," "glob_display_interval:0.1," "glob_max_minutes:10," "/* END SECOND INPUT BLOCK */" "/* BEGIN OVERRIDE BLOCK */" "glob_desired_digits_correct:10," "glob_display_interval:0.01," "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(" " (-(0.1 * (5.0 + 2.0*x))/exp(x)) " "));" "/* END USER DEF BLOCK */" "#######END OF ECHO OF PROBLEM#################" "START of Optimize" min_size = 0.0 "" min_size = 1. "" glob_desired_digits_correct = 10. "" desired_abs_gbl_error = 1.0000000000E-10 "" range = 4. "" estimated_steps = 4000000. "" step_error = 2.500000000000000000E-17 "" est_needed_step_err = 2.500000000000000000E-17 "" opt_iter = 1 hn_div_ho = 0.5 "" hn_div_ho_2 = 0.25 "" hn_div_ho_3 = 0.125 "" max_estimated_step_error = 4.104860300807793000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000E-183 "" estimated_step_error = 4.104860300807793000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000E-183 "" best_h = 2.000000E-6 "" opt_iter = 2 hn_div_ho = 0.5 "" hn_div_ho_2 = 0.25 "" hn_div_ho_3 = 0.125 "" max_estimated_step_error = 2.7547250633786270000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000E-175 "" estimated_step_error = 2.7547250633786270000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000E-175 "" best_h = 4.000000E-6 "" opt_iter = 3 hn_div_ho = 0.5 "" hn_div_ho_2 = 0.25 "" hn_div_ho_3 = 0.125 "" max_estimated_step_error = 1.848664624844849600000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000E-167 "" estimated_step_error = 1.848664624844849600000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000E-167 "" best_h = 8.000000E-6 "" opt_iter = 4 hn_div_ho = 0.5 "" hn_div_ho_2 = 0.25 "" hn_div_ho_3 = 0.125 "" max_estimated_step_error = 1.2406177329217022000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000E-159 "" estimated_step_error = 1.2406177329217022000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000E-159 "" best_h = 1.600000E-5 "" opt_iter = 5 hn_div_ho = 0.5 "" hn_div_ho_2 = 0.25 "" hn_div_ho_3 = 0.125 "" max_estimated_step_error = 8.32564338322097500000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000E-152 "" estimated_step_error = 8.32564338322097500000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000E-152 "" best_h = 3.200000E-5 "" opt_iter = 6 hn_div_ho = 0.5 "" hn_div_ho_2 = 0.25 "" hn_div_ho_3 = 0.125 "" max_estimated_step_error = 5.587242966122242000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000E-144 "" estimated_step_error = 5.587242966122242000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000E-144 "" best_h = 6.400000E-5 "" opt_iter = 7 hn_div_ho = 0.5 "" hn_div_ho_2 = 0.25 "" hn_div_ho_3 = 0.125 "" max_estimated_step_error = 3.74953296279697760000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000E-136 "" estimated_step_error = 3.74953296279697760000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000E-136 "" best_h = 1.280000E-4 "" opt_iter = 8 hn_div_ho = 0.5 "" hn_div_ho_2 = 0.25 "" hn_div_ho_3 = 0.125 "" max_estimated_step_error = 2.516265861870037300000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000E-128 "" estimated_step_error = 2.516265861870037300000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000E-128 "" best_h = 2.560000E-4 "" opt_iter = 9 hn_div_ho = 0.5 "" hn_div_ho_2 = 0.25 "" hn_div_ho_3 = 0.125 "" max_estimated_step_error = 1.6886332545641447000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000E-120 "" estimated_step_error = 1.6886332545641447000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000E-120 "" best_h = 5.120000E-4 "" opt_iter = 10 hn_div_ho = 0.5 "" hn_div_ho_2 = 0.25 "" hn_div_ho_3 = 0.125 "" max_estimated_step_error = 1.13321698325619040000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000E-112 "" estimated_step_error = 1.13321698325619040000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000E-112 "" best_h = 1.024000E-3 "" opt_iter = 11 hn_div_ho = 0.5 "" hn_div_ho_2 = 0.25 "" hn_div_ho_3 = 0.125 "" max_estimated_step_error = 7.604815132584731000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000E-105 "" estimated_step_error = 7.604815132584731000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000E-105 "" best_h = 2.048000E-3 "" opt_iter = 12 hn_div_ho = 0.5 "" hn_div_ho_2 = 0.25 "" hn_div_ho_3 = 0.125 "" max_estimated_step_error = 5.1034039701785540000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000E-97 "" estimated_step_error = 5.1034039701785540000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000E-97 "" best_h = 4.096000E-3 "" opt_iter = 13 hn_div_ho = 0.5 "" hn_div_ho_2 = 0.25 "" hn_div_ho_3 = 0.125 "" max_estimated_step_error = 3.42470077744608200000000000000000000000000000000000000000000000000000000000000000000000000000000000000000E-89 "" estimated_step_error = 3.42470077744608200000000000000000000000000000000000000000000000000000000000000000000000000000000000000000E-89 "" best_h = 8.192000E-3 "" opt_iter = 14 hn_div_ho = 0.5 "" hn_div_ho_2 = 0.25 "" hn_div_ho_3 = 0.125 "" max_estimated_step_error = 2.2980957385739625000000000000000000000000000000000000000000000000000000000000000000000000000000000E-81 "" estimated_step_error = 2.2980957385739625000000000000000000000000000000000000000000000000000000000000000000000000000000000E-81 "" best_h = 1.638400E-2 "" opt_iter = 15 hn_div_ho = 0.5 "" hn_div_ho_2 = 0.25 "" hn_div_ho_3 = 0.125 "" max_estimated_step_error = 1.54198165824482060000000000000000000000000000000000000000000000000000000000000000000000000E-73 "" estimated_step_error = 1.54198165824482060000000000000000000000000000000000000000000000000000000000000000000000000E-73 "" best_h = 3.276800E-2 "" opt_iter = 16 hn_div_ho = 0.5 "" hn_div_ho_2 = 0.25 "" hn_div_ho_3 = 0.125 "" max_estimated_step_error = 1.034478649508161300000000000000000000000000000000000000000000000000000000000000000E-65 "" estimated_step_error = 1.034478649508161300000000000000000000000000000000000000000000000000000000000000000E-65 "" best_h = 6.553600E-2 "" opt_iter = 17 hn_div_ho = 0.5 "" hn_div_ho_2 = 0.25 "" hn_div_ho_3 = 0.125 "" max_estimated_step_error = 6.9378740859219170000000000000000000000000000000000000000000000000000000000E-58 "" estimated_step_error = 6.9378740859219170000000000000000000000000000000000000000000000000000000000E-58 "" best_h = 0.131072 "" opt_iter = 18 hn_div_ho = 0.5 "" hn_div_ho_2 = 0.25 "" hn_div_ho_3 = 0.125 "" max_estimated_step_error = 4.65004094790731400000000000000000000000000000000000000000000000000E-50 "" estimated_step_error = 4.65004094790731400000000000000000000000000000000000000000000000000E-50 "" best_h = 0.1 "" "START of Soultion" " " "TOP MAIN SOLVE Loop" x[1] = 1. " " y[1] (analytic) = -0.2575156088200097 " " y[1] (numeric) = -0.2575156088200097 " " absolute error = 0.0 " " relative error = 0.0 "%" Correct digits = 16 h = 1.00E-2 " " "NO INFO (given) for Equation 1" Radius of convergence (ratio test) for eq 1 = 17.77419356706795 " " "Order of pole (ratio test) Not computed" Radius of convergence (three term test) for eq 1 = 274.65891488458857 " " Order of pole (three term test) = -7207.637220512933 " " "NO COMPLEX POLE (six term test) for Equation 1" " " "TOP MAIN SOLVE Loop" x[1] = 1.01 " " y[1] (analytic) = -0.2556817236592094 " " y[1] (numeric) = -0.25568172365920944 " " absolute error = 5.55111512312578300000000000000000E-17 " " relative error = 2.17110360634329120000000000000E-14 "%" Correct digits = 17 h = 1.00E-2 " " "NO INFO (given) for Equation 1" Radius of convergence (ratio test) for eq 1 = 17.773402195334356 " " "Order of pole (ratio test) Not computed" Radius of convergence (three term test) for eq 1 = 274.94092451860797 " " Order of pole (three term test) = -7215.213302054833 " " Radius of convergence (six term test) for eq 1 = 1015.6027148655915 " " Order of pole (six term test) = 147879.19277696122 " " " " "TOP MAIN SOLVE Loop" x[1] = 1.02 " " y[1] (analytic) = -0.25385883788184715 " " y[1] (numeric) = -0.2538588378818472 " " absolute error = 5.55111512312578300000000000000000E-17 " " relative error = 2.186693663865830800000000000000E-14 "%" Correct digits = 17 h = 1.00E-2 " " "NO INFO (given) for Equation 1" Radius of convergence (ratio test) for eq 1 = 17.772609806237124 " " "Order of pole (ratio test) Not computed" Radius of convergence (three term test) for eq 1 = 275.29067668287905 " " Order of pole (three term test) = -7224.561639284191 " " Radius of convergence (six term test) for eq 1 = 220.87277568270133 " " Order of pole (six term test) = 8064.677977685782 " " " " "TOP MAIN SOLVE Loop" x[1] = 1.03 " " y[1] (analytic) = -0.25204691416181807 " " y[1] (numeric) = -0.2520469141618181 " " absolute error = 5.55111512312578300000000000000000E-17 " " relative error = 2.202413444174079200000000000000E-14 "%" Correct digits = 17 h = 1.00E-2 " " "NO INFO (given) for Equation 1" Radius of convergence (ratio test) for eq 1 = 17.771816417855078 " " "Order of pole (ratio test) Not computed" Radius of convergence (three term test) for eq 1 = 275.0041571700821 " " Order of pole (three term test) = -7217.183075246470 " " Radius of convergence (six term test) for eq 1 = 289.7453725956708 " " Order of pole (six term test) = 13033.258724846895 " " " " "TOP MAIN SOLVE Loop" x[1] = 1.04 " " y[1] (analytic) = -0.25024591482681635 " " y[1] (numeric) = -0.2502459148268164 " " absolute error = 5.55111512312578300000000000000000E-17 " " relative error = 2.218264033188095700000000000000E-14 "%" Correct digits = 17 h = 1.00E-2 " " "NO INFO (given) for Equation 1" Radius of convergence (ratio test) for eq 1 = 17.77102197345096 " " "Order of pole (ratio test) Not computed" Radius of convergence (three term test) for eq 1 = 274.7026980626271 " " Order of pole (three term test) = -7209.419223980833 " " Radius of convergence (six term test) for eq 1 = 363.36926585621177 " " Order of pole (six term test) = 19759.43800442765 " " " " "TOP MAIN SOLVE Loop" x[1] = 1.05 " " y[1] (analytic) = -0.24845580186892027 " " y[1] (numeric) = -0.24845580186892036 " " absolute error = 8.32667268468867400000000000000000E-17 " " relative error = 3.35136978973895700000000000000E-14 "%" Correct digits = 17 h = 1.00E-2 " " "NO INFO (given) for Equation 1" Radius of convergence (ratio test) for eq 1 = 17.770226523925057 " " "Order of pole (ratio test) Not computed" Radius of convergence (three term test) for eq 1 = 274.55966651562323 " " Order of pole (three term test) = -7205.818835107627 " " Radius of convergence (six term test) for eq 1 = 311.2320447089492 " " Order of pole (six term test) = 14742.749515463467 " " " " "TOP MAIN SOLVE Loop" x[1] = 1.06 " " y[1] (analytic) = -0.24667653695500089 " " y[1] (numeric) = -0.24667653695500094 " " absolute error = 5.55111512312578300000000000000000E-17 " " relative error = 2.250362029420911500000000000000E-14 "%" Correct digits = 17 h = 1.00E-2 " " "NO INFO (given) for Equation 1" Radius of convergence (ratio test) for eq 1 = 17.769430054626273 " " "Order of pole (ratio test) Not computed" Radius of convergence (three term test) for eq 1 = 273.99711358401606 " " Order of pole (three term test) = -7191.181142687292 " " "NO COMPLEX POLE (six term test) for Equation 1" " " "TOP MAIN SOLVE Loop" x[1] = 1.07 " " y[1] (analytic) = -0.24490808143695658 " " y[1] (numeric) = -0.2449080814369566 " " absolute error = 2.775557561562891400000000000000000E-17 " " relative error = 1.133305828569550900000000000000E-14 "%" Correct digits = 17 h = 1.00E-2 " " "NO INFO (given) for Equation 1" Radius of convergence (ratio test) for eq 1 = 17.768632545090945 " " "Order of pole (ratio test) Not computed" Radius of convergence (three term test) for eq 1 = 273.54121280236893 " " Order of pole (three term test) = -7179.356405185594 " " "NO COMPLEX POLE (six term test) for Equation 1" " " "TOP MAIN SOLVE Loop" x[1] = 1.08 " " y[1] (analytic) = -0.24315039636177643 " " y[1] (numeric) = -0.2431503963617765 " " absolute error = 5.55111512312578300000000000000000E-17 " " relative error = 2.282996534731713500000000000000E-14 "%" Correct digits = 17 h = 1.00E-2 " " "NO INFO (given) for Equation 1" Radius of convergence (ratio test) for eq 1 = 17.767833946421323 " " "Order of pole (ratio test) Not computed" Radius of convergence (three term test) for eq 1 = 273.8555386684549 " " Order of pole (three term test) = -7187.775545874581 " " "NO COMPLEX POLE (six term test) for Equation 1" " " "TOP MAIN SOLVE Loop" x[1] = 1.09 " " y[1] (analytic) = -0.2414034424814345 " " y[1] (numeric) = -0.2414034424814346 " " absolute error = 1.11022302462515650000000000000000E-16 " " relative error = 4.59903559457541700000000000000E-14 "%" Correct digits = 17 h = 1.00E-2 " " "NO INFO (given) for Equation 1" Radius of convergence (ratio test) for eq 1 = 17.767034412347794 " " "Order of pole (ratio test) Not computed" Radius of convergence (three term test) for eq 1 = 273.6987188628999 " " Order of pole (three term test) = -7183.802297037862 " " "NO COMPLEX POLE (six term test) for Equation 1" " " "TOP MAIN SOLVE Loop" x[1] = 1.1 " " y[1] (analytic) = -0.2396671802626173 " " y[1] (numeric) = -0.23966718026261735 " " absolute error = 5.55111512312578300000000000000000E-17 " " relative error = 2.316176589987457800000000000000E-14 "%" Correct digits = 17 h = 1.00E-2 " " "NO INFO (given) for Equation 1" Radius of convergence (ratio test) for eq 1 = 17.766233754723814 " " "Order of pole (ratio test) Not computed" Radius of convergence (three term test) for eq 1 = 274.01429104256937 " " Order of pole (three term test) = -7192.258111027643 " " Radius of convergence (six term test) for eq 1 = 262.8366130703333 " " Order of pole (six term test) = 10703.355658533603 " " " " "TOP MAIN SOLVE Loop" x[1] = 1.11 " " y[1] (analytic) = -0.2379415698962865 " " y[1] (numeric) = -0.2379415698962866 " " absolute error = 8.32667268468867400000000000000000E-17 " " relative error = 3.49946110228577860000000000000E-14 "%" Correct digits = 17 h = 1.00E-2 " " "NO INFO (given) for Equation 1" Radius of convergence (ratio test) for eq 1 = 17.76543209320005 " " "Order of pole (ratio test) Not computed" Radius of convergence (three term test) for eq 1 = 273.65524074255404 " " Order of pole (three term test) = -7182.974753113317 " " Radius of convergence (six term test) for eq 1 = 501.0914363460501 " " Order of pole (six term test) = 35877.805728044565 " " " " "TOP MAIN SOLVE Loop" x[1] = 1.12 " " y[1] (analytic) = -0.23622657130708058 " " y[1] (numeric) = -0.23622657130708066 " " absolute error = 8.32667268468867400000000000000000E-17 " " relative error = 3.52486709628634100000000000000E-14 "%" Correct digits = 17 h = 1.00E-2 " " "NO INFO (given) for Equation 1" Radius of convergence (ratio test) for eq 1 = 17.764629414582345 " " "Order of pole (ratio test) Not computed" Radius of convergence (three term test) for eq 1 = 272.87581648108363 " " Order of pole (three term test) = -7162.6398269939 " " "NO COMPLEX POLE (six term test) for Equation 1" " " "TOP MAIN SOLVE Loop" x[1] = 1.1300000000000001 " " y[1] (analytic) = -0.2345221441625556 " " y[1] (numeric) = -0.2345221441625557 " " absolute error = 1.11022302462515650000000000000000E-16 " " relative error = 4.73397950794625930000000000000E-14 "%" Correct digits = 17 h = 1.00E-2 " " "NO INFO (given) for Equation 1" Radius of convergence (ratio test) for eq 1 = 17.76382562965773 " " "Order of pole (ratio test) Not computed" Radius of convergence (three term test) for eq 1 = 272.9197316434556 " " Order of pole (three term test) = -7163.959479183316 " " "NO COMPLEX POLE (six term test) for Equation 1" " " "TOP MAIN SOLVE Loop" x[1] = 1.1400000000000001 " " y[1] (analytic) = -0.23282824788226922 " " y[1] (numeric) = -0.2328282478822693 " " absolute error = 8.32667268468867400000000000000000E-17 " " relative error = 3.57631548595387700000000000000E-14 "%" Correct digits = 17 h = 1.00E-2 " " "NO INFO (given) for Equation 1" Radius of convergence (ratio test) for eq 1 = 17.76302082117943 " " "Order of pole (ratio test) Not computed" Radius of convergence (three term test) for eq 1 = 273.3612845757465 " " Order of pole (three term test) = -7175.713120421708 " " Radius of convergence (six term test) for eq 1 = 326.43852557333116 " " Order of pole (six term test) = 15757.348006324495 " " " " "TOP MAIN SOLVE Loop" x[1] = 1.1500000000000001 " " y[1] (analytic) = -0.23114484164670884 " " y[1] (numeric) = -0.23114484164670893 " " absolute error = 8.32667268468867400000000000000000E-17 " " relative error = 3.60236145672482630000000000000E-14 "%" Correct digits = 17 h = 1.00E-2 " " "NO INFO (given) for Equation 1" Radius of convergence (ratio test) for eq 1 = 17.762214984662734 " " "Order of pole (ratio test) Not computed" Radius of convergence (three term test) for eq 1 = 272.6092279504105 " " Order of pole (three term test) = -7156.103008726778 " " "NO COMPLEX POLE (six term test) for Equation 1" " " "TOP MAIN SOLVE Loop" x[1] = 1.1600000000000001 " " y[1] (analytic) = -0.22947188440606708 " " y[1] (numeric) = -0.22947188440606717 " " absolute error = 8.32667268468867400000000000000000E-17 " " relative error = 3.62862435467432900000000000000E-14 "%" Correct digits = 17 h = 1.00E-2 " " "NO INFO (given) for Equation 1" Radius of convergence (ratio test) for eq 1 = 17.76140808300648 " " "Order of pole (ratio test) Not computed" Radius of convergence (three term test) for eq 1 = 273.1407582532376 " " Order of pole (three term test) = -7170.228942039328 " " Radius of convergence (six term test) for eq 1 = 275.2013564117642 " " Order of pole (six term test) = 11450.346984542657 " " " " "TOP MAIN SOLVE Loop" x[1] = 1.1700000000000002 " " y[1] (analytic) = -0.22780933488886596 " " y[1] (numeric) = -0.22780933488886607 " " absolute error = 1.11022302462515650000000000000000E-16 " " relative error = 4.87347467638569560000000000000E-14 "%" Correct digits = 17 h = 1.00E-2 " " "NO INFO (given) for Equation 1" Radius of convergence (ratio test) for eq 1 = 17.760600123271594 " " "Order of pole (ratio test) Not computed" Radius of convergence (three term test) for eq 1 = 273.1018347352978 " " Order of pole (three term test) = -7169.36895094327 " " Radius of convergence (six term test) for eq 1 = 219.30656793804687 " " Order of pole (six term test) = 7623.2208398895755 " " " " "TOP MAIN SOLVE Loop" x[1] = 1.1800000000000002 " " y[1] (analytic) = -0.2261571516104326 " " y[1] (numeric) = -0.22615715161043265 " " absolute error = 5.55111512312578300000000000000000E-17 " " relative error = 2.454538838854791500000000000000E-14 "%" Correct digits = 17 h = 1.00E-2 " " "NO INFO (given) for Equation 1" Radius of convergence (ratio test) for eq 1 = 17.759791135527436 " " "Order of pole (ratio test) Not computed" Radius of convergence (three term test) for eq 1 = 272.29863874401343 " " Order of pole (three term test) = -7148.404935863440 " " "NO COMPLEX POLE (six term test) for Equation 1" " " "TOP MAIN SOLVE Loop" x[1] = 1.1900000000000002 " " y[1] (analytic) = -0.22451529288122757 " " y[1] (numeric) = -0.22451529288122765 " " absolute error = 8.32667268468867400000000000000000E-17 " " relative error = 3.708732967733127700000000000000E-14 "%" Correct digits = 17 h = 1.00E-2 " " "NO INFO (given) for Equation 1" Radius of convergence (ratio test) for eq 1 = 17.75898106666495 " " "Order of pole (ratio test) Not computed" Radius of convergence (three term test) for eq 1 = 271.8227966363775 " " Order of pole (three term test) = -7136.05185556141 " " "NO COMPLEX POLE (six term test) for Equation 1" " " "TOP MAIN SOLVE Loop" x[1] = 1.2000000000000002 " " y[1] (analytic) = -0.22288371681502955 " " y[1] (numeric) = -0.2228837168150296 " " absolute error = 5.55111512312578300000000000000000E-17 " " relative error = 2.490588008155227900000000000000E-14 "%" Correct digits = 17 h = 1.00E-2 " " "NO INFO (given) for Equation 1" Radius of convergence (ratio test) for eq 1 = 17.758169929764794 " " "Order of pole (ratio test) Not computed" Radius of convergence (three term test) for eq 1 = 272.567719326609 " " Order of pole (three term test) = -7155.794326395430 " " Radius of convergence (six term test) for eq 1 = 250.8865178296055 " " Order of pole (six term test) = 9573.97611447961 " " " " "TOP MAIN SOLVE Loop" x[1] = 1.2100000000000002 " " y[1] (analytic) = -0.22126238133697637 " " y[1] (numeric) = -0.22126238133697648 " " absolute error = 1.11022302462515650000000000000000E-16 " " relative error = 5.017676380036415000000000000000E-14 "%" Correct digits = 17 h = 1.00E-2 " " "NO INFO (given) for Equation 1" Radius of convergence (ratio test) for eq 1 = 17.757357749006047 " " "Order of pole (ratio test) Not computed" Radius of convergence (three term test) for eq 1 = 271.9864531849419 " " Order of pole (three term test) = -7140.66641949671 " " "NO COMPLEX POLE (six term test) for Equation 1" " " "TOP MAIN SOLVE Loop" x[1] = 1.2200000000000002 " " y[1] (analytic) = -0.21965124419146656 " " y[1] (numeric) = -0.21965124419146662 " " absolute error = 5.55111512312578300000000000000000E-17 " " relative error = 2.527240464109077300000000000000E-14 "%" Correct digits = 17 h = 1.00E-2 " " "NO INFO (given) for Equation 1" Radius of convergence (ratio test) for eq 1 = 17.756544504327604 " " "Order of pole (ratio test) Not computed" Radius of convergence (three term test) for eq 1 = 272.11150251400227 " " Order of pole (three term test) = -7144.1126012263285 " " Radius of convergence (six term test) for eq 1 = 337.0080116869163 " " Order of pole (six term test) = 16327.099120369658 " " " " "TOP MAIN SOLVE Loop" x[1] = 1.2300000000000002 " " y[1] (analytic) = -0.2180502629499211 " " y[1] (numeric) = -0.21805026294992116 " " absolute error = 5.55111512312578300000000000000000E-17 " " relative error = 2.5457961150914500000000000000E-14 "%" Correct digits = 17 h = 1.00E-2 " " "NO INFO (given) for Equation 1" Radius of convergence (ratio test) for eq 1 = 17.755730204557146 " " "Order of pole (ratio test) Not computed" Radius of convergence (three term test) for eq 1 = 271.6354991274893 " " Order of pole (three term test) = -7131.7511760462 " " "NO COMPLEX POLE (six term test) for Equation 1" " " "TOP MAIN SOLVE Loop" x[1] = 1.2400000000000002 " " y[1] (analytic) = -0.21645939501840986 " " y[1] (numeric) = -0.21645939501840994 " " absolute error = 8.32667268468867400000000000000000E-17 " " relative error = 3.846759658540342400000000000000E-14 "%" Correct digits = 17 h = 1.00E-2 " " "NO INFO (given) for Equation 1" Radius of convergence (ratio test) for eq 1 = 17.754914788223903 " " "Order of pole (ratio test) Not computed" Radius of convergence (three term test) for eq 1 = 271.88732323409636 " " Order of pole (three term test) = -7138.53939520622 " " Radius of convergence (six term test) for eq 1 = 248.5977568080724 " " Order of pole (six term test) = 9292.236321439055 " " " " "TOP MAIN SOLVE Loop" x[1] = 1.2500000000000002 " " y[1] (analytic) = -0.21487859764514253 " " y[1] (numeric) = -0.21487859764514264 " " absolute error = 1.11022302462515650000000000000000E-16 " " relative error = 5.16674548694986700000000000000E-14 "%" Correct digits = 17 h = 1.00E-2 " " "NO INFO (given) for Equation 1" Radius of convergence (ratio test) for eq 1 = 17.75409836632902 " " "Order of pole (ratio test) Not computed" Radius of convergence (three term test) for eq 1 = 271.3922129156431 " " Order of pole (three term test) = -7125.674834765136 " " Radius of convergence (six term test) for eq 1 = 775.797625727214 " " Order of pole (six term test) = 81187.92549587037 " " " " "TOP MAIN SOLVE Loop" x[1] = 1.2600000000000002 " " y[1] (analytic) = -0.21330782792782732 " " y[1] (numeric) = -0.21330782792782738 " " absolute error = 5.55111512312578300000000000000000E-17 " " relative error = 2.60239634759395800000000000000E-14 "%" Correct digits = 17 h = 1.00E-2 " " "NO INFO (given) for Equation 1" Radius of convergence (ratio test) for eq 1 = 17.753280833982277 " " "Order of pole (ratio test) Not computed" Radius of convergence (three term test) for eq 1 = 271.4476975032122 " " Order of pole (three term test) = -7127.289124429900 " " Radius of convergence (six term test) for eq 1 = 373.06614838568885 " " Order of pole (six term test) = 19535.140975877664 " " " " "TOP MAIN SOLVE Loop" x[1] = 1.2700000000000002 " " y[1] (analytic) = -0.21174704282089832 " " y[1] (numeric) = -0.2117470428208984 " " absolute error = 8.32667268468867400000000000000000E-17 " " relative error = 3.93236787336464060000000000000E-14 "%" Correct digits = 17 h = 1.00E-2 " " "NO INFO (given) for Equation 1" Radius of convergence (ratio test) for eq 1 = 17.75246223814644 " " "Order of pole (ratio test) Not computed" Radius of convergence (three term test) for eq 1 = 271.1604666617525 " " Order of pole (three term test) = -7119.893514671433 " " Radius of convergence (six term test) for eq 1 = 612.4326746674387 " " Order of pole (six term test) = 50740.621679393946 " " " " "TOP MAIN SOLVE Loop" x[1] = 1.2800000000000002 " " y[1] (analytic) = -0.21019619914261473 " " y[1] (numeric) = -0.2101961991426148 " " absolute error = 8.32667268468867400000000000000000E-17 " " relative error = 3.961381185127501600000000000000E-14 "%" Correct digits = 17 h = 1.00E-2 " " "NO INFO (given) for Equation 1" Radius of convergence (ratio test) for eq 1 = 17.751642587790446 " " "Order of pole (ratio test) Not computed" Radius of convergence (three term test) for eq 1 = 270.88460526124453 " " Order of pole (three term test) = -7112.794810201872 " " "NO COMPLEX POLE (six term test) for Equation 1" " " "TOP MAIN SOLVE Loop" x[1] = 1.2900000000000003 " " y[1] (analytic) = -0.20865525358203224 " " y[1] (numeric) = -0.20865525358203232 " " absolute error = 8.32667268468867400000000000000000E-17 " " relative error = 3.99063648853445500000000000000E-14 "%" Correct digits = 17 h = 1.00E-2 " " "NO INFO (given) for Equation 1" Radius of convergence (ratio test) for eq 1 = 17.75082182739888 " " "Order of pole (ratio test) Not computed" Radius of convergence (three term test) for eq 1 = 270.9578403918701 " " Order of pole (three term test) = -7114.874419255824 " " Radius of convergence (six term test) for eq 1 = 534.0437784172166 " " Order of pole (six term test) = 38703.59755018661 " " " " "TOP MAIN SOLVE Loop" x[1] = 1.3000000000000003 " " y[1] (analytic) = -0.20712416270584955 " " y[1] (numeric) = -0.20712416270584963 " " absolute error = 8.32667268468867400000000000000000E-17 " " relative error = 4.02013583345846600000000000000E-14 "%" Correct digits = 17 h = 1.00E-2 " " "NO INFO (given) for Equation 1" Radius of convergence (ratio test) for eq 1 = 17.749999980496966 " " "Order of pole (ratio test) Not computed" Radius of convergence (three term test) for eq 1 = 270.7193260244829 " " Order of pole (three term test) = -7108.7683984875075 " " Radius of convergence (six term test) for eq 1 = 468.57011333467426 " " Order of pole (six term test) = 29854.681402988168 " " " " "TOP MAIN SOLVE Loop" x[1] = 1.3100000000000003 " " y[1] (analytic) = -0.20560288296513135 " " y[1] (numeric) = -0.20560288296513143 " " absolute error = 8.32667268468867400000000000000000E-17 " " relative error = 4.04988128794906700000000000000E-14 "%" Correct digits = 17 h = 1.00E-2 " " "NO INFO (given) for Equation 1" Radius of convergence (ratio test) for eq 1 = 17.74917707135609 " " "Order of pole (ratio test) Not computed" Radius of convergence (three term test) for eq 1 = 270.85441149545244 " " Order of pole (three term test) = -7112.472585091682 " " Radius of convergence (six term test) for eq 1 = 291.09198048980113 " " Order of pole (six term test) = 12141.203434348707 " " " " "TOP MAIN SOLVE Loop" x[1] = 1.3200000000000003 " " y[1] (analytic) = -0.20409137070190966 " " y[1] (numeric) = -0.20409137070190975 " " absolute error = 8.32667268468867400000000000000000E-17 " " relative error = 4.07987493839236700000000000000E-14 "%" Correct digits = 17 h = 1.00E-2 " " "NO INFO (given) for Equation 1" Radius of convergence (ratio test) for eq 1 = 17.74835308611116 " " "Order of pole (ratio test) Not computed" Radius of convergence (three term test) for eq 1 = 270.8373043712135 " " Order of pole (three term test) = -7112.1831560085575 " " Radius of convergence (six term test) for eq 1 = 229.54154246700543 " " Order of pole (six term test) = 7904.038649636 " " " " "TOP MAIN SOLVE Loop" x[1] = 1.3300000000000003 " " y[1] (analytic) = -0.2025895821556651 " " y[1] (numeric) = -0.20258958215566522 " " absolute error = 1.11022302462515650000000000000000E-16 " " relative error = 5.480158519563395000000000000000E-14 "%" Correct digits = 17 h = 1.00E-2 " " "NO INFO (given) for Equation 1" Radius of convergence (ratio test) for eq 1 = 17.74752800454771 " " "Order of pole (ratio test) Not computed" Radius of convergence (three term test) for eq 1 = 270.43892262855013 " " Order of pole (three term test) = -7101.85833211283 " " Radius of convergence (six term test) for eq 1 = 401.728774159226 " " Order of pole (six term test) = 22103.299594160246 " " " " "TOP MAIN SOLVE Loop" x[1] = 1.3400000000000003 " " y[1] (analytic) = -0.20109747346969034 " " y[1] (numeric) = -0.20109747346969042 " " absolute error = 8.32667268468867400000000000000000E-17 " " relative error = 4.14061526533483800000000000000E-14 "%" Correct digits = 17 h = 1.00E-2 " " "NO INFO (given) for Equation 1" Radius of convergence (ratio test) for eq 1 = 17.74670184591539 " " "Order of pole (ratio test) Not computed" Radius of convergence (three term test) for eq 1 = 269.49605247620434 " " Order of pole (three term test) = -7077.220479041574 " " "NO COMPLEX POLE (six term test) for Equation 1" " " "TOP MAIN SOLVE Loop" x[1] = 1.3500000000000003 " " y[1] (analytic) = -0.19961500069733645 " " y[1] (numeric) = -0.1996150006973365 " " absolute error = 5.55111512312578300000000000000000E-17 " " relative error = 2.78091080516668500000000000000E-14 "%" Correct digits = 17 h = 1.00E-2 " " "NO INFO (given) for Equation 1" Radius of convergence (ratio test) for eq 1 = 17.745874597762572 " " "Order of pole (ratio test) Not computed" Radius of convergence (three term test) for eq 1 = 269.7862600940638 " " Order of pole (three term test) = -7085.010116228330 " " "NO COMPLEX POLE (six term test) for Equation 1" " " "TOP MAIN SOLVE Loop" x[1] = 1.3600000000000003 " " y[1] (analytic) = -0.1981421198081451 " " y[1] (numeric) = -0.1981421198081452 " " absolute error = 8.32667268468867400000000000000000E-17 " " relative error = 4.20237387828046540000000000000E-14 "%" Correct digits = 17 h = 1.00E-2 " " "NO INFO (given) for Equation 1" Radius of convergence (ratio test) for eq 1 = 17.745046231178996 " " "Order of pole (ratio test) Not computed" Radius of convergence (three term test) for eq 1 = 270.0133341523432 " " Order of pole (three term test) = -7091.144606447618 " " Radius of convergence (six term test) for eq 1 = 308.1834568660532 " " Order of pole (six term test) = 13287.344463892117 " " " " "TOP MAIN SOLVE Loop" x[1] = 1.3700000000000003 " " y[1] (analytic) = -0.19667878669386737 " " y[1] (numeric) = -0.19667878669386749 " " absolute error = 1.11022302462515650000000000000000E-16 " " relative error = 5.64485394326349300000000000000E-14 "%" Correct digits = 17 h = 1.00E-2 " " "NO INFO (given) for Equation 1" Radius of convergence (ratio test) for eq 1 = 17.74421679863021 " " "Order of pole (ratio test) Not computed" Radius of convergence (three term test) for eq 1 = 269.86521550251143 " " Order of pole (three term test) = -7087.398342597380 " " Radius of convergence (six term test) for eq 1 = 387.8276803038251 " " Order of pole (six term test) = 20468.461300504663 " " " " "TOP MAIN SOLVE Loop" x[1] = 1.3800000000000003 " " y[1] (analytic) = -0.19522495717437102 " " y[1] (numeric) = -0.1952249571743711 " " absolute error = 8.32667268468867400000000000000000E-17 " " relative error = 4.2651681451011697000000000000E-14 "%" Correct digits = 17 h = 1.00E-2 " " "NO INFO (given) for Equation 1" Radius of convergence (ratio test) for eq 1 = 17.74338625642498 " " "Order of pole (ratio test) Not computed" Radius of convergence (three term test) for eq 1 = 268.9555188083769 " " Order of pole (three term test) = -7063.6357713900925 " " "NO COMPLEX POLE (six term test) for Equation 1" " " "TOP MAIN SOLVE Loop" x[1] = 1.3900000000000003 " " y[1] (analytic) = -0.19378058700343784 " " y[1] (numeric) = -0.1937805870034379 " " absolute error = 5.55111512312578300000000000000000E-17 " " relative error = 2.86463944039311900000000000000E-14 "%" Correct digits = 17 h = 1.00E-2 " " "NO INFO (given) for Equation 1" Radius of convergence (ratio test) for eq 1 = 17.74255460528001 " " "Order of pole (ratio test) Not computed" Radius of convergence (three term test) for eq 1 = 269.5971887020655 " " Order of pole (three term test) = -7080.668457387363 " " Radius of convergence (six term test) for eq 1 = 311.9764084252543 " " Order of pole (six term test) = 13509.086415172598 " " " " "TOP MAIN SOLVE Loop" x[1] = 1.4000000000000004 " " y[1] (analytic) = -0.192345631874453 " " y[1] (numeric) = -0.19234563187445308 " " absolute error = 8.32667268468867400000000000000000E-17 " " relative error = 4.32901574293281740000000000000E-14 "%" Correct digits = 17 h = 1.00E-2 " " "NO INFO (given) for Equation 1" Radius of convergence (ratio test) for eq 1 = 17.741721848666177 " " "Order of pole (ratio test) Not computed" Radius of convergence (three term test) for eq 1 = 269.2703646739067 " " Order of pole (three term test) = -7072.2350960341355 " " Radius of convergence (six term test) for eq 1 = 371.3191523873713 " " Order of pole (six term test) = 18646.645446573257 " " " " "TOP MAIN SOLVE Loop" x[1] = 1.4100000000000004 " " y[1] (analytic) = -0.19092004742598775 " " y[1] (numeric) = -0.19092004742598784 " " absolute error = 8.32667268468867400000000000000000E-17 " " relative error = 4.36134015099519600000000000000E-14 "%" Correct digits = 17 h = 1.00E-2 " " "NO INFO (given) for Equation 1" Radius of convergence (ratio test) for eq 1 = 17.740887982592838 " " "Order of pole (ratio test) Not computed" Radius of convergence (three term test) for eq 1 = 269.21305517868296 " " Order of pole (three term test) = -7070.883757794526 " " Radius of convergence (six term test) for eq 1 = 339.48836997461467 " " Order of pole (six term test) = 15717.214471102252 " " " " "TOP MAIN SOLVE Loop" x[1] = 1.4200000000000004 " " y[1] (analytic) = -0.18950378924727657 " " y[1] (numeric) = -0.18950378924727662 " " absolute error = 5.55111512312578300000000000000000E-17 " " relative error = 2.929289775774528400000000000000E-14 "%" Correct digits = 17 h = 1.00E-2 " " "NO INFO (given) for Equation 1" Radius of convergence (ratio test) for eq 1 = 17.740053028302704 " " "Order of pole (ratio test) Not computed" Radius of convergence (three term test) for eq 1 = 269.44790533400015 " " Order of pole (three term test) = -7077.221132098013 " " Radius of convergence (six term test) for eq 1 = 206.77062941945587 " " Order of pole (six term test) = 6421.117324292798 " " " " "TOP MAIN SOLVE Loop" x[1] = 1.4300000000000004 " " y[1] (analytic) = -0.188096812883591 " " y[1] (numeric) = -0.18809681288359112 " " absolute error = 1.11022302462515650000000000000000E-16 " " relative error = 5.90240210668667300000000000000E-14 "%" Correct digits = 17 h = 1.00E-2 " " "NO INFO (given) for Equation 1" Radius of convergence (ratio test) for eq 1 = 17.73921696912115 " " "Order of pole (ratio test) Not computed" Radius of convergence (three term test) for eq 1 = 268.94799902321324 " " Order of pole (three term test) = -7064.228497133001 " " Radius of convergence (six term test) for eq 1 = 326.99205869123807 " " Order of pole (six term test) = 14567.762739762034 " " " " "TOP MAIN SOLVE Loop" x[1] = 1.4400000000000004 " " y[1] (analytic) = -0.18669907384151194 " " y[1] (numeric) = -0.186699073841512 " " absolute error = 5.55111512312578300000000000000000E-17 " " relative error = 2.973295479675545600000000000000E-14 "%" Correct digits = 17 h = 1.00E-2 " " "NO INFO (given) for Equation 1" Radius of convergence (ratio test) for eq 1 = 17.738379823524447 " " "Order of pole (ratio test) Not computed" Radius of convergence (three term test) for eq 1 = 268.18986572254147 " " Order of pole (three term test) = -7044.443052739293 " " "NO COMPLEX POLE (six term test) for Equation 1" " " "TOP MAIN SOLVE Loop" x[1] = 1.4500000000000004 " " y[1] (analytic) = -0.18531052759410008 " " y[1] (numeric) = -0.1853105275941002 " " absolute error = 1.11022302462515650000000000000000E-16 " " relative error = 5.99114922956219600000000000000E-14 "%" Correct digits = 17 h = 1.00E-2 " " "NO INFO (given) for Equation 1" Radius of convergence (ratio test) for eq 1 = 17.737541540268722 " " "Order of pole (ratio test) Not computed" Radius of convergence (three term test) for eq 1 = 268.1058880369437 " " Order of pole (three term test) = -7042.389585687805 " " "NO COMPLEX POLE (six term test) for Equation 1" " " "TOP MAIN SOLVE Loop" x[1] = 1.4600000000000004 " " y[1] (analytic) = -0.18393112958596894 " " y[1] (numeric) = -0.18393112958596902 " " absolute error = 8.32667268468867400000000000000000E-17 " " relative error = 4.52706004874330400000000000000E-14 "%" Correct digits = 17 h = 1.00E-2 " " "NO INFO (given) for Equation 1" Radius of convergence (ratio test) for eq 1 = 17.736702122184994 " " "Order of pole (ratio test) Not computed" Radius of convergence (three term test) for eq 1 = 268.0648724617057 " " Order of pole (three term test) = -7041.469079116696 " " "NO COMPLEX POLE (six term test) for Equation 1" " " "TOP MAIN SOLVE Loop" x[1] = 1.4700000000000004 " " y[1] (analytic) = -0.18256083523825867 " " y[1] (numeric) = -0.18256083523825875 " " absolute error = 8.32667268468867400000000000000000E-17 " " relative error = 4.56103998090368100000000000000E-14 "%" Correct digits = 17 h = 1.00E-2 " " "NO INFO (given) for Equation 1" Radius of convergence (ratio test) for eq 1 = 17.735861636126142 " " "Order of pole (ratio test) Not computed" Radius of convergence (three term test) for eq 1 = 268.18092466023927 " " Order of pole (three term test) = -7044.678412367586 " " Radius of convergence (six term test) for eq 1 = 672.3946855588379 " " Order of pole (six term test) = 57951.40786387364 " " " " "TOP MAIN SOLVE Loop" x[1] = 1.4800000000000004 " " y[1] (analytic) = -0.1811995999535149 " " y[1] (numeric) = -0.18119959995351495 " " absolute error = 5.55111512312578300000000000000000E-17 " " relative error = 3.06353608095706100000000000000E-14 "%" Correct digits = 17 h = 1.00E-2 " " "NO INFO (given) for Equation 1" Radius of convergence (ratio test) for eq 1 = 17.735019979169383 " " "Order of pole (ratio test) Not computed" Radius of convergence (three term test) for eq 1 = 267.4083061987322 " " Order of pole (three term test) = -7024.51601617535 " " "NO COMPLEX POLE (six term test) for Equation 1" " " "TOP MAIN SOLVE Loop" x[1] = 1.4900000000000004 " " y[1] (analytic) = -0.17984737912047202 " " y[1] (numeric) = -0.1798473791204721 " " absolute error = 8.32667268468867400000000000000000E-17 " " relative error = 4.62985489441633370000000000000E-14 "%" Correct digits = 17 h = 1.00E-2 " " "NO INFO (given) for Equation 1" Radius of convergence (ratio test) for eq 1 = 17.734177215077757 " " "Order of pole (ratio test) Not computed" Radius of convergence (three term test) for eq 1 = 267.60688884897826 " " Order of pole (three term test) = -7029.896983471657 " " "NO COMPLEX POLE (six term test) for Equation 1" " " "TOP MAIN SOLVE Loop" x[1] = 1.5000000000000004 " " y[1] (analytic) = -0.17850412811874378 " " y[1] (numeric) = -0.17850412811874386 " " absolute error = 8.32667268468867400000000000000000E-17 " " relative error = 4.6646947454064697000000000000E-14 "%" Correct digits = 17 h = 1.00E-2 " " "NO INFO (given) for Equation 1" Radius of convergence (ratio test) for eq 1 = 17.733333327254968 " " "Order of pole (ratio test) Not computed" Radius of convergence (three term test) for eq 1 = 267.90162450515595 " " Order of pole (three term test) = -7037.805258210582 " " Radius of convergence (six term test) for eq 1 = 426.14365180992945 " " Order of pole (six term test) = 23668.463155872065 " " " " "TOP MAIN SOLVE Loop" x[1] = 1.5100000000000005 " " y[1] (analytic) = -0.17716980232342128 " " y[1] (numeric) = -0.1771698023234213 " " absolute error = 2.775557561562891400000000000000000E-17 " " relative error = 1.566608713880114400000000000000E-14 "%" Correct digits = 17 h = 1.00E-2 " " "NO INFO (given) for Equation 1" Radius of convergence (ratio test) for eq 1 = 17.73248829235325 " " "Order of pole (ratio test) Not computed" Radius of convergence (three term test) for eq 1 = 267.7278205522316 " " Order of pole (three term test) = -7033.400771924336 " " Radius of convergence (six term test) for eq 1 = 309.31083585314144 " " Order of pole (six term test) = 12849.880000796886 " " " " "TOP MAIN SOLVE Loop" x[1] = 1.5200000000000005 " " y[1] (analytic) = -0.1758443571095806 " " y[1] (numeric) = -0.17584435710958066 " " absolute error = 5.55111512312578300000000000000000E-17 " " relative error = 3.156834381478903500000000000000E-14 "%" Correct digits = 17 h = 1.00E-2 " " "NO INFO (given) for Equation 1" Radius of convergence (ratio test) for eq 1 = 17.731642190812508 " " "Order of pole (ratio test) Not computed" Radius of convergence (three term test) for eq 1 = 267.48471824137863 " " Order of pole (three term test) = -7027.159521880171 " " Radius of convergence (six term test) for eq 1 = 412.4583766973181 " " Order of pole (six term test) = 22088.462873567787 " " " " "TOP MAIN SOLVE Loop" x[1] = 1.5300000000000005 " " y[1] (analytic) = -0.1745277478567016 " " y[1] (numeric) = -0.1745277478567017 " " absolute error = 8.32667268468867400000000000000000E-17 " " relative error = 4.770973548300985000000000000000E-14 "%" Correct digits = 17 h = 1.00E-2 " " "NO INFO (given) for Equation 1" Radius of convergence (ratio test) for eq 1 = 17.7307949216876 " " "Order of pole (ratio test) Not computed" Radius of convergence (three term test) for eq 1 = 267.0912334671679 " " Order of pole (three term test) = -7016.967576027761 " " Radius of convergence (six term test) for eq 1 = 1238.6547782562677 " " Order of pole (six term test) = 191134.93496457365 " " " " "TOP MAIN SOLVE Loop" x[1] = 1.5400000000000005 " " y[1] (analytic) = -0.17321992995299815 " " y[1] (numeric) = -0.17321992995299818 " " absolute error = 2.775557561562891400000000000000000E-17 " " relative error = 1.602331534434875400000000000000E-14 "%" Correct digits = 17 h = 1.00E-2 " " "NO INFO (given) for Equation 1" Radius of convergence (ratio test) for eq 1 = 17.729946533397428 " " "Order of pole (ratio test) Not computed" Radius of convergence (three term test) for eq 1 = 267.15586446303143 " " Order of pole (three term test) = -7018.8224795415745 " " Radius of convergence (six term test) for eq 1 = 473.2173125880955 " " Order of pole (six term test) = 28660.438222794004 " " " " "TOP MAIN SOLVE Loop" x[1] = 1.5500000000000005 " " y[1] (analytic) = -0.17192085879966182 " " y[1] (numeric) = -0.17192085879966187 " " absolute error = 5.55111512312578300000000000000000E-17 " " relative error = 3.22887819539946500000000000000E-14 "%" Correct digits = 17 h = 1.00E-2 " " "NO INFO (given) for Equation 1" Radius of convergence (ratio test) for eq 1 = 17.729096985504555 " " "Order of pole (ratio test) Not computed" Radius of convergence (three term test) for eq 1 = 267.3546420519759 " " Order of pole (three term test) = -7024.208830116038 " " Radius of convergence (six term test) for eq 1 = 284.49407499247326 " " Order of pole (six term test) = 10927.745636733014 " " " " "TOP MAIN SOLVE Loop" x[1] = 1.5600000000000005 " " y[1] (analytic) = -0.1706304898150209 " " y[1] (numeric) = -0.17063048981502096 " " absolute error = 5.55111512312578300000000000000000E-17 " " relative error = 3.253296130805052000000000000000E-14 "%" Correct digits = 17 h = 1.00E-2 " " "NO INFO (given) for Equation 1" Radius of convergence (ratio test) for eq 1 = 17.728246325548945 " " "Order of pole (ratio test) Not computed" Radius of convergence (three term test) for eq 1 = 266.90199640369116 " " Order of pole (three term test) = -7012.458753150977 " " Radius of convergence (six term test) for eq 1 = 439.2621989687818 " " Order of pole (six term test) = 24715.229949698394 " " " " "TOP MAIN SOLVE Loop" x[1] = 1.5700000000000005 " " y[1] (analytic) = -0.16934877843861457 " " y[1] (numeric) = -0.16934877843861465 " " absolute error = 8.32667268468867400000000000000000E-17 " " relative error = 4.916877914006873600000000000000E-14 "%" Correct digits = 17 h = 1.00E-2 " " "NO INFO (given) for Equation 1" Radius of convergence (ratio test) for eq 1 = 17.727394496589397 " " "Order of pole (ratio test) Not computed" Radius of convergence (three term test) for eq 1 = 266.7413466235853 " " Order of pole (three term test) = -7008.39792593522 " " Radius of convergence (six term test) for eq 1 = 351.02345975346486 " " Order of pole (six term test) = 16037.600219463604 " " " " "TOP MAIN SOLVE Loop" x[1] = 1.5800000000000005 " " y[1] (analytic) = -0.16807568013518484 " " y[1] (numeric) = -0.1680756801351849 " " absolute error = 5.55111512312578300000000000000000E-17 " " relative error = 3.30274738062102100000000000000E-14 "%" Correct digits = 17 h = 1.00E-2 " " "NO INFO (given) for Equation 1" Radius of convergence (ratio test) for eq 1 = 17.72654155759823 " " "Order of pole (ratio test) Not computed" Radius of convergence (three term test) for eq 1 = 265.9828775740627 " " Order of pole (three term test) = -6988.59334391031 " " "NO COMPLEX POLE (six term test) for Equation 1" " " "TOP MAIN SOLVE Loop" x[1] = 1.5900000000000005 " " y[1] (analytic) = -0.16681115039858654 " " y[1] (numeric) = -0.16681115039858657 " " absolute error = 2.775557561562891400000000000000000E-17 " " relative error = 1.663892104892773200000000000000E-14 "%" Correct digits = 17 h = 1.00E-2 " " "NO INFO (given) for Equation 1" Radius of convergence (ratio test) for eq 1 = 17.725687452771773 " " "Order of pole (ratio test) Not computed" Radius of convergence (three term test) for eq 1 = 265.8691859619194 " " Order of pole (three term test) = -6985.764454949983 " " "NO COMPLEX POLE (six term test) for Equation 1" " " "TOP MAIN SOLVE Loop" x[1] = 1.6000000000000005 " " y[1] (analytic) = -0.1655551447556174 " " y[1] (numeric) = -0.16555514475561742 " " absolute error = 2.775557561562891400000000000000000E-17 " " relative error = 1.676515438804395700000000000000E-14 "%" Correct digits = 17 h = 1.00E-2 " " "NO INFO (given) for Equation 1" Radius of convergence (ratio test) for eq 1 = 17.724832250772472 " " "Order of pole (ratio test) Not computed" Radius of convergence (three term test) for eq 1 = 265.81763162305094 " " Order of pole (three term test) = -6984.562494037601 " " "NO COMPLEX POLE (six term test) for Equation 1" " " "TOP MAIN SOLVE Loop" x[1] = 1.6100000000000005 " " y[1] (analytic) = -0.1643076187697687 " " y[1] (numeric) = -0.16430761876976877 " " absolute error = 5.55111512312578300000000000000000E-17 " " relative error = 3.378489180653346000000000000000E-14 "%" Correct digits = 17 h = 1.00E-2 " " "NO INFO (given) for Equation 1" Radius of convergence (ratio test) for eq 1 = 17.72397581693546 " " "Order of pole (ratio test) Not computed" Radius of convergence (three term test) for eq 1 = 266.0347978474857 " " Order of pole (three term test) = -6990.438165032749 " " Radius of convergence (six term test) for eq 1 = 639.2565039852523 " " Order of pole (six term test) = 50622.04211809315 " " " " "TOP MAIN SOLVE Loop" x[1] = 1.6200000000000006 " " y[1] (analytic) = -0.16306852804489846 " " y[1] (numeric) = -0.1630685280448985 " " absolute error = 2.775557561562891400000000000000000E-17 " " relative error = 1.702080465703770500000000000000E-14 "%" Correct digits = 17 h = 1.00E-2 " " "NO INFO (given) for Equation 1" Radius of convergence (ratio test) for eq 1 = 17.723118278903737 " " "Order of pole (ratio test) Not computed" Radius of convergence (three term test) for eq 1 = 265.3918200475784 " " Order of pole (three term test) = -6973.680133440044 " " "NO COMPLEX POLE (six term test) for Equation 1" " " "TOP MAIN SOLVE Loop" x[1] = 1.6300000000000006 " " y[1] (analytic) = -0.16183782822882706 " " y[1] (numeric) = -0.1618378282288271 " " absolute error = 5.55111512312578300000000000000000E-17 " " relative error = 3.430047958427188700000000000000E-14 "%" Correct digits = 17 h = 1.00E-2 " " "NO INFO (given) for Equation 1" Radius of convergence (ratio test) for eq 1 = 17.7222595967433 " " "Order of pole (ratio test) Not computed" Radius of convergence (three term test) for eq 1 = 265.57523897659996 " " Order of pole (three term test) = -6978.66173218967 " " "NO COMPLEX POLE (six term test) for Equation 1" " " "TOP MAIN SOLVE Loop" x[1] = 1.6400000000000006 " " y[1] (analytic) = -0.16061547501685844 " " y[1] (numeric) = -0.1606154750168585 " " absolute error = 5.55111512312578300000000000000000E-17 " " relative error = 3.45615210647861270000000000000E-14 "%" Correct digits = 17 h = 1.00E-2 " " "NO INFO (given) for Equation 1" Radius of convergence (ratio test) for eq 1 = 17.721399738046347 " " "Order of pole (ratio test) Not computed" Radius of convergence (three term test) for eq 1 = 265.3124911170187 " " Order of pole (three term test) = -6971.906043559607 " " "NO COMPLEX POLE (six term test) for Equation 1" " " "TOP MAIN SOLVE Loop" x[1] = 1.6500000000000006 " " y[1] (analytic) = -0.15940142415522585 " " y[1] (numeric) = -0.15940142415522593 " " absolute error = 8.32667268468867400000000000000000E-17 " " relative error = 5.223712855024508000000000000000E-14 "%" Correct digits = 17 h = 1.00E-2 " " "NO INFO (given) for Equation 1" Radius of convergence (ratio test) for eq 1 = 17.72053871143998 " " "Order of pole (ratio test) Not computed" Radius of convergence (three term test) for eq 1 = 265.72931845495754 " " Order of pole (three term test) = -6983.0376426010425 " " Radius of convergence (six term test) for eq 1 = 286.5815817340918 " " Order of pole (six term test) = 10785.492705529228 " " " " "TOP MAIN SOLVE Loop" x[1] = 1.6600000000000006 " " y[1] (analytic) = -0.158195631444465 " " y[1] (numeric) = -0.1581956314444651 " " absolute error = 1.11022302462515650000000000000000E-16 " " relative error = 7.01803845332418900000000000000E-14 "%" Correct digits = 17 h = 1.00E-2 " " "NO INFO (given) for Equation 1" Radius of convergence (ratio test) for eq 1 = 17.71967654307402 " " "Order of pole (ratio test) Not computed" Radius of convergence (three term test) for eq 1 = 265.46038207208596 " " Order of pole (three term test) = -6976.120288164237 " " Radius of convergence (six term test) for eq 1 = 333.6738167310461 " " Order of pole (six term test) = 14265.573181025824 " " " " "TOP MAIN SOLVE Loop" x[1] = 1.6700000000000006 " " y[1] (analytic) = -0.15699805274271475 " " y[1] (numeric) = -0.15699805274271483 " " absolute error = 8.32667268468867400000000000000000E-17 " " relative error = 5.30367895602772800000000000000E-14 "%" Correct digits = 17 h = 1.00E-2 " " "NO INFO (given) for Equation 1" Radius of convergence (ratio test) for eq 1 = 17.718813190796908 " " "Order of pole (ratio test) Not computed" Radius of convergence (three term test) for eq 1 = 265.3717975602463 " " Order of pole (three term test) = -6973.952326717029 " " Radius of convergence (six term test) for eq 1 = 284.33319084289803 " " Order of pole (six term test) = 10562.68580472954 " " " " "TOP MAIN SOLVE Loop" x[1] = 1.6800000000000006 " " y[1] (analytic) = -0.15580864396894667 " " y[1] (numeric) = -0.15580864396894675 " " absolute error = 8.32667268468867400000000000000000E-17 " " relative error = 5.34416606972602600000000000000E-14 "%" Correct digits = 17 h = 1.00E-2 " " "NO INFO (given) for Equation 1" Radius of convergence (ratio test) for eq 1 = 17.71794871868215 " " "Order of pole (ratio test) Not computed" Radius of convergence (three term test) for eq 1 = 264.92784641131396 " " Order of pole (three term test) = -6962.4221692096135 " " Radius of convergence (six term test) for eq 1 = 801.0188642806626 " " Order of pole (six term test) = 77648.02042602094 " " " " "TOP MAIN SOLVE Loop" x[1] = 1.6900000000000006 " " y[1] (analytic) = -0.15462736110612493 " " y[1] (numeric) = -0.15462736110612502 " " absolute error = 8.32667268468867400000000000000000E-17 " " relative error = 5.384993073104218000000000000000E-14 "%" Correct digits = 17 h = 1.00E-2 " " "NO INFO (given) for Equation 1" Radius of convergence (ratio test) for eq 1 = 17.717083074741826 " " "Order of pole (ratio test) Not computed" Radius of convergence (three term test) for eq 1 = 264.7340871403089 " " Order of pole (three term test) = -6957.479569578802 " " "NO COMPLEX POLE (six term test) for Equation 1" " " "TOP MAIN SOLVE Loop" x[1] = 1.7000000000000006 " " y[1] (analytic) = -0.15345416020429706 " " y[1] (numeric) = -0.1534541602042971 " " absolute error = 5.55111512312578300000000000000000E-17 " " relative error = 3.61744192254902400000000000000E-14 "%" Correct digits = 17 h = 1.00E-2 " " "NO INFO (given) for Equation 1" Radius of convergence (ratio test) for eq 1 = 17.716216216513114 " " "Order of pole (ratio test) Not computed" Radius of convergence (three term test) for eq 1 = 264.2687867184837 " " Order of pole (three term test) = -6945.396192066653 " " "NO COMPLEX POLE (six term test) for Equation 1" " " "TOP MAIN SOLVE Loop" x[1] = 1.7100000000000006 " " y[1] (analytic) = -0.15228899738361673 " " y[1] (numeric) = -0.15228899738361681 " " absolute error = 8.32667268468867400000000000000000E-17 " " relative error = 5.46767844541897200000000000000E-14 "%" Correct digits = 17 h = 1.00E-2 " " "NO INFO (given) for Equation 1" Radius of convergence (ratio test) for eq 1 = 17.71534821788893 " " "Order of pole (ratio test) Not computed" Radius of convergence (three term test) for eq 1 = 264.4522606273318 " " Order of pole (three term test) = -6950.379288475315 " " "NO COMPLEX POLE (six term test) for Equation 1" " " "TOP MAIN SOLVE Loop" x[1] = 1.7200000000000006 " " y[1] (analytic) = -0.15113182883730022 " " y[1] (numeric) = -0.1511318288373003 " " absolute error = 8.32667268468867400000000000000000E-17 " " relative error = 5.50954272753007300000000000000E-14 "%" Correct digits = 17 h = 1.00E-2 " " "NO INFO (given) for Equation 1" Radius of convergence (ratio test) for eq 1 = 17.714478998000732 " " "Order of pole (ratio test) Not computed" Radius of convergence (three term test) for eq 1 = 264.3512137498432 " " Order of pole (three term test) = -6947.889901755649 " " Radius of convergence (six term test) for eq 1 = 481.74509587328185 " " Order of pole (six term test) = 28323.65219194049 " " " " "TOP MAIN SOLVE Loop" x[1] = 1.7300000000000006 " " y[1] (analytic) = -0.14998261083451656 " " y[1] (numeric) = -0.14998261083451664 " " absolute error = 8.32667268468867400000000000000000E-17 " " relative error = 5.551758726133869000000000000000E-14 "%" Correct digits = 17 h = 1.00E-2 " " "NO INFO (given) for Equation 1" Radius of convergence (ratio test) for eq 1 = 17.713608666605005 " " "Order of pole (ratio test) Not computed" Radius of convergence (three term test) for eq 1 = 264.4053969490513 " " Order of pole (three term test) = -6949.468401394229 " " Radius of convergence (six term test) for eq 1 = 421.64885579861027 " " Order of pole (six term test) = 21890.680298254993 " " " " "TOP MAIN SOLVE Loop" x[1] = 1.7400000000000007 " " y[1] (analytic) = -0.14884129972321328 " " y[1] (numeric) = -0.14884129972321336 " " absolute error = 8.32667268468867400000000000000000E-17 " " relative error = 5.59432946377990200000000000000E-14 "%" Correct digits = 17 h = 1.00E-2 " " "NO INFO (given) for Equation 1" Radius of convergence (ratio test) for eq 1 = 17.71273712725492 " " "Order of pole (ratio test) Not computed" Radius of convergence (three term test) for eq 1 = 263.5181069090424 " " Order of pole (three term test) = -6926.277422167837 " " "NO COMPLEX POLE (six term test) for Equation 1" " " "TOP MAIN SOLVE Loop" x[1] = 1.7500000000000007 " " y[1] (analytic) = -0.1477078519328783 " " y[1] (numeric) = -0.14770785193287836 " " absolute error = 5.55111512312578300000000000000000E-17 " " relative error = 3.75817199321829660000000000000E-14 "%" Correct digits = 17 h = 1.00E-2 " " "NO INFO (given) for Equation 1" Radius of convergence (ratio test) for eq 1 = 17.711864408988298 " " "Order of pole (ratio test) Not computed" Radius of convergence (three term test) for eq 1 = 263.9028844427913 " " Order of pole (three term test) = -6936.56102440072 " " Radius of convergence (six term test) for eq 1 = 811.3202648756787 " " Order of pole (six term test) = 78360.54456884168 " " " " "TOP MAIN SOLVE Loop" x[1] = 1.7600000000000007 " " y[1] (analytic) = -0.146582223977239 " " y[1] (numeric) = -0.14658222397723905 " " absolute error = 5.55111512312578300000000000000000E-17 " " relative error = 3.78703158712324400000000000000E-14 "%" Correct digits = 17 h = 1.00E-2 " " "NO INFO (given) for Equation 1" Radius of convergence (ratio test) for eq 1 = 17.710990499906337 " " "Order of pole (ratio test) Not computed" Radius of convergence (three term test) for eq 1 = 263.715566796737 " " Order of pole (three term test) = -6931.793275489186 " " Radius of convergence (six term test) for eq 1 = 852.8885751597118 " " Order of pole (six term test) = 86210.09266316555 " " " " "TOP MAIN SOLVE Loop" x[1] = 1.7700000000000007 " " y[1] (analytic) = -0.14546437245689958 " " y[1] (numeric) = -0.14546437245689967 " " absolute error = 8.32667268468867400000000000000000E-17 " " relative error = 5.72420074005119500000000000000E-14 "%" Correct digits = 17 h = 1.00E-2 " " "NO INFO (given) for Equation 1" Radius of convergence (ratio test) for eq 1 = 17.71011541931819 " " "Order of pole (ratio test) Not computed" Radius of convergence (three term test) for eq 1 = 263.53287226797875 " " Order of pole (three term test) = -6927.145171946743 " " Radius of convergence (six term test) for eq 1 = 605.763201505261 " " Order of pole (six term test) = 43819.06825026673 " " " " "TOP MAIN SOLVE Loop" x[1] = 1.7800000000000007 " " y[1] (analytic) = -0.1443542540619177 " " y[1] (numeric) = -0.14435425406191776 " " absolute error = 5.55111512312578300000000000000000E-17 " " relative error = 3.845480799439931500000000000000E-14 "%" Correct digits = 17 h = 1.00E-2 " " "NO INFO (given) for Equation 1" Radius of convergence (ratio test) for eq 1 = 17.709239131100226 " " "Order of pole (ratio test) Not computed" Radius of convergence (three term test) for eq 1 = 263.63125397572253 " " Order of pole (three term test) = -6929.893676847152 " " Radius of convergence (six term test) for eq 1 = 351.30033135897224 " " Order of pole (six term test) = 15268.479679242935 " " " " "TOP MAIN SOLVE Loop" x[1] = 1.7900000000000007 " " y[1] (analytic) = -0.14325182557432084 " " y[1] (numeric) = -0.14325182557432092 " " absolute error = 8.32667268468867400000000000000000E-17 " " relative error = 5.81261191702488500000000000000E-14 "%" Correct digits = 17 h = 1.00E-2 " " "NO INFO (given) for Equation 1" Radius of convergence (ratio test) for eq 1 = 17.70836167286502 " " "Order of pole (ratio test) Not computed" Radius of convergence (three term test) for eq 1 = 262.6964552061666 " " Order of pole (three term test) = -6905.444069373030 " " "NO COMPLEX POLE (six term test) for Equation 1" " " "TOP MAIN SOLVE Loop" x[1] = 1.8000000000000007 " " y[1] (analytic) = -0.14215704387056435 " " y[1] (numeric) = -0.14215704387056444 " " absolute error = 8.32667268468867400000000000000000E-17 " " relative error = 5.85737608068876800000000000000E-14 "%" Correct digits = 17 h = 1.00E-2 " " "NO INFO (given) for Equation 1" Radius of convergence (ratio test) for eq 1 = 17.707482993321715 " " "Order of pole (ratio test) Not computed" Radius of convergence (three term test) for eq 1 = 262.74665073320705 " " Order of pole (three term test) = -6906.928298356962 " " "NO COMPLEX POLE (six term test) for Equation 1" " " "TOP MAIN SOLVE Loop" x[1] = 1.8100000000000007 " " y[1] (analytic) = -0.1410698659239308 " " y[1] (numeric) = -0.14106986592393092 " " absolute error = 1.11022302462515650000000000000000E-16 " " relative error = 7.87002254063119900000000000000E-14 "%" Correct digits = 17 h = 1.00E-2 " " "NO INFO (given) for Equation 1" Radius of convergence (ratio test) for eq 1 = 17.70660314545935 " " "Order of pole (ratio test) Not computed" Radius of convergence (three term test) for eq 1 = 263.0434918457458 " " Order of pole (three term test) = -6914.901057048637 " " Radius of convergence (six term test) for eq 1 = 520.7773598028871 " " Order of pole (six term test) = 32306.98406240253 " " " " "TOP MAIN SOLVE Loop" x[1] = 1.8200000000000007 " " y[1] (analytic) = -0.1399902488068729 " " y[1] (numeric) = -0.139990248806873 " " absolute error = 8.32667268468867400000000000000000E-17 " " relative error = 5.94803763523268400000000000000E-14 "%" Correct digits = 17 h = 1.00E-2 " " "NO INFO (given) for Equation 1" Radius of convergence (ratio test) for eq 1 = 17.705722065710116 " " "Order of pole (ratio test) Not computed" Radius of convergence (three term test) for eq 1 = 263.1128063746982 " " Order of pole (three term test) = -6916.885659714788 " " Radius of convergence (six term test) for eq 1 = 332.76091850388025 " " Order of pole (six term test) = 13657.56392751652 " " " " "TOP MAIN SOLVE Loop" x[1] = 1.8300000000000007 " " y[1] (analytic) = -0.13891814969329955 " " y[1] (numeric) = -0.13891814969329963 " " absolute error = 8.32667268468867400000000000000000E-17 " " relative error = 5.9939415426077300000000000000E-14 "%" Correct digits = 17 h = 1.00E-2 " " "NO INFO (given) for Equation 1" Radius of convergence (ratio test) for eq 1 = 17.704839806805804 " " "Order of pole (ratio test) Not computed" Radius of convergence (three term test) for eq 1 = 262.68952609761266 " " Order of pole (three term test) = -6905.904235307135 " " Radius of convergence (six term test) for eq 1 = 635.3894369544523 " " Order of pole (six term test) = 47443.56806751882 " " " " "TOP MAIN SOLVE Loop" x[1] = 1.8400000000000007 " " y[1] (analytic) = -0.1378535258608071 " " y[1] (numeric) = -0.13785352586080718 " " absolute error = 8.32667268468867400000000000000000E-17 " " relative error = 6.0402319292843100000000000000E-14 "%" Correct digits = 17 h = 1.00E-2 " " "NO INFO (given) for Equation 1" Radius of convergence (ratio test) for eq 1 = 17.703956331375736 " " "Order of pole (ratio test) Not computed" Radius of convergence (three term test) for eq 1 = 262.26491114523196 " " Order of pole (three term test) = -6894.8894811390055 " " "NO COMPLEX POLE (six term test) for Equation 1" " " "TOP MAIN SOLVE Loop" x[1] = 1.8500000000000008 " " y[1] (analytic) = -0.13679633469285593 " " y[1] (numeric) = -0.13679633469285604 " " absolute error = 1.11022302462515650000000000000000E-16 " " relative error = 8.11588283500359700000000000000E-14 "%" Correct digits = 17 h = 1.00E-2 " " "NO INFO (given) for Equation 1" Radius of convergence (ratio test) for eq 1 = 17.70307165906339 " " "Order of pole (ratio test) Not computed" Radius of convergence (three term test) for eq 1 = 262.5093151803201 " " Order of pole (three term test) = -6901.484953695493 " " Radius of convergence (six term test) for eq 1 = 348.508213888913 " " Order of pole (six term test) = 14772.999610733288 " " " " "TOP MAIN SOLVE Loop" x[1] = 1.8600000000000008 " " y[1] (analytic) = -0.1357465336808936 " " y[1] (numeric) = -0.13574653368089368 " " absolute error = 8.32667268468867400000000000000000E-17 " " relative error = 6.13398549406986200000000000000E-14 "%" Correct digits = 17 h = 1.00E-2 " " "NO INFO (given) for Equation 1" Radius of convergence (ratio test) for eq 1 = 17.702185789619733 " " "Order of pole (ratio test) Not computed" Radius of convergence (three term test) for eq 1 = 262.0629360690827 " " Order of pole (three term test) = -6889.889973899169 " " "NO COMPLEX POLE (six term test) for Equation 1" " " "TOP MAIN SOLVE Loop" x[1] = 1.8700000000000008 " " y[1] (analytic) = -0.13470408042642482 " " y[1] (numeric) = -0.1347040804264249 " " absolute error = 8.32667268468867400000000000000000E-17 " " relative error = 6.18145542312409100000000000000E-14 "%" Correct digits = 17 h = 1.00E-2 " " "NO INFO (given) for Equation 1" Radius of convergence (ratio test) for eq 1 = 17.701298697302605 " " "Order of pole (ratio test) Not computed" Radius of convergence (three term test) for eq 1 = 262.0737765930705 " " Order of pole (three term test) = -6890.33574380889 " " Radius of convergence (six term test) for eq 1 = 549.1880015072866 " " Order of pole (six term test) = 35326.714410582725 " " " " "TOP MAIN SOLVE Loop" x[1] = 1.8800000000000008 " " y[1] (analytic) = -0.1336689326430302 " " y[1] (numeric) = -0.1336689326430303 " " absolute error = 1.11022302462515650000000000000000E-16 " " relative error = 8.30576711186932800000000000000E-14 "%" Correct digits = 17 h = 1.00E-2 " " "NO INFO (given) for Equation 1" Radius of convergence (ratio test) for eq 1 = 17.70041040072235 " " "Order of pole (ratio test) Not computed" Radius of convergence (three term test) for eq 1 = 262.1400013468341 " " Order of pole (three term test) = -6892.240513390466 " " Radius of convergence (six term test) for eq 1 = 333.1679216784059 " " Order of pole (six term test) = 13485.569209140489 " " " " "TOP MAIN SOLVE Loop" x[1] = 1.8900000000000008 " " y[1] (analytic) = -0.1326410481583335 " " y[1] (numeric) = -0.13264104815833364 " " absolute error = 1.38777878078144570000000000000000E-16 " " relative error = 1.04626644620966460000000000000E-13 "%" Correct digits = 16 h = 1.00E-2 " " "NO INFO (given) for Equation 1" Radius of convergence (ratio test) for eq 1 = 17.699520861376925 " " "Order of pole (ratio test) Not computed" Radius of convergence (three term test) for eq 1 = 261.3982343186477 " " Order of pole (three term test) = -6872.8734449700405 " " "NO COMPLEX POLE (six term test) for Equation 1" " " "TOP MAIN SOLVE Loop" x[1] = 1.9000000000000008 " " y[1] (analytic) = -0.13162038491591876 " " y[1] (numeric) = -0.13162038491591888 " " absolute error = 1.11022302462515650000000000000000E-16 " " relative error = 8.43503857958161200000000000000E-14 "%" Correct digits = 17 h = 1.00E-2 " " "NO INFO (given) for Equation 1" Radius of convergence (ratio test) for eq 1 = 17.698630132178067 " " "Order of pole (ratio test) Not computed" Radius of convergence (three term test) for eq 1 = 261.4094821523768 " " Order of pole (three term test) = -6873.327640778686 " " "NO COMPLEX POLE (six term test) for Equation 1" " " "TOP MAIN SOLVE Loop" x[1] = 1.9100000000000008 " " y[1] (analytic) = -0.13060690097719782 " " y[1] (numeric) = -0.1306069009771979 " " absolute error = 8.32667268468867400000000000000000E-17 " " relative error = 6.37536961859496000000000000000E-14 "%" Correct digits = 17 h = 1.00E-2 " " "NO INFO (given) for Equation 1" Radius of convergence (ratio test) for eq 1 = 17.69773817502803 " " "Order of pole (ratio test) Not computed" Radius of convergence (three term test) for eq 1 = 261.3602816130942 " " Order of pole (three term test) = -6872.190705361448 " " "NO COMPLEX POLE (six term test) for Equation 1" " " "TOP MAIN SOLVE Loop" x[1] = 1.9200000000000008 " " y[1] (analytic) = -0.12960055452322944 " " y[1] (numeric) = -0.12960055452322955 " " absolute error = 1.11022302462515650000000000000000E-16 " " relative error = 8.56649903011149200000000000000E-14 "%" Correct digits = 17 h = 1.00E-2 " " "NO INFO (given) for Equation 1" Radius of convergence (ratio test) for eq 1 = 17.69684500398385 " " "Order of pole (ratio test) Not computed" Radius of convergence (three term test) for eq 1 = 260.8581725479099 " " Order of pole (three term test) = -6859.130940951236 " " "NO COMPLEX POLE (six term test) for Equation 1" " " "TOP MAIN SOLVE Loop" x[1] = 1.9300000000000008 " " y[1] (analytic) = -0.12860130385649055 " " y[1] (numeric) = -0.12860130385649066 " " absolute error = 1.11022302462515650000000000000000E-16 " " relative error = 8.6330619622961400000000000000E-14 "%" Correct digits = 17 h = 1.00E-2 " " "NO INFO (given) for Equation 1" Radius of convergence (ratio test) for eq 1 = 17.695950588171318 " " "Order of pole (ratio test) Not computed" Radius of convergence (three term test) for eq 1 = 260.8796255906667 " " Order of pole (three term test) = -6859.8585327715255 " " "NO COMPLEX POLE (six term test) for Equation 1" " " "TOP MAIN SOLVE Loop" x[1] = 1.9400000000000008 " " y[1] (analytic) = -0.12760910740260012 " " y[1] (numeric) = -0.12760910740260023 " " absolute error = 1.11022302462515650000000000000000E-16 " " relative error = 8.70018643044387400000000000000E-14 "%" Correct digits = 17 h = 1.00E-2 " " "NO INFO (given) for Equation 1" Radius of convergence (ratio test) for eq 1 = 17.6950549281156 " " "Order of pole (ratio test) Not computed" Radius of convergence (three term test) for eq 1 = 261.4938267322058 " " Order of pole (three term test) = -6876.1926068052335 " " Radius of convergence (six term test) for eq 1 = 251.57461670357546 " " Order of pole (six term test) = 7922.367794080328 " " " " "TOP MAIN SOLVE Loop" x[1] = 1.9500000000000008 " " y[1] (analytic) = -0.12662392371199702 " " y[1] (numeric) = -0.12662392371199713 " " absolute error = 1.11022302462515650000000000000000E-16 " " relative error = 8.76787728636755400000000000000E-14 "%" Correct digits = 17 h = 1.00E-2 " " "NO INFO (given) for Equation 1" Radius of convergence (ratio test) for eq 1 = 17.69415806363883 " " "Order of pole (ratio test) Not computed" Radius of convergence (three term test) for eq 1 = 261.4499990817445 " " Order of pole (three term test) = -6875.201586928798 " " Radius of convergence (six term test) for eq 1 = 222.46146515865672 " " Order of pole (six term test) = 6349.518355487202 " " " " "TOP MAIN SOLVE Loop" x[1] = 1.9600000000000009 " " y[1] (analytic) = -0.12564571146157205 " " y[1] (numeric) = -0.1256457114615722 " " absolute error = 1.38777878078144570000000000000000E-16 " " relative error = 1.10451742812239880000000000000E-13 "%" Correct digits = 16 h = 1.00E-2 " " "NO INFO (given) for Equation 1" Radius of convergence (ratio test) for eq 1 = 17.693259974929894 " " "Order of pole (ratio test) Not computed" Radius of convergence (three term test) for eq 1 = 260.884670871066 " " Order of pole (three term test) = -6860.470350929027 " " Radius of convergence (six term test) for eq 1 = 411.77194742466463 " " Order of pole (six term test) = 19814.451360406667 " " " " "TOP MAIN SOLVE Loop" x[1] = 1.9700000000000009 " " y[1] (analytic) = -0.12467442945625544 " " y[1] (numeric) = -0.12467442945625559 " " absolute error = 1.52655665885959020000000000000000E-16 " " relative error = 1.22443444539300140000000000000E-13 "%" Correct digits = 16 h = 1.00E-2 " " "NO INFO (given) for Equation 1" Radius of convergence (ratio test) for eq 1 = 17.69236063502292 " " "Order of pole (ratio test) Not computed" Radius of convergence (three term test) for eq 1 = 260.5158867779152 " " Order of pole (three term test) = -6850.923319316533 " " Radius of convergence (six term test) for eq 1 = 589.4021658626467 " " Order of pole (six term test) = 39639.993701225896 " " " " "TOP MAIN SOLVE Loop" x[1] = 1.9800000000000009 " " y[1] (analytic) = -0.12371003663055988 " " y[1] (numeric) = -0.12371003663056002 " " absolute error = 1.38777878078144570000000000000000E-16 " " relative error = 1.12179966846653170000000000000E-13 "%" Correct digits = 16 h = 1.00E-2 " " "NO INFO (given) for Equation 1" Radius of convergence (ratio test) for eq 1 = 17.691460069001277 " " "Order of pole (ratio test) Not computed" Radius of convergence (three term test) for eq 1 = 260.1085589242602 " " Order of pole (three term test) = -6840.354398089050 " " "NO COMPLEX POLE (six term test) for Equation 1" " " "TOP MAIN SOLVE Loop" x[1] = 1.9900000000000009 " " y[1] (analytic) = -0.12275249205008035 " " y[1] (numeric) = -0.12275249205008049 " " absolute error = 1.38777878078144570000000000000000E-16 " " relative error = 1.13055039258613350000000000000E-13 "%" Correct digits = 16 h = 1.00E-2 " " "NO INFO (given) for Equation 1" Radius of convergence (ratio test) for eq 1 = 17.690558230717638 " " "Order of pole (ratio test) Not computed" Radius of convergence (three term test) for eq 1 = 260.0320871219457 " " Order of pole (three term test) = -6838.502505339578 " " "NO COMPLEX POLE (six term test) for Equation 1" " " "TOP MAIN SOLVE Loop" x[1] = 2.000000000000001 " " y[1] (analytic) = -0.12180175491295135 " " y[1] (numeric) = -0.12180175491295149 " " absolute error = 1.38777878078144570000000000000000E-16 " " relative error = 1.13937502934440980000000000000E-13 "%" Correct digits = 16 h = 1.00E-2 " " "NO INFO (given) for Equation 1" Radius of convergence (ratio test) for eq 1 = 17.689655180175382 " " "Order of pole (ratio test) Not computed" Radius of convergence (three term test) for eq 1 = 259.40448088406555 " " Order of pole (three term test) = -6822.133770728596 " " "NO COMPLEX POLE (six term test) for Equation 1" " " "TOP MAIN SOLVE Loop" x[1] = 2.0100000000000007 " " y[1] (analytic) = -0.12085778455126202 " " y[1] (numeric) = -0.12085778455126214 " " absolute error = 1.2490009027033011000000000000000E-16 " " relative error = 1.03344679644821340000000000000E-13 "%" Correct digits = 16 h = 1.00E-2 " " "NO INFO (given) for Equation 1" Radius of convergence (ratio test) for eq 1 = 17.688750869398397 " " "Order of pole (ratio test) Not computed" Radius of convergence (three term test) for eq 1 = 259.4017106985328 " " Order of pole (three term test) = -6822.21992064477 " " "NO COMPLEX POLE (six term test) for Equation 1" " " "TOP MAIN SOLVE Loop" x[1] = 2.0200000000000005 " " y[1] (analytic) = -0.11992054043243 " " y[1] (numeric) = -0.1199205404324301 " " absolute error = 9.7144514654701200000000000000000E-17 " " relative error = 8.10074023219048900000000000000E-14 "%" Correct digits = 17 h = 1.00E-2 " " "NO INFO (given) for Equation 1" Radius of convergence (ratio test) for eq 1 = 17.68784530125222 " " "Order of pole (ratio test) Not computed" Radius of convergence (three term test) for eq 1 = 259.90870883562576 " " Order of pole (three term test) = -6835.741321806340 " " Radius of convergence (six term test) for eq 1 = 385.7514888031478 " " Order of pole (six term test) = 17223.52458851442 " " " " "TOP MAIN SOLVE Loop" x[1] = 2.0300000000000002 " " y[1] (analytic) = -0.11898998216053472 " " y[1] (numeric) = -0.11898998216053479 " " absolute error = 6.93889390390722800000000000000000E-17 " " relative error = 5.83149419633129700000000000000E-14 "%" Correct digits = 17 h = 1.00E-2 " " "NO INFO (given) for Equation 1" Radius of convergence (ratio test) for eq 1 = 17.686938474694685 " " "Order of pole (ratio test) Not computed" Radius of convergence (three term test) for eq 1 = 259.4067688561306 " " Order of pole (three term test) = -6822.683638924525 " " "NO COMPLEX POLE (six term test) for Equation 1" " " "TOP MAIN SOLVE Loop" x[1] = 2.04 " " y[1] (analytic) = -0.11806606947761074 " " y[1] (numeric) = -0.1180660694776108 " " absolute error = 5.55111512312578300000000000000000E-17 " " relative error = 4.70170231607350900000000000000E-14 "%" Correct digits = 17 h = 1.00E-2 " " "NO INFO (given) for Equation 1" Radius of convergence (ratio test) for eq 1 = 17.686030435380093 " " "Order of pole (ratio test) Not computed" Radius of convergence (three term test) for eq 1 = 259.44041660641767 " " Order of pole (three term test) = -6823.72585545901 " " Radius of convergence (six term test) for eq 1 = 1230.3718807764178 " " Order of pole (six term test) = 167546.2238145135 " " " " "TOP MAIN SOLVE Loop" x[1] = 2.05 " " y[1] (analytic) = -0.11714876226490185 " " y[1] (numeric) = -0.1171487622649019 " " absolute error = 4.16333634234433700000000000000000E-17 " " relative error = 3.553888459299315000000000000000E-14 "%" Correct digits = 17 h = 1.00E-2 " " "NO INFO (given) for Equation 1" Radius of convergence (ratio test) for eq 1 = 17.68512110127151 " " "Order of pole (ratio test) Not computed" Radius of convergence (three term test) for eq 1 = 259.1183050811596 " " Order of pole (three term test) = -6815.40660221899 " " "NO COMPLEX POLE (six term test) for Equation 1" " " "TOP MAIN SOLVE Loop" x[1] = 2.0599999999999996 " " y[1] (analytic) = -0.11623802054407656 " " y[1] (numeric) = -0.11623802054407657 " " absolute error = 1.387778780781445700000000000000000E-17 " " relative error = 1.1939112299793600000000000000E-14 "%" Correct digits = 17 h = 1.00E-2 " " "NO INFO (given) for Equation 1" Radius of convergence (ratio test) for eq 1 = 17.68421052405215 " " "Order of pole (ratio test) Not computed" Radius of convergence (three term test) for eq 1 = 259.10034300921836 " " Order of pole (three term test) = -6815.093963426233 " " Radius of convergence (six term test) for eq 1 = 852.156730843285 " " Order of pole (six term test) = 80386.64201117816 " " " " "TOP MAIN SOLVE Loop" x[1] = 2.0699999999999994 " " y[1] (analytic) = -0.11533380447840547 " " y[1] (numeric) = -0.11533380447840547 " " absolute error = 0.0 " " relative error = 0.0 "%" Correct digits = 16 h = 1.00E-2 " " "NO INFO (given) for Equation 1" Radius of convergence (ratio test) for eq 1 = 17.683298689489234 " " "Order of pole (ratio test) Not computed" Radius of convergence (three term test) for eq 1 = 258.5367107248897 " " Order of pole (three term test) = -6800.40816010733 " " "NO COMPLEX POLE (six term test) for Equation 1" " " "TOP MAIN SOLVE Loop" x[1] = 2.079999999999999 " " y[1] (analytic) = -0.11443607437390158 " " y[1] (numeric) = -0.11443607437390155 " " absolute error = 2.775557561562891400000000000000000E-17 " " relative error = 2.425421858228202500000000000000E-14 "%" Correct digits = 17 h = 1.00E-2 " " "NO INFO (given) for Equation 1" Radius of convergence (ratio test) for eq 1 = 17.682385589797924 " " "Order of pole (ratio test) Not computed" Radius of convergence (three term test) for eq 1 = 258.53165597052777 " " Order of pole (three term test) = -6800.43235198706 " " "NO COMPLEX POLE (six term test) for Equation 1" " " "TOP MAIN SOLVE Loop" x[1] = 2.089999999999999 " " y[1] (analytic) = -0.11354479068042361 " " y[1] (numeric) = -0.11354479068042357 " " absolute error = 4.16333634234433700000000000000000E-17 " " relative error = 3.666690754719179600000000000000E-14 "%" Correct digits = 17 h = 1.00E-2 " " "NO INFO (given) for Equation 1" Radius of convergence (ratio test) for eq 1 = 17.681471207442875 " " "Order of pole (ratio test) Not computed" Radius of convergence (three term test) for eq 1 = 258.3736552474775 " " Order of pole (three term test) = -6796.436642406546 " " "NO COMPLEX POLE (six term test) for Equation 1" " " "TOP MAIN SOLVE Loop" x[1] = 2.0999999999999988 " " y[1] (analytic) = -0.11265991399274349 " " y[1] (numeric) = -0.1126599139927434 " " absolute error = 8.32667268468867400000000000000000E-17 " " relative error = 7.39098086407646500000000000000E-14 "%" Correct digits = 17 h = 1.00E-2 " " "NO INFO (given) for Equation 1" Radius of convergence (ratio test) for eq 1 = 17.680555537421604 " " "Order of pole (ratio test) Not computed" Radius of convergence (three term test) for eq 1 = 258.6784403574296 " " Order of pole (three term test) = -6804.633181524833 " " Radius of convergence (six term test) for eq 1 = 345.6234958989235 " " Order of pole (six term test) = 13722.955058682295 " " " " "TOP MAIN SOLVE Loop" x[1] = 2.1099999999999985 " " y[1] (analytic) = -0.11178140505157802 " " y[1] (numeric) = -0.11178140505157794 " " absolute error = 8.32667268468867400000000000000000E-17 " " relative error = 7.4490678309568500000000000000E-14 "%" Correct digits = 17 h = 1.00E-2 " " "NO INFO (given) for Equation 1" Radius of convergence (ratio test) for eq 1 = 17.679638637976957 " " "Order of pole (ratio test) Not computed" Radius of convergence (three term test) for eq 1 = 258.2809863993585 " " Order of pole (three term test) = -6794.319731520909 " " Radius of convergence (six term test) for eq 1 = 1717.415753478626 " " Order of pole (six term test) = 320705.41587521613 " " " " "TOP MAIN SOLVE Loop" x[1] = 2.1199999999999983 " " y[1] (analytic) = -0.11090922474458617 " " y[1] (numeric) = -0.11090922474458606 " " absolute error = 1.11022302462515650000000000000000E-16 " " relative error = 1.0010195519641390000000000000E-13 "%" Correct digits = 16 h = 1.00E-2 " " "NO INFO (given) for Equation 1" Radius of convergence (ratio test) for eq 1 = 17.67872044695625 " " "Order of pole (ratio test) Not computed" Radius of convergence (three term test) for eq 1 = 257.9201243009088 " " Order of pole (three term test) = -6784.973225051587 " " "NO COMPLEX POLE (six term test) for Equation 1" " " "TOP MAIN SOLVE Loop" x[1] = 2.129999999999998 " " y[1] (analytic) = -0.1100433341073315 " " y[1] (numeric) = -0.11004333410733136 " " absolute error = 1.38777878078144570000000000000000E-16 " " relative error = 1.26112025961324150000000000000E-13 "%" Correct digits = 16 h = 1.00E-2 " " "NO INFO (given) for Equation 1" Radius of convergence (ratio test) for eq 1 = 17.677800995085118 " " "Order of pole (ratio test) Not computed" Radius of convergence (three term test) for eq 1 = 257.8451858316409 " " Order of pole (three term test) = -6783.161072605806 " " "NO COMPLEX POLE (six term test) for Equation 1" " " "TOP MAIN SOLVE Loop" x[1] = 2.139999999999998 " " y[1] (analytic) = -0.10918369432421127 " " y[1] (numeric) = -0.10918369432421113 " " absolute error = 1.38777878078144570000000000000000E-16 " " relative error = 1.27104948167494680000000000000E-13 "%" Correct digits = 16 h = 1.00E-2 " " "NO INFO (given) for Equation 1" Radius of convergence (ratio test) for eq 1 = 17.676880229750623 " " "Order of pole (ratio test) Not computed" Radius of convergence (three term test) for eq 1 = 257.74630100792103 " " Order of pole (three term test) = -6780.720476232205 " " "NO COMPLEX POLE (six term test) for Equation 1" " " "TOP MAIN SOLVE Loop" x[1] = 2.1499999999999977 " " y[1] (analytic) = -0.10833026672935238 " " y[1] (numeric) = -0.1083302667293522 " " absolute error = 1.80411241501587940000000000000000E-16 " " relative error = 1.66538167908622900000000000000E-13 "%" Correct digits = 16 h = 1.00E-2 " " "NO INFO (given) for Equation 1" Radius of convergence (ratio test) for eq 1 = 17.675958181650326 " " "Order of pole (ratio test) Not computed" Radius of convergence (three term test) for eq 1 = 257.8028046990462 " " Order of pole (three term test) = -6782.371107562426 " " Radius of convergence (six term test) for eq 1 = 688.4503053756406 " " Order of pole (six term test) = 51699.99936576004 " " " " "TOP MAIN SOLVE Loop" x[1] = 2.1599999999999975 " " y[1] (analytic) = -0.10748301280747449 " " y[1] (numeric) = -0.1074830128074743 " " absolute error = 1.9428902930940240000000000000000E-16 " " relative error = 1.80762544921788170000000000000E-13 "%" Correct digits = 16 h = 1.00E-2 " " "NO INFO (given) for Equation 1" Radius of convergence (ratio test) for eq 1 = 17.675034846900015 " " "Order of pole (ratio test) Not computed" Radius of convergence (three term test) for eq 1 = 257.6322096064438 " " Order of pole (three term test) = -6778.038187584472 " " Radius of convergence (six term test) for eq 1 = 999.7221231879431 " " Order of pole (six term test) = 107980.97667861186 " " " " "TOP MAIN SOLVE Loop" x[1] = 2.1699999999999973 " " y[1] (analytic) = -0.10664189419472152 " " y[1] (numeric) = -0.1066418941947213 " " absolute error = 2.2204460492503130000000000000000E-16 " " relative error = 2.08215173409796670000000000000E-13 "%" Correct digits = 16 h = 1.00E-2 " " "NO INFO (given) for Equation 1" Radius of convergence (ratio test) for eq 1 = 17.674110258967232 " " "Order of pole (ratio test) Not computed" Radius of convergence (three term test) for eq 1 = 257.36463031076335 " " Order of pole (three term test) = -6771.154441477845 " " Radius of convergence (six term test) for eq 1 = 685.1970790460426 " " Order of pole (six term test) = 50982.70355736371 " " " " "TOP MAIN SOLVE Loop" x[1] = 2.179999999999997 " " y[1] (analytic) = -0.10580687267946132 " " y[1] (numeric) = -0.10580687267946108 " " absolute error = 2.35922392732845760000000000000000E-16 " " relative error = 2.2297454480822380000000000000E-13 "%" Correct digits = 16 h = 1.00E-2 " " "NO INFO (given) for Equation 1" Radius of convergence (ratio test) for eq 1 = 17.673184349074486 " " "Order of pole (ratio test) Not computed" Radius of convergence (three term test) for eq 1 = 257.0078176489207 " " Order of pole (three term test) = -6761.912654360363 " " "NO COMPLEX POLE (six term test) for Equation 1" " " "TOP MAIN SOLVE Loop" x[1] = 2.189999999999997 " " y[1] (analytic) = -0.10497791020305475 " " y[1] (numeric) = -0.10497791020305448 " " absolute error = 2.6367796834847470000000000000000E-16 " " relative error = 2.5117471650793250000000000000E-13 "%" Correct digits = 16 h = 1.00E-2 " " "NO INFO (given) for Equation 1" Radius of convergence (ratio test) for eq 1 = 17.67225715634341 " " "Order of pole (ratio test) Not computed" Radius of convergence (three term test) for eq 1 = 257.25315124903926 " " Order of pole (three term test) = -6768.542641603708 " " Radius of convergence (six term test) for eq 1 = 419.86488752978266 " " Order of pole (six term test) = 19510.769877384082 " " " " "TOP MAIN SOLVE Loop" x[1] = 2.1999999999999966 " " y[1] (analytic) = -0.10415496886059414 " " y[1] (numeric) = -0.10415496886059385 " " absolute error = 2.9143354396410360000000000000000E-16 " " relative error = 2.7980762430467610000000000000E-13 "%" Correct digits = 16 h = 1.00E-2 " " "NO INFO (given) for Equation 1" Radius of convergence (ratio test) for eq 1 = 17.671328670561955 " " "Order of pole (ratio test) Not computed" Radius of convergence (three term test) for eq 1 = 256.67242242275546 " " Order of pole (three term test) = -6753.403051366676 " " "NO COMPLEX POLE (six term test) for Equation 1" " " "TOP MAIN SOLVE Loop" x[1] = 2.2099999999999964 " " y[1] (analytic) = -0.10333801090161203 " " y[1] (numeric) = -0.10333801090161174 " " absolute error = 2.9143354396410360000000000000000E-16 " " relative error = 2.8201969577445907000000000000E-13 "%" Correct digits = 16 h = 1.00E-2 " " "NO INFO (given) for Equation 1" Radius of convergence (ratio test) for eq 1 = 17.670398910605705 " " "Order of pole (ratio test) Not computed" Radius of convergence (three term test) for eq 1 = 256.49135847144174 " " Order of pole (three term test) = -6748.788810579657 " " "NO COMPLEX POLE (six term test) for Equation 1" " " "TOP MAIN SOLVE Loop" x[1] = 2.219999999999996 " " y[1] (analytic) = -0.10252699873076064 " " y[1] (numeric) = -0.10252699873076034 " " absolute error = 3.05311331771918050000000000000000E-16 " " relative error = 2.9778627634821920000000000000E-13 "%" Correct digits = 16 h = 1.00E-2 " " "NO INFO (given) for Equation 1" Radius of convergence (ratio test) for eq 1 = 17.669467782519167 " " "Order of pole (ratio test) Not computed" Radius of convergence (three term test) for eq 1 = 256.6690638301248 " " Order of pole (three term test) = -6753.641154304279 " " Radius of convergence (six term test) for eq 1 = 561.9476865897943 " " Order of pole (six term test) = 34146.494300758975 " " " " "TOP MAIN SOLVE Loop" x[1] = 2.229999999999996 " " y[1] (analytic) = -0.10172189490846235 " " y[1] (numeric) = -0.10172189490846202 " " absolute error = 3.33066907387546960000000000000000E-16 " " relative error = 3.27428925392382550000000000000E-13 "%" Correct digits = 16 h = 1.00E-2 " " "NO INFO (given) for Equation 1" Radius of convergence (ratio test) for eq 1 = 17.668535393759285 " " "Order of pole (ratio test) Not computed" Radius of convergence (three term test) for eq 1 = 256.3827320966728 " " Order of pole (three term test) = -6746.251997636464 " " "NO COMPLEX POLE (six term test) for Equation 1" " " "TOP MAIN SOLVE Loop" x[1] = 2.2399999999999958 " " y[1] (analytic) = -0.100922662151532 " " y[1] (numeric) = -0.10092266215153167 " " absolute error = 3.33066907387546960000000000000000E-16 " " relative error = 3.30021920039582530000000000000E-13 "%" Correct digits = 16 h = 1.00E-2 " " "NO INFO (given) for Equation 1" Radius of convergence (ratio test) for eq 1 = 17.667601683977903 " " "Order of pole (ratio test) Not computed" Radius of convergence (three term test) for eq 1 = 256.3513377268522 " " Order of pole (three term test) = -6745.591501961330 " " Radius of convergence (six term test) for eq 1 = 651.8773650679601 " " Order of pole (six term test) = 45549.57218485061 " " " " "TOP MAIN SOLVE Loop" x[1] = 2.2499999999999956 " " y[1] (analytic) = -0.10012926333377148 " " y[1] (numeric) = -0.10012926333377112 " " absolute error = 3.6082248300317590000000000000000E-16 " " relative error = 3.60356673952956230000000000000E-13 "%" Correct digits = 16 h = 1.00E-2 " " "NO INFO (given) for Equation 1" Radius of convergence (ratio test) for eq 1 = 17.666666660383942 " " "Order of pole (ratio test) Not computed" Radius of convergence (three term test) for eq 1 = 255.91899351680885 " " Order of pole (three term test) = -6734.362137834203 " " "NO COMPLEX POLE (six term test) for Equation 1" " " "TOP MAIN SOLVE Loop" x[1] = 2.2599999999999953 " " y[1] (analytic) = -9.93416614865366600E-2 " " y[1] (numeric) = -9.9341661486536290E-2 " " absolute error = 3.6082248300317590000000000000000E-16 " " relative error = 3.6321365840259940000000000000E-13 "%" Correct digits = 16 h = 1.00E-2 " " "NO INFO (given) for Equation 1" Radius of convergence (ratio test) for eq 1 = 17.665730332959942 " " "Order of pole (ratio test) Not computed" Radius of convergence (three term test) for eq 1 = 256.1416871232567 " " Order of pole (three term test) = -6740.393697829739 " " Radius of convergence (six term test) for eq 1 = 466.9378592247013 " " Order of pole (six term test) = 23613.427022368924 " " " " "TOP MAIN SOLVE Loop" x[1] = 2.269999999999995 " " y[1] (analytic) = -9.85598197992779700E-2 " " y[1] (numeric) = -9.85598197992775800E-2 " " absolute error = 3.8857805861880480000000000000000E-16 " " relative error = 3.9425605628151870000000000000E-13 "%" Correct digits = 16 h = 1.00E-2 " " "NO INFO (given) for Equation 1" Radius of convergence (ratio test) for eq 1 = 17.664792681048137 " " "Order of pole (ratio test) Not computed" Radius of convergence (three term test) for eq 1 = 256.41352624682696 " " Order of pole (three term test) = -6747.723719076956 " " Radius of convergence (six term test) for eq 1 = 252.38579002809723 " " Order of pole (six term test) = 7378.0094648983 " " " " "TOP MAIN SOLVE Loop" x[1] = 2.279999999999995 " " y[1] (analytic) = -9.77837016200542200E-2 " " y[1] (numeric) = -9.7783701620053800E-2 " " absolute error = 4.1633363423443370000000000000000E-16 " " relative error = 4.25769967117964900000000000000E-13 "%" Correct digits = 16 h = 1.00E-2 " " "NO INFO (given) for Equation 1" Radius of convergence (ratio test) for eq 1 = 17.66385371436007 " " "Order of pole (ratio test) Not computed" Radius of convergence (three term test) for eq 1 = 255.77500661930108 " " Order of pole (three term test) = -6731.057911683514 " " Radius of convergence (six term test) for eq 1 = 572.0036973501396 " " Order of pole (six term test) = 34913.3537107181 " " " " "TOP MAIN SOLVE Loop" x[1] = 2.2899999999999947 " " y[1] (analytic) = -9.7013270456020710E-2 " " y[1] (numeric) = -9.70132704560202800E-2 " " absolute error = 4.1633363423443370000000000000000E-16 " " relative error = 4.2915122052623860000000000000E-13 "%" Correct digits = 16 h = 1.00E-2 " " "NO INFO (given) for Equation 1" Radius of convergence (ratio test) for eq 1 = 17.662913453180582 " " "Order of pole (ratio test) Not computed" Radius of convergence (three term test) for eq 1 = 255.33006781830267 " " Order of pole (three term test) = -6719.4942120561445 " " "NO COMPLEX POLE (six term test) for Equation 1" " " "TOP MAIN SOLVE Loop" x[1] = 2.2999999999999945 " " y[1] (analytic) = -9.624848997389200E-2 " " y[1] (numeric) = -9.62484899738915700E-2 " " absolute error = 4.30211422042248160000000000000000E-16 " " relative error = 4.4697991849944420000000000000E-13 "%" Correct digits = 16 h = 1.00E-2 " " "NO INFO (given) for Equation 1" Radius of convergence (ratio test) for eq 1 = 17.661971830013393 " " "Order of pole (ratio test) Not computed" Radius of convergence (three term test) for eq 1 = 255.43007316105133 " " Order of pole (three term test) = -6722.29080209067 " " Radius of convergence (six term test) for eq 1 = 1081.180084593937 " " Order of pole (six term test) = 122476.69457136035 " " " " "TOP MAIN SOLVE Loop" x[1] = 2.3099999999999943 " " y[1] (analytic) = -9.54893240003795600E-2 " " y[1] (numeric) = -9.5489324000379100E-2 " " absolute error = 4.5796699765787710000000000000000E-16 " " relative error = 4.7960020918784250000000000000E-13 "%" Correct digits = 16 h = 1.00E-2 " " "NO INFO (given) for Equation 1" Radius of convergence (ratio test) for eq 1 = 17.66102887601629 " " "Order of pole (ratio test) Not computed" Radius of convergence (three term test) for eq 1 = 255.37602978446228 " " Order of pole (three term test) = -6721.035276505441 " " Radius of convergence (six term test) for eq 1 = 405.9631606875206 " " Order of pole (six term test) = 17814.05660156068 " " " " "TOP MAIN SOLVE Loop" x[1] = 2.319999999999994 " " y[1] (analytic) = -9.47357365226049700E-2 " " y[1] (numeric) = -9.47357365226044900E-2 " " absolute error = 4.857225732735060000000000000000E-16 " " relative error = 5.1271314406006360000000000000E-13 "%" Correct digits = 16 h = 1.00E-2 " " "NO INFO (given) for Equation 1" Radius of convergence (ratio test) for eq 1 = 17.660084638078477 " " "Order of pole (ratio test) Not computed" Radius of convergence (three term test) for eq 1 = 254.54866974289033 " " Order of pole (three term test) = -6699.385483575618 " " "NO COMPLEX POLE (six term test) for Equation 1" " " "TOP MAIN SOLVE Loop" x[1] = 2.329999999999994 " " y[1] (analytic) = -9.39876916884891300E-2 " " y[1] (numeric) = -9.39876916884886300E-2 " " absolute error = 4.9960036108132044000000000000000E-16 " " relative error = 5.3155934793801040000000000000E-13 "%" Correct digits = 16 h = 1.00E-2 " " "NO INFO (given) for Equation 1" Radius of convergence (ratio test) for eq 1 = 17.659139036861504 " " "Order of pole (ratio test) Not computed" Radius of convergence (three term test) for eq 1 = 254.70676816991585 " " Order of pole (three term test) = -6703.715568459847 " " "NO COMPLEX POLE (six term test) for Equation 1" " " "TOP MAIN SOLVE Loop" x[1] = 2.3399999999999936 " " y[1] (analytic) = -9.32451538071177200E-2 " " y[1] (numeric) = -9.3245153807117200E-2 " " absolute error = 5.1347814888913490000000000000000E-16 " " relative error = 5.5067542700534360000000000000E-13 "%" Correct digits = 16 h = 1.00E-2 " " "NO INFO (given) for Equation 1" Radius of convergence (ratio test) for eq 1 = 17.658192107515806 " " "Order of pole (ratio test) Not computed" Radius of convergence (three term test) for eq 1 = 254.54096676937226 " " Order of pole (three term test) = -6699.512758837911 " " "NO COMPLEX POLE (six term test) for Equation 1" " " "TOP MAIN SOLVE Loop" x[1] = 2.3499999999999934 " " y[1] (analytic) = -9.25080873490836200E-2 " " y[1] (numeric) = -9.25080873490830900E-2 " " absolute error = 5.4123372450476380000000000000000E-16 " " relative error = 5.8506638718233670000000000000E-13 "%" Correct digits = 16 h = 1.00E-2 " " "NO INFO (given) for Equation 1" Radius of convergence (ratio test) for eq 1 = 17.657243799414328 " " "Order of pole (ratio test) Not computed" Radius of convergence (three term test) for eq 1 = 254.97597811316103 " " Order of pole (three term test) = -6711.144848226373 " " Radius of convergence (six term test) for eq 1 = 321.83917443902686 " " Order of pole (six term test) = 11356.5613021947 " " " " "TOP MAIN SOLVE Loop" x[1] = 2.359999999999993 " " y[1] (analytic) = -9.17764569468063600E-2 " " y[1] (numeric) = -9.17764569468058200E-2 " " absolute error = 5.4123372450476380000000000000000E-16 " " relative error = 5.8973046302981920000000000000E-13 "%" Correct digits = 16 h = 1.00E-2 " " "NO INFO (given) for Equation 1" Radius of convergence (ratio test) for eq 1 = 17.656294210689428 " " "Order of pole (ratio test) Not computed" Radius of convergence (three term test) for eq 1 = 254.06625038991805 " " Order of pole (three term test) = -6687.325651888628 " " "NO COMPLEX POLE (six term test) for Equation 1" " " "TOP MAIN SOLVE Loop" x[1] = 2.369999999999993 " " y[1] (analytic) = -9.10502273948294700E-2 " " y[1] (numeric) = -9.10502273948288900E-2 " " absolute error = 5.8286708792820720000000000000000E-16 " " relative error = 6.4015994754265360000000000000E-13 "%" Correct digits = 16 h = 1.00E-2 " " "NO INFO (given) for Equation 1" Radius of convergence (ratio test) for eq 1 = 17.65534324264909 " " "Order of pole (ratio test) Not computed" Radius of convergence (three term test) for eq 1 = 254.14302677308422 " " Order of pole (three term test) = -6689.514238174931 " " "NO COMPLEX POLE (six term test) for Equation 1" " " "TOP MAIN SOLVE Loop" x[1] = 2.379999999999993 " " y[1] (analytic) = -9.03293636500955600E-2 " " y[1] (numeric) = -9.03293636500949700E-2 " " absolute error = 5.8286708792820720000000000000000E-16 " " relative error = 6.4526867496380360000000000000E-13 "%" Correct digits = 16 h = 1.00E-2 " " "NO INFO (given) for Equation 1" Radius of convergence (ratio test) for eq 1 = 17.654390912544134 " " "Order of pole (ratio test) Not computed" Radius of convergence (three term test) for eq 1 = 254.16740168855432 " " Order of pole (three term test) = -6690.325037221263 " " Radius of convergence (six term test) for eq 1 = 514.6081329156377 " " Order of pole (six term test) = 27779.623153076584 " " " " "TOP MAIN SOLVE Loop" x[1] = 2.3899999999999926 " " y[1] (analytic) = -8.96138308322002700E-2 " " y[1] (numeric) = -8.96138308321996700E-2 " " absolute error = 5.9674487573602160000000000000000E-16 " " relative error = 6.6590711522355520000000000000E-13 "%" Correct digits = 16 h = 1.00E-2 " " "NO INFO (given) for Equation 1" Radius of convergence (ratio test) for eq 1 = 17.653437273988178 " " "Order of pole (ratio test) Not computed" Radius of convergence (three term test) for eq 1 = 254.1860952975569 " " Order of pole (three term test) = -6690.975265873136 " " Radius of convergence (six term test) for eq 1 = 466.1547259508757 " " Order of pole (six term test) = 22904.67926736946 " " " " "TOP MAIN SOLVE Loop" x[1] = 2.3999999999999924 " " y[1] (analytic) = -8.8903594223624800E-2 " " y[1] (numeric) = -8.89035942236241700E-2 " " absolute error = 6.2450045135165060000000000000000E-16 " " relative error = 7.0244679847341750000000000000E-13 "%" Correct digits = 16 h = 1.00E-2 " " "NO INFO (given) for Equation 1" Radius of convergence (ratio test) for eq 1 = 17.6524822890831 " " "Order of pole (ratio test) Not computed" Radius of convergence (three term test) for eq 1 = 253.4673527279501 " " Order of pole (three term test) = -6672.18706376197 " " "NO COMPLEX POLE (six term test) for Equation 1" " " "TOP MAIN SOLVE Loop" x[1] = 2.409999999999992 " " y[1] (analytic) = -8.81986192699477400E-2 " " y[1] (numeric) = -8.8198619269947100E-2 " " absolute error = 6.383782391594650000000000000000E-16 " " relative error = 7.2379618234792720000000000000E-13 "%" Correct digits = 16 h = 1.00E-2 " " "NO INFO (given) for Equation 1" Radius of convergence (ratio test) for eq 1 = 17.651525903742474 " " "Order of pole (ratio test) Not computed" Radius of convergence (three term test) for eq 1 = 253.7564322456178 " " Order of pole (three term test) = -6679.975300202182 " " Radius of convergence (six term test) for eq 1 = 954.8622970046943 " " Order of pole (six term test) = 93562.64203078087 " " " " "TOP MAIN SOLVE Loop" x[1] = 2.419999999999992 " " y[1] (analytic) = -8.74988715800367200E-2 " " y[1] (numeric) = -8.74988715800360600E-2 " " absolute error = 6.5225602696727950000000000000000E-16 " " relative error = 7.4544507282091020000000000000E-13 "%" Correct digits = 16 h = 1.00E-2 " " "NO INFO (given) for Equation 1" Radius of convergence (ratio test) for eq 1 = 17.65056817874725 " " "Order of pole (ratio test) Not computed" Radius of convergence (three term test) for eq 1 = 253.64728865392823 " " Order of pole (three term test) = -6677.266256786961 " " Radius of convergence (six term test) for eq 1 = 514.1477615079762 " " Order of pole (six term test) = 27523.31468582281 " " " " "TOP MAIN SOLVE Loop" x[1] = 2.4299999999999917 " " y[1] (analytic) = -8.68043169262199300E-2 " " y[1] (numeric) = -8.68043169262192500E-2 " " absolute error = 6.8001160258290840000000000000000E-16 " " relative error = 7.8338454429736490000000000000E-13 "%" Correct digits = 16 h = 1.00E-2 " " "NO INFO (given) for Equation 1" Radius of convergence (ratio test) for eq 1 = 17.649609104066034 " " "Order of pole (ratio test) Not computed" Radius of convergence (three term test) for eq 1 = 253.39434106915053 " " Order of pole (three term test) = -6670.75804564367 " " Radius of convergence (six term test) for eq 1 = 1449.6244800130378 " " Order of pole (six term test) = 213890.57654372777 " " " " "TOP MAIN SOLVE Loop" x[1] = 2.4399999999999915 " " y[1] (analytic) = -8.6114921244438100E-2 " " y[1] (numeric) = -8.61149212444374100E-2 " " absolute error = 6.9388939039072280000000000000000E-16 " " relative error = 8.0577138126981570000000000000E-13 "%" Correct digits = 16 h = 1.00E-2 " " "NO INFO (given) for Equation 1" Radius of convergence (ratio test) for eq 1 = 17.648648676483514 " " "Order of pole (ratio test) Not computed" Radius of convergence (three term test) for eq 1 = 253.0996638289592 " " Order of pole (three term test) = -6663.151993464715 " " "NO COMPLEX POLE (six term test) for Equation 1" " " "TOP MAIN SOLVE Loop" x[1] = 2.4499999999999913 " " y[1] (analytic) = -8.54306506343774000E-2 " " y[1] (numeric) = -8.5430650634376700E-2 " " absolute error = 7.0776717819853730000000000000000E-16 " " relative error = 8.2846984418696550000000000000E-13 "%" Correct digits = 16 h = 1.00E-2 " " "NO INFO (given) for Equation 1" Radius of convergence (ratio test) for eq 1 = 17.64768682960725 " " "Order of pole (ratio test) Not computed" Radius of convergence (three term test) for eq 1 = 252.78077764627426 " " Order of pole (three term test) = -6654.913416838914 " " "NO COMPLEX POLE (six term test) for Equation 1" " " "TOP MAIN SOLVE Loop" x[1] = 2.459999999999991 " " y[1] (analytic) = -8.47514713595832600E-2 " " y[1] (numeric) = -8.47514713595825500E-2 " " absolute error = 7.0776717819853730000000000000000E-16 " " relative error = 8.3510901562478490000000000000E-13 "%" Correct digits = 16 h = 1.00E-2 " " "NO INFO (given) for Equation 1" Radius of convergence (ratio test) for eq 1 = 17.6467236570389 " " "Order of pole (ratio test) Not computed" Radius of convergence (three term test) for eq 1 = 252.54281165749296 " " Order of pole (three term test) = -6648.802270726292 " " "NO COMPLEX POLE (six term test) for Equation 1" " " "TOP MAIN SOLVE Loop" x[1] = 2.469999999999991 " " y[1] (analytic) = -8.40773498475559400E-2 " " y[1] (numeric) = -8.4077349847555200E-2 " " absolute error = 7.3552275381416620000000000000000E-16 " " relative error = 8.7481676711715160000000000000E-13 "%" Correct digits = 16 h = 1.00E-2 " " "NO INFO (given) for Equation 1" Radius of convergence (ratio test) for eq 1 = 17.645759089523654 " " "Order of pole (ratio test) Not computed" Radius of convergence (three term test) for eq 1 = 252.69649466992232 " " Order of pole (three term test) = -6653.020606691028 " " Radius of convergence (six term test) for eq 1 = 1260.8810898401282 " " Order of pole (six term test) = 160505.03726453707 " " " " "TOP MAIN SOLVE Loop" x[1] = 2.4799999999999907 " " y[1] (analytic) = -8.34082526898278100E-2 " " y[1] (numeric) = -8.34082526898270600E-2 " " absolute error = 7.4940054162198070000000000000000E-16 " " relative error = 8.9847289381398950000000000000E-13 "%" Correct digits = 16 h = 1.00E-2 " " "NO INFO (given) for Equation 1" Radius of convergence (ratio test) for eq 1 = 17.644793156469095 " " "Order of pole (ratio test) Not computed" Radius of convergence (three term test) for eq 1 = 252.5727575220315 " " Order of pole (three term test) = -6649.921896125215 " " Radius of convergence (six term test) for eq 1 = 793.3137454704996 " " Order of pole (six term test) = 63830.13922142254 " " " " "TOP MAIN SOLVE Loop" x[1] = 2.4899999999999904 " " y[1] (analytic) = -8.27441466420229600E-2 " " y[1] (numeric) = -8.27441466420222200E-2 " " absolute error = 7.4940054162198070000000000000000E-16 " " relative error = 9.0568405383902450000000000000E-13 "%" Correct digits = 16 h = 1.00E-2 " " "NO INFO (given) for Equation 1" Radius of convergence (ratio test) for eq 1 = 17.64382586138462 " " "Order of pole (ratio test) Not computed" Radius of convergence (three term test) for eq 1 = 252.1016689676278 " " Order of pole (three term test) = -6637.660202245554 " " "NO COMPLEX POLE (six term test) for Equation 1" " " "TOP MAIN SOLVE Loop" x[1] = 2.4999999999999902 " " y[1] (analytic) = -8.20849986238994400E-2 " " y[1] (numeric) = -8.20849986238986800E-2 " " absolute error = 7.6327832942979510000000000000000E-16 " " relative error = 9.2986336386142430000000000000E-13 "%" Correct digits = 16 h = 1.00E-2 " " "NO INFO (given) for Equation 1" Radius of convergence (ratio test) for eq 1 = 17.642857128818736 " " "Order of pole (ratio test) Not computed" Radius of convergence (three term test) for eq 1 = 252.44476566977582 " " Order of pole (three term test) = -6646.87593016656 " " Radius of convergence (six term test) for eq 1 = 557.3352162256127 " " Order of pole (six term test) = 31701.084498111763 " " " " "TOP MAIN SOLVE Loop" x[1] = 2.50999999999999 " " y[1] (analytic) = -8.14307757193741300E-2 " " y[1] (numeric) = -8.14307757193733500E-2 " " absolute error = 7.7715611723760960000000000000000E-16 " " relative error = 9.5437641404256880000000000000E-13 "%" Correct digits = 16 h = 1.00E-2 " " "NO INFO (given) for Equation 1" Radius of convergence (ratio test) for eq 1 = 17.64188706011212 " " "Order of pole (ratio test) Not computed" Radius of convergence (three term test) for eq 1 = 252.07276755441754 " " Order of pole (three term test) = -6637.230162574478 " " Radius of convergence (six term test) for eq 1 = 3240.5202008416113 " " Order of pole (six term test) = 1048821.5775710272 " " " " "TOP MAIN SOLVE Loop" x[1] = 2.51999999999999 " " y[1] (analytic) = -8.07814451765312300E-2 " " y[1] (numeric) = -8.07814451765304300E-2 " " absolute error = 7.910339050454240000000000000000E-16 " " relative error = 9.7922722639683190000000000000E-13 "%" Correct digits = 16 h = 1.00E-2 " " "NO INFO (given) for Equation 1" Radius of convergence (ratio test) for eq 1 = 17.6409155895237 " " "Order of pole (ratio test) Not computed" Radius of convergence (three term test) for eq 1 = 251.7061037107092 " " Order of pole (three term test) = -6627.726672614397 " " "NO COMPLEX POLE (six term test) for Equation 1" " " "TOP MAIN SOLVE Loop" x[1] = 2.5299999999999896 " " y[1] (analytic) = -8.01369744076140800E-2 " " y[1] (numeric) = -8.01369744076132700E-2 " " absolute error = 8.0491169285323850000000000000000E-16 " " relative error = 1.0044198683607415000000000000E-12 "%" Correct digits = 15 h = 1.00E-2 " " "NO INFO (given) for Equation 1" Radius of convergence (ratio test) for eq 1 = 17.639942741497308 " " "Order of pole (ratio test) Not computed" Radius of convergence (three term test) for eq 1 = 251.72745190325145 " " Order of pole (three term test) = -6628.453359111268 " " "NO COMPLEX POLE (six term test) for Equation 1" " " "TOP MAIN SOLVE Loop" x[1] = 2.5399999999999894 " " y[1] (analytic) = -7.94973309890010200E-2 " " y[1] (numeric) = -7.9497330989000200E-2 " " absolute error = 8.1878948066105300000000000000000E-16 " " relative error = 1.029958453289882000000000000E-12 "%" Correct digits = 15 h = 1.00E-2 " " "NO INFO (given) for Equation 1" Radius of convergence (ratio test) for eq 1 = 17.638968485321186 " " "Order of pole (ratio test) Not computed" Radius of convergence (three term test) for eq 1 = 251.8462120604986 " " Order of pole (three term test) = -6631.749178872873 " " Radius of convergence (six term test) for eq 1 = 520.4702372319849 " " Order of pole (six term test) = 27529.019284208258 " " " " "TOP MAIN SOLVE Loop" x[1] = 2.549999999999989 " " y[1] (analytic) = -7.88624826611653700E-2 " " y[1] (numeric) = -7.88624826611645300E-2 " " absolute error = 8.3266726846886740000000000000000E-16 " " relative error = 1.0558471409611123000000000000E-12 "%" Correct digits = 15 h = 1.00E-2 " " "NO INFO (given) for Equation 1" Radius of convergence (ratio test) for eq 1 = 17.63799282152443 " " "Order of pole (ratio test) Not computed" Radius of convergence (three term test) for eq 1 = 251.53844360428448 " " Order of pole (three term test) = -6623.798856722823 " " Radius of convergence (six term test) for eq 1 = 920.0565716717565 " " Order of pole (six term test) = 84475.69820894017 " " " " "TOP MAIN SOLVE Loop" x[1] = 2.559999999999989 " " y[1] (analytic) = -7.82323973286200300E-2 " " y[1] (numeric) = -7.8232397328619200E-2 " " absolute error = 8.3266726846886740000000000000000E-16 " " relative error = 1.0643509554886793000000000000E-12 "%" Correct digits = 15 h = 1.00E-2 " " "NO INFO (given) for Equation 1" Radius of convergence (ratio test) for eq 1 = 17.637015787492327 " " "Order of pole (ratio test) Not computed" Radius of convergence (three term test) for eq 1 = 251.30602291448886 " " Order of pole (three term test) = -6617.836585168726 " " Radius of convergence (six term test) for eq 1 = 906.2594691202752 " " Order of pole (six term test) = 81779.54775198916 " " " " "TOP MAIN SOLVE Loop" x[1] = 2.5699999999999887 " " y[1] (analytic) = -7.76070430598469600E-2 " " y[1] (numeric) = -7.76070430598461100E-2 " " absolute error = 8.4654505627668190000000000000000E-16 " " relative error = 1.0908095746205218000000000000E-12 "%" Correct digits = 15 h = 1.00E-2 " " "NO INFO (given) for Equation 1" Radius of convergence (ratio test) for eq 1 = 17.63603733515032 " " "Order of pole (ratio test) Not computed" Radius of convergence (three term test) for eq 1 = 251.09052371826402 " " Order of pole (three term test) = -6612.314395283449 " " "NO COMPLEX POLE (six term test) for Equation 1" " " "TOP MAIN SOLVE Loop" x[1] = 2.5799999999999885 " " y[1] (analytic) = -7.69863880872117200E-2 " " y[1] (numeric) = -7.69863880872108600E-2 " " absolute error = 8.7430063189231080000000000000000E-16 " " relative error = 1.1356561252125318000000000000E-12 "%" Correct digits = 15 h = 1.00E-2 " " "NO INFO (given) for Equation 1" Radius of convergence (ratio test) for eq 1 = 17.63505745746309 " " "Order of pole (ratio test) Not computed" Radius of convergence (three term test) for eq 1 = 251.01341954182135 " " Order of pole (three term test) = -6610.451388140444 " " Radius of convergence (six term test) for eq 1 = 712.3148034866726 " " Order of pole (six term test) = 50552.283299281014 " " " " "TOP MAIN SOLVE Loop" x[1] = 2.5899999999999883 " " y[1] (analytic) = -7.63704008068635700E-2 " " y[1] (numeric) = -7.63704008068626800E-2 " " absolute error = 8.8817841970012520000000000000000E-16 " " relative error = 1.162987767926318000000000000E-12 "%" Correct digits = 15 h = 1.00E-2 " " "NO INFO (given) for Equation 1" Radius of convergence (ratio test) for eq 1 = 17.634076217686452 " " "Order of pole (ratio test) Not computed" Radius of convergence (three term test) for eq 1 = 250.548539485473 " " Order of pole (three term test) = -6598.35067450399 " " "NO COMPLEX POLE (six term test) for Equation 1" " " "TOP MAIN SOLVE Loop" x[1] = 2.599999999999988 " " y[1] (analytic) = -7.57590497786212900E-2 " " y[1] (numeric) = -7.57590497786203800E-2 " " absolute error = 9.0205620750793970000000000000000E-16 " " relative error = 1.19069102654254000000000000E-12 "%" Correct digits = 15 h = 1.00E-2 " " "NO INFO (given) for Equation 1" Radius of convergence (ratio test) for eq 1 = 17.633093532839368 " " "Order of pole (ratio test) Not computed" Radius of convergence (three term test) for eq 1 = 250.43846731875448 " " Order of pole (three term test) = -6595.612599926362 " " "NO COMPLEX POLE (six term test) for Equation 1" " " "TOP MAIN SOLVE Loop" x[1] = 2.609999999999988 " " y[1] (analytic) = -7.51523037258450800E-2 " " y[1] (numeric) = -7.51523037258441600E-2 " " absolute error = 9.1593399531575410000000000000000E-16 " " relative error = 1.218770350217171000000000000E-12 "%" Correct digits = 15 h = 1.00E-2 " " "NO INFO (given) for Equation 1" Radius of convergence (ratio test) for eq 1 = 17.632109434713414 " " "Order of pole (ratio test) Not computed" Radius of convergence (three term test) for eq 1 = 250.34378986178208 " " Order of pole (three term test) = -6593.284865306570 " " "NO COMPLEX POLE (six term test) for Equation 1" " " "TOP MAIN SOLVE Loop" x[1] = 2.6199999999999877 " " y[1] (analytic) = -7.45501315352947800E-2 " " y[1] (numeric) = -7.45501315352938600E-2 " " absolute error = 9.2981178312356860000000000000000E-16 " " relative error = 1.247230238196644100000000000E-12 "%" Correct digits = 15 h = 1.00E-2 " " "NO INFO (given) for Equation 1" Radius of convergence (ratio test) for eq 1 = 17.631123927774002 " " "Order of pole (ratio test) Not computed" Radius of convergence (three term test) for eq 1 = 250.2813144960876 " " Order of pole (three term test) = -6591.798267944643 " " "NO COMPLEX POLE (six term test) for Equation 1" " " "TOP MAIN SOLVE Loop" x[1] = 2.6299999999999875 " " y[1] (analytic) = -7.39525022569747600E-2 " " y[1] (numeric) = -7.39525022569738200E-2 " " absolute error = 9.436895709313831000000000000000E-16 " " relative error = 1.276075240364676000000000000E-12 "%" Correct digits = 15 h = 1.00E-2 " " "NO INFO (given) for Equation 1" Radius of convergence (ratio test) for eq 1 = 17.630136968135027 " " "Order of pole (ratio test) Not computed" Radius of convergence (three term test) for eq 1 = 250.40424685127073 " " Order of pole (three term test) = -6595.210704446268 " " Radius of convergence (six term test) for eq 1 = 518.8928056356215 " " Order of pole (six term test) = 26851.18164142635 " " " " "TOP MAIN SOLVE Loop" x[1] = 2.6399999999999872 " " y[1] (analytic) = -7.33593851039656500E-2 " " y[1] (numeric) = -7.33593851039646700E-2 " " absolute error = 9.714451465470120000000000000000E-16 " " relative error = 1.324227493415151000000000000E-12 "%" Correct digits = 15 h = 1.00E-2 " " "NO INFO (given) for Equation 1" Radius of convergence (ratio test) for eq 1 = 17.629148638353453 " " "Order of pole (ratio test) Not computed" Radius of convergence (three term test) for eq 1 = 250.01478797120953 " " Order of pole (three term test) = -6585.097852303953 " " "NO COMPLEX POLE (six term test) for Equation 1" " " "TOP MAIN SOLVE Loop" x[1] = 2.649999999999987 " " y[1] (analytic) = -7.27707494522432200E-2 " " y[1] (numeric) = -7.27707494522422700E-2 " " absolute error = 9.5756735873919750000000000000000E-16 " " relative error = 1.3158684855480482000000000000E-12 "%" Correct digits = 15 h = 1.00E-2 " " "NO INFO (given) for Equation 1" Radius of convergence (ratio test) for eq 1 = 17.628158844225002 " " "Order of pole (ratio test) Not computed" Radius of convergence (three term test) for eq 1 = 249.79548517645304 " " Order of pole (three term test) = -6579.482675666793 " " "NO COMPLEX POLE (six term test) for Equation 1" " " "TOP MAIN SOLVE Loop" x[1] = 2.659999999999987 " " y[1] (analytic) = -7.2186564840485110E-2 " " y[1] (numeric) = -7.21865648404841200E-2 " " absolute error = 9.8532293435482640000000000000000E-16 " " relative error = 1.364967202043971000000000000E-12 "%" Correct digits = 15 h = 1.00E-2 " " "NO INFO (given) for Equation 1" Radius of convergence (ratio test) for eq 1 = 17.627167637550894 " " "Order of pole (ratio test) Not computed" Radius of convergence (three term test) for eq 1 = 249.6574164203255 " " Order of pole (three term test) = -6576.00184647544 " " "NO COMPLEX POLE (six term test) for Equation 1" " " "TOP MAIN SOLVE Loop" x[1] = 2.6699999999999866 " " y[1] (analytic) = -7.16068009698645400E-2 " " y[1] (numeric) = -7.16068009698635400E-2 " " absolute error = 9.9920072216264090000000000000000E-16 " " relative error = 1.395399192016902000000000000E-12 "%" Correct digits = 15 h = 1.00E-2 " " "NO INFO (given) for Equation 1" Radius of convergence (ratio test) for eq 1 = 17.62617498825503 " " "Order of pole (ratio test) Not computed" Radius of convergence (three term test) for eq 1 = 249.72550330707628 " " Order of pole (three term test) = -6577.9671669870495 " " Radius of convergence (six term test) for eq 1 = 567.152455909454 " " Order of pole (six term test) = 31730.103165086715 " " " " "TOP MAIN SOLVE Loop" x[1] = 2.6799999999999864 " " y[1] (analytic) = -7.10314277038327100E-2 " " y[1] (numeric) = -7.10314277038317100E-2 " " absolute error = 9.9920072216264090000000000000000E-16 " " relative error = 1.4067022928622988000000000000E-12 "%" Correct digits = 15 h = 1.00E-2 " " "NO INFO (given) for Equation 1" Radius of convergence (ratio test) for eq 1 = 17.625180905052623 " " "Order of pole (ratio test) Not computed" Radius of convergence (three term test) for eq 1 = 249.55568639697086 " " Order of pole (three term test) = -6573.653417504523 " " Radius of convergence (six term test) for eq 1 = 705.4851009181018 " " Order of pole (six term test) = 48652.02481637403 " " " " "TOP MAIN SOLVE Loop" x[1] = 2.689999999999986 " " y[1] (analytic) = -7.04604150678891600E-2 " " y[1] (numeric) = -7.04604150678881500E-2 " " absolute error = 1.0130785099704553000000000000000E-15 " " relative error = 1.4377981012379026000000000000E-12 "%" Correct digits = 15 h = 1.00E-2 " " "NO INFO (given) for Equation 1" Radius of convergence (ratio test) for eq 1 = 17.62418536593917 " " "Order of pole (ratio test) Not computed" Radius of convergence (three term test) for eq 1 = 249.3469204769636 " " Order of pole (three term test) = -6568.314674786814 " " Radius of convergence (six term test) for eq 1 = 659.854069654241 " " Order of pole (six term test) = 42534.378928883874 " " " " "TOP MAIN SOLVE Loop" x[1] = 2.699999999999986 " " y[1] (analytic) = -6.98937332493405500E-2 " " y[1] (numeric) = -6.98937332493395400E-2 " " absolute error = 1.0130785099704553000000000000000E-15 " " relative error = 1.4494554273648186000000000000E-12 "%" Correct digits = 15 h = 1.00E-2 " " "NO INFO (given) for Equation 1" Radius of convergence (ratio test) for eq 1 = 17.623188404695465 " " "Order of pole (ratio test) Not computed" Radius of convergence (three term test) for eq 1 = 249.0383528088425 " " Order of pole (three term test) = -6560.338487382350 " " "NO COMPLEX POLE (six term test) for Equation 1" " " "TOP MAIN SOLVE Loop" x[1] = 2.7099999999999858 " " y[1] (analytic) = -6.93313525970483600E-2 " " y[1] (numeric) = -6.93313525970473200E-2 " " absolute error = 1.0269562977782698000000000000000E-15 " " relative error = 1.4812292841694688000000000000E-12 "%" Correct digits = 15 h = 1.00E-2 " " "NO INFO (given) for Equation 1" Radius of convergence (ratio test) for eq 1 = 17.622189995525233 " " "Order of pole (ratio test) Not computed" Radius of convergence (three term test) for eq 1 = 248.86176831166193 " " Order of pole (three term test) = -6555.846956778519 " " Radius of convergence (six term test) for eq 1 = 3363.5263309950983 " " Order of pole (six term test) = 1086008.4491775057 " " " " "TOP MAIN SOLVE Loop" x[1] = 2.7199999999999855 " " y[1] (analytic) = -6.87732436211654900E-2 " " y[1] (numeric) = -6.87732436211644500E-2 " " absolute error = 1.0408340855860843000000000000000E-15 " " relative error = 1.5134288144375954000000000000E-12 "%" Correct digits = 15 h = 1.00E-2 " " "NO INFO (given) for Equation 1" Radius of convergence (ratio test) for eq 1 = 17.62119013120418 " " "Order of pole (ratio test) Not computed" Radius of convergence (three term test) for eq 1 = 248.86254576118125 " " Order of pole (three term test) = -6556.031518964746 " " Radius of convergence (six term test) for eq 1 = 853.8695102230714 " " Order of pole (six term test) = 70447.42312208135 " " " " "TOP MAIN SOLVE Loop" x[1] = 2.7299999999999853 " " y[1] (analytic) = -6.82193769928622000E-2 " " y[1] (numeric) = -6.82193769928611400E-2 " " absolute error = 1.0685896612017132000000000000000E-15 " " relative error = 1.5664019642300744000000000000E-12 "%" Correct digits = 15 h = 1.00E-2 " " "NO INFO (given) for Equation 1" Radius of convergence (ratio test) for eq 1 = 17.620188820187376 " " "Order of pole (ratio test) Not computed" Radius of convergence (three term test) for eq 1 = 248.87578155645534 " " Order of pole (three term test) = -6556.546844197897 " " Radius of convergence (six term test) for eq 1 = 542.2734963728353 " " Order of pole (six term test) = 28713.063167830074 " " " " "TOP MAIN SOLVE Loop" x[1] = 2.739999999999985 " " y[1] (analytic) = -6.7669723544041390E-2 " " y[1] (numeric) = -6.76697235440403200E-2 " " absolute error = 1.0824674490095276000000000000000E-15 " " relative error = 1.599633325389643000000000000E-12 "%" Correct digits = 15 h = 1.00E-2 " " "NO INFO (given) for Equation 1" Radius of convergence (ratio test) for eq 1 = 17.619186050469246 " " "Order of pole (ratio test) Not computed" Radius of convergence (three term test) for eq 1 = 248.65478014035344 " " Order of pole (three term test) = -6550.88335563179 " " Radius of convergence (six term test) for eq 1 = 586.8933305678629 " " Order of pole (six term test) = 33457.290820539805 " " " " "TOP MAIN SOLVE Loop" x[1] = 2.749999999999985 " " y[1] (analytic) = -6.71242542670437700E-2 " " y[1] (numeric) = -6.71242542670426900E-2 " " absolute error = 1.0824674490095276000000000000000E-15 " " relative error = 1.6126323649021013000000000000E-12 "%" Correct digits = 15 h = 1.00E-2 " " "NO INFO (given) for Equation 1" Radius of convergence (ratio test) for eq 1 = 17.618181801162336 " " "Order of pole (ratio test) Not computed" Radius of convergence (three term test) for eq 1 = 248.81156550069554 " " Order of pole (three term test) = -6555.189277502203 " " Radius of convergence (six term test) for eq 1 = 323.71460242066524 " " Order of pole (six term test) = 10568.5574202379 " " " " "TOP MAIN SOLVE Loop" x[1] = 2.7599999999999847 " " y[1] (analytic) = -6.65829403143428600E-2 " " y[1] (numeric) = -6.65829403143417700E-2 " " absolute error = 1.096345236817342100000000000000E-15 " " relative error = 1.6465857945615153000000000000E-12 "%" Correct digits = 15 h = 1.00E-2 " " "NO INFO (given) for Equation 1" Radius of convergence (ratio test) for eq 1 = 17.617176125670746 " " "Order of pole (ratio test) Not computed" Radius of convergence (three term test) for eq 1 = 248.49244435100982 " " Order of pole (three term test) = -6546.933548053782 " " Radius of convergence (six term test) for eq 1 = 426.8460900433163 " " Order of pole (six term test) = 17907.14460017416 " " " " "TOP MAIN SOLVE Loop" x[1] = 2.7699999999999845 " " y[1] (analytic) = -6.60457529982302400E-2 " " y[1] (numeric) = -6.60457529982291300E-2 " " absolute error = 1.1102230246251565000000000000000E-15 " " relative error = 1.6809907893016315000000000000E-12 "%" Correct digits = 15 h = 1.00E-2 " " "NO INFO (given) for Equation 1" Radius of convergence (ratio test) for eq 1 = 17.616168952225852 " " "Order of pole (ratio test) Not computed" Radius of convergence (three term test) for eq 1 = 248.27679489911034 " " Order of pole (three term test) = -6541.412145610156 " " Radius of convergence (six term test) for eq 1 = 423.44242518230067 " " Order of pole (six term test) = 17593.504130107292 " " " " "TOP MAIN SOLVE Loop" x[1] = 2.7799999999999843 " " y[1] (analytic) = -6.55126637904912100E-2 " " y[1] (numeric) = -6.55126637904900900E-2 " " absolute error = 1.124100812432971000000000000000E-15 " " relative error = 1.7158527029641676000000000000E-12 "%" Correct digits = 15 h = 1.00E-2 " " "NO INFO (given) for Equation 1" Radius of convergence (ratio test) for eq 1 = 17.615160359985072 " " "Order of pole (ratio test) Not computed" Radius of convergence (three term test) for eq 1 = 247.61813346057107 " " Order of pole (three term test) = -6524.196080661835 " " "NO COMPLEX POLE (six term test) for Equation 1" " " "TOP MAIN SOLVE Loop" x[1] = 2.789999999999984 " " y[1] (analytic) = -6.49836443220709800E-2 " " y[1] (numeric) = -6.49836443220698400E-2 " " absolute error = 1.124100812432971000000000000000E-15 " " relative error = 1.7298211329326488000000000000E-12 "%" Correct digits = 15 h = 1.00E-2 " " "NO INFO (given) for Equation 1" Radius of convergence (ratio test) for eq 1 = 17.61415026555885 " " "Order of pole (ratio test) Not computed" Radius of convergence (three term test) for eq 1 = 247.51530539248873 " " Order of pole (three term test) = -6521.647014903264 " " "NO COMPLEX POLE (six term test) for Equation 1" " " "TOP MAIN SOLVE Loop" x[1] = 2.799999999999984 " " y[1] (analytic) = -6.44586663827318900E-2 " " y[1] (numeric) = -6.44586663827307400E-2 " " absolute error = 1.1379786002407855000000000000000E-15 " " relative error = 1.7654392560402762000000000000E-12 "%" Correct digits = 15 h = 1.00E-2 " " "NO INFO (given) for Equation 1" Radius of convergence (ratio test) for eq 1 = 17.61313867517215 " " "Order of pole (ratio test) Not computed" Radius of convergence (three term test) for eq 1 = 247.57763226517486 " " Order of pole (three term test) = -6523.459953652105 " " Radius of convergence (six term test) for eq 1 = 1243.7579703710514 " " Order of pole (six term test) = 146514.37190254353 " " " " "TOP MAIN SOLVE Loop" x[1] = 2.8099999999999836 " " y[1] (analytic) = -6.39377019207015400E-2 " " y[1] (numeric) = -6.3937701920700410E-2 " " absolute error = 1.1379786002407855000000000000000E-15 " " relative error = 1.7798240569424260000000000000E-12 "%" Correct digits = 15 h = 1.00E-2 " " "NO INFO (given) for Equation 1" Radius of convergence (ratio test) for eq 1 = 17.612125647108584 " " "Order of pole (ratio test) Not computed" Radius of convergence (three term test) for eq 1 = 247.4276949096702 " " Order of pole (three term test) = -6519.671442552998 " " Radius of convergence (six term test) for eq 1 = 682.1716736418992 " " Order of pole (six term test) = 44393.67124651706 " " " " "TOP MAIN SOLVE Loop" x[1] = 2.8199999999999834 " " y[1] (analytic) = -6.34207230423123300E-2 " " y[1] (numeric) = -6.34207230423111700E-2 " " absolute error = 1.1657341758564144000000000000000E-15 " " relative error = 1.838096634563237000000000000E-12 "%" Correct digits = 15 h = 1.00E-2 " " "NO INFO (given) for Equation 1" Radius of convergence (ratio test) for eq 1 = 17.611111103734796 " " "Order of pole (ratio test) Not computed" Radius of convergence (three term test) for eq 1 = 247.1754314397552 " " Order of pole (three term test) = -6513.181492192056 " " Radius of convergence (six term test) for eq 1 = 1683.3720015393887 " " Order of pole (six term test) = 266809.42541200493 " " " " "TOP MAIN SOLVE Loop" x[1] = 2.829999999999983 " " y[1] (analytic) = -6.29077020116322600E-2 " " y[1] (numeric) = -6.2907702011631100E-2 " " absolute error = 1.1657341758564144000000000000000E-15 " " relative error = 1.8530865674299446000000000000E-12 "%" Correct digits = 15 h = 1.00E-2 " " "NO INFO (given) for Equation 1" Radius of convergence (ratio test) for eq 1 = 17.610095097496764 " " "Order of pole (ratio test) Not computed" Radius of convergence (three term test) for eq 1 = 246.92512294271776 " " Order of pole (three term test) = -6506.7395338666265 " " "NO COMPLEX POLE (six term test) for Equation 1" " " "TOP MAIN SOLVE Loop" x[1] = 2.839999999999983 " " y[1] (analytic) = -6.23986112500877400E-2 " " y[1] (numeric) = -6.23986112500865700E-2 " " absolute error = 1.1796119636642288000000000000000E-15 " " relative error = 1.890445860944654000000000000E-12 "%" Correct digits = 15 h = 1.00E-2 " " "NO INFO (given) for Equation 1" Radius of convergence (ratio test) for eq 1 = 17.609077604059728 " " "Order of pole (ratio test) Not computed" Radius of convergence (three term test) for eq 1 = 246.90832898956847 " " Order of pole (three term test) = -6506.465118533673 " " Radius of convergence (six term test) for eq 1 = 1743.7858086564631 " " Order of pole (six term test) = 285204.9249060704 " " " " "TOP MAIN SOLVE Loop" x[1] = 2.8499999999999828 " " y[1] (analytic) = -6.18934233360780200E-2 " " y[1] (numeric) = -6.189342333607684000E-2 " " absolute error = 1.186550857568136000000000000000E-15 " " relative error = 1.917087137231410800000000000E-12 "%" Correct digits = 15 h = 1.00E-2 " " "NO INFO (given) for Equation 1" Radius of convergence (ratio test) for eq 1 = 17.608058602842103 " " "Order of pole (ratio test) Not computed" Radius of convergence (three term test) for eq 1 = 246.76129791000346 " " Order of pole (three term test) = -6502.750854359002 " " Radius of convergence (six term test) for eq 1 = 1616.9910088557072 " " Order of pole (six term test) = 244944.86002565586 " " " " "TOP MAIN SOLVE Loop" x[1] = 2.8599999999999826 " " y[1] (analytic) = -6.139211100458187000E-2 " " y[1] (numeric) = -6.139211100458067000E-2 " " absolute error = 1.2004286453759505000000000000000E-15 " " relative error = 1.95534674689124000000000000E-12 "%" Correct digits = 15 h = 1.00E-2 " " "NO INFO (given) for Equation 1" Radius of convergence (ratio test) for eq 1 = 17.607038109957557 " " "Order of pole (ratio test) Not computed" Radius of convergence (three term test) for eq 1 = 246.77427204950968 " " Order of pole (three term test) = -6503.262684331968 " " Radius of convergence (six term test) for eq 1 = 531.8467008161485 " " Order of pole (six term test) = 26946.913873449517 " " " " "TOP MAIN SOLVE Loop" x[1] = 2.8699999999999823 " " y[1] (analytic) = -6.089464714675646000E-2 " " y[1] (numeric) = -6.08946471467552500E-2 " " absolute error = 1.214306433183765000000000000000E-15 " " relative error = 1.9941103037468616000000000000E-12 "%" Correct digits = 15 h = 1.00E-2 " " "NO INFO (given) for Equation 1" Radius of convergence (ratio test) for eq 1 = 17.606016147629663 " " "Order of pole (ratio test) Not computed" Radius of convergence (three term test) for eq 1 = 246.30128261355233 " " Order of pole (three term test) = -6490.946602887796 " " "NO COMPLEX POLE (six term test) for Equation 1" " " "TOP MAIN SOLVE Loop" x[1] = 2.879999999999982 " " y[1] (analytic) = -6.040100480952877000E-2 " " y[1] (numeric) = -6.04010048095275500E-2 " " absolute error = 1.2212453270876722000000000000000E-15 " " relative error = 2.021895713388878000000000000E-12 "%" Correct digits = 15 h = 1.00E-2 " " "NO INFO (given) for Equation 1" Radius of convergence (ratio test) for eq 1 = 17.604992641091545 " " "Order of pole (ratio test) Not computed" Radius of convergence (three term test) for eq 1 = 246.75967112203267 " " Order of pole (three term test) = -6503.208269605469 " " Radius of convergence (six term test) for eq 1 = 405.17632912684684 " " Order of pole (six term test) = 15829.11530002968 " " " " "TOP MAIN SOLVE Loop" x[1] = 2.889999999999982 " " y[1] (analytic) = -5.99111571951796400E-2 " " y[1] (numeric) = -5.9911157195178400E-2 " " absolute error = 1.2420620087993939000000000000000E-15 " " relative error = 2.0731731232514536000000000000E-12 "%" Correct digits = 15 h = 1.00E-2 " " "NO INFO (given) for Equation 1" Radius of convergence (ratio test) for eq 1 = 17.603967667633913 " " "Order of pole (ratio test) Not computed" Radius of convergence (three term test) for eq 1 = 246.31810832948415 " " Order of pole (three term test) = -6491.722127832776 " " Radius of convergence (six term test) for eq 1 = 636.2979628858924 " " Order of pole (six term test) = 38123.219927047794 " " " " "TOP MAIN SOLVE Loop" x[1] = 2.8999999999999817 " " y[1] (analytic) = -5.942507766092069000E-2 " " y[1] (numeric) = -5.94250776609194500E-2 " " absolute error = 1.2351231148954867000000000000000E-15 " " relative error = 2.078454355487922800000000000E-12 "%" Correct digits = 15 h = 1.00E-2 " " "NO INFO (given) for Equation 1" Radius of convergence (ratio test) for eq 1 = 17.6029411695701 " " "Order of pole (ratio test) Not computed" Radius of convergence (three term test) for eq 1 = 246.11422181967075 " " Order of pole (three term test) = -6486.510461048173 " " Radius of convergence (six term test) for eq 1 = 613.9461390282422 " " Order of pole (six term test) = 35446.34556364741 " " " " "TOP MAIN SOLVE Loop" x[1] = 2.9099999999999815 " " y[1] (analytic) = -5.894273971846432000E-2 " " y[1] (numeric) = -5.894273971846308000E-2 " " absolute error = 1.2490009027033011000000000000000E-15 " " relative error = 2.1190072071116178000000000000E-12 "%" Correct digits = 15 h = 1.00E-2 " " "NO INFO (given) for Equation 1" Radius of convergence (ratio test) for eq 1 = 17.601913182554892 " " "Order of pole (ratio test) Not computed" Radius of convergence (three term test) for eq 1 = 245.82061596619815 " " Order of pole (three term test) = -6478.921950762603 " " "NO COMPLEX POLE (six term test) for Equation 1" " " "TOP MAIN SOLVE Loop" x[1] = 2.9199999999999813 " " y[1] (analytic) = -5.84641170335868000E-2 " " y[1] (numeric) = -5.846411703358555000E-2 " " absolute error = 1.2559397966072083000000000000000E-15 " " relative error = 2.1482233211282206000000000000E-12 "%" Correct digits = 15 h = 1.00E-2 " " "NO INFO (given) for Equation 1" Radius of convergence (ratio test) for eq 1 = 17.600883649439158 " " "Order of pole (ratio test) Not computed" Radius of convergence (three term test) for eq 1 = 245.92284805519685 " " Order of pole (three term test) = -6481.793817614618 " " Radius of convergence (six term test) for eq 1 = 456.3300809645164 " " Order of pole (six term test) = 19763.45769227374 " " " " "TOP MAIN SOLVE Loop" x[1] = 2.929999999999981 " " y[1] (analytic) = -5.798918342568494000E-2 " " y[1] (numeric) = -5.79891834256836700E-2 " " absolute error = 1.27675647831893000000000000000E-15 " " relative error = 2.201714876628907000000000000E-12 "%" Correct digits = 15 h = 1.00E-2 " " "NO INFO (given) for Equation 1" Radius of convergence (ratio test) for eq 1 = 17.599852617879858 " " "Order of pole (ratio test) Not computed" Radius of convergence (three term test) for eq 1 = 245.5023033417421 " " Order of pole (three term test) = -6470.858898030355 " " Radius of convergence (six term test) for eq 1 = 1331.7104734163565 " " Order of pole (six term test) = 163832.09992089664 " " " " "TOP MAIN SOLVE Loop" x[1] = 2.939999999999981 " " y[1] (analytic) = -5.7517912867326090E-2 " " y[1] (numeric) = -5.75179128673248200E-2 " " absolute error = 1.27675647831893000000000000000E-15 " " relative error = 2.2197545332772506000000000000E-12 "%" Correct digits = 15 h = 1.00E-2 " " "NO INFO (given) for Equation 1" Radius of convergence (ratio test) for eq 1 = 17.59882006369886 " " "Order of pole (ratio test) Not computed" Radius of convergence (three term test) for eq 1 = 245.61958260345799 " " Order of pole (three term test) = -6474.12206671592 " " Radius of convergence (six term test) for eq 1 = 467.4071568803764 " " Order of pole (six term test) = 20638.31489207609 " " " " "TOP MAIN SOLVE Loop" x[1] = 2.9499999999999806 " " y[1] (analytic) = -5.70502794837922100E-2 " " y[1] (numeric) = -5.705027948379092000E-2 " " absolute error = 1.2836953722228372000000000000000E-15 " " relative error = 2.250112328700389000000000000E-12 "%" Correct digits = 15 h = 1.00E-2 " " "NO INFO (given) for Equation 1" Radius of convergence (ratio test) for eq 1 = 17.59778598252196 " " "Order of pole (ratio test) Not computed" Radius of convergence (three term test) for eq 1 = 245.4044383189002 " " Order of pole (three term test) = -6468.607542796207 " " Radius of convergence (six term test) for eq 1 = 695.0586608667156 " " Order of pole (six term test) = 44897.16654540431 " " " " "TOP MAIN SOLVE Loop" x[1] = 2.9599999999999804 " " y[1] (analytic) = -5.658625755261751000E-2 " " y[1] (numeric) = -5.65862575526162100E-2 " " absolute error = 1.2975731600306517000000000000000E-15 " " relative error = 2.2930888455100346000000000000E-12 "%" Correct digits = 15 h = 1.00E-2 " " "NO INFO (given) for Equation 1" Radius of convergence (ratio test) for eq 1 = 17.59675037586699 " " "Order of pole (ratio test) Not computed" Radius of convergence (three term test) for eq 1 = 244.70894822670795 " " Order of pole (three term test) = -6450.417783417387 " " "NO COMPLEX POLE (six term test) for Equation 1" " " "TOP MAIN SOLVE Loop" x[1] = 2.96999999999998 " " y[1] (analytic) = -5.61258215031204200E-2 " " y[1] (numeric) = -5.61258215031191200E-2 " " absolute error = 1.2975731600306517000000000000000E-15 " " relative error = 2.3119005215068625000000000000E-12 "%" Correct digits = 15 h = 1.00E-2 " " "NO INFO (given) for Equation 1" Radius of convergence (ratio test) for eq 1 = 17.59571322327769 " " "Order of pole (ratio test) Not computed" Radius of convergence (three term test) for eq 1 = 244.8403859086345 " " Order of pole (three term test) = -6454.057470348262 " " Radius of convergence (six term test) for eq 1 = 814.2263257354124 " " Order of pole (six term test) = 61137.11319119553 " " " " "TOP MAIN SOLVE Loop" x[1] = 2.97999999999998 " " y[1] (analytic) = -5.56689459159296800E-2 " " y[1] (numeric) = -5.56689459159283500E-2 " " absolute error = 1.3253287356462806000000000000000E-15 " " relative error = 2.380732585897657000000000000E-12 "%" Correct digits = 15 h = 1.00E-2 " " "NO INFO (given) for Equation 1" Radius of convergence (ratio test) for eq 1 = 17.594674551546497 " " "Order of pole (ratio test) Not computed" Radius of convergence (three term test) for eq 1 = 244.9076411570595 " " Order of pole (three term test) = -6455.996839521976 " " Radius of convergence (six term test) for eq 1 = 781.8395279224262 " " Order of pole (six term test) = 56333.64907055695 " " " " "TOP MAIN SOLVE Loop" x[1] = 2.98999999999998 " " y[1] (analytic) = -5.5215605522504800E-2 " " y[1] (numeric) = -5.521560552250346000E-2 " " absolute error = 1.3322676295501878000000000000000E-15 " " relative error = 2.4128461816961908000000000000E-12 "%" Correct digits = 15 h = 1.00E-2 " " "NO INFO (given) for Equation 1" Radius of convergence (ratio test) for eq 1 = 17.593634351590396 " " "Order of pole (ratio test) Not computed" Radius of convergence (three term test) for eq 1 = 244.36706648900577 " " Order of pole (three term test) = -6441.895456097336 " " "NO COMPLEX POLE (six term test) for Equation 1" " " "TOP MAIN SOLVE Loop" x[1] = 2.9999999999999796 " " y[1] (analytic) = -5.47657752046512600E-2 " " y[1] (numeric) = -5.47657752046499100E-2 " " absolute error = 1.339206523454095000000000000000E-15 " " relative error = 2.445334734055506000000000000E-12 "%" Correct digits = 15 h = 1.00E-2 " " "NO INFO (given) for Equation 1" Radius of convergence (ratio test) for eq 1 = 17.592592608971568 " " "Order of pole (ratio test) Not computed" Radius of convergence (three term test) for eq 1 = 244.59021851770737 " " Order of pole (three term test) = -6447.953173124579 " " Radius of convergence (six term test) for eq 1 = 554.0091011506503 " " Order of pole (six term test) = 28460.41467047257 " " " " "TOP MAIN SOLVE Loop" x[1] = 3.0099999999999794 " " y[1] (analytic) = -5.43194299940302200E-2 " " y[1] (numeric) = -5.431942999402888000E-2 " " absolute error = 1.3461454173580023000000000000000E-15 " " relative error = 2.4782023992261065000000000000E-12 "%" Correct digits = 15 h = 1.00E-2 " " "NO INFO (given) for Equation 1" Radius of convergence (ratio test) for eq 1 = 17.591549281891087 " " "Order of pole (ratio test) Not computed" Radius of convergence (three term test) for eq 1 = 244.5432218399489 " " Order of pole (three term test) = -6446.881430023612 " " Radius of convergence (six term test) for eq 1 = 526.1065529624899 " " Order of pole (six term test) = 25659.565464457526 " " " " "TOP MAIN SOLVE Loop" x[1] = 3.019999999999979 " " y[1] (analytic) = -5.38765450716632300E-2 " " y[1] (numeric) = -5.387654507166187000E-2 " " absolute error = 1.3530843112619095000000000000000E-15 " " relative error = 2.511453378204042000000000000E-12 "%" Correct digits = 15 h = 1.00E-2 " " "NO INFO (given) for Equation 1" Radius of convergence (ratio test) for eq 1 = 17.590504437955104 " " "Order of pole (ratio test) Not computed" Radius of convergence (three term test) for eq 1 = 243.836153703284 " " Order of pole (three term test) = -6428.3803818930965 " " "NO COMPLEX POLE (six term test) for Equation 1" " " "TOP MAIN SOLVE Loop" x[1] = 3.029999999999979 " " y[1] (analytic) = -5.34370957674319000E-2 " " y[1] (numeric) = -5.343709576743052000E-2 " " absolute error = 1.366962099069724000000000000000E-15 " " relative error = 2.55807708004753000000000000E-12 "%" Correct digits = 15 h = 1.00E-2 " " "NO INFO (given) for Equation 1" Radius of convergence (ratio test) for eq 1 = 17.589458064865763 " " "Order of pole (ratio test) Not computed" Radius of convergence (three term test) for eq 1 = 243.85464530299686 " " Order of pole (three term test) = -6429.035712129039 " " "NO COMPLEX POLE (six term test) for Equation 1" " " "TOP MAIN SOLVE Loop" x[1] = 3.0399999999999787 " " y[1] (analytic) = -5.300105755957273000E-2 " " y[1] (numeric) = -5.30010575595713500E-2 " " absolute error = 1.3739009929736312000000000000000E-15 " " relative error = 2.5922142995531333000000000000E-12 "%" Correct digits = 15 h = 1.00E-2 " " "NO INFO (given) for Equation 1" Radius of convergence (ratio test) for eq 1 = 17.588410103482396 " " "Order of pole (ratio test) Not computed" Radius of convergence (three term test) for eq 1 = 243.82240060877413 " " Order of pole (three term test) = -6428.3528159694315 " " Radius of convergence (six term test) for eq 1 = 2005.2302025253373 " " Order of pole (six term test) = 363488.82272904785 " " " " "TOP MAIN SOLVE Loop" x[1] = 3.0499999999999785 " " y[1] (analytic) = -5.25684060741673500E-2 " " y[1] (numeric) = -5.25684060741659700E-2 " " absolute error = 1.3739009929736312000000000000000E-15 " " relative error = 2.6135488891088520000000000000E-12 "%" Correct digits = 15 h = 1.00E-2 " " "NO INFO (given) for Equation 1" Radius of convergence (ratio test) for eq 1 = 17.587360588966927 " " "Order of pole (ratio test) Not computed" Radius of convergence (three term test) for eq 1 = 243.54017316473025 " " Order of pole (three term test) = -6421.068932556977 " " "NO COMPLEX POLE (six term test) for Equation 1" " " "TOP MAIN SOLVE Loop" x[1] = 3.0599999999999783 " " y[1] (analytic) = -5.21391170846281300E-2 " " y[1] (numeric) = -5.21391170846267500E-2 " " absolute error = 1.3808398868775384000000000000000E-15 " " relative error = 2.648376044872926000000000000E-12 "%" Correct digits = 15 h = 1.00E-2 " " "NO INFO (given) for Equation 1" Radius of convergence (ratio test) for eq 1 = 17.586309525924698 " " "Order of pole (ratio test) Not computed" Radius of convergence (three term test) for eq 1 = 243.496118854432 " " Order of pole (three term test) = -6420.075397093788 " " Radius of convergence (six term test) for eq 1 = 954.0908890948103 " " Order of pole (six term test) = 82394.9189227966 " " " " "TOP MAIN SOLVE Loop" x[1] = 3.069999999999978 " " y[1] (analytic) = -5.17131665111793600E-2 " " y[1] (numeric) = -5.17131665111779800E-2 " " absolute error = 1.3877787807814457000000000000000E-15 " " relative error = 2.6836082073632744000000000000E-12 "%" Correct digits = 15 h = 1.00E-2 " " "NO INFO (given) for Equation 1" Radius of convergence (ratio test) for eq 1 = 17.58525687709758 " " "Order of pole (ratio test) Not computed" Radius of convergence (three term test) for eq 1 = 243.42466819763916 " " Order of pole (three term test) = -6418.354465159736 " " Radius of convergence (six term test) for eq 1 = 1543.6671538331157 " " Order of pole (six term test) = 214510.32444385177 " " " " "TOP MAIN SOLVE Loop" x[1] = 3.079999999999978 " " y[1] (analytic) = -5.12905304203342700E-2 " " y[1] (numeric) = -5.129053042033287000E-2 " " absolute error = 1.394717674685353000000000000000E-15 " " relative error = 2.7192498561730866000000000000E-12 "%" Correct digits = 15 h = 1.00E-2 " " "NO INFO (given) for Equation 1" Radius of convergence (ratio test) for eq 1 = 17.584202683453963 " " "Order of pole (ratio test) Not computed" Radius of convergence (three term test) for eq 1 = 243.26638867994683 " " Order of pole (three term test) = -6414.345344298000 " " Radius of convergence (six term test) for eq 1 = 693.556525540196 " " Order of pole (six term test) = 43640.95151804947 " " " " "TOP MAIN SOLVE Loop" x[1] = 3.0899999999999777 " " y[1] (analytic) = -5.08711850243678500E-2 " " y[1] (numeric) = -5.08711850243664400E-2 " " absolute error = 1.4085954624931674000000000000000E-15 " " relative error = 2.7689456453951977000000000000E-12 "%" Correct digits = 15 h = 1.00E-2 " " "NO INFO (given) for Equation 1" Radius of convergence (ratio test) for eq 1 = 17.58314690335633 " " "Order of pole (ratio test) Not computed" Radius of convergence (three term test) for eq 1 = 242.8146268729468 " " Order of pole (three term test) = -6402.585027678080 " " "NO COMPLEX POLE (six term test) for Equation 1" " " "TOP MAIN SOLVE Loop" x[1] = 3.0999999999999774 " " y[1] (analytic) = -5.04551066807856800E-2 " " y[1] (numeric) = -5.04551066807842600E-2 " " absolute error = 1.4155343563970746000000000000000E-15 " " relative error = 2.8055323821882605000000000000E-12 "%" Correct digits = 15 h = 1.00E-2 " " "NO INFO (given) for Equation 1" Radius of convergence (ratio test) for eq 1 = 17.582089554283144 " " "Order of pole (ratio test) Not computed" Radius of convergence (three term test) for eq 1 = 243.04401174871887 " " Order of pole (three term test) = -6408.810429984114 " " Radius of convergence (six term test) for eq 1 = 511.46907416096286 " " Order of pole (six term test) = 23891.725099162657 " " " " "TOP MAIN SOLVE Loop" x[1] = 3.1099999999999772 " " y[1] (analytic) = -5.004227189178896000E-2 " " y[1] (numeric) = -5.00422718917875400E-2 " " absolute error = 1.4224732503009818000000000000000E-15 " " relative error = 2.8425433069404354000000000000E-12 "%" Correct digits = 15 h = 1.00E-2 " " "NO INFO (given) for Equation 1" Radius of convergence (ratio test) for eq 1 = 17.581030626941935 " " "Order of pole (ratio test) Not computed" Radius of convergence (three term test) for eq 1 = 242.61149393217863 " " Order of pole (three term test) = -6397.5555418559 " " "NO COMPLEX POLE (six term test) for Equation 1" " " "TOP MAIN SOLVE Loop" x[1] = 3.119999999999977 " " y[1] (analytic) = -4.96326573037357200E-2 " " y[1] (numeric) = -4.963265730373428400E-2 " " absolute error = 1.4363510381087963000000000000000E-15 " " relative error = 2.893963604081875000000000000E-12 "%" Correct digits = 15 h = 1.00E-2 " " "NO INFO (given) for Equation 1" Radius of convergence (ratio test) for eq 1 = 17.579970094644718 " " "Order of pole (ratio test) Not computed" Radius of convergence (three term test) for eq 1 = 242.28121516751622 " " Order of pole (three term test) = -6389.001584879702 " " "NO COMPLEX POLE (six term test) for Equation 1" " " "TOP MAIN SOLVE Loop" x[1] = 3.129999999999977 " " y[1] (analytic) = -4.92262397065984960E-2 " " y[1] (numeric) = -4.92262397065970500E-2 " " absolute error = 1.4432899320127035000000000000000E-15 " " relative error = 2.931952431498112000000000000E-12 "%" Correct digits = 15 h = 1.00E-2 " " "NO INFO (given) for Equation 1" Radius of convergence (ratio test) for eq 1 = 17.57890801610487 " " "Order of pole (ratio test) Not computed" Radius of convergence (three term test) for eq 1 = 242.0463469023206 " " Order of pole (three term test) = -6382.968165213083 " " "NO COMPLEX POLE (six term test) for Equation 1" " " "TOP MAIN SOLVE Loop" x[1] = 3.1399999999999766 " " y[1] (analytic) = -4.882299603341848600E-2 " " y[1] (numeric) = -4.88229960334170270E-2 " " absolute error = 1.457167719820518000000000000000E-15 " " relative error = 2.9845929955284030000000000000E-12 "%" Correct digits = 15 h = 1.00E-2 " " "NO INFO (given) for Equation 1" Radius of convergence (ratio test) for eq 1 = 17.57784429923005 " " "Order of pole (ratio test) Not computed" Radius of convergence (three term test) for eq 1 = 242.61616508314023 " " Order of pole (three term test) = -6398.190682795235 " " Radius of convergence (six term test) for eq 1 = 374.3128694834693 " " Order of pole (six term test) = 12933.719303305497 " " " " "TOP MAIN SOLVE Loop" x[1] = 3.1499999999999764 " " y[1] (analytic) = -4.84229033597563400E-2 " " y[1] (numeric) = -4.84229033597548900E-2 " " absolute error = 1.4502288259166107000000000000000E-15 " " relative error = 2.9949233220118676000000000000E-12 "%" Correct digits = 15 h = 1.00E-2 " " "NO INFO (given) for Equation 1" Radius of convergence (ratio test) for eq 1 = 17.57677901819434 " " "Order of pole (ratio test) Not computed" Radius of convergence (three term test) for eq 1 = 241.89842183087134 " " Order of pole (three term test) = -6379.399451711684 " " "NO COMPLEX POLE (six term test) for Equation 1" " " "TOP MAIN SOLVE Loop" x[1] = 3.159999999999976 " " y[1] (analytic) = -4.80259389031398360E-2 " " y[1] (numeric) = -4.80259389031383650E-2 " " absolute error = 1.4710455076283324000000000000000E-15 " " relative error = 3.063022902259509000000000000E-12 "%" Correct digits = 15 h = 1.00E-2 " " "NO INFO (given) for Equation 1" Radius of convergence (ratio test) for eq 1 = 17.57571214615218 " " "Order of pole (ratio test) Not computed" Radius of convergence (three term test) for eq 1 = 241.98559519141617 " " Order of pole (three term test) = -6381.8707056905505 " " Radius of convergence (six term test) for eq 1 = 970.8590718274742 " " Order of pole (six term test) = 83767.29982735931 " " " " "TOP MAIN SOLVE Loop" x[1] = 3.169999999999976 " " y[1] (analytic) = -4.7632080022508194E-2 " " y[1] (numeric) = -4.76320800225067200E-2 " " absolute error = 1.4779844015322396000000000000000E-15 " " relative error = 3.1029180351431823000000000000E-12 "%" Correct digits = 15 h = 1.00E-2 " " "NO INFO (given) for Equation 1" Radius of convergence (ratio test) for eq 1 = 17.574643662322682 " " "Order of pole (ratio test) Not computed" Radius of convergence (three term test) for eq 1 = 241.59750222961205 " " Order of pole (three term test) = -6371.785985989843 " " "NO COMPLEX POLE (six term test) for Equation 1" " " "TOP MAIN SOLVE Loop" x[1] = 3.1799999999999757 " " y[1] (analytic) = -4.72413042176536700E-2 " " y[1] (numeric) = -4.72413042176521800E-2 " " absolute error = 1.4918621893400540000000000000000E-15 " " relative error = 3.157961478935118000000000000E-12 "%" Correct digits = 15 h = 1.00E-2 " " "NO INFO (given) for Equation 1" Radius of convergence (ratio test) for eq 1 = 17.57357354875706 " " "Order of pole (ratio test) Not computed" Radius of convergence (three term test) for eq 1 = 241.79250851869404 " " Order of pole (three term test) = -6377.112841993162 " " Radius of convergence (six term test) for eq 1 = 465.6999574550446 " " Order of pole (six term test) = 19593.25727641955 " " " " "TOP MAIN SOLVE Loop" x[1] = 3.1899999999999755 " " y[1] (analytic) = -4.685358912866003400E-2 " " y[1] (numeric) = -4.685358912865853500E-2 " " absolute error = 1.4988010832439613000000000000000E-15 " " relative error = 3.1989034588753723000000000000E-12 "%" Correct digits = 15 h = 1.00E-2 " " "NO INFO (given) for Equation 1" Radius of convergence (ratio test) for eq 1 = 17.572501878382475 " " "Order of pole (ratio test) Not computed" Radius of convergence (three term test) for eq 1 = 241.29774966795716 " " Order of pole (three term test) = -6364.208414003794 " " "NO COMPLEX POLE (six term test) for Equation 1" " " "TOP MAIN SOLVE Loop" x[1] = 3.1999999999999753 " " y[1] (analytic) = -4.646891253533843600E-2 " " y[1] (numeric) = -4.64689125353369260E-2 " " absolute error = 1.5057399771478686000000000000000E-15 " " relative error = 3.2403167945942170000000000000E-12 "%" Correct digits = 15 h = 1.00E-2 " " "NO INFO (given) for Equation 1" Radius of convergence (ratio test) for eq 1 = 17.571428573796553 " " "Order of pole (ratio test) Not computed" Radius of convergence (three term test) for eq 1 = 241.3097280615362 " " Order of pole (three term test) = -6364.694572961915 " " Radius of convergence (six term test) for eq 1 = 995.6055462202321 " " Order of pole (six term test) = 87465.90995479569 " " " " "TOP MAIN SOLVE Loop" x[1] = 3.209999999999975 " " y[1] (analytic) = -4.608725235666051300E-2 " " y[1] (numeric) = -4.60872523566590100E-2 " " absolute error = 1.5057399771478686000000000000000E-15 " " relative error = 3.2671506764934305000000000000E-12 "%" Correct digits = 15 h = 1.00E-2 " " "NO INFO (given) for Equation 1" Radius of convergence (ratio test) for eq 1 = 17.570353639613277 " " "Order of pole (ratio test) Not computed" Radius of convergence (three term test) for eq 1 = 241.1963459430458 " " Order of pole (three term test) = -6361.870439101686 " " Radius of convergence (six term test) for eq 1 = 710.4099644741586 " " Order of pole (six term test) = 44694.37880232687 " " " " "TOP MAIN SOLVE Loop" x[1] = 3.219999999999975 " " y[1] (analytic) = -4.57085866501890200E-2 " " y[1] (numeric) = -4.570858665018750500E-2 " " absolute error = 1.519617764955683000000000000000E-15 " " relative error = 3.3245783261368870000000000000E-12 "%" Correct digits = 15 h = 1.00E-2 " " "NO INFO (given) for Equation 1" Radius of convergence (ratio test) for eq 1 = 17.569277108560648 " " "Order of pole (ratio test) Not computed" Radius of convergence (three term test) for eq 1 = 240.8743724440408 " " Order of pole (three term test) = -6353.532890993854 " " "NO COMPLEX POLE (six term test) for Equation 1" " " "TOP MAIN SOLVE Loop" x[1] = 3.2299999999999747 " " y[1] (analytic) = -4.53328936115058870E-2 " " y[1] (numeric) = -4.53328936115043660E-2 " " absolute error = 1.519617764955683000000000000000E-15 " " relative error = 3.3521305257469614000000000000E-12 "%" Correct digits = 15 h = 1.00E-2 " " "NO INFO (given) for Equation 1" Radius of convergence (ratio test) for eq 1 = 17.56819894184091 " " "Order of pole (ratio test) Not computed" Radius of convergence (three term test) for eq 1 = 240.78469195808728 " " Order of pole (three term test) = -6351.334005089011 " " Radius of convergence (six term test) for eq 1 = 1504.1759790560372 " " Order of pole (six term test) = 197903.24615816807 " " " " "TOP MAIN SOLVE Loop" x[1] = 3.2399999999999745 " " y[1] (analytic) = -4.49601515736381130E-2 " " y[1] (numeric) = -4.49601515736365800E-2 " " absolute error = 1.5334955527634975000000000000000E-15 " " relative error = 3.4107882182110916000000000000E-12 "%" Correct digits = 15 h = 1.00E-2 " " "NO INFO (given) for Equation 1" Radius of convergence (ratio test) for eq 1 = 17.56711915622536 " " "Order of pole (ratio test) Not computed" Radius of convergence (three term test) for eq 1 = 240.47084725919538 " " Order of pole (three term test) = -6343.211094666362 " " "NO COMPLEX POLE (six term test) for Equation 1" " " "TOP MAIN SOLVE Loop" x[1] = 3.2499999999999742 " " y[1] (analytic) = -4.45903390064812600E-2 " " y[1] (numeric) = -4.459033900647973000E-2 " " absolute error = 1.5334955527634975000000000000000E-15 " " relative error = 3.4390757884585760000000000000E-12 "%" Correct digits = 15 h = 1.00E-2 " " "NO INFO (given) for Equation 1" Radius of convergence (ratio test) for eq 1 = 17.566037739393575 " " "Order of pole (ratio test) Not computed" Radius of convergence (three term test) for eq 1 = 240.30167106840915 " " Order of pole (three term test) = -6338.911098305942 " " "NO COMPLEX POLE (six term test) for Equation 1" " " "TOP MAIN SOLVE Loop" x[1] = 3.259999999999974 " " y[1] (analytic) = -4.42234345162209330E-2 " " y[1] (numeric) = -4.422343451621938400E-2 " " absolute error = 1.547373340571312000000000000000E-15 " " relative error = 3.498989523311997000000000000E-12 "%" Correct digits = 15 h = 1.00E-2 " " "NO INFO (given) for Equation 1" Radius of convergence (ratio test) for eq 1 = 17.56495468188558 " " "Order of pole (ratio test) Not computed" Radius of convergence (three term test) for eq 1 = 240.43754140761015 " " Order of pole (three term test) = -6342.672019182214 " " Radius of convergence (six term test) for eq 1 = 786.9277560704411 " " Order of pole (six term test) = 54238.94645913325 " " " " "TOP MAIN SOLVE Loop" x[1] = 3.269999999999974 " " y[1] (analytic) = -4.385941684475211400E-2 " " y[1] (numeric) = -4.38594168447505600E-2 " " absolute error = 1.5543122344752192000000000000000E-15 " " relative error = 3.543850662622744000000000000E-12 "%" Correct digits = 15 h = 1.00E-2 " " "NO INFO (given) for Equation 1" Radius of convergence (ratio test) for eq 1 = 17.563869994144532 " " "Order of pole (ratio test) Not computed" Radius of convergence (three term test) for eq 1 = 240.04109767365256 " " Order of pole (three term test) = -6332.3665674120175 " " "NO COMPLEX POLE (six term test) for Equation 1" " " "TOP MAIN SOLVE Loop" x[1] = 3.2799999999999736 " " y[1] (analytic) = -4.34982648690966500E-2 " " y[1] (numeric) = -4.34982648690950900E-2 " " absolute error = 1.5612511283791264000000000000000E-15 " " relative error = 3.5892262210401815000000000000E-12 "%" Correct digits = 15 h = 1.00E-2 " " "NO INFO (given) for Equation 1" Radius of convergence (ratio test) for eq 1 = 17.562783662300994 " " "Order of pole (ratio test) Not computed" Radius of convergence (three term test) for eq 1 = 240.18123998271895 " " Order of pole (three term test) = -6336.240536213748 " " Radius of convergence (six term test) for eq 1 = 573.2863019893298 " " Order of pole (six term test) = 28921.32343707349 " " " " "TOP MAIN SOLVE Loop" x[1] = 3.2899999999999734 " " y[1] (analytic) = -4.31399576008188570E-2 " " y[1] (numeric) = -4.31399576008172900E-2 " " absolute error = 1.5681900222830336000000000000000E-15 " " relative error = 3.6351218441004385000000000000E-12 "%" Correct digits = 15 h = 1.00E-2 " " "NO INFO (given) for Equation 1" Radius of convergence (ratio test) for eq 1 = 17.56169567771797 " " "Order of pole (ratio test) Not computed" Radius of convergence (three term test) for eq 1 = 239.89620274604724 " " Order of pole (three term test) = -6328.875349196818 " " "NO COMPLEX POLE (six term test) for Equation 1" " " "TOP MAIN SOLVE Loop" x[1] = 3.299999999999973 " " y[1] (analytic) = -4.278447418543935300E-2 " " y[1] (numeric) = -4.278447418543779000E-2 " " absolute error = 1.5681900222830336000000000000000E-15 " " relative error = 3.6653249856152925000000000000E-12 "%" Correct digits = 15 h = 1.00E-2 " " "NO INFO (given) for Equation 1" Radius of convergence (ratio test) for eq 1 = 17.56060605717845 " " "Order of pole (ratio test) Not computed" Radius of convergence (three term test) for eq 1 = 239.7154233159503 " " Order of pole (three term test) = -6324.271505743226 " " Radius of convergence (six term test) for eq 1 = 1238.0664307112993 " " Order of pole (six term test) = 132622.46164504747 " " " " "TOP MAIN SOLVE Loop" x[1] = 3.309999999999973 " " y[1] (analytic) = -4.2431793901847303E-2 " " y[1] (numeric) = -4.24317939018457160E-2 " " absolute error = 1.582067810090848000000000000000E-15 " " relative error = 3.7284961690530166000000000000E-12 "%" Correct digits = 15 h = 1.00E-2 " " "NO INFO (given) for Equation 1" Radius of convergence (ratio test) for eq 1 = 17.559514777685315 " " "Order of pole (ratio test) Not computed" Radius of convergence (three term test) for eq 1 = 239.64649039813366 " " Order of pole (three term test) = -6322.62051188933 " " Radius of convergence (six term test) for eq 1 = 847.078609237533 " " Order of pole (six term test) = 62229.72274428043 " " " " "TOP MAIN SOLVE Loop" x[1] = 3.3199999999999728 " " y[1] (analytic) = -4.208189616171098500E-2 " " y[1] (numeric) = -4.208189616170940000E-2 " " absolute error = 1.5890067039947553000000000000000E-15 " " relative error = 3.775986466694777000000000000E-12 "%" Correct digits = 15 h = 1.00E-2 " " "NO INFO (given) for Equation 1" Radius of convergence (ratio test) for eq 1 = 17.558421861992223 " " "Order of pole (ratio test) Not computed" Radius of convergence (three term test) for eq 1 = 239.35689917783495 " " Order of pole (three term test) = -6315.135876988706 " " "NO COMPLEX POLE (six term test) for Equation 1" " " "TOP MAIN SOLVE Loop" x[1] = 3.3299999999999725 " " y[1] (analytic) = -4.17347605088870300E-2 " " y[1] (numeric) = -4.173476050888544000E-2 " " absolute error = 1.5959455978986625000000000000000E-15 " " relative error = 3.824020021772547300000000000E-12 "%" Correct digits = 15 h = 1.00E-2 " " "NO INFO (given) for Equation 1" Radius of convergence (ratio test) for eq 1 = 17.557327248758934 " " "Order of pole (ratio test) Not computed" Radius of convergence (three term test) for eq 1 = 239.33403883154165 " " Order of pole (three term test) = -6314.70702662881 " " Radius of convergence (six term test) for eq 1 = 599.9572582184343 " " Order of pole (six term test) = 31345.532897547706 " " " " "TOP MAIN SOLVE Loop" x[1] = 3.3399999999999723 " " y[1] (analytic) = -4.13903666188281600E-2 " " y[1] (numeric) = -4.13903666188265600E-2 " " absolute error = 1.6028844918025698000000000000000E-15 " " relative error = 3.8726027883827197000000000000E-12 "%" Correct digits = 15 h = 1.00E-2 " " "NO INFO (given) for Equation 1" Radius of convergence (ratio test) for eq 1 = 17.55623101052185 " " "Order of pole (ratio test) Not computed" Radius of convergence (three term test) for eq 1 = 239.2250505769549 " " Order of pole (three term test) = -6311.9927148235465 " " Radius of convergence (six term test) for eq 1 = 891.4733201653669 " " Order of pole (six term test) = 68542.08495635849 " " " " "TOP MAIN SOLVE Loop" x[1] = 3.349999999999972 " " y[1] (analytic) = -4.10486942979896300E-2 " " y[1] (numeric) = -4.10486942979880250E-2 " " absolute error = 1.6028844918025698000000000000000E-15 " " relative error = 3.9048367291942615000000000000E-12 "%" Correct digits = 15 h = 1.00E-2 " " "NO INFO (given) for Equation 1" Radius of convergence (ratio test) for eq 1 = 17.555133068120963 " " "Order of pole (ratio test) Not computed" Radius of convergence (three term test) for eq 1 = 239.10824325075927 " " Order of pole (three term test) = -6309.0793633463445 " " Radius of convergence (six term test) for eq 1 = 581.9246887086182 " " Order of pole (six term test) = 29422.432847912252 " " " " "TOP MAIN SOLVE Loop" x[1] = 3.359999999999972 " " y[1] (analytic) = -4.07097234832345400E-2 " " y[1] (numeric) = -4.07097234832329300E-2 " " absolute error = 1.609823385706477000000000000000E-15 " " relative error = 3.954395284383225000000000000E-12 "%" Correct digits = 15 h = 1.00E-2 " " "NO INFO (given) for Equation 1" Radius of convergence (ratio test) for eq 1 = 17.55403346916003 " " "Order of pole (ratio test) Not computed" Radius of convergence (three term test) for eq 1 = 238.6884898076021 " " Order of pole (three term test) = -6298.15977532534 " " Radius of convergence (six term test) for eq 1 = 876.6387137700488 " " Order of pole (six term test) = 66012.29225864098 " " " " "TOP MAIN SOLVE Loop" x[1] = 3.3699999999999717 " " y[1] (analytic) = -4.03734342412379150E-2 " " y[1] (numeric) = -4.037343424123629500E-2 " " absolute error = 1.6237011735142914000000000000000E-15 " " relative error = 4.021706857564828000000000000E-12 "%" Correct digits = 15 h = 1.00E-2 " " "NO INFO (given) for Equation 1" Radius of convergence (ratio test) for eq 1 = 17.55293221179405 " " "Order of pole (ratio test) Not computed" Radius of convergence (three term test) for eq 1 = 238.6879696298201 " " Order of pole (three term test) = -6298.313784996664 " " Radius of convergence (six term test) for eq 1 = 703.7806393539571 " " Order of pole (six term test) = 42664.18755716744 " " " " "TOP MAIN SOLVE Loop" x[1] = 3.3799999999999715 " " y[1] (analytic) = -4.00398067678897740E-2 " " y[1] (numeric) = -4.003980676788815000E-2 " " absolute error = 1.6306400674181987000000000000000E-15 " " relative error = 4.0725472949232680000000000000E-12 "%" Correct digits = 15 h = 1.00E-2 " " "NO INFO (given) for Equation 1" Radius of convergence (ratio test) for eq 1 = 17.55182926571731 " " "Order of pole (ratio test) Not computed" Radius of convergence (three term test) for eq 1 = 238.34743192039943 " " Order of pole (three term test) = -6289.483855888784 " " Radius of convergence (six term test) for eq 1 = 2990.98612242256 " " Order of pole (six term test) = 761170.0205469603 " " " " "TOP MAIN SOLVE Loop" x[1] = 3.3899999999999713 " " y[1] (analytic) = -3.97088213876972400E-2 " " y[1] (numeric) = -3.9708821387695603E-2 " " absolute error = 1.6375789613221060000000000000000E-15 " " relative error = 4.123967682983075000000000000E-12 "%" Correct digits = 15 h = 1.00E-2 " " "NO INFO (given) for Equation 1" Radius of convergence (ratio test) for eq 1 = 17.550724638612994 " " "Order of pole (ratio test) Not computed" Radius of convergence (three term test) for eq 1 = 238.54128669862163 " " Order of pole (three term test) = -6294.776174969671 " " Radius of convergence (six term test) for eq 1 = 590.1340257490052 " " Order of pole (six term test) = 30049.890607335346 " " " " "TOP MAIN SOLVE Loop" x[1] = 3.399999999999971 " " y[1] (analytic) = -3.93804585531857200E-2 " " y[1] (numeric) = -3.938045855318407000E-2 " " absolute error = 1.6445178552260130000000000000000E-15 " " relative error = 4.17597436811202000000000000E-12 "%" Correct digits = 15 h = 1.00E-2 " " "NO INFO (given) for Equation 1" Radius of convergence (ratio test) for eq 1 = 17.5496183153281 " " "Order of pole (ratio test) Not computed" Radius of convergence (three term test) for eq 1 = 238.20525034276397 " " Order of pole (three term test) = -6286.066727517703 " " Radius of convergence (six term test) for eq 1 = 966.1799556326743 " " Order of pole (six term test) = 79585.1693797421 " " " " "TOP MAIN SOLVE Loop" x[1] = 3.409999999999971 " " y[1] (analytic) = -3.90546988442993070E-2 " " y[1] (numeric) = -3.90546988442976600E-2 " " absolute error = 1.6514567491299204000000000000000E-15 " " relative error = 4.228573764488209300000000000E-12 "%" Correct digits = 15 h = 1.00E-2 " " "NO INFO (given) for Equation 1" Radius of convergence (ratio test) for eq 1 = 17.548510316109187 " " "Order of pole (ratio test) Not computed" Radius of convergence (three term test) for eq 1 = 237.92440121382813 " " Order of pole (three term test) = -6278.81216916069 " " "NO COMPLEX POLE (six term test) for Equation 1" " " "TOP MAIN SOLVE Loop" x[1] = 3.4199999999999706 " " y[1] (analytic) = -3.87315229678004100E-2 " " y[1] (numeric) = -3.87315229677987500E-2 " " absolute error = 1.6583956430338276000000000000000E-15 " " relative error = 4.281772354814296000000000000E-12 "%" Correct digits = 15 h = 1.00E-2 " " "NO INFO (given) for Equation 1" Radius of convergence (ratio test) for eq 1 = 17.547400621680346 " " "Order of pole (ratio test) Not computed" Radius of convergence (three term test) for eq 1 = 237.69176547612685 " " Order of pole (three term test) = -6272.832428030606 " " "NO COMPLEX POLE (six term test) for Equation 1" " " "TOP MAIN SOLVE Loop" x[1] = 3.4299999999999704 " " y[1] (analytic) = -3.8410911756668700E-2 " " y[1] (numeric) = -3.841091175666703000E-2 " " absolute error = 1.6653345369377348000000000000000E-15 " " relative error = 4.335576691039124700000000000E-12 "%" Correct digits = 15 h = 1.00E-2 " " "NO INFO (given) for Equation 1" Radius of convergence (ratio test) for eq 1 = 17.546289203241518 " " "Order of pole (ratio test) Not computed" Radius of convergence (three term test) for eq 1 = 237.5413450193703 " " Order of pole (three term test) = -6269.031065955061 " " "NO COMPLEX POLE (six term test) for Equation 1" " " "TOP MAIN SOLVE Loop" x[1] = 3.43999999999997 " " y[1] (analytic) = -3.809284616949954500E-2 " " y[1] (numeric) = -3.80928461694978700E-2 " " absolute error = 1.6792123247455493000000000000000E-15 " " relative error = 4.408209135315473000000000000E-12 "%" Correct digits = 15 h = 1.00E-2 " " "NO INFO (given) for Equation 1" Radius of convergence (ratio test) for eq 1 = 17.54517611915652 " " "Order of pole (ratio test) Not computed" Radius of convergence (three term test) for eq 1 = 237.2990187186576 " " Order of pole (three term test) = -6262.793471265011 " " "NO COMPLEX POLE (six term test) for Equation 1" " " "TOP MAIN SOLVE Loop" x[1] = 3.44999999999997 " " y[1] (analytic) = -3.77773072899017960E-2 " " y[1] (numeric) = -3.777730728990011400E-2 " " absolute error = 1.6792123247455493000000000000000E-15 " " relative error = 4.4450291595939595000000000000E-12 "%" Correct digits = 15 h = 1.00E-2 " " "NO INFO (given) for Equation 1" Radius of convergence (ratio test) for eq 1 = 17.544061311196792 " " "Order of pole (ratio test) Not computed" Radius of convergence (three term test) for eq 1 = 237.27935826411664 " " Order of pole (three term test) = -6262.446480590072 " " "NO COMPLEX POLE (six term test) for Equation 1" " " "TOP MAIN SOLVE Loop" x[1] = 3.4599999999999698 " " y[1] (analytic) = -3.746427632589524600E-2 " " y[1] (numeric) = -3.74642763258935600E-2 " " absolute error = 1.6861512186494565000000000000000E-15 " " relative error = 4.5006907486532480000000000000E-12 "%" Correct digits = 15 h = 1.00E-2 " " "NO INFO (given) for Equation 1" Radius of convergence (ratio test) for eq 1 = 17.54294478063783 " " "Order of pole (ratio test) Not computed" Radius of convergence (three term test) for eq 1 = 236.87205887332763 " " Order of pole (three term test) = -6251.85297084726 " " "NO COMPLEX POLE (six term test) for Equation 1" " " "TOP MAIN SOLVE Loop" x[1] = 3.4699999999999696 " " y[1] (analytic) = -3.71537346093076200E-2 " " y[1] (numeric) = -3.71537346093059200E-2 " " absolute error = 1.700029006457271000000000000000E-15 " " relative error = 4.575661166593427000000000000E-12 "%" Correct digits = 15 h = 1.00E-2 " " "NO INFO (given) for Equation 1" Radius of convergence (ratio test) for eq 1 = 17.541826547138328 " " "Order of pole (ratio test) Not computed" Radius of convergence (three term test) for eq 1 = 236.7481370302944 " " Order of pole (three term test) = -6248.750298779278 " " "NO COMPLEX POLE (six term test) for Equation 1" " " "TOP MAIN SOLVE Loop" x[1] = 3.4799999999999693 " " y[1] (analytic) = -3.68456635951712300E-2 " " y[1] (numeric) = -3.684566359516952500E-2 " " absolute error = 1.7069679003611782000000000000000E-15 " " relative error = 4.632751140312975600000000000E-12 "%" Correct digits = 15 h = 1.00E-2 " " "NO INFO (given) for Equation 1" Radius of convergence (ratio test) for eq 1 = 17.540706609833773 " " "Order of pole (ratio test) Not computed" Radius of convergence (three term test) for eq 1 = 236.48056718601504 " " Order of pole (three term test) = -6241.845558563268 " " "NO COMPLEX POLE (six term test) for Equation 1" " " "TOP MAIN SOLVE Loop" x[1] = 3.489999999999969 " " y[1] (analytic) = -3.654004486111950000E-2 " " y[1] (numeric) = -3.65400448611177800E-2 " " absolute error = 1.7139067942650854000000000000000E-15 " " relative error = 4.690489025887243400000000000E-12 "%" Correct digits = 15 h = 1.00E-2 " " "NO INFO (given) for Equation 1" Radius of convergence (ratio test) for eq 1 = 17.539584929010903 " " "Order of pole (ratio test) Not computed" Radius of convergence (three term test) for eq 1 = 236.65285120446532 " " Order of pole (three term test) = -6246.569702104662 " " "NO COMPLEX POLE (six term test) for Equation 1" " " "TOP MAIN SOLVE Loop" x[1] = 3.499999999999969 " " y[1] (analytic) = -3.62368601067831400E-2 " " y[1] (numeric) = -3.62368601067814270E-2 " " absolute error = 1.7139067942650854000000000000000E-15 " " relative error = 4.7297331755966926000000000000E-12 "%" Correct digits = 15 h = 1.00E-2 " " "NO INFO (given) for Equation 1" Radius of convergence (ratio test) for eq 1 = 17.538461532537433 " " "Order of pole (ratio test) Not computed" Radius of convergence (three term test) for eq 1 = 236.12469397736336 " " Order of pole (three term test) = -6232.782131011281 " " "NO COMPLEX POLE (six term test) for Equation 1" " " "TOP MAIN SOLVE Loop" x[1] = 3.5099999999999687 " " y[1] (analytic) = -3.59360911531863670E-2 " " y[1] (numeric) = -3.59360911531846460E-2 " " absolute error = 1.7208456881689926000000000000000E-15 " " relative error = 4.7886279028886797000000000000E-12 "%" Correct digits = 15 h = 1.00E-2 " " "NO INFO (given) for Equation 1" Radius of convergence (ratio test) for eq 1 = 17.53733640940389 " " "Order of pole (ratio test) Not computed" Radius of convergence (three term test) for eq 1 = 236.39306176312303 " " Order of pole (three term test) = -6240.045517475833 " " Radius of convergence (six term test) for eq 1 = 3970.9311510634207 " " Order of pole (six term test) = 1312204.7617713087 " " " " "TOP MAIN SOLVE Loop" x[1] = 3.5199999999999685 " " y[1] (analytic) = -3.563771994214290400E-2 " " y[1] (numeric) = -3.563771994214117700E-2 " " absolute error = 1.7277845820729000000000000000000E-15 " " relative error = 4.8481905825566907000000000000E-12 "%" Correct digits = 15 h = 1.00E-2 " " "NO INFO (given) for Equation 1" Radius of convergence (ratio test) for eq 1 = 17.53620955816083 " " "Order of pole (ratio test) Not computed" Radius of convergence (three term test) for eq 1 = 236.0481273626688 " " Order of pole (three term test) = -6231.095051531520 " " "NO COMPLEX POLE (six term test) for Equation 1" " " "TOP MAIN SOLVE Loop" x[1] = 3.5299999999999683 " " y[1] (analytic) = -3.53417285356520900E-2 " " y[1] (numeric) = -3.534172853565034600E-2 " " absolute error = 1.7416623698807143000000000000000E-15 " " relative error = 4.9280622143983627000000000000E-12 "%" Correct digits = 15 h = 1.00E-2 " " "NO INFO (given) for Equation 1" Radius of convergence (ratio test) for eq 1 = 17.535080962925715 " " "Order of pole (ratio test) Not computed" Radius of convergence (three term test) for eq 1 = 235.9091002191993 " " Order of pole (three term test) = -6227.5925673168185 " " "NO COMPLEX POLE (six term test) for Equation 1" " " "TOP MAIN SOLVE Loop" x[1] = 3.539999999999968 " " y[1] (analytic) = -3.504809911529497300E-2 " " y[1] (numeric) = -3.50480991152932300E-2 " " absolute error = 1.7416623698807143000000000000000E-15 " " relative error = 4.96934901990348950000000000E-12 "%" Correct digits = 15 h = 1.00E-2 " " "NO INFO (given) for Equation 1" Radius of convergence (ratio test) for eq 1 = 17.533950617180736 " " "Order of pole (ratio test) Not computed" Radius of convergence (three term test) for eq 1 = 235.9776421808564 " " Order of pole (three term test) = -6229.578592370238 " " Radius of convergence (six term test) for eq 1 = 760.309278929434 " " Order of pole (six term test) = 48301.56609577973 " " " " "TOP MAIN SOLVE Loop" x[1] = 3.549999999999968 " " y[1] (analytic) = -3.47568139816306400E-2 " " y[1] (numeric) = -3.475681398162889000E-2 " " absolute error = 1.7486012637846216000000000000000E-15 " " relative error = 5.030959583087151000000000000E-12 "%" Correct digits = 15 h = 1.00E-2 " " "NO INFO (given) for Equation 1" Radius of convergence (ratio test) for eq 1 = 17.53281853735587 " " "Order of pole (ratio test) Not computed" Radius of convergence (three term test) for eq 1 = 235.88211954877139 " " Order of pole (three term test) = -6227.224632442355 " " Radius of convergence (six term test) for eq 1 = 639.1318797430647 " " Order of pole (six term test) = 34209.17188210063 " " " " "TOP MAIN SOLVE Loop" x[1] = 3.5599999999999676 " " y[1] (analytic) = -3.44678555535925600E-2 " " y[1] (numeric) = -3.4467855553590800E-2 " " absolute error = 1.762479051592436000000000000000E-15 " " relative error = 5.113399204229676000000000000E-12 "%" Correct digits = 15 h = 1.00E-2 " " "NO INFO (given) for Equation 1" Radius of convergence (ratio test) for eq 1 = 17.531684709931298 " " "Order of pole (ratio test) Not computed" Radius of convergence (three term test) for eq 1 = 235.0895770148485 " " Order of pole (three term test) = -6206.436968305876 " " "NO COMPLEX POLE (six term test) for Equation 1" " " "TOP MAIN SOLVE Loop" x[1] = 3.5699999999999674 " " y[1] (analytic) = -3.418120636788525300E-2 " " y[1] (numeric) = -3.41812063678834930E-2 " " absolute error = 1.762479051592436000000000000000E-15 " " relative error = 5.156281006068769000000000000E-12 "%" Correct digits = 15 h = 1.00E-2 " " "NO INFO (given) for Equation 1" Radius of convergence (ratio test) for eq 1 = 17.530549111460406 " " "Order of pole (ratio test) Not computed" Radius of convergence (three term test) for eq 1 = 234.91366595296935 " " Order of pole (three term test) = -6201.958281677358 " " "NO COMPLEX POLE (six term test) for Equation 1" " " "TOP MAIN SOLVE Loop" x[1] = 3.579999999999967 " " y[1] (analytic) = -3.3896849078381300E-2 " " y[1] (numeric) = -3.38968490783795300E-2 " " absolute error = 1.7694179454963432000000000000000E-15 " " relative error = 5.220007149941381000000000000E-12 "%" Correct digits = 15 h = 1.00E-2 " " "NO INFO (given) for Equation 1" Radius of convergence (ratio test) for eq 1 = 17.529411768431707 " " "Order of pole (ratio test) Not computed" Radius of convergence (three term test) for eq 1 = 235.1450589019749 " " Order of pole (three term test) = -6208.249642856622 " " "NO COMPLEX POLE (six term test) for Equation 1" " " "TOP MAIN SOLVE Loop" x[1] = 3.589999999999967 " " y[1] (analytic) = -3.36147664555185600E-2 " " y[1] (numeric) = -3.36147664555167800E-2 " " absolute error = 1.7763568394002505000000000000000E-15 " " relative error = 5.284453907335194000000000000E-12 "%" Correct digits = 15 h = 1.00E-2 " " "NO INFO (given) for Equation 1" Radius of convergence (ratio test) for eq 1 = 17.52827265911692 " " "Order of pole (ratio test) Not computed" Radius of convergence (three term test) for eq 1 = 235.09750198716154 " " Order of pole (three term test) = -6207.163301156707 " " "NO COMPLEX POLE (six term test) for Equation 1" " " "TOP MAIN SOLVE Loop" x[1] = 3.599999999999967 " " y[1] (analytic) = -3.333494138569786000E-2 " " y[1] (numeric) = -3.33349413856960700E-2 " " absolute error = 1.7832957333041577000000000000000E-15 " " relative error = 5.349629125399541000000000000E-12 "%" Correct digits = 15 h = 1.00E-2 " " "NO INFO (given) for Equation 1" Radius of convergence (ratio test) for eq 1 = 17.527131784755365 " " "Order of pole (ratio test) Not computed" Radius of convergence (three term test) for eq 1 = 235.04345361268182 " " Order of pole (three term test) = -6205.905824355023 " " Radius of convergence (six term test) for eq 1 = 1139.7487416909821 " " Order of pole (six term test) = 106937.9993891476 " " " " "TOP MAIN SOLVE Loop" x[1] = 3.6099999999999666 " " y[1] (analytic) = -3.30573568706811260E-2 " " y[1] (numeric) = -3.305735687067934400E-2 " " absolute error = 1.7832957333041577000000000000000E-15 " " relative error = 5.3945502669203990000000000000E-12 "%" Correct digits = 15 h = 1.00E-2 " " "NO INFO (given) for Equation 1" Radius of convergence (ratio test) for eq 1 = 17.5259891354943 " " "Order of pole (ratio test) Not computed" Radius of convergence (three term test) for eq 1 = 234.92714750116792 " " Order of pole (three term test) = -6203.0033405905015 " " Radius of convergence (six term test) for eq 1 = 771.6293173654317 " " Order of pole (six term test) = 49174.004621662396 " " " " "TOP MAIN SOLVE Loop" x[1] = 3.6199999999999664 " " y[1] (analytic) = -3.27819960269900500E-2 " " y[1] (numeric) = -3.27819960269882700E-2 " " absolute error = 1.7832957333041577000000000000000E-15 " " relative error = 5.4398631853775350000000000000E-12 "%" Correct digits = 15 h = 1.00E-2 " " "NO INFO (given) for Equation 1" Radius of convergence (ratio test) for eq 1 = 17.524844705863387 " " "Order of pole (ratio test) Not computed" Radius of convergence (three term test) for eq 1 = 234.79441368992394 " " Order of pole (three term test) = -6199.668214828864 " " Radius of convergence (six term test) for eq 1 = 656.232083177538 " " Order of pole (six term test) = 35609.01042127224 " " " " "TOP MAIN SOLVE Loop" x[1] = 3.629999999999966 " " y[1] (analytic) = -3.25088420853051900E-2 " " y[1] (numeric) = -3.25088420853033900E-2 " " absolute error = 1.797173521111972100000000000000E-15 " " relative error = 5.528260638739697000000000000E-12 "%" Correct digits = 15 h = 1.00E-2 " " "NO INFO (given) for Equation 1" Radius of convergence (ratio test) for eq 1 = 17.523698522409905 " " "Order of pole (ratio test) Not computed" Radius of convergence (three term test) for eq 1 = 234.48563221908856 " " Order of pole (three term test) = -6191.670552447678 " " Radius of convergence (six term test) for eq 1 = 1846.4209945378177 " " Order of pole (six term test) = 278583.2334104569 " " " " "TOP MAIN SOLVE Loop" x[1] = 3.639999999999966 " " y[1] (analytic) = -3.22378783898657430E-2 " " y[1] (numeric) = -3.223787838986394400E-2 " " absolute error = 1.797173521111972100000000000000E-15 " " relative error = 5.574726411515124000000000000E-12 "%" Correct digits = 15 h = 1.00E-2 " " "NO INFO (given) for Equation 1" Radius of convergence (ratio test) for eq 1 = 17.522550535746777 " " "Order of pole (ratio test) Not computed" Radius of convergence (three term test) for eq 1 = 234.25898577653268 " " Order of pole (three term test) = -6185.849755537869 " " Radius of convergence (six term test) for eq 1 = 5563.84408086066 " " Order of pole (six term test) = 2521460.2641546824 " " " " "TOP MAIN SOLVE Loop" x[1] = 3.6499999999999657 " " y[1] (analytic) = -3.196908839786999400E-2 " " y[1] (numeric) = -3.19690883978681900E-2 " " absolute error = 1.8041124150158794000000000000000E-15 " " relative error = 5.6433026571257560000000000000E-12 "%" Correct digits = 15 h = 1.00E-2 " " "NO INFO (given) for Equation 1" Radius of convergence (ratio test) for eq 1 = 17.52140078253575 " " "Order of pole (ratio test) Not computed" Radius of convergence (three term test) for eq 1 = 234.02968218350935 " " Order of pole (three term test) = -6179.9575102924 " " "NO COMPLEX POLE (six term test) for Equation 1" " " "TOP MAIN SOLVE Loop" x[1] = 3.6599999999999655 " " y[1] (analytic) = -3.17024556788763700E-2 " " y[1] (numeric) = -3.170245567887456400E-2 " " absolute error = 1.8041124150158794000000000000000E-15 " " relative error = 5.6907655144770870000000000000E-12 "%" Correct digits = 15 h = 1.00E-2 " " "NO INFO (given) for Equation 1" Radius of convergence (ratio test) for eq 1 = 17.520249214170043 " " "Order of pole (ratio test) Not computed" Radius of convergence (three term test) for eq 1 = 233.9264252332522 " " Order of pole (three term test) = -6177.3985159807025 " " "NO COMPLEX POLE (six term test) for Equation 1" " " "TOP MAIN SOLVE Loop" x[1] = 3.6699999999999653 " " y[1] (analytic) = -3.14379639142052860E-2 " " y[1] (numeric) = -3.143796391420347600E-2 " " absolute error = 1.8110513089197866000000000000000E-15 " " relative error = 5.760714382973957000000000000E-12 "%" Correct digits = 15 h = 1.00E-2 " " "NO INFO (given) for Equation 1" Radius of convergence (ratio test) for eq 1 = 17.51909587476729 " " "Order of pole (ratio test) Not computed" Radius of convergence (three term test) for eq 1 = 233.8558891752399 " " Order of pole (three term test) = -6175.704133943890 " " "NO COMPLEX POLE (six term test) for Equation 1" " " "TOP MAIN SOLVE Loop" x[1] = 3.679999999999965 " " y[1] (analytic) = -3.11755968963417500E-2 " " y[1] (numeric) = -3.117559689633993000E-2 " " absolute error = 1.817990202823693800000000000000E-15 " " relative error = 5.831452750907948000000000000E-12 "%" Correct digits = 15 h = 1.00E-2 " " "NO INFO (given) for Equation 1" Radius of convergence (ratio test) for eq 1 = 17.517940716247693 " " "Order of pole (ratio test) Not computed" Radius of convergence (three term test) for eq 1 = 233.6775937894087 " " Order of pole (three term test) = -6171.161238247864 " " "NO COMPLEX POLE (six term test) for Equation 1" " " "TOP MAIN SOLVE Loop" x[1] = 3.689999999999965 " " y[1] (analytic) = -3.09153385283387870E-2 " " y[1] (numeric) = -3.091533852833696600E-2 " " absolute error = 1.824929096727601000000000000000E-15 " " relative error = 5.902989207298395000000000000E-12 "%" Correct digits = 15 h = 1.00E-2 " " "NO INFO (given) for Equation 1" Radius of convergence (ratio test) for eq 1 = 17.51678376318723 " " "Order of pole (ratio test) Not computed" Radius of convergence (three term test) for eq 1 = 233.31886178129434 " " Order of pole (three term test) = -6161.846388853696 " " "NO COMPLEX POLE (six term test) for Equation 1" " " "TOP MAIN SOLVE Loop" x[1] = 3.6999999999999647 " " y[1] (analytic) = -3.065717282322175700E-2 " " y[1] (numeric) = -3.065717282321992500E-2 " " absolute error = 1.8318679906315083000000000000000E-15 " " relative error = 5.97533243262383000000000000E-12 "%" Correct digits = 15 h = 1.00E-2 " " "NO INFO (given) for Equation 1" Radius of convergence (ratio test) for eq 1 = 17.515625006736357 " " "Order of pole (ratio test) Not computed" Radius of convergence (three term test) for eq 1 = 233.32419307983156 " " Order of pole (three term test) = -6162.159034030808 " " "NO COMPLEX POLE (six term test) for Equation 1" " " "TOP MAIN SOLVE Loop" x[1] = 3.7099999999999644 " " y[1] (analytic) = -3.040108390339353000E-2 " " y[1] (numeric) = -3.040108390339168500E-2 " " absolute error = 1.8388068845354155000000000000000E-15 " " relative error = 6.04849119978303900000000000E-12 "%" Correct digits = 15 h = 1.00E-2 " " "NO INFO (given) for Equation 1" Radius of convergence (ratio test) for eq 1 = 17.51446441491415 " " "Order of pole (ratio test) Not computed" Radius of convergence (three term test) for eq 1 = 233.40254086038692 " " Order of pole (three term test) = -6164.405572656012 " " Radius of convergence (six term test) for eq 1 = 702.6862200569335 " " Order of pole (six term test) = 40188.61039866625 " " " " "TOP MAIN SOLVE Loop" x[1] = 3.7199999999999642 " " y[1] (analytic) = -3.014705600004065600E-2 " " y[1] (numeric) = -3.014705600003881300E-2 " " absolute error = 1.842276331487369000000000000000E-15 " " relative error = 6.110965964586673000000000000E-12 "%" Correct digits = 15 h = 1.00E-2 " " "NO INFO (given) for Equation 1" Radius of convergence (ratio test) for eq 1 = 17.51330201855477 " " "Order of pole (ratio test) Not computed" Radius of convergence (three term test) for eq 1 = 232.9673151124811 " " Order of pole (three term test) = -6153.068868683098 " " Radius of convergence (six term test) for eq 1 = 1016.3288287463766 " " Order of pole (six term test) = 83418.28520850842 " " " " "TOP MAIN SOLVE Loop" x[1] = 3.729999999999964 " " y[1] (analytic) = -2.989507345254054000E-2 " " y[1] (numeric) = -2.989507345253869000E-2 " " absolute error = 1.8492152253912764000000000000000E-15 " " relative error = 6.185685505429414000000000000E-12 "%" Correct digits = 15 h = 1.00E-2 " " "NO INFO (given) for Equation 1" Radius of convergence (ratio test) for eq 1 = 17.5121378359635 " " "Order of pole (ratio test) Not computed" Radius of convergence (three term test) for eq 1 = 232.72654391984116 " " Order of pole (three term test) = -6146.86881447003 " " "NO COMPLEX POLE (six term test) for Equation 1" " " "TOP MAIN SOLVE Loop" x[1] = 3.739999999999964 " " y[1] (analytic) = -2.964512070786955000E-2 " " y[1] (numeric) = -2.96451207078676900E-2 " " absolute error = 1.8596235662471372000000000000000E-15 " " relative error = 6.2729498880181120000000000000E-12 "%" Correct digits = 15 h = 1.00E-2 " " "NO INFO (given) for Equation 1" Radius of convergence (ratio test) for eq 1 = 17.510971778240535 " " "Order of pole (ratio test) Not computed" Radius of convergence (three term test) for eq 1 = 232.72631661650266 " " Order of pole (three term test) = -6147.0373260500355 " " Radius of convergence (six term test) for eq 1 = 909.657411078032 " " Order of pole (six term test) = 66725.32769273143 " " " " "TOP MAIN SOLVE Loop" x[1] = 3.7499999999999636 " " y[1] (analytic) = -2.93971823200122900E-2 " " y[1] (numeric) = -2.939718232001042300E-2 " " absolute error = 1.863093013199090800000000000000E-15 " " relative error = 6.337658463038414000000000000E-12 "%" Correct digits = 15 h = 1.00E-2 " " "NO INFO (given) for Equation 1" Radius of convergence (ratio test) for eq 1 = 17.509803912541255 " " "Order of pole (ratio test) Not computed" Radius of convergence (three term test) for eq 1 = 232.88827188884449 " " Order of pole (three term test) = -6151.494684337702 " " Radius of convergence (six term test) for eq 1 = 614.862245575967 " " Order of pole (six term test) = 30662.426816565916 " " " " "TOP MAIN SOLVE Loop" x[1] = 3.7599999999999634 " " y[1] (analytic) = -2.915124294937194700E-2 " " y[1] (numeric) = -2.91512429493700800E-2 " " absolute error = 1.8665624601510444000000000000000E-15 " " relative error = 6.403028726400357000000000000E-12 "%" Correct digits = 15 h = 1.00E-2 " " "NO INFO (given) for Equation 1" Radius of convergence (ratio test) for eq 1 = 17.508634234844315 " " "Order of pole (ratio test) Not computed" Radius of convergence (three term test) for eq 1 = 232.10195072349248 " " Order of pole (three term test) = -6130.862073373873 " " "NO COMPLEX POLE (six term test) for Equation 1" " " "TOP MAIN SOLVE Loop" x[1] = 3.769999999999963 " " y[1] (analytic) = -2.89072873621817600E-2 " " y[1] (numeric) = -2.89072873621798900E-2 " " absolute error = 1.870031907102998000000000000000E-15 " " relative error = 6.469067414293206000000000000E-12 "%" Correct digits = 15 h = 1.00E-2 " " "NO INFO (given) for Equation 1" Radius of convergence (ratio test) for eq 1 = 17.507462679087528 " " "Order of pole (ratio test) Not computed" Radius of convergence (three term test) for eq 1 = 232.0730588964488 " " Order of pole (three term test) = -6130.272843520024 " " "NO COMPLEX POLE (six term test) for Equation 1" " " "TOP MAIN SOLVE Loop" x[1] = 3.779999999999963 " " y[1] (analytic) = -2.866530042991767300E-2 " " y[1] (numeric) = -2.866530042991579700E-2 " " absolute error = 1.8769708010069053000000000000000E-15 " " relative error = 6.547884630045359000000000000E-12 "%" Correct digits = 15 h = 1.00E-2 " " "NO INFO (given) for Equation 1" Radius of convergence (ratio test) for eq 1 = 17.506289311209184 " " "Order of pole (ratio test) Not computed" Radius of convergence (three term test) for eq 1 = 231.8414895492746 " " Order of pole (three term test) = -6124.316985066685 " " "NO COMPLEX POLE (six term test) for Equation 1" " " "TOP MAIN SOLVE Loop" x[1] = 3.7899999999999627 " " y[1] (analytic) = -2.8425267128712200E-2 " " y[1] (numeric) = -2.842526712871031300E-2 " " absolute error = 1.887379141862766000000000000000E-15 " " relative error = 6.6397938612732870000000000000E-12 "%" Correct digits = 15 h = 1.00E-2 " " "NO INFO (given) for Equation 1" Radius of convergence (ratio test) for eq 1 = 17.505114073636 " " "Order of pole (ratio test) Not computed" Radius of convergence (three term test) for eq 1 = 232.02102599601875 " " Order of pole (three term test) = -6129.245669037598 " " Radius of convergence (six term test) for eq 1 = 655.1527253700908 " " Order of pole (six term test) = 34526.31229287873 " " " " "TOP MAIN SOLVE Loop" x[1] = 3.7999999999999625 " " y[1] (analytic) = -2.818717253876954500E-2 " " y[1] (numeric) = -2.818717253876765000E-2 " " absolute error = 1.8943180357666733000000000000000E-15 " " relative error = 6.720496825856397000000000000E-12 "%" Correct digits = 15 h = 1.00E-2 " " "NO INFO (given) for Equation 1" Radius of convergence (ratio test) for eq 1 = 17.503937019306637 " " "Order of pole (ratio test) Not computed" Radius of convergence (three term test) for eq 1 = 231.85834853725504 " " Order of pole (three term test) = -6125.109760596208 " " Radius of convergence (six term test) for eq 1 = 1334.24238178353 " " Order of pole (six term test) = 141763.25564225903 " " " " "TOP MAIN SOLVE Loop" x[1] = 3.8099999999999623 " " y[1] (analytic) = -2.795100184378197500E-2 " " y[1] (numeric) = -2.795100184378009000E-2 " " absolute error = 1.8908485888147197000000000000000E-15 " " relative error = 6.764868749187108000000000000E-12 "%" Correct digits = 15 h = 1.00E-2 " " "NO INFO (given) for Equation 1" Radius of convergence (ratio test) for eq 1 = 17.502758083114838 " " "Order of pole (ratio test) Not computed" Radius of convergence (three term test) for eq 1 = 231.2852150982147 " " Order of pole (three term test) = -6110.118085416330 " " "NO COMPLEX POLE (six term test) for Equation 1" " " "TOP MAIN SOLVE Loop" x[1] = 3.819999999999962 " " y[1] (analytic) = -2.77167403303475670E-2 " " y[1] (numeric) = -2.77167403303456700E-2 " " absolute error = 1.897787482718627000000000000000E-15 " " relative error = 6.847080356850999000000000000E-12 "%" Correct digits = 15 h = 1.00E-2 " " "NO INFO (given) for Equation 1" Radius of convergence (ratio test) for eq 1 = 17.50157730479443 " " "Order of pole (ratio test) Not computed" Radius of convergence (three term test) for eq 1 = 231.32554880221358 " " Order of pole (three term test) = -6111.357903887703 " " "NO COMPLEX POLE (six term test) for Equation 1" " " "TOP MAIN SOLVE Loop" x[1] = 3.829999999999962 " " y[1] (analytic) = -2.748437338738917700E-2 " " y[1] (numeric) = -2.748437338738727300E-2 " " absolute error = 1.9012569296705806000000000000000E-15 " " relative error = 6.917592418326503000000000000E-12 "%" Correct digits = 15 h = 1.00E-2 " " "NO INFO (given) for Equation 1" Radius of convergence (ratio test) for eq 1 = 17.500394632984257 " " "Order of pole (ratio test) Not computed" Radius of convergence (three term test) for eq 1 = 230.82986840538814 " " Order of pole (three term test) = -6098.417879365165 " " "NO COMPLEX POLE (six term test) for Equation 1" " " "TOP MAIN SOLVE Loop" x[1] = 3.8399999999999617 " " y[1] (analytic) = -2.725388650557490400E-2 " " y[1] (numeric) = -2.72538865055729900E-2 " " absolute error = 1.9116652705264414000000000000000E-15 " " relative error = 7.014284990639416000000000000E-12 "%" Correct digits = 15 h = 1.00E-2 " " "NO INFO (given) for Equation 1" Radius of convergence (ratio test) for eq 1 = 17.499210111073918 " " "Order of pole (ratio test) Not computed" Radius of convergence (three term test) for eq 1 = 231.0590604856889 " " Order of pole (three term test) = -6104.656139845256 " " "NO COMPLEX POLE (six term test) for Equation 1" " " "TOP MAIN SOLVE Loop" x[1] = 3.8499999999999615 " " y[1] (analytic) = -2.702526527673988500E-2 " " y[1] (numeric) = -2.702526527673797500E-2 " " absolute error = 1.915134717478395000000000000000E-15 " " relative error = 7.086460383893859000000000000E-12 "%" Correct digits = 15 h = 1.00E-2 " " "NO INFO (given) for Equation 1" Radius of convergence (ratio test) for eq 1 = 17.49802372065399 " " "Order of pole (ratio test) Not computed" Radius of convergence (three term test) for eq 1 = 230.77537164615217 " " Order of pole (three term test) = -6097.324117240205 " " "NO COMPLEX POLE (six term test) for Equation 1" " " "TOP MAIN SOLVE Loop" x[1] = 3.8599999999999612 " " y[1] (analytic) = -2.679849539330957400E-2 " " y[1] (numeric) = -2.67984953933076600E-2 " " absolute error = 1.915134717478395000000000000000E-15 " " relative error = 7.146426280172884000000000000E-12 "%" Correct digits = 15 h = 1.00E-2 " " "NO INFO (given) for Equation 1" Radius of convergence (ratio test) for eq 1 = 17.49683544708082 " " "Order of pole (ratio test) Not computed" Radius of convergence (three term test) for eq 1 = 230.77217422541847 " " Order of pole (three term test) = -6097.413736206735 " " Radius of convergence (six term test) for eq 1 = 1034.6664305235893 " " Order of pole (six term test) = 84557.63152637008 " " " " "TOP MAIN SOLVE Loop" x[1] = 3.869999999999961 " " y[1] (analytic) = -2.657356264772443000E-2 " " y[1] (numeric) = -2.657356264772250400E-2 " " absolute error = 1.9220736113823023000000000000000E-15 " " relative error = 7.233029446832169000000000000E-12 "%" Correct digits = 15 h = 1.00E-2 " " "NO INFO (given) for Equation 1" Radius of convergence (ratio test) for eq 1 = 17.495645296876774 " " "Order of pole (ratio test) Not computed" Radius of convergence (three term test) for eq 1 = 230.3287319192217 " " Order of pole (three term test) = -6085.848143484828 " " "NO COMPLEX POLE (six term test) for Equation 1" " " "TOP MAIN SOLVE Loop" x[1] = 3.879999999999961 " " y[1] (analytic) = -2.635045293186610300E-2 " " y[1] (numeric) = -2.635045293186417700E-2 " " absolute error = 1.9290125052862095000000000000000E-15 " " relative error = 7.320604735994568000000000000E-12 "%" Correct digits = 15 h = 1.00E-2 " " "NO INFO (given) for Equation 1" Radius of convergence (ratio test) for eq 1 = 17.494453249401204 " " "Order of pole (ratio test) Not computed" Radius of convergence (three term test) for eq 1 = 230.27396997304487 " " Order of pole (three term test) = -6084.5756883219665 " " "NO COMPLEX POLE (six term test) for Equation 1" " " "TOP MAIN SOLVE Loop" x[1] = 3.8899999999999606 " " y[1] (analytic) = -2.612915223648520000E-2 " " y[1] (numeric) = -2.612915223648326000E-2 " " absolute error = 1.932481952238163000000000000000E-15 " " relative error = 7.395884622463029000000000000E-12 "%" Correct digits = 15 h = 1.00E-2 " " "NO INFO (given) for Equation 1" Radius of convergence (ratio test) for eq 1 = 17.493259312667906 " " "Order of pole (ratio test) Not computed" Radius of convergence (three term test) for eq 1 = 230.48013798793625 " " Order of pole (three term test) = -6090.20670464295 " " Radius of convergence (six term test) for eq 1 = 732.5153230711113 " " Order of pole (six term test) = 42389.1955698922 " " " " "TOP MAIN SOLVE Loop" x[1] = 3.8999999999999604 " " y[1] (analytic) = -2.590964665063048600E-2 " " y[1] (numeric) = -2.59096466506285500E-2 " " absolute error = 1.9359513991901167000000000000000E-15 " " relative error = 7.471932849161443000000000000E-12 "%" Correct digits = 15 h = 1.00E-2 " " "NO INFO (given) for Equation 1" Radius of convergence (ratio test) for eq 1 = 17.4920634931808 " " "Order of pole (ratio test) Not computed" Radius of convergence (three term test) for eq 1 = 230.01911246084364 " " Order of pole (three term test) = -6078.176316694202 " " "NO COMPLEX POLE (six term test) for Equation 1" " " "TOP MAIN SOLVE Loop" x[1] = 3.90999999999996 " " y[1] (analytic) = -2.569192236107977000E-2 " " y[1] (numeric) = -2.569192236107783500E-2 " " absolute error = 1.9394208461420703000000000000000E-15 " " relative error = 7.548757227602648000000000000E-12 "%" Correct digits = 15 h = 1.00E-2 " " "NO INFO (given) for Equation 1" Radius of convergence (ratio test) for eq 1 = 17.49086576130281 " " "Order of pole (ratio test) Not computed" Radius of convergence (three term test) for eq 1 = 229.9544242737738 " " Order of pole (three term test) = -6076.642102550750 " " Radius of convergence (six term test) for eq 1 = 1133.0792474185423 " " Order of pole (six term test) = 100521.4704605676 " " " " "TOP MAIN SOLVE Loop" x[1] = 3.91999999999996 " " y[1] (analytic) = -2.547596565177231400E-2 " " y[1] (numeric) = -2.547596565177036000E-2 " " absolute error = 1.949829186997931200000000000000E-15 " " relative error = 7.6536026686874000000000000E-12 "%" Correct digits = 15 h = 1.00E-2 " " "NO INFO (given) for Equation 1" Radius of convergence (ratio test) for eq 1 = 17.489666123322767 " " "Order of pole (ratio test) Not computed" Radius of convergence (three term test) for eq 1 = 229.60650392725347 " " Order of pole (three term test) = -6067.606316666454 " " "NO COMPLEX POLE (six term test) for Equation 1" " " "TOP MAIN SOLVE Loop" x[1] = 3.9299999999999597 " " y[1] (analytic) = -2.526176290324283000E-2 " " y[1] (numeric) = -2.526176290324088000E-2 " " absolute error = 1.949829186997931200000000000000E-15 " " relative error = 7.71850006852702000000000000E-12 "%" Correct digits = 15 h = 1.00E-2 " " "NO INFO (given) for Equation 1" Radius of convergence (ratio test) for eq 1 = 17.488464606795745 " " "Order of pole (ratio test) Not computed" Radius of convergence (three term test) for eq 1 = 229.73013851142997 " " Order of pole (three term test) = -6071.04961803683 " " "NO COMPLEX POLE (six term test) for Equation 1" " " "TOP MAIN SOLVE Loop" x[1] = 3.9399999999999595 " " y[1] (analytic) = -2.504930059205724400E-2 " " y[1] (numeric) = -2.504930059205528500E-2 " " absolute error = 1.9567680809018384000000000000000E-15 " " relative error = 7.811667530239547000000000000E-12 "%" Correct digits = 15 h = 1.00E-2 " " "NO INFO (given) for Equation 1" Radius of convergence (ratio test) for eq 1 = 17.4872611532917 " " "Order of pole (ratio test) Not computed" Radius of convergence (three term test) for eq 1 = 229.56067207637497 " " Order of pole (three term test) = -6066.738185205498 " " "NO COMPLEX POLE (six term test) for Equation 1" " " "TOP MAIN SOLVE Loop" x[1] = 3.9499999999999593 " " y[1] (analytic) = -2.483856529024998600E-2 " " y[1] (numeric) = -2.48385652902480300E-2 " " absolute error = 1.9567680809018384000000000000000E-15 " " relative error = 7.877943262970745000000000000E-12 "%" Correct digits = 15 h = 1.00E-2 " " "NO INFO (given) for Equation 1" Radius of convergence (ratio test) for eq 1 = 17.486055767904155 " " "Order of pole (ratio test) Not computed" Radius of convergence (three term test) for eq 1 = 229.4110076163977 " " Order of pole (three term test) = -6062.956609935457 " " Radius of convergence (six term test) for eq 1 = 765.3747844495447 " " Order of pole (six term test) = 45795.33084292838 " " " " "TOP MAIN SOLVE Loop" x[1] = 3.959999999999959 " " y[1] (analytic) = -2.462954366476308400E-2 " " y[1] (numeric) = -2.462954366476112500E-2 " " absolute error = 1.960237527853792000000000000000E-15 " " relative error = 7.958886914572673000000000000E-12 "%" Correct digits = 15 h = 1.00E-2 " " "NO INFO (given) for Equation 1" Radius of convergence (ratio test) for eq 1 = 17.48484847686514 " " "Order of pole (ratio test) Not computed" Radius of convergence (three term test) for eq 1 = 229.0672794251482 " " Order of pole (three term test) = -6054.030956102486 " " "NO COMPLEX POLE (six term test) for Equation 1" " " "TOP MAIN SOLVE Loop" x[1] = 3.969999999999959 " " y[1] (analytic) = -2.442222247688688000E-2 " " y[1] (numeric) = -2.44222224768849100E-2 " " absolute error = 1.9671764217576992000000000000000E-15 " " relative error = 8.054862425479211000000000000E-12 "%" Correct digits = 15 h = 1.00E-2 " " "NO INFO (given) for Equation 1" Radius of convergence (ratio test) for eq 1 = 17.483639269820124 " " "Order of pole (ratio test) Not computed" Radius of convergence (three term test) for eq 1 = 228.99129914621165 " " Order of pole (three term test) = -6052.1913079965425 " " "NO COMPLEX POLE (six term test) for Equation 1" " " "TOP MAIN SOLVE Loop" x[1] = 3.9799999999999587 " " y[1] (analytic) = -2.42165885817025200E-2 " " y[1] (numeric) = -2.42165885817005500E-2 " " absolute error = 1.970645868709652900000000000000E-15 " " relative error = 8.137586605400836000000000000E-12 "%" Correct digits = 15 h = 1.00E-2 " " "NO INFO (given) for Equation 1" Radius of convergence (ratio test) for eq 1 = 17.48242811907151 " " "Order of pole (ratio test) Not computed" Radius of convergence (three term test) for eq 1 = 228.85865147733693 " " Order of pole (three term test) = -6048.8554591377715 " " Radius of convergence (six term test) for eq 1 = 4958.2167245571245 " " Order of pole (six term test) = 1897454.0755435477 " " " " "TOP MAIN SOLVE Loop" x[1] = 3.9899999999999585 " " y[1] (analytic) = -2.401262892752622800E-2 " " y[1] (numeric) = -2.40126289275242500E-2 " " absolute error = 1.97758476261356000000000000000E-15 " " relative error = 8.235602892886956000000000000E-12 "%" Correct digits = 15 h = 1.00E-2 " " "NO INFO (given) for Equation 1" Radius of convergence (ratio test) for eq 1 = 17.481215042130376 " " "Order of pole (ratio test) Not computed" Radius of convergence (three term test) for eq 1 = 228.58349424374524 " " Order of pole (three term test) = -6041.743875979073 " " "NO COMPLEX POLE (six term test) for Equation 1" " " "TOP MAIN SOLVE Loop" x[1] = 3.9999999999999583 " " y[1] (analytic) = -2.381033055535527700E-2 " " y[1] (numeric) = -2.381033055535329600E-2 " " absolute error = 1.9810542095655137000000000000000E-15 " " relative error = 8.320145765972774000000000000E-12 "%" Correct digits = 15 h = 1.00E-2 " " "NO INFO (given) for Equation 1" Radius of convergence (ratio test) for eq 1 = 17.4800000088364 " " "Order of pole (ratio test) Not computed" Radius of convergence (three term test) for eq 1 = 228.22720050384083 " " Order of pole (three term test) = -6032.485295134232 " " "NO COMPLEX POLE (six term test) for Equation 1" " " "TOP MAIN SOLVE Loop" x[1] = 4.009999999999958 " " y[1] (analytic) = -2.360968059831583500E-2 " " y[1] (numeric) = -2.36096805983138500E-2 " " absolute error = 1.9845236565174673000000000000000E-15 " " relative error = 8.405550631036621000000000000E-12 "%" Correct digits = 15 h = 1.00E-2 " " "NO INFO (given) for Equation 1" Radius of convergence (ratio test) for eq 1 = 17.478783035858896 " " "Order of pole (ratio test) Not computed" Radius of convergence (three term test) for eq 1 = 228.50785475586486 " " Order of pole (three term test) = -6040.091202593594 " " Radius of convergence (six term test) for eq 1 = 1712.1613397929552 " " Order of pole (six term test) = 225639.11022406616 " " " " "TOP MAIN SOLVE Loop" x[1] = 4.019999999999958 " " y[1] (analytic) = -2.341066628111256300E-2 " " y[1] (numeric) = -2.341066628111057300E-2 " " absolute error = 1.9914625504213745000000000000000E-15 " " relative error = 8.506646186435376000000000000E-12 "%" Correct digits = 15 h = 1.00E-2 " " "NO INFO (given) for Equation 1" Radius of convergence (ratio test) for eq 1 = 17.477564099753724 " " "Order of pole (ratio test) Not computed" Radius of convergence (three term test) for eq 1 = 228.13254079545527 " " Order of pole (three term test) = -6030.331181184085 " " "NO COMPLEX POLE (six term test) for Equation 1" " " "TOP MAIN SOLVE Loop" x[1] = 4.029999999999958 " " y[1] (analytic) = -2.32132749194800700E-2 " " y[1] (numeric) = -2.321327491947807700E-2 " " absolute error = 1.994931997373328200000000000000E-15 " " relative error = 8.593927415641062000000000000E-12 "%" Correct digits = 15 h = 1.00E-2 " " "NO INFO (given) for Equation 1" Radius of convergence (ratio test) for eq 1 = 17.47634322596103 " " "Order of pole (ratio test) Not computed" Radius of convergence (three term test) for eq 1 = 227.79852887637824 " " Order of pole (three term test) = -6021.663240272583 " " "NO COMPLEX POLE (six term test) for Equation 1" " " "TOP MAIN SOLVE Loop" x[1] = 4.039999999999957 " " y[1] (analytic) = -2.30174939196362300E-2 " " y[1] (numeric) = -2.30174939196342300E-2 " " absolute error = 2.0018708912772354000000000000000E-15 " " relative error = 8.69717137003103000000000000E-12 "%" Correct digits = 15 h = 1.00E-2 " " "NO INFO (given) for Equation 1" Radius of convergence (ratio test) for eq 1 = 17.47512038222949 " " "Order of pole (ratio test) Not computed" Radius of convergence (three term test) for eq 1 = 227.66531107151337 " " Order of pole (three term test) = -6018.312086719003 " " "NO COMPLEX POLE (six term test) for Equation 1" " " "TOP MAIN SOLVE Loop" x[1] = 4.049999999999957 " " y[1] (analytic) = -2.282331077773733200E-2 " " y[1] (numeric) = -2.282331077773532300E-2 " " absolute error = 2.0088097851811426000000000000000E-15 " " relative error = 8.801570485297895000000000000E-12 "%" Correct digits = 15 h = 1.00E-2 " " "NO INFO (given) for Equation 1" Radius of convergence (ratio test) for eq 1 = 17.473895576821064 " " "Order of pole (ratio test) Not computed" Radius of convergence (three term test) for eq 1 = 227.70409839619538 " " Order of pole (three term test) = -6019.515074761756 " " Radius of convergence (six term test) for eq 1 = 1080.6330839148636 " " Order of pole (six term test) = 89509.11863357102 " " " " "TOP MAIN SOLVE Loop" x[1] = 4.059999999999957 " " y[1] (analytic) = -2.263071307933513500E-2 " " y[1] (numeric) = -2.263071307933312600E-2 " " absolute error = 2.0088097851811426000000000000000E-15 " " relative error = 8.876475867724444000000000000E-12 "%" Correct digits = 15 h = 1.00E-2 " " "NO INFO (given) for Equation 1" Radius of convergence (ratio test) for eq 1 = 17.472668799237216 " " "Order of pole (ratio test) Not computed" Radius of convergence (three term test) for eq 1 = 227.538077139741 " " Order of pole (three term test) = -6015.2925786665965 " " "NO COMPLEX POLE (six term test) for Equation 1" " " "TOP MAIN SOLVE Loop" x[1] = 4.069999999999957 " " y[1] (analytic) = -2.24396884988358500E-2 " " y[1] (numeric) = -2.243968849883383700E-2 " " absolute error = 2.0122792321330962000000000000000E-15 " " relative error = 8.967500739760677000000000000E-12 "%" Correct digits = 15 h = 1.00E-2 " " "NO INFO (given) for Equation 1" Radius of convergence (ratio test) for eq 1 = 17.471440060801637 " " "Order of pole (ratio test) Not computed" Radius of convergence (three term test) for eq 1 = 227.28911833642533 " " Order of pole (three term test) = -6008.87635965997 " " Radius of convergence (six term test) for eq 1 = 10876.074252127915 " " Order of pole (six term test) = 9001422.334709305 " " " " "TOP MAIN SOLVE Loop" x[1] = 4.0799999999999566 " " y[1] (analytic) = -2.225022479896096600E-2 " " y[1] (numeric) = -2.225022479895895400E-2 " " absolute error = 2.0122792321330962000000000000000E-15 " " relative error = 9.043860232041634000000000000E-12 "%" Correct digits = 15 h = 1.00E-2 " " "NO INFO (given) for Equation 1" Radius of convergence (ratio test) for eq 1 = 17.470209332765602 " " "Order of pole (ratio test) Not computed" Radius of convergence (three term test) for eq 1 = 227.49578737047656 " " Order of pole (three term test) = -6014.523047405674 " " Radius of convergence (six term test) for eq 1 = 791.0853661997154 " " Order of pole (six term test) = 47945.733176073954 " " " " "TOP MAIN SOLVE Loop" x[1] = 4.089999999999956 " " y[1] (analytic) = -2.20623098302100920E-2 " " y[1] (numeric) = -2.20623098302080700E-2 " " absolute error = 2.0192181260370035000000000000000E-15 " " relative error = 9.152342350265033000000000000E-12 "%" Correct digits = 15 h = 1.00E-2 " " "NO INFO (given) for Equation 1" Radius of convergence (ratio test) for eq 1 = 17.468976643478868 " " "Order of pole (ratio test) Not computed" Radius of convergence (three term test) for eq 1 = 227.11696046969868 " " Order of pole (three term test) = -6004.665477302330 " " Radius of convergence (six term test) for eq 1 = 8352.126664097192 " " Order of pole (six term test) = 5294756.904832807 " " " " "TOP MAIN SOLVE Loop" x[1] = 4.099999999999956 " " y[1] (analytic) = -2.187593153032566200E-2 " " y[1] (numeric) = -2.18759315303236400E-2 " " absolute error = 2.022687572988957000000000000000E-15 " " relative error = 9.246178020739333000000000000E-12 "%" Correct digits = 15 h = 1.00E-2 " " "NO INFO (given) for Equation 1" Radius of convergence (ratio test) for eq 1 = 17.467741946479457 " " "Order of pole (ratio test) Not computed" Radius of convergence (three term test) for eq 1 = 226.83032742917814 " " Order of pole (three term test) = -5997.249480166473 " " "NO COMPLEX POLE (six term test) for Equation 1" " " "TOP MAIN SOLVE Loop" x[1] = 4.109999999999956 " " y[1] (analytic) = -2.169107792375969700E-2 " " y[1] (numeric) = -2.16910779237576700E-2 " " absolute error = 2.0261570199409107000000000000000E-15 " " relative error = 9.340969716039443000000000000E-12 "%" Correct digits = 15 h = 1.00E-2 " " "NO INFO (given) for Equation 1" Radius of convergence (ratio test) for eq 1 = 17.466505249529348 " " "Order of pole (ratio test) Not computed" Radius of convergence (three term test) for eq 1 = 226.80542119088375 " " Order of pole (three term test) = -5996.767061357630 " " "NO COMPLEX POLE (six term test) for Equation 1" " " "TOP MAIN SOLVE Loop" x[1] = 4.119999999999956 " " y[1] (analytic) = -2.15077371211424400E-2 " " y[1] (numeric) = -2.150773712114041300E-2 " " absolute error = 2.0261570199409107000000000000000E-15 " " relative error = 9.42059598612616000000000000E-12 "%" Correct digits = 15 h = 1.00E-2 " " "NO INFO (given) for Equation 1" Radius of convergence (ratio test) for eq 1 = 17.465266565468983 " " "Order of pole (ratio test) Not computed" Radius of convergence (three term test) for eq 1 = 226.56262427544536 " " Order of pole (three term test) = -5990.514459469426 " " Radius of convergence (six term test) for eq 1 = 1428.3167179064058 " " Order of pole (six term test) = 154453.15506935518 " " " " "TOP MAIN SOLVE Loop" x[1] = 4.1299999999999555 " " y[1] (analytic) = -2.132589731875306500E-2 " " y[1] (numeric) = -2.132589731875103300E-2 " " absolute error = 2.033095913844818000000000000000E-15 " " relative error = 9.533460109352594000000000000E-12 "%" Correct digits = 15 h = 1.00E-2 " " "NO INFO (given) for Equation 1" Radius of convergence (ratio test) for eq 1 = 17.464025859735703 " " "Order of pole (ratio test) Not computed" Radius of convergence (three term test) for eq 1 = 226.5132128600401 " " Order of pole (three term test) = -5989.381892995964 " " Radius of convergence (six term test) for eq 1 = 957.4758642441566 " " Order of pole (six term test) = 69511.70128701908 " " " " "TOP MAIN SOLVE Loop" x[1] = 4.139999999999955 " " y[1] (analytic) = -2.11455467979923300E-2 " " y[1] (numeric) = -2.114554679799029400E-2 " " absolute error = 2.0365653607967715000000000000000E-15 " " relative error = 9.6311785183541990000000000E-12 "%" Correct digits = 15 h = 1.00E-2 " " "NO INFO (given) for Equation 1" Radius of convergence (ratio test) for eq 1 = 17.462783167581556 " " "Order of pole (ratio test) Not computed" Radius of convergence (three term test) for eq 1 = 226.33960421364958 " " Order of pole (three term test) = -5984.959970726222 " " Radius of convergence (six term test) for eq 1 = 1053.251667857157 " " Order of pole (six term test) = 83899.38076047027 " " " " "TOP MAIN SOLVE Loop" x[1] = 4.149999999999955 " " y[1] (analytic) = -2.096667392485727600E-2 " " y[1] (numeric) = -2.096667392485523400E-2 " " absolute error = 2.0435042547006788000000000000000E-15 " " relative error = 9.746439812172495000000000000E-12 "%" Correct digits = 15 h = 1.00E-2 " " "NO INFO (given) for Equation 1" Radius of convergence (ratio test) for eq 1 = 17.461538456778754 " " "Order of pole (ratio test) Not computed" Radius of convergence (three term test) for eq 1 = 225.892123320202 " " Order of pole (three term test) = -5973.283876203303 " " "NO COMPLEX POLE (six term test) for Equation 1" " " "TOP MAIN SOLVE Loop" x[1] = 4.159999999999955 " " y[1] (analytic) = -2.078926714941793400E-2 " " y[1] (numeric) = -2.078926714941588500E-2 " " absolute error = 2.0469737016526324000000000000000E-15 " " relative error = 9.846300434452517000000000000E-12 "%" Correct digits = 15 h = 1.00E-2 " " "NO INFO (given) for Equation 1" Radius of convergence (ratio test) for eq 1 = 17.460291727206837 " " "Order of pole (ratio test) Not computed" Radius of convergence (three term test) for eq 1 = 225.80570002333204 " " Order of pole (three term test) = -5971.169985722551 " " "NO COMPLEX POLE (six term test) for Equation 1" " " "TOP MAIN SOLVE Loop" x[1] = 4.169999999999955 " " y[1] (analytic) = -2.061331500529608700E-2 " " y[1] (numeric) = -2.06133150052940400E-2 " " absolute error = 2.0469737016526324000000000000000E-15 " " relative error = 9.930346968096654000000000000E-12 "%" Correct digits = 15 h = 1.00E-2 " " "NO INFO (given) for Equation 1" Radius of convergence (ratio test) for eq 1 = 17.459042984332232 " " "Order of pole (ratio test) Not computed" Radius of convergence (three term test) for eq 1 = 225.79385903326164 " " Order of pole (three term test) = -5971.033191313166 " " Radius of convergence (six term test) for eq 1 = 1895.389053642603 " " Order of pole (six term test) = 269608.0986096423 " " " " "TOP MAIN SOLVE Loop" x[1] = 4.179999999999954 " " y[1] (analytic) = -2.04388061091460820E-2 " " y[1] (numeric) = -2.043880610914402800E-2 " " absolute error = 2.0539125955565396000000000000000E-15 " " relative error = 1.004908302661299800000000000E-11 "%" Correct digits = 14 h = 1.00E-2 " " "NO INFO (given) for Equation 1" Radius of convergence (ratio test) for eq 1 = 17.45779220066564 " " "Order of pole (ratio test) Not computed" Radius of convergence (three term test) for eq 1 = 225.8405231815075 " " Order of pole (three term test) = -5972.445580466729 " " Radius of convergence (six term test) for eq 1 = 772.5290997910702 " " Order of pole (six term test) = 45033.87739651474 " " " " "TOP MAIN SOLVE Loop" x[1] = 4.189999999999954 " " y[1] (analytic) = -2.02657291601376600E-2 " " y[1] (numeric) = -2.0265729160135598E-2 " " absolute error = 2.060851489460446800000000000000E-15 " " relative error = 1.016914552235360100000000000E-11 "%" Correct digits = 14 h = 1.00E-2 " " "NO INFO (given) for Equation 1" Radius of convergence (ratio test) for eq 1 = 17.456539395776982 " " "Order of pole (ratio test) Not computed" Radius of convergence (three term test) for eq 1 = 225.51570723475626 " " Order of pole (three term test) = -5964.01842432855 " " Radius of convergence (six term test) for eq 1 = 998.7354500093428 " " Order of pole (six term test) = 74897.11776442442 " " " " "TOP MAIN SOLVE Loop" x[1] = 4.199999999999954 " " y[1] (analytic) = -2.009407293944091600E-2 " " y[1] (numeric) = -2.009407293943885300E-2 " " absolute error = 2.060851489460446800000000000000E-15 " " relative error = 1.025601676509982200000000000E-11 "%" Correct digits = 14 h = 1.00E-2 " " "NO INFO (given) for Equation 1" Radius of convergence (ratio test) for eq 1 = 17.455284555178146 " " "Order of pole (ratio test) Not computed" Radius of convergence (three term test) for eq 1 = 225.15477064502048 " " Order of pole (three term test) = -5954.6324371696155 " " "NO COMPLEX POLE (six term test) for Equation 1" " " "TOP MAIN SOLVE Loop" x[1] = 4.209999999999954 " " y[1] (analytic) = -1.99238263097133100E-2 " " y[1] (numeric) = -1.99238263097112480E-2 " " absolute error = 2.060851489460446800000000000000E-15 " " relative error = 1.034365315891022400000000000E-11 "%" Correct digits = 14 h = 1.00E-2 " " "NO INFO (given) for Equation 1" Radius of convergence (ratio test) for eq 1 = 17.454027666734262 " " "Order of pole (ratio test) Not computed" Radius of convergence (three term test) for eq 1 = 225.3155843344554 " " Order of pole (three term test) = -5959.065927744062 " " Radius of convergence (six term test) for eq 1 = 3358.9975939123597 " " Order of pole (six term test) = 841318.9760972634 " " " " "TOP MAIN SOLVE Loop" x[1] = 4.219999999999954 " " y[1] (analytic) = -1.975497821458877300E-2 " " y[1] (numeric) = -1.975497821458670500E-2 " " absolute error = 2.067790383364354000000000000000E-15 " " relative error = 1.046718635122219500000000000E-11 "%" Correct digits = 14 h = 1.00E-2 " " "NO INFO (given) for Equation 1" Radius of convergence (ratio test) for eq 1 = 17.45276872973758 " " "Order of pole (ratio test) Not computed" Radius of convergence (three term test) for eq 1 = 224.75045808786243 " " Order of pole (three term test) = -5944.273884490517 " " "NO COMPLEX POLE (six term test) for Equation 1" " " "TOP MAIN SOLVE Loop" x[1] = 4.229999999999953 " " y[1] (analytic) = -1.958751767816888600E-2 " " y[1] (numeric) = -1.958751767816681600E-2 " " absolute error = 2.0712598303163077000000000000000E-15 " " relative error = 1.057438652690950200000000000E-11 "%" Correct digits = 14 h = 1.00E-2 " " "NO INFO (given) for Equation 1" Radius of convergence (ratio test) for eq 1 = 17.451507745492272 " " "Order of pole (ratio test) Not computed" Radius of convergence (three term test) for eq 1 = 224.87255637538365 " " Order of pole (three term test) = -5947.6824310364955 " " "NO COMPLEX POLE (six term test) for Equation 1" " " "TOP MAIN SOLVE Loop" x[1] = 4.239999999999953 " " y[1] (analytic) = -1.94214338045162300E-2 " " y[1] (numeric) = -1.94214338045141520E-2 " " absolute error = 2.078198724220215000000000000000E-15 " " relative error = 1.070054222122855700000000000E-11 "%" Correct digits = 14 h = 1.00E-2 " " "NO INFO (given) for Equation 1" Radius of convergence (ratio test) for eq 1 = 17.450244705293425 " " "Order of pole (ratio test) Not computed" Radius of convergence (three term test) for eq 1 = 224.5564404802857 " " Order of pole (three term test) = -5939.483779274998 " " "NO COMPLEX POLE (six term test) for Equation 1" " " "TOP MAIN SOLVE Loop" x[1] = 4.249999999999953 " " y[1] (analytic) = -1.92567157771497700E-2 " " y[1] (numeric) = -1.925671577714768700E-2 " " absolute error = 2.0816681711721685000000000000000E-15 " " relative error = 1.081008929696256300000000000E-11 "%" Correct digits = 14 h = 1.00E-2 " " "NO INFO (given) for Equation 1" Radius of convergence (ratio test) for eq 1 = 17.44897959991406 " " "Order of pole (ratio test) Not computed" Radius of convergence (three term test) for eq 1 = 224.582153797306 " " Order of pole (three term test) = -5940.34288086843 " " Radius of convergence (six term test) for eq 1 = 2075.75669513235 " " Order of pole (six term test) = 319568.4182204853 " " " " "TOP MAIN SOLVE Loop" x[1] = 4.259999999999953 " " y[1] (analytic) = -1.90933528585424400E-2 " " y[1] (numeric) = -1.909335285854035800E-2 " " absolute error = 2.0816681711721685000000000000000E-15 " " relative error = 1.090258052943709200000000000E-11 "%" Correct digits = 14 h = 1.00E-2 " " "NO INFO (given) for Equation 1" Radius of convergence (ratio test) for eq 1 = 17.44771240857183 " " "Order of pole (ratio test) Not computed" Radius of convergence (three term test) for eq 1 = 224.6522624545312 " " Order of pole (three term test) = -5942.378475693153 " " Radius of convergence (six term test) for eq 1 = 813.4846519300315 " " Order of pole (six term test) = 49307.64686494985 " " " " "TOP MAIN SOLVE Loop" x[1] = 4.2699999999999525 " " y[1] (analytic) = -1.893133438962082700E-2 " " y[1] (numeric) = -1.89313343896187420E-2 " " absolute error = 2.085137618124122000000000000000E-15 " " relative error = 1.101421365874402600000000000E-11 "%" Correct digits = 14 h = 1.00E-2 " " "NO INFO (given) for Equation 1" Radius of convergence (ratio test) for eq 1 = 17.446443181824144 " " "Order of pole (ratio test) Not computed" Radius of convergence (three term test) for eq 1 = 224.20373659522787 " " Order of pole (three term test) = -5930.668688616679 " " "NO COMPLEX POLE (six term test) for Equation 1" " " "TOP MAIN SOLVE Loop" x[1] = 4.279999999999952 " " y[1] (analytic) = -1.87706497892669720E-2 " " y[1] (numeric) = -1.877064978926488200E-2 " " absolute error = 2.0886070650760757000000000000000E-15 " " relative error = 1.112698328786858500000000000E-11 "%" Correct digits = 14 h = 1.00E-2 " " "NO INFO (given) for Equation 1" Radius of convergence (ratio test) for eq 1 = 17.445171855335797 " " "Order of pole (ratio test) Not computed" Radius of convergence (three term test) for eq 1 = 223.80485199243776 " " Order of pole (three term test) = -5920.275969082271 " " "NO COMPLEX POLE (six term test) for Equation 1" " " "TOP MAIN SOLVE Loop" x[1] = 4.289999999999952 " " y[1] (analytic) = -1.86112885538223580E-2 " " y[1] (numeric) = -1.861128855382026500E-2 " " absolute error = 2.095545958979983000000000000000E-15 " " relative error = 1.125954257772013700000000000E-11 "%" Correct digits = 14 h = 1.00E-2 " " "NO INFO (given) for Equation 1" Radius of convergence (ratio test) for eq 1 = 17.44389844113525 " " "Order of pole (ratio test) Not computed" Radius of convergence (three term test) for eq 1 = 223.80055001064122 " " Order of pole (three term test) = -5920.341307805093 " " "NO COMPLEX POLE (six term test) for Equation 1" " " "TOP MAIN SOLVE Loop" x[1] = 4.299999999999952 " " y[1] (analytic) = -1.845324025659402800E-2 " " y[1] (numeric) = -1.845324025659192700E-2 " " absolute error = 2.0990154059319366000000000000000E-15 " " relative error = 1.137477958745960900000000000E-11 "%" Correct digits = 14 h = 1.00E-2 " " "NO INFO (given) for Equation 1" Radius of convergence (ratio test) for eq 1 = 17.442622945405898 " " "Order of pole (ratio test) Not computed" Radius of convergence (three term test) for eq 1 = 223.40943251801508 " " Order of pole (three term test) = -5910.156240111967 " " "NO COMPLEX POLE (six term test) for Equation 1" " " "TOP MAIN SOLVE Loop" x[1] = 4.309999999999952 " " y[1] (analytic) = -1.829649454736286300E-2 " " y[1] (numeric) = -1.829649454736076400E-2 " " absolute error = 2.0990154059319366000000000000000E-15 " " relative error = 1.14722271006523200000000000E-11 "%" Correct digits = 14 h = 1.00E-2 " " "NO INFO (given) for Equation 1" Radius of convergence (ratio test) for eq 1 = 17.441345362958366 " " "Order of pole (ratio test) Not computed" Radius of convergence (three term test) for eq 1 = 223.69279798780528 " " Order of pole (three term test) = -5917.840044649019 " " Radius of convergence (six term test) for eq 1 = 1169.2570551152419 " " Order of pole (six term test) = 100752.17561766793 " " " " "TOP MAIN SOLVE Loop" x[1] = 4.319999999999951 " " y[1] (analytic) = -1.814104115189405500E-2 " " y[1] (numeric) = -1.814104115189195400E-2 " " absolute error = 2.1024848528838902000000000000000E-15 " " relative error = 1.158965924436137200000000000E-11 "%" Correct digits = 14 h = 1.00E-2 " " "NO INFO (given) for Equation 1" Radius of convergence (ratio test) for eq 1 = 17.440065676203144 " " "Order of pole (ratio test) Not computed" Radius of convergence (three term test) for eq 1 = 223.30961128565576 " " Order of pole (three term test) = -5907.861449734697 " " "NO COMPLEX POLE (six term test) for Equation 1" " " "TOP MAIN SOLVE Loop" x[1] = 4.329999999999951 " " y[1] (analytic) = -1.798686987144969300E-2 " " y[1] (numeric) = -1.798686987144758300E-2 " " absolute error = 2.1094237467877974000000000000000E-15 " " relative error = 1.172757551404792300000000000E-11 "%" Correct digits = 14 h = 1.00E-2 " " "NO INFO (given) for Equation 1" Radius of convergence (ratio test) for eq 1 = 17.43878390316678 " " "Order of pole (ratio test) Not computed" Radius of convergence (three term test) for eq 1 = 223.2077059170295 " " Order of pole (three term test) = -5905.339017932096 " " "NO COMPLEX POLE (six term test) for Equation 1" " " "TOP MAIN SOLVE Loop" x[1] = 4.339999999999951 " " y[1] (analytic) = -1.783397058230356800E-2 " " y[1] (numeric) = -1.783397058230145600E-2 " " absolute error = 2.112893193739751000000000000000E-15 " " relative error = 1.184757586084811300000000000E-11 "%" Correct digits = 14 h = 1.00E-2 " " "NO INFO (given) for Equation 1" Radius of convergence (ratio test) for eq 1 = 17.437499999201048 " " "Order of pole (ratio test) Not computed" Radius of convergence (three term test) for eq 1 = 223.01451962354326 " " Order of pole (three term test) = -5900.397907684452 " " "NO COMPLEX POLE (six term test) for Equation 1" " " "TOP MAIN SOLVE Loop" x[1] = 4.349999999999950 " " y[1] (analytic) = -1.768233323525816600E-2 " " y[1] (numeric) = -1.76823332352560480E-2 " " absolute error = 2.1163626406917047000000000000000E-15 " " relative error = 1.196879740096587600000000000E-11 "%" Correct digits = 14 h = 1.00E-2 " " "NO INFO (given) for Equation 1" Radius of convergence (ratio test) for eq 1 = 17.43621398540208 " " "Order of pole (ratio test) Not computed" Radius of convergence (three term test) for eq 1 = 223.02511158011475 " " Order of pole (three term test) = -5900.858578526061 " " Radius of convergence (six term test) for eq 1 = 737.19390299109 " " Order of pole (six term test) = 40008.7740957658 " " " " "TOP MAIN SOLVE Loop" x[1] = 4.359999999999950 " " y[1] (analytic) = -1.75319478551638100E-2 " " y[1] (numeric) = -1.75319478551616900E-2 " " absolute error = 2.1198320876436583000000000000000E-15 " " relative error = 1.209125252456924700000000000E-11 "%" Correct digits = 14 h = 1.00E-2 " " "NO INFO (given) for Equation 1" Radius of convergence (ratio test) for eq 1 = 17.434925864997126 " " "Order of pole (ratio test) Not computed" Radius of convergence (three term test) for eq 1 = 222.65728840974114 " " Order of pole (three term test) = -5891.285047444521 " " "NO COMPLEX POLE (six term test) for Equation 1" " " "TOP MAIN SOLVE Loop" x[1] = 4.36999999999995 " " y[1] (analytic) = -1.73828045404400300E-2 " " y[1] (numeric) = -1.738280454043790400E-2 " " absolute error = 2.1267709815475655000000000000000E-15 " " relative error = 1.223491282203491800000000000E-11 "%" Correct digits = 14 h = 1.00E-2 " " "NO INFO (given) for Equation 1" Radius of convergence (ratio test) for eq 1 = 17.433635615067942 " " "Order of pole (ratio test) Not computed" Radius of convergence (three term test) for eq 1 = 222.7017501868939 " " Order of pole (three term test) = -5892.642839515305 " " Radius of convergence (six term test) for eq 1 = 930.8782126569916 " " Order of pole (six term test) = 63400.47639915956 " " " " "TOP MAIN SOLVE Loop" x[1] = 4.37999999999995 " " y[1] (analytic) = -1.72348934625990880E-2 " " y[1] (numeric) = -1.72348934625969600E-2 " " absolute error = 2.130240428499519000000000000000E-15 " " relative error = 1.236004407640980400000000000E-11 "%" Correct digits = 14 h = 1.00E-2 " " "NO INFO (given) for Equation 1" Radius of convergence (ratio test) for eq 1 = 17.432343237796047 " " "Order of pole (ratio test) Not computed" Radius of convergence (three term test) for eq 1 = 222.2281817936077 " " Order of pole (three term test) = -5880.268194765762 " " "NO COMPLEX POLE (six term test) for Equation 1" " " "TOP MAIN SOLVE Loop" x[1] = 4.38999999999995 " " y[1] (analytic) = -1.70882048657717420E-2 " " y[1] (numeric) = -1.708820486576960700E-2 " " absolute error = 2.1337098754514727000000000000000E-15 " " relative error = 1.24864483555283600000000000E-11 "%" Correct digits = 14 h = 1.00E-2 " " "NO INFO (given) for Equation 1" Radius of convergence (ratio test) for eq 1 = 17.43104871926145 " " "Order of pole (ratio test) Not computed" Radius of convergence (three term test) for eq 1 = 222.07759475785656 " " Order of pole (three term test) = -5876.454377997806 " " "NO COMPLEX POLE (six term test) for Equation 1" " " "TOP MAIN SOLVE Loop" x[1] = 4.39999999999995 " " y[1] (analytic) = -1.69427290662351800E-2 " " y[1] (numeric) = -1.694272906623304200E-2 " " absolute error = 2.1371793224034263000000000000000E-15 " " relative error = 1.26141385726492400000000000E-11 "%" Correct digits = 14 h = 1.00E-2 " " "NO INFO (given) for Equation 1" Radius of convergence (ratio test) for eq 1 = 17.429752072637747 " " "Order of pole (ratio test) Not computed" Radius of convergence (three term test) for eq 1 = 222.13924057225927 " " Order of pole (three term test) = -5878.26319006201 " " "NO COMPLEX POLE (six term test) for Equation 1" " " "TOP MAIN SOLVE Loop" x[1] = 4.4099999999999495 " " y[1] (analytic) = -1.67984564519431700E-2 " " y[1] (numeric) = -1.679845645194103200E-2 " " absolute error = 2.1371793224034263000000000000000E-15 " " relative error = 1.272247440422543700000000000E-11 "%" Correct digits = 14 h = 1.00E-2 " " "NO INFO (given) for Equation 1" Radius of convergence (ratio test) for eq 1 = 17.428453261824476 " " "Order of pole (ratio test) Not computed" Radius of convergence (three term test) for eq 1 = 221.91807791175646 " " Order of pole (three term test) = -5872.581856204955 " " Radius of convergence (six term test) for eq 1 = 1049.4748622031495 " " Order of pole (six term test) = 80031.34380059624 " " " " "TOP MAIN SOLVE Loop" x[1] = 4.419999999999950 " " y[1] (analytic) = -1.665537748205842500E-2 " " y[1] (numeric) = -1.665537748205628600E-2 " " absolute error = 2.14064876935538000000000000000E-15 " " relative error = 1.285259833745190400000000000E-11 "%" Correct digits = 14 h = 1.00E-2 " " "NO INFO (given) for Equation 1" Radius of convergence (ratio test) for eq 1 = 17.427152313093075 " " "Order of pole (ratio test) Not computed" Radius of convergence (three term test) for eq 1 = 221.882314604048 " " Order of pole (three term test) = -5871.811523766389 " " Radius of convergence (six term test) for eq 1 = 918.1172436987255 " " Order of pole (six term test) = 61244.66981348468 " " " " "TOP MAIN SOLVE Loop" x[1] = 4.429999999999949 " " y[1] (analytic) = -1.651348268648716600E-2 " " y[1] (numeric) = -1.65134826864850200E-2 " " absolute error = 2.1441182163073336000000000000000E-15 " " relative error = 1.298404617011435200000000000E-11 "%" Correct digits = 14 h = 1.00E-2 " " "NO INFO (given) for Equation 1" Radius of convergence (ratio test) for eq 1 = 17.425849220469757 " " "Order of pole (ratio test) Not computed" Radius of convergence (three term test) for eq 1 = 221.46719100808437 " " Order of pole (three term test) = -5860.981309111476 " " "NO COMPLEX POLE (six term test) for Equation 1" " " "TOP MAIN SOLVE Loop" x[1] = 4.439999999999949 " " y[1] (analytic) = -1.63727626654158900E-2 " " y[1] (numeric) = -1.637276266541374300E-2 " " absolute error = 2.147587663259287200000000000000E-15 " " relative error = 1.311683133229327400000000000E-11 "%" Correct digits = 14 h = 1.00E-2 " " "NO INFO (given) for Equation 1" Radius of convergence (ratio test) for eq 1 = 17.424543945174044 " " "Order of pole (ratio test) Not computed" Radius of convergence (three term test) for eq 1 = 221.5361804801757 " " Order of pole (three term test) = -5862.991674042653 " " Radius of convergence (six term test) for eq 1 = 1271.2202964843418 " " Order of pole (six term test) = 116755.88591246348 " " " " "TOP MAIN SOLVE Loop" x[1] = 4.449999999999949 " " y[1] (analytic) = -1.623320808885038400E-2 " " y[1] (numeric) = -1.623320808884823300E-2 " " absolute error = 2.1510571102112408000000000000000E-15 " " relative error = 1.3250967390042100000000000E-11 "%" Correct digits = 14 h = 1.00E-2 " " "NO INFO (given) for Equation 1" Radius of convergence (ratio test) for eq 1 = 17.423236507933158 " " "Order of pole (ratio test) Not computed" Radius of convergence (three term test) for eq 1 = 221.27280844538026 " " Order of pole (three term test) = -5856.187859293313 " " Radius of convergence (six term test) for eq 1 = 2718.341198290719 " " Order of pole (six term test) = 531856.6334553795 " " " " "TOP MAIN SOLVE Loop" x[1] = 4.4599999999999485 " " y[1] (analytic) = -1.609480969615691400E-2 " " y[1] (numeric) = -1.60948096961547600E-2 " " absolute error = 2.1545265571631944000000000000000E-15 " " relative error = 1.33864680467619820000000000E-11 "%" Correct digits = 14 h = 1.00E-2 " " "NO INFO (given) for Equation 1" Radius of convergence (ratio test) for eq 1 = 17.42192690425507 " " "Order of pole (ratio test) Not computed" Radius of convergence (three term test) for eq 1 = 221.02373782149667 " " Order of pole (three term test) = -5849.762556342218 " " "NO COMPLEX POLE (six term test) for Equation 1" " " "TOP MAIN SOLVE Loop" x[1] = 4.469999999999948 " " y[1] (analytic) = -1.595755829560566400E-2 " " y[1] (numeric) = -1.59575582956035100E-2 " " absolute error = 2.1545265571631944000000000000000E-15 " " relative error = 1.350160542892392400000000000E-11 "%" Correct digits = 14 h = 1.00E-2 " " "NO INFO (given) for Equation 1" Radius of convergence (ratio test) for eq 1 = 17.420615125582216 " " "Order of pole (ratio test) Not computed" Radius of convergence (three term test) for eq 1 = 220.9757033023023 " " Order of pole (three term test) = -5848.66822836857 " " Radius of convergence (six term test) for eq 1 = 906.1521539461348 " " Order of pole (six term test) = 59237.457512026354 " " " " "TOP MAIN SOLVE Loop" x[1] = 4.479999999999948 " " y[1] (analytic) = -1.582144476391638700E-2 " " y[1] (numeric) = -1.582144476391422700E-2 " " absolute error = 2.157996004115148000000000000000E-15 " " relative error = 1.363968990390081700000000000E-11 "%" Correct digits = 14 h = 1.00E-2 " " "NO INFO (given) for Equation 1" Radius of convergence (ratio test) for eq 1 = 17.419301162397158 " " "Order of pole (ratio test) Not computed" Radius of convergence (three term test) for eq 1 = 220.80485161780788 " " Order of pole (three term test) = -5844.31592533901 " " Radius of convergence (six term test) for eq 1 = 1887.848538691133 " " Order of pole (six term test) = 255616.7435907185 " " " " "TOP MAIN SOLVE Loop" x[1] = 4.489999999999948 " " y[1] (analytic) = -1.568646004580624700E-2 " " y[1] (numeric) = -1.568646004580408500E-2 " " absolute error = 2.1614654510671016000000000000000E-15 " " relative error = 1.377917927152064200000000000E-11 "%" Correct digits = 14 h = 1.00E-2 " " "NO INFO (given) for Equation 1" Radius of convergence (ratio test) for eq 1 = 17.417985007127193 " " "Order of pole (ratio test) Not computed" Radius of convergence (three term test) for eq 1 = 220.68913473484747 " " Order of pole (three term test) = -5841.42480017655 " " "NO COMPLEX POLE (six term test) for Equation 1" " " "TOP MAIN SOLVE Loop" x[1] = 4.499999999999948 " " y[1] (analytic) = -1.55525951535399300E-2 " " y[1] (numeric) = -1.555259515353776500E-2 " " absolute error = 2.1632001745430784000000000000000E-15 " " relative error = 1.390893386722480100000000000E-11 "%" Correct digits = 14 h = 1.00E-2 " " "NO INFO (given) for Equation 1" Radius of convergence (ratio test) for eq 1 = 17.416666670424153 " " "Order of pole (ratio test) Not computed" Radius of convergence (three term test) for eq 1 = 220.5259498961559 " " Order of pole (three term test) = -5837.274121805682 " " "NO COMPLEX POLE (six term test) for Equation 1" " " "TOP MAIN SOLVE Loop" x[1] = 4.509999999999947 " " y[1] (analytic) = -1.54198411664819400E-2 " " y[1] (numeric) = -1.541984116647977500E-2 " " absolute error = 2.1632001745430784000000000000000E-15 " " relative error = 1.402868000511717200000000000E-11 "%" Correct digits = 14 h = 1.00E-2 " " "NO INFO (given) for Equation 1" Radius of convergence (ratio test) for eq 1 = 17.41534611546275 " " "Order of pole (ratio test) Not computed" Radius of convergence (three term test) for eq 1 = 220.2409475761431 " " Order of pole (three term test) = -5829.898552552842 " " "NO COMPLEX POLE (six term test) for Equation 1" " " "TOP MAIN SOLVE Loop" x[1] = 4.519999999999947 " " y[1] (analytic) = -1.528818923065113600E-2 " " y[1] (numeric) = -1.52881892306489700E-2 " " absolute error = 2.166669621495032000000000000000E-15 " " relative error = 1.417217950933716800000000000E-11 "%" Correct digits = 14 h = 1.00E-2 " " "NO INFO (given) for Equation 1" Radius of convergence (ratio test) for eq 1 = 17.414023376491716 " " "Order of pole (ratio test) Not computed" Radius of convergence (three term test) for eq 1 = 220.2049753661986 " " Order of pole (three term test) = -5829.12277001093 " " "NO COMPLEX POLE (six term test) for Equation 1" " " "TOP MAIN SOLVE Loop" x[1] = 4.529999999999947 " " y[1] (analytic) = -1.515763055827746800E-2 " " y[1] (numeric) = -1.5157630558275298E-2 " " absolute error = 2.168404344971009000000000000000E-15 " " relative error = 1.430569465744670500000000000E-11 "%" Correct digits = 14 h = 1.00E-2 " " "NO INFO (given) for Equation 1" Radius of convergence (ratio test) for eq 1 = 17.412698413230064 " " "Order of pole (ratio test) Not computed" Radius of convergence (three term test) for eq 1 = 220.10950527097245 " " Order of pole (three term test) = -5826.772352252076 " " Radius of convergence (six term test) for eq 1 = 891.8059341181681 " " Order of pole (six term test) = 56896.616949977135 " " " " "TOP MAIN SOLVE Loop" x[1] = 4.539999999999947 " " y[1] (analytic) = -1.502815642736096700E-2 " " y[1] (numeric) = -1.502815642735879600E-2 " " absolute error = 2.1718737919229625000000000000000E-15 " " relative error = 1.445203077583586400000000000E-11 "%" Correct digits = 14 h = 1.00E-2 " " "NO INFO (given) for Equation 1" Radius of convergence (ratio test) for eq 1 = 17.41137123856223 " " "Order of pole (ratio test) Not computed" Radius of convergence (three term test) for eq 1 = 219.66705887029397 " " Order of pole (three term test) = -5815.216786973925 " " "NO COMPLEX POLE (six term test) for Equation 1" " " "TOP MAIN SOLVE Loop" x[1] = 4.5499999999999465 " " y[1] (analytic) = -1.489975818123292800E-2 " " y[1] (numeric) = -1.489975818123075200E-2 " " absolute error = 2.175343238874916000000000000000E-15 " " relative error = 1.45998560004475900000000000E-11 "%" Correct digits = 14 h = 1.00E-2 " " "NO INFO (given) for Equation 1" Radius of convergence (ratio test) for eq 1 = 17.41004183578046 " " "Order of pole (ratio test) Not computed" Radius of convergence (three term test) for eq 1 = 219.6764295183182 " " Order of pole (three term test) = -5815.64540097293 " " Radius of convergence (six term test) for eq 1 = 2378.9566141312544 " " Order of pole (six term test) = 401660.79188473785 " " " " "TOP MAIN SOLVE Loop" x[1] = 4.559999999999946 " " y[1] (analytic) = -1.477242722811932300E-2 " " y[1] (numeric) = -1.477242722811714600E-2 " " absolute error = 2.175343238874916000000000000000E-15 " " relative error = 1.472569947567011500000000000E-11 "%" Correct digits = 14 h = 1.00E-2 " " "NO INFO (given) for Equation 1" Radius of convergence (ratio test) for eq 1 = 17.40871021846309 " " "Order of pole (ratio test) Not computed" Radius of convergence (three term test) for eq 1 = 219.64331957632197 " " Order of pole (three term test) = -5814.945685103304 " " Radius of convergence (six term test) for eq 1 = 1177.0719456676943 " " Order of pole (six term test) = 98458.10944724151 " " " " "TOP MAIN SOLVE Loop" x[1] = 4.569999999999946 " " y[1] (analytic) = -1.46461550407064500E-2 " " y[1] (numeric) = -1.46461550407042700E-2 " " absolute error = 2.1788126858268697000000000000000E-15 " " relative error = 1.487634590628897000000000000E-11 "%" Correct digits = 14 h = 1.00E-2 " " "NO INFO (given) for Equation 1" Radius of convergence (ratio test) for eq 1 = 17.407376357840526 " " "Order of pole (ratio test) Not computed" Radius of convergence (three term test) for eq 1 = 219.33194204632952 " " Order of pole (three term test) = -5806.86858439216 " " Radius of convergence (six term test) for eq 1 = 979.8473258291347 " " Order of pole (six term test) = 68220.41615688082 " " " " "TOP MAIN SOLVE Loop" x[1] = 4.579999999999946 " " y[1] (analytic) = -1.452093315570877000E-2 " " y[1] (numeric) = -1.45209331557065900E-2 " " absolute error = 2.1822821327788233000000000000000E-15 " " relative error = 1.50285254355081100000000000E-11 "%" Correct digits = 14 h = 1.00E-2 " " "NO INFO (given) for Equation 1" Radius of convergence (ratio test) for eq 1 = 17.406040258450656 " " "Order of pole (ratio test) Not computed" Radius of convergence (three term test) for eq 1 = 219.10004397209045 " " Order of pole (three term test) = -5800.896898231316 " " Radius of convergence (six term test) for eq 1 = 1266.9723924713905 " " Order of pole (six term test) = 113684.21942647142 " " " " "TOP MAIN SOLVE Loop" x[1] = 4.589999999999946 " " y[1] (analytic) = -1.439675317343899500E-2 " " y[1] (numeric) = -1.43967531734368100E-2 " " absolute error = 2.1840168562548000000000000000E-15 " " relative error = 1.517020421162848800000000000E-11 "%" Correct digits = 14 h = 1.00E-2 " " "NO INFO (given) for Equation 1" Radius of convergence (ratio test) for eq 1 = 17.40470193255306 " " "Order of pole (ratio test) Not computed" Radius of convergence (three term test) for eq 1 = 218.88409301654048 " " Order of pole (three term test) = -5795.348965991924 " " Radius of convergence (six term test) for eq 1 = 1669.6272838782133 " " Order of pole (six term test) = 196878.0739941462 " " " " "TOP MAIN SOLVE Loop" x[1] = 4.5999999999999455 " " y[1] (analytic) = -1.427360675738035500E-2 " " y[1] (numeric) = -1.427360675737816800E-2 " " absolute error = 2.1874863032067537000000000000000E-15 " " relative error = 1.532539280638150800000000000E-11 "%" Correct digits = 14 h = 1.00E-2 " " "NO INFO (given) for Equation 1" Radius of convergence (ratio test) for eq 1 = 17.403361339611845 " " "Order of pole (ratio test) Not computed" Radius of convergence (three term test) for eq 1 = 218.6805309082204 " " Order of pole (three term test) = -5790.1265220272735 " " "NO COMPLEX POLE (six term test) for Equation 1" " " "TOP MAIN SOLVE Loop" x[1] = 4.609999999999945 " " y[1] (analytic) = -1.415148563376112000E-2 " " y[1] (numeric) = -1.415148563375893000E-2 " " absolute error = 2.1892210266827306000000000000000E-15 " " relative error = 1.546990247765872600000000000E-11 "%" Correct digits = 14 h = 1.00E-2 " " "NO INFO (given) for Equation 1" Radius of convergence (ratio test) for eq 1 = 17.402018496752664 " " "Order of pole (ratio test) Not computed" Radius of convergence (three term test) for eq 1 = 218.71941772121718 " " Order of pole (three term test) = -5791.338882093193 " " Radius of convergence (six term test) for eq 1 = 2469.285178105707 " " Order of pole (six term test) = 429069.7574596553 " " " " "TOP MAIN SOLVE Loop" x[1] = 4.619999999999945 " " y[1] (analytic) = -1.403038159113132000E-2 " " y[1] (numeric) = -1.403038159112912400E-2 " " absolute error = 2.194425197110661000000000000000E-15 " " relative error = 1.564052397903254000000000000E-11 "%" Correct digits = 14 h = 1.00E-2 " " "NO INFO (given) for Equation 1" Radius of convergence (ratio test) for eq 1 = 17.400673401535844 " " "Order of pole (ratio test) Not computed" Radius of convergence (three term test) for eq 1 = 218.60429999445876 " " Order of pole (three term test) = -5788.463202335169 " " "NO COMPLEX POLE (six term test) for Equation 1" " " "TOP MAIN SOLVE Loop" x[1] = 4.629999999999945 " " y[1] (analytic) = -1.39102864799416400E-2 " " y[1] (numeric) = -1.391028647993944300E-2 " " absolute error = 2.1961599205866378000000000000000E-15 " " relative error = 1.578802797306480500000000000E-11 "%" Correct digits = 14 h = 1.00E-2 " " "NO INFO (given) for Equation 1" Radius of convergence (ratio test) for eq 1 = 17.399326032013498 " " "Order of pole (ratio test) Not computed" Radius of convergence (three term test) for eq 1 = 218.3079986726587 " " Order of pole (three term test) = -5780.784062257709 " " "NO COMPLEX POLE (six term test) for Equation 1" " " "TOP MAIN SOLVE Loop" x[1] = 4.639999999999945 " " y[1] (analytic) = -1.3791192212124600E-2 " " y[1] (numeric) = -1.3791192212122400E-2 " " absolute error = 2.1996293675385914000000000000000E-15 " " relative error = 1.594952295425754200000000000E-11 "%" Correct digits = 14 h = 1.00E-2 " " "NO INFO (given) for Equation 1" Radius of convergence (ratio test) for eq 1 = 17.397976387645443 " " "Order of pole (ratio test) Not computed" Radius of convergence (three term test) for eq 1 = 218.26175010548369 " " Order of pole (three term test) = -5779.736309686022 " " "NO COMPLEX POLE (six term test) for Equation 1" " " "TOP MAIN SOLVE Loop" x[1] = 4.649999999999944 " " y[1] (analytic) = -1.367309076067787200E-2 " " y[1] (numeric) = -1.36730907606756700E-2 " " absolute error = 2.2013640910145682000000000000000E-15 " " relative error = 1.609997424536536200000000000E-11 "%" Correct digits = 14 h = 1.00E-2 " " "NO INFO (given) for Equation 1" Radius of convergence (ratio test) for eq 1 = 17.396624464927207 " " "Order of pole (ratio test) Not computed" Radius of convergence (three term test) for eq 1 = 217.9158844381542 " " Order of pole (three term test) = -5770.7421696332485 " " "NO COMPLEX POLE (six term test) for Equation 1" " " "TOP MAIN SOLVE Loop" x[1] = 4.659999999999944 " " y[1] (analytic) = -1.355597415924983700E-2 " " y[1] (numeric) = -1.355597415924763300E-2 " " absolute error = 2.203098814490545000000000000000E-15 " " relative error = 1.625186643622564300000000000E-11 "%" Correct digits = 14 h = 1.00E-2 " " "NO INFO (given) for Equation 1" Radius of convergence (ratio test) for eq 1 = 17.395270274486304 " " "Order of pole (ratio test) Not computed" Radius of convergence (three term test) for eq 1 = 217.9509463975963 " " Order of pole (three term test) = -5771.853119476276 " " Radius of convergence (six term test) for eq 1 = 831.0222333577871 " " Order of pole (six term test) = 48543.62400612128 " " " " "TOP MAIN SOLVE Loop" x[1] = 4.669999999999944 " " y[1] (analytic) = -1.343983450172733200E-2 " " y[1] (numeric) = -1.343983450172513000E-2 " " absolute error = 2.204833537966521800000000000000E-15 " " relative error = 1.64052134546980400000000000E-11 "%" Correct digits = 14 h = 1.00E-2 " " "NO INFO (given) for Equation 1" Radius of convergence (ratio test) for eq 1 = 17.393913778411267 " " "Order of pole (ratio test) Not computed" Radius of convergence (three term test) for eq 1 = 217.7371690273397 " " Order of pole (three term test) = -5766.360546389593 " " "NO COMPLEX POLE (six term test) for Equation 1" " " "TOP MAIN SOLVE Loop" x[1] = 4.679999999999944 " " y[1] (analytic) = -1.332466394182561200E-2 " " y[1] (numeric) = -1.332466394182340600E-2 " " absolute error = 2.2083029849184754000000000000000E-15 " " relative error = 1.6573048255173600000000000E-11 "%" Correct digits = 14 h = 1.00E-2 " " "NO INFO (given) for Equation 1" Radius of convergence (ratio test) for eq 1 = 17.392555003620544 " " "Order of pole (ratio test) Not computed" Radius of convergence (three term test) for eq 1 = 217.63675136914685 " " Order of pole (three term test) = -5763.8743304270265 " " "NO COMPLEX POLE (six term test) for Equation 1" " " "TOP MAIN SOLVE Loop" x[1] = 4.6899999999999435 " " y[1] (analytic) = -1.321045469268047600E-2 " " y[1] (numeric) = -1.321045469267826400E-2 " " absolute error = 2.211772431870429000000000000000E-15 " " relative error = 1.674259125309219800000000000E-11 "%" Correct digits = 14 h = 1.00E-2 " " "NO INFO (given) for Equation 1" Radius of convergence (ratio test) for eq 1 = 17.391193905070775 " " "Order of pole (ratio test) Not computed" Radius of convergence (three term test) for eq 1 = 217.2889420000609 " " Order of pole (three term test) = -5754.829491571988 " " Radius of convergence (six term test) for eq 1 = 2241.4908605515043 " " Order of pole (six term test) = 349666.26014442544 " " " " "TOP MAIN SOLVE Loop" x[1] = 4.699999999999943 " " y[1] (analytic) = -1.309719902644261900E-2 " " y[1] (numeric) = -1.309719902644040400E-2 " " absolute error = 2.2152418788223827000000000000000E-15 " " relative error = 1.691385978291935200000000000E-11 "%" Correct digits = 14 h = 1.00E-2 " " "NO INFO (given) for Equation 1" Radius of convergence (ratio test) for eq 1 = 17.389830508540268 " " "Order of pole (ratio test) Not computed" Radius of convergence (three term test) for eq 1 = 217.15732265578794 " " Order of pole (three term test) = -5751.513098686643 " " "NO COMPLEX POLE (six term test) for Equation 1" " " "TOP MAIN SOLVE Loop" x[1] = 4.709999999999943 " " y[1] (analytic) = -1.298488927387415300E-2 " " y[1] (numeric) = -1.298488927387193800E-2 " " absolute error = 2.2152418788223827000000000000000E-15 " " relative error = 1.7060152243881600000000000E-11 "%" Correct digits = 14 h = 1.00E-2 " " "NO INFO (given) for Equation 1" Radius of convergence (ratio test) for eq 1 = 17.38846480345403 " " "Order of pole (ratio test) Not computed" Radius of convergence (three term test) for eq 1 = 217.10450386773715 " " Order of pole (three term test) = -5750.294687200657 " " "NO COMPLEX POLE (six term test) for Equation 1" " " "TOP MAIN SOLVE Loop" x[1] = 4.719999999999943 " " y[1] (analytic) = -1.287351782394734500E-2 " " y[1] (numeric) = -1.287351782394512700E-2 " " absolute error = 2.2169766022983595000000000000000E-15 " " relative error = 1.722121826074870500000000000E-11 "%" Correct digits = 14 h = 1.00E-2 " " "NO INFO (given) for Equation 1" Radius of convergence (ratio test) for eq 1 = 17.38709677621565 " " "Order of pole (ratio test) Not computed" Radius of convergence (three term test) for eq 1 = 216.81660783068216 " " Order of pole (three term test) = -5742.835752322752 " " "NO COMPLEX POLE (six term test) for Equation 1" " " "TOP MAIN SOLVE Loop" x[1] = 4.729999999999943 " " y[1] (analytic) = -1.276307712344547700E-2 " " y[1] (numeric) = -1.276307712344325600E-2 " " absolute error = 2.220446049250313000000000000000E-15 " " relative error = 1.739741935094480700000000000E-11 "%" Correct digits = 14 h = 1.00E-2 " " "NO INFO (given) for Equation 1" Radius of convergence (ratio test) for eq 1 = 17.38572642687175 " " "Order of pole (ratio test) Not computed" Radius of convergence (three term test) for eq 1 = 216.69822319728408 " " Order of pole (three term test) = -5739.876948798312 " " Radius of convergence (six term test) for eq 1 = 1095.4058548291857 " " Order of pole (six term test) = 83286.63772696829 " " " " "TOP MAIN SOLVE Loop" x[1] = 4.7399999999999425 " " y[1] (analytic) = -1.265355967656595400E-2 " " y[1] (numeric) = -1.265355967656373300E-2 " " absolute error = 2.22218077272629000000000000000E-15 " " relative error = 1.756170460745293500000000000E-11 "%" Correct digits = 14 h = 1.00E-2 " " "NO INFO (given) for Equation 1" Radius of convergence (ratio test) for eq 1 = 17.384353737088166 " " "Order of pole (ratio test) Not computed" Radius of convergence (three term test) for eq 1 = 216.49997926025594 " " Order of pole (three term test) = -5734.79561432378 " " "NO COMPLEX POLE (six term test) for Equation 1" " " "TOP MAIN SOLVE Loop" x[1] = 4.749999999999942 " " y[1] (analytic) = -1.254495804452554500E-2 " " y[1] (numeric) = -1.25449580445233200E-2 " " absolute error = 2.2256502196782435000000000000000E-15 " " relative error = 1.774139229305344800000000000E-11 "%" Correct digits = 14 h = 1.00E-2 " " "NO INFO (given) for Equation 1" Radius of convergence (ratio test) for eq 1 = 17.38297873611499 " " "Order of pole (ratio test) Not computed" Radius of convergence (three term test) for eq 1 = 216.5773877273499 " " Order of pole (three term test) = -5737.029456504496 " " Radius of convergence (six term test) for eq 1 = 1697.5216853897018 " " Order of pole (six term test) = 199061.4304920819 " " " " "TOP MAIN SOLVE Loop" x[1] = 4.759999999999942 " " y[1] (analytic) = -1.243726484516780300E-2 " " y[1] (numeric) = -1.243726484516557700E-2 " " absolute error = 2.2273849431542203000000000000000E-15 " " relative error = 1.790896126184541600000000000E-11 "%" Correct digits = 14 h = 1.00E-2 " " "NO INFO (given) for Equation 1" Radius of convergence (ratio test) for eq 1 = 17.38160136278522 " " "Order of pole (ratio test) Not computed" Radius of convergence (three term test) for eq 1 = 216.30453967080345 " " Order of pole (three term test) = -5729.968502241378 " " "NO COMPLEX POLE (six term test) for Equation 1" " " "TOP MAIN SOLVE Loop" x[1] = 4.769999999999942 " " y[1] (analytic) = -1.233047275257266600E-2 " " y[1] (numeric) = -1.233047275257043700E-2 " " absolute error = 2.229119666630197000000000000000E-15 " " relative error = 1.807813626744446700000000000E-11 "%" Correct digits = 14 h = 1.00E-2 " " "NO INFO (given) for Equation 1" Radius of convergence (ratio test) for eq 1 = 17.380221650612675 " " "Order of pole (ratio test) Not computed" Radius of convergence (three term test) for eq 1 = 215.9284430648382 " " Order of pole (three term test) = -5720.170564798254 " " "NO COMPLEX POLE (six term test) for Equation 1" " " "TOP MAIN SOLVE Loop" x[1] = 4.779999999999942 " " y[1] (analytic) = -1.222457449666820200E-2 " " y[1] (numeric) = -1.222457449666596900E-2 " " absolute error = 2.2325891135821507000000000000000E-15 " " relative error = 1.8263123302906298000000000E-11 "%" Correct digits = 14 h = 1.00E-2 " " "NO INFO (given) for Equation 1" Radius of convergence (ratio test) for eq 1 = 17.378839585772088 " " "Order of pole (ratio test) Not computed" Radius of convergence (three term test) for eq 1 = 215.8673236127325 " " Order of pole (three term test) = -5718.728923967453 " " "NO COMPLEX POLE (six term test) for Equation 1" " " "TOP MAIN SOLVE Loop" x[1] = 4.789999999999941 " " y[1] (analytic) = -1.211956286284452100E-2 " " y[1] (numeric) = -1.211956286284228700E-2 " " absolute error = 2.2343238370581275000000000000000E-15 " " relative error = 1.843568008470002000000000000E-11 "%" Correct digits = 14 h = 1.00E-2 " " "NO INFO (given) for Equation 1" Radius of convergence (ratio test) for eq 1 = 17.377455163974712 " " "Order of pole (ratio test) Not computed" Radius of convergence (three term test) for eq 1 = 215.79931595367256 " " Order of pole (three term test) = -5717.107241102018 " " Radius of convergence (six term test) for eq 1 = 827.4014981602828 " " Order of pole (six term test) = 47248.50107646030 " " " " "TOP MAIN SOLVE Loop" x[1] = 4.799999999999941 " " y[1] (analytic) = -1.201543069156985300E-2 " " y[1] (numeric) = -1.201543069156761600E-2 " " absolute error = 2.237793284010081200000000000000E-15 " " relative error = 1.86243285110049300000000000E-11 "%" Correct digits = 14 h = 1.00E-2 " " "NO INFO (given) for Equation 1" Radius of convergence (ratio test) for eq 1 = 17.376068379507277 " " "Order of pole (ratio test) Not computed" Radius of convergence (three term test) for eq 1 = 215.56774515932128 " " Order of pole (three term test) = -5711.13707403027 " " "NO COMPLEX POLE (six term test) for Equation 1" " " "TOP MAIN SOLVE Loop" x[1] = 4.809999999999941 " " y[1] (analytic) = -1.191217087800874700E-2 " " y[1] (numeric) = -1.19121708780065090E-2 " " absolute error = 2.237793284010081200000000000000E-15 " " relative error = 1.8785772189864300000000000E-11 "%" Correct digits = 14 h = 1.00E-2 " " "NO INFO (given) for Equation 1" Radius of convergence (ratio test) for eq 1 = 17.374679214709918 " " "Order of pole (ratio test) Not computed" Radius of convergence (three term test) for eq 1 = 215.68123837477387 " " Order of pole (three term test) = -5714.331986771429 " " Radius of convergence (six term test) for eq 1 = 1360.9429534004257 " " Order of pole (six term test) = 127012.57830795857 " " " " "TOP MAIN SOLVE Loop" x[1] = 4.819999999999940 " " y[1] (analytic) = -1.180977637164244400E-2 " " y[1] (numeric) = -1.180977637164020400E-2 " " absolute error = 2.239528007486058000000000000000E-15 " " relative error = 1.896333966884925800000000000E-11 "%" Correct digits = 14 h = 1.00E-2 " " "NO INFO (given) for Equation 1" Radius of convergence (ratio test) for eq 1 = 17.373287676763393 " " "Order of pole (ratio test) Not computed" Radius of convergence (three term test) for eq 1 = 215.33052359988199 " " Order of pole (three term test) = -5705.206252729478 " " Radius of convergence (six term test) for eq 1 = 1148.7944077400848 " " Order of pole (six term test) = 90439.4615817526 " " " " "TOP MAIN SOLVE Loop" x[1] = 4.829999999999940 " " y[1] (analytic) = -1.17082401758913680E-2 " " y[1] (numeric) = -1.170824017588912600E-2 " " absolute error = 2.2429974544380116000000000000000E-15 " " relative error = 1.915742605841486400000000000E-11 "%" Correct digits = 14 h = 1.00E-2 " " "NO INFO (given) for Equation 1" Radius of convergence (ratio test) for eq 1 = 17.371893753481253 " " "Order of pole (ratio test) Not computed" Radius of convergence (three term test) for eq 1 = 215.1975626090686 " " Order of pole (three term test) = -5701.857428122137 " " Radius of convergence (six term test) for eq 1 = 1225.9033604071642 " " Order of pole (six term test) = 102814.92119956239 " " " " "TOP MAIN SOLVE Loop" x[1] = 4.83999999999994 " " y[1] (analytic) = -1.16075553477397700E-2 " " y[1] (numeric) = -1.160755534773752500E-2 " " absolute error = 2.2447321779139884000000000000000E-15 " " relative error = 1.93385438248294380000000000E-11 "%" Correct digits = 14 h = 1.00E-2 " " "NO INFO (given) for Equation 1" Radius of convergence (ratio test) for eq 1 = 17.370497421398806 " " "Order of pole (ratio test) Not computed" Radius of convergence (three term test) for eq 1 = 214.98833076314634 " " Order of pole (three term test) = -5696.481190206140 " " "NO COMPLEX POLE (six term test) for Equation 1" " " "TOP MAIN SOLVE Loop" x[1] = 4.84999999999994 " " y[1] (analytic) = -1.15077149973624800E-2 " " y[1] (numeric) = -1.150771499736023300E-2 " " absolute error = 2.246466901389965200000000000000E-15 " " relative error = 1.952139848705713000000000000E-11 "%" Correct digits = 14 h = 1.00E-2 " " "NO INFO (given) for Equation 1" Radius of convergence (ratio test) for eq 1 = 17.36909869872709 " " "Order of pole (ratio test) Not computed" Radius of convergence (three term test) for eq 1 = 214.78379599975938 " " Order of pole (three term test) = -5691.236943154737 " " Radius of convergence (six term test) for eq 1 = 2334.1298008921394 " " Order of pole (six term test) = 370905.7157111649 " " " " "TOP MAIN SOLVE Loop" x[1] = 4.85999999999994 " " y[1] (analytic) = -1.140871228775380700E-2 " " y[1] (numeric) = -1.140871228775155900E-2 " " absolute error = 2.248201624865942000000000000000E-15 " " relative error = 1.970600684951252200000000000E-11 "%" Correct digits = 14 h = 1.00E-2 " " "NO INFO (given) for Equation 1" Radius of convergence (ratio test) for eq 1 = 17.367697599410068 " " "Order of pole (ratio test) Not computed" Radius of convergence (three term test) for eq 1 = 214.57979472459314 " " Order of pole (three term test) = -5685.998993667613 " " "NO COMPLEX POLE (six term test) for Equation 1" " " "TOP MAIN SOLVE Loop" x[1] = 4.86999999999994 " " y[1] (analytic) = -1.131054043435854200E-2 " " y[1] (numeric) = -1.131054043435629200E-2 " " absolute error = 2.2499363483419188000000000000000E-15 " " relative error = 1.9892385880228900000000000E-11 "%" Correct digits = 14 h = 1.00E-2 " " "NO INFO (given) for Equation 1" Radius of convergence (ratio test) for eq 1 = 17.366294060160442 " " "Order of pole (ratio test) Not computed" Radius of convergence (three term test) for eq 1 = 214.5077679100546 " " Order of pole (three term test) = -5684.272662664156 " " Radius of convergence (six term test) for eq 1 = 1763.8345783071427 " " Order of pole (six term test) = 211336.9828630499 " " " " "TOP MAIN SOLVE Loop" x[1] = 4.8799999999999395 " " y[1] (analytic) = -1.121319270470507600E-2 " " y[1] (numeric) = -1.121319270470282200E-2 " " absolute error = 2.2534057952938724000000000000000E-15 " " relative error = 2.009602309205244800000000000E-11 "%" Correct digits = 14 h = 1.00E-2 " " "NO INFO (given) for Equation 1" Radius of convergence (ratio test) for eq 1 = 17.364888122588223 " " "Order of pole (ratio test) Not computed" Radius of convergence (three term test) for eq 1 = 214.31219427085443 " " Order of pole (three term test) = -5679.261614478356 " " Radius of convergence (six term test) for eq 1 = 1772.109480745499 " " Order of pole (six term test) = 213056.12835484854 " " " " "TOP MAIN SOLVE Loop" x[1] = 4.889999999999940 " " y[1] (analytic) = -1.111666241804063500E-2 " " y[1] (numeric) = -1.111666241803837800E-2 " " absolute error = 2.256875242245826000000000000000E-15 " " relative error = 2.030173407607722700000000000E-11 "%" Correct digits = 14 h = 1.00E-2 " " "NO INFO (given) for Equation 1" Radius of convergence (ratio test) for eq 1 = 17.363479754815494 " " "Order of pole (ratio test) Not computed" Radius of convergence (three term test) for eq 1 = 214.2700572910053 " " Order of pole (three term test) = -5678.323953452956 " " Radius of convergence (six term test) for eq 1 = 2616.199000162787 " " Order of pole (six term test) = 463414.54106933123 " " " " "TOP MAIN SOLVE Loop" x[1] = 4.899999999999939 " " y[1] (analytic) = -1.102094294496860600E-2 " " y[1] (numeric) = -1.102094294496634700E-2 " " absolute error = 2.258609965721802800000000000000E-15 " " relative error = 2.04937996412813900000000000E-11 "%" Correct digits = 14 h = 1.00E-2 " " "NO INFO (given) for Equation 1" Radius of convergence (ratio test) for eq 1 = 17.362068964528877 " " "Order of pole (ratio test) Not computed" Radius of convergence (three term test) for eq 1 = 214.05156350662008 " " Order of pole (three term test) = -5672.70398358951 " " "NO COMPLEX POLE (six term test) for Equation 1" " " "TOP MAIN SOLVE Loop" x[1] = 4.909999999999939 " " y[1] (analytic) = -1.092602770708797400E-2 " " y[1] (numeric) = -1.092602770708571300E-2 " " absolute error = 2.2603446891977796000000000000000E-15 " " relative error = 2.068770782753406600000000000E-11 "%" Correct digits = 14 h = 1.00E-2 " " "NO INFO (given) for Equation 1" Radius of convergence (ratio test) for eq 1 = 17.36065573964957 " " "Order of pole (ratio test) Not computed" Radius of convergence (three term test) for eq 1 = 213.88729368023573 " " Order of pole (three term test) = -5668.52527108782 " " Radius of convergence (six term test) for eq 1 = 1482.6197827037854 " " Order of pole (six term test) = 148634.65191398913 " " " " "TOP MAIN SOLVE Loop" x[1] = 4.919999999999939 " " y[1] (analytic) = -1.08319101766348300E-2 " " y[1] (numeric) = -1.08319101766325700E-2 " " absolute error = 2.2603446891977796000000000000000E-15 " " relative error = 2.08674615311480100000000000E-11 "%" Correct digits = 14 h = 1.00E-2 " " "NO INFO (given) for Equation 1" Radius of convergence (ratio test) for eq 1 = 17.359240076225564 " " "Order of pole (ratio test) Not computed" Radius of convergence (three term test) for eq 1 = 213.63549770642325 " " Order of pole (three term test) = -5662.021462534666 " " "NO COMPLEX POLE (six term test) for Equation 1" " " "TOP MAIN SOLVE Loop" x[1] = 4.929999999999938 " " y[1] (analytic) = -1.073858387612599300E-2 " " y[1] (numeric) = -1.073858387612372800E-2 " " absolute error = 2.2638141361497333000000000000000E-15 " " relative error = 2.10811235658608800000000000E-11 "%" Correct digits = 14 h = 1.00E-2 " " "NO INFO (given) for Equation 1" Radius of convergence (ratio test) for eq 1 = 17.357821959909803 " " "Order of pole (ratio test) Not computed" Radius of convergence (three term test) for eq 1 = 213.57219524017734 " " Order of pole (three term test) = -5660.521247599763 " " "NO COMPLEX POLE (six term test) for Equation 1" " " "TOP MAIN SOLVE Loop" x[1] = 4.939999999999938 " " y[1] (analytic) = -1.064604237800466900E-2 " " y[1] (numeric) = -1.064604237800240200E-2 " " absolute error = 2.267283583101687000000000000000E-15 " " relative error = 2.129696184364270600000000000E-11 "%" Correct digits = 14 h = 1.00E-2 " " "NO INFO (given) for Equation 1" Radius of convergence (ratio test) for eq 1 = 17.356401385565004 " " "Order of pole (ratio test) Not computed" Radius of convergence (three term test) for eq 1 = 213.3818034311447 " " Order of pole (three term test) = -5655.650166925809 " " Radius of convergence (six term test) for eq 1 = 2364.8955021682546 " " Order of pole (six term test) = 376113.05619125796 " " " " "TOP MAIN SOLVE Loop" x[1] = 4.949999999999938 " " y[1] (analytic) = -1.055427930428822600E-2 " " y[1] (numeric) = -1.055427930428595700E-2 " " absolute error = 2.2690183065776637000000000000000E-15 " " relative error = 2.149856225290301400000000000E-11 "%" Correct digits = 14 h = 1.00E-2 " " "NO INFO (given) for Equation 1" Radius of convergence (ratio test) for eq 1 = 17.354978357919137 " " "Order of pole (ratio test) Not computed" Radius of convergence (three term test) for eq 1 = 213.21543364902374 " " Order of pole (three term test) = -5651.4137638200855 " " "NO COMPLEX POLE (six term test) for Equation 1" " " "TOP MAIN SOLVE Loop" x[1] = 4.959999999999938 " " y[1] (analytic) = -1.046328832621801500E-2 " " y[1] (numeric) = -1.046328832621574700E-2 " " absolute error = 2.2690183065776637000000000000000E-15 " " relative error = 2.168551831733577500000000000E-11 "%" Correct digits = 14 h = 1.00E-2 " " "NO INFO (given) for Equation 1" Radius of convergence (ratio test) for eq 1 = 17.353552867757273 " " "Order of pole (ratio test) Not computed" Radius of convergence (three term test) for eq 1 = 212.96365403619356 " " Order of pole (three term test) = -5644.910328022408 " " Radius of convergence (six term test) for eq 1 = 6183.615649473727 " " Order of pole (six term test) = 2562987.0369337904 " " " " "TOP MAIN SOLVE Loop" x[1] = 4.969999999999938 " " y[1] (analytic) = -1.037306316391125300E-2 " " y[1] (numeric) = -1.037306316390898300E-2 " " absolute error = 2.2707530300536405000000000000000E-15 " " relative error = 2.18908628451601300000000000E-11 "%" Correct digits = 14 h = 1.00E-2 " " "NO INFO (given) for Equation 1" Radius of convergence (ratio test) for eq 1 = 17.352124893574047 " " "Order of pole (ratio test) Not computed" Radius of convergence (three term test) for eq 1 = 212.83832589990644 " " Order of pole (three term test) = -5641.762429081496 " " "NO COMPLEX POLE (six term test) for Equation 1" " " "TOP MAIN SOLVE Loop" x[1] = 4.979999999999937 " " y[1] (analytic) = -1.028359758601495200E-2 " " y[1] (numeric) = -1.028359758601267700E-2 " " absolute error = 2.274222477005594000000000000000E-15 " " relative error = 2.211504736531497700000000000E-11 "%" Correct digits = 14 h = 1.00E-2 " " "NO INFO (given) for Equation 1" Radius of convergence (ratio test) for eq 1 = 17.350694451311547 " " "Order of pole (ratio test) Not computed" Radius of convergence (three term test) for eq 1 = 212.65228337017138 " " Order of pole (three term test) = -5637.005777909836 " " "NO COMPLEX POLE (six term test) for Equation 1" " " "TOP MAIN SOLVE Loop" x[1] = 4.989999999999937 " " y[1] (analytic) = -1.019488540936191300E-2 " " y[1] (numeric) = -1.019488540935963700E-2 " " absolute error = 2.275957200481571000000000000000E-15 " " relative error = 2.232450007129624400000000000E-11 "%" Correct digits = 14 h = 1.00E-2 " " "NO INFO (given) for Equation 1" Radius of convergence (ratio test) for eq 1 = 17.349261506537633 " " "Order of pole (ratio test) Not computed" Radius of convergence (three term test) for eq 1 = 212.35904159802985 " " Order of pole (three term test) = -5629.400850075990 " " "NO COMPLEX POLE (six term test) for Equation 1" " " "TOP MAIN SOLVE Loop" x[1] = 4.999999999999937 " " y[1] (analytic) = -1.010692049862875500E-2 " " y[1] (numeric) = -1.010692049862647700E-2 " " absolute error = 2.2776919239575477000000000000000E-15 " " relative error = 2.253596359312978700000000000E-11 "%" Correct digits = 14 h = 1.00E-2 " " "NO INFO (given) for Equation 1" Radius of convergence (ratio test) for eq 1 = 17.347826091112786 " " "Order of pole (ratio test) Not computed" Radius of convergence (three term test) for eq 1 = 212.33181588496643 " " Order of pole (three term test) = -5628.858405793741 " " "NO COMPLEX POLE (six term test) for Equation 1" "Finished!" "diff ( y , x , 1 ) = (0.2 * x + 0.3) / exp(x);" Iterations = 401 "Total Elapsed Time "= 0 Years 0 Days 0 Hours 2 Minutes 34 Seconds "Elapsed Time(since restart) "= 0 Years 0 Days 0 Hours 2 Minutes 29 Seconds "Time to Timeout "= 0 Years 0 Days 0 Hours 0 Minutes 25 Seconds Percent Done = 100.49999999999841 "%" (%o58) true (%o58) diffeq.max