(%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_0D1 array_x ,
1 1 1
array_tmp2 : exp(array_tmp1 ), array_tmp3 : array_const_0D2 array_x ,
1 1 1 1 1
array_tmp2
1
array_tmp4 : exp(array_tmp3 ), array_tmp5 : -----------,
1 1 1 array_tmp4
1
array_tmp6 : array_tmp5 + array_const_0D0 ,
1 1 1
if not array_y_set_initial then (if 1 <= glob_max_terms
1, 2
then (temporary : array_tmp6 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_0D1 array_x ,
2 1 2
array_tmp2 array_tmp1
1 2
array_tmp2 : -----------------------,
2 1
array_tmp3 : array_const_0D2 array_x ,
2 1 2
array_tmp4 array_tmp3
1 2
array_tmp4 : -----------------------,
2 1
array_tmp2 - ats(2, array_tmp4, array_tmp5, 2)
2
array_tmp5 : -----------------------------------------------,
2 array_tmp4
1
array_tmp6 : array_tmp5 , if not array_y_set_initial
2 2 1, 3
then (if 2 <= glob_max_terms then (temporary :
array_tmp6 expt(glob_h, 1) factorial_3(1, 2), array_y : temporary,
2 3
temporary 2.0
array_y_higher : temporary, temporary : -------------,
1, 3 glob_h
array_y_higher : temporary, 0)), kkk : 3,
2, 2
array_tmp2 array_tmp1 array_tmp4 array_tmp3
2 2 2 2
array_tmp2 : -----------------------, array_tmp4 : -----------------------,
3 2 3 2
array_tmp2 - ats(3, array_tmp4, array_tmp5, 2)
3
array_tmp5 : -----------------------------------------------,
3 array_tmp4
1
array_tmp6 : array_tmp5 , if not array_y_set_initial
3 3 1, 4
then (if 3 <= glob_max_terms then (temporary :
array_tmp6 expt(glob_h, 1) factorial_3(2, 3), array_y : temporary,
3 4
temporary 3.0
array_y_higher : temporary, temporary : -------------,
1, 4 glob_h
array_y_higher : temporary, 0)), kkk : 4,
2, 3
array_tmp2 array_tmp1 array_tmp4 array_tmp3
3 2 3 2
array_tmp2 : -----------------------, array_tmp4 : -----------------------,
4 3 4 3
array_tmp2 - ats(4, array_tmp4, array_tmp5, 2)
4
array_tmp5 : -----------------------------------------------,
4 array_tmp4
1
array_tmp6 : array_tmp5 , if not array_y_set_initial
4 4 1, 5
then (if 4 <= glob_max_terms then (temporary :
array_tmp6 expt(glob_h, 1) factorial_3(3, 4), array_y : temporary,
4 5
temporary 4.0
array_y_higher : temporary, temporary : -------------,
1, 5 glob_h
array_y_higher : temporary, 0)), kkk : 5,
2, 4
array_tmp2 array_tmp1 array_tmp4 array_tmp3
4 2 4 2
array_tmp2 : -----------------------, array_tmp4 : -----------------------,
5 4 5 4
array_tmp2 - ats(5, array_tmp4, array_tmp5, 2)
5
array_tmp5 : -----------------------------------------------,
5 array_tmp4
1
array_tmp6 : array_tmp5 , if not array_y_set_initial
5 5 1, 6
then (if 5 <= glob_max_terms then (temporary :
array_tmp6 expt(glob_h, 1) factorial_3(4, 5), array_y : temporary,
5 6
temporary 5.0
array_y_higher : temporary, temporary : -------------,
1, 6 glob_h
array_y_higher : temporary, 0)), kkk : 6,
2, 5
while kkk <= glob_max_terms do (array_tmp2 :
kkk
array_tmp2 array_tmp1 array_tmp4 array_tmp3
kkk - 1 2 kkk - 1 2
-----------------------------, array_tmp4 : -----------------------------,
kkk - 1 kkk kkk - 1
array_tmp2 - ats(kkk, array_tmp4, array_tmp5, 2)
kkk
array_tmp5 : ---------------------------------------------------,
kkk array_tmp4
1
array_tmp6 : array_tmp5 , 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_tmp6 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_0D1 array_x ,
1 1 1
array_tmp2 : exp(array_tmp1 ), array_tmp3 : array_const_0D2 array_x ,
1 1 1 1 1
array_tmp2
1
array_tmp4 : exp(array_tmp3 ), array_tmp5 : -----------,
1 1 1 array_tmp4
1
array_tmp6 : array_tmp5 + array_const_0D0 ,
1 1 1
if not array_y_set_initial then (if 1 <= glob_max_terms
1, 2
then (temporary : array_tmp6 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_0D1 array_x ,
2 1 2
array_tmp2 array_tmp1
1 2
array_tmp2 : -----------------------,
2 1
array_tmp3 : array_const_0D2 array_x ,
2 1 2
array_tmp4 array_tmp3
1 2
array_tmp4 : -----------------------,
2 1
array_tmp2 - ats(2, array_tmp4, array_tmp5, 2)
2
array_tmp5 : -----------------------------------------------,
2 array_tmp4
1
array_tmp6 : array_tmp5 , if not array_y_set_initial
2 2 1, 3
then (if 2 <= glob_max_terms then (temporary :
array_tmp6 expt(glob_h, 1) factorial_3(1, 2), array_y : temporary,
2 3
temporary 2.0
array_y_higher : temporary, temporary : -------------,
1, 3 glob_h
array_y_higher : temporary, 0)), kkk : 3,
2, 2
array_tmp2 array_tmp1 array_tmp4 array_tmp3
2 2 2 2
array_tmp2 : -----------------------, array_tmp4 : -----------------------,
3 2 3 2
array_tmp2 - ats(3, array_tmp4, array_tmp5, 2)
3
array_tmp5 : -----------------------------------------------,
3 array_tmp4
1
array_tmp6 : array_tmp5 , if not array_y_set_initial
3 3 1, 4
then (if 3 <= glob_max_terms then (temporary :
array_tmp6 expt(glob_h, 1) factorial_3(2, 3), array_y : temporary,
3 4
temporary 3.0
array_y_higher : temporary, temporary : -------------,
1, 4 glob_h
array_y_higher : temporary, 0)), kkk : 4,
2, 3
array_tmp2 array_tmp1 array_tmp4 array_tmp3
3 2 3 2
array_tmp2 : -----------------------, array_tmp4 : -----------------------,
4 3 4 3
array_tmp2 - ats(4, array_tmp4, array_tmp5, 2)
4
array_tmp5 : -----------------------------------------------,
4 array_tmp4
1
array_tmp6 : array_tmp5 , if not array_y_set_initial
4 4 1, 5
then (if 4 <= glob_max_terms then (temporary :
array_tmp6 expt(glob_h, 1) factorial_3(3, 4), array_y : temporary,
4 5
temporary 4.0
array_y_higher : temporary, temporary : -------------,
1, 5 glob_h
array_y_higher : temporary, 0)), kkk : 5,
2, 4
array_tmp2 array_tmp1 array_tmp4 array_tmp3
4 2 4 2
array_tmp2 : -----------------------, array_tmp4 : -----------------------,
5 4 5 4
array_tmp2 - ats(5, array_tmp4, array_tmp5, 2)
5
array_tmp5 : -----------------------------------------------,
5 array_tmp4
1
array_tmp6 : array_tmp5 , if not array_y_set_initial
5 5 1, 6
then (if 5 <= glob_max_terms then (temporary :
array_tmp6 expt(glob_h, 1) factorial_3(4, 5), array_y : temporary,
5 6
temporary 5.0
array_y_higher : temporary, temporary : -------------,
1, 6 glob_h
array_y_higher : temporary, 0)), kkk : 6,
2, 5
while kkk <= glob_max_terms do (array_tmp2 :
kkk
array_tmp2 array_tmp1 array_tmp4 array_tmp3
kkk - 1 2 kkk - 1 2
-----------------------------, array_tmp4 : -----------------------------,
kkk - 1 kkk kkk - 1
array_tmp2 - ats(kkk, array_tmp4, array_tmp5, 2)
kkk
array_tmp5 : ---------------------------------------------------,
kkk array_tmp4
1
array_tmp6 : array_tmp5 , 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_tmp6 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)
10.0 exp(0.1 x)
(%i56) exact_soln_y(x) := block(- ---------------)
exp(0.2 x)
10.0 exp(0.1 x)
(%o56) exact_soln_y(x) := block(- ---------------)
exp(0.2 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_exp_exppostode.ode#################"),
omniout_str(ALWAYS, "diff ( y , x , 1 ) = exp(0.1 * x) / exp(0.2 * 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:-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, " (- 10.0 * (exp(0.1* x)/exp(0.2*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_tmp6, 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_tmp6 : 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_tmp6, 1 + 1 + max_terms), term : 1,
while term <= 1 + max_terms do (array_tmp6 : 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_0D1, 1 + 1 + max_terms), term : 1,
1
while term <= 1 + max_terms do (array_const_0D1 : 0.0, term : 1 + term),
term
array_const_0D1 : 0.1, 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_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),
iiif, jjjf
x_start : - 5.0, 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 ) = exp(0.1 * x) / exp(0.2 * 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:31:42-05:00"), logitem_str(html_log_file, "Maxima"),
logitem_str(html_log_file, "div_exp_exp"),
logitem_str(html_log_file,
"diff ( y , x , 1 ) = exp(0.1 * x) / exp(0.2 * 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_exp_exp diffeq.max"),
logitem_str(html_log_file,
"div_exp_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_exp_exppostode.ode#################"),
omniout_str(ALWAYS, "diff ( y , x , 1 ) = exp(0.1 * x) / exp(0.2 * 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:-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, " (- 10.0 * (exp(0.1* x)/exp(0.2*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_tmp6, 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_tmp6 : 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_tmp6, 1 + 1 + max_terms), term : 1,
while term <= 1 + max_terms do (array_tmp6 : 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_0D1, 1 + 1 + max_terms), term : 1,
1
while term <= 1 + max_terms do (array_const_0D1 : 0.0, term : 1 + term),
term
array_const_0D1 : 0.1, 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_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),
iiif, jjjf
x_start : - 5.0, 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 ) = exp(0.1 * x) / exp(0.2 * 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:31:42-05:00"), logitem_str(html_log_file, "Maxima"),
logitem_str(html_log_file, "div_exp_exp"),
logitem_str(html_log_file,
"diff ( y , x , 1 ) = exp(0.1 * x) / exp(0.2 * 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_exp_exp diffeq.max"),
logitem_str(html_log_file,
"div_exp_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_exp_exppostode.ode#################"
"diff ( y , x , 1 ) = exp(0.1 * x) / exp(0.2 * x);"
"!"
"/* BEGIN FIRST INPUT BLOCK */"
"Digits:32,"
"max_terms:30,"
"!"
"/* END FIRST INPUT BLOCK */"
"/* BEGIN SECOND INPUT BLOCK */"
"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("
" (- 10.0 * (exp(0.1* x)/exp(0.2*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 = 10. ""
estimated_steps = 10000000. ""
step_error = 1.00000000000000000E-17 ""
est_needed_step_err = 1.00000000000000000E-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 = 5.6368280453561440000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000E-208 ""
estimated_step_error = 5.6368280453561440000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000E-208 ""
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 = 3.782811254254841400000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000E-200 ""
estimated_step_error = 3.782811254254841400000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000E-200 ""
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 = 2.5386016430602293000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000E-192 ""
estimated_step_error = 2.5386016430602293000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000E-192 ""
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.70362670141416120000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000E-184 ""
estimated_step_error = 1.70362670141416120000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000E-184 ""
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 = 1.143284495613513100000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000E-176 ""
estimated_step_error = 1.143284495613513100000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000E-176 ""
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 = 7.6724519634963320000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000E-169 ""
estimated_step_error = 7.6724519634963320000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000E-169 ""
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 = 5.14889480409744800000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000E-161 ""
estimated_step_error = 5.14889480409744800000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000E-161 ""
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 = 3.4553640739908975000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000E-153 ""
estimated_step_error = 3.4553640739908975000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000E-153 ""
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 = 2.31885458713881330000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000E-145 ""
estimated_step_error = 2.31885458713881330000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000E-145 ""
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.556155642514531800000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000E-137 ""
estimated_step_error = 1.556155642514531800000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000E-137 ""
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 = 1.0443165903859862000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000E-129 ""
estimated_step_error = 1.0443165903859862000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000E-129 ""
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 = 7.00826606786331200000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000E-122 ""
estimated_step_error = 7.00826606786331200000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000E-122 ""
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 = 4.703135618711795000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000E-114 ""
estimated_step_error = 4.703135618711795000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000E-114 ""
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 = 3.1561777696291610000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000E-106 ""
estimated_step_error = 3.1561777696291610000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000E-106 ""
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 = 2.118017181604082700000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000E-98 ""
estimated_step_error = 2.118017181604082700000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000E-98 ""
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.421299616411336000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000E-90 ""
estimated_step_error = 1.421299616411336000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000E-90 ""
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 = 9.53713834495813300000000000000000000000000000000000000000000000000000000000000000000000000000000000E-83 ""
estimated_step_error = 9.53713834495813300000000000000000000000000000000000000000000000000000000000000000000000000000000000E-83 ""
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 = 6.398867634513362000000000000000000000000000000000000000000000000000000000000000000000000000E-75 ""
estimated_step_error = 6.398867634513362000000000000000000000000000000000000000000000000000000000000000000000000000E-75 ""
best_h = 0.1 ""
"START of Soultion"
" "
"TOP MAIN SOLVE Loop"
x[1] = -5. " "
y[1] (analytic) = -16.487212707001284 " "
y[1] (numeric) = -16.487212707001284 " "
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 = 190.00294657112272 " "
"Order of pole (ratio test) Not computed"
Radius of convergence (three term test) for eq 1 = 0.8168131581790775 " "
Order of pole (three term test) = -35.14436557259958 " "
"NO COMPLEX POLE (six term test) for Equation 1"
" "
"TOP MAIN SOLVE Loop"
x[1] = -4.99 " "
y[1] (analytic) = -16.470733735153452 " "
y[1] (numeric) = -16.470733735153456 " "
absolute error = 3.552713678800501000000000000000E-15 " "
relative error = 2.156985678918451600000000000000E-14 "%"
Correct digits = 17
h = 1.00E-2 " "
"NO INFO (given) for Equation 1"
Radius of convergence (ratio test) for eq 1 = 190.00294820128363 " "
"Order of pole (ratio test) Not computed"
"NO REAL POLE (three term test) for Equation 1"
"NO COMPLEX POLE (six term test) for Equation 1"
" "
"TOP MAIN SOLVE Loop"
x[1] = -4.98 " "
y[1] (analytic) = -16.454271234040732 " "
y[1] (numeric) = -16.454271234040732 " "
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 = 190.01565426115832 " "
"Order of pole (ratio test) Not computed"
"NO REAL POLE (three term test) for Equation 1"
"NO COMPLEX POLE (six term test) for Equation 1"
" "
"TOP MAIN SOLVE Loop"
x[1] = -4.970000000000000 " "
y[1] (analytic) = -16.437825187200616 " "
y[1] (numeric) = -16.437825187200616 " "
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 = 189.98870972839717 " "
"Order of pole (ratio test) Not computed"
"NO REAL POLE (three term test) for Equation 1"
"NO COMPLEX POLE (six term test) for Equation 1"
" "
"TOP MAIN SOLVE Loop"
x[1] = -4.960000000000000 " "
y[1] (analytic) = -16.421395578187056 " "
y[1] (numeric) = -16.421395578187056 " "
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 = 189.99721787868228 " "
"Order of pole (ratio test) Not computed"
Radius of convergence (three term test) for eq 1 = 4.681003334106433 " "
Order of pole (three term test) = -9.4103086895943 " "
Radius of convergence (six term test) for eq 1 = 35.983032031447664 " "
Order of pole (six term test) = -11.328802902844917 " "
" "
"TOP MAIN SOLVE Loop"
x[1] = -4.950000000000001 " "
y[1] (analytic) = -16.404982390570446 " "
y[1] (numeric) = -16.404982390570442 " "
absolute error = 3.552713678800501000000000000000E-15 " "
relative error = 2.165630900550429300000000000000E-14 "%"
Correct digits = 17
h = 1.00E-2 " "
"NO INFO (given) for Equation 1"
Radius of convergence (ratio test) for eq 1 = 190.00295956804567 " "
"Order of pole (ratio test) Not computed"
Radius of convergence (three term test) for eq 1 = 0.160331197818971 " "
Order of pole (three term test) = -27.49382142229786 " "
"NO COMPLEX POLE (six term test) for Equation 1"
" "
"TOP MAIN SOLVE Loop"
x[1] = -4.940000000000001 " "
y[1] (analytic) = -16.388585607937586 " "
y[1] (numeric) = -16.388585607937586 " "
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 = 190.0026225060406 " "
"Order of pole (ratio test) Not computed"
"NO REAL POLE (three term test) for Equation 1"
"NO COMPLEX POLE (six term test) for Equation 1"
" "
"TOP MAIN SOLVE Loop"
x[1] = -4.9300000000000015 " "
y[1] (analytic) = -16.372205213891704 " "
y[1] (numeric) = -16.372205213891704 " "
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 = 190.01107043157154 " "
"Order of pole (ratio test) Not computed"
"NO REAL POLE (three term test) for Equation 1"
"NO COMPLEX POLE (six term test) for Equation 1"
" "
"TOP MAIN SOLVE Loop"
x[1] = -4.920000000000002 " "
y[1] (analytic) = -16.355841192052402 " "
y[1] (numeric) = -16.3558411920524 " "
absolute error = 3.552713678800501000000000000000E-15 " "
relative error = 2.17213754834378580000000000000E-14 "%"
Correct digits = 17
h = 1.00E-2 " "
"NO INFO (given) for Equation 1"
Radius of convergence (ratio test) for eq 1 = 190.0068217338367 " "
"Order of pole (ratio test) Not computed"
"NO REAL POLE (three term test) for Equation 1"
"NO COMPLEX POLE (six term test) for Equation 1"
" "
"TOP MAIN SOLVE Loop"
x[1] = -4.910000000000002 " "
y[1] (analytic) = -16.33949352605565 " "
y[1] (numeric) = -16.33949352605565 " "
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 = 190.0008007298225 " "
"Order of pole (ratio test) Not computed"
Radius of convergence (three term test) for eq 1 = 0.990660488741093 " "
Order of pole (three term test) = -1.9744697686424786 " "
Radius of convergence (six term test) for eq 1 = 18.71886269613598 " "
Order of pole (six term test) = -12.057216573654157 " "
" "
"TOP MAIN SOLVE Loop"
x[1] = -4.900000000000002 " "
y[1] (analytic) = -16.323162199553792 " "
y[1] (numeric) = -16.323162199553792 " "
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 = 190.01331434868052 " "
"Order of pole (ratio test) Not computed"
"NO REAL POLE (three term test) for Equation 1"
"NO COMPLEX POLE (six term test) for Equation 1"
" "
"TOP MAIN SOLVE Loop"
x[1] = -4.890000000000002 " "
y[1] (analytic) = -16.306847196215497 " "
y[1] (numeric) = -16.30684719621549 " "
absolute error = 7.105427357601002000000000000000E-15 " "
relative error = 4.35732749077947700000000000000E-14 "%"
Correct digits = 17
h = 1.00E-2 " "
"NO INFO (given) for Equation 1"
Radius of convergence (ratio test) for eq 1 = 189.99852961724707 " "
"Order of pole (ratio test) Not computed"
"NO REAL POLE (three term test) for Equation 1"
"NO COMPLEX POLE (six term test) for Equation 1"
" "
"TOP MAIN SOLVE Loop"
x[1] = -4.880000000000003 " "
y[1] (analytic) = -16.290548499725748 " "
y[1] (numeric) = -16.290548499725745 " "
absolute error = 3.552713678800501000000000000000E-15 " "
relative error = 2.180843498830202800000000000000E-14 "%"
Correct digits = 17
h = 1.00E-2 " "
"NO INFO (given) for Equation 1"
Radius of convergence (ratio test) for eq 1 = 189.98706325805642 " "
"Order of pole (ratio test) Not computed"
Radius of convergence (three term test) for eq 1 = 3.5507414441863023 " "
Order of pole (three term test) = -9.219189166686865 " "
Radius of convergence (six term test) for eq 1 = 12.705963706805512 " "
Order of pole (six term test) = -12.08623627167011 " "
" "
"TOP MAIN SOLVE Loop"
x[1] = -4.870000000000003 " "
y[1] (analytic) = -16.27426609378586 " "
y[1] (numeric) = -16.274266093785855 " "
absolute error = 7.105427357601002000000000000000E-15 " "
relative error = 4.366050866228693400000000000000E-14 "%"
Correct digits = 17
h = 1.00E-2 " "
"NO INFO (given) for Equation 1"
Radius of convergence (ratio test) for eq 1 = 189.9843864180087 " "
"Order of pole (ratio test) Not computed"
"NO REAL POLE (three term test) for Equation 1"
"NO COMPLEX POLE (six term test) for Equation 1"
" "
"TOP MAIN SOLVE Loop"
x[1] = -4.860000000000003 " "
y[1] (analytic) = -16.25799996211342 " "
y[1] (numeric) = -16.257999962113416 " "
absolute error = 3.552713678800501000000000000000E-15 " "
relative error = 2.185209550424106500000000000000E-14 "%"
Correct digits = 17
h = 1.00E-2 " "
"NO INFO (given) for Equation 1"
Radius of convergence (ratio test) for eq 1 = 190.00507003861145 " "
"Order of pole (ratio test) Not computed"
Radius of convergence (three term test) for eq 1 = 38.65987034781508 " "
Order of pole (three term test) = -56.43549673773594 " "
"NO COMPLEX POLE (six term test) for Equation 1"
" "
"TOP MAIN SOLVE Loop"
x[1] = -4.850000000000003 " "
y[1] (analytic) = -16.2417500884423 " "
y[1] (numeric) = -16.241750088442295 " "
absolute error = 3.552713678800501000000000000000E-15 " "
relative error = 2.187395852943598600000000000000E-14 "%"
Correct digits = 17
h = 1.00E-2 " "
"NO INFO (given) for Equation 1"
Radius of convergence (ratio test) for eq 1 = 190.0108559360667 " "
"Order of pole (ratio test) Not computed"
"NO REAL POLE (three term test) for Equation 1"
"NO COMPLEX POLE (six term test) for Equation 1"
" "
"TOP MAIN SOLVE Loop"
x[1] = -4.840000000000003 " "
y[1] (analytic) = -16.225516456522623 " "
y[1] (numeric) = -16.225516456522616 " "
absolute error = 7.105427357601002000000000000000E-15 " "
relative error = 4.3791686857182505000000000000E-14 "%"
Correct digits = 17
h = 1.00E-2 " "
"NO INFO (given) for Equation 1"
Radius of convergence (ratio test) for eq 1 = 190.01133579878626 " "
"Order of pole (ratio test) Not computed"
"NO REAL POLE (three term test) for Equation 1"
"NO COMPLEX POLE (six term test) for Equation 1"
" "
"TOP MAIN SOLVE Loop"
x[1] = -4.830000000000004 " "
y[1] (analytic) = -16.209299050120748 " "
y[1] (numeric) = -16.209299050120745 " "
absolute error = 3.552713678800501000000000000000E-15 " "
relative error = 2.191775022359178000000000000000E-14 "%"
Correct digits = 17
h = 1.00E-2 " "
"NO INFO (given) for Equation 1"
Radius of convergence (ratio test) for eq 1 = 190.00790845679688 " "
"Order of pole (ratio test) Not computed"
"NO REAL POLE (three term test) for Equation 1"
"NO COMPLEX POLE (six term test) for Equation 1"
" "
"TOP MAIN SOLVE Loop"
x[1] = -4.820000000000004 " "
y[1] (analytic) = -16.19309785301928 " "
y[1] (numeric) = -16.193097853019275 " "
absolute error = 7.105427357601002000000000000000E-15 " "
relative error = 4.387935787268870700000000000000E-14 "%"
Correct digits = 17
h = 1.00E-2 " "
"NO INFO (given) for Equation 1"
Radius of convergence (ratio test) for eq 1 = 190.0120810662942 " "
"Order of pole (ratio test) Not computed"
Radius of convergence (three term test) for eq 1 = 0.8003164831330788 " "
Order of pole (three term test) = -34.106069928130516 " "
"NO COMPLEX POLE (six term test) for Equation 1"
" "
"TOP MAIN SOLVE Loop"
x[1] = -4.810000000000004 " "
y[1] (analytic) = -16.176912849017015 " "
y[1] (numeric) = -16.176912849017008 " "
absolute error = 7.105427357601002000000000000000E-15 " "
relative error = 4.392325917755538500000000000000E-14 "%"
Correct digits = 17
h = 1.00E-2 " "
"NO INFO (given) for Equation 1"
Radius of convergence (ratio test) for eq 1 = 189.98894699092895 " "
"Order of pole (ratio test) Not computed"
"NO REAL POLE (three term test) for Equation 1"
"NO COMPLEX POLE (six term test) for Equation 1"
" "
"TOP MAIN SOLVE Loop"
x[1] = -4.800000000000004 " "
y[1] (analytic) = -16.160744021928945 " "
y[1] (numeric) = -16.160744021928938 " "
absolute error = 7.105427357601002000000000000000E-15 " "
relative error = 4.3967204405684895000000000000E-14 "%"
Correct digits = 17
h = 1.00E-2 " "
"NO INFO (given) for Equation 1"
Radius of convergence (ratio test) for eq 1 = 190.01011447883297 " "
"Order of pole (ratio test) Not computed"
Radius of convergence (three term test) for eq 1 = 0.14911409510494808 " "
Order of pole (three term test) = -26.69988180633125 " "
"NO COMPLEX POLE (six term test) for Equation 1"
" "
"TOP MAIN SOLVE Loop"
x[1] = -4.7900000000000045 " "
y[1] (analytic) = -16.14459135558624 " "
y[1] (numeric) = -16.144591355586236 " "
absolute error = 3.552713678800501000000000000000E-15 " "
relative error = 2.200559680051124800000000000000E-14 "%"
Correct digits = 17
h = 1.00E-2 " "
"NO INFO (given) for Equation 1"
Radius of convergence (ratio test) for eq 1 = 190.0044953438967 " "
"Order of pole (ratio test) Not computed"
"NO REAL POLE (three term test) for Equation 1"
"NO COMPLEX POLE (six term test) for Equation 1"
" "
"TOP MAIN SOLVE Loop"
x[1] = -4.780000000000005 " "
y[1] (analytic) = -16.12845483383624 " "
y[1] (numeric) = -16.128454833836233 " "
absolute error = 7.105427357601002000000000000000E-15 " "
relative error = 4.40552268075573400000000000000E-14 "%"
Correct digits = 17
h = 1.00E-2 " "
"NO INFO (given) for Equation 1"
Radius of convergence (ratio test) for eq 1 = 189.99398290538247 " "
"Order of pole (ratio test) Not computed"
"NO REAL POLE (three term test) for Equation 1"
"NO COMPLEX POLE (six term test) for Equation 1"
" "
"TOP MAIN SOLVE Loop"
x[1] = -4.770000000000005 " "
y[1] (analytic) = -16.11233444054242 " "
y[1] (numeric) = -16.11233444054241 " "
absolute error = 1.065814103640150300000000000000E-14 " "
relative error = 6.61489561039840100000000000000E-14 "%"
Correct digits = 17
h = 1.00E-2 " "
"NO INFO (given) for Equation 1"
Radius of convergence (ratio test) for eq 1 = 189.98800947632625 " "
"Order of pole (ratio test) Not computed"
"NO REAL POLE (three term test) for Equation 1"
"NO COMPLEX POLE (six term test) for Equation 1"
" "
"TOP MAIN SOLVE Loop"
x[1] = -4.760000000000005 " "
y[1] (analytic) = -16.096230159584376 " "
y[1] (numeric) = -16.09623015958437 " "
absolute error = 7.105427357601002000000000000000E-15 " "
relative error = 4.41434254303957600000000000000E-14 "%"
Correct digits = 17
h = 1.00E-2 " "
"NO INFO (given) for Equation 1"
Radius of convergence (ratio test) for eq 1 = 189.99927438637854 " "
"Order of pole (ratio test) Not computed"
"NO REAL POLE (three term test) for Equation 1"
"NO COMPLEX POLE (six term test) for Equation 1"
" "
"TOP MAIN SOLVE Loop"
x[1] = -4.750000000000005 " "
y[1] (analytic) = -16.08014197485784 " "
y[1] (numeric) = -16.08014197485783 " "
absolute error = 7.105427357601002000000000000000E-15 " "
relative error = 4.418759093489794700000000000000E-14 "%"
Correct digits = 17
h = 1.00E-2 " "
"NO INFO (given) for Equation 1"
Radius of convergence (ratio test) for eq 1 = 189.98651118942257 " "
"Order of pole (ratio test) Not computed"
"NO REAL POLE (three term test) for Equation 1"
"NO COMPLEX POLE (six term test) for Equation 1"
" "
"TOP MAIN SOLVE Loop"
x[1] = -4.7400000000000055 " "
y[1] (analytic) = -16.06406987027461 " "
y[1] (numeric) = -16.064069870274608 " "
absolute error = 3.552713678800501000000000000000E-15 " "
relative error = 2.21159003134973800000000000000E-14 "%"
Correct digits = 17
h = 1.00E-2 " "
"NO INFO (given) for Equation 1"
Radius of convergence (ratio test) for eq 1 = 190.01514796015675 " "
"Order of pole (ratio test) Not computed"
Radius of convergence (three term test) for eq 1 = 0.9260658801292605 " "
Order of pole (three term test) = -38.054959435913084 " "
"NO COMPLEX POLE (six term test) for Equation 1"
" "
"TOP MAIN SOLVE Loop"
x[1] = -4.730000000000006 " "
y[1] (analytic) = -16.0480138297626 " "
y[1] (numeric) = -16.048013829762592 " "
absolute error = 7.105427357601002000000000000000E-15 " "
relative error = 4.42760545508958700000000000000E-14 "%"
Correct digits = 17
h = 1.00E-2 " "
"NO INFO (given) for Equation 1"
Radius of convergence (ratio test) for eq 1 = 190.00845496047475 " "
"Order of pole (ratio test) Not computed"
"NO REAL POLE (three term test) for Equation 1"
"NO COMPLEX POLE (six term test) for Equation 1"
" "
"TOP MAIN SOLVE Loop"
x[1] = -4.720000000000006 " "
y[1] (analytic) = -16.031973837265753 " "
y[1] (numeric) = -16.031973837265745 " "
absolute error = 7.105427357601002000000000000000E-15 " "
relative error = 4.43203527508552240000000000000E-14 "%"
Correct digits = 17
h = 1.00E-2 " "
"NO INFO (given) for Equation 1"
Radius of convergence (ratio test) for eq 1 = 190.01890541866666 " "
"Order of pole (ratio test) Not computed"
"NO REAL POLE (three term test) for Equation 1"
"NO COMPLEX POLE (six term test) for Equation 1"
" "
"TOP MAIN SOLVE Loop"
x[1] = -4.710000000000006 " "
y[1] (analytic) = -16.015949876744077 " "
y[1] (numeric) = -16.01594987674407 " "
absolute error = 7.105427357601002000000000000000E-15 " "
relative error = 4.43646952711710300000000000000E-14 "%"
Correct digits = 17
h = 1.00E-2 " "
"NO INFO (given) for Equation 1"
Radius of convergence (ratio test) for eq 1 = 189.99547011446302 " "
"Order of pole (ratio test) Not computed"
Radius of convergence (three term test) for eq 1 = 4.70953871394719 " "
Order of pole (three term test) = -11.73268745578053 " "
Radius of convergence (six term test) for eq 1 = 22.710051957903453 " "
Order of pole (six term test) = -11.434516100558385 " "
" "
"TOP MAIN SOLVE Loop"
x[1] = -4.700000000000006 " "
y[1] (analytic) = -15.999941932173616 " "
y[1] (numeric) = -15.999941932173607 " "
absolute error = 8.881784197001252000000000000000E-15 " "
relative error = 5.55113526952322400000000000000E-14 "%"
Correct digits = 17
h = 1.00E-2 " "
"NO INFO (given) for Equation 1"
Radius of convergence (ratio test) for eq 1 = 190.00817533989394 " "
"Order of pole (ratio test) Not computed"
"NO REAL POLE (three term test) for Equation 1"
Radius of convergence (six term test) for eq 1 = 48.51818986526502 " "
Order of pole (six term test) = -10.457724514181786 " "
" "
"TOP MAIN SOLVE Loop"
x[1] = -4.690000000000007 " "
y[1] (analytic) = -15.983949987546415 " "
y[1] (numeric) = -15.98394998754641 " "
absolute error = 5.329070518200751000000000000000E-15 " "
relative error = 3.33401350877148230000000000000E-14 "%"
Correct digits = 17
h = 1.00E-2 " "
"NO INFO (given) for Equation 1"
Radius of convergence (ratio test) for eq 1 = 190.00783887078558 " "
"Order of pole (ratio test) Not computed"
"NO REAL POLE (three term test) for Equation 1"
"NO COMPLEX POLE (six term test) for Equation 1"
" "
"TOP MAIN SOLVE Loop"
x[1] = -4.680000000000007 " "
y[1] (analytic) = -15.967974026870538 " "
y[1] (numeric) = -15.967974026870532 " "
absolute error = 5.329070518200751000000000000000E-15 " "
relative error = 3.33734918984281600000000000000E-14 "%"
Correct digits = 17
h = 1.00E-2 " "
"NO INFO (given) for Equation 1"
Radius of convergence (ratio test) for eq 1 = 190.00509163331543 " "
"Order of pole (ratio test) Not computed"
"NO REAL POLE (three term test) for Equation 1"
"NO COMPLEX POLE (six term test) for Equation 1"
" "
"TOP MAIN SOLVE Loop"
x[1] = -4.670000000000007 " "
y[1] (analytic) = -15.95201403417002 " "
y[1] (numeric) = -15.952014034170011 " "
absolute error = 8.881784197001252000000000000000E-15 " "
relative error = 5.56781368043936100000000000000E-14 "%"
Correct digits = 17
h = 1.00E-2 " "
"NO INFO (given) for Equation 1"
Radius of convergence (ratio test) for eq 1 = 189.98908280514183 " "
"Order of pole (ratio test) Not computed"
Radius of convergence (three term test) for eq 1 = 4.477816352639613 " "
Order of pole (three term test) = -13.861480367084974 " "
"NO COMPLEX POLE (six term test) for Equation 1"
" "
"TOP MAIN SOLVE Loop"
x[1] = -4.660000000000007 " "
y[1] (analytic) = -15.936069993484859 " "
y[1] (numeric) = -15.936069993484853 " "
absolute error = 5.329070518200751000000000000000E-15 " "
relative error = 3.344030567372906000000000000000E-14 "%"
Correct digits = 17
h = 1.00E-2 " "
"NO INFO (given) for Equation 1"
Radius of convergence (ratio test) for eq 1 = 190.00321272757014 " "
"Order of pole (ratio test) Not computed"
"NO REAL POLE (three term test) for Equation 1"
"NO COMPLEX POLE (six term test) for Equation 1"
" "
"TOP MAIN SOLVE Loop"
x[1] = -4.6500000000000075 " "
y[1] (analytic) = -15.920141888871024 " "
y[1] (numeric) = -15.920141888871017 " "
absolute error = 7.105427357601002000000000000000E-15 " "
relative error = 4.463168360684054000000000000000E-14 "%"
Correct digits = 17
h = 1.00E-2 " "
"NO INFO (given) for Equation 1"
Radius of convergence (ratio test) for eq 1 = 189.99063090787212 " "
"Order of pole (ratio test) Not computed"
"NO REAL POLE (three term test) for Equation 1"
"NO COMPLEX POLE (six term test) for Equation 1"
" "
"TOP MAIN SOLVE Loop"
x[1] = -4.640000000000008 " "
y[1] (analytic) = -15.904229704400404 " "
y[1] (numeric) = -15.904229704400397 " "
absolute error = 7.105427357601002000000000000000E-15 " "
relative error = 4.46763376137296500000000000000E-14 "%"
Correct digits = 17
h = 1.00E-2 " "
"NO INFO (given) for Equation 1"
Radius of convergence (ratio test) for eq 1 = 189.9976119089567 " "
"Order of pole (ratio test) Not computed"
"NO REAL POLE (three term test) for Equation 1"
"NO COMPLEX POLE (six term test) for Equation 1"
" "
"TOP MAIN SOLVE Loop"
x[1] = -4.630000000000008 " "
y[1] (analytic) = -15.888333424160813 " "
y[1] (numeric) = -15.888333424160805 " "
absolute error = 7.105427357601002000000000000000E-15 " "
relative error = 4.472103629696010400000000000000E-14 "%"
Correct digits = 17
h = 1.00E-2 " "
"NO INFO (given) for Equation 1"
Radius of convergence (ratio test) for eq 1 = 189.998698994731 " "
"Order of pole (ratio test) Not computed"
Radius of convergence (three term test) for eq 1 = 1.9445481372203768 " "
Order of pole (three term test) = -3.662813494862893 " "
Radius of convergence (six term test) for eq 1 = 40.02214971461187 " "
Order of pole (six term test) = -10.51735025033939 " "
" "
"TOP MAIN SOLVE Loop"
x[1] = -4.620000000000008 " "
y[1] (analytic) = -15.87245303225597 " "
y[1] (numeric) = -15.872453032255963 " "
absolute error = 7.105427357601002000000000000000E-15 " "
relative error = 4.476577970123058500000000000000E-14 "%"
Correct digits = 17
h = 1.00E-2 " "
"NO INFO (given) for Equation 1"
Radius of convergence (ratio test) for eq 1 = 190.00875070275356 " "
"Order of pole (ratio test) Not computed"
"NO REAL POLE (three term test) for Equation 1"
"NO COMPLEX POLE (six term test) for Equation 1"
" "
"TOP MAIN SOLVE Loop"
x[1] = -4.610000000000008 " "
y[1] (analytic) = -15.856588512805486 " "
y[1] (numeric) = -15.856588512805477 " "
absolute error = 8.881784197001252000000000000000E-15 " "
relative error = 5.60132098391056200000000000000E-14 "%"
Correct digits = 17
h = 1.00E-2 " "
"NO INFO (given) for Equation 1"
Radius of convergence (ratio test) for eq 1 = 189.99432218649184 " "
"Order of pole (ratio test) Not computed"
"NO REAL POLE (three term test) for Equation 1"
"NO COMPLEX POLE (six term test) for Equation 1"
" "
"TOP MAIN SOLVE Loop"
x[1] = -4.6000000000000085 " "
y[1] (analytic) = -15.840739849944832 " "
y[1] (numeric) = -15.840739849944823 " "
absolute error = 8.881784197001252000000000000000E-15 " "
relative error = 5.606925106488750000000000000000E-14 "%"
Correct digits = 17
h = 1.00E-2 " "
"NO INFO (given) for Equation 1"
Radius of convergence (ratio test) for eq 1 = 189.9968485265957 " "
"Order of pole (ratio test) Not computed"
Radius of convergence (three term test) for eq 1 = 1.2919480037200715 " "
Order of pole (three term test) = -2.7890550327687 " "
Radius of convergence (six term test) for eq 1 = 15.981506563565157 " "
Order of pole (six term test) = -12.080974786126186 " "
" "
"TOP MAIN SOLVE Loop"
x[1] = -4.590000000000009 " "
y[1] (analytic) = -15.82490702782535 " "
y[1] (numeric) = -15.82490702782534 " "
absolute error = 1.065814103640150300000000000000E-14 " "
relative error = 6.73504180319101500000000000000E-14 "%"
Correct digits = 17
h = 1.00E-2 " "
"NO INFO (given) for Equation 1"
Radius of convergence (ratio test) for eq 1 = 189.98334523828296 " "
"Order of pole (ratio test) Not computed"
"NO REAL POLE (three term test) for Equation 1"
"NO COMPLEX POLE (six term test) for Equation 1"
" "
"TOP MAIN SOLVE Loop"
x[1] = -4.580000000000009 " "
y[1] (analytic) = -15.809090030614213 " "
y[1] (numeric) = -15.809090030614204 " "
absolute error = 8.881784197001252000000000000000E-15 " "
relative error = 5.61815017803158100000000000000E-14 "%"
Correct digits = 17
h = 1.00E-2 " "
"NO INFO (given) for Equation 1"
Radius of convergence (ratio test) for eq 1 = 189.99668250557633 " "
"Order of pole (ratio test) Not computed"
"NO REAL POLE (three term test) for Equation 1"
"NO COMPLEX POLE (six term test) for Equation 1"
" "
"TOP MAIN SOLVE Loop"
x[1] = -4.570000000000010 " "
y[1] (analytic) = -15.793288842494421 " "
y[1] (numeric) = -15.793288842494416 " "
absolute error = 5.329070518200751000000000000000E-15 " "
relative error = 3.37426268293277700000000000000E-14 "%"
Correct digits = 17
h = 1.00E-2 " "
"NO INFO (given) for Equation 1"
Radius of convergence (ratio test) for eq 1 = 189.99021688398182 " "
"Order of pole (ratio test) Not computed"
"NO REAL POLE (three term test) for Equation 1"
"NO COMPLEX POLE (six term test) for Equation 1"
" "
"TOP MAIN SOLVE Loop"
x[1] = -4.560000000000010 " "
y[1] (analytic) = -15.777503447664795 " "
y[1] (numeric) = -15.777503447664786 " "
absolute error = 8.881784197001252000000000000000E-15 " "
relative error = 5.62939772218261300000000000000E-14 "%"
Correct digits = 17
h = 1.00E-2 " "
"NO INFO (given) for Equation 1"
Radius of convergence (ratio test) for eq 1 = 189.99819796891165 " "
"Order of pole (ratio test) Not computed"
"NO REAL POLE (three term test) for Equation 1"
"NO COMPLEX POLE (six term test) for Equation 1"
" "
"TOP MAIN SOLVE Loop"
x[1] = -4.55000000000001 " "
y[1] (analytic) = -15.761733830339926 " "
y[1] (numeric) = -15.761733830339919 " "
absolute error = 7.105427357601002000000000000000E-15 " "
relative error = 4.508023948433700000000000000000E-14 "%"
Correct digits = 17
h = 1.00E-2 " "
"NO INFO (given) for Equation 1"
Radius of convergence (ratio test) for eq 1 = 190.00807458694925 " "
"Order of pole (ratio test) Not computed"
"NO REAL POLE (three term test) for Equation 1"
"NO COMPLEX POLE (six term test) for Equation 1"
" "
"TOP MAIN SOLVE Loop"
x[1] = -4.54000000000001 " "
y[1] (analytic) = -15.745979974750204 " "
y[1] (numeric) = -15.745979974750195 " "
absolute error = 8.881784197001252000000000000000E-15 " "
relative error = 5.64066778393204100000000000000E-14 "%"
Correct digits = 17
h = 1.00E-2 " "
"NO INFO (given) for Equation 1"
Radius of convergence (ratio test) for eq 1 = 189.9939848917769 " "
"Order of pole (ratio test) Not computed"
"NO REAL POLE (three term test) for Equation 1"
"NO COMPLEX POLE (six term test) for Equation 1"
" "
"TOP MAIN SOLVE Loop"
x[1] = -4.53000000000001 " "
y[1] (analytic) = -15.730241865141767 " "
y[1] (numeric) = -15.730241865141759 " "
absolute error = 8.881784197001252000000000000000E-15 " "
relative error = 5.64631127299021100000000000000E-14 "%"
Correct digits = 17
h = 1.00E-2 " "
"NO INFO (given) for Equation 1"
Radius of convergence (ratio test) for eq 1 = 190.01124292743376 " "
"Order of pole (ratio test) Not computed"
"NO REAL POLE (three term test) for Equation 1"
Radius of convergence (six term test) for eq 1 = 260.0334494779624 " "
Order of pole (six term test) = 49.61102841805896 " "
" "
"TOP MAIN SOLVE Loop"
x[1] = -4.52000000000001 " "
y[1] (analytic) = -15.714519485776508 " "
y[1] (numeric) = -15.714519485776497 " "
absolute error = 1.065814103640150300000000000000E-14 " "
relative error = 6.78235249003214900000000000000E-14 "%"
Correct digits = 17
h = 1.00E-2 " "
"NO INFO (given) for Equation 1"
Radius of convergence (ratio test) for eq 1 = 190.00388409888737 " "
"Order of pole (ratio test) Not computed"
"NO REAL POLE (three term test) for Equation 1"
"NO COMPLEX POLE (six term test) for Equation 1"
" "
"TOP MAIN SOLVE Loop"
x[1] = -4.5100000000000104 " "
y[1] (analytic) = -15.69881282093204 " "
y[1] (numeric) = -15.698812820932032 " "
absolute error = 8.881784197001252000000000000000E-15 " "
relative error = 5.65761519569091800000000000000E-14 "%"
Correct digits = 17
h = 1.00E-2 " "
"NO INFO (given) for Equation 1"
Radius of convergence (ratio test) for eq 1 = 190.00149397842438 " "
"Order of pole (ratio test) Not computed"
"NO REAL POLE (three term test) for Equation 1"
"NO COMPLEX POLE (six term test) for Equation 1"
" "
"TOP MAIN SOLVE Loop"
x[1] = -4.500000000000010 " "
y[1] (analytic) = -15.683121854901707 " "
y[1] (numeric) = -15.683121854901696 " "
absolute error = 1.065814103640150300000000000000E-14 " "
relative error = 6.79593076876485400000000000000E-14 "%"
Correct digits = 17
h = 1.00E-2 " "
"NO INFO (given) for Equation 1"
Radius of convergence (ratio test) for eq 1 = 190.00293339850558 " "
"Order of pole (ratio test) Not computed"
Radius of convergence (three term test) for eq 1 = 86.95855586529886 " "
Order of pole (three term test) = -214.9550154268642 " "
Radius of convergence (six term test) for eq 1 = 78.2330068485629 " "
Order of pole (six term test) = -29.049849871748812 " "
" "
"TOP MAIN SOLVE Loop"
x[1] = -4.490000000000010 " "
y[1] (analytic) = -15.66744657199453 " "
y[1] (numeric) = -15.667446571994521 " "
absolute error = 8.881784197001252000000000000000E-15 " "
relative error = 5.66894174885995100000000000000E-14 "%"
Correct digits = 17
h = 1.00E-2 " "
"NO INFO (given) for Equation 1"
Radius of convergence (ratio test) for eq 1 = 189.9991991461508 " "
"Order of pole (ratio test) Not computed"
"NO REAL POLE (three term test) for Equation 1"
"NO COMPLEX POLE (six term test) for Equation 1"
" "
"TOP MAIN SOLVE Loop"
x[1] = -4.480000000000011 " "
y[1] (analytic) = -15.651786956535235 " "
y[1] (numeric) = -15.651786956535224 " "
absolute error = 1.065814103640150300000000000000E-14 " "
relative error = 6.80953623122969400000000000000E-14 "%"
Correct digits = 17
h = 1.00E-2 " "
"NO INFO (given) for Equation 1"
Radius of convergence (ratio test) for eq 1 = 190.01325330656283 " "
"Order of pole (ratio test) Not computed"
"NO REAL POLE (three term test) for Equation 1"
"NO COMPLEX POLE (six term test) for Equation 1"
" "
"TOP MAIN SOLVE Loop"
x[1] = -4.470000000000011 " "
y[1] (analytic) = -15.636142992864198 " "
y[1] (numeric) = -15.636142992864189 " "
absolute error = 8.881784197001252000000000000000E-15 " "
relative error = 5.68029097780353900000000000000E-14 "%"
Correct digits = 17
h = 1.00E-2 " "
"NO INFO (given) for Equation 1"
Radius of convergence (ratio test) for eq 1 = 189.99626474240557 " "
"Order of pole (ratio test) Not computed"
"NO REAL POLE (three term test) for Equation 1"
"NO COMPLEX POLE (six term test) for Equation 1"
" "
"TOP MAIN SOLVE Loop"
x[1] = -4.4600000000000115 " "
y[1] (analytic) = -15.620514665337458 " "
y[1] (numeric) = -15.62051466533745 " "
absolute error = 8.881784197001252000000000000000E-15 " "
relative error = 5.68597410987378300000000000000E-14 "%"
Correct digits = 17
h = 1.00E-2 " "
"NO INFO (given) for Equation 1"
Radius of convergence (ratio test) for eq 1 = 190.00551562761888 " "
"Order of pole (ratio test) Not computed"
"NO REAL POLE (three term test) for Equation 1"
"NO COMPLEX POLE (six term test) for Equation 1"
" "
"TOP MAIN SOLVE Loop"
x[1] = -4.450000000000012 " "
y[1] (analytic) = -15.604901958326687 " "
y[1] (numeric) = -15.604901958326677 " "
absolute error = 1.065814103640150300000000000000E-14 " "
relative error = 6.82999551350233300000000000000E-14 "%"
Correct digits = 17
h = 1.00E-2 " "
"NO INFO (given) for Equation 1"
Radius of convergence (ratio test) for eq 1 = 189.99546187528298 " "
"Order of pole (ratio test) Not computed"
"NO REAL POLE (three term test) for Equation 1"
"NO COMPLEX POLE (six term test) for Equation 1"
" "
"TOP MAIN SOLVE Loop"
x[1] = -4.440000000000012 " "
y[1] (analytic) = -15.58930485621917 " "
y[1] (numeric) = -15.589304856219162 " "
absolute error = 8.881784197001252000000000000000E-15 " "
relative error = 5.69735743762684100000000000000E-14 "%"
Correct digits = 17
h = 1.00E-2 " "
"NO INFO (given) for Equation 1"
Radius of convergence (ratio test) for eq 1 = 190.00767115860447 " "
"Order of pole (ratio test) Not computed"
Radius of convergence (three term test) for eq 1 = 0.12540953666021637 " "
Order of pole (three term test) = -26.969930771134656 " "
"NO COMPLEX POLE (six term test) for Equation 1"
" "
"TOP MAIN SOLVE Loop"
x[1] = -4.430000000000012 " "
y[1] (analytic) = -15.573723343417814 " "
y[1] (numeric) = -15.573723343417802 " "
absolute error = 1.243449787580175300000000000000E-14 " "
relative error = 7.98428070257017600000000000000E-14 "%"
Correct digits = 17
h = 1.00E-2 " "
"NO INFO (given) for Equation 1"
Radius of convergence (ratio test) for eq 1 = 190.01052516397422 " "
"Order of pole (ratio test) Not computed"
"NO REAL POLE (three term test) for Equation 1"
Radius of convergence (six term test) for eq 1 = 67.03621696150768 " "
Order of pole (six term test) = -7.600443886735888 " "
" "
"TOP MAIN SOLVE Loop"
x[1] = -4.420000000000012 " "
y[1] (analytic) = -15.558157404341095 " "
y[1] (numeric) = -15.558157404341085 " "
absolute error = 1.065814103640150300000000000000E-14 " "
relative error = 6.85051626578069500000000000000E-14 "%"
Correct digits = 17
h = 1.00E-2 " "
"NO INFO (given) for Equation 1"
Radius of convergence (ratio test) for eq 1 = 190.00895384944144 " "
"Order of pole (ratio test) Not computed"
Radius of convergence (three term test) for eq 1 = 0.8165087248727385 " "
Order of pole (three term test) = -37.13029245954101 " "
"NO COMPLEX POLE (six term test) for Equation 1"
" "
"TOP MAIN SOLVE Loop"
x[1] = -4.410000000000013 " "
y[1] (analytic) = -15.542607023423077 " "
y[1] (numeric) = -15.542607023423068 " "
absolute error = 8.881784197001252000000000000000E-15 " "
relative error = 5.71447517370553900000000000000E-14 "%"
Correct digits = 17
h = 1.00E-2 " "
"NO INFO (given) for Equation 1"
Radius of convergence (ratio test) for eq 1 = 189.9965168359182 " "
"Order of pole (ratio test) Not computed"
"NO REAL POLE (three term test) for Equation 1"
"NO COMPLEX POLE (six term test) for Equation 1"
" "
"TOP MAIN SOLVE Loop"
x[1] = -4.400000000000013 " "
y[1] (analytic) = -15.52707218511338 " "
y[1] (numeric) = -15.52707218511337 " "
absolute error = 8.881784197001252000000000000000E-15 " "
relative error = 5.72019250706948300000000000000E-14 "%"
Correct digits = 17
h = 1.00E-2 " "
"NO INFO (given) for Equation 1"
Radius of convergence (ratio test) for eq 1 = 190.00265929257895 " "
"Order of pole (ratio test) Not computed"
"NO REAL POLE (three term test) for Equation 1"
"NO COMPLEX POLE (six term test) for Equation 1"
" "
"TOP MAIN SOLVE Loop"
x[1] = -4.390000000000013 " "
y[1] (analytic) = -15.51155287387716 " "
y[1] (numeric) = -15.51155287387715 " "
absolute error = 1.065814103640150300000000000000E-14 " "
relative error = 6.8710986727516900000000000000E-14 "%"
Correct digits = 17
h = 1.00E-2 " "
"NO INFO (given) for Equation 1"
Radius of convergence (ratio test) for eq 1 = 189.99186170903266 " "
"Order of pole (ratio test) Not computed"
Radius of convergence (three term test) for eq 1 = 0.5617870586100541 " "
Order of pole (three term test) = -1.2793188013674217 " "
"NO COMPLEX POLE (six term test) for Equation 1"
" "
"TOP MAIN SOLVE Loop"
x[1] = -4.380000000000013 " "
y[1] (analytic) = -15.496049074195112 " "
y[1] (numeric) = -15.496049074195097 " "
absolute error = 1.421085471520200400000000000000E-14 " "
relative error = 9.17063094415899500000000000000E-14 "%"
Correct digits = 17
h = 1.00E-2 " "
"NO INFO (given) for Equation 1"
Radius of convergence (ratio test) for eq 1 = 190.0014750808952 " "
"Order of pole (ratio test) Not computed"
Radius of convergence (three term test) for eq 1 = 1.0504168269907748 " "
Order of pole (three term test) = -2.218369471545294 " "
Radius of convergence (six term test) for eq 1 = 19.84725624238078 " "
Order of pole (six term test) = -11.872777627700575 " "
" "
"TOP MAIN SOLVE Loop"
x[1] = -4.370000000000013 " "
y[1] (analytic) = -15.480560770563423 " "
y[1] (numeric) = -15.48056077056341 " "
absolute error = 1.421085471520200400000000000000E-14 " "
relative error = 9.17980616194744700000000000000E-14 "%"
Correct digits = 17
h = 1.00E-2 " "
"NO INFO (given) for Equation 1"
Radius of convergence (ratio test) for eq 1 = 190.00820892445063 " "
"Order of pole (ratio test) Not computed"
"NO REAL POLE (three term test) for Equation 1"
"NO COMPLEX POLE (six term test) for Equation 1"
" "
"TOP MAIN SOLVE Loop"
x[1] = -4.360000000000014 " "
y[1] (analytic) = -15.465087947493796 " "
y[1] (numeric) = -15.465087947493782 " "
absolute error = 1.421085471520200400000000000000E-14 " "
relative error = 9.18899055954282600000000000000E-14 "%"
Correct digits = 17
h = 1.00E-2 " "
"NO INFO (given) for Equation 1"
Radius of convergence (ratio test) for eq 1 = 189.99480500333684 " "
"Order of pole (ratio test) Not computed"
"NO REAL POLE (three term test) for Equation 1"
"NO COMPLEX POLE (six term test) for Equation 1"
" "
"TOP MAIN SOLVE Loop"
x[1] = -4.350000000000014 " "
y[1] (analytic) = -15.449630589513406 " "
y[1] (numeric) = -15.449630589513392 " "
absolute error = 1.421085471520200400000000000000E-14 " "
relative error = 9.1981841461295310000000000000E-14 "%"
Correct digits = 17
h = 1.00E-2 " "
"NO INFO (given) for Equation 1"
Radius of convergence (ratio test) for eq 1 = 189.994659069254 " "
"Order of pole (ratio test) Not computed"
Radius of convergence (three term test) for eq 1 = 0.4046995760703592 " "
Order of pole (three term test) = -1.154767946782607 " "
Radius of convergence (six term test) for eq 1 = 11.013348122351266 " "
Order of pole (six term test) = -12.338791992478694 " "
" "
"TOP MAIN SOLVE Loop"
x[1] = -4.340000000000014 " "
y[1] (analytic) = -15.434188681164894 " "
y[1] (numeric) = -15.434188681164878 " "
absolute error = 1.598721155460225400000000000000E-14 " "
relative error = 1.03583102972637880000000000000E-13 "%"
Correct digits = 16
h = 1.00E-2 " "
"NO INFO (given) for Equation 1"
Radius of convergence (ratio test) for eq 1 = 189.992683340673 " "
"Order of pole (ratio test) Not computed"
"NO REAL POLE (three term test) for Equation 1"
"NO COMPLEX POLE (six term test) for Equation 1"
" "
"TOP MAIN SOLVE Loop"
x[1] = -4.330000000000014 " "
y[1] (analytic) = -15.418762207006345 " "
y[1] (numeric) = -15.418762207006331 " "
absolute error = 1.421085471520200400000000000000E-14 " "
relative error = 9.21659892306046300000000000000E-14 "%"
Correct digits = 17
h = 1.00E-2 " "
"NO INFO (given) for Equation 1"
Radius of convergence (ratio test) for eq 1 = 189.99414940195706 " "
"Order of pole (ratio test) Not computed"
"NO REAL POLE (three term test) for Equation 1"
Radius of convergence (six term test) for eq 1 = 120.42842958817084 " "
Order of pole (six term test) = -1.4224548624088893 " "
" "
"TOP MAIN SOLVE Loop"
x[1] = -4.3200000000000145 " "
y[1] (analytic) = -15.403351151611293 " "
y[1] (numeric) = -15.403351151611277 " "
absolute error = 1.598721155460225400000000000000E-14 " "
relative error = 1.037904764829690000000000000E-13 "%"
Correct digits = 16
h = 1.00E-2 " "
"NO INFO (given) for Equation 1"
Radius of convergence (ratio test) for eq 1 = 190.00225193755097 " "
"Order of pole (ratio test) Not computed"
"NO REAL POLE (three term test) for Equation 1"
"NO COMPLEX POLE (six term test) for Equation 1"
" "
"TOP MAIN SOLVE Loop"
x[1] = -4.310000000000015 " "
y[1] (analytic) = -15.387955499568676 " "
y[1] (numeric) = -15.387955499568658 " "
absolute error = 1.776356839400250500000000000000E-14 " "
relative error = 1.15438132079992150000000000000E-13 "%"
Correct digits = 16
h = 1.00E-2 " "
"NO INFO (given) for Equation 1"
Radius of convergence (ratio test) for eq 1 = 189.99769800511865 " "
"Order of pole (ratio test) Not computed"
"NO REAL POLE (three term test) for Equation 1"
"NO COMPLEX POLE (six term test) for Equation 1"
" "
"TOP MAIN SOLVE Loop"
x[1] = -4.300000000000015 " "
y[1] (analytic) = -15.372575235482838 " "
y[1] (numeric) = -15.372575235482822 " "
absolute error = 1.598721155460225400000000000000E-14 " "
relative error = 1.03998265155344420000000000000E-13 "%"
Correct digits = 16
h = 1.00E-2 " "
"NO INFO (given) for Equation 1"
Radius of convergence (ratio test) for eq 1 = 189.9985089373997 " "
"Order of pole (ratio test) Not computed"
Radius of convergence (three term test) for eq 1 = 11.841928351085276 " "
Order of pole (three term test) = -35.08223193950098 " "
"NO COMPLEX POLE (six term test) for Equation 1"
" "
"TOP MAIN SOLVE Loop"
x[1] = -4.290000000000015 " "
y[1] (analytic) = -15.357210343973518 " "
y[1] (numeric) = -15.3572103439735 " "
absolute error = 1.776356839400250500000000000000E-14 " "
relative error = 1.1566923937441080000000000000E-13 "%"
Correct digits = 16
h = 1.00E-2 " "
"NO INFO (given) for Equation 1"
Radius of convergence (ratio test) for eq 1 = 189.99425398564304 " "
"Order of pole (ratio test) Not computed"
"NO REAL POLE (three term test) for Equation 1"
"NO COMPLEX POLE (six term test) for Equation 1"
" "
"TOP MAIN SOLVE Loop"
x[1] = -4.280000000000015 " "
y[1] (analytic) = -15.34186080967582 " "
y[1] (numeric) = -15.341860809675804 " "
absolute error = 1.598721155460225400000000000000E-14 " "
relative error = 1.04206469820919150000000000000E-13 "%"
Correct digits = 16
h = 1.00E-2 " "
"NO INFO (given) for Equation 1"
Radius of convergence (ratio test) for eq 1 = 190.00739567222013 " "
"Order of pole (ratio test) Not computed"
"NO REAL POLE (three term test) for Equation 1"
"NO COMPLEX POLE (six term test) for Equation 1"
" "
"TOP MAIN SOLVE Loop"
x[1] = -4.270000000000016 " "
y[1] (analytic) = -15.326526617240212 " "
y[1] (numeric) = -15.326526617240196 " "
absolute error = 1.598721155460225400000000000000E-14 " "
relative error = 1.04310728411347060000000000000E-13 "%"
Correct digits = 16
h = 1.00E-2 " "
"NO INFO (given) for Equation 1"
Radius of convergence (ratio test) for eq 1 = 190.0070162091527 " "
"Order of pole (ratio test) Not computed"
"NO REAL POLE (three term test) for Equation 1"
"NO COMPLEX POLE (six term test) for Equation 1"
" "
"TOP MAIN SOLVE Loop"
x[1] = -4.260000000000016 " "
y[1] (analytic) = -15.311207751332498 " "
y[1] (numeric) = -15.311207751332482 " "
absolute error = 1.598721155460225400000000000000E-14 " "
relative error = 1.04415091312512070000000000000E-13 "%"
Correct digits = 16
h = 1.00E-2 " "
"NO INFO (given) for Equation 1"
Radius of convergence (ratio test) for eq 1 = 189.99372803570054 " "
"Order of pole (ratio test) Not computed"
"NO REAL POLE (three term test) for Equation 1"
"NO COMPLEX POLE (six term test) for Equation 1"
" "
"TOP MAIN SOLVE Loop"
x[1] = -4.250000000000016 " "
y[1] (analytic) = -15.29590419663381 " "
y[1] (numeric) = -15.295904196633796 " "
absolute error = 1.421085471520200400000000000000E-14 " "
relative error = 9.29062743366907600000000000000E-14 "%"
Correct digits = 17
h = 1.00E-2 " "
"NO INFO (given) for Equation 1"
Radius of convergence (ratio test) for eq 1 = 190.00466726041063 " "
"Order of pole (ratio test) Not computed"
"NO REAL POLE (three term test) for Equation 1"
Radius of convergence (six term test) for eq 1 = 81.37705710957377 " "
Order of pole (six term test) = -6.863032602628386 " "
" "
"TOP MAIN SOLVE Loop"
x[1] = -4.240000000000016 " "
y[1] (analytic) = -15.280615937840595 " "
y[1] (numeric) = -15.28061593784058 " "
absolute error = 1.598721155460225400000000000000E-14 " "
relative error = 1.04624130464609470000000000000E-13 "%"
Correct digits = 16
h = 1.00E-2 " "
"NO INFO (given) for Equation 1"
Radius of convergence (ratio test) for eq 1 = 190.0045771209365 " "
"Order of pole (ratio test) Not computed"
"NO REAL POLE (three term test) for Equation 1"
"NO COMPLEX POLE (six term test) for Equation 1"
" "
"TOP MAIN SOLVE Loop"
x[1] = -4.230000000000016 " "
y[1] (analytic) = -15.265342959664594 " "
y[1] (numeric) = -15.265342959664576 " "
absolute error = 1.776356839400250500000000000000E-14 " "
relative error = 1.16365341027312250000000000000E-13 "%"
Correct digits = 16
h = 1.00E-2 " "
"NO INFO (given) for Equation 1"
Radius of convergence (ratio test) for eq 1 = 190.0014670518664 " "
"Order of pole (ratio test) Not computed"
"NO REAL POLE (three term test) for Equation 1"
"NO COMPLEX POLE (six term test) for Equation 1"
" "
"TOP MAIN SOLVE Loop"
x[1] = -4.220000000000017 " "
y[1] (analytic) = -15.250085246832823 " "
y[1] (numeric) = -15.250085246832803 " "
absolute error = 1.953992523340275500000000000000E-14 " "
relative error = 1.28129941027450040000000000000E-13 "%"
Correct digits = 16
h = 1.00E-2 " "
"NO INFO (given) for Equation 1"
Radius of convergence (ratio test) for eq 1 = 190.0043341085171 " "
"Order of pole (ratio test) Not computed"
"NO REAL POLE (three term test) for Equation 1"
"NO COMPLEX POLE (six term test) for Equation 1"
" "
"TOP MAIN SOLVE Loop"
x[1] = -4.210000000000017 " "
y[1] (analytic) = -15.234842784087565 " "
y[1] (numeric) = -15.234842784087549 " "
absolute error = 1.598721155460225400000000000000E-14 " "
relative error = 1.0493847413575230000000000000E-13 "%"
Correct digits = 16
h = 1.00E-2 " "
"NO INFO (given) for Equation 1"
Radius of convergence (ratio test) for eq 1 = 190.00385646931647 " "
"Order of pole (ratio test) Not computed"
"NO REAL POLE (three term test) for Equation 1"
"NO COMPLEX POLE (six term test) for Equation 1"
" "
"TOP MAIN SOLVE Loop"
x[1] = -4.200000000000017 " "
y[1] (analytic) = -15.219615556186364 " "
y[1] (numeric) = -15.219615556186348 " "
absolute error = 1.598721155460225400000000000000E-14 " "
relative error = 1.05043465096619230000000000000E-13 "%"
Correct digits = 16
h = 1.00E-2 " "
"NO INFO (given) for Equation 1"
Radius of convergence (ratio test) for eq 1 = 189.9954383011215 " "
"Order of pole (ratio test) Not computed"
"NO REAL POLE (three term test) for Equation 1"
"NO COMPLEX POLE (six term test) for Equation 1"
" "
"TOP MAIN SOLVE Loop"
x[1] = -4.190000000000017 " "
y[1] (analytic) = -15.204403547901988 " "
y[1] (numeric) = -15.20440354790197 " "
absolute error = 1.776356839400250500000000000000E-14 " "
relative error = 1.16831734556622240000000000000E-13 "%"
Correct digits = 16
h = 1.00E-2 " "
"NO INFO (given) for Equation 1"
Radius of convergence (ratio test) for eq 1 = 190.0024375294139 " "
"Order of pole (ratio test) Not computed"
"NO REAL POLE (three term test) for Equation 1"
"NO COMPLEX POLE (six term test) for Equation 1"
" "
"TOP MAIN SOLVE Loop"
x[1] = -4.1800000000000175 " "
y[1] (analytic) = -15.189206744022423 " "
y[1] (numeric) = -15.189206744022409 " "
absolute error = 1.421085471520200400000000000000E-14 " "
relative error = 9.35588997812184000000000000000E-14 "%"
Correct digits = 17
h = 1.00E-2 " "
"NO INFO (given) for Equation 1"
Radius of convergence (ratio test) for eq 1 = 189.98559688255756 " "
"Order of pole (ratio test) Not computed"
"NO REAL POLE (three term test) for Equation 1"
"NO COMPLEX POLE (six term test) for Equation 1"
" "
"TOP MAIN SOLVE Loop"
x[1] = -4.170000000000018 " "
y[1] (analytic) = -15.174025129350875 " "
y[1] (numeric) = -15.174025129350856 " "
absolute error = 1.953992523340275500000000000000E-14 " "
relative error = 1.28772195029563970000000000000E-13 "%"
Correct digits = 16
h = 1.00E-2 " "
"NO INFO (given) for Equation 1"
Radius of convergence (ratio test) for eq 1 = 189.98849042298932 " "
"Order of pole (ratio test) Not computed"
Radius of convergence (three term test) for eq 1 = 5.94772158218155 " "
Order of pole (three term test) = -15.406229172942535 " "
Radius of convergence (six term test) for eq 1 = 20.126421212820443 " "
Order of pole (six term test) = -11.628166407344965 " "
" "
"TOP MAIN SOLVE Loop"
x[1] = -4.160000000000018 " "
y[1] (analytic) = -15.158858688705717 " "
y[1] (numeric) = -15.158858688705697 " "
absolute error = 1.953992523340275500000000000000E-14 " "
relative error = 1.28901031632158460000000000000E-13 "%"
Correct digits = 16
h = 1.00E-2 " "
"NO INFO (given) for Equation 1"
Radius of convergence (ratio test) for eq 1 = 190.00419115787747 " "
"Order of pole (ratio test) Not computed"
"NO REAL POLE (three term test) for Equation 1"
"NO COMPLEX POLE (six term test) for Equation 1"
" "
"TOP MAIN SOLVE Loop"
x[1] = -4.150000000000018 " "
y[1] (analytic) = -15.143707406920512 " "
y[1] (numeric) = -15.143707406920491 " "
absolute error = 2.131628207280300600000000000000E-14 " "
relative error = 1.40759996875413020000000000000E-13 "%"
Correct digits = 16
h = 1.00E-2 " "
"NO INFO (given) for Equation 1"
Radius of convergence (ratio test) for eq 1 = 190.00595501271044 " "
"Order of pole (ratio test) Not computed"
"NO REAL POLE (three term test) for Equation 1"
"NO COMPLEX POLE (six term test) for Equation 1"
" "
"TOP MAIN SOLVE Loop"
x[1] = -4.140000000000018 " "
y[1] (analytic) = -15.128571268843974 " "
y[1] (numeric) = -15.128571268843954 " "
absolute error = 1.953992523340275500000000000000E-14 " "
relative error = 1.29159091669440030000000000000E-13 "%"
Correct digits = 16
h = 1.00E-2 " "
"NO INFO (given) for Equation 1"
Radius of convergence (ratio test) for eq 1 = 189.99726737037085 " "
"Order of pole (ratio test) Not computed"
"NO REAL POLE (three term test) for Equation 1"
"NO COMPLEX POLE (six term test) for Equation 1"
" "
"TOP MAIN SOLVE Loop"
x[1] = -4.1300000000000185 " "
y[1] (analytic) = -15.113450259339965 " "
y[1] (numeric) = -15.113450259339947 " "
absolute error = 1.776356839400250500000000000000E-14 " "
relative error = 1.17534832147442920000000000000E-13 "%"
Correct digits = 16
h = 1.00E-2 " "
"NO INFO (given) for Equation 1"
Radius of convergence (ratio test) for eq 1 = 189.9848172258236 " "
"Order of pole (ratio test) Not computed"
"NO REAL POLE (three term test) for Equation 1"
"NO COMPLEX POLE (six term test) for Equation 1"
" "
"TOP MAIN SOLVE Loop"
x[1] = -4.120000000000019 " "
y[1] (analytic) = -15.098344363287477 " "
y[1] (numeric) = -15.098344363287458 " "
absolute error = 1.953992523340275500000000000000E-14 " "
relative error = 1.2941766834326050000000000000E-13 "%"
Correct digits = 16
h = 1.00E-2 " "
"NO INFO (given) for Equation 1"
Radius of convergence (ratio test) for eq 1 = 189.9899768851247 " "
"Order of pole (ratio test) Not computed"
"NO REAL POLE (three term test) for Equation 1"
"NO COMPLEX POLE (six term test) for Equation 1"
" "
"TOP MAIN SOLVE Loop"
x[1] = -4.110000000000019 " "
y[1] (analytic) = -15.083253565580607 " "
y[1] (numeric) = -15.08325356558059 " "
absolute error = 1.776356839400250500000000000000E-14 " "
relative error = 1.1777013703819360000000000000E-13 "%"
Correct digits = 16
h = 1.00E-2 " "
"NO INFO (given) for Equation 1"
Radius of convergence (ratio test) for eq 1 = 189.9940819715676 " "
"Order of pole (ratio test) Not computed"
Radius of convergence (three term test) for eq 1 = 489.01912298503686 " "
Order of pole (three term test) = -1071.2409139624915 " "
Radius of convergence (six term test) for eq 1 = 26.319852400968074 " "
Order of pole (six term test) = -13.150088267503564 " "
" "
"TOP MAIN SOLVE Loop"
x[1] = -4.100000000000020 " "
y[1] (analytic) = -15.068177851128564 " "
y[1] (numeric) = -15.068177851128544 " "
absolute error = 1.953992523340275500000000000000E-14 " "
relative error = 1.29676762687926900000000000000E-13 "%"
Correct digits = 16
h = 1.00E-2 " "
"NO INFO (given) for Equation 1"
Radius of convergence (ratio test) for eq 1 = 189.99774069309998 " "
"Order of pole (ratio test) Not computed"
"NO REAL POLE (three term test) for Equation 1"
"NO COMPLEX POLE (six term test) for Equation 1"
" "
"TOP MAIN SOLVE Loop"
x[1] = -4.090000000000020 " "
y[1] (analytic) = -15.053117204855626 " "
y[1] (numeric) = -15.053117204855607 " "
absolute error = 1.953992523340275500000000000000E-14 " "
relative error = 1.2980650431061440000000000000E-13 "%"
Correct digits = 16
h = 1.00E-2 " "
"NO INFO (given) for Equation 1"
Radius of convergence (ratio test) for eq 1 = 189.9971590301302 " "
"Order of pole (ratio test) Not computed"
"NO REAL POLE (three term test) for Equation 1"
"NO COMPLEX POLE (six term test) for Equation 1"
" "
"TOP MAIN SOLVE Loop"
x[1] = -4.08000000000002 " "
y[1] (analytic) = -15.038071611701149 " "
y[1] (numeric) = -15.038071611701127 " "
absolute error = 2.131628207280300600000000000000E-14 " "
relative error = 1.4174877353434578000000000000E-13 "%"
Correct digits = 16
h = 1.00E-2 " "
"NO INFO (given) for Equation 1"
Radius of convergence (ratio test) for eq 1 = 189.9991337755999 " "
"Order of pole (ratio test) Not computed"
Radius of convergence (three term test) for eq 1 = 0.30195436897802025 " "
Order of pole (three term test) = -1.0225968069943399 " "
Radius of convergence (six term test) for eq 1 = 11.460720418205415 " "
Order of pole (six term test) = -12.35867030361324 " "
" "
"TOP MAIN SOLVE Loop"
x[1] = -4.07000000000002 " "
y[1] (analytic) = -15.023041056619537 " "
y[1] (numeric) = -15.023041056619514 " "
absolute error = 2.309263891220325600000000000000E-14 " "
relative error = 1.53714809306389060000000000000E-13 "%"
Correct digits = 16
h = 1.00E-2 " "
"NO INFO (given) for Equation 1"
Radius of convergence (ratio test) for eq 1 = 190.00553706870184 " "
"Order of pole (ratio test) Not computed"
Radius of convergence (three term test) for eq 1 = 0.7558893619079394 " "
Order of pole (three term test) = -35.90279940815450 " "
"NO COMPLEX POLE (six term test) for Equation 1"
" "
"TOP MAIN SOLVE Loop"
x[1] = -4.06000000000002 " "
y[1] (analytic) = -15.008025524580228 " "
y[1] (numeric) = -15.008025524580209 " "
absolute error = 1.953992523340275500000000000000E-14 " "
relative error = 1.30196508537383270000000000000E-13 "%"
Correct digits = 16
h = 1.00E-2 " "
"NO INFO (given) for Equation 1"
Radius of convergence (ratio test) for eq 1 = 190.00430954590064 " "
"Order of pole (ratio test) Not computed"
"NO REAL POLE (three term test) for Equation 1"
"NO COMPLEX POLE (six term test) for Equation 1"
" "
"TOP MAIN SOLVE Loop"
x[1] = -4.05000000000002 " "
y[1] (analytic) = -14.9930250005677 " "
y[1] (numeric) = -14.993025000567679 " "
absolute error = 2.131628207280300600000000000000E-14 " "
relative error = 1.4217465836277790000000000000E-13 "%"
Correct digits = 16
h = 1.00E-2 " "
"NO INFO (given) for Equation 1"
Radius of convergence (ratio test) for eq 1 = 190.00010130130482 " "
"Order of pole (ratio test) Not computed"
"NO REAL POLE (three term test) for Equation 1"
"NO COMPLEX POLE (six term test) for Equation 1"
" "
"TOP MAIN SOLVE Loop"
x[1] = -4.0400000000000205 " "
y[1] (analytic) = -14.97803946958142 " "
y[1] (numeric) = -14.978039469581399 " "
absolute error = 2.131628207280300600000000000000E-14 " "
relative error = 1.42316904132171550000000000000E-13 "%"
Correct digits = 16
h = 1.00E-2 " "
"NO INFO (given) for Equation 1"
Radius of convergence (ratio test) for eq 1 = 189.99355651770907 " "
"Order of pole (ratio test) Not computed"
"NO REAL POLE (three term test) for Equation 1"
"NO COMPLEX POLE (six term test) for Equation 1"
" "
"TOP MAIN SOLVE Loop"
x[1] = -4.030000000000020 " "
y[1] (analytic) = -14.963068916635859 " "
y[1] (numeric) = -14.963068916635835 " "
absolute error = 2.309263891220325600000000000000E-14 " "
relative error = 1.54330899903354600000000000000E-13 "%"
Correct digits = 16
h = 1.00E-2 " "
"NO INFO (given) for Equation 1"
Radius of convergence (ratio test) for eq 1 = 190.00063516358793 " "
"Order of pole (ratio test) Not computed"
"NO REAL POLE (three term test) for Equation 1"
"NO COMPLEX POLE (six term test) for Equation 1"
" "
"TOP MAIN SOLVE Loop"
x[1] = -4.020000000000021 " "
y[1] (analytic) = -14.948113326760458 " "
y[1] (numeric) = -14.948113326760437 " "
absolute error = 2.131628207280300600000000000000E-14 " "
relative error = 1.42601822764094940000000000000E-13 "%"
Correct digits = 16
h = 1.00E-2 " "
"NO INFO (given) for Equation 1"
Radius of convergence (ratio test) for eq 1 = 189.98761286872093 " "
"Order of pole (ratio test) Not computed"
"NO REAL POLE (three term test) for Equation 1"
"NO COMPLEX POLE (six term test) for Equation 1"
" "
"TOP MAIN SOLVE Loop"
x[1] = -4.010000000000021 " "
y[1] (analytic) = -14.933172684999631 " "
y[1] (numeric) = -14.93317268499961 " "
absolute error = 2.131628207280300600000000000000E-14 " "
relative error = 1.42744495911543340000000000000E-13 "%"
Correct digits = 16
h = 1.00E-2 " "
"NO INFO (given) for Equation 1"
Radius of convergence (ratio test) for eq 1 = 189.981828105742 " "
"Order of pole (ratio test) Not computed"
"NO REAL POLE (three term test) for Equation 1"
"NO COMPLEX POLE (six term test) for Equation 1"
" "
"TOP MAIN SOLVE Loop"
x[1] = -4.000000000000021 " "
y[1] (analytic) = -14.918246976412735 " "
y[1] (numeric) = -14.918246976412712 " "
absolute error = 2.309263891220325600000000000000E-14 " "
relative error = 1.54794587787124500000000000000E-13 "%"
Correct digits = 16
h = 1.00E-2 " "
"NO INFO (given) for Equation 1"
Radius of convergence (ratio test) for eq 1 = 190.00486471546867 " "
"Order of pole (ratio test) Not computed"
Radius of convergence (three term test) for eq 1 = 284.5676091368356 " "
Order of pole (three term test) = -561.2476851337623 " "
Radius of convergence (six term test) for eq 1 = 14.977747191089898 " "
Order of pole (six term test) = -13.18397683045867 " "
" "
"TOP MAIN SOLVE Loop"
x[1] = -3.9900000000000215 " "
y[1] (analytic) = -14.903336186074059 " "
y[1] (numeric) = -14.903336186074036 " "
absolute error = 2.309263891220325600000000000000E-14 " "
relative error = 1.54949459798011060000000000000E-13 "%"
Correct digits = 16
h = 1.00E-2 " "
"NO INFO (given) for Equation 1"
Radius of convergence (ratio test) for eq 1 = 190.00819638363544 " "
"Order of pole (ratio test) Not computed"
Radius of convergence (three term test) for eq 1 = 0.49167998107191013 " "
Order of pole (three term test) = -32.293933185331724 " "
"NO COMPLEX POLE (six term test) for Equation 1"
" "
"TOP MAIN SOLVE Loop"
x[1] = -3.9800000000000217 " "
y[1] (analytic) = -14.88844029907281 " "
y[1] (numeric) = -14.888440299072785 " "
absolute error = 2.486899575160350700000000000000E-14 " "
relative error = 1.67035601124398770000000000000E-13 "%"
Correct digits = 16
h = 1.00E-2 " "
"NO INFO (given) for Equation 1"
Radius of convergence (ratio test) for eq 1 = 190.00032006560355 " "
"Order of pole (ratio test) Not computed"
"NO REAL POLE (three term test) for Equation 1"
"NO COMPLEX POLE (six term test) for Equation 1"
" "
"TOP MAIN SOLVE Loop"
x[1] = -3.970000000000022 " "
y[1] (analytic) = -14.873559300513099 " "
y[1] (numeric) = -14.873559300513076 " "
absolute error = 2.309263891220325600000000000000E-14 " "
relative error = 1.55259668823229280000000000000E-13 "%"
Correct digits = 16
h = 1.00E-2 " "
"NO INFO (given) for Equation 1"
Radius of convergence (ratio test) for eq 1 = 190.00306869073214 " "
"Order of pole (ratio test) Not computed"
"NO REAL POLE (three term test) for Equation 1"
"NO COMPLEX POLE (six term test) for Equation 1"
" "
"TOP MAIN SOLVE Loop"
x[1] = -3.960000000000022 " "
y[1] (analytic) = -14.858693175513931 " "
y[1] (numeric) = -14.858693175513906 " "
absolute error = 2.486899575160350700000000000000E-14 " "
relative error = 1.67370006620675360000000000000E-13 "%"
Correct digits = 16
h = 1.00E-2 " "
"NO INFO (given) for Equation 1"
Radius of convergence (ratio test) for eq 1 = 189.98645231183187 " "
"Order of pole (ratio test) Not computed"
"NO REAL POLE (three term test) for Equation 1"
"NO COMPLEX POLE (six term test) for Equation 1"
" "
"TOP MAIN SOLVE Loop"
x[1] = -3.9500000000000224 " "
y[1] (analytic) = -14.843841909209175 " "
y[1] (numeric) = -14.84384190920915 " "
absolute error = 2.486899575160350700000000000000E-14 " "
relative error = 1.67537460340201340000000000000E-13 "%"
Correct digits = 16
h = 1.00E-2 " "
"NO INFO (given) for Equation 1"
Radius of convergence (ratio test) for eq 1 = 189.99073790714868 " "
"Order of pole (ratio test) Not computed"
"NO REAL POLE (three term test) for Equation 1"
"NO COMPLEX POLE (six term test) for Equation 1"
" "
"TOP MAIN SOLVE Loop"
x[1] = -3.9400000000000226 " "
y[1] (analytic) = -14.829005486747564 " "
y[1] (numeric) = -14.82900548674754 " "
absolute error = 2.309263891220325600000000000000E-14 " "
relative error = 1.5572614719740150000000000000E-13 "%"
Correct digits = 16
h = 1.00E-2 " "
"NO INFO (given) for Equation 1"
Radius of convergence (ratio test) for eq 1 = 190.0093161570066 " "
"Order of pole (ratio test) Not computed"
"NO REAL POLE (three term test) for Equation 1"
"NO COMPLEX POLE (six term test) for Equation 1"
" "
"TOP MAIN SOLVE Loop"
x[1] = -3.930000000000023 " "
y[1] (analytic) = -14.814183893292677 " "
y[1] (numeric) = -14.814183893292654 " "
absolute error = 2.309263891220325600000000000000E-14 " "
relative error = 1.55881951233633330000000000000E-13 "%"
Correct digits = 16
h = 1.00E-2 " "
"NO INFO (given) for Equation 1"
Radius of convergence (ratio test) for eq 1 = 190.00877795604433 " "
"Order of pole (ratio test) Not computed"
Radius of convergence (three term test) for eq 1 = 1.0511509025884695 " "
Order of pole (three term test) = -39.68806334495123 " "
"NO COMPLEX POLE (six term test) for Equation 1"
" "
"TOP MAIN SOLVE Loop"
x[1] = -3.920000000000023 " "
y[1] (analytic) = -14.799377114022919 " "
y[1] (numeric) = -14.799377114022894 " "
absolute error = 2.486899575160350700000000000000E-14 " "
relative error = 1.68040827394277840000000000000E-13 "%"
Correct digits = 16
h = 1.00E-2 " "
"NO INFO (given) for Equation 1"
Radius of convergence (ratio test) for eq 1 = 189.99230864426897 " "
"Order of pole (ratio test) Not computed"
Radius of convergence (three term test) for eq 1 = 0.4863984831774066 " "
Order of pole (three term test) = -1.2581949685460416 " "
Radius of convergence (six term test) for eq 1 = 3.553938886065172 " "
Order of pole (six term test) = -12.514199701974936 " "
" "
"TOP MAIN SOLVE Loop"
x[1] = -3.9100000000000232 " "
y[1] (analytic) = -14.784585134131508 " "
y[1] (numeric) = -14.784585134131481 " "
absolute error = 2.664535259100375700000000000000E-14 " "
relative error = 1.80223877432249550000000000000E-13 "%"
Correct digits = 16
h = 1.00E-2 " "
"NO INFO (given) for Equation 1"
Radius of convergence (ratio test) for eq 1 = 189.99573178430066 " "
"Order of pole (ratio test) Not computed"
"NO REAL POLE (three term test) for Equation 1"
"NO COMPLEX POLE (six term test) for Equation 1"
" "
"TOP MAIN SOLVE Loop"
x[1] = -3.9000000000000234 " "
y[1] (analytic) = -14.76980793882646 " "
y[1] (numeric) = -14.769807938826435 " "
absolute error = 2.486899575160350700000000000000E-14 " "
relative error = 1.68377245354887660000000000000E-13 "%"
Correct digits = 16
h = 1.00E-2 " "
"NO INFO (given) for Equation 1"
Radius of convergence (ratio test) for eq 1 = 190.00830053083186 " "
"Order of pole (ratio test) Not computed"
"NO REAL POLE (three term test) for Equation 1"
"NO COMPLEX POLE (six term test) for Equation 1"
" "
"TOP MAIN SOLVE Loop"
x[1] = -3.8900000000000237 " "
y[1] (analytic) = -14.755045513330584 " "
y[1] (numeric) = -14.75504551333056 " "
absolute error = 2.486899575160350700000000000000E-14 " "
relative error = 1.68545706816935120000000000000E-13 "%"
Correct digits = 16
h = 1.00E-2 " "
"NO INFO (given) for Equation 1"
Radius of convergence (ratio test) for eq 1 = 190.00204737077894 " "
"Order of pole (ratio test) Not computed"
"NO REAL POLE (three term test) for Equation 1"
"NO COMPLEX POLE (six term test) for Equation 1"
" "
"TOP MAIN SOLVE Loop"
x[1] = -3.880000000000024 " "
y[1] (analytic) = -14.740297842881452 " "
y[1] (numeric) = -14.740297842881425 " "
absolute error = 2.664535259100375700000000000000E-14 " "
relative error = 1.80765360883610800000000000000E-13 "%"
Correct digits = 16
h = 1.00E-2 " "
"NO INFO (given) for Equation 1"
Radius of convergence (ratio test) for eq 1 = 190.00281206608466 " "
"Order of pole (ratio test) Not computed"
Radius of convergence (three term test) for eq 1 = 0.6472199422029435 " "
Order of pole (three term test) = -34.88130626971031 " "
"NO COMPLEX POLE (six term test) for Equation 1"
" "
"TOP MAIN SOLVE Loop"
x[1] = -3.870000000000024 " "
y[1] (analytic) = -14.725564912731388 " "
y[1] (numeric) = -14.725564912731363 " "
absolute error = 2.486899575160350700000000000000E-14 " "
relative error = 1.68883135546822660000000000000E-13 "%"
Correct digits = 16
h = 1.00E-2 " "
"NO INFO (given) for Equation 1"
Radius of convergence (ratio test) for eq 1 = 190.00019815201554 " "
"Order of pole (ratio test) Not computed"
"NO REAL POLE (three term test) for Equation 1"
"NO COMPLEX POLE (six term test) for Equation 1"
" "
"TOP MAIN SOLVE Loop"
x[1] = -3.8600000000000243 " "
y[1] (analytic) = -14.710846708147468 " "
y[1] (numeric) = -14.710846708147441 " "
absolute error = 2.664535259100375700000000000000E-14 " "
relative error = 1.81127253377240840000000000000E-13 "%"
Correct digits = 16
h = 1.00E-2 " "
"NO INFO (given) for Equation 1"
Radius of convergence (ratio test) for eq 1 = 189.99924043140715 " "
"Order of pole (ratio test) Not computed"
"NO REAL POLE (three term test) for Equation 1"
"NO COMPLEX POLE (six term test) for Equation 1"
" "
"TOP MAIN SOLVE Loop"
x[1] = -3.8500000000000245 " "
y[1] (analytic) = -14.696143214411482 " "
y[1] (numeric) = -14.696143214411453 " "
absolute error = 2.84217094304040100000000000000E-14 " "
relative error = 1.93395702639402840000000000000E-13 "%"
Correct digits = 16
h = 1.00E-2 " "
"NO INFO (given) for Equation 1"
Radius of convergence (ratio test) for eq 1 = 190.00995647836692 " "
"Order of pole (ratio test) Not computed"
"NO REAL POLE (three term test) for Equation 1"
"NO COMPLEX POLE (six term test) for Equation 1"
" "
"TOP MAIN SOLVE Loop"
x[1] = -3.8400000000000247 " "
y[1] (analytic) = -14.68145441681993 " "
y[1] (numeric) = -14.681454416819903 " "
absolute error = 2.664535259100375700000000000000E-14 " "
relative error = 1.81489870380125870000000000000E-13 "%"
Correct digits = 16
h = 1.00E-2 " "
"NO INFO (given) for Equation 1"
Radius of convergence (ratio test) for eq 1 = 189.99633381810403 " "
"Order of pole (ratio test) Not computed"
"NO REAL POLE (three term test) for Equation 1"
"NO COMPLEX POLE (six term test) for Equation 1"
" "
"TOP MAIN SOLVE Loop"
x[1] = -3.830000000000025 " "
y[1] (analytic) = -14.666780300684021 " "
y[1] (numeric) = -14.666780300683994 " "
absolute error = 2.664535259100375700000000000000E-14 " "
relative error = 1.81671451025697070000000000000E-13 "%"
Correct digits = 16
h = 1.00E-2 " "
"NO INFO (given) for Equation 1"
Radius of convergence (ratio test) for eq 1 = 190.00930005539843 " "
"Order of pole (ratio test) Not computed"
"NO REAL POLE (three term test) for Equation 1"
"NO COMPLEX POLE (six term test) for Equation 1"
" "
"TOP MAIN SOLVE Loop"
x[1] = -3.820000000000025 " "
y[1] (analytic) = -14.652120851329638 " "
y[1] (numeric) = -14.652120851329608 " "
absolute error = 3.01980662698042600000000000000E-14 " "
relative error = 2.06100308455098970000000000000E-13 "%"
Correct digits = 16
h = 1.00E-2 " "
"NO INFO (given) for Equation 1"
Radius of convergence (ratio test) for eq 1 = 189.99946533582442 " "
"Order of pole (ratio test) Not computed"
"NO REAL POLE (three term test) for Equation 1"
"NO COMPLEX POLE (six term test) for Equation 1"
" "
"TOP MAIN SOLVE Loop"
x[1] = -3.8100000000000254 " "
y[1] (analytic) = -14.63747605409732 " "
y[1] (numeric) = -14.637476054097293 " "
absolute error = 2.664535259100375700000000000000E-14 " "
relative error = 1.8203515751300028000000000000E-13 "%"
Correct digits = 16
h = 1.00E-2 " "
"NO INFO (given) for Equation 1"
Radius of convergence (ratio test) for eq 1 = 190.00408724205516 " "
"Order of pole (ratio test) Not computed"
"NO REAL POLE (three term test) for Equation 1"
"NO COMPLEX POLE (six term test) for Equation 1"
" "
"TOP MAIN SOLVE Loop"
x[1] = -3.8000000000000256 " "
y[1] (analytic) = -14.622845894342282 " "
y[1] (numeric) = -14.622845894342253 " "
absolute error = 2.84217094304040100000000000000E-14 " "
relative error = 1.9436510263300139000000000000E-13 "%"
Correct digits = 16
h = 1.00E-2 " "
"NO INFO (given) for Equation 1"
Radius of convergence (ratio test) for eq 1 = 190.0043242347744 " "
"Order of pole (ratio test) Not computed"
"NO REAL POLE (three term test) for Equation 1"
Radius of convergence (six term test) for eq 1 = 30.8447117335811 " "
Order of pole (six term test) = -11.552869928706695 " "
" "
"TOP MAIN SOLVE Loop"
x[1] = -3.790000000000026 " "
y[1] (analytic) = -14.608230357434355 " "
y[1] (numeric) = -14.608230357434326 " "
absolute error = 2.84217094304040100000000000000E-14 " "
relative error = 1.945595649505880200000000000E-13 "%"
Correct digits = 16
h = 1.00E-2 " "
"NO INFO (given) for Equation 1"
Radius of convergence (ratio test) for eq 1 = 189.99229071121613 " "
"Order of pole (ratio test) Not computed"
"NO REAL POLE (three term test) for Equation 1"
"NO COMPLEX POLE (six term test) for Equation 1"
" "
"TOP MAIN SOLVE Loop"
x[1] = -3.780000000000026 " "
y[1] (analytic) = -14.593629428758007 " "
y[1] (numeric) = -14.593629428757975 " "
absolute error = 3.19744231092045100000000000000E-14 " "
relative error = 2.1909849955622518000000000000E-13 "%"
Correct digits = 16
h = 1.00E-2 " "
"NO INFO (given) for Equation 1"
Radius of convergence (ratio test) for eq 1 = 190.00071829039845 " "
"Order of pole (ratio test) Not computed"
"NO REAL POLE (three term test) for Equation 1"
"NO COMPLEX POLE (six term test) for Equation 1"
" "
"TOP MAIN SOLVE Loop"
x[1] = -3.770000000000026 " "
y[1] (analytic) = -14.579043093712297 " "
y[1] (numeric) = -14.579043093712267 " "
absolute error = 3.01980662698042600000000000000E-14 " "
relative error = 2.07133390550359180000000000000E-13 "%"
Correct digits = 16
h = 1.00E-2 " "
"NO INFO (given) for Equation 1"
Radius of convergence (ratio test) for eq 1 = 189.9987061356359 " "
"Order of pole (ratio test) Not computed"
"NO REAL POLE (three term test) for Equation 1"
"NO COMPLEX POLE (six term test) for Equation 1"
" "
"TOP MAIN SOLVE Loop"
x[1] = -3.7600000000000264 " "
y[1] (analytic) = -14.5644713377109 " "
y[1] (numeric) = -14.564471337710868 " "
absolute error = 3.19744231092045100000000000000E-14 " "
relative error = 2.1953713504461420000000000000E-13 "%"
Correct digits = 16
h = 1.00E-2 " "
"NO INFO (given) for Equation 1"
Radius of convergence (ratio test) for eq 1 = 189.9933028829862 " "
"Order of pole (ratio test) Not computed"
Radius of convergence (three term test) for eq 1 = 32.74366407953806 " "
Order of pole (three term test) = -137.288573314545 " "
"NO COMPLEX POLE (six term test) for Equation 1"
" "
"TOP MAIN SOLVE Loop"
x[1] = -3.7500000000000266 " "
y[1] (analytic) = -14.549914146182052 " "
y[1] (numeric) = -14.54991414618202 " "
absolute error = 3.19744231092045100000000000000E-14 " "
relative error = 2.19756781984825000000000000000E-13 "%"
Correct digits = 16
h = 1.00E-2 " "
"NO INFO (given) for Equation 1"
Radius of convergence (ratio test) for eq 1 = 190.01154518854017 " "
"Order of pole (ratio test) Not computed"
"NO REAL POLE (three term test) for Equation 1"
Radius of convergence (six term test) for eq 1 = 68.91422644844566 " "
Order of pole (six term test) = -7.652285565233413 " "
" "
"TOP MAIN SOLVE Loop"
x[1] = -3.740000000000027 " "
y[1] (analytic) = -14.535371504568564 " "
y[1] (numeric) = -14.535371504568532 " "
absolute error = 3.19744231092045100000000000000E-14 " "
relative error = 2.19976648681836100000000000000E-13 "%"
Correct digits = 16
h = 1.00E-2 " "
"NO INFO (given) for Equation 1"
Radius of convergence (ratio test) for eq 1 = 189.9944493285802 " "
"Order of pole (ratio test) Not computed"
Radius of convergence (three term test) for eq 1 = 5.857596081559148 " "
Order of pole (three term test) = -16.688292911547364 " "
Radius of convergence (six term test) for eq 1 = 12.382789047675868 " "
Order of pole (six term test) = -11.510728317416856 " "
" "
"TOP MAIN SOLVE Loop"
x[1] = -3.730000000000027 " "
y[1] (analytic) = -14.520843398327791 " "
y[1] (numeric) = -14.52084339832776 " "
absolute error = 3.19744231092045100000000000000E-14 " "
relative error = 2.20196735355514230000000000000E-13 "%"
Correct digits = 16
h = 1.00E-2 " "
"NO INFO (given) for Equation 1"
Radius of convergence (ratio test) for eq 1 = 190.0035508115362 " "
"Order of pole (ratio test) Not computed"
"NO REAL POLE (three term test) for Equation 1"
"NO COMPLEX POLE (six term test) for Equation 1"
" "
"TOP MAIN SOLVE Loop"
x[1] = -3.7200000000000273 " "
y[1] (analytic) = -14.506329812931627 " "
y[1] (numeric) = -14.506329812931595 " "
absolute error = 3.19744231092045100000000000000E-14 " "
relative error = 2.20417042225946070000000000000E-13 "%"
Correct digits = 16
h = 1.00E-2 " "
"NO INFO (given) for Equation 1"
Radius of convergence (ratio test) for eq 1 = 190.00788606253553 " "
"Order of pole (ratio test) Not computed"
"NO REAL POLE (three term test) for Equation 1"
"NO COMPLEX POLE (six term test) for Equation 1"
" "
"TOP MAIN SOLVE Loop"
x[1] = -3.7100000000000275 " "
y[1] (analytic) = -14.491830733866486 " "
y[1] (numeric) = -14.491830733866452 " "
absolute error = 3.37507799486047600000000000000E-14 " "
relative error = 2.3289521226418508000000000000E-13 "%"
Correct digits = 16
h = 1.00E-2 " "
"NO INFO (given) for Equation 1"
Radius of convergence (ratio test) for eq 1 = 189.99665603844923 " "
"Order of pole (ratio test) Not computed"
"NO REAL POLE (three term test) for Equation 1"
"NO COMPLEX POLE (six term test) for Equation 1"
" "
"TOP MAIN SOLVE Loop"
x[1] = -3.7000000000000277 " "
y[1] (analytic) = -14.477346146633286 " "
y[1] (numeric) = -14.477346146633252 " "
absolute error = 3.37507799486047600000000000000E-14 " "
relative error = 2.33128223962880940000000000000E-13 "%"
Correct digits = 16
h = 1.00E-2 " "
"NO INFO (given) for Equation 1"
Radius of convergence (ratio test) for eq 1 = 189.996924406623 " "
"Order of pole (ratio test) Not computed"
"NO REAL POLE (three term test) for Equation 1"
"NO COMPLEX POLE (six term test) for Equation 1"
" "
"TOP MAIN SOLVE Loop"
x[1] = -3.690000000000028 " "
y[1] (analytic) = -14.462876036747438 " "
y[1] (numeric) = -14.462876036747405 " "
absolute error = 3.37507799486047600000000000000E-14 " "
relative error = 2.3336146878982020000000000000E-13 "%"
Correct digits = 16
h = 1.00E-2 " "
"NO INFO (given) for Equation 1"
Radius of convergence (ratio test) for eq 1 = 189.98698263710097 " "
"Order of pole (ratio test) Not computed"
"NO REAL POLE (three term test) for Equation 1"
"NO COMPLEX POLE (six term test) for Equation 1"
" "
"TOP MAIN SOLVE Loop"
x[1] = -3.680000000000028 " "
y[1] (analytic) = -14.448420389738832 " "
y[1] (numeric) = -14.448420389738798 " "
absolute error = 3.37507799486047600000000000000E-14 " "
relative error = 2.33594946978247730000000000000E-13 "%"
Correct digits = 16
h = 1.00E-2 " "
"NO INFO (given) for Equation 1"
Radius of convergence (ratio test) for eq 1 = 189.99667181926728 " "
"Order of pole (ratio test) Not computed"
Radius of convergence (three term test) for eq 1 = 0.9059885083377414 " "
Order of pole (three term test) = -1.6444363750071185 " "
Radius of convergence (six term test) for eq 1 = 20.677630874702142 " "
Order of pole (six term test) = -12.118312937886827 " "
" "
"TOP MAIN SOLVE Loop"
x[1] = -3.6700000000000284 " "
y[1] (analytic) = -14.43397919115182 " "
y[1] (numeric) = -14.433979191151787 " "
absolute error = 3.37507799486047600000000000000E-14 " "
relative error = 2.3382865876164170000000000000E-13 "%"
Correct digits = 16
h = 1.00E-2 " "
"NO INFO (given) for Equation 1"
Radius of convergence (ratio test) for eq 1 = 190.00723023831267 " "
"Order of pole (ratio test) Not computed"
Radius of convergence (three term test) for eq 1 = 3.164620850430782 " "
Order of pole (three term test) = -7.70976413413152 " "
Radius of convergence (six term test) for eq 1 = 23.551655859786198 " "
Order of pole (six term test) = -11.152589761602107 " "
" "
"TOP MAIN SOLVE Loop"
x[1] = -3.6600000000000286 " "
y[1] (analytic) = -14.419552426545202 " "
y[1] (numeric) = -14.419552426545168 " "
absolute error = 3.37507799486047600000000000000E-14 " "
relative error = 2.3406260437371390000000000000E-13 "%"
Correct digits = 16
h = 1.00E-2 " "
"NO INFO (given) for Equation 1"
Radius of convergence (ratio test) for eq 1 = 190.00287509142467 " "
"Order of pole (ratio test) Not computed"
"NO REAL POLE (three term test) for Equation 1"
"NO COMPLEX POLE (six term test) for Equation 1"
" "
"TOP MAIN SOLVE Loop"
x[1] = -3.6500000000000288 " "
y[1] (analytic) = -14.405140081492213 " "
y[1] (numeric) = -14.405140081492178 " "
absolute error = 3.55271367880050100000000000000E-14 " "
relative error = 2.4662819373516840000000000000E-13 "%"
Correct digits = 16
h = 1.00E-2 " "
"NO INFO (given) for Equation 1"
Radius of convergence (ratio test) for eq 1 = 189.99431220424805 " "
"Order of pole (ratio test) Not computed"
"NO REAL POLE (three term test) for Equation 1"
"NO COMPLEX POLE (six term test) for Equation 1"
" "
"TOP MAIN SOLVE Loop"
x[1] = -3.640000000000029 " "
y[1] (analytic) = -14.390742141580507 " "
y[1] (numeric) = -14.39074214158047 " "
absolute error = 3.73034936274052600000000000000E-14 " "
relative error = 2.5921869254832114000000000000E-13 "%"
Correct digits = 16
h = 1.00E-2 " "
"NO INFO (given) for Equation 1"
Radius of convergence (ratio test) for eq 1 = 190.00475673773914 " "
"Order of pole (ratio test) Not computed"
"NO REAL POLE (three term test) for Equation 1"
"NO COMPLEX POLE (six term test) for Equation 1"
" "
"TOP MAIN SOLVE Loop"
x[1] = -3.630000000000029 " "
y[1] (analytic) = -14.376358592412137 " "
y[1] (numeric) = -14.376358592412103 " "
absolute error = 3.37507799486047600000000000000E-14 " "
relative error = 2.34765846522626860000000000000E-13 "%"
Correct digits = 16
h = 1.00E-2 " "
"NO INFO (given) for Equation 1"
Radius of convergence (ratio test) for eq 1 = 189.99778459935257 " "
"Order of pole (ratio test) Not computed"
Radius of convergence (three term test) for eq 1 = 1.2922085400992658 " "
Order of pole (three term test) = -2.3827586028993646 " "
Radius of convergence (six term test) for eq 1 = 52.71361634071347 " "
Order of pole (six term test) = -8.993741332365268 " "
" "
"TOP MAIN SOLVE Loop"
x[1] = -3.6200000000000294 " "
y[1] (analytic) = -14.361989419603562 " "
y[1] (numeric) = -14.361989419603526 " "
absolute error = 3.55271367880050100000000000000E-14 " "
relative error = 2.47369189253905440000000000000E-13 "%"
Correct digits = 16
h = 1.00E-2 " "
"NO INFO (given) for Equation 1"
Radius of convergence (ratio test) for eq 1 = 189.9978608315401 " "
"Order of pole (ratio test) Not computed"
Radius of convergence (three term test) for eq 1 = 1.759800724956044 " "
Order of pole (three term test) = -50.94623035349157 " "
"NO COMPLEX POLE (six term test) for Equation 1"
" "
"TOP MAIN SOLVE Loop"
x[1] = -3.6100000000000296 " "
y[1] (analytic) = -14.3476346087856 " "
y[1] (numeric) = -14.347634608785565 " "
absolute error = 3.55271367880050100000000000000E-14 " "
relative error = 2.47616682168992460000000000000E-13 "%"
Correct digits = 16
h = 1.00E-2 " "
"NO INFO (given) for Equation 1"
Radius of convergence (ratio test) for eq 1 = 189.99054132460208 " "
"Order of pole (ratio test) Not computed"
"NO REAL POLE (three term test) for Equation 1"
"NO COMPLEX POLE (six term test) for Equation 1"
" "
"TOP MAIN SOLVE Loop"
x[1] = -3.60000000000003 " "
y[1] (analytic) = -14.333294145603446 " "
y[1] (numeric) = -14.333294145603409 " "
absolute error = 3.73034936274052600000000000000E-14 " "
relative error = 2.6025764383582140000000000000E-13 "%"
Correct digits = 16
h = 1.00E-2 " "
"NO INFO (given) for Equation 1"
Radius of convergence (ratio test) for eq 1 = 189.9983063134693 " "
"Order of pole (ratio test) Not computed"
"NO REAL POLE (three term test) for Equation 1"
"NO COMPLEX POLE (six term test) for Equation 1"
" "
"TOP MAIN SOLVE Loop"
x[1] = -3.59000000000003 " "
y[1] (analytic) = -14.31896801571663 " "
y[1] (numeric) = -14.318968015716592 " "
absolute error = 3.73034936274052600000000000000E-14 " "
relative error = 2.6051803165186630000000000000E-13 "%"
Correct digits = 16
h = 1.00E-2 " "
"NO INFO (given) for Equation 1"
Radius of convergence (ratio test) for eq 1 = 189.99594957811976 " "
"Order of pole (ratio test) Not computed"
"NO REAL POLE (three term test) for Equation 1"
"NO COMPLEX POLE (six term test) for Equation 1"
" "
"TOP MAIN SOLVE Loop"
x[1] = -3.5800000000000303 " "
y[1] (analytic) = -14.304656204799022 " "
y[1] (numeric) = -14.304656204798986 " "
absolute error = 3.55271367880050100000000000000E-14 " "
relative error = 2.4836064760568052000000000000E-13 "%"
Correct digits = 16
h = 1.00E-2 " "
"NO INFO (given) for Equation 1"
Radius of convergence (ratio test) for eq 1 = 189.99930087430317 " "
"Order of pole (ratio test) Not computed"
"NO REAL POLE (three term test) for Equation 1"
"NO COMPLEX POLE (six term test) for Equation 1"
" "
"TOP MAIN SOLVE Loop"
x[1] = -3.5700000000000305 " "
y[1] (analytic) = -14.290358698538812 " "
y[1] (numeric) = -14.290358698538776 " "
absolute error = 3.55271367880050100000000000000E-14 " "
relative error = 2.4860913247501380000000000000E-13 "%"
Correct digits = 16
h = 1.00E-2 " "
"NO INFO (given) for Equation 1"
Radius of convergence (ratio test) for eq 1 = 189.99456287417155 " "
"Order of pole (ratio test) Not computed"
"NO REAL POLE (three term test) for Equation 1"
"NO COMPLEX POLE (six term test) for Equation 1"
" "
"TOP MAIN SOLVE Loop"
x[1] = -3.5600000000000307 " "
y[1] (analytic) = -14.276075482638495 " "
y[1] (numeric) = -14.276075482638456 " "
absolute error = 3.90798504668055100000000000000E-14 " "
relative error = 2.7374365254885020000000000000E-13 "%"
Correct digits = 16
h = 1.00E-2 " "
"NO INFO (given) for Equation 1"
Radius of convergence (ratio test) for eq 1 = 189.999591240516 " "
"Order of pole (ratio test) Not computed"
"NO REAL POLE (three term test) for Equation 1"
"NO COMPLEX POLE (six term test) for Equation 1"
" "
"TOP MAIN SOLVE Loop"
x[1] = -3.550000000000031 " "
y[1] (analytic) = -14.261806542814845 " "
y[1] (numeric) = -14.261806542814808 " "
absolute error = 3.73034936274052600000000000000E-14 " "
relative error = 2.61562190704367040000000000000E-13 "%"
Correct digits = 16
h = 1.00E-2 " "
"NO INFO (given) for Equation 1"
Radius of convergence (ratio test) for eq 1 = 189.9943619132609 " "
"Order of pole (ratio test) Not computed"
"NO REAL POLE (three term test) for Equation 1"
"NO COMPLEX POLE (six term test) for Equation 1"
" "
"TOP MAIN SOLVE Loop"
x[1] = -3.540000000000031 " "
y[1] (analytic) = -14.247551864798927 " "
y[1] (numeric) = -14.247551864798892 " "
absolute error = 3.55271367880050100000000000000E-14 " "
relative error = 2.49356079733115580000000000000E-13 "%"
Correct digits = 16
h = 1.00E-2 " "
"NO INFO (given) for Equation 1"
Radius of convergence (ratio test) for eq 1 = 190.00614665390074 " "
"Order of pole (ratio test) Not computed"
"NO REAL POLE (three term test) for Equation 1"
"NO COMPLEX POLE (six term test) for Equation 1"
" "
"TOP MAIN SOLVE Loop"
x[1] = -3.5300000000000313 " "
y[1] (analytic) = -14.233311434336064 " "
y[1] (numeric) = -14.233311434336027 " "
absolute error = 3.73034936274052600000000000000E-14 " "
relative error = 2.6208583855908120000000000000E-13 "%"
Correct digits = 16
h = 1.00E-2 " "
"NO INFO (given) for Equation 1"
Radius of convergence (ratio test) for eq 1 = 189.9911328371618 " "
"Order of pole (ratio test) Not computed"
"NO REAL POLE (three term test) for Equation 1"
"NO COMPLEX POLE (six term test) for Equation 1"
" "
"TOP MAIN SOLVE Loop"
x[1] = -3.5200000000000315 " "
y[1] (analytic) = -14.219085237185821 " "
y[1] (numeric) = -14.219085237185782 " "
absolute error = 3.90798504668055100000000000000E-14 " "
relative error = 2.74840820031120540000000000000E-13 "%"
Correct digits = 16
h = 1.00E-2 " "
"NO INFO (given) for Equation 1"
Radius of convergence (ratio test) for eq 1 = 190.006362720635 " "
"Order of pole (ratio test) Not computed"
"NO REAL POLE (three term test) for Equation 1"
"NO COMPLEX POLE (six term test) for Equation 1"
" "
"TOP MAIN SOLVE Loop"
x[1] = -3.5100000000000318 " "
y[1] (analytic) = -14.204873259121998 " "
y[1] (numeric) = -14.204873259121959 " "
absolute error = 3.90798504668055100000000000000E-14 " "
relative error = 2.75115798317379900000000000000E-13 "%"
Correct digits = 16
h = 1.00E-2 " "
"NO INFO (given) for Equation 1"
Radius of convergence (ratio test) for eq 1 = 189.99736372893042 " "
"Order of pole (ratio test) Not computed"
"NO REAL POLE (three term test) for Equation 1"
"NO COMPLEX POLE (six term test) for Equation 1"
" "
"TOP MAIN SOLVE Loop"
x[1] = -3.500000000000032 " "
y[1] (analytic) = -14.190675485932617 " "
y[1] (numeric) = -14.190675485932578 " "
absolute error = 3.90798504668055100000000000000E-14 " "
relative error = 2.7539105171946060000000000000E-13 "%"
Correct digits = 16
h = 1.00E-2 " "
"NO INFO (given) for Equation 1"
Radius of convergence (ratio test) for eq 1 = 190.00313483781025 " "
"Order of pole (ratio test) Not computed"
"NO REAL POLE (three term test) for Equation 1"
"NO COMPLEX POLE (six term test) for Equation 1"
" "
"TOP MAIN SOLVE Loop"
x[1] = -3.490000000000032 " "
y[1] (analytic) = -14.176491903419908 " "
y[1] (numeric) = -14.176491903419867 " "
absolute error = 4.08562073062057600000000000000E-14 " "
relative error = 2.88196879626825660000000000000E-13 "%"
Correct digits = 16
h = 1.00E-2 " "
"NO INFO (given) for Equation 1"
Radius of convergence (ratio test) for eq 1 = 190.00159791275067 " "
"Order of pole (ratio test) Not computed"
"NO REAL POLE (three term test) for Equation 1"
"NO COMPLEX POLE (six term test) for Equation 1"
" "
"TOP MAIN SOLVE Loop"
x[1] = -3.4800000000000324 " "
y[1] (analytic) = -14.162322497400282 " "
y[1] (numeric) = -14.162322497400242 " "
absolute error = 4.08562073062057600000000000000E-14 " "
relative error = 2.8848522065293714000000000000E-13 "%"
Correct digits = 16
h = 1.00E-2 " "
"NO INFO (given) for Equation 1"
Radius of convergence (ratio test) for eq 1 = 189.99155015803063 " "
"Order of pole (ratio test) Not computed"
"NO REAL POLE (three term test) for Equation 1"
"NO COMPLEX POLE (six term test) for Equation 1"
" "
"TOP MAIN SOLVE Loop"
x[1] = -3.4700000000000326 " "
y[1] (analytic) = -14.148167253704333 " "
y[1] (numeric) = -14.148167253704292 " "
absolute error = 4.08562073062057600000000000000E-14 " "
relative error = 2.8877385016429330000000000000E-13 "%"
Correct digits = 16
h = 1.00E-2 " "
"NO INFO (given) for Equation 1"
Radius of convergence (ratio test) for eq 1 = 190.0082604255488 " "
"Order of pole (ratio test) Not computed"
"NO REAL POLE (three term test) for Equation 1"
"NO COMPLEX POLE (six term test) for Equation 1"
" "
"TOP MAIN SOLVE Loop"
x[1] = -3.460000000000033 " "
y[1] (analytic) = -14.134026158176818 " "
y[1] (numeric) = -14.134026158176777 " "
absolute error = 4.08562073062057600000000000000E-14 " "
relative error = 2.8906276844952367000000000000E-13 "%"
Correct digits = 16
h = 1.00E-2 " "
"NO INFO (given) for Equation 1"
Radius of convergence (ratio test) for eq 1 = 189.9970725059037 " "
"Order of pole (ratio test) Not computed"
"NO REAL POLE (three term test) for Equation 1"
"NO COMPLEX POLE (six term test) for Equation 1"
" "
"TOP MAIN SOLVE Loop"
x[1] = -3.450000000000033 " "
y[1] (analytic) = -14.119899196676638 " "
y[1] (numeric) = -14.119899196676597 " "
absolute error = 4.08562073062057600000000000000E-14 " "
relative error = 2.8935197579754660000000000000E-13 "%"
Correct digits = 16
h = 1.00E-2 " "
"NO INFO (given) for Equation 1"
Radius of convergence (ratio test) for eq 1 = 189.9990221127078 " "
"Order of pole (ratio test) Not computed"
"NO REAL POLE (three term test) for Equation 1"
"NO COMPLEX POLE (six term test) for Equation 1"
" "
"TOP MAIN SOLVE Loop"
x[1] = -3.4400000000000333 " "
y[1] (analytic) = -14.105786355076832 " "
y[1] (numeric) = -14.105786355076791 " "
absolute error = 4.08562073062057600000000000000E-14 " "
relative error = 2.8964147249756940000000000000E-13 "%"
Correct digits = 16
h = 1.00E-2 " "
"NO INFO (given) for Equation 1"
Radius of convergence (ratio test) for eq 1 = 189.9989945192519 " "
"Order of pole (ratio test) Not computed"
"NO REAL POLE (three term test) for Equation 1"
"NO COMPLEX POLE (six term test) for Equation 1"
" "
"TOP MAIN SOLVE Loop"
x[1] = -3.4300000000000335 " "
y[1] (analytic) = -14.091687619264555 " "
y[1] (numeric) = -14.091687619264516 " "
absolute error = 3.90798504668055100000000000000E-14 " "
relative error = 2.77325551933041600000000000000E-13 "%"
Correct digits = 16
h = 1.00E-2 " "
"NO INFO (given) for Equation 1"
Radius of convergence (ratio test) for eq 1 = 189.98093328506025 " "
"Order of pole (ratio test) Not computed"
"NO REAL POLE (three term test) for Equation 1"
"NO COMPLEX POLE (six term test) for Equation 1"
" "
"TOP MAIN SOLVE Loop"
x[1] = -3.4200000000000337 " "
y[1] (analytic) = -14.077602975141074 " "
y[1] (numeric) = -14.077602975141033 " "
absolute error = 4.08562073062057600000000000000E-14 " "
relative error = 2.9022133511189130000000000000E-13 "%"
Correct digits = 16
h = 1.00E-2 " "
"NO INFO (given) for Equation 1"
Radius of convergence (ratio test) for eq 1 = 190.00672894638717 " "
"Order of pole (ratio test) Not computed"
"NO REAL POLE (three term test) for Equation 1"
"NO COMPLEX POLE (six term test) for Equation 1"
" "
"TOP MAIN SOLVE Loop"
x[1] = -3.410000000000034 " "
y[1] (analytic) = -14.063532408621738 " "
y[1] (numeric) = -14.063532408621699 " "
absolute error = 3.90798504668055100000000000000E-14 " "
relative error = 2.7788075805796386000000000000E-13 "%"
Correct digits = 16
h = 1.00E-2 " "
"NO INFO (given) for Equation 1"
Radius of convergence (ratio test) for eq 1 = 190.00388443630177 " "
"Order of pole (ratio test) Not computed"
"NO REAL POLE (three term test) for Equation 1"
"NO COMPLEX POLE (six term test) for Equation 1"
" "
"TOP MAIN SOLVE Loop"
x[1] = -3.400000000000034 " "
y[1] (analytic) = -14.049475905635989 " "
y[1] (numeric) = -14.049475905635944 " "
absolute error = 4.44089209850062600000000000000E-14 " "
relative error = 3.16089520230370240000000000000E-13 "%"
Correct digits = 16
h = 1.00E-2 " "
"NO INFO (given) for Equation 1"
Radius of convergence (ratio test) for eq 1 = 190.00295016583243 " "
"Order of pole (ratio test) Not computed"
Radius of convergence (three term test) for eq 1 = 0.6228504026458248 " "
Order of pole (three term test) = -34.579992791111 " "
"NO COMPLEX POLE (six term test) for Equation 1"
" "
"TOP MAIN SOLVE Loop"
x[1] = -3.3900000000000343 " "
y[1] (analytic) = -14.035433452127311 " "
y[1] (numeric) = -14.035433452127267 " "
absolute error = 4.44089209850062600000000000000E-14 " "
relative error = 3.1640576784805550000000000000E-13 "%"
Correct digits = 16
h = 1.00E-2 " "
"NO INFO (given) for Equation 1"
Radius of convergence (ratio test) for eq 1 = 190.0056786794007 " "
"Order of pole (ratio test) Not computed"
"NO REAL POLE (three term test) for Equation 1"
"NO COMPLEX POLE (six term test) for Equation 1"
" "
"TOP MAIN SOLVE Loop"
x[1] = -3.3800000000000345 " "
y[1] (analytic) = -14.021405034053254 " "
y[1] (numeric) = -14.021405034053211 " "
absolute error = 4.26325641456060100000000000000E-14 " "
relative error = 3.0405343859667360000000000000E-13 "%"
Correct digits = 16
h = 1.00E-2 " "
"NO INFO (given) for Equation 1"
Radius of convergence (ratio test) for eq 1 = 189.99970613322398 " "
"Order of pole (ratio test) Not computed"
"NO REAL POLE (three term test) for Equation 1"
Radius of convergence (six term test) for eq 1 = 87.79302396097884 " "
Order of pole (six term test) = -5.614172421071677 " "
" "
"TOP MAIN SOLVE Loop"
x[1] = -3.3700000000000347 " "
y[1] (analytic) = -14.007390637385402 " "
y[1] (numeric) = -14.007390637385358 " "
absolute error = 4.44089209850062600000000000000E-14 " "
relative error = 3.1703921261737267000000000000E-13 "%"
Correct digits = 16
h = 1.00E-2 " "
"NO INFO (given) for Equation 1"
Radius of convergence (ratio test) for eq 1 = 189.99573706603536 " "
"Order of pole (ratio test) Not computed"
"NO REAL POLE (three term test) for Equation 1"
Radius of convergence (six term test) for eq 1 = 71.25368599775743 " "
Order of pole (six term test) = -5.999853221421976 " "
" "
"TOP MAIN SOLVE Loop"
x[1] = -3.360000000000035 " "
y[1] (analytic) = -13.993390248109352 " "
y[1] (numeric) = -13.993390248109309 " "
absolute error = 4.26325641456060100000000000000E-14 " "
relative error = 3.0466215398635150000000000000E-13 "%"
Correct digits = 16
h = 1.00E-2 " "
"NO INFO (given) for Equation 1"
Radius of convergence (ratio test) for eq 1 = 189.99507434293835 " "
"Order of pole (ratio test) Not computed"
"NO REAL POLE (three term test) for Equation 1"
"NO COMPLEX POLE (six term test) for Equation 1"
" "
"TOP MAIN SOLVE Loop"
x[1] = -3.350000000000035 " "
y[1] (analytic) = -13.979403852224719 " "
y[1] (numeric) = -13.979403852224674 " "
absolute error = 4.44089209850062600000000000000E-14 " "
relative error = 3.1767392554396306000000000000E-13 "%"
Correct digits = 16
h = 1.00E-2 " "
"NO INFO (given) for Equation 1"
Radius of convergence (ratio test) for eq 1 = 190.00405185649848 " "
"Order of pole (ratio test) Not computed"
"NO REAL POLE (three term test) for Equation 1"
"NO COMPLEX POLE (six term test) for Equation 1"
" "
"TOP MAIN SOLVE Loop"
x[1] = -3.3400000000000354 " "
y[1] (analytic) = -13.965431435745105 " "
y[1] (numeric) = -13.965431435745057 " "
absolute error = 4.79616346638067600000000000000E-14 " "
relative error = 3.43431099028183000000000000000E-13 "%"
Correct digits = 16
h = 1.00E-2 " "
"NO INFO (given) for Equation 1"
Radius of convergence (ratio test) for eq 1 = 189.98841046732568 " "
"Order of pole (ratio test) Not computed"
"NO REAL POLE (three term test) for Equation 1"
"NO COMPLEX POLE (six term test) for Equation 1"
" "
"TOP MAIN SOLVE Loop"
x[1] = -3.3300000000000356 " "
y[1] (analytic) = -13.951472984698086 " "
y[1] (numeric) = -13.95147298469804 " "
absolute error = 4.61852778244065100000000000000E-14 " "
relative error = 3.31042305533346350000000000000E-13 "%"
Correct digits = 16
h = 1.00E-2 " "
"NO INFO (given) for Equation 1"
Radius of convergence (ratio test) for eq 1 = 190.01280948585884 " "
"Order of pole (ratio test) Not computed"
"NO REAL POLE (three term test) for Equation 1"
"NO COMPLEX POLE (six term test) for Equation 1"
" "
"TOP MAIN SOLVE Loop"
x[1] = -3.320000000000036 " "
y[1] (analytic) = -13.937528485125217 " "
y[1] (numeric) = -13.937528485125169 " "
absolute error = 4.79616346638067600000000000000E-14 " "
relative error = 3.4411864854657460000000000000E-13 "%"
Correct digits = 16
h = 1.00E-2 " "
"NO INFO (given) for Equation 1"
Radius of convergence (ratio test) for eq 1 = 190.0053828101228 " "
"Order of pole (ratio test) Not computed"
"NO REAL POLE (three term test) for Equation 1"
"NO COMPLEX POLE (six term test) for Equation 1"
" "
"TOP MAIN SOLVE Loop"
x[1] = -3.310000000000036 " "
y[1] (analytic) = -13.923597923081992 " "
y[1] (numeric) = -13.923597923081946 " "
absolute error = 4.61852778244065100000000000000E-14 " "
relative error = 3.31705052670634600000000000000E-13 "%"
Correct digits = 16
h = 1.00E-2 " "
"NO INFO (given) for Equation 1"
Radius of convergence (ratio test) for eq 1 = 189.99237678693999 " "
"Order of pole (ratio test) Not computed"
"NO REAL POLE (three term test) for Equation 1"
"NO COMPLEX POLE (six term test) for Equation 1"
" "
"TOP MAIN SOLVE Loop"
x[1] = -3.3000000000000362 " "
y[1] (analytic) = -13.909681284637854 " "
y[1] (numeric) = -13.909681284637806 " "
absolute error = 4.79616346638067600000000000000E-14 " "
relative error = 3.44807574540019150000000000000E-13 "%"
Correct digits = 16
h = 1.00E-2 " "
"NO INFO (given) for Equation 1"
Radius of convergence (ratio test) for eq 1 = 189.99860801923847 " "
"Order of pole (ratio test) Not computed"
"NO REAL POLE (three term test) for Equation 1"
"NO COMPLEX POLE (six term test) for Equation 1"
" "
"TOP MAIN SOLVE Loop"
x[1] = -3.2900000000000365 " "
y[1] (analytic) = -13.895778555876158 " "
y[1] (numeric) = -13.89577855587611 " "
absolute error = 4.79616346638067600000000000000E-14 " "
relative error = 3.45152554575828800000000000000E-13 "%"
Correct digits = 16
h = 1.00E-2 " "
"NO INFO (given) for Equation 1"
Radius of convergence (ratio test) for eq 1 = 189.99534549241196 " "
"Order of pole (ratio test) Not computed"
"NO REAL POLE (three term test) for Equation 1"
"NO COMPLEX POLE (six term test) for Equation 1"
" "
"TOP MAIN SOLVE Loop"
x[1] = -3.2800000000000367 " "
y[1] (analytic) = -13.881889722894176 " "
y[1] (numeric) = -13.881889722894128 " "
absolute error = 4.79616346638067600000000000000E-14 " "
relative error = 3.45497879764221640000000000000E-13 "%"
Correct digits = 16
h = 1.00E-2 " "
"NO INFO (given) for Equation 1"
Radius of convergence (ratio test) for eq 1 = 190.0063158836694 " "
"Order of pole (ratio test) Not computed"
Radius of convergence (three term test) for eq 1 = 1.288787981337486 " "
Order of pole (three term test) = -42.12436206746414 " "
"NO COMPLEX POLE (six term test) for Equation 1"
" "
"TOP MAIN SOLVE Loop"
x[1] = -3.270000000000037 " "
y[1] (analytic) = -13.868014771803072 " "
y[1] (numeric) = -13.868014771803026 " "
absolute error = 4.61852778244065100000000000000E-14 " "
relative error = 3.33034530063466700000000000000E-13 "%"
Correct digits = 16
h = 1.00E-2 " "
"NO INFO (given) for Equation 1"
Radius of convergence (ratio test) for eq 1 = 189.99872368552323 " "
"Order of pole (ratio test) Not computed"
"NO REAL POLE (three term test) for Equation 1"
"NO COMPLEX POLE (six term test) for Equation 1"
" "
"TOP MAIN SOLVE Loop"
x[1] = -3.260000000000037 " "
y[1] (analytic) = -13.854153688727898 " "
y[1] (numeric) = -13.85415368872785 " "
absolute error = 4.79616346638067600000000000000E-14 " "
relative error = 3.4618956698040393000000000000E-13 "%"
Correct digits = 16
h = 1.00E-2 " "
"NO INFO (given) for Equation 1"
Radius of convergence (ratio test) for eq 1 = 189.98944227392846 " "
"Order of pole (ratio test) Not computed"
"NO REAL POLE (three term test) for Equation 1"
"NO COMPLEX POLE (six term test) for Equation 1"
" "
"TOP MAIN SOLVE Loop"
x[1] = -3.2500000000000373 " "
y[1] (analytic) = -13.840306459807568 " "
y[1] (numeric) = -13.840306459807518 " "
absolute error = 4.97379915032070130000000000000E-14 " "
relative error = 3.59370593762839000000000000000E-13 "%"
Correct digits = 16
h = 1.00E-2 " "
"NO INFO (given) for Equation 1"
Radius of convergence (ratio test) for eq 1 = 190.00747978159916 " "
"Order of pole (ratio test) Not computed"
"NO REAL POLE (three term test) for Equation 1"
"NO COMPLEX POLE (six term test) for Equation 1"
" "
"TOP MAIN SOLVE Loop"
x[1] = -3.2400000000000375 " "
y[1] (analytic) = -13.826473071194847 " "
y[1] (numeric) = -13.8264730711948 " "
absolute error = 4.79616346638067600000000000000E-14 " "
relative error = 3.46882638955315600000000000000E-13 "%"
Correct digits = 16
h = 1.00E-2 " "
"NO INFO (given) for Equation 1"
Radius of convergence (ratio test) for eq 1 = 190.0120727003161 " "
"Order of pole (ratio test) Not computed"
"NO REAL POLE (three term test) for Equation 1"
"NO COMPLEX POLE (six term test) for Equation 1"
" "
"TOP MAIN SOLVE Loop"
x[1] = -3.2300000000000377 " "
y[1] (analytic) = -13.81265350905635 " "
y[1] (numeric) = -13.812653509056304 " "
absolute error = 4.61852778244065100000000000000E-14 " "
relative error = 3.3436933601588470000000000000E-13 "%"
Correct digits = 16
h = 1.00E-2 " "
"NO INFO (given) for Equation 1"
Radius of convergence (ratio test) for eq 1 = 189.98986457152373 " "
"Order of pole (ratio test) Not computed"
"NO REAL POLE (three term test) for Equation 1"
"NO COMPLEX POLE (six term test) for Equation 1"
" "
"TOP MAIN SOLVE Loop"
x[1] = -3.220000000000038 " "
y[1] (analytic) = -13.798847759572517 " "
y[1] (numeric) = -13.79884775957247 " "
absolute error = 4.79616346638067600000000000000E-14 " "
relative error = 3.4757709846124570000000000000E-13 "%"
Correct digits = 16
h = 1.00E-2 " "
"NO INFO (given) for Equation 1"
Radius of convergence (ratio test) for eq 1 = 190.00494303888385 " "
"Order of pole (ratio test) Not computed"
"NO REAL POLE (three term test) for Equation 1"
"NO COMPLEX POLE (six term test) for Equation 1"
" "
"TOP MAIN SOLVE Loop"
x[1] = -3.210000000000038 " "
y[1] (analytic) = -13.78505580893759 " "
y[1] (numeric) = -13.785055808937543 " "
absolute error = 4.79616346638067600000000000000E-14 " "
relative error = 3.4792484940620020000000000000E-13 "%"
Correct digits = 16
h = 1.00E-2 " "
"NO INFO (given) for Equation 1"
Radius of convergence (ratio test) for eq 1 = 190.00351414600414 " "
"Order of pole (ratio test) Not computed"
"NO REAL POLE (three term test) for Equation 1"
"NO COMPLEX POLE (six term test) for Equation 1"
" "
"TOP MAIN SOLVE Loop"
x[1] = -3.2000000000000384 " "
y[1] (analytic) = -13.771277643359623 " "
y[1] (numeric) = -13.771277643359575 " "
absolute error = 4.79616346638067600000000000000E-14 " "
relative error = 3.48272948276033060000000000000E-13 "%"
Correct digits = 16
h = 1.00E-2 " "
"NO INFO (given) for Equation 1"
Radius of convergence (ratio test) for eq 1 = 190.0010009316756 " "
"Order of pole (ratio test) Not computed"
"NO REAL POLE (three term test) for Equation 1"
"NO COMPLEX POLE (six term test) for Equation 1"
" "
"TOP MAIN SOLVE Loop"
x[1] = -3.1900000000000386 " "
y[1] (analytic) = -13.75751324906045 " "
y[1] (numeric) = -13.757513249060398 " "
absolute error = 5.151434834260726000000000000000E-14 " "
relative error = 3.7444520248690560000000000000E-13 "%"
Correct digits = 16
h = 1.00E-2 " "
"NO INFO (given) for Equation 1"
Radius of convergence (ratio test) for eq 1 = 189.98461341246858 " "
"Order of pole (ratio test) Not computed"
"NO REAL POLE (three term test) for Equation 1"
"NO COMPLEX POLE (six term test) for Equation 1"
" "
"TOP MAIN SOLVE Loop"
x[1] = -3.180000000000039 " "
y[1] (analytic) = -13.743762612275665 " "
y[1] (numeric) = -13.743762612275617 " "
absolute error = 4.79616346638067600000000000000E-14 " "
relative error = 3.48970191183077870000000000000E-13 "%"
Correct digits = 16
h = 1.00E-2 " "
"NO INFO (given) for Equation 1"
Radius of convergence (ratio test) for eq 1 = 189.99329453375412 " "
"Order of pole (ratio test) Not computed"
"NO REAL POLE (three term test) for Equation 1"
"NO COMPLEX POLE (six term test) for Equation 1"
" "
"TOP MAIN SOLVE Loop"
x[1] = -3.170000000000039 " "
y[1] (analytic) = -13.730025719254645 " "
y[1] (numeric) = -13.730025719254593 " "
absolute error = 5.151434834260726000000000000000E-14 " "
relative error = 3.75194842281794340000000000000E-13 "%"
Correct digits = 16
h = 1.00E-2 " "
"NO INFO (given) for Equation 1"
Radius of convergence (ratio test) for eq 1 = 190.0065448836808 " "
"Order of pole (ratio test) Not computed"
"NO REAL POLE (three term test) for Equation 1"
"NO COMPLEX POLE (six term test) for Equation 1"
" "
"TOP MAIN SOLVE Loop"
x[1] = -3.160000000000039 " "
y[1] (analytic) = -13.716302556260485 " "
y[1] (numeric) = -13.716302556260432 " "
absolute error = 5.329070518200751000000000000000E-14 " "
relative error = 3.88520922190391750000000000000E-13 "%"
Correct digits = 16
h = 1.00E-2 " "
"NO INFO (given) for Equation 1"
Radius of convergence (ratio test) for eq 1 = 189.9777930519969 " "
"Order of pole (ratio test) Not computed"
"NO REAL POLE (three term test) for Equation 1"
"NO COMPLEX POLE (six term test) for Equation 1"
" "
"TOP MAIN SOLVE Loop"
x[1] = -3.1500000000000394 " "
y[1] (analytic) = -13.70259310957002 " "
y[1] (numeric) = -13.702593109569971 " "
absolute error = 4.97379915032070130000000000000E-14 " "
relative error = 3.62982328275292140000000000000E-13 "%"
Correct digits = 16
h = 1.00E-2 " "
"NO INFO (given) for Equation 1"
Radius of convergence (ratio test) for eq 1 = 189.9969170309919 " "
"Order of pole (ratio test) Not computed"
Radius of convergence (three term test) for eq 1 = 0.7825784592963525 " "
Order of pole (three term test) = -1.773535795201063 " "
Radius of convergence (six term test) for eq 1 = 12.220213881566508 " "
Order of pole (six term test) = -12.2661747121494 " "
" "
"TOP MAIN SOLVE Loop"
x[1] = -3.1400000000000396 " "
y[1] (analytic) = -13.688897365473812 " "
y[1] (numeric) = -13.68889736547376 " "
absolute error = 5.151434834260726000000000000000E-14 " "
relative error = 3.76322116875073830000000000000E-13 "%"
Correct digits = 16
h = 1.00E-2 " "
"NO INFO (given) for Equation 1"
Radius of convergence (ratio test) for eq 1 = 190.01328179118622 " "
"Order of pole (ratio test) Not computed"
Radius of convergence (three term test) for eq 1 = 1.3348823862077976 " "
Order of pole (three term test) = -42.382982963329766 " "
"NO COMPLEX POLE (six term test) for Equation 1"
" "
"TOP MAIN SOLVE Loop"
x[1] = -3.13000000000004 " "
y[1] (analytic) = -13.675215310276105 " "
y[1] (numeric) = -13.675215310276057 " "
absolute error = 4.79616346638067600000000000000E-14 " "
relative error = 3.50719411545692250000000000000E-13 "%"
Correct digits = 16
h = 1.00E-2 " "
"NO INFO (given) for Equation 1"
Radius of convergence (ratio test) for eq 1 = 190.00742486912327 " "
"Order of pole (ratio test) Not computed"
"NO REAL POLE (three term test) for Equation 1"
"NO COMPLEX POLE (six term test) for Equation 1"
" "
"TOP MAIN SOLVE Loop"
x[1] = -3.12000000000004 " "
y[1] (analytic) = -13.661546930294852 " "
y[1] (numeric) = -13.661546930294802 " "
absolute error = 4.97379915032070130000000000000E-14 " "
relative error = 3.64072910315241600000000000000E-13 "%"
Correct digits = 16
h = 1.00E-2 " "
"NO INFO (given) for Equation 1"
Radius of convergence (ratio test) for eq 1 = 190.01017955749006 " "
"Order of pole (ratio test) Not computed"
Radius of convergence (three term test) for eq 1 = 1.2632412816777523 " "
Order of pole (three term test) = -43.200599364785695 " "
"NO COMPLEX POLE (six term test) for Equation 1"
" "
"TOP MAIN SOLVE Loop"
x[1] = -3.1100000000000403 " "
y[1] (analytic) = -13.64789221186167 " "
y[1] (numeric) = -13.647892211861617 " "
absolute error = 5.329070518200751000000000000000E-14 " "
relative error = 3.90468391417184870000000000000E-13 "%"
Correct digits = 16
h = 1.00E-2 " "
"NO INFO (given) for Equation 1"
Radius of convergence (ratio test) for eq 1 = 189.9814430109686 " "
"Order of pole (ratio test) Not computed"
"NO REAL POLE (three term test) for Equation 1"
"NO COMPLEX POLE (six term test) for Equation 1"
" "
"TOP MAIN SOLVE Loop"
x[1] = -3.1000000000000405 " "
y[1] (analytic) = -13.634251141321831 " "
y[1] (numeric) = -13.634251141321782 " "
absolute error = 4.97379915032070130000000000000E-14 " "
relative error = 3.64801784767366000000000000000E-13 "%"
Correct digits = 16
h = 1.00E-2 " "
"NO INFO (given) for Equation 1"
Radius of convergence (ratio test) for eq 1 = 189.99980045027968 " "
"Order of pole (ratio test) Not computed"
"NO REAL POLE (three term test) for Equation 1"
"NO COMPLEX POLE (six term test) for Equation 1"
" "
"TOP MAIN SOLVE Loop"
x[1] = -3.0900000000000407 " "
y[1] (analytic) = -13.620623705034276 " "
y[1] (numeric) = -13.620623705034223 " "
absolute error = 5.329070518200751000000000000000E-14 " "
relative error = 3.912501096576870000000000000E-13 "%"
Correct digits = 16
h = 1.00E-2 " "
"NO INFO (given) for Equation 1"
Radius of convergence (ratio test) for eq 1 = 190.0054559597994 " "
"Order of pole (ratio test) Not computed"
"NO REAL POLE (three term test) for Equation 1"
"NO COMPLEX POLE (six term test) for Equation 1"
" "
"TOP MAIN SOLVE Loop"
x[1] = -3.080000000000041 " "
y[1] (analytic) = -13.607009889371557 " "
y[1] (numeric) = -13.607009889371504 " "
absolute error = 5.329070518200751000000000000000E-14 " "
relative error = 3.91641555457624140000000000000E-13 "%"
Correct digits = 16
h = 1.00E-2 " "
"NO INFO (given) for Equation 1"
Radius of convergence (ratio test) for eq 1 = 189.9964123399477 " "
"Order of pole (ratio test) Not computed"
"NO REAL POLE (three term test) for Equation 1"
"NO COMPLEX POLE (six term test) for Equation 1"
" "
"TOP MAIN SOLVE Loop"
x[1] = -3.070000000000041 " "
y[1] (analytic) = -13.593409680719862 " "
y[1] (numeric) = -13.593409680719809 " "
absolute error = 5.329070518200751000000000000000E-14 " "
relative error = 3.92033392899149460000000000000E-13 "%"
Correct digits = 16
h = 1.00E-2 " "
"NO INFO (given) for Equation 1"
Radius of convergence (ratio test) for eq 1 = 190.0045996445492 " "
"Order of pole (ratio test) Not computed"
"NO REAL POLE (three term test) for Equation 1"
"NO COMPLEX POLE (six term test) for Equation 1"
" "
"TOP MAIN SOLVE Loop"
x[1] = -3.0600000000000414 " "
y[1] (analytic) = -13.579823065478982 " "
y[1] (numeric) = -13.579823065478926 " "
absolute error = 5.506706202140776000000000000000E-14 " "
relative error = 4.0550647645323690000000000000E-13 "%"
Correct digits = 16
h = 1.00E-2 " "
"NO INFO (given) for Equation 1"
Radius of convergence (ratio test) for eq 1 = 190.0040526046275 " "
"Order of pole (ratio test) Not computed"
"NO REAL POLE (three term test) for Equation 1"
"NO COMPLEX POLE (six term test) for Equation 1"
" "
"TOP MAIN SOLVE Loop"
x[1] = -3.0500000000000416 " "
y[1] (analytic) = -13.566250030062298 " "
y[1] (numeric) = -13.566250030062243 " "
absolute error = 5.506706202140776000000000000000E-14 " "
relative error = 4.0591218575052970000000000000E-13 "%"
Correct digits = 16
h = 1.00E-2 " "
"NO INFO (given) for Equation 1"
Radius of convergence (ratio test) for eq 1 = 190.0094486882679 " "
"Order of pole (ratio test) Not computed"
Radius of convergence (three term test) for eq 1 = 0.7744311850543609 " "
Order of pole (three term test) = -34.62608797473904 " "
"NO COMPLEX POLE (six term test) for Equation 1"
" "
"TOP MAIN SOLVE Loop"
x[1] = -3.040000000000042 " "
y[1] (analytic) = -13.552690560896774 " "
y[1] (numeric) = -13.55269056089672 " "
absolute error = 5.506706202140776000000000000000E-14 " "
relative error = 4.063183009600420000000000000E-13 "%"
Correct digits = 16
h = 1.00E-2 " "
"NO INFO (given) for Equation 1"
Radius of convergence (ratio test) for eq 1 = 190.00660896099905 " "
"Order of pole (ratio test) Not computed"
Radius of convergence (three term test) for eq 1 = 1.2953636535149107 " "
Order of pole (three term test) = -43.56354627301725 " "
"NO COMPLEX POLE (six term test) for Equation 1"
" "
"TOP MAIN SOLVE Loop"
x[1] = -3.030000000000042 " "
y[1] (analytic) = -13.53914464442294 " "
y[1] (numeric) = -13.539144644422885 " "
absolute error = 5.506706202140776000000000000000E-14 " "
relative error = 4.06724822487889270000000000000E-13 "%"
Correct digits = 16
h = 1.00E-2 " "
"NO INFO (given) for Equation 1"
Radius of convergence (ratio test) for eq 1 = 189.99062064423947 " "
"Order of pole (ratio test) Not computed"
Radius of convergence (three term test) for eq 1 = 3.8581663755623756 " "
Order of pole (three term test) = -11.661253646344425 " "
"NO COMPLEX POLE (six term test) for Equation 1"
" "
"TOP MAIN SOLVE Loop"
x[1] = -3.020000000000042 " "
y[1] (analytic) = -13.52561226709488 " "
y[1] (numeric) = -13.525612267094825 " "
absolute error = 5.506706202140776000000000000000E-14 " "
relative error = 4.07131750740592770000000000000E-13 "%"
Correct digits = 16
h = 1.00E-2 " "
"NO INFO (given) for Equation 1"
Radius of convergence (ratio test) for eq 1 = 189.99577568259983 " "
"Order of pole (ratio test) Not computed"
"NO REAL POLE (three term test) for Equation 1"
Radius of convergence (six term test) for eq 1 = 73.97195020747128 " "
Order of pole (six term test) = -8.135626282526179 " "
" "
"TOP MAIN SOLVE Loop"
x[1] = -3.0100000000000424 " "
y[1] (analytic) = -13.512093415380216 " "
y[1] (numeric) = -13.512093415380159 " "
absolute error = 5.68434188608080100000000000000E-14 " "
relative error = 4.20685508258148040000000000000E-13 "%"
Correct digits = 16
h = 1.00E-2 " "
"NO INFO (given) for Equation 1"
Radius of convergence (ratio test) for eq 1 = 189.997455473306 " "
"Order of pole (ratio test) Not computed"
"NO REAL POLE (three term test) for Equation 1"
"NO COMPLEX POLE (six term test) for Equation 1"
" "
"TOP MAIN SOLVE Loop"
x[1] = -3.0000000000000426 " "
y[1] (analytic) = -13.498588075760088 " "
y[1] (numeric) = -13.498588075760034 " "
absolute error = 5.329070518200751000000000000000E-14 " "
relative error = 3.94787253918086440000000000000E-13 "%"
Correct digits = 16
h = 1.00E-2 " "
"NO INFO (given) for Equation 1"
Radius of convergence (ratio test) for eq 1 = 190.00787372513395 " "
"Order of pole (ratio test) Not computed"
Radius of convergence (three term test) for eq 1 = 0.159477973969133 " "
Order of pole (three term test) = -27.4215195617106 " "
"NO COMPLEX POLE (six term test) for Equation 1"
" "
"TOP MAIN SOLVE Loop"
x[1] = -2.990000000000043 " "
y[1] (analytic) = -13.485096234729166 " "
y[1] (numeric) = -13.48509623472911 " "
absolute error = 5.68434188608080100000000000000E-14 " "
relative error = 4.2152772120687540000000000000E-13 "%"
Correct digits = 16
h = 1.00E-2 " "
"NO INFO (given) for Equation 1"
Radius of convergence (ratio test) for eq 1 = 189.98928991897841 " "
"Order of pole (ratio test) Not computed"
Radius of convergence (three term test) for eq 1 = 4.657369459847582 " "
Order of pole (three term test) = -12.993789397000418 " "
Radius of convergence (six term test) for eq 1 = 9.938737679445245 " "
Order of pole (six term test) = -12.071000798559957 " "
" "
"TOP MAIN SOLVE Loop"
x[1] = -2.980000000000043 " "
y[1] (analytic) = -13.471617878795598 " "
y[1] (numeric) = -13.471617878795543 " "
absolute error = 5.506706202140776000000000000000E-14 " "
relative error = 4.08763539144645900000000000000E-13 "%"
Correct digits = 16
h = 1.00E-2 " "
"NO INFO (given) for Equation 1"
Radius of convergence (ratio test) for eq 1 = 189.9973474668389 " "
"Order of pole (ratio test) Not computed"
"NO REAL POLE (three term test) for Equation 1"
Radius of convergence (six term test) for eq 1 = 165.38221350947165 " "
Order of pole (six term test) = 14.586896675153557 " "
" "
"TOP MAIN SOLVE Loop"
x[1] = -2.9700000000000433 " "
y[1] (analytic) = -13.458152994481035 " "
y[1] (numeric) = -13.458152994480978 " "
absolute error = 5.68434188608080100000000000000E-14 " "
relative error = 4.2237162026704970000000000000E-13 "%"
Correct digits = 16
h = 1.00E-2 " "
"NO INFO (given) for Equation 1"
Radius of convergence (ratio test) for eq 1 = 189.99038754826535 " "
"Order of pole (ratio test) Not computed"
"NO REAL POLE (three term test) for Equation 1"
"NO COMPLEX POLE (six term test) for Equation 1"
" "
"TOP MAIN SOLVE Loop"
x[1] = -2.9600000000000435 " "
y[1] (analytic) = -13.444701568320587 " "
y[1] (numeric) = -13.444701568320529 " "
absolute error = 5.86197757002082700000000000000E-14 " "
relative error = 4.36006521991775300000000000000E-13 "%"
Correct digits = 16
h = 1.00E-2 " "
"NO INFO (given) for Equation 1"
Radius of convergence (ratio test) for eq 1 = 190.0020822040723 " "
"Order of pole (ratio test) Not computed"
"NO REAL POLE (three term test) for Equation 1"
"NO COMPLEX POLE (six term test) for Equation 1"
" "
"TOP MAIN SOLVE Loop"
x[1] = -2.9500000000000437 " "
y[1] (analytic) = -13.431263586862825 " "
y[1] (numeric) = -13.43126358686277 " "
absolute error = 5.506706202140776000000000000000E-14 " "
relative error = 4.09991671038822340000000000000E-13 "%"
Correct digits = 16
h = 1.00E-2 " "
"NO INFO (given) for Equation 1"
Radius of convergence (ratio test) for eq 1 = 189.9994799167011 " "
"Order of pole (ratio test) Not computed"
"NO REAL POLE (three term test) for Equation 1"
"NO COMPLEX POLE (six term test) for Equation 1"
" "
"TOP MAIN SOLVE Loop"
x[1] = -2.940000000000044 " "
y[1] (analytic) = -13.417839036669772 " "
y[1] (numeric) = -13.417839036669715 " "
absolute error = 5.68434188608080100000000000000E-14 " "
relative error = 4.23640637702240750000000000000E-13 "%"
Correct digits = 16
h = 1.00E-2 " "
"NO INFO (given) for Equation 1"
Radius of convergence (ratio test) for eq 1 = 190.00516263807074 " "
"Order of pole (ratio test) Not computed"
"NO REAL POLE (three term test) for Equation 1"
"NO COMPLEX POLE (six term test) for Equation 1"
" "
"TOP MAIN SOLVE Loop"
x[1] = -2.930000000000044 " "
y[1] (analytic) = -13.404427904316874 " "
y[1] (numeric) = -13.404427904316815 " "
absolute error = 5.86197757002082700000000000000E-14 " "
relative error = 4.37316505550601400000000000000E-13 "%"
Correct digits = 16
h = 1.00E-2 " "
"NO INFO (given) for Equation 1"
Radius of convergence (ratio test) for eq 1 = 189.99715649797508 " "
"Order of pole (ratio test) Not computed"
Radius of convergence (three term test) for eq 1 = 0.40891105125956095 " "
Order of pole (three term test) = -31.701576757246375 " "
"NO COMPLEX POLE (six term test) for Equation 1"
" "
"TOP MAIN SOLVE Loop"
x[1] = -2.9200000000000443 " "
y[1] (analytic) = -13.391030176392995 " "
y[1] (numeric) = -13.391030176392938 " "
absolute error = 5.68434188608080100000000000000E-14 " "
relative error = 4.24488766824057340000000000000E-13 "%"
Correct digits = 16
h = 1.00E-2 " "
"NO INFO (given) for Equation 1"
Radius of convergence (ratio test) for eq 1 = 190.01032745318363 " "
"Order of pole (ratio test) Not computed"
"NO REAL POLE (three term test) for Equation 1"
"NO COMPLEX POLE (six term test) for Equation 1"
" "
"TOP MAIN SOLVE Loop"
x[1] = -2.9100000000000446 " "
y[1] (analytic) = -13.377645839500412 " "
y[1] (numeric) = -13.377645839500353 " "
absolute error = 5.86197757002082700000000000000E-14 " "
relative error = 4.38192013778094000000000000000E-13 "%"
Correct digits = 16
h = 1.00E-2 " "
"NO INFO (given) for Equation 1"
Radius of convergence (ratio test) for eq 1 = 189.999484595315 " "
"Order of pole (ratio test) Not computed"
"NO REAL POLE (three term test) for Equation 1"
"NO COMPLEX POLE (six term test) for Equation 1"
" "
"TOP MAIN SOLVE Loop"
x[1] = -2.9000000000000448 " "
y[1] (analytic) = -13.364274880254781 " "
y[1] (numeric) = -13.364274880254722 " "
absolute error = 5.86197757002082700000000000000E-14 " "
relative error = 4.38630424960929240000000000000E-13 "%"
Correct digits = 16
h = 1.00E-2 " "
"NO INFO (given) for Equation 1"
Radius of convergence (ratio test) for eq 1 = 189.98962643498808 " "
"Order of pole (ratio test) Not computed"
"NO REAL POLE (three term test) for Equation 1"
"NO COMPLEX POLE (six term test) for Equation 1"
" "
"TOP MAIN SOLVE Loop"
x[1] = -2.890000000000045 " "
y[1] (analytic) = -13.350917285285144 " "
y[1] (numeric) = -13.350917285285085 " "
absolute error = 5.86197757002082700000000000000E-14 " "
relative error = 4.39069274774226000000000000000E-13 "%"
Correct digits = 16
h = 1.00E-2 " "
"NO INFO (given) for Equation 1"
Radius of convergence (ratio test) for eq 1 = 190.00648307452093 " "
"Order of pole (ratio test) Not computed"
"NO REAL POLE (three term test) for Equation 1"
"NO COMPLEX POLE (six term test) for Equation 1"
" "
"TOP MAIN SOLVE Loop"
x[1] = -2.880000000000045 " "
y[1] (analytic) = -13.337573041233906 " "
y[1] (numeric) = -13.337573041233846 " "
absolute error = 6.03961325396085200000000000000E-14 " "
relative error = 4.5282700497976847000000000000E-13 "%"
Correct digits = 16
h = 1.00E-2 " "
"NO INFO (given) for Equation 1"
Radius of convergence (ratio test) for eq 1 = 189.98846479052636 " "
"Order of pole (ratio test) Not computed"
"NO REAL POLE (three term test) for Equation 1"
"NO COMPLEX POLE (six term test) for Equation 1"
" "
"TOP MAIN SOLVE Loop"
x[1] = -2.8700000000000454 " "
y[1] (analytic) = -13.32424213475682 " "
y[1] (numeric) = -13.324242134756759 " "
absolute error = 6.21724893790087700000000000000E-14 " "
relative error = 4.666118248994390000000000000E-13 "%"
Correct digits = 16
h = 1.00E-2 " "
"NO INFO (given) for Equation 1"
Radius of convergence (ratio test) for eq 1 = 190.01462626713374 " "
"Order of pole (ratio test) Not computed"
Radius of convergence (three term test) for eq 1 = 1.5696594471139738 " "
Order of pole (three term test) = -43.11400412954312 " "
"NO COMPLEX POLE (six term test) for Equation 1"
" "
"TOP MAIN SOLVE Loop"
x[1] = -2.8600000000000456 " "
y[1] (analytic) = -13.310924552522978 " "
y[1] (numeric) = -13.310924552522916 " "
absolute error = 6.21724893790087700000000000000E-14 " "
relative error = 4.670786701080390000000000000E-13 "%"
Correct digits = 16
h = 1.00E-2 " "
"NO INFO (given) for Equation 1"
Radius of convergence (ratio test) for eq 1 = 190.0058345002994 " "
"Order of pole (ratio test) Not computed"
"NO REAL POLE (three term test) for Equation 1"
"NO COMPLEX POLE (six term test) for Equation 1"
" "
"TOP MAIN SOLVE Loop"
x[1] = -2.850000000000046 " "
y[1] (analytic) = -13.2976202812148 " "
y[1] (numeric) = -13.297620281214737 " "
absolute error = 6.21724893790087700000000000000E-14 " "
relative error = 4.6754598239534795000000000000E-13 "%"
Correct digits = 16
h = 1.00E-2 " "
"NO INFO (given) for Equation 1"
Radius of convergence (ratio test) for eq 1 = 189.99887481399503 " "
"Order of pole (ratio test) Not computed"
"NO REAL POLE (three term test) for Equation 1"
"NO COMPLEX POLE (six term test) for Equation 1"
" "
"TOP MAIN SOLVE Loop"
x[1] = -2.840000000000046 " "
y[1] (analytic) = -13.28432930752801 " "
y[1] (numeric) = -13.284329307527948 " "
absolute error = 6.21724893790087700000000000000E-14 " "
relative error = 4.6801376222867830000000000000E-13 "%"
Correct digits = 16
h = 1.00E-2 " "
"NO INFO (given) for Equation 1"
Radius of convergence (ratio test) for eq 1 = 190.0013727571938 " "
"Order of pole (ratio test) Not computed"
"NO REAL POLE (three term test) for Equation 1"
"NO COMPLEX POLE (six term test) for Equation 1"
" "
"TOP MAIN SOLVE Loop"
x[1] = -2.8300000000000463 " "
y[1] (analytic) = -13.271051618171635 " "
y[1] (numeric) = -13.271051618171573 " "
absolute error = 6.21724893790087700000000000000E-14 " "
relative error = 4.6848201007580986000000000000E-13 "%"
Correct digits = 16
h = 1.00E-2 " "
"NO INFO (given) for Equation 1"
Radius of convergence (ratio test) for eq 1 = 190.01176000891624 " "
"Order of pole (ratio test) Not computed"
Radius of convergence (three term test) for eq 1 = 0.875980976895929 " "
Order of pole (three term test) = -36.03410969159899 " "
"NO COMPLEX POLE (six term test) for Equation 1"
" "
"TOP MAIN SOLVE Loop"
x[1] = -2.8200000000000465 " "
y[1] (analytic) = -13.257787199867984 " "
y[1] (numeric) = -13.257787199867922 " "
absolute error = 6.21724893790087700000000000000E-14 " "
relative error = 4.6895072640499060000000000000E-13 "%"
Correct digits = 16
h = 1.00E-2 " "
"NO INFO (given) for Equation 1"
Radius of convergence (ratio test) for eq 1 = 189.99794274512658 " "
"Order of pole (ratio test) Not computed"
"NO REAL POLE (three term test) for Equation 1"
"NO COMPLEX POLE (six term test) for Equation 1"
" "
"TOP MAIN SOLVE Loop"
x[1] = -2.8100000000000467 " "
y[1] (analytic) = -13.244536039352633 " "
y[1] (numeric) = -13.244536039352575 " "
absolute error = 5.86197757002082700000000000000E-14 " "
relative error = 4.4259591673151190000000000000E-13 "%"
Correct digits = 16
h = 1.00E-2 " "
"NO INFO (given) for Equation 1"
Radius of convergence (ratio test) for eq 1 = 190.01561009859148 " "
"Order of pole (ratio test) Not computed"
Radius of convergence (three term test) for eq 1 = 1.0886393513344002 " "
Order of pole (three term test) = -37.878114733321766 " "
"NO COMPLEX POLE (six term test) for Equation 1"
" "
"TOP MAIN SOLVE Loop"
x[1] = -2.800000000000047 " "
y[1] (analytic) = -13.231298123374431 " "
y[1] (numeric) = -13.231298123374371 " "
absolute error = 6.03961325396085200000000000000E-14 " "
relative error = 4.56464150202410000000000000E-13 "%"
Correct digits = 16
h = 1.00E-2 " "
"NO INFO (given) for Equation 1"
Radius of convergence (ratio test) for eq 1 = 190.01079518344298 " "
"Order of pole (ratio test) Not computed"
Radius of convergence (three term test) for eq 1 = 1.950074217444168 " "
Order of pole (three term test) = -49.91398078630535 " "
"NO COMPLEX POLE (six term test) for Equation 1"
" "
"TOP MAIN SOLVE Loop"
x[1] = -2.790000000000047 " "
y[1] (analytic) = -13.218073438695455 " "
y[1] (numeric) = -13.218073438695393 " "
absolute error = 6.21724893790087700000000000000E-14 " "
relative error = 4.7035969097433620000000000000E-13 "%"
Correct digits = 16
h = 1.00E-2 " "
"NO INFO (given) for Equation 1"
Radius of convergence (ratio test) for eq 1 = 189.98555747061857 " "
"Order of pole (ratio test) Not computed"
"NO REAL POLE (three term test) for Equation 1"
"NO COMPLEX POLE (six term test) for Equation 1"
" "
"TOP MAIN SOLVE Loop"
x[1] = -2.7800000000000473 " "
y[1] (analytic) = -13.204861972091019 " "
y[1] (numeric) = -13.204861972090956 " "
absolute error = 6.21724893790087700000000000000E-14 " "
relative error = 4.7083028592356896000000000000E-13 "%"
Correct digits = 16
h = 1.00E-2 " "
"NO INFO (given) for Equation 1"
Radius of convergence (ratio test) for eq 1 = 190.0001966419054 " "
"Order of pole (ratio test) Not computed"
"NO REAL POLE (three term test) for Equation 1"
"NO COMPLEX POLE (six term test) for Equation 1"
" "
"TOP MAIN SOLVE Loop"
x[1] = -2.7700000000000475 " "
y[1] (analytic) = -13.191663710349651 " "
y[1] (numeric) = -13.19166371034959 " "
absolute error = 6.03961325396085200000000000000E-14 " "
relative error = 4.5783559879732330000000000000E-13 "%"
Correct digits = 16
h = 1.00E-2 " "
"NO INFO (given) for Equation 1"
Radius of convergence (ratio test) for eq 1 = 190.0033104996746 " "
"Order of pole (ratio test) Not computed"
"NO REAL POLE (three term test) for Equation 1"
"NO COMPLEX POLE (six term test) for Equation 1"
" "
"TOP MAIN SOLVE Loop"
x[1] = -2.7600000000000477 " "
y[1] (analytic) = -13.178478640273097 " "
y[1] (numeric) = -13.178478640273035 " "
absolute error = 6.21724893790087700000000000000E-14 " "
relative error = 4.7177288878407570000000000000E-13 "%"
Correct digits = 16
h = 1.00E-2 " "
"NO INFO (given) for Equation 1"
Radius of convergence (ratio test) for eq 1 = 190.01161334438214 " "
"Order of pole (ratio test) Not computed"
Radius of convergence (three term test) for eq 1 = 1.5480555684772452 " "
Order of pole (three term test) = -45.092276295448336 " "
"NO COMPLEX POLE (six term test) for Equation 1"
" "
"TOP MAIN SOLVE Loop"
x[1] = -2.750000000000048 " "
y[1] (analytic) = -13.165306748676278 " "
y[1] (numeric) = -13.165306748676217 " "
absolute error = 6.03961325396085200000000000000E-14 " "
relative error = 4.5875218627686837000000000000E-13 "%"
Correct digits = 16
h = 1.00E-2 " "
"NO INFO (given) for Equation 1"
Radius of convergence (ratio test) for eq 1 = 189.99045687752775 " "
"Order of pole (ratio test) Not computed"
"NO REAL POLE (three term test) for Equation 1"
"NO COMPLEX POLE (six term test) for Equation 1"
" "
"TOP MAIN SOLVE Loop"
x[1] = -2.740000000000048 " "
y[1] (analytic) = -13.152148022387308 " "
y[1] (numeric) = -13.152148022387246 " "
absolute error = 6.21724893790087700000000000000E-14 " "
relative error = 4.7271737873676656000000000000E-13 "%"
Correct digits = 16
h = 1.00E-2 " "
"NO INFO (given) for Equation 1"
Radius of convergence (ratio test) for eq 1 = 189.99804043509795 " "
"Order of pole (ratio test) Not computed"
Radius of convergence (three term test) for eq 1 = 2.5581429720564177 " "
Order of pole (three term test) = -6.500191784600592 " "
Radius of convergence (six term test) for eq 1 = 15.315573360264041 " "
Order of pole (six term test) = -11.873089189577595 " "
" "
"TOP MAIN SOLVE Loop"
x[1] = -2.7300000000000484 " "
y[1] (analytic) = -13.139002448247457 " "
y[1] (numeric) = -13.139002448247393 " "
absolute error = 6.39488462184090200000000000000E-14 " "
relative error = 4.8671005634022707000000000000E-13 "%"
Correct digits = 16
h = 1.00E-2 " "
"NO INFO (given) for Equation 1"
Radius of convergence (ratio test) for eq 1 = 190.00169965041883 " "
"Order of pole (ratio test) Not computed"
"NO REAL POLE (three term test) for Equation 1"
"NO COMPLEX POLE (six term test) for Equation 1"
" "
"TOP MAIN SOLVE Loop"
x[1] = -2.7200000000000486 " "
y[1] (analytic) = -13.125870013111147 " "
y[1] (numeric) = -13.125870013111083 " "
absolute error = 6.39488462184090200000000000000E-14 " "
relative error = 4.8719700983273420000000000000E-13 "%"
Correct digits = 16
h = 1.00E-2 " "
"NO INFO (given) for Equation 1"
Radius of convergence (ratio test) for eq 1 = 190.00113410753067 " "
"Order of pole (ratio test) Not computed"
"NO REAL POLE (three term test) for Equation 1"
"NO COMPLEX POLE (six term test) for Equation 1"
" "
"TOP MAIN SOLVE Loop"
x[1] = -2.710000000000049 " "
y[1] (analytic) = -13.112750703845943 " "
y[1] (numeric) = -13.11275070384588 " "
absolute error = 6.39488462184090200000000000000E-14 " "
relative error = 4.8768445052229160000000000000E-13 "%"
Correct digits = 16
h = 1.00E-2 " "
"NO INFO (given) for Equation 1"
Radius of convergence (ratio test) for eq 1 = 190.00235705801978 " "
"Order of pole (ratio test) Not computed"
"NO REAL POLE (three term test) for Equation 1"
"NO COMPLEX POLE (six term test) for Equation 1"
" "
"TOP MAIN SOLVE Loop"
x[1] = -2.700000000000049 " "
y[1] (analytic) = -13.099644507332538 " "
y[1] (numeric) = -13.099644507332473 " "
absolute error = 6.57252030578092700000000000000E-14 " "
relative error = 5.0173272275457180000000000000E-13 "%"
Correct digits = 16
h = 1.00E-2 " "
"NO INFO (given) for Equation 1"
Radius of convergence (ratio test) for eq 1 = 190.00415849577539 " "
"Order of pole (ratio test) Not computed"
"NO REAL POLE (three term test) for Equation 1"
"NO COMPLEX POLE (six term test) for Equation 1"
" "
"TOP MAIN SOLVE Loop"
x[1] = -2.6900000000000492 " "
y[1] (analytic) = -13.08655141046473 " "
y[1] (numeric) = -13.086551410464665 " "
absolute error = 6.57252030578092700000000000000E-14 " "
relative error = 5.0223470642733080000000000000E-13 "%"
Correct digits = 16
h = 1.00E-2 " "
"NO INFO (given) for Equation 1"
Radius of convergence (ratio test) for eq 1 = 189.99106331338587 " "
"Order of pole (ratio test) Not computed"
"NO REAL POLE (three term test) for Equation 1"
"NO COMPLEX POLE (six term test) for Equation 1"
" "
"TOP MAIN SOLVE Loop"
x[1] = -2.6800000000000495 " "
y[1] (analytic) = -13.073471400149426 " "
y[1] (numeric) = -13.073471400149359 " "
absolute error = 6.75015598972095200000000000000E-14 " "
relative error = 5.1632468401956340000000000000E-13 "%"
Correct digits = 16
h = 1.00E-2 " "
"NO INFO (given) for Equation 1"
Radius of convergence (ratio test) for eq 1 = 190.00323144638693 " "
"Order of pole (ratio test) Not computed"
"NO REAL POLE (three term test) for Equation 1"
"NO COMPLEX POLE (six term test) for Equation 1"
" "
"TOP MAIN SOLVE Loop"
x[1] = -2.6700000000000497 " "
y[1] (analytic) = -13.06040446330661 " "
y[1] (numeric) = -13.060404463306542 " "
absolute error = 6.75015598972095200000000000000E-14 " "
relative error = 5.1684126695200060000000000000E-13 "%"
Correct digits = 16
h = 1.00E-2 " "
"NO INFO (given) for Equation 1"
Radius of convergence (ratio test) for eq 1 = 190.00367421190492 " "
"Order of pole (ratio test) Not computed"
"NO REAL POLE (three term test) for Equation 1"
"NO COMPLEX POLE (six term test) for Equation 1"
" "
"TOP MAIN SOLVE Loop"
x[1] = -2.66000000000005 " "
y[1] (analytic) = -13.047350586869346 " "
y[1] (numeric) = -13.047350586869277 " "
absolute error = 6.92779167366097700000000000000E-14 " "
relative error = 5.3097306058695170000000000000E-13 "%"
Correct digits = 16
h = 1.00E-2 " "
"NO INFO (given) for Equation 1"
Radius of convergence (ratio test) for eq 1 = 189.98968299382963 " "
"Order of pole (ratio test) Not computed"
"NO REAL POLE (three term test) for Equation 1"
"NO COMPLEX POLE (six term test) for Equation 1"
" "
"TOP MAIN SOLVE Loop"
x[1] = -2.65000000000005 " "
y[1] (analytic) = -13.034309757783753 " "
y[1] (numeric) = -13.034309757783685 " "
absolute error = 6.75015598972095200000000000000E-14 " "
relative error = 5.178759838579050000000000000E-13 "%"
Correct digits = 16
h = 1.00E-2 " "
"NO INFO (given) for Equation 1"
Radius of convergence (ratio test) for eq 1 = 189.9889216634153 " "
"Order of pole (ratio test) Not computed"
"NO REAL POLE (three term test) for Equation 1"
"NO COMPLEX POLE (six term test) for Equation 1"
" "
"TOP MAIN SOLVE Loop"
x[1] = -2.6400000000000503 " "
y[1] (analytic) = -13.021281963009006 " "
y[1] (numeric) = -13.021281963008938 " "
absolute error = 6.75015598972095200000000000000E-14 " "
relative error = 5.1839411886608910000000000000E-13 "%"
Correct digits = 16
h = 1.00E-2 " "
"NO INFO (given) for Equation 1"
Radius of convergence (ratio test) for eq 1 = 190.01315096882462 " "
"Order of pole (ratio test) Not computed"
Radius of convergence (three term test) for eq 1 = 1.6202502357769617 " "
Order of pole (three term test) = -46.695762351361 " "
"NO COMPLEX POLE (six term test) for Equation 1"
" "
"TOP MAIN SOLVE Loop"
x[1] = -2.6300000000000505 " "
y[1] (analytic) = -13.008267189517307 " "
y[1] (numeric) = -13.00826718951724 " "
absolute error = 6.75015598972095200000000000000E-14 " "
relative error = 5.1891277226843520000000000000E-13 "%"
Correct digits = 16
h = 1.00E-2 " "
"NO INFO (given) for Equation 1"
Radius of convergence (ratio test) for eq 1 = 189.99879193360775 " "
"Order of pole (ratio test) Not computed"
"NO REAL POLE (three term test) for Equation 1"
"NO COMPLEX POLE (six term test) for Equation 1"
" "
"TOP MAIN SOLVE Loop"
x[1] = -2.6200000000000507 " "
y[1] (analytic) = -12.995265424293885 " "
y[1] (numeric) = -12.995265424293814 " "
absolute error = 7.10542735760100200000000000000E-14 " "
relative error = 5.4677046798273340000000000000E-13 "%"
Correct digits = 16
h = 1.00E-2 " "
"NO INFO (given) for Equation 1"
Radius of convergence (ratio test) for eq 1 = 189.99843164349826 " "
"Order of pole (ratio test) Not computed"
"NO REAL POLE (three term test) for Equation 1"
"NO COMPLEX POLE (six term test) for Equation 1"
" "
"TOP MAIN SOLVE Loop"
x[1] = -2.610000000000051 " "
y[1] (analytic) = -12.982276654336964 " "
y[1] (numeric) = -12.982276654336896 " "
absolute error = 6.75015598972095200000000000000E-14 " "
relative error = 5.1995163633074640000000000000E-13 "%"
Correct digits = 16
h = 1.00E-2 " "
"NO INFO (given) for Equation 1"
Radius of convergence (ratio test) for eq 1 = 189.98465560756745 " "
"Order of pole (ratio test) Not computed"
"NO REAL POLE (three term test) for Equation 1"
"NO COMPLEX POLE (six term test) for Equation 1"
" "
"TOP MAIN SOLVE Loop"
x[1] = -2.600000000000051 " "
y[1] (analytic) = -12.969300866657784 " "
y[1] (numeric) = -12.969300866657715 " "
absolute error = 6.92779167366097700000000000000E-14 " "
relative error = 5.3416847560930110000000000000E-13 "%"
Correct digits = 16
h = 1.00E-2 " "
"NO INFO (given) for Equation 1"
Radius of convergence (ratio test) for eq 1 = 190.01051847060336 " "
"Order of pole (ratio test) Not computed"
"NO REAL POLE (three term test) for Equation 1"
"NO COMPLEX POLE (six term test) for Equation 1"
" "
"TOP MAIN SOLVE Loop"
x[1] = -2.5900000000000514 " "
y[1] (analytic) = -12.956338048280552 " "
y[1] (numeric) = -12.95633804828048 " "
absolute error = 7.10542735760100200000000000000E-14 " "
relative error = 5.484132423161010000000000000E-13 "%"
Correct digits = 16
h = 1.00E-2 " "
"NO INFO (given) for Equation 1"
Radius of convergence (ratio test) for eq 1 = 190.00354825415852 " "
"Order of pole (ratio test) Not computed"
"NO REAL POLE (three term test) for Equation 1"
"NO COMPLEX POLE (six term test) for Equation 1"
" "
"TOP MAIN SOLVE Loop"
x[1] = -2.5800000000000516 " "
y[1] (analytic) = -12.943388186242444 " "
y[1] (numeric) = -12.943388186242375 " "
absolute error = 6.92779167366097700000000000000E-14 " "
relative error = 5.3523788161005180000000000000E-13 "%"
Correct digits = 16
h = 1.00E-2 " "
"NO INFO (given) for Equation 1"
Radius of convergence (ratio test) for eq 1 = 190.0016430164569 " "
"Order of pole (ratio test) Not computed"
"NO REAL POLE (three term test) for Equation 1"
"NO COMPLEX POLE (six term test) for Equation 1"
" "
"TOP MAIN SOLVE Loop"
x[1] = -2.570000000000052 " "
y[1] (analytic) = -12.930451267593602 " "
y[1] (numeric) = -12.930451267593533 " "
absolute error = 6.92779167366097700000000000000E-14 " "
relative error = 5.3577338719983140000000000000E-13 "%"
Correct digits = 16
h = 1.00E-2 " "
"NO INFO (given) for Equation 1"
Radius of convergence (ratio test) for eq 1 = 190.00177744404138 " "
"Order of pole (ratio test) Not computed"
"NO REAL POLE (three term test) for Equation 1"
Radius of convergence (six term test) for eq 1 = 103.43568292386458 " "
Order of pole (six term test) = -1.9370379109698135 " "
" "
"TOP MAIN SOLVE Loop"
x[1] = -2.560000000000052 " "
y[1] (analytic) = -12.917527279397108 " "
y[1] (numeric) = -12.917527279397037 " "
absolute error = 7.10542735760100200000000000000E-14 " "
relative error = 5.5006095237235140000000000000E-13 "%"
Correct digits = 16
h = 1.00E-2 " "
"NO INFO (given) for Equation 1"
Radius of convergence (ratio test) for eq 1 = 189.98621355667865 " "
"Order of pole (ratio test) Not computed"
"NO REAL POLE (three term test) for Equation 1"
"NO COMPLEX POLE (six term test) for Equation 1"
" "
"TOP MAIN SOLVE Loop"
x[1] = -2.5500000000000522 " "
y[1] (analytic) = -12.904616208728967 " "
y[1] (numeric) = -12.904616208728896 " "
absolute error = 7.10542735760100200000000000000E-14 " "
relative error = 5.5061128844689970000000000000E-13 "%"
Correct digits = 16
h = 1.00E-2 " "
"NO INFO (given) for Equation 1"
Radius of convergence (ratio test) for eq 1 = 190.0015248604184 " "
"Order of pole (ratio test) Not computed"
Radius of convergence (three term test) for eq 1 = 17.06992372310926 " "
Order of pole (three term test) = -44.10589513232628 " "
Radius of convergence (six term test) for eq 1 = 33.17772305747748 " "
Order of pole (six term test) = -9.930483913197008 " "
" "
"TOP MAIN SOLVE Loop"
x[1] = -2.5400000000000524 " "
y[1] (analytic) = -12.89171804267811 " "
y[1] (numeric) = -12.89171804267804 " "
absolute error = 7.10542735760100200000000000000E-14 " "
relative error = 5.5116217513278230000000000000E-13 "%"
Correct digits = 16
h = 1.00E-2 " "
"NO INFO (given) for Equation 1"
Radius of convergence (ratio test) for eq 1 = 190.00314141283897 " "
"Order of pole (ratio test) Not computed"
"NO REAL POLE (three term test) for Equation 1"
"NO COMPLEX POLE (six term test) for Equation 1"
" "
"TOP MAIN SOLVE Loop"
x[1] = -2.5300000000000527 " "
y[1] (analytic) = -12.87883276834637 " "
y[1] (numeric) = -12.8788327683463 " "
absolute error = 7.10542735760100200000000000000E-14 " "
relative error = 5.517136129808861000000000000E-13 "%"
Correct digits = 16
h = 1.00E-2 " "
"NO INFO (given) for Equation 1"
Radius of convergence (ratio test) for eq 1 = 189.99571340337715 " "
"Order of pole (ratio test) Not computed"
"NO REAL POLE (three term test) for Equation 1"
"NO COMPLEX POLE (six term test) for Equation 1"
" "
"TOP MAIN SOLVE Loop"
x[1] = -2.520000000000053 " "
y[1] (analytic) = -12.865960372848473 " "
y[1] (numeric) = -12.865960372848402 " "
absolute error = 7.10542735760100200000000000000E-14 " "
relative error = 5.5226560254264860000000000000E-13 "%"
Correct digits = 16
h = 1.00E-2 " "
"NO INFO (given) for Equation 1"
Radius of convergence (ratio test) for eq 1 = 189.9960429913576 " "
"Order of pole (ratio test) Not computed"
"NO REAL POLE (three term test) for Equation 1"
"NO COMPLEX POLE (six term test) for Equation 1"
" "
"TOP MAIN SOLVE Loop"
x[1] = -2.510000000000053 " "
y[1] (analytic) = -12.853100843312022 " "
y[1] (numeric) = -12.85310084331195 " "
absolute error = 7.28306304154102700000000000000E-14 " "
relative error = 5.6663859797931130000000000000E-13 "%"
Correct digits = 16
h = 1.00E-2 " "
"NO INFO (given) for Equation 1"
Radius of convergence (ratio test) for eq 1 = 190.0032096842067 " "
"Order of pole (ratio test) Not computed"
"NO REAL POLE (three term test) for Equation 1"
"NO COMPLEX POLE (six term test) for Equation 1"
" "
"TOP MAIN SOLVE Loop"
x[1] = -2.5000000000000533 " "
y[1] (analytic) = -12.840254166877482 " "
y[1] (numeric) = -12.840254166877411 " "
absolute error = 7.10542735760100200000000000000E-14 " "
relative error = 5.5337123901566140000000000000E-13 "%"
Correct digits = 16
h = 1.00E-2 " "
"NO INFO (given) for Equation 1"
Radius of convergence (ratio test) for eq 1 = 189.99764366712768 " "
"Order of pole (ratio test) Not computed"
"NO REAL POLE (three term test) for Equation 1"
"NO COMPLEX POLE (six term test) for Equation 1"
" "
"TOP MAIN SOLVE Loop"
x[1] = -2.4900000000000535 " "
y[1] (analytic) = -12.82742033069818 " "
y[1] (numeric) = -12.827420330698109 " "
absolute error = 7.10542735760100200000000000000E-14 " "
relative error = 5.5392488703254830000000000000E-13 "%"
Correct digits = 16
h = 1.00E-2 " "
"NO INFO (given) for Equation 1"
Radius of convergence (ratio test) for eq 1 = 189.99621111570482 " "
"Order of pole (ratio test) Not computed"
"NO REAL POLE (three term test) for Equation 1"
"NO COMPLEX POLE (six term test) for Equation 1"
" "
"TOP MAIN SOLVE Loop"
x[1] = -2.4800000000000537 " "
y[1] (analytic) = -12.814599321940282 " "
y[1] (numeric) = -12.814599321940207 " "
absolute error = 7.46069872548105200000000000000E-14 " "
relative error = 5.8220304342308650000000000000E-13 "%"
Correct digits = 16
h = 1.00E-2 " "
"NO INFO (given) for Equation 1"
Radius of convergence (ratio test) for eq 1 = 189.9890379503565 " "
"Order of pole (ratio test) Not computed"
"NO REAL POLE (three term test) for Equation 1"
Radius of convergence (six term test) for eq 1 = 72.61079715006554 " "
Order of pole (six term test) = -7.800780758173732 " "
" "
"TOP MAIN SOLVE Loop"
x[1] = -2.470000000000054 " "
y[1] (analytic) = -12.801791127782769 " "
y[1] (numeric) = -12.801791127782694 " "
absolute error = 7.46069872548105200000000000000E-14 " "
relative error = 5.8278553766508940000000000000E-13 "%"
Correct digits = 16
h = 1.00E-2 " "
"NO INFO (given) for Equation 1"
Radius of convergence (ratio test) for eq 1 = 189.99110584314272 " "
"Order of pole (ratio test) Not computed"
"NO REAL POLE (three term test) for Equation 1"
"NO COMPLEX POLE (six term test) for Equation 1"
" "
"TOP MAIN SOLVE Loop"
x[1] = -2.460000000000054 " "
y[1] (analytic) = -12.788995735417453 " "
y[1] (numeric) = -12.788995735417377 " "
absolute error = 7.63833440942107700000000000000E-14 " "
relative error = 5.9725834361393270000000000000E-13 "%"
Correct digits = 16
h = 1.00E-2 " "
"NO INFO (given) for Equation 1"
Radius of convergence (ratio test) for eq 1 = 189.99223798108352 " "
"Order of pole (ratio test) Not computed"
Radius of convergence (three term test) for eq 1 = 1.6578946632782243 " "
Order of pole (three term test) = -3.3020796950974147 " "
Radius of convergence (six term test) for eq 1 = 20.18544920452433 " "
Order of pole (six term test) = -11.979051721961083 " "
" "
"TOP MAIN SOLVE Loop"
x[1] = -2.4500000000000544 " "
y[1] (analytic) = -12.776213132048936 " "
y[1] (numeric) = -12.776213132048861 " "
absolute error = 7.46069872548105200000000000000E-14 " "
relative error = 5.839522750889310000000000000E-13 "%"
Correct digits = 16
h = 1.00E-2 " "
"NO INFO (given) for Equation 1"
Radius of convergence (ratio test) for eq 1 = 190.00103925044135 " "
"Order of pole (ratio test) Not computed"
"NO REAL POLE (three term test) for Equation 1"
"NO COMPLEX POLE (six term test) for Equation 1"
" "
"TOP MAIN SOLVE Loop"
x[1] = -2.4400000000000546 " "
y[1] (analytic) = -12.763443304894617 " "
y[1] (numeric) = -12.763443304894542 " "
absolute error = 7.46069872548105200000000000000E-14 " "
relative error = 5.8453651943750710000000000000E-13 "%"
Correct digits = 16
h = 1.00E-2 " "
"NO INFO (given) for Equation 1"
Radius of convergence (ratio test) for eq 1 = 189.99541894375184 " "
"Order of pole (ratio test) Not computed"
"NO REAL POLE (three term test) for Equation 1"
"NO COMPLEX POLE (six term test) for Equation 1"
" "
"TOP MAIN SOLVE Loop"
x[1] = -2.430000000000055 " "
y[1] (analytic) = -12.750686241184665 " "
y[1] (numeric) = -12.75068624118459 " "
absolute error = 7.46069872548105200000000000000E-14 " "
relative error = 5.8512134832265150000000000000E-13 "%"
Correct digits = 16
h = 1.00E-2 " "
"NO INFO (given) for Equation 1"
Radius of convergence (ratio test) for eq 1 = 189.997384427511 " "
"Order of pole (ratio test) Not computed"
"NO REAL POLE (three term test) for Equation 1"
"NO COMPLEX POLE (six term test) for Equation 1"
" "
"TOP MAIN SOLVE Loop"
x[1] = -2.420000000000055 " "
y[1] (analytic) = -12.737941928162018 " "
y[1] (numeric) = -12.737941928161943 " "
absolute error = 7.46069872548105200000000000000E-14 " "
relative error = 5.8570676232919290000000000000E-13 "%"
Correct digits = 16
h = 1.00E-2 " "
"NO INFO (given) for Equation 1"
Radius of convergence (ratio test) for eq 1 = 189.99898713568476 " "
"Order of pole (ratio test) Not computed"
"NO REAL POLE (three term test) for Equation 1"
"NO COMPLEX POLE (six term test) for Equation 1"
" "
"TOP MAIN SOLVE Loop"
x[1] = -2.410000000000055 " "
y[1] (analytic) = -12.725210353082362 " "
y[1] (numeric) = -12.725210353082286 " "
absolute error = 7.63833440942107700000000000000E-14 " "
relative error = 6.0025211351974880000000000000E-13 "%"
Correct digits = 16
h = 1.00E-2 " "
"NO INFO (given) for Equation 1"
Radius of convergence (ratio test) for eq 1 = 189.99866407996814 " "
"Order of pole (ratio test) Not computed"
"NO REAL POLE (three term test) for Equation 1"
"NO COMPLEX POLE (six term test) for Equation 1"
" "
"TOP MAIN SOLVE Loop"
x[1] = -2.4000000000000554 " "
y[1] (analytic) = -12.71249150321412 " "
y[1] (numeric) = -12.712491503214041 " "
absolute error = 7.81597009336110200000000000000E-14 " "
relative error = 6.1482598367007580000000000000E-13 "%"
Correct digits = 16
h = 1.00E-2 " "
"NO INFO (given) for Equation 1"
Radius of convergence (ratio test) for eq 1 = 189.98063442164516 " "
"Order of pole (ratio test) Not computed"
"NO REAL POLE (three term test) for Equation 1"
"NO COMPLEX POLE (six term test) for Equation 1"
" "
"TOP MAIN SOLVE Loop"
x[1] = -2.3900000000000556 " "
y[1] (analytic) = -12.699785365838437 " "
y[1] (numeric) = -12.699785365838359 " "
absolute error = 7.81597009336110200000000000000E-14 " "
relative error = 6.1544111716923440000000000000E-13 "%"
Correct digits = 16
h = 1.00E-2 " "
"NO INFO (given) for Equation 1"
Radius of convergence (ratio test) for eq 1 = 190.00817320960272 " "
"Order of pole (ratio test) Not computed"
"NO REAL POLE (three term test) for Equation 1"
Radius of convergence (six term test) for eq 1 = 137.89780548512778 " "
Order of pole (six term test) = 3.374651075654338 " "
" "
"TOP MAIN SOLVE Loop"
x[1] = -2.380000000000056 " "
y[1] (analytic) = -12.68709192824918 " "
y[1] (numeric) = -12.687091928249101 " "
absolute error = 7.81597009336110200000000000000E-14 " "
relative error = 6.1605686610956150000000000000E-13 "%"
Correct digits = 16
h = 1.00E-2 " "
"NO INFO (given) for Equation 1"
Radius of convergence (ratio test) for eq 1 = 190.0070845606331 " "
"Order of pole (ratio test) Not computed"
"NO REAL POLE (three term test) for Equation 1"
"NO COMPLEX POLE (six term test) for Equation 1"
" "
"TOP MAIN SOLVE Loop"
x[1] = -2.370000000000056 " "
y[1] (analytic) = -12.674411177752907 " "
y[1] (numeric) = -12.674411177752829 " "
absolute error = 7.81597009336110200000000000000E-14 " "
relative error = 6.1667323110680580000000000000E-13 "%"
Correct digits = 16
h = 1.00E-2 " "
"NO INFO (given) for Equation 1"
Radius of convergence (ratio test) for eq 1 = 189.9940322183135 " "
"Order of pole (ratio test) Not computed"
"NO REAL POLE (three term test) for Equation 1"
"NO COMPLEX POLE (six term test) for Equation 1"
" "
"TOP MAIN SOLVE Loop"
x[1] = -2.3600000000000563 " "
y[1] (analytic) = -12.66174310166887 " "
y[1] (numeric) = -12.66174310166879 " "
absolute error = 7.99360577730112700000000000000E-14 " "
relative error = 6.3131953579499940000000000000E-13 "%"
Correct digits = 16
h = 1.00E-2 " "
"NO INFO (given) for Equation 1"
Radius of convergence (ratio test) for eq 1 = 190.00427852584323 " "
"Order of pole (ratio test) Not computed"
Radius of convergence (three term test) for eq 1 = 0.5925429073758212 " "
Order of pole (three term test) = -33.54214513452929 " "
"NO COMPLEX POLE (six term test) for Equation 1"
" "
"TOP MAIN SOLVE Loop"
x[1] = -2.3500000000000565 " "
y[1] (analytic) = -12.649087687328988 " "
y[1] (numeric) = -12.64908768732891 " "
absolute error = 7.81597009336110200000000000000E-14 " "
relative error = 6.1790781173812390000000000000E-13 "%"
Correct digits = 16
h = 1.00E-2 " "
"NO INFO (given) for Equation 1"
Radius of convergence (ratio test) for eq 1 = 189.99788431704354 " "
"Order of pole (ratio test) Not computed"
"NO REAL POLE (three term test) for Equation 1"
"NO COMPLEX POLE (six term test) for Equation 1"
" "
"TOP MAIN SOLVE Loop"
x[1] = -2.3400000000000567 " "
y[1] (analytic) = -12.636444922077851 " "
y[1] (numeric) = -12.63644492207777 " "
absolute error = 8.17124146124115200000000000000E-14 " "
relative error = 6.4664084808890440000000000000E-13 "%"
Correct digits = 16
h = 1.00E-2 " "
"NO INFO (given) for Equation 1"
Radius of convergence (ratio test) for eq 1 = 190.01820100991088 " "
"Order of pole (ratio test) Not computed"
Radius of convergence (three term test) for eq 1 = 0.2719677382514869 " "
Order of pole (three term test) = -28.46461347031052 " "
"NO COMPLEX POLE (six term test) for Equation 1"
" "
"TOP MAIN SOLVE Loop"
x[1] = -2.330000000000057 " "
y[1] (analytic) = -12.623814793272686 " "
y[1] (numeric) = -12.623814793272604 " "
absolute error = 8.17124146124115200000000000000E-14 " "
relative error = 6.4728781236521780000000000000E-13 "%"
Correct digits = 16
h = 1.00E-2 " "
"NO INFO (given) for Equation 1"
Radius of convergence (ratio test) for eq 1 = 190.00383123452158 " "
"Order of pole (ratio test) Not computed"
Radius of convergence (three term test) for eq 1 = 0.8713939479981316 " "
Order of pole (three term test) = -37.43338953629183 " "
"NO COMPLEX POLE (six term test) for Equation 1"
" "
"TOP MAIN SOLVE Loop"
x[1] = -2.320000000000057 " "
y[1] (analytic) = -12.611197288283368 " "
y[1] (numeric) = -12.611197288283286 " "
absolute error = 8.17124146124115200000000000000E-14 " "
relative error = 6.4793542392939750000000000000E-13 "%"
Correct digits = 16
h = 1.00E-2 " "
"NO INFO (given) for Equation 1"
Radius of convergence (ratio test) for eq 1 = 190.0105739557721 " "
"Order of pole (ratio test) Not computed"
Radius of convergence (three term test) for eq 1 = 182.35568163640377 " "
Order of pole (three term test) = -510.8757965575954 " "
"NO COMPLEX POLE (six term test) for Equation 1"
" "
"TOP MAIN SOLVE Loop"
x[1] = -2.3100000000000573 " "
y[1] (analytic) = -12.598592394492387 " "
y[1] (numeric) = -12.598592394492306 " "
absolute error = 8.17124146124115200000000000000E-14 " "
relative error = 6.4858368342905510000000000000E-13 "%"
Correct digits = 16
h = 1.00E-2 " "
"NO INFO (given) for Equation 1"
Radius of convergence (ratio test) for eq 1 = 190.00885706946187 " "
"Order of pole (ratio test) Not computed"
"NO REAL POLE (three term test) for Equation 1"
"NO COMPLEX POLE (six term test) for Equation 1"
" "
"TOP MAIN SOLVE Loop"
x[1] = -2.3000000000000576 " "
y[1] (analytic) = -12.58600009929485 " "
y[1] (numeric) = -12.58600009929477 " "
absolute error = 7.99360577730112700000000000000E-14 " "
relative error = 6.3511883952304920000000000000E-13 "%"
Correct digits = 16
h = 1.00E-2 " "
"NO INFO (given) for Equation 1"
Radius of convergence (ratio test) for eq 1 = 190.0219874348039 " "
"Order of pole (ratio test) Not computed"
Radius of convergence (three term test) for eq 1 = 0.20762632997099484 " "
Order of pole (three term test) = -27.49958568313402 " "
"NO COMPLEX POLE (six term test) for Equation 1"
" "
"TOP MAIN SOLVE Loop"
x[1] = -2.2900000000000578 " "
y[1] (analytic) = -12.573420390098464 " "
y[1] (numeric) = -12.573420390098383 " "
absolute error = 8.17124146124115200000000000000E-14 " "
relative error = 6.4988214882849090000000000000E-13 "%"
Correct digits = 16
h = 1.00E-2 " "
"NO INFO (given) for Equation 1"
Radius of convergence (ratio test) for eq 1 = 189.98448128826774 " "
"Order of pole (ratio test) Not computed"
"NO REAL POLE (three term test) for Equation 1"
"NO COMPLEX POLE (six term test) for Equation 1"
" "
"TOP MAIN SOLVE Loop"
x[1] = -2.280000000000058 " "
y[1] (analytic) = -12.560853254323515 " "
y[1] (numeric) = -12.560853254323433 " "
absolute error = 8.17124146124115200000000000000E-14 " "
relative error = 6.5053235602673450000000000000E-13 "%"
Correct digits = 16
h = 1.00E-2 " "
"NO INFO (given) for Equation 1"
Radius of convergence (ratio test) for eq 1 = 190.0001447630446 " "
"Order of pole (ratio test) Not computed"
Radius of convergence (three term test) for eq 1 = 2.3385992219887193 " "
Order of pole (three term test) = -5.497918298629236 " "
Radius of convergence (six term test) for eq 1 = 21.303145870581563 " "
Order of pole (six term test) = -11.52714835553402 " "
" "
"TOP MAIN SOLVE Loop"
x[1] = -2.270000000000058 " "
y[1] (analytic) = -12.548298679402865 " "
y[1] (numeric) = -12.548298679402784 " "
absolute error = 8.17124146124115200000000000000E-14 " "
relative error = 6.5118321375738850000000000000E-13 "%"
Correct digits = 16
h = 1.00E-2 " "
"NO INFO (given) for Equation 1"
Radius of convergence (ratio test) for eq 1 = 190.0167132536481 " "
"Order of pole (ratio test) Not computed"
Radius of convergence (three term test) for eq 1 = 0.6579396599340727 " "
Order of pole (three term test) = -33.71644536507635 " "
"NO COMPLEX POLE (six term test) for Equation 1"
" "
"TOP MAIN SOLVE Loop"
x[1] = -2.2600000000000584 " "
y[1] (analytic) = -12.535756652781945 " "
y[1] (numeric) = -12.53575665278186 " "
absolute error = 8.52651282912120200000000000000E-14 " "
relative error = 6.8017536278745430000000000000E-13 "%"
Correct digits = 16
h = 1.00E-2 " "
"NO INFO (given) for Equation 1"
Radius of convergence (ratio test) for eq 1 = 190.00473611286154 " "
"Order of pole (ratio test) Not computed"
"NO REAL POLE (three term test) for Equation 1"
"NO COMPLEX POLE (six term test) for Equation 1"
" "
"TOP MAIN SOLVE Loop"
x[1] = -2.2500000000000586 " "
y[1] (analytic) = -12.523227161918717 " "
y[1] (numeric) = -12.523227161918633 " "
absolute error = 8.34887714518117700000000000000E-14 " "
relative error = 6.6667138088566170000000000000E-13 "%"
Correct digits = 16
h = 1.00E-2 " "
"NO INFO (given) for Equation 1"
Radius of convergence (ratio test) for eq 1 = 189.97796586590448 " "
"Order of pole (ratio test) Not computed"
"NO REAL POLE (three term test) for Equation 1"
"NO COMPLEX POLE (six term test) for Equation 1"
" "
"TOP MAIN SOLVE Loop"
x[1] = -2.240000000000059 " "
y[1] (analytic) = -12.510710194283696 " "
y[1] (numeric) = -12.510710194283613 " "
absolute error = 8.34887714518117700000000000000E-14 " "
relative error = 6.6733838571337740000000000000E-13 "%"
Correct digits = 16
h = 1.00E-2 " "
"NO INFO (given) for Equation 1"
Radius of convergence (ratio test) for eq 1 = 190.00871841610234 " "
"Order of pole (ratio test) Not computed"
"NO REAL POLE (three term test) for Equation 1"
"NO COMPLEX POLE (six term test) for Equation 1"
" "
"TOP MAIN SOLVE Loop"
x[1] = -2.230000000000059 " "
y[1] (analytic) = -12.498205737359914 " "
y[1] (numeric) = -12.498205737359829 " "
absolute error = 8.52651282912120200000000000000E-14 " "
relative error = 6.8221895272803530000000000000E-13 "%"
Correct digits = 16
h = 1.00E-2 " "
"NO INFO (given) for Equation 1"
Radius of convergence (ratio test) for eq 1 = 189.98779992364973 " "
"Order of pole (ratio test) Not computed"
Radius of convergence (three term test) for eq 1 = 2.78876818639858 " "
Order of pole (three term test) = -8.916634208179133 " "
"NO COMPLEX POLE (six term test) for Equation 1"
" "
"TOP MAIN SOLVE Loop"
x[1] = -2.2200000000000593 " "
y[1] (analytic) = -12.485713778642907 " "
y[1] (numeric) = -12.485713778642824 " "
absolute error = 8.34887714518117700000000000000E-14 " "
relative error = 6.6867439805180530000000000000E-13 "%"
Correct digits = 16
h = 1.00E-2 " "
"NO INFO (given) for Equation 1"
Radius of convergence (ratio test) for eq 1 = 190.00990934463562 " "
"Order of pole (ratio test) Not computed"
Radius of convergence (three term test) for eq 1 = 5.02799072980345100E-2 " "
Order of pole (three term test) = -25.700681641209115 " "
"NO COMPLEX POLE (six term test) for Equation 1"
" "
"TOP MAIN SOLVE Loop"
x[1] = -2.2100000000000595 " "
y[1] (analytic) = -12.473234305640723 " "
y[1] (numeric) = -12.473234305640638 " "
absolute error = 8.52651282912120200000000000000E-14 " "
relative error = 6.835847559814770000000000000E-13 "%"
Correct digits = 16
h = 1.00E-2 " "
"NO INFO (given) for Equation 1"
Radius of convergence (ratio test) for eq 1 = 190.00603182884086 " "
"Order of pole (ratio test) Not computed"
"NO REAL POLE (three term test) for Equation 1"
"NO COMPLEX POLE (six term test) for Equation 1"
" "
"TOP MAIN SOLVE Loop"
x[1] = -2.2000000000000597 " "
y[1] (analytic) = -12.460767305873883 " "
y[1] (numeric) = -12.460767305873798 " "
absolute error = 8.52651282912120200000000000000E-14 " "
relative error = 6.8426868264379580000000000000E-13 "%"
Correct digits = 16
h = 1.00E-2 " "
"NO INFO (given) for Equation 1"
Radius of convergence (ratio test) for eq 1 = 190.00202057103436 " "
"Order of pole (ratio test) Not computed"
"NO REAL POLE (three term test) for Equation 1"
"NO COMPLEX POLE (six term test) for Equation 1"
" "
"TOP MAIN SOLVE Loop"
x[1] = -2.19000000000006 " "
y[1] (analytic) = -12.448312766875388 " "
y[1] (numeric) = -12.448312766875302 " "
absolute error = 8.52651282912120200000000000000E-14 " "
relative error = 6.8495329357485410000000000000E-13 "%"
Correct digits = 16
h = 1.00E-2 " "
"NO INFO (given) for Equation 1"
Radius of convergence (ratio test) for eq 1 = 190.01103002927525 " "
"Order of pole (ratio test) Not computed"
"NO REAL POLE (three term test) for Equation 1"
"NO COMPLEX POLE (six term test) for Equation 1"
" "
"TOP MAIN SOLVE Loop"
x[1] = -2.18000000000006 " "
y[1] (analytic) = -12.435870676190694 " "
y[1] (numeric) = -12.43587067619061 " "
absolute error = 8.34887714518117700000000000000E-14 " "
relative error = 6.713544521788620000000000000E-13 "%"
Correct digits = 16
h = 1.00E-2 " "
"NO INFO (given) for Equation 1"
Radius of convergence (ratio test) for eq 1 = 190.00083890034057 " "
"Order of pole (ratio test) Not computed"
"NO REAL POLE (three term test) for Equation 1"
"NO COMPLEX POLE (six term test) for Equation 1"
" "
"TOP MAIN SOLVE Loop"
x[1] = -2.1700000000000603 " "
y[1] (analytic) = -12.423441021377714 " "
y[1] (numeric) = -12.42344102137763 " "
absolute error = 8.34887714518117700000000000000E-14 " "
relative error = 6.7202614242018730000000000000E-13 "%"
Correct digits = 16
h = 1.00E-2 " "
"NO INFO (given) for Equation 1"
Radius of convergence (ratio test) for eq 1 = 189.99626965312896 " "
"Order of pole (ratio test) Not computed"
"NO REAL POLE (three term test) for Equation 1"
"NO COMPLEX POLE (six term test) for Equation 1"
" "
"TOP MAIN SOLVE Loop"
x[1] = -2.1600000000000605 " "
y[1] (analytic) = -12.411023790006793 " "
y[1] (numeric) = -12.411023790006707 " "
absolute error = 8.52651282912120200000000000000E-14 " "
relative error = 6.8701123883000270000000000000E-13 "%"
Correct digits = 16
h = 1.00E-2 " "
"NO INFO (given) for Equation 1"
Radius of convergence (ratio test) for eq 1 = 189.99851910268663 " "
"Order of pole (ratio test) Not computed"
"NO REAL POLE (three term test) for Equation 1"
"NO COMPLEX POLE (six term test) for Equation 1"
" "
"TOP MAIN SOLVE Loop"
x[1] = -2.1500000000000608 " "
y[1] (analytic) = -12.398618969660694 " "
y[1] (numeric) = -12.398618969660609 " "
absolute error = 8.52651282912120200000000000000E-14 " "
relative error = 6.8769859368898270000000000000E-13 "%"
Correct digits = 16
h = 1.00E-2 " "
"NO INFO (given) for Equation 1"
Radius of convergence (ratio test) for eq 1 = 189.98795282178347 " "
"Order of pole (ratio test) Not computed"
"NO REAL POLE (three term test) for Equation 1"
"NO COMPLEX POLE (six term test) for Equation 1"
" "
"TOP MAIN SOLVE Loop"
x[1] = -2.140000000000061 " "
y[1] (analytic) = -12.3862265479346 " "
y[1] (numeric) = -12.386226547934513 " "
absolute error = 8.70414851306122700000000000000E-14 " "
relative error = 7.0272802450175120000000000000E-13 "%"
Correct digits = 16
h = 1.00E-2 " "
"NO INFO (given) for Equation 1"
Radius of convergence (ratio test) for eq 1 = 190.00264500190713 " "
"Order of pole (ratio test) Not computed"
Radius of convergence (three term test) for eq 1 = 47.3551659946198 " "
Order of pole (three term test) = -136.29072357548378 " "
"NO COMPLEX POLE (six term test) for Equation 1"
" "
"TOP MAIN SOLVE Loop"
x[1] = -2.130000000000061 " "
y[1] (analytic) = -12.373846512436081 " "
y[1] (numeric) = -12.373846512435996 " "
absolute error = 8.52651282912120200000000000000E-14 " "
relative error = 6.8907536719093810000000000000E-13 "%"
Correct digits = 16
h = 1.00E-2 " "
"NO INFO (given) for Equation 1"
Radius of convergence (ratio test) for eq 1 = 189.99603679954012 " "
"Order of pole (ratio test) Not computed"
"NO REAL POLE (three term test) for Equation 1"
"NO COMPLEX POLE (six term test) for Equation 1"
" "
"TOP MAIN SOLVE Loop"
x[1] = -2.1200000000000614 " "
y[1] (analytic) = -12.361478850785113 " "
y[1] (numeric) = -12.361478850785025 " "
absolute error = 8.88178419700125200000000000000E-14 " "
relative error = 7.185049866777990000000000000E-13 "%"
Correct digits = 16
h = 1.00E-2 " "
"NO INFO (given) for Equation 1"
Radius of convergence (ratio test) for eq 1 = 189.98862543217658 " "
"Order of pole (ratio test) Not computed"
"NO REAL POLE (three term test) for Equation 1"
"NO COMPLEX POLE (six term test) for Equation 1"
" "
"TOP MAIN SOLVE Loop"
x[1] = -2.1100000000000616 " "
y[1] (analytic) = -12.34912355061402 " "
y[1] (numeric) = -12.349123550613934 " "
absolute error = 8.70414851306122700000000000000E-14 " "
relative error = 7.048393740160160000000000000E-13 "%"
Correct digits = 16
h = 1.00E-2 " "
"NO INFO (given) for Equation 1"
Radius of convergence (ratio test) for eq 1 = 190.00820891367746 " "
"Order of pole (ratio test) Not computed"
"NO REAL POLE (three term test) for Equation 1"
"NO COMPLEX POLE (six term test) for Equation 1"
" "
"TOP MAIN SOLVE Loop"
x[1] = -2.100000000000062 " "
y[1] (analytic) = -12.33678059956751 " "
y[1] (numeric) = -12.336780599567422 " "
absolute error = 8.70414851306122700000000000000E-14 " "
relative error = 7.0554456592722160000000000000E-13 "%"
Correct digits = 16
h = 1.00E-2 " "
"NO INFO (given) for Equation 1"
Radius of convergence (ratio test) for eq 1 = 190.0055697908741 " "
"Order of pole (ratio test) Not computed"
"NO REAL POLE (three term test) for Equation 1"
"NO COMPLEX POLE (six term test) for Equation 1"
" "
"TOP MAIN SOLVE Loop"
x[1] = -2.090000000000062 " "
y[1] (analytic) = -12.324449985302627 " "
y[1] (numeric) = -12.324449985302538 " "
absolute error = 8.88178419700125200000000000000E-14 " "
relative error = 7.2066373814597130000000000000E-13 "%"
Correct digits = 16
h = 1.00E-2 " "
"NO INFO (given) for Equation 1"
Radius of convergence (ratio test) for eq 1 = 190.00977116297196 " "
"Order of pole (ratio test) Not computed"
"NO REAL POLE (three term test) for Equation 1"
"NO COMPLEX POLE (six term test) for Equation 1"
" "
"TOP MAIN SOLVE Loop"
x[1] = -2.0800000000000622 " "
y[1] (analytic) = -12.312131695488755 " "
y[1] (numeric) = -12.312131695488667 " "
absolute error = 8.88178419700125200000000000000E-14 " "
relative error = 7.213847623361270000000000000E-13 "%"
Correct digits = 16
h = 1.00E-2 " "
"NO INFO (given) for Equation 1"
Radius of convergence (ratio test) for eq 1 = 189.99478618357693 " "
"Order of pole (ratio test) Not computed"
"NO REAL POLE (three term test) for Equation 1"
"NO COMPLEX POLE (six term test) for Equation 1"
" "
"TOP MAIN SOLVE Loop"
x[1] = -2.0700000000000625 " "
y[1] (analytic) = -12.299825717807604 " "
y[1] (numeric) = -12.299825717807517 " "
absolute error = 8.70414851306122700000000000000E-14 " "
relative error = 7.0766437775288320000000000000E-13 "%"
Correct digits = 16
h = 1.00E-2 " "
"NO INFO (given) for Equation 1"
Radius of convergence (ratio test) for eq 1 = 190.00582770700484 " "
"Order of pole (ratio test) Not computed"
"NO REAL POLE (three term test) for Equation 1"
"NO COMPLEX POLE (six term test) for Equation 1"
" "
"TOP MAIN SOLVE Loop"
x[1] = -2.0600000000000627 " "
y[1] (analytic) = -12.287532039953195 " "
y[1] (numeric) = -12.28753203995311 " "
absolute error = 8.52651282912120200000000000000E-14 " "
relative error = 6.9391581656894550000000000000E-13 "%"
Correct digits = 16
h = 1.00E-2 " "
"NO INFO (given) for Equation 1"
Radius of convergence (ratio test) for eq 1 = 189.9879716917647 " "
"Order of pole (ratio test) Not computed"
"NO REAL POLE (three term test) for Equation 1"
"NO COMPLEX POLE (six term test) for Equation 1"
" "
"TOP MAIN SOLVE Loop"
x[1] = -2.050000000000063 " "
y[1] (analytic) = -12.275250649631852 " "
y[1] (numeric) = -12.275250649631767 " "
absolute error = 8.52651282912120200000000000000E-14 " "
relative error = 6.9461007945910420000000000000E-13 "%"
Correct digits = 16
h = 1.00E-2 " "
"NO INFO (given) for Equation 1"
Radius of convergence (ratio test) for eq 1 = 190.01105440358185 " "
"Order of pole (ratio test) Not computed"
Radius of convergence (three term test) for eq 1 = 0.5830973167411817 " "
Order of pole (three term test) = -32.930726050519716 " "
"NO COMPLEX POLE (six term test) for Equation 1"
" "
"TOP MAIN SOLVE Loop"
x[1] = -2.040000000000063 " "
y[1] (analytic) = -12.262981534562183 " "
y[1] (numeric) = -12.262981534562096 " "
absolute error = 8.70414851306122700000000000000E-14 " "
relative error = 7.0979055856272110000000000000E-13 "%"
Correct digits = 16
h = 1.00E-2 " "
"NO INFO (given) for Equation 1"
Radius of convergence (ratio test) for eq 1 = 190.00691005765353 " "
"Order of pole (ratio test) Not computed"
"NO REAL POLE (three term test) for Equation 1"
"NO COMPLEX POLE (six term test) for Equation 1"
" "
"TOP MAIN SOLVE Loop"
x[1] = -2.0300000000000633 " "
y[1] (analytic) = -12.25072468247507 " "
y[1] (numeric) = -12.250724682474981 " "
absolute error = 8.88178419700125200000000000000E-14 " "
relative error = 7.2500071850499090000000000000E-13 "%"
Correct digits = 16
h = 1.00E-2 " "
"NO INFO (given) for Equation 1"
Radius of convergence (ratio test) for eq 1 = 190.00211053925017 " "
"Order of pole (ratio test) Not computed"
Radius of convergence (three term test) for eq 1 = 9.34968365165401 " "
Order of pole (three term test) = -32.68793439693881 " "
"NO COMPLEX POLE (six term test) for Equation 1"
" "
"TOP MAIN SOLVE Loop"
x[1] = -2.0200000000000635 " "
y[1] (analytic) = -12.23848008111366 " "
y[1] (numeric) = -12.23848008111357 " "
absolute error = 9.05941988094127700000000000000E-14 " "
relative error = 7.4024060348161310000000000000E-13 "%"
Correct digits = 16
h = 1.00E-2 " "
"NO INFO (given) for Equation 1"
Radius of convergence (ratio test) for eq 1 = 189.99243798036105 " "
"Order of pole (ratio test) Not computed"
"NO REAL POLE (three term test) for Equation 1"
"NO COMPLEX POLE (six term test) for Equation 1"
" "
"TOP MAIN SOLVE Loop"
x[1] = -2.0100000000000637 " "
y[1] (analytic) = -12.226247718233349 " "
y[1] (numeric) = -12.22624771823326 " "
absolute error = 8.88178419700125200000000000000E-14 " "
relative error = 7.264521709105890000000000000E-13 "%"
Correct digits = 16
h = 1.00E-2 " "
"NO INFO (given) for Equation 1"
Radius of convergence (ratio test) for eq 1 = 190.0118305039655 " "
"Order of pole (ratio test) Not computed"
"NO REAL POLE (three term test) for Equation 1"
"NO COMPLEX POLE (six term test) for Equation 1"
" "
"TOP MAIN SOLVE Loop"
x[1] = -2.000000000000064 " "
y[1] (analytic) = -12.214027581601776 " "
y[1] (numeric) = -12.214027581601687 " "
absolute error = 8.88178419700125200000000000000E-14 " "
relative error = 7.2717898642869070000000000000E-13 "%"
Correct digits = 16
h = 1.00E-2 " "
"NO INFO (given) for Equation 1"
Radius of convergence (ratio test) for eq 1 = 190.00562128154527 " "
"Order of pole (ratio test) Not computed"
"NO REAL POLE (three term test) for Equation 1"
"NO COMPLEX POLE (six term test) for Equation 1"
" "
"TOP MAIN SOLVE Loop"
x[1] = -1.990000000000064 " "
y[1] (analytic) = -12.201819658998803 " "
y[1] (numeric) = -12.201819658998714 " "
absolute error = 8.88178419700125200000000000000E-14 " "
relative error = 7.2790652912583940000000000000E-13 "%"
Correct digits = 16
h = 1.00E-2 " "
"NO INFO (given) for Equation 1"
Radius of convergence (ratio test) for eq 1 = 190.0050850951261 " "
"Order of pole (ratio test) Not computed"
"NO REAL POLE (three term test) for Equation 1"
"NO COMPLEX POLE (six term test) for Equation 1"
" "
"TOP MAIN SOLVE Loop"
x[1] = -1.980000000000064 " "
y[1] (analytic) = -12.189623938216505 " "
y[1] (numeric) = -12.189623938216416 " "
absolute error = 8.88178419700125200000000000000E-14 " "
relative error = 7.286347997295780000000000000E-13 "%"
Correct digits = 16
h = 1.00E-2 " "
"NO INFO (given) for Equation 1"
Radius of convergence (ratio test) for eq 1 = 189.9937644450234 " "
"Order of pole (ratio test) Not computed"
"NO REAL POLE (three term test) for Equation 1"
"NO COMPLEX POLE (six term test) for Equation 1"
" "
"TOP MAIN SOLVE Loop"
x[1] = -1.970000000000064 " "
y[1] (analytic) = -12.177440407059162 " "
y[1] (numeric) = -12.177440407059072 " "
absolute error = 9.05941988094127700000000000000E-14 " "
relative error = 7.4395107494754030000000000000E-13 "%"
Correct digits = 16
h = 1.00E-2 " "
"NO INFO (given) for Equation 1"
Radius of convergence (ratio test) for eq 1 = 190.00297251709654 " "
"Order of pole (ratio test) Not computed"
"NO REAL POLE (three term test) for Equation 1"
"NO COMPLEX POLE (six term test) for Equation 1"
" "
"TOP MAIN SOLVE Loop"
x[1] = -1.960000000000064 " "
y[1] (analytic) = -12.16526905334324 " "
y[1] (numeric) = -12.16526905334315 " "
absolute error = 8.88178419700125200000000000000E-14 " "
relative error = 7.3009352757063560000000000000E-13 "%"
Correct digits = 16
h = 1.00E-2 " "
"NO INFO (given) for Equation 1"
Radius of convergence (ratio test) for eq 1 = 190.0017899249168 " "
"Order of pole (ratio test) Not computed"
"NO REAL POLE (three term test) for Equation 1"
"NO COMPLEX POLE (six term test) for Equation 1"
" "
"TOP MAIN SOLVE Loop"
x[1] = -1.950000000000064 " "
y[1] (analytic) = -12.153109864897386 " "
y[1] (numeric) = -12.153109864897296 " "
absolute error = 9.05941988094127700000000000000E-14 " "
relative error = 7.4544046599201620000000000000E-13 "%"
Correct digits = 16
h = 1.00E-2 " "
"NO INFO (given) for Equation 1"
Radius of convergence (ratio test) for eq 1 = 189.99969653314852 " "
"Order of pole (ratio test) Not computed"
"NO REAL POLE (three term test) for Equation 1"
"NO COMPLEX POLE (six term test) for Equation 1"
" "
"TOP MAIN SOLVE Loop"
x[1] = -1.940000000000064 " "
y[1] (analytic) = -12.14096282956241 " "
y[1] (numeric) = -12.14096282956232 " "
absolute error = 9.05941988094127700000000000000E-14 " "
relative error = 7.4618627930251240000000000000E-13 "%"
Correct digits = 16
h = 1.00E-2 " "
"NO INFO (given) for Equation 1"
Radius of convergence (ratio test) for eq 1 = 189.9890618300203 " "
"Order of pole (ratio test) Not computed"
Radius of convergence (three term test) for eq 1 = 821.0715912355895 " "
Order of pole (three term test) = -2972.797082216958 " "
"NO COMPLEX POLE (six term test) for Equation 1"
" "
"TOP MAIN SOLVE Loop"
x[1] = -1.9300000000000639 " "
y[1] (analytic) = -12.128827935191273 " "
y[1] (numeric) = -12.128827935191184 " "
absolute error = 8.88178419700125200000000000000E-14 " "
relative error = 7.322870968621079000000000000E-13 "%"
Correct digits = 16
h = 1.00E-2 " "
"NO INFO (given) for Equation 1"
Radius of convergence (ratio test) for eq 1 = 189.9924186899411 " "
"Order of pole (ratio test) Not computed"
"NO REAL POLE (three term test) for Equation 1"
"NO COMPLEX POLE (six term test) for Equation 1"
" "
"TOP MAIN SOLVE Loop"
x[1] = -1.9200000000000639 " "
y[1] (analytic) = -12.116705169649082 " "
y[1] (numeric) = -12.116705169648995 " "
absolute error = 8.70414851306122700000000000000E-14 " "
relative error = 7.183593552201050000000000000E-13 "%"
Correct digits = 16
h = 1.00E-2 " "
"NO INFO (given) for Equation 1"
Radius of convergence (ratio test) for eq 1 = 190.00021224567712 " "
"Order of pole (ratio test) Not computed"
"NO REAL POLE (three term test) for Equation 1"
"NO COMPLEX POLE (six term test) for Equation 1"
" "
"TOP MAIN SOLVE Loop"
x[1] = -1.9100000000000639 " "
y[1] (analytic) = -12.104594520813073 " "
y[1] (numeric) = -12.104594520812984 " "
absolute error = 8.88178419700125200000000000000E-14 " "
relative error = 7.337531366068970000000000000E-13 "%"
Correct digits = 16
h = 1.00E-2 " "
"NO INFO (given) for Equation 1"
Radius of convergence (ratio test) for eq 1 = 190.00926312404292 " "
"Order of pole (ratio test) Not computed"
"NO REAL POLE (three term test) for Equation 1"
"NO COMPLEX POLE (six term test) for Equation 1"
" "
"TOP MAIN SOLVE Loop"
x[1] = -1.9000000000000639 " "
y[1] (analytic) = -12.092495976572593 " "
y[1] (numeric) = -12.092495976572504 " "
absolute error = 8.88178419700125200000000000000E-14 " "
relative error = 7.344872567423950000000000000E-13 "%"
Correct digits = 16
h = 1.00E-2 " "
"NO INFO (given) for Equation 1"
Radius of convergence (ratio test) for eq 1 = 190.0222330139193 " "
"Order of pole (ratio test) Not computed"
Radius of convergence (three term test) for eq 1 = 3.1230178966580637 " "
Order of pole (three term test) = -62.50295285248698 " "
"NO COMPLEX POLE (six term test) for Equation 1"
" "
"TOP MAIN SOLVE Loop"
x[1] = -1.8900000000000639 " "
y[1] (analytic) = -12.080409524829095 " "
y[1] (numeric) = -12.080409524829008 " "
absolute error = 8.70414851306122700000000000000E-14 " "
relative error = 7.2051766913790670000000000000E-13 "%"
Correct digits = 16
h = 1.00E-2 " "
"NO INFO (given) for Equation 1"
Radius of convergence (ratio test) for eq 1 = 190.00676933582372 " "
"Order of pole (ratio test) Not computed"
"NO REAL POLE (three term test) for Equation 1"
"NO COMPLEX POLE (six term test) for Equation 1"
" "
"TOP MAIN SOLVE Loop"
x[1] = -1.8800000000000638 " "
y[1] (analytic) = -12.068335153496133 " "
y[1] (numeric) = -12.068335153496044 " "
absolute error = 8.88178419700125200000000000000E-14 " "
relative error = 7.3595770121019930000000000000E-13 "%"
Correct digits = 16
h = 1.00E-2 " "
"NO INFO (given) for Equation 1"
Radius of convergence (ratio test) for eq 1 = 189.9986719807659 " "
"Order of pole (ratio test) Not computed"
"NO REAL POLE (three term test) for Equation 1"
"NO COMPLEX POLE (six term test) for Equation 1"
" "
"TOP MAIN SOLVE Loop"
x[1] = -1.8700000000000638 " "
y[1] (analytic) = -12.056272850499324 " "
y[1] (numeric) = -12.056272850499237 " "
absolute error = 8.70414851306122700000000000000E-14 " "
relative error = 7.2196014647269160000000000000E-13 "%"
Correct digits = 16
h = 1.00E-2 " "
"NO INFO (given) for Equation 1"
Radius of convergence (ratio test) for eq 1 = 189.9837937226672 " "
"Order of pole (ratio test) Not computed"
Radius of convergence (three term test) for eq 1 = 25.743058936913275 " "
Order of pole (three term test) = -106.29227048205578 " "
"NO COMPLEX POLE (six term test) for Equation 1"
" "
"TOP MAIN SOLVE Loop"
x[1] = -1.8600000000000638 " "
y[1] (analytic) = -12.044222603776374 " "
y[1] (numeric) = -12.044222603776287 " "
absolute error = 8.70414851306122700000000000000E-14 " "
relative error = 7.2268246771959430000000000000E-13 "%"
Correct digits = 16
h = 1.00E-2 " "
"NO INFO (given) for Equation 1"
Radius of convergence (ratio test) for eq 1 = 190.008904381539 " "
"Order of pole (ratio test) Not computed"
"NO REAL POLE (three term test) for Equation 1"
"NO COMPLEX POLE (six term test) for Equation 1"
" "
"TOP MAIN SOLVE Loop"
x[1] = -1.8500000000000638 " "
y[1] (analytic) = -12.03218440127703 " "
y[1] (numeric) = -12.032184401276943 " "
absolute error = 8.70414851306122700000000000000E-14 " "
relative error = 7.234055116490250000000000000E-13 "%"
Correct digits = 16
h = 1.00E-2 " "
"NO INFO (given) for Equation 1"
Radius of convergence (ratio test) for eq 1 = 189.99958344550186 " "
"Order of pole (ratio test) Not computed"
"NO REAL POLE (three term test) for Equation 1"
"NO COMPLEX POLE (six term test) for Equation 1"
" "
"TOP MAIN SOLVE Loop"
x[1] = -1.8400000000000638 " "
y[1] (analytic) = -12.020158230963093 " "
y[1] (numeric) = -12.020158230963004 " "
absolute error = 8.88178419700125200000000000000E-14 " "
relative error = 7.3890742753472180000000000000E-13 "%"
Correct digits = 16
h = 1.00E-2 " "
"NO INFO (given) for Equation 1"
Radius of convergence (ratio test) for eq 1 = 190.00752522727944 " "
"Order of pole (ratio test) Not computed"
Radius of convergence (three term test) for eq 1 = 0.9431602287743514 " "
Order of pole (three term test) = -1.7984585631693357 " "
"NO COMPLEX POLE (six term test) for Equation 1"
" "
"TOP MAIN SOLVE Loop"
x[1] = -1.8300000000000638 " "
y[1] (analytic) = -12.008144080808385 " "
y[1] (numeric) = -12.008144080808297 " "
absolute error = 8.88178419700125200000000000000E-14 " "
relative error = 7.3964670453915250000000000000E-13 "%"
Correct digits = 16
h = 1.00E-2 " "
"NO INFO (given) for Equation 1"
Radius of convergence (ratio test) for eq 1 = 189.99321426662092 " "
"Order of pole (ratio test) Not computed"
"NO REAL POLE (three term test) for Equation 1"
"NO COMPLEX POLE (six term test) for Equation 1"
" "
"TOP MAIN SOLVE Loop"
x[1] = -1.8200000000000638 " "
y[1] (analytic) = -11.99614193879876 " "
y[1] (numeric) = -11.996141938798672 " "
absolute error = 8.70414851306122700000000000000E-14 " "
relative error = 7.2557898676654230000000000000E-13 "%"
Correct digits = 16
h = 1.00E-2 " "
"NO INFO (given) for Equation 1"
Radius of convergence (ratio test) for eq 1 = 189.99198652187 " "
"Order of pole (ratio test) Not computed"
"NO REAL POLE (three term test) for Equation 1"
"NO COMPLEX POLE (six term test) for Equation 1"
" "
"TOP MAIN SOLVE Loop"
x[1] = -1.8100000000000638 " "
y[1] (analytic) = -11.984151792932073 " "
y[1] (numeric) = -11.984151792931986 " "
absolute error = 8.70414851306122700000000000000E-14 " "
relative error = 7.2630492866376220000000000000E-13 "%"
Correct digits = 16
h = 1.00E-2 " "
"NO INFO (given) for Equation 1"
Radius of convergence (ratio test) for eq 1 = 190.00434997897383 " "
"Order of pole (ratio test) Not computed"
"NO REAL POLE (three term test) for Equation 1"
"NO COMPLEX POLE (six term test) for Equation 1"
" "
"TOP MAIN SOLVE Loop"
x[1] = -1.8000000000000638 " "
y[1] (analytic) = -11.972173631218178 " "
y[1] (numeric) = -11.97217363121809 " "
absolute error = 8.70414851306122700000000000000E-14 " "
relative error = 7.2703159686597140000000000000E-13 "%"
Correct digits = 16
h = 1.00E-2 " "
"NO INFO (given) for Equation 1"
Radius of convergence (ratio test) for eq 1 = 190.00145314264705 " "
"Order of pole (ratio test) Not computed"
Radius of convergence (three term test) for eq 1 = 3.0945777903759195 " "
Order of pole (three term test) = -5.531182959640362 " "
"NO COMPLEX POLE (six term test) for Equation 1"
" "
"TOP MAIN SOLVE Loop"
x[1] = -1.7900000000000638 " "
y[1] (analytic) = -11.960207441678913 " "
y[1] (numeric) = -11.960207441678826 " "
absolute error = 8.70414851306122700000000000000E-14 " "
relative error = 7.277589920998381000000000000E-13 "%"
Correct digits = 16
h = 1.00E-2 " "
"NO INFO (given) for Equation 1"
Radius of convergence (ratio test) for eq 1 = 189.98609280443563 " "
"Order of pole (ratio test) Not computed"
"NO REAL POLE (three term test) for Equation 1"
"NO COMPLEX POLE (six term test) for Equation 1"
" "
"TOP MAIN SOLVE Loop"
x[1] = -1.7800000000000638 " "
y[1] (analytic) = -11.948253212348083 " "
y[1] (numeric) = -11.948253212347998 " "
absolute error = 8.52651282912120200000000000000E-14 " "
relative error = 7.1362003111127260000000000000E-13 "%"
Correct digits = 16
h = 1.00E-2 " "
"NO INFO (given) for Equation 1"
Radius of convergence (ratio test) for eq 1 = 190.01097359990388 " "
"Order of pole (ratio test) Not computed"
Radius of convergence (three term test) for eq 1 = 1.121369107060658 " "
Order of pole (three term test) = -40.85534867703332 " "
"NO COMPLEX POLE (six term test) for Equation 1"
" "
"TOP MAIN SOLVE Loop"
x[1] = -1.7700000000000637 " "
y[1] (analytic) = -11.936310931271464 " "
y[1] (numeric) = -11.936310931271379 " "
absolute error = 8.52651282912120200000000000000E-14 " "
relative error = 7.1433400807136580000000000000E-13 "%"
Correct digits = 16
h = 1.00E-2 " "
"NO INFO (given) for Equation 1"
Radius of convergence (ratio test) for eq 1 = 190.00286010134144 " "
"Order of pole (ratio test) Not computed"
"NO REAL POLE (three term test) for Equation 1"
"NO COMPLEX POLE (six term test) for Equation 1"
" "
"TOP MAIN SOLVE Loop"
x[1] = -1.7600000000000637 " "
y[1] (analytic) = -11.924380586506771 " "
y[1] (numeric) = -11.924380586506684 " "
absolute error = 8.70414851306122700000000000000E-14 " "
relative error = 7.299455472689751000000000000E-13 "%"
Correct digits = 16
h = 1.00E-2 " "
"NO INFO (given) for Equation 1"
Radius of convergence (ratio test) for eq 1 = 190.00323048005833 " "
"Order of pole (ratio test) Not computed"
"NO REAL POLE (three term test) for Equation 1"
"NO COMPLEX POLE (six term test) for Equation 1"
" "
"TOP MAIN SOLVE Loop"
x[1] = -1.7500000000000637 " "
y[1] (analytic) = -11.912462166123658 " "
y[1] (numeric) = -11.912462166123571 " "
absolute error = 8.70414851306122700000000000000E-14 " "
relative error = 7.3067585791070570000000000000E-13 "%"
Correct digits = 16
h = 1.00E-2 " "
"NO INFO (given) for Equation 1"
Radius of convergence (ratio test) for eq 1 = 189.99929025365722 " "
"Order of pole (ratio test) Not computed"
Radius of convergence (three term test) for eq 1 = 1065.362300976774 " "
Order of pole (three term test) = -2835.677012490218 " "
"NO COMPLEX POLE (six term test) for Equation 1"
" "
"TOP MAIN SOLVE Loop"
x[1] = -1.7400000000000637 " "
y[1] (analytic) = -11.900555658203702 " "
y[1] (numeric) = -11.900555658203617 " "
absolute error = 8.52651282912120200000000000000E-14 " "
relative error = 7.1648022781553160000000000000E-13 "%"
Correct digits = 16
h = 1.00E-2 " "
"NO INFO (given) for Equation 1"
Radius of convergence (ratio test) for eq 1 = 190.00688033517292 " "
"Order of pole (ratio test) Not computed"
"NO REAL POLE (three term test) for Equation 1"
"NO COMPLEX POLE (six term test) for Equation 1"
" "
"TOP MAIN SOLVE Loop"
x[1] = -1.7300000000000637 " "
y[1] (analytic) = -11.8886610508404 " "
y[1] (numeric) = -11.888661050840312 " "
absolute error = 8.70414851306122700000000000000E-14 " "
relative error = 7.3213867195296470000000000000E-13 "%"
Correct digits = 16
h = 1.00E-2 " "
"NO INFO (given) for Equation 1"
Radius of convergence (ratio test) for eq 1 = 189.99579995642753 " "
"Order of pole (ratio test) Not computed"
"NO REAL POLE (three term test) for Equation 1"
"NO COMPLEX POLE (six term test) for Equation 1"
" "
"TOP MAIN SOLVE Loop"
x[1] = -1.7200000000000637 " "
y[1] (analytic) = -11.876778332139136 " "
y[1] (numeric) = -11.876778332139049 " "
absolute error = 8.70414851306122700000000000000E-14 " "
relative error = 7.3287117681630720000000000000E-13 "%"
Correct digits = 16
h = 1.00E-2 " "
"NO INFO (given) for Equation 1"
Radius of convergence (ratio test) for eq 1 = 190.00352702455962 " "
"Order of pole (ratio test) Not computed"
"NO REAL POLE (three term test) for Equation 1"
"NO COMPLEX POLE (six term test) for Equation 1"
" "
"TOP MAIN SOLVE Loop"
x[1] = -1.7100000000000637 " "
y[1] (analytic) = -11.864907490217194 " "
y[1] (numeric) = -11.864907490217107 " "
absolute error = 8.70414851306122700000000000000E-14 " "
relative error = 7.3360441455088780000000000000E-13 "%"
Correct digits = 16
h = 1.00E-2 " "
"NO INFO (given) for Equation 1"
Radius of convergence (ratio test) for eq 1 = 190.00462562976477 " "
"Order of pole (ratio test) Not computed"
"NO REAL POLE (three term test) for Equation 1"
"NO COMPLEX POLE (six term test) for Equation 1"
" "
"TOP MAIN SOLVE Loop"
x[1] = -1.7000000000000637 " "
y[1] (analytic) = -11.85304851320373 " "
y[1] (numeric) = -11.853048513203644 " "
absolute error = 8.52651282912120200000000000000E-14 " "
relative error = 7.1935188821872060000000000000E-13 "%"
Correct digits = 16
h = 1.00E-2 " "
"NO INFO (given) for Equation 1"
Radius of convergence (ratio test) for eq 1 = 189.99281032087225 " "
"Order of pole (ratio test) Not computed"
Radius of convergence (three term test) for eq 1 = 14.392345058006674 " "
Order of pole (three term test) = -53.14329370557644 " "
"NO COMPLEX POLE (six term test) for Equation 1"
" "
"TOP MAIN SOLVE Loop"
x[1] = -1.6900000000000637 " "
y[1] (analytic) = -11.84120138923977 " "
y[1] (numeric) = -11.841201389239682 " "
absolute error = 8.70414851306122700000000000000E-14 " "
relative error = 7.3507309156744720000000000000E-13 "%"
Correct digits = 16
h = 1.00E-2 " "
"NO INFO (given) for Equation 1"
Radius of convergence (ratio test) for eq 1 = 190.00642768933963 " "
"Order of pole (ratio test) Not computed"
"NO REAL POLE (three term test) for Equation 1"
"NO COMPLEX POLE (six term test) for Equation 1"
" "
"TOP MAIN SOLVE Loop"
x[1] = -1.6800000000000637 " "
y[1] (analytic) = -11.829366106478183 " "
y[1] (numeric) = -11.829366106478096 " "
absolute error = 8.70414851306122700000000000000E-14 " "
relative error = 7.3580853231810330000000000000E-13 "%"
Correct digits = 16
h = 1.00E-2 " "
"NO INFO (given) for Equation 1"
Radius of convergence (ratio test) for eq 1 = 190.0184660547043 " "
"Order of pole (ratio test) Not computed"
Radius of convergence (three term test) for eq 1 = 1.4359228847064838 " "
Order of pole (three term test) = -42.14299393860504 " "
"NO COMPLEX POLE (six term test) for Equation 1"
" "
"TOP MAIN SOLVE Loop"
x[1] = -1.6700000000000637 " "
y[1] (analytic) = -11.81754265308369 " "
y[1] (numeric) = -11.817542653083603 " "
absolute error = 8.70414851306122700000000000000E-14 " "
relative error = 7.3654470887735290000000000000E-13 "%"
Correct digits = 16
h = 1.00E-2 " "
"NO INFO (given) for Equation 1"
Radius of convergence (ratio test) for eq 1 = 190.0109482131327 " "
"Order of pole (ratio test) Not computed"
"NO REAL POLE (three term test) for Equation 1"
"NO COMPLEX POLE (six term test) for Equation 1"
" "
"TOP MAIN SOLVE Loop"
x[1] = -1.6600000000000636 " "
y[1] (analytic) = -11.805731017232835 " "
y[1] (numeric) = -11.805731017232748 " "
absolute error = 8.70414851306122700000000000000E-14 " "
relative error = 7.3728162198137280000000000000E-13 "%"
Correct digits = 16
h = 1.00E-2 " "
"NO INFO (given) for Equation 1"
Radius of convergence (ratio test) for eq 1 = 190.00660400086608 " "
"Order of pole (ratio test) Not computed"
"NO REAL POLE (three term test) for Equation 1"
"NO COMPLEX POLE (six term test) for Equation 1"
" "
"TOP MAIN SOLVE Loop"
x[1] = -1.6500000000000636 " "
y[1] (analytic) = -11.79393118711398 " "
y[1] (numeric) = -11.793931187113895 " "
absolute error = 8.52651282912120200000000000000E-14 " "
relative error = 7.2295765456366660000000000000E-13 "%"
Correct digits = 16
h = 1.00E-2 " "
"NO INFO (given) for Equation 1"
Radius of convergence (ratio test) for eq 1 = 190.008563457802 " "
"Order of pole (ratio test) Not computed"
"NO REAL POLE (three term test) for Equation 1"
"NO COMPLEX POLE (six term test) for Equation 1"
" "
"TOP MAIN SOLVE Loop"
x[1] = -1.6400000000000636 " "
y[1] (analytic) = -11.782143150927295 " "
y[1] (numeric) = -11.78214315092721 " "
absolute error = 8.52651282912120200000000000000E-14 " "
relative error = 7.2368097381758060000000000000E-13 "%"
Correct digits = 16
h = 1.00E-2 " "
"NO INFO (given) for Equation 1"
Radius of convergence (ratio test) for eq 1 = 189.99887713447936 " "
"Order of pole (ratio test) Not computed"
"NO REAL POLE (three term test) for Equation 1"
"NO COMPLEX POLE (six term test) for Equation 1"
" "
"TOP MAIN SOLVE Loop"
x[1] = -1.6300000000000636 " "
y[1] (analytic) = -11.770366896884745 " "
y[1] (numeric) = -11.770366896884658 " "
absolute error = 8.70414851306122700000000000000E-14 " "
relative error = 7.3949678793487300000000000000E-13 "%"
Correct digits = 16
h = 1.00E-2 " "
"NO INFO (given) for Equation 1"
Radius of convergence (ratio test) for eq 1 = 189.9958932984854 " "
"Order of pole (ratio test) Not computed"
Radius of convergence (three term test) for eq 1 = 0.1911246156617465 " "
Order of pole (three term test) = -28.025709597298757 " "
"NO COMPLEX POLE (six term test) for Equation 1"
" "
"TOP MAIN SOLVE Loop"
x[1] = -1.6200000000000636 " "
y[1] (analytic) = -11.75860241321007 " "
y[1] (numeric) = -11.758602413209985 " "
absolute error = 8.52651282912120200000000000000E-14 " "
relative error = 7.2512978409255390000000000000E-13 "%"
Correct digits = 16
h = 1.00E-2 " "
"NO INFO (given) for Equation 1"
Radius of convergence (ratio test) for eq 1 = 189.99253780445963 " "
"Order of pole (ratio test) Not computed"
Radius of convergence (three term test) for eq 1 = 0.6959910839778217 " "
Order of pole (three term test) = -1.414092895573794 " "
Radius of convergence (six term test) for eq 1 = 8.11274876668342 " "
Order of pole (six term test) = -12.478883822871138 " "
" "
"TOP MAIN SOLVE Loop"
x[1] = -1.6100000000000636 " "
y[1] (analytic) = -11.746849688138791 " "
y[1] (numeric) = -11.746849688138704 " "
absolute error = 8.70414851306122700000000000000E-14 " "
relative error = 7.4097726149080740000000000000E-13 "%"
Correct digits = 16
h = 1.00E-2 " "
"NO INFO (given) for Equation 1"
Radius of convergence (ratio test) for eq 1 = 189.99726856556342 " "
"Order of pole (ratio test) Not computed"
"NO REAL POLE (three term test) for Equation 1"
"NO COMPLEX POLE (six term test) for Equation 1"
" "
"TOP MAIN SOLVE Loop"
x[1] = -1.6000000000000636 " "
y[1] (analytic) = -11.735108709918176 " "
y[1] (numeric) = -11.73510870991809 " "
absolute error = 8.52651282912120200000000000000E-14 " "
relative error = 7.2658149488763060000000000000E-13 "%"
Correct digits = 16
h = 1.00E-2 " "
"NO INFO (given) for Equation 1"
Radius of convergence (ratio test) for eq 1 = 189.99165548220014 " "
"Order of pole (ratio test) Not computed"
"NO REAL POLE (three term test) for Equation 1"
"NO COMPLEX POLE (six term test) for Equation 1"
" "
"TOP MAIN SOLVE Loop"
x[1] = -1.5900000000000636 " "
y[1] (analytic) = -11.723379466807252 " "
y[1] (numeric) = -11.723379466807165 " "
absolute error = 8.70414851306122700000000000000E-14 " "
relative error = 7.424606989567759000000000000E-13 "%"
Correct digits = 16
h = 1.00E-2 " "
"NO INFO (given) for Equation 1"
Radius of convergence (ratio test) for eq 1 = 189.9976500800035 " "
"Order of pole (ratio test) Not computed"
"NO REAL POLE (three term test) for Equation 1"
"NO COMPLEX POLE (six term test) for Equation 1"
" "
"TOP MAIN SOLVE Loop"
x[1] = -1.5800000000000636 " "
y[1] (analytic) = -11.711661947076768 " "
y[1] (numeric) = -11.711661947076683 " "
absolute error = 8.52651282912120200000000000000E-14 " "
relative error = 7.2803611200965560000000000000E-13 "%"
Correct digits = 16
h = 1.00E-2 " "
"NO INFO (given) for Equation 1"
Radius of convergence (ratio test) for eq 1 = 189.9850797604548 " "
"Order of pole (ratio test) Not computed"
"NO REAL POLE (three term test) for Equation 1"
"NO COMPLEX POLE (six term test) for Equation 1"
" "
"TOP MAIN SOLVE Loop"
x[1] = -1.5700000000000636 " "
y[1] (analytic) = -11.69995613900921 " "
y[1] (numeric) = -11.699956139009124 " "
absolute error = 8.52651282912120200000000000000E-14 " "
relative error = 7.2876451226109080000000000000E-13 "%"
Correct digits = 16
h = 1.00E-2 " "
"NO INFO (given) for Equation 1"
Radius of convergence (ratio test) for eq 1 = 190.00993435674005 " "
"Order of pole (ratio test) Not computed"
Radius of convergence (three term test) for eq 1 = 1.5547331120861905 " "
Order of pole (three term test) = -46.666531379639856 " "
"NO COMPLEX POLE (six term test) for Equation 1"
" "
"TOP MAIN SOLVE Loop"
x[1] = -1.5600000000000636 " "
y[1] (analytic) = -11.688262030898766 " "
y[1] (numeric) = -11.688262030898679 " "
absolute error = 8.70414851306122700000000000000E-14 " "
relative error = 7.446914254703719000000000000E-13 "%"
Correct digits = 16
h = 1.00E-2 " "
"NO INFO (given) for Equation 1"
Radius of convergence (ratio test) for eq 1 = 189.99753456139499 " "
"Order of pole (ratio test) Not computed"
"NO REAL POLE (three term test) for Equation 1"
"NO COMPLEX POLE (six term test) for Equation 1"
" "
"TOP MAIN SOLVE Loop"
x[1] = -1.5500000000000635 " "
y[1] (analytic) = -11.676579611051325 " "
y[1] (numeric) = -11.676579611051238 " "
absolute error = 8.70414851306122700000000000000E-14 " "
relative error = 7.4543648936570140000000000000E-13 "%"
Correct digits = 16
h = 1.00E-2 " "
"NO INFO (given) for Equation 1"
Radius of convergence (ratio test) for eq 1 = 190.0081619397875 " "
"Order of pole (ratio test) Not computed"
Radius of convergence (three term test) for eq 1 = 1.3132077550344825 " "
Order of pole (three term test) = -42.1014563383709 " "
"NO COMPLEX POLE (six term test) for Equation 1"
" "
"TOP MAIN SOLVE Loop"
x[1] = -1.5400000000000635 " "
y[1] (analytic) = -11.664908867784467 " "
y[1] (numeric) = -11.664908867784382 " "
absolute error = 8.52651282912120200000000000000E-14 " "
relative error = 7.3095408852008080000000000000E-13 "%"
Correct digits = 16
h = 1.00E-2 " "
"NO INFO (given) for Equation 1"
Radius of convergence (ratio test) for eq 1 = 190.0094064161596 " "
"Order of pole (ratio test) Not computed"
Radius of convergence (three term test) for eq 1 = 0.10338279181283017 " "
Order of pole (three term test) = -26.48044311448751 " "
"NO COMPLEX POLE (six term test) for Equation 1"
" "
"TOP MAIN SOLVE Loop"
x[1] = -1.5300000000000635 " "
y[1] (analytic) = -11.653249789427454 " "
y[1] (numeric) = -11.653249789427365 " "
absolute error = 8.88178419700125200000000000000E-14 " "
relative error = 7.621723002161470000000000000E-13 "%"
Correct digits = 16
h = 1.00E-2 " "
"NO INFO (given) for Equation 1"
Radius of convergence (ratio test) for eq 1 = 189.99443528522986 " "
"Order of pole (ratio test) Not computed"
"NO REAL POLE (three term test) for Equation 1"
"NO COMPLEX POLE (six term test) for Equation 1"
" "
"TOP MAIN SOLVE Loop"
x[1] = -1.5200000000000635 " "
y[1] (analytic) = -11.641602364321198 " "
y[1] (numeric) = -11.641602364321109 " "
absolute error = 8.88178419700125200000000000000E-14 " "
relative error = 7.6293485372957360000000000000E-13 "%"
Correct digits = 16
h = 1.00E-2 " "
"NO INFO (given) for Equation 1"
Radius of convergence (ratio test) for eq 1 = 190.0008977626813 " "
"Order of pole (ratio test) Not computed"
"NO REAL POLE (three term test) for Equation 1"
"NO COMPLEX POLE (six term test) for Equation 1"
" "
"TOP MAIN SOLVE Loop"
x[1] = -1.5100000000000635 " "
y[1] (analytic) = -11.629966580818277 " "
y[1] (numeric) = -11.629966580818188 " "
absolute error = 8.88178419700125200000000000000E-14 " "
relative error = 7.6369817017791770000000000000E-13 "%"
Correct digits = 16
h = 1.00E-2 " "
"NO INFO (given) for Equation 1"
Radius of convergence (ratio test) for eq 1 = 189.99587012278724 " "
"Order of pole (ratio test) Not computed"
"NO REAL POLE (three term test) for Equation 1"
"NO COMPLEX POLE (six term test) for Equation 1"
" "
"TOP MAIN SOLVE Loop"
x[1] = -1.5000000000000635 " "
y[1] (analytic) = -11.618342427282906 " "
y[1] (numeric) = -11.618342427282817 " "
absolute error = 8.88178419700125200000000000000E-14 " "
relative error = 7.6446225032449560000000000000E-13 "%"
Correct digits = 16
h = 1.00E-2 " "
"NO INFO (given) for Equation 1"
Radius of convergence (ratio test) for eq 1 = 189.99255728575108 " "
"Order of pole (ratio test) Not computed"
"NO REAL POLE (three term test) for Equation 1"
"NO COMPLEX POLE (six term test) for Equation 1"
" "
"TOP MAIN SOLVE Loop"
x[1] = -1.4900000000000635 " "
y[1] (analytic) = -11.60672989209093 " "
y[1] (numeric) = -11.606729892090842 " "
absolute error = 8.88178419700125200000000000000E-14 " "
relative error = 7.6522709493338750000000000000E-13 "%"
Correct digits = 16
h = 1.00E-2 " "
"NO INFO (given) for Equation 1"
Radius of convergence (ratio test) for eq 1 = 189.9882211305112 " "
"Order of pole (ratio test) Not computed"
"NO REAL POLE (three term test) for Equation 1"
"NO COMPLEX POLE (six term test) for Equation 1"
" "
"TOP MAIN SOLVE Loop"
x[1] = -1.4800000000000635 " "
y[1] (analytic) = -11.595128963629813 " "
y[1] (numeric) = -11.595128963629726 " "
absolute error = 8.70414851306122700000000000000E-14 " "
relative error = 7.5067285067404930000000000000E-13 "%"
Correct digits = 16
h = 1.00E-2 " "
"NO INFO (given) for Equation 1"
Radius of convergence (ratio test) for eq 1 = 190.01541269844532 " "
"Order of pole (ratio test) Not computed"
Radius of convergence (three term test) for eq 1 = 1.6352811348191953 " "
Order of pole (three term test) = -45.20390016063216 " "
"NO COMPLEX POLE (six term test) for Equation 1"
" "
"TOP MAIN SOLVE Loop"
x[1] = -1.4700000000000635 " "
y[1] (analytic) = -11.583539630298628 " "
y[1] (numeric) = -11.58353963029854 " "
absolute error = 8.70414851306122700000000000000E-14 " "
relative error = 7.5142389898629210000000000000E-13 "%"
Correct digits = 16
h = 1.00E-2 " "
"NO INFO (given) for Equation 1"
Radius of convergence (ratio test) for eq 1 = 189.99124587283907 " "
"Order of pole (ratio test) Not computed"
"NO REAL POLE (three term test) for Equation 1"
"NO COMPLEX POLE (six term test) for Equation 1"
" "
"TOP MAIN SOLVE Loop"
x[1] = -1.4600000000000635 " "
y[1] (analytic) = -11.571961880508034 " "
y[1] (numeric) = -11.57196188050795 " "
absolute error = 8.52651282912120200000000000000E-14 " "
relative error = 7.3682517425877230000000000000E-13 "%"
Correct digits = 16
h = 1.00E-2 " "
"NO INFO (given) for Equation 1"
Radius of convergence (ratio test) for eq 1 = 189.99660926545147 " "
"Order of pole (ratio test) Not computed"
"NO REAL POLE (three term test) for Equation 1"
"NO COMPLEX POLE (six term test) for Equation 1"
" "
"TOP MAIN SOLVE Loop"
x[1] = -1.4500000000000635 " "
y[1] (analytic) = -11.560395702680289 " "
y[1] (numeric) = -11.560395702680204 " "
absolute error = 8.52651282912120200000000000000E-14 " "
relative error = 7.3756236796845310000000000000E-13 "%"
Correct digits = 16
h = 1.00E-2 " "
"NO INFO (given) for Equation 1"
Radius of convergence (ratio test) for eq 1 = 189.98558831275187 " "
"Order of pole (ratio test) Not computed"
"NO REAL POLE (three term test) for Equation 1"
"NO COMPLEX POLE (six term test) for Equation 1"
" "
"TOP MAIN SOLVE Loop"
x[1] = -1.4400000000000635 " "
y[1] (analytic) = -11.548841085249208 " "
y[1] (numeric) = -11.548841085249123 " "
absolute error = 8.52651282912120200000000000000E-14 " "
relative error = 7.3830029924056340000000000000E-13 "%"
Correct digits = 16
h = 1.00E-2 " "
"NO INFO (given) for Equation 1"
Radius of convergence (ratio test) for eq 1 = 190.00581425181966 " "
"Order of pole (ratio test) Not computed"
"NO REAL POLE (three term test) for Equation 1"
"NO COMPLEX POLE (six term test) for Equation 1"
" "
"TOP MAIN SOLVE Loop"
x[1] = -1.4300000000000634 " "
y[1] (analytic) = -11.537298016660179 " "
y[1] (numeric) = -11.53729801666009 " "
absolute error = 8.88178419700125200000000000000E-14 " "
relative error = 7.6983225918024390000000000000E-13 "%"
Correct digits = 16
h = 1.00E-2 " "
"NO INFO (given) for Equation 1"
Radius of convergence (ratio test) for eq 1 = 189.9983572600807 " "
"Order of pole (ratio test) Not computed"
"NO REAL POLE (three term test) for Equation 1"
"NO COMPLEX POLE (six term test) for Equation 1"
" "
"TOP MAIN SOLVE Loop"
x[1] = -1.4200000000000634 " "
y[1] (analytic) = -11.525766485370122 " "
y[1] (numeric) = -11.525766485370037 " "
absolute error = 8.52651282912120200000000000000E-14 " "
relative error = 7.3977837742453570000000000000E-13 "%"
Correct digits = 16
h = 1.00E-2 " "
"NO INFO (given) for Equation 1"
Radius of convergence (ratio test) for eq 1 = 190.00604133028918 " "
"Order of pole (ratio test) Not computed"
"NO REAL POLE (three term test) for Equation 1"
"NO COMPLEX POLE (six term test) for Equation 1"
" "
"TOP MAIN SOLVE Loop"
x[1] = -1.4100000000000634 " "
y[1] (analytic) = -11.514246479847515 " "
y[1] (numeric) = -11.514246479847428 " "
absolute error = 8.70414851306122700000000000000E-14 " "
relative error = 7.5594599510227770000000000000E-13 "%"
Correct digits = 16
h = 1.00E-2 " "
"NO INFO (given) for Equation 1"
Radius of convergence (ratio test) for eq 1 = 190.00369724622826 " "
"Order of pole (ratio test) Not computed"
"NO REAL POLE (three term test) for Equation 1"
"NO COMPLEX POLE (six term test) for Equation 1"
" "
"TOP MAIN SOLVE Loop"
x[1] = -1.4000000000000634 " "
y[1] (analytic) = -11.502737988572346 " "
y[1] (numeric) = -11.502737988572258 " "
absolute error = 8.70414851306122700000000000000E-14 " "
relative error = 7.5670231919640000000000000E-13 "%"
Correct digits = 16
h = 1.00E-2 " "
"NO INFO (given) for Equation 1"
Radius of convergence (ratio test) for eq 1 = 189.99887296997306 " "
"Order of pole (ratio test) Not computed"
"NO REAL POLE (three term test) for Equation 1"
Radius of convergence (six term test) for eq 1 = 126.16160118477663 " "
Order of pole (six term test) = 4.7116005131844005 " "
" "
"TOP MAIN SOLVE Loop"
x[1] = -1.3900000000000634 " "
y[1] (analytic) = -11.491241000036123 " "
y[1] (numeric) = -11.491241000036037 " "
absolute error = 8.52651282912120200000000000000E-14 " "
relative error = 7.4200104489100870000000000000E-13 "%"
Correct digits = 16
h = 1.00E-2 " "
"NO INFO (given) for Equation 1"
Radius of convergence (ratio test) for eq 1 = 189.99871954806304 " "
"Order of pole (ratio test) Not computed"
"NO REAL POLE (three term test) for Equation 1"
"NO COMPLEX POLE (six term test) for Equation 1"
" "
"TOP MAIN SOLVE Loop"
x[1] = -1.3800000000000634 " "
y[1] (analytic) = -11.47975550274186 " "
y[1] (numeric) = -11.479755502741773 " "
absolute error = 8.70414851306122700000000000000E-14 " "
relative error = 7.5821723824887230000000000000E-13 "%"
Correct digits = 16
h = 1.00E-2 " "
"NO INFO (given) for Equation 1"
Radius of convergence (ratio test) for eq 1 = 190.01427527240224 " "
"Order of pole (ratio test) Not computed"
Radius of convergence (three term test) for eq 1 = 0.10861203064470543 " "
Order of pole (three term test) = -26.465705544854636 " "
"NO COMPLEX POLE (six term test) for Equation 1"
" "
"TOP MAIN SOLVE Loop"
x[1] = -1.3700000000000634 " "
y[1] (analytic) = -11.468281485204056 " "
y[1] (numeric) = -11.468281485203967 " "
absolute error = 8.88178419700125200000000000000E-14 " "
relative error = 7.7446513747157280000000000000E-13 "%"
Correct digits = 16
h = 1.00E-2 " "
"NO INFO (given) for Equation 1"
Radius of convergence (ratio test) for eq 1 = 189.99489267869967 " "
"Order of pole (ratio test) Not computed"
"NO REAL POLE (three term test) for Equation 1"
"NO COMPLEX POLE (six term test) for Equation 1"
" "
"TOP MAIN SOLVE Loop"
x[1] = -1.3600000000000634 " "
y[1] (analytic) = -11.45681893594869 " "
y[1] (numeric) = -11.456818935948602 " "
absolute error = 8.70414851306122700000000000000E-14 " "
relative error = 7.5973519017130860000000000000E-13 "%"
Correct digits = 16
h = 1.00E-2 " "
"NO INFO (given) for Equation 1"
Radius of convergence (ratio test) for eq 1 = 189.9962477931772 " "
"Order of pole (ratio test) Not computed"
"NO REAL POLE (three term test) for Equation 1"
"NO COMPLEX POLE (six term test) for Equation 1"
" "
"TOP MAIN SOLVE Loop"
x[1] = -1.3500000000000634 " "
y[1] (analytic) = -11.445367843513218 " "
y[1] (numeric) = -11.445367843513129 " "
absolute error = 8.88178419700125200000000000000E-14 " "
relative error = 7.7601561770992770000000000000E-13 "%"
Correct digits = 16
h = 1.00E-2 " "
"NO INFO (given) for Equation 1"
Radius of convergence (ratio test) for eq 1 = 190.0041174739053 " "
"Order of pole (ratio test) Not computed"
"NO REAL POLE (three term test) for Equation 1"
"NO COMPLEX POLE (six term test) for Equation 1"
" "
"TOP MAIN SOLVE Loop"
x[1] = -1.3400000000000634 " "
y[1] (analytic) = -11.433928196446544 " "
y[1] (numeric) = -11.433928196446454 " "
absolute error = 9.05941988094127700000000000000E-14 " "
relative error = 7.9232786189411080000000000000E-13 "%"
Correct digits = 16
h = 1.00E-2 " "
"NO INFO (given) for Equation 1"
Radius of convergence (ratio test) for eq 1 = 190.00472030275697 " "
"Order of pole (ratio test) Not computed"
"NO REAL POLE (three term test) for Equation 1"
"NO COMPLEX POLE (six term test) for Equation 1"
" "
"TOP MAIN SOLVE Loop"
x[1] = -1.3300000000000634 " "
y[1] (analytic) = -11.422499983309013 " "
y[1] (numeric) = -11.422499983308928 " "
absolute error = 8.52651282912120200000000000000E-14 " "
relative error = 7.4646643393131660000000000000E-13 "%"
Correct digits = 16
h = 1.00E-2 " "
"NO INFO (given) for Equation 1"
Radius of convergence (ratio test) for eq 1 = 189.99432441057078 " "
"Order of pole (ratio test) Not computed"
"NO REAL POLE (three term test) for Equation 1"
"NO COMPLEX POLE (six term test) for Equation 1"
" "
"TOP MAIN SOLVE Loop"
x[1] = -1.3200000000000633 " "
y[1] (analytic) = -11.411083192672422 " "
y[1] (numeric) = -11.411083192672336 " "
absolute error = 8.52651282912120200000000000000E-14 " "
relative error = 7.472132737229070000000000000E-13 "%"
Correct digits = 16
h = 1.00E-2 " "
"NO INFO (given) for Equation 1"
Radius of convergence (ratio test) for eq 1 = 190.00411093217338 " "
"Order of pole (ratio test) Not computed"
"NO REAL POLE (three term test) for Equation 1"
"NO COMPLEX POLE (six term test) for Equation 1"
" "
"TOP MAIN SOLVE Loop"
x[1] = -1.3100000000000633 " "
y[1] (analytic) = -11.399677813119975 " "
y[1] (numeric) = -11.399677813119888 " "
absolute error = 8.70414851306122700000000000000E-14 " "
relative error = 7.6354337865966330000000000000E-13 "%"
Correct digits = 16
h = 1.00E-2 " "
"NO INFO (given) for Equation 1"
Radius of convergence (ratio test) for eq 1 = 189.9957249027915 " "
"Order of pole (ratio test) Not computed"
Radius of convergence (three term test) for eq 1 = 6.021476689788776 " "
Order of pole (three term test) = -17.299142709886052 " "
Radius of convergence (six term test) for eq 1 = 11.427006373492928 " "
Order of pole (six term test) = -11.626459634019312 " "
" "
"TOP MAIN SOLVE Loop"
x[1] = -1.3000000000000633 " "
y[1] (analytic) = -11.388283833246291 " "
y[1] (numeric) = -11.388283833246204 " "
absolute error = 8.70414851306122700000000000000E-14 " "
relative error = 7.6430730393730120000000000000E-13 "%"
Correct digits = 16
h = 1.00E-2 " "
"NO INFO (given) for Equation 1"
Radius of convergence (ratio test) for eq 1 = 189.98915645490945 " "
"Order of pole (ratio test) Not computed"
"NO REAL POLE (three term test) for Equation 1"
"NO COMPLEX POLE (six term test) for Equation 1"
" "
"TOP MAIN SOLVE Loop"
x[1] = -1.2900000000000633 " "
y[1] (analytic) = -11.376901241657388 " "
y[1] (numeric) = -11.3769012416573 " "
absolute error = 8.70414851306122700000000000000E-14 " "
relative error = 7.650719935223069000000000000E-13 "%"
Correct digits = 16
h = 1.00E-2 " "
"NO INFO (given) for Equation 1"
Radius of convergence (ratio test) for eq 1 = 189.9975298257312 " "
"Order of pole (ratio test) Not computed"
Radius of convergence (three term test) for eq 1 = 10.046166755669205 " "
Order of pole (three term test) = -28.2000667685119 " "
Radius of convergence (six term test) for eq 1 = 9.176015391977892 " "
Order of pole (six term test) = -10.942985541114226 " "
" "
"TOP MAIN SOLVE Loop"
x[1] = -1.2800000000000633 " "
y[1] (analytic) = -11.365530026970676 " "
y[1] (numeric) = -11.365530026970587 " "
absolute error = 8.88178419700125200000000000000E-14 " "
relative error = 7.8146678385649990000000000000E-13 "%"
Correct digits = 16
h = 1.00E-2 " "
"NO INFO (given) for Equation 1"
Radius of convergence (ratio test) for eq 1 = 190.00026069509164 " "
"Order of pole (ratio test) Not computed"
"NO REAL POLE (three term test) for Equation 1"
"NO COMPLEX POLE (six term test) for Equation 1"
" "
"TOP MAIN SOLVE Loop"
x[1] = -1.2700000000000633 " "
y[1] (analytic) = -11.354170177814936 " "
y[1] (numeric) = -11.354170177814849 " "
absolute error = 8.70414851306122700000000000000E-14 " "
relative error = 7.6660366867394490000000000000E-13 "%"
Correct digits = 16
h = 1.00E-2 " "
"NO INFO (given) for Equation 1"
Radius of convergence (ratio test) for eq 1 = 189.9937202400075 " "
"Order of pole (ratio test) Not computed"
Radius of convergence (three term test) for eq 1 = 213.65417576584954 " "
Order of pole (three term test) = -641.8304689983071 " "
"NO COMPLEX POLE (six term test) for Equation 1"
" "
"TOP MAIN SOLVE Loop"
x[1] = -1.2600000000000633 " "
y[1] (analytic) = -11.342821682830323 " "
y[1] (numeric) = -11.342821682830234 " "
absolute error = 8.88178419700125200000000000000E-14 " "
relative error = 7.8303128140025750000000000000E-13 "%"
Correct digits = 16
h = 1.00E-2 " "
"NO INFO (given) for Equation 1"
Radius of convergence (ratio test) for eq 1 = 189.99981783170819 " "
"Order of pole (ratio test) Not computed"
"NO REAL POLE (three term test) for Equation 1"
"NO COMPLEX POLE (six term test) for Equation 1"
" "
"TOP MAIN SOLVE Loop"
x[1] = -1.2500000000000633 " "
y[1] (analytic) = -11.331484530668334 " "
y[1] (numeric) = -11.331484530668247 " "
absolute error = 8.70414851306122700000000000000E-14 " "
relative error = 7.6813841024127970000000000000E-13 "%"
Correct digits = 16
h = 1.00E-2 " "
"NO INFO (given) for Equation 1"
Radius of convergence (ratio test) for eq 1 = 190.00131291897455 " "
"Order of pole (ratio test) Not computed"
"NO REAL POLE (three term test) for Equation 1"
"NO COMPLEX POLE (six term test) for Equation 1"
" "
"TOP MAIN SOLVE Loop"
x[1] = -1.2400000000000633 " "
y[1] (analytic) = -11.320158709991823 " "
y[1] (numeric) = -11.320158709991736 " "
absolute error = 8.70414851306122700000000000000E-14 " "
relative error = 7.6890693284878110000000000000E-13 "%"
Correct digits = 16
h = 1.00E-2 " "
"NO INFO (given) for Equation 1"
Radius of convergence (ratio test) for eq 1 = 189.99305400178253 " "
"Order of pole (ratio test) Not computed"
"NO REAL POLE (three term test) for Equation 1"
"NO COMPLEX POLE (six term test) for Equation 1"
" "
"TOP MAIN SOLVE Loop"
x[1] = -1.2300000000000633 " "
y[1] (analytic) = -11.308844209474964 " "
y[1] (numeric) = -11.308844209474877 " "
absolute error = 8.70414851306122700000000000000E-14 " "
relative error = 7.6967622436327950000000000000E-13 "%"
Correct digits = 16
h = 1.00E-2 " "
"NO INFO (given) for Equation 1"
Radius of convergence (ratio test) for eq 1 = 189.99017866041152 " "
"Order of pole (ratio test) Not computed"
"NO REAL POLE (three term test) for Equation 1"
"NO COMPLEX POLE (six term test) for Equation 1"
" "
"TOP MAIN SOLVE Loop"
x[1] = -1.2200000000000633 " "
y[1] (analytic) = -11.297541017803258 " "
y[1] (numeric) = -11.297541017803171 " "
absolute error = 8.70414851306122700000000000000E-14 " "
relative error = 7.7044628555406640000000000000E-13 "%"
Correct digits = 16
h = 1.00E-2 " "
"NO INFO (given) for Equation 1"
Radius of convergence (ratio test) for eq 1 = 190.01889610204518 " "
"Order of pole (ratio test) Not computed"
Radius of convergence (three term test) for eq 1 = 1.6881120195408963 " "
Order of pole (three term test) = -46.89784895599304 " "
"NO COMPLEX POLE (six term test) for Equation 1"
" "
"TOP MAIN SOLVE Loop"
x[1] = -1.2100000000000632 " "
y[1] (analytic) = -11.28624912367351 " "
y[1] (numeric) = -11.286249123673423 " "
absolute error = 8.70414851306122700000000000000E-14 " "
relative error = 7.7121711719120310000000000000E-13 "%"
Correct digits = 16
h = 1.00E-2 " "
"NO INFO (given) for Equation 1"
Radius of convergence (ratio test) for eq 1 = 189.99973484885183 " "
"Order of pole (ratio test) Not computed"
"NO REAL POLE (three term test) for Equation 1"
"NO COMPLEX POLE (six term test) for Equation 1"
" "
"TOP MAIN SOLVE Loop"
x[1] = -1.2000000000000632 " "
y[1] (analytic) = -11.274968515793828 " "
y[1] (numeric) = -11.27496851579374 " "
absolute error = 8.88178419700125200000000000000E-14 " "
relative error = 7.8774359188318490000000000000E-13 "%"
Correct digits = 16
h = 1.00E-2 " "
"NO INFO (given) for Equation 1"
Radius of convergence (ratio test) for eq 1 = 189.9936742019195 " "
"Order of pole (ratio test) Not computed"
Radius of convergence (three term test) for eq 1 = 2.4883327530565538 " "
Order of pole (three term test) = -5.208802630123605 " "
Radius of convergence (six term test) for eq 1 = 22.832992704267294 " "
Order of pole (six term test) = -11.80738007981326 " "
" "
"TOP MAIN SOLVE Loop"
x[1] = -1.1900000000000632 " "
y[1] (analytic) = -11.2636991828836 " "
y[1] (numeric) = -11.263699182883512 " "
absolute error = 8.88178419700125200000000000000E-14 " "
relative error = 7.8853172947818750000000000000E-13 "%"
Correct digits = 16
h = 1.00E-2 " "
"NO INFO (given) for Equation 1"
Radius of convergence (ratio test) for eq 1 = 190.0111530141349 " "
"Order of pole (ratio test) Not computed"
"NO REAL POLE (three term test) for Equation 1"
"NO COMPLEX POLE (six term test) for Equation 1"
" "
"TOP MAIN SOLVE Loop"
x[1] = -1.1800000000000632 " "
y[1] (analytic) = -11.252441113673495 " "
y[1] (numeric) = -11.252441113673406 " "
absolute error = 8.88178419700125200000000000000E-14 " "
relative error = 7.8932065560498520000000000000E-13 "%"
Correct digits = 16
h = 1.00E-2 " "
"NO INFO (given) for Equation 1"
Radius of convergence (ratio test) for eq 1 = 189.9953498726416 " "
"Order of pole (ratio test) Not computed"
"NO REAL POLE (three term test) for Equation 1"
"NO COMPLEX POLE (six term test) for Equation 1"
" "
"TOP MAIN SOLVE Loop"
x[1] = -1.1700000000000632 " "
y[1] (analytic) = -11.241194296905439 " "
y[1] (numeric) = -11.241194296905352 " "
absolute error = 8.70414851306122700000000000000E-14 " "
relative error = 7.7430816363145430000000000000E-13 "%"
Correct digits = 16
h = 1.00E-2 " "
"NO INFO (given) for Equation 1"
Radius of convergence (ratio test) for eq 1 = 189.9899697523311 " "
"Order of pole (ratio test) Not computed"
"NO REAL POLE (three term test) for Equation 1"
"NO COMPLEX POLE (six term test) for Equation 1"
" "
"TOP MAIN SOLVE Loop"
x[1] = -1.1600000000000632 " "
y[1] (analytic) = -11.229958721332618 " "
y[1] (numeric) = -11.229958721332531 " "
absolute error = 8.70414851306122700000000000000E-14 " "
relative error = 7.7508285907825110000000000000E-13 "%"
Correct digits = 16
h = 1.00E-2 " "
"NO INFO (given) for Equation 1"
Radius of convergence (ratio test) for eq 1 = 189.99790342669095 " "
"Order of pole (ratio test) Not computed"
Radius of convergence (three term test) for eq 1 = 0.6727969178046721 " "
Order of pole (three term test) = -1.4787822709136613 " "
Radius of convergence (six term test) for eq 1 = 18.744871797764876 " "
Order of pole (six term test) = -12.029089076773328 " "
"Finished!"
"Maximum Time Reached before Solution Completed!"
"diff ( y , x , 1 ) = exp(0.1 * x) / exp(0.2 * x);"
Iterations = 385
"Total Elapsed Time "= 0 Years 0 Days 0 Hours 3 Minutes 1 Seconds
"Elapsed Time(since restart) "= 0 Years 0 Days 0 Hours 2 Minutes 56 Seconds
"Expected Time Remaining "= 0 Years 0 Days 0 Hours 4 Minutes 48 Seconds
"Optimized Time Remaining "= 0 Years 0 Days 0 Hours 4 Minutes 40 Seconds
"Expected Total Time "= 0 Years 0 Days 0 Hours 7 Minutes 41 Seconds
"Time to Timeout " Unknown
Percent Done = 38.59999999999937 "%"
(%o58) true
(%o58) diffeq.max