|\^/| Maple 2016 (X86 64 LINUX)
._|\| |/|_. Copyright (c) Maplesoft, a division of Waterloo Maple Inc. 2016
\ MAPLE / All rights reserved. Maple is a trademark of
<____ ____> Waterloo Maple Inc.
| Type ? for help.
#BEGIN OUTFILE1
# before write maple top matter
# before write_ats library and user def block
#BEGIN ATS LIBRARY BLOCK
# Begin Function number 2
> omniout_str := proc(iolevel,str)
> global glob_iolevel;
> if (glob_iolevel >= iolevel) then # if number 1
> printf("%s\n",str);
> fi;# end if 1;
> end;
omniout_str := proc(iolevel, str)
global glob_iolevel;
if iolevel <= glob_iolevel then printf("%s\n", str) end if
end proc
# End Function number 2
# Begin Function number 3
> omniout_str_noeol := proc(iolevel,str)
> global glob_iolevel;
> if (glob_iolevel >= iolevel) then # if number 1
> printf("%s",str);
> fi;# end if 1;
> end;
omniout_str_noeol := proc(iolevel, str)
global glob_iolevel;
if iolevel <= glob_iolevel then printf("%s", str) end if
end proc
# End Function number 3
# Begin Function number 4
> omniout_labstr := proc(iolevel,label,str)
> global glob_iolevel;
> if (glob_iolevel >= iolevel) then # if number 1
> print(label,str);
> fi;# end if 1;
> end;
omniout_labstr := proc(iolevel, label, str)
global glob_iolevel;
if iolevel <= glob_iolevel then print(label, str) end if
end proc
# End Function number 4
# Begin Function number 5
> omniout_float := proc(iolevel,prelabel,prelen,value,vallen,postlabel)
> global glob_iolevel;
> if (glob_iolevel >= iolevel) then # if number 1
> if vallen = 4 then
> printf("%-30s = %-42.4g %s \n",prelabel,value, postlabel);
> else
> printf("%-30s = %-42.32g %s \n",prelabel,value, postlabel);
> fi;# end if 1;
> fi;# end if 0;
> end;
omniout_float := proc(iolevel, prelabel, prelen, value, vallen, postlabel)
global glob_iolevel;
if iolevel <= glob_iolevel then
if vallen = 4 then
printf("%-30s = %-42.4g %s \n", prelabel, value, postlabel)
else printf("%-30s = %-42.32g %s \n", prelabel, value, postlabel)
end if
end if
end proc
# End Function number 5
# Begin Function number 6
> omniout_complex := proc(iolevel,prelabel,prelen,value,vallen,postlabel)
> global glob_iolevel;
> if (glob_iolevel >= iolevel) then # if number 0
> if vallen = 4 then
> printf("%-30s = %-20.4g %-20g %s \n",prelabel,Re(value), Im(value), postlabel);
> else
> printf("%-30s = %-20.12g %-20.12g %s \n",prelabel,Re(value),Im(value), postlabel);
> fi;# end if 0;
> fi;# end if -1;
> end;
omniout_complex := proc(iolevel, prelabel, prelen, value, vallen, postlabel)
global glob_iolevel;
if iolevel <= glob_iolevel then
if vallen = 4 then printf("%-30s = %-20.4g %-20g %s \n", prelabel,
Re(value), Im(value), postlabel)
else printf("%-30s = %-20.12g %-20.12g %s \n", prelabel, Re(value),
Im(value), postlabel)
end if
end if
end proc
# End Function number 6
# Begin Function number 7
> omniout_int := proc(iolevel,prelabel,prelen,value,vallen,postlabel)
> global glob_iolevel;
> if (glob_iolevel >= iolevel) then # if number -1
> if vallen = 5 then # if number 0
> printf("%-30s = %-32d %s\n",prelabel,value, postlabel);
> else
> printf("%-30s = %-32d %s \n",prelabel,value, postlabel);
> fi;# end if 0;
> fi;# end if -1;
> end;
omniout_int := proc(iolevel, prelabel, prelen, value, vallen, postlabel)
global glob_iolevel;
if iolevel <= glob_iolevel then
if vallen = 5 then
printf("%-30s = %-32d %s\n", prelabel, value, postlabel)
else printf("%-30s = %-32d %s \n", prelabel, value, postlabel)
end if
end if
end proc
# End Function number 7
# Begin Function number 8
> logitem_time := proc(fd,secs_in)
> global glob_sec_in_day, glob_sec_in_hour, glob_sec_in_minute, glob_sec_in_year;
> local days_int, hours_int,minutes_int, sec_int, sec_temp, years_int;
> fprintf(fd,"
");
> if (secs_in >= 0) then # if number -1
> years_int := int_trunc(secs_in / glob_sec_in_year);
> sec_temp := int_trunc(secs_in) mod int_trunc(glob_sec_in_year);
> days_int := int_trunc(sec_temp / glob_sec_in_day) ;
> sec_temp := sec_temp mod int_trunc(glob_sec_in_day) ;
> hours_int := int_trunc(sec_temp / glob_sec_in_hour);
> sec_temp := sec_temp mod int_trunc(glob_sec_in_hour);
> minutes_int := int_trunc(sec_temp / glob_sec_in_minute);
> sec_int := sec_temp mod int_trunc(glob_sec_in_minute);
> if (years_int > 0) then # if number 0
> fprintf(fd,"%d Years %d Days %d Hours %d Minutes %d Seconds",years_int,days_int,hours_int,minutes_int,sec_int);
> elif
> (days_int > 0) then # if number 1
> fprintf(fd,"%d Days %d Hours %d Minutes %d Seconds",days_int,hours_int,minutes_int,sec_int);
> elif
> (hours_int > 0) then # if number 2
> fprintf(fd,"%d Hours %d Minutes %d Seconds",hours_int,minutes_int,sec_int);
> elif
> (minutes_int > 0) then # if number 3
> fprintf(fd,"%d Minutes %d Seconds",minutes_int,sec_int);
> else
> fprintf(fd,"%d Seconds",sec_int);
> fi;# end if 3
> else
> fprintf(fd," 0.0 Seconds");
> fi;# end if 2
> fprintf(fd," | \n");
> end;
logitem_time := proc(fd, secs_in)
local days_int, hours_int, minutes_int, sec_int, sec_temp, years_int;
global
glob_sec_in_day, glob_sec_in_hour, glob_sec_in_minute, glob_sec_in_year;
fprintf(fd, "");
if 0 <= secs_in then
years_int := int_trunc(secs_in/glob_sec_in_year);
sec_temp := int_trunc(secs_in) mod int_trunc(glob_sec_in_year);
days_int := int_trunc(sec_temp/glob_sec_in_day);
sec_temp := sec_temp mod int_trunc(glob_sec_in_day);
hours_int := int_trunc(sec_temp/glob_sec_in_hour);
sec_temp := sec_temp mod int_trunc(glob_sec_in_hour);
minutes_int := int_trunc(sec_temp/glob_sec_in_minute);
sec_int := sec_temp mod int_trunc(glob_sec_in_minute);
if 0 < years_int then fprintf(fd,
"%d Years %d Days %d Hours %d Minutes %d Seconds", years_int,
days_int, hours_int, minutes_int, sec_int)
elif 0 < days_int then fprintf(fd,
"%d Days %d Hours %d Minutes %d Seconds", days_int, hours_int,
minutes_int, sec_int)
elif 0 < hours_int then fprintf(fd,
"%d Hours %d Minutes %d Seconds", hours_int, minutes_int,
sec_int)
elif 0 < minutes_int then
fprintf(fd, "%d Minutes %d Seconds", minutes_int, sec_int)
else fprintf(fd, "%d Seconds", sec_int)
end if
else fprintf(fd, " 0.0 Seconds")
end if;
fprintf(fd, " | \n")
end proc
# End Function number 8
# Begin Function number 9
> omniout_timestr := proc(secs_in)
> global glob_sec_in_day, glob_sec_in_hour, glob_sec_in_minute, glob_sec_in_year;
> local days_int, hours_int,minutes_int, sec_int, sec_temp, years_int;
> if (secs_in >= 0) then # if number 2
> years_int := int_trunc(secs_in / glob_sec_in_year);
> sec_temp := (int_trunc(secs_in) mod int_trunc(glob_sec_in_year));
> days_int := int_trunc(sec_temp / glob_sec_in_day) ;
> sec_temp := (sec_temp mod int_trunc(glob_sec_in_day)) ;
> hours_int := int_trunc(sec_temp / glob_sec_in_hour);
> sec_temp := (sec_temp mod int_trunc(glob_sec_in_hour));
> minutes_int := int_trunc(sec_temp / glob_sec_in_minute);
> sec_int := (sec_temp mod int_trunc(glob_sec_in_minute));
> if (years_int > 0) then # if number 3
> printf(" = %d Years %d Days %d Hours %d Minutes %d Seconds\n",years_int,days_int,hours_int,minutes_int,sec_int);
> elif
> (days_int > 0) then # if number 4
> printf(" = %d Days %d Hours %d Minutes %d Seconds\n",days_int,hours_int,minutes_int,sec_int);
> elif
> (hours_int > 0) then # if number 5
> printf(" = %d Hours %d Minutes %d Seconds\n",hours_int,minutes_int,sec_int);
> elif
> (minutes_int > 0) then # if number 6
> printf(" = %d Minutes %d Seconds\n",minutes_int,sec_int);
> else
> printf(" = %d Seconds\n",sec_int);
> fi;# end if 6
> else
> printf(" 0.0 Seconds\n");
> fi;# end if 5
> end;
omniout_timestr := proc(secs_in)
local days_int, hours_int, minutes_int, sec_int, sec_temp, years_int;
global
glob_sec_in_day, glob_sec_in_hour, glob_sec_in_minute, glob_sec_in_year;
if 0 <= secs_in then
years_int := int_trunc(secs_in/glob_sec_in_year);
sec_temp := int_trunc(secs_in) mod int_trunc(glob_sec_in_year);
days_int := int_trunc(sec_temp/glob_sec_in_day);
sec_temp := sec_temp mod int_trunc(glob_sec_in_day);
hours_int := int_trunc(sec_temp/glob_sec_in_hour);
sec_temp := sec_temp mod int_trunc(glob_sec_in_hour);
minutes_int := int_trunc(sec_temp/glob_sec_in_minute);
sec_int := sec_temp mod int_trunc(glob_sec_in_minute);
if 0 < years_int then printf(
" = %d Years %d Days %d Hours %d Minutes %d Seconds\n",
years_int, days_int, hours_int, minutes_int, sec_int)
elif 0 < days_int then printf(
" = %d Days %d Hours %d Minutes %d Seconds\n", days_int,
hours_int, minutes_int, sec_int)
elif 0 < hours_int then printf(
" = %d Hours %d Minutes %d Seconds\n", hours_int, minutes_int,
sec_int)
elif 0 < minutes_int then
printf(" = %d Minutes %d Seconds\n", minutes_int, sec_int)
else printf(" = %d Seconds\n", sec_int)
end if
else printf(" 0.0 Seconds\n")
end if
end proc
# End Function number 9
# Begin Function number 10
> zero_ats_ar := proc(arr_a)
> global ATS_MAX_TERMS;
> local iii;
> iii := 1;
> while (iii <= ATS_MAX_TERMS) do # do number 1
> arr_a [iii] := glob__0;
> iii := iii + 1;
> od;# end do number 1
> end;
zero_ats_ar := proc(arr_a)
local iii;
global ATS_MAX_TERMS;
iii := 1;
while iii <= ATS_MAX_TERMS do arr_a[iii] := glob__0; iii := iii + 1
end do
end proc
# End Function number 10
# Begin Function number 11
> ats := proc(mmm_ats,arr_a,arr_b,jjj_ats)
> global ATS_MAX_TERMS;
> local iii_ats, lll_ats,ma_ats, ret_ats;
> ret_ats := glob__0;
> if (jjj_ats <= mmm_ats) then # if number 5
> ma_ats := mmm_ats + 1;
> iii_ats := jjj_ats;
> while (iii_ats <= mmm_ats) do # do number 1
> lll_ats := ma_ats - iii_ats;
> if ((lll_ats <= ATS_MAX_TERMS and (iii_ats <= ATS_MAX_TERMS) )) then # if number 6
> ret_ats := ret_ats + c(arr_a[iii_ats])*c(arr_b[lll_ats]);
> fi;# end if 6;
> iii_ats := iii_ats + 1;
> od;# end do number 1
> fi;# end if 5;
> ret_ats;
> end;
ats := proc(mmm_ats, arr_a, arr_b, jjj_ats)
local iii_ats, lll_ats, ma_ats, ret_ats;
global ATS_MAX_TERMS;
ret_ats := glob__0;
if jjj_ats <= mmm_ats then
ma_ats := mmm_ats + 1;
iii_ats := jjj_ats;
while iii_ats <= mmm_ats do
lll_ats := ma_ats - iii_ats;
if lll_ats <= ATS_MAX_TERMS and iii_ats <= ATS_MAX_TERMS then
ret_ats := ret_ats + c(arr_a[iii_ats])*c(arr_b[lll_ats])
end if;
iii_ats := iii_ats + 1
end do
end if;
ret_ats
end proc
# End Function number 11
# Begin Function number 12
> att := proc(mmm_att,arr_aa,arr_bb,jjj_att)
> global ATS_MAX_TERMS;
> local al_att, iii_att,lll_att, ma_att, ret_att;
> ret_att := glob__0;
> if (jjj_att < mmm_att) then # if number 5
> ma_att := mmm_att + 2;
> iii_att := jjj_att;
> while ((iii_att < mmm_att) and (iii_att <= ATS_MAX_TERMS) ) do # do number 1
> lll_att := ma_att - iii_att;
> al_att := (lll_att - 1);
> if ((lll_att <= ATS_MAX_TERMS and (iii_att <= ATS_MAX_TERMS) )) then # if number 6
> ret_att := ret_att + c(arr_aa[iii_att])*c(arr_bb[lll_att])* c(al_att);
> fi;# end if 6;
> iii_att := iii_att + 1;
> od;# end do number 1;
> ret_att := ret_att / c(mmm_att) ;
> fi;# end if 5;
> ret_att;
> end;
att := proc(mmm_att, arr_aa, arr_bb, jjj_att)
local al_att, iii_att, lll_att, ma_att, ret_att;
global ATS_MAX_TERMS;
ret_att := glob__0;
if jjj_att < mmm_att then
ma_att := mmm_att + 2;
iii_att := jjj_att;
while iii_att < mmm_att and iii_att <= ATS_MAX_TERMS do
lll_att := ma_att - iii_att;
al_att := lll_att - 1;
if lll_att <= ATS_MAX_TERMS and iii_att <= ATS_MAX_TERMS then
ret_att :=
ret_att + c(arr_aa[iii_att])*c(arr_bb[lll_att])*c(al_att)
end if;
iii_att := iii_att + 1
end do;
ret_att := ret_att/c(mmm_att)
end if;
ret_att
end proc
# End Function number 12
# Begin Function number 13
> logditto := proc(file)
> fprintf(file,"");
> fprintf(file,"ditto");
> fprintf(file," | ");
> end;
logditto := proc(file)
fprintf(file, ""); fprintf(file, "ditto"); fprintf(file, " | ")
end proc
# End Function number 13
# Begin Function number 14
> logitem_integer := proc(file,n)
> fprintf(file,"");
> fprintf(file,"%d",n);
> fprintf(file," | ");
> end;
logitem_integer := proc(file, n)
fprintf(file, ""); fprintf(file, "%d", n); fprintf(file, " | ")
end proc
# End Function number 14
# Begin Function number 15
> logitem_str := proc(file,str)
> fprintf(file,"");
> fprintf(file,str);
> fprintf(file," | ");
> end;
logitem_str := proc(file, str)
fprintf(file, ""); fprintf(file, str); fprintf(file, " | ")
end proc
# End Function number 15
# Begin Function number 16
> logitem_good_digits := proc(file,rel_error)
> global glob_small_float,glob_prec;
> local good_digits;
> fprintf(file,"");
> fprintf(file,"%d",glob_min_good_digits);
> fprintf(file," | ");
> end;
logitem_good_digits := proc(file, rel_error)
local good_digits;
global glob_small_float, glob_prec;
fprintf(file, "");
fprintf(file, "%d", glob_min_good_digits);
fprintf(file, " | ")
end proc
# End Function number 16
# Begin Function number 17
> log_revs := proc(file,revs)
> fprintf(file,revs);
> end;
log_revs := proc(file, revs) fprintf(file, revs) end proc
# End Function number 17
# Begin Function number 18
> logitem_float := proc(file,x)
> fprintf(file,"");
> fprintf(file,"%g",x);
> fprintf(file," | ");
> end;
logitem_float := proc(file, x)
fprintf(file, ""); fprintf(file, "%g", x); fprintf(file, " | ")
end proc
# End Function number 18
# Begin Function number 19
> logitem_complex := proc(file,x)
> fprintf(file,"");
> fprintf(file,"%g + %g I",Re(x),Im(x));
> fprintf(file," | ");
> end;
logitem_complex := proc(file, x)
fprintf(file, "");
fprintf(file, "%g + %g I", Re(x), Im(x));
fprintf(file, " | ")
end proc
# End Function number 19
# Begin Function number 20
> logitem_h_reason := proc(file)
> global glob_h_reason;
> fprintf(file,"");
> if (glob_h_reason = 1) then # if number 5
> fprintf(file,"Max H");
> elif
> (glob_h_reason = 2) then # if number 6
> fprintf(file,"Display Interval");
> elif
> (glob_h_reason = 3) then # if number 7
> fprintf(file,"Optimal");
> elif
> (glob_h_reason = 4) then # if number 8
> fprintf(file,"Pole Accuracy");
> elif
> (glob_h_reason = 5) then # if number 9
> fprintf(file,"Min H (Pole)");
> elif
> (glob_h_reason = 6) then # if number 10
> fprintf(file,"Pole");
> elif
> (glob_h_reason = 7) then # if number 11
> fprintf(file,"Opt Iter");
> else
> fprintf(file,"Impossible");
> fi;# end if 11
> fprintf(file," | ");
> end;
logitem_h_reason := proc(file)
global glob_h_reason;
fprintf(file, "");
if glob_h_reason = 1 then fprintf(file, "Max H")
elif glob_h_reason = 2 then fprintf(file, "Display Interval")
elif glob_h_reason = 3 then fprintf(file, "Optimal")
elif glob_h_reason = 4 then fprintf(file, "Pole Accuracy")
elif glob_h_reason = 5 then fprintf(file, "Min H (Pole)")
elif glob_h_reason = 6 then fprintf(file, "Pole")
elif glob_h_reason = 7 then fprintf(file, "Opt Iter")
else fprintf(file, "Impossible")
end if;
fprintf(file, " | ")
end proc
# End Function number 20
# Begin Function number 21
> logstart := proc(file)
> fprintf(file,"");
> end;
logstart := proc(file) fprintf(file, "
") end proc
# End Function number 21
# Begin Function number 22
> logend := proc(file)
> fprintf(file,"
\n");
> end;
logend := proc(file) fprintf(file, "\n") end proc
# End Function number 22
# Begin Function number 23
> chk_data := proc()
> global glob_max_iter,ALWAYS, ATS_MAX_TERMS;
> local errflag;
> errflag := false;
> if (glob_max_iter < 2) then # if number 11
> omniout_str(ALWAYS,"Illegal max_iter");
> errflag := true;
> fi;# end if 11;
> if (errflag) then # if number 11
> quit;
> fi;# end if 11
> end;
chk_data := proc()
local errflag;
global glob_max_iter, ALWAYS, ATS_MAX_TERMS;
errflag := false;
if glob_max_iter < 2 then
omniout_str(ALWAYS, "Illegal max_iter"); errflag := true
end if;
if errflag then quit end if
end proc
# End Function number 23
# Begin Function number 24
> comp_expect_sec := proc(t_end2,t_start2,t2,clock_sec2)
> global glob_small_float;
> local ms2, rrr, sec_left, sub1, sub2;
> ;
> ms2 := c(clock_sec2);
> sub1 := c(t_end2-t_start2);
> sub2 := c(t2-t_start2);
> if (sub1 = glob__0) then # if number 11
> sec_left := glob__0;
> else
> if (sub2 > glob__0) then # if number 12
> rrr := (sub1/sub2);
> sec_left := rrr * c(ms2) - c(ms2);
> else
> sec_left := glob__0;
> fi;# end if 12
> fi;# end if 11;
> sec_left;
> end;
comp_expect_sec := proc(t_end2, t_start2, t2, clock_sec2)
local ms2, rrr, sec_left, sub1, sub2;
global glob_small_float;
ms2 := c(clock_sec2);
sub1 := c(t_end2 - t_start2);
sub2 := c(t2 - t_start2);
if sub1 = glob__0 then sec_left := glob__0
else
if glob__0 < sub2 then
rrr := sub1/sub2; sec_left := rrr*c(ms2) - c(ms2)
else sec_left := glob__0
end if
end if;
sec_left
end proc
# End Function number 24
# Begin Function number 25
> comp_percent := proc(t_end2,t_start2, t2)
> global glob_small_float;
> local rrr, sub1, sub2;
> sub1 := (t_end2-t_start2);
> sub2 := (t2-t_start2);
> if (sub2 > glob_small_float) then # if number 11
> rrr := (glob__100*sub2)/sub1;
> else
> rrr := 0.0;
> fi;# end if 11;
> rrr;
> end;
comp_percent := proc(t_end2, t_start2, t2)
local rrr, sub1, sub2;
global glob_small_float;
sub1 := t_end2 - t_start2;
sub2 := t2 - t_start2;
if glob_small_float < sub2 then rrr := glob__100*sub2/sub1
else rrr := 0.
end if;
rrr
end proc
# End Function number 25
# Begin Function number 26
> comp_rad_from_ratio := proc(term1,term2,last_no)
> #TOP TWO TERM RADIUS ANALYSIS
> global glob_h,glob_larger_float;
> local ret;
> if (float_abs(term2) > glob__0) then # if number 11
> ret := float_abs(term1 * glob_h / term2);
> else
> ret := glob_larger_float;
> fi;# end if 11;
> ret;
> #BOTTOM TWO TERM RADIUS ANALYSIS
> end;
comp_rad_from_ratio := proc(term1, term2, last_no)
local ret;
global glob_h, glob_larger_float;
if glob__0 < float_abs(term2) then ret := float_abs(term1*glob_h/term2)
else ret := glob_larger_float
end if;
ret
end proc
# End Function number 26
# Begin Function number 27
> comp_ord_from_ratio := proc(term1,term2,last_no)
> #TOP TWO TERM ORDER ANALYSIS
> global glob_h,glob_larger_float;
> local ret;
> if (float_abs(term2) > glob__0) then # if number 11
> ret := glob__1 + float_abs(term2) * c(last_no) * ln(float_abs(term1 * glob_h / term2))/ln(c(last_no));
> else
> ret := glob_larger_float;
> fi;# end if 11;
> ret;
> #BOTTOM TWO TERM ORDER ANALYSIS
> end;
comp_ord_from_ratio := proc(term1, term2, last_no)
local ret;
global glob_h, glob_larger_float;
if glob__0 < float_abs(term2) then ret := glob__1 + float_abs(term2)*
c(last_no)*ln(float_abs(term1*glob_h/term2))/ln(c(last_no))
else ret := glob_larger_float
end if;
ret
end proc
# End Function number 27
# Begin Function number 28
> c := proc(in_val)
> #To Force Conversion when needed
> local ret;
> ret := evalc(in_val);
> ret;
> #End Conversion
> end;
c := proc(in_val) local ret; ret := evalc(in_val); ret end proc
# End Function number 28
# Begin Function number 29
> comp_rad_from_three_terms := proc(term1,term2,term3,last_no)
> #TOP THREE TERM RADIUS ANALYSIS
> global glob_h,glob_larger_float;
> local ret,temp;
> temp := float_abs(term2*term2*c(last_no)+glob__m2*term2*term2-term1*term3*c(last_no)+term1*term3);
> if (float_abs(temp) > glob__0) then # if number 11
> ret := float_abs((term2*glob_h*term1)/(temp));
> else
> ret := glob_larger_float;
> fi;# end if 11;
> ret;
> #BOTTOM THREE TERM RADIUS ANALYSIS
> end;
comp_rad_from_three_terms := proc(term1, term2, term3, last_no)
local ret, temp;
global glob_h, glob_larger_float;
temp := float_abs(term2*term2*c(last_no) + glob__m2*term2*term2
- term1*term3*c(last_no) + term1*term3);
if glob__0 < float_abs(temp) then
ret := float_abs(term2*glob_h*term1/temp)
else ret := glob_larger_float
end if;
ret
end proc
# End Function number 29
# Begin Function number 30
> comp_ord_from_three_terms := proc(term1,term2,term3,last_no)
> #TOP THREE TERM ORDER ANALYSIS
> local ret;
> ret := float_abs((glob__4*term1*term3*c(last_no)-glob__3*term1*term3-glob__4*term2*term2*c(last_no)+glob__4*term2*term2+term2*term2*c(last_no*last_no)-term1*term3*c(last_no*last_no))/(term2*term2*c(last_no)-glob__2*term2*term2-term1*term3*c(last_no)+term1*term3));
> ret;
> #TOP THREE TERM ORDER ANALYSIS
> end;
comp_ord_from_three_terms := proc(term1, term2, term3, last_no)
local ret;
ret := float_abs((glob__4*term1*term3*c(last_no) - glob__3*term1*term3
- glob__4*term2*term2*c(last_no) + glob__4*term2*term2
+ term2*term2*c(last_no*last_no) - term1*term3*c(last_no*last_no))
/(term2*term2*c(last_no) - glob__2*term2*term2
- term1*term3*c(last_no) + term1*term3));
ret
end proc
# End Function number 30
# Begin Function number 31
> comp_rad_from_six_terms := proc(term1,term2,term3,term4,term5,term6,last_no)
> #TOP SIX TERM RADIUS ANALYSIS
> global glob_h,glob_larger_float,glob_six_term_ord_save;
> local ret,rm0,rm1,rm2,rm3,rm4,nr1,nr2,dr1,dr2,ds2,rad_c,ord_no,ds1,rcs;
> if ((term5 <> glob__0) and (term4 <> glob__0) and (term3 <> glob__0) and (term2 <> glob__0) and (term1 <> glob__0)) then # if number 11
> rm0 := term6/term5;
> rm1 := term5/term4;
> rm2 := term4/term3;
> rm3 := term3/term2;
> rm4 := term2/term1;
> nr1 := c(last_no-1)*rm0 - glob__2*c(last_no-2)*rm1 + c(last_no-3)*rm2;
> nr2 := c(last_no-2)*rm1 - glob__2*c(last_no-3)*rm2 + c(last_no-4)*rm3;
> dr1 := glob__m1/rm1 + glob__2/rm2 - glob__1/rm3;
> dr2 := glob__m1/rm2 + glob__2/rm3 - glob__1/rm4;
> ds1 := glob__3/rm1 - glob__8/rm2 + glob__5/rm3;
> ds2 := glob__3/rm2 - glob__8/rm3 + glob__5/rm4;
> if ((float_abs(nr1 * dr2 - nr2 * dr1) = glob__0) or (float_abs(dr1) = glob__0)) then # if number 12
> rad_c := glob_larger_float;
> ord_no := glob_larger_float;
> else
> if (float_abs(nr1*dr2 - nr2 * dr1) > glob__0) then # if number 13
> rcs := ((ds1*dr2 - ds2*dr1 +dr1*dr2)/(nr1*dr2 - nr2 * dr1));
> #(Manuels) rcs := (ds1*dr2 - ds2*dr1)/(nr1*dr2 - nr2 * dr1)
> ord_no := (rcs*nr1 - ds1)/(glob__2*dr1) -c(last_no)/glob__2;
> if (float_abs(rcs) <> glob__0) then # if number 14
> if (rcs > glob__0) then # if number 15
> rad_c := float_abs( sqrt(rcs) * float_abs(glob_h));
> else
> rad_c := glob_larger_float;
> ord_no := glob_larger_float;
> fi;# end if 15
> else
> rad_c := glob_larger_float;
> ord_no := glob_larger_float;
> fi;# end if 14
> else
> rad_c := glob_larger_float;
> ord_no := glob_larger_float;
> fi;# end if 13
> fi;# end if 12
> else
> rad_c := glob_larger_float;
> ord_no := glob_larger_float;
> fi;# end if 11;
> glob_six_term_ord_save := ord_no;
> rad_c;
> #BOTTOM SIX TERM RADIUS ANALYSIS
> end;
comp_rad_from_six_terms := proc(
term1, term2, term3, term4, term5, term6, last_no)
local ret, rm0, rm1, rm2, rm3, rm4, nr1, nr2, dr1, dr2, ds2, rad_c, ord_no,
ds1, rcs;
global glob_h, glob_larger_float, glob_six_term_ord_save;
if term5 <> glob__0 and term4 <> glob__0 and term3 <> glob__0 and
term2 <> glob__0 and term1 <> glob__0 then
rm0 := term6/term5;
rm1 := term5/term4;
rm2 := term4/term3;
rm3 := term3/term2;
rm4 := term2/term1;
nr1 := c(last_no - 1)*rm0 - glob__2*c(last_no - 2)*rm1
+ c(last_no - 3)*rm2;
nr2 := c(last_no - 2)*rm1 - glob__2*c(last_no - 3)*rm2
+ c(last_no - 4)*rm3;
dr1 := glob__m1/rm1 + glob__2/rm2 - glob__1/rm3;
dr2 := glob__m1/rm2 + glob__2/rm3 - glob__1/rm4;
ds1 := glob__3/rm1 - glob__8/rm2 + glob__5/rm3;
ds2 := glob__3/rm2 - glob__8/rm3 + glob__5/rm4;
if
float_abs(nr1*dr2 - nr2*dr1) = glob__0 or float_abs(dr1) = glob__0
then rad_c := glob_larger_float; ord_no := glob_larger_float
else
if glob__0 < float_abs(nr1*dr2 - nr2*dr1) then
rcs := (ds1*dr2 - ds2*dr1 + dr1*dr2)/(nr1*dr2 - nr2*dr1);
ord_no :=
(rcs*nr1 - ds1)/(glob__2*dr1) - c(last_no)/glob__2;
if float_abs(rcs) <> glob__0 then
if glob__0 < rcs then
rad_c := float_abs(sqrt(rcs)*float_abs(glob_h))
else
rad_c := glob_larger_float;
ord_no := glob_larger_float
end if
else
rad_c := glob_larger_float; ord_no := glob_larger_float
end if
else rad_c := glob_larger_float; ord_no := glob_larger_float
end if
end if
else rad_c := glob_larger_float; ord_no := glob_larger_float
end if;
glob_six_term_ord_save := ord_no;
rad_c
end proc
# End Function number 31
# Begin Function number 32
> comp_ord_from_six_terms := proc(term1,term2,term3,term4,term5,term6,last_no)
> global glob_six_term_ord_save;
> #TOP SIX TERM ORDER ANALYSIS
> #TOP SAVED FROM SIX TERM RADIUS ANALYSIS
> glob_six_term_ord_save;
> #BOTTOM SIX TERM ORDER ANALYSIS
> end;
comp_ord_from_six_terms := proc(
term1, term2, term3, term4, term5, term6, last_no)
global glob_six_term_ord_save;
glob_six_term_ord_save
end proc
# End Function number 32
# Begin Function number 33
> factorial_2 := proc(nnn)
> ret := nnn!;
> ret;;
> end;
Warning, `ret` is implicitly declared local to procedure `factorial_2`
factorial_2 := proc(nnn) local ret; ret := nnn!; ret end proc
# End Function number 33
# Begin Function number 34
> factorial_1 := proc(nnn)
> global ATS_MAX_TERMS,array_fact_1;
> local ret;
> if (nnn <= ATS_MAX_TERMS) then # if number 11
> if (array_fact_1[nnn] = 0) then # if number 12
> ret := factorial_2(nnn);
> array_fact_1[nnn] := ret;
> else
> ret := array_fact_1[nnn];
> fi;# end if 12;
> else
> ret := factorial_2(nnn);
> fi;# end if 11;
> ret;
> end;
factorial_1 := proc(nnn)
local ret;
global ATS_MAX_TERMS, array_fact_1;
if nnn <= ATS_MAX_TERMS then
if array_fact_1[nnn] = 0 then
ret := factorial_2(nnn); array_fact_1[nnn] := ret
else ret := array_fact_1[nnn]
end if
else ret := factorial_2(nnn)
end if;
ret
end proc
# End Function number 34
# Begin Function number 35
> factorial_3 := proc(mmm,nnn)
> global ATS_MAX_TERMS,array_fact_2;
> local ret;
> if ((nnn <= ATS_MAX_TERMS) and (mmm <= ATS_MAX_TERMS)) then # if number 11
> if (array_fact_2[mmm,nnn] = 0) then # if number 12
> ret := factorial_1(mmm)/factorial_1(nnn);
> array_fact_2[mmm,nnn] := ret;
> else
> ret := array_fact_2[mmm,nnn];
> fi;# end if 12;
> else
> ret := factorial_2(mmm)/factorial_2(nnn);
> fi;# end if 11;
> ret;
> end;
factorial_3 := proc(mmm, nnn)
local ret;
global ATS_MAX_TERMS, array_fact_2;
if nnn <= ATS_MAX_TERMS and mmm <= ATS_MAX_TERMS then
if array_fact_2[mmm, nnn] = 0 then
ret := factorial_1(mmm)/factorial_1(nnn);
array_fact_2[mmm, nnn] := ret
else ret := array_fact_2[mmm, nnn]
end if
else ret := factorial_2(mmm)/factorial_2(nnn)
end if;
ret
end proc
# End Function number 35
# Begin Function number 36
> convfloat := proc(mmm)
> (mmm);
> end;
convfloat := proc(mmm) mmm end proc
# End Function number 36
# Begin Function number 37
> elapsed_time_seconds := proc()
> time();
> end;
elapsed_time_seconds := proc() time() end proc
# End Function number 37
# Begin Function number 38
> float_abs := proc(x)
> abs(x);
> end;
float_abs := proc(x) abs(x) end proc
# End Function number 38
# Begin Function number 39
> expt := proc(x,y)
> x^y;
> end;
expt := proc(x, y) x^y end proc
# End Function number 39
# Begin Function number 40
> neg := proc(x)
> -x;
> end;
neg := proc(x) -x end proc
# End Function number 40
# Begin Function number 41
> int_trunc := proc(x)
> trunc(x);
> end;
int_trunc := proc(x) trunc(x) end proc
# End Function number 41
# Begin Function number 42
> estimated_needed_step_error := proc(x_start,x_end,estimated_h,estimated_answer)
> local desired_abs_gbl_error,range,estimated_steps,step_error;
> global glob_desired_digits_correct,ALWAYS,ATS_MAX_TERMS;
> omniout_float(ALWAYS,"glob_desired_digits_correct",32,glob_desired_digits_correct,32,"");
> desired_abs_gbl_error := expt(glob__10,c( -glob_desired_digits_correct)) * c(float_abs(c(estimated_answer)));
> omniout_float(ALWAYS,"estimated_h",32,estimated_h,32,"");
> omniout_float(ALWAYS,"estimated_answer",32,estimated_answer,32,"");
> 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,"");
> estimated_steps := range / estimated_h;
> omniout_float(ALWAYS,"estimated_steps",32,estimated_steps,32,"");
> step_error := (c(float_abs(desired_abs_gbl_error) /sqrt(c( estimated_steps))/c(ATS_MAX_TERMS)));
> omniout_float(ALWAYS,"step_error",32,step_error,32,"");
> (step_error);;
> end;
estimated_needed_step_error := proc(
x_start, x_end, estimated_h, estimated_answer)
local desired_abs_gbl_error, range, estimated_steps, step_error;
global glob_desired_digits_correct, ALWAYS, ATS_MAX_TERMS;
omniout_float(ALWAYS, "glob_desired_digits_correct", 32,
glob_desired_digits_correct, 32, "");
desired_abs_gbl_error :=
expt(glob__10, c(-glob_desired_digits_correct))*
c(float_abs(c(estimated_answer)));
omniout_float(ALWAYS, "estimated_h", 32, estimated_h, 32, "");
omniout_float(ALWAYS, "estimated_answer", 32, estimated_answer, 32, "")
;
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, "");
estimated_steps := range/estimated_h;
omniout_float(ALWAYS, "estimated_steps", 32, estimated_steps, 32, "");
step_error := c(float_abs(desired_abs_gbl_error)/(
sqrt(c(estimated_steps))*c(ATS_MAX_TERMS)));
omniout_float(ALWAYS, "step_error", 32, step_error, 32, "");
step_error
end proc
# End Function number 42
#END ATS LIBRARY BLOCK
#BEGIN USER FUNCTION BLOCK
#BEGIN BLOCK 3
#BEGIN USER DEF BLOCK
> exact_soln_y := proc(x)
> return(c(1.0) + sin(c(x)));
> end;
exact_soln_y := proc(x) return c(1.0) + sin(c(x)) end proc
> next_delta := proc()
> global glob_nxt, x_delta;
> x_delta := [ 0.001 + 0.00004 * I,
> 0.0001 + 0.004 * I,
> 0.003 + 0.006 * I,
> 0.0001 + 0.005 * I,
> 0.0001 + 0.003 * I,
> 0.001 + 0.001 * I,
> 0.001 + 0.003 * I,
> 0.0001 + 0.004 * I,
> 0.003 + 0.006 * I,
> 0.0001 + 0.005 * I,
> 0.0001 + 0.003 * I,
> 0.001 + 0.001 * I,
> 0.001 + 0.003 * I,
> 0.0001 + 0.004 * I,
> 0.003 + 0.006 * I,
> 0.0001 + 0.005 * I,
> 0.0001 + 0.003 * I,
> 0.001 + 0.001 * I,
> 0.001 + 0.003 * I,
> 0.0001 + 0.004 * I,
> 0.003 + 0.006 * I,
> 0.0001 + 0.005 * I,
> 0.0001 + 0.003 * I,
> 0.001 + 0.001 * I,
> 0.001 + 0.003 * I,
> 0.0001 + 0.004 * I,
> 0.003 + 0.006 * I,
> 0.0001 + 0.005 * I,
> 0.0001 + 0.003 * I,
> 0.001 + 0.001 * I,
> 0.0001 + 0.004 * I,
> 0.003 + 0.006 * I,
> 0.0001 + 0.005 * I,
> 0.0001 + 0.003 * I,
> 0.001 + 0.001 * I,
> 0.001 + 0.003 * I,
> 0.0001 + 0.004 * I,
> 0.003 + 0.006 * I,
> 0.0001 + 0.005 * I,
> 0.0001 + 0.003 * I,
> 0.001 + 0.001 * I,
> 0.001 + 0.003 * I,
> 0.0001 + 0.004 * I,
> 0.003 + 0.006 * I,
> 0.0001 + 0.005 * I,
> 0.0001 + 0.003 * I,
> 0.001 + 0.001 * I,
> 0.001 + 0.003 * I,
> 0.0001 + 0.004 * I,
> 0.003 + 0.006 * I,
> 0.0001 + 0.005 * I,
> 0.0001 + 0.003 * I,
> 0.001 + 0.001 * I,
> 0.001 + 0.003 * I,
> 0.0001 + 0.004 * I,
> 0.003 + 0.006 * I,
> 0.0001 + 0.005 * I,
> 0.0001 + 0.003 * I,
> 0.001 + 0.001 * I,
> 0.0001 + 0.004 * I,
> 0.003 + 0.006 * I,
> 0.0001 + 0.005 * I,
> 0.0001 + 0.003 * I,
> 0.001 + 0.001 * I,
> 0.001 + 0.003 * I,
> 0.0001 + 0.004 * I,
> 0.003 + 0.006 * I,
> 0.0001 + 0.005 * I,
> 0.0001 + 0.003 * I,
> 0.001 + 0.001 * I,
> 0.001 + 0.003 * I,
> 0.0001 + 0.004 * I,
> 0.003 + 0.006 * I,
> 0.0001 + 0.005 * I,
> 0.0001 + 0.003 * I,
> 0.001 + 0.001 * I,
> 0.001 + 0.003 * I,
> 0.0001 + 0.004 * I,
> 0.003 + 0.006 * I,
> 0.0001 + 0.005 * I,
> 0.0001 + 0.003 * I,
> 0.001 + 0.001 * I,
> 0.001 + 0.003 * I,
> 0.0001 + 0.004 * I,
> 0.003 + 0.006 * I,
> 0.0001 + 0.005 * I,
> 0.0001 + 0.003 * I,
> 0.001 + 0.001 * I,
> 0.0001 + 0.004 * I,
> 0.003 + 0.006 * I,
> 0.0001 + 0.005 * I,
> 0.0001 + 0.003 * I,
> 0.001 + 0.001 * I,
> 0.001 + 0.003 * I,
> 0.0001 + 0.004 * I,
> 0.003 + 0.006 * I,
> 0.0001 + 0.005 * I,
> 0.0001 + 0.003 * I,
> 0.001 + 0.001 * I,
> 0.001 + 0.003 * I,
> 0.0001 + 0.004 * I,
> 0.003 + 0.006 * I,
> 0.0001 + 0.005 * I,
> 0.0001 + 0.003 * I,
> 0.001 + 0.001 * I,
> 0.001 + 0.003 * I,
> 0.0001 + 0.004 * I,
> 0.003 + 0.006 * I,
> 0.0001 + 0.005 * I,
> 0.0001 + 0.003 * I,
> 0.001 + 0.001 * I,
> 0.001 + 0.003 * I,
> 0.0001 + 0.004 * I,
> 0.003 + 0.006 * I,
> 0.0001 + 0.005 * I,
> 0.0001 + 0.003 * I,
> 0.001 + 0.001 * I,
> 0.0001 + 0.004 * I,
> 0.003 + 0.006 * I,
> 0.0001 + 0.005 * I,
> 0.0001 + 0.003 * I,
> 0.001 + 0.001 * I,
> 0.001 + 0.003 * I,
> 0.0001 + 0.004 * I,
> 0.003 + 0.006 * I,
> 0.0001 + 0.005 * I,
> 0.0001 + 0.003 * I,
> 0.001 + 0.001 * I,
> 0.001 + 0.003 * I,
> 0.0001 + 0.004 * I,
> 0.003 + 0.006 * I,
> 0.0001 + 0.005 * I,
> 0.0001 + 0.003 * I,
> 0.001 + 0.001 * I,
> 0.001 + 0.003 * I,
> 0.0001 + 0.004 * I,
> 0.003 + 0.006 * I,
> 0.0001 + 0.005 * I,
> 0.0001 + 0.003 * I,
> 0.001 + 0.001 * I,
> 0.001 + 0.003 * I,
> 0.0001 + 0.004 * I,
> 0.003 + 0.006 * I,
> 0.0001 + 0.005 * I,
> 0.0001 + 0.003 * I,
> 0.001 + 0.001 * I,
> 0.0001 + 0.004 * I,
> 0.003 + 0.006 * I,
> 0.0001 + 0.005 * I,
> 0.0001 + 0.003 * I,
> 0.001 + 0.001 * I,
> 0.001 + 0.003 * I,
> 0.0001 + 0.004 * I,
> 0.003 + 0.006 * I,
> 0.0001 + 0.005 * I,
> 0.0001 + 0.003 * I,
> 0.001 + 0.001 * I,
> 0.001 + 0.003 * I,
> 0.0001 + 0.004 * I,
> 0.003 + 0.006 * I,
> 0.0001 + 0.005 * I,
> 0.0001 + 0.003 * I,
> 0.001 + 0.001 * I,
> 0.001 + 0.003 * I,
> 0.0001 + 0.004 * I,
> 0.003 + 0.006 * I,
> 0.0001 + 0.005 * I,
> 0.0001 + 0.003 * I,
> 0.001 + 0.001 * I,
> 0.001 + 0.003 * I,
> 0.0001 + 0.004 * I,
> 0.003 + 0.006 * I,
> 0.0001 + 0.005 * I,
> 0.0001 + 0.003 * I,
> 0.001 + 0.001 * I,
> 0.0001 + 0.004 * I,
> 0.003 + 0.006 * I,
> 0.0001 + 0.005 * I,
> 0.0001 + 0.003 * I,
> 0.001 + 0.001 * I,
> 0.001 + 0.003 * I,
> 0.0001 + 0.004 * I,
> 0.0001 + 0.004 * I,
> 0.003 + 0.006 * I,
> 0.0001 + 0.005 * I,
> 0.0001 + 0.003 * I,
> 0.001 + 0.001 * I,
> 0.001 + 0.003 * I,
> 0.0001 + 0.004 * I,
> 0.003 + 0.006 * I,
> 0.0001 + 0.005 * I,
> 0.0001 + 0.003 * I,
> 0.001 + 0.001 * I,
> 0.001 + 0.003 * I,
> 0.0001 + 0.004 * I,
> 0.003 + 0.006 * I,
> 0.0001 + 0.005 * I,
> 0.0001 + 0.003 * I,
> 0.001 + 0.001 * I,
> 0.001 + 0.003 * I,
> 0.0001 + 0.004 * I,
> 0.003 + 0.006 * I,
> 0.0001 + 0.005 * I,
> 0.0001 + 0.003 * I,
> 0.001 + 0.001 * I,
> 0.001 + 0.003 * I,
> 0.0001 + 0.004 * I,
> 0.003 + 0.006 * I,
> 0.0001 + 0.005 * I,
> 0.0001 + 0.003 * I,
> 0.001 + 0.001 * I,
> 0.0001 + 0.004 * I,
> 0.003 + 0.006 * I,
> 0.0001 + 0.005 * I,
> 0.0001 + 0.003 * I,
> 0.001 + 0.001 * I,
> 0.001 + 0.003 * I,
> 0.0001 + 0.004 * I,
> 0.003 + 0.006 * I,
> 0.0001 + 0.005 * I,
> 0.0001 + 0.003 * I,
> 0.001 + 0.001 * I,
> 0.001 + 0.003 * I,
> 0.0001 + 0.004 * I,
> 0.003 + 0.006 * I,
> 0.0001 + 0.005 * I,
> 0.0001 + 0.003 * I,
> 0.001 + 0.001 * I,
> 0.001 + 0.003 * I,
> 0.0001 + 0.004 * I,
> 0.003 + 0.006 * I,
> 0.0001 + 0.005 * I,
> 0.0001 + 0.003 * I,
> 0.001 + 0.001 * I,
> 0.001 + 0.003 * I,
> 0.0001 + 0.004 * I,
> 0.003 + 0.006 * I,
> 0.0001 + 0.005 * I,
> 0.0001 + 0.003 * I,
> 0.001 + 0.001 * I,
> 0.0001 + 0.004 * I,
> 0.003 + 0.006 * I,
> 0.0001 + 0.005 * I,
> 0.0001 + 0.003 * I,
> 0.001 + 0.001 * I,
> 0.001 + 0.003 * I,
> 0.0001 + 0.004 * I,
> 0.003 + 0.006 * I,
> 0.0001 + 0.005 * I,
> 0.0001 + 0.003 * I,
> 0.001 + 0.001 * I,
> 0.001 + 0.003 * I,
> 0.0001 + 0.004 * I,
> 0.003 + 0.006 * I,
> 0.0001 + 0.005 * I,
> 0.0001 + 0.003 * I,
> 0.001 + 0.001 * I,
> 0.001 + 0.003 * I,
> 0.0001 + 0.004 * I,
> 0.003 + 0.006 * I,
> 0.0001 + 0.005 * I,
> 0.0001 + 0.003 * I,
> 0.001 + 0.001 * I,
> 0.001 + 0.003 * I,
> 0.0001 + 0.004 * I,
> 0.003 + 0.006 * I,
> 0.0001 + 0.005 * I,
> 0.0001 + 0.003 * I,
> 0.001 + 0.001 * I,
> 0.0001 + 0.004 * I,
> 0.003 + 0.006 * I,
> 0.0001 + 0.005 * I,
> 0.0001 + 0.003 * I,
> 0.001 + 0.001 * I,
> 0.001 + 0.003 * I,
> 0.0001 + 0.004 * I,
> 0.003 + 0.006 * I,
> 0.0001 + 0.005 * I,
> 0.0001 + 0.003 * I,
> 0.001 + 0.001 * I,
> 0.001 + 0.003 * I,
> 0.0001 + 0.004 * I,
> 0.003 + 0.006 * I,
> 0.0001 + 0.005 * I,
> 0.0001 + 0.003 * I,
> 0.001 + 0.001 * I,
> 0.001 + 0.003 * I,
> 0.0001 + 0.004 * I,
> 0.003 + 0.006 * I,
> 0.0001 + 0.005 * I,
> 0.0001 + 0.003 * I,
> 0.001 + 0.001 * I,
> 0.001 + 0.003 * I,
> 0.0001 + 0.004 * I,
> 0.003 + 0.006 * I,
> 0.0001 + 0.005 * I,
> 0.0001 + 0.003 * I,
> 0.001 + 0.001 * I,
> 0.0001 + 0.004 * I,
> 0.003 + 0.006 * I,
> 0.0001 + 0.005 * I,
> 0.0001 + 0.003 * I,
> 0.001 + 0.001 * I,
> 0.001 + 0.003 * I,
> 0.0001 + 0.004 * I,
> 0.003 + 0.006 * I,
> 0.0001 + 0.005 * I,
> 0.0001 + 0.003 * I,
> 0.001 + 0.001 * I,
> 0.001 + 0.003 * I,
> 0.0001 + 0.004 * I,
> 0.003 + 0.006 * I,
> 0.0001 + 0.005 * I,
> 0.0001 + 0.003 * I,
> 0.001 + 0.001 * I,
> 0.001 + 0.003 * I,
> 0.0001 + 0.004 * I,
> 0.003 + 0.006 * I,
> 0.0001 + 0.005 * I,
> 0.0001 + 0.003 * I,
> 0.001 + 0.001 * I,
> 0.001 + 0.003 * I,
> 0.0001 + 0.004 * I,
> 0.003 + 0.006 * I,
> 0.0001 + 0.005 * I,
> 0.0001 + 0.003 * I,
> 0.001 + 0.001 * I,
> 0.0001 + 0.004 * I,
> 0.003 + 0.006 * I,
> 0.0001 + 0.005 * I,
> 0.0001 + 0.003 * I,
> 0.001 + 0.001 * I,
> 0.001 + 0.003 * I,
> 0.0001 + 0.004 * I,
> 0.003 + 0.006 * I,
> 0.0001 + 0.005 * I,
> 0.0001 + 0.003 * I,
> 0.001 + 0.001 * I,
> 0.001 + 0.003 * I,
> 0.0001 + 0.004 * I,
> 0.003 + 0.006 * I,
> 0.0001 + 0.005 * I,
> 0.0001 + 0.003 * I,
> 0.001 + 0.001 * I,
> 0.001 + 0.003 * I,
> 0.0001 + 0.004 * I,
> 0.003 + 0.006 * I,
> 0.0001 + 0.005 * I,
> 0.0001 + 0.003 * I,
> 0.001 + 0.001 * I,
> 0.001 + 0.003 * I,
> 0.0001 + 0.004 * I,
> 0.003 + 0.006 * I,
> 0.0001 + 0.005 * I,
> 0.0001 + 0.003 * I,
> 0.001 + 0.001 * I,
> 0.003 + 0.006 * I,
> 0.0001 + 0.005 * I,
> 0.0001 + 0.003 * I,
> 0.001 + 0.001 * I,
> 0.001 + 0.003 * I,
> 0.0001 + 0.004 * I,
> 0.003 + 0.006 * I,
> 0.0001 + 0.005 * I,
> 0.0001 + 0.003 * I,
> 0.001 + 0.001 * I,
> 0.001 + 0.003 * I,
> 0.0001 + 0.004 * I,
> 0.003 + 0.006 * I,
> 0.0001 + 0.005 * I,
> 0.0001 + 0.003 * I,
> 0.001 + 0.001 * I,
> 0.001 + 0.003 * I,
> 0.0001 + 0.004 * I,
> 0.003 + 0.006 * I,
> 0.0001 + 0.005 * I,
> 0.0001 + 0.003 * I,
> 0.001 + 0.001 * I,
> 0.0001 + 0.004 * I,
> 0.003 + 0.006 * I,
> 0.0001 + 0.005 * I,
> 0.0001 + 0.003 * I,
> 0.001 + 0.001 * I,
> 0.001 + 0.003 * I,
> 0.0001 + 0.004 * I,
> 0.003 + 0.006 * I,
> 0.0001 + 0.005 * I,
> 0.0001 + 0.003 * I,
> 0.001 + 0.001 * I,
> 0.001 + 0.003 * I,
> 0.0001 + 0.004 * I,
> 0.003 + 0.006 * I,
> 0.0001 + 0.005 * I,
> 0.0001 + 0.003 * I,
> 0.001 + 0.001 * I,
> 0.001 + 0.003 * I,
> 0.0001 + 0.004 * I,
> 0.003 + 0.006 * I,
> 0.0001 + 0.005 * I,
> 0.0001 + 0.003 * I,
> 0.001 + 0.001 * I,
> 0.001 + 0.003 * I,
> 0.0001 + 0.004 * I,
> 0.003 + 0.006 * I,
> 0.0001 + 0.005 * I,
> 0.0001 + 0.003 * I,
> 0.001 + 0.001 * I,
> 0.0001 + 0.004 * I,
> 0.003 + 0.006 * I,
> 0.0001 + 0.005 * I,
> 0.0001 + 0.003 * I,
> 0.001 + 0.001 * I,
> 0.001 + 0.003 * I,
> 0.0001 + 0.004 * I,
> 0.003 + 0.006 * I,
> 0.0001 + 0.005 * I,
> 0.0001 + 0.003 * I,
> 0.001 + 0.001 * I,
> 0.001 + 0.003 * I,
> 0.0001 + 0.004 * I,
> 0.003 + 0.006 * I,
> 0.0001 + 0.005 * I,
> 0.0001 + 0.003 * I,
> 0.001 + 0.001 * I,
> 0.001 + 0.003 * I,
> 0.0001 + 0.004 * I,
> 0.003 + 0.006 * I,
> 0.0001 + 0.005 * I,
> 0.0001 + 0.003 * I,
> 0.001 + 0.001 * I,
> 0.001 + 0.003 * I,
> 0.0001 + 0.004 * I,
> 0.003 + 0.006 * I,
> 0.0001 + 0.005 * I,
> 0.0001 + 0.003 * I,
> 0.001 + 0.001 * I,
> 0.0001 + 0.004 * I,
> 0.003 + 0.006 * I,
> 0.0001 + 0.005 * I,
> 0.0001 + 0.003 * I,
> 0.001 + 0.001 * I,
> 0.001 + 0.003 * I,
> 0.0001 + 0.004 * I,
> 0.003 + 0.006 * I,
> 0.0001 + 0.005 * I,
> 0.0001 + 0.003 * I,
> 0.001 + 0.001 * I,
> 0.001 + 0.003 * I,
> 0.0001 + 0.004 * I,
> 0.003 + 0.006 * I,
> 0.0001 + 0.005 * I,
> 0.0001 + 0.003 * I,
> 0.001 + 0.001 * I,
> 0.001 + 0.003 * I,
> 0.0001 + 0.004 * I,
> 0.003 + 0.006 * I,
> 0.0001 + 0.005 * I,
> 0.0001 + 0.003 * I,
> 0.001 + 0.001 * I,
> 0.001 + 0.003 * I,
> 0.0001 + 0.004 * I,
> 0.003 + 0.006 * I,
> 0.0001 + 0.005 * I,
> 0.0001 + 0.003 * I,
> 0.001 + 0.001 * I,
> 0.0001 + 0.004 * I,
> 0.003 + 0.006 * I,
> 0.0001 + 0.005 * I,
> 0.0001 + 0.003 * I,
> 0.001 + 0.001 * I,
> 0.001 + 0.003 * I,
> 0.0001 + 0.004 * I,
> 0.003 + 0.006 * I,
> 0.0001 + 0.005 * I,
> 0.0001 + 0.003 * I,
> 0.001 + 0.001 * I,
> 0.001 + 0.003 * I,
> 0.0001 + 0.004 * I,
> 0.003 + 0.006 * I,
> 0.0001 + 0.005 * I,
> 0.0001 + 0.003 * I,
> 0.001 + 0.001 * I,
> 0.001 + 0.003 * I,
> 0.0001 + 0.004 * I,
> 0.003 + 0.006 * I,
> 0.0001 + 0.005 * I,
> 0.0001 + 0.003 * I,
> 0.001 + 0.001 * I,
> 0.001 + 0.003 * I,
> 0.0001 + 0.004 * I,
> 0.003 + 0.006 * I,
> 0.0001 + 0.005 * I,
> 0.0001 + 0.003 * I,
> 0.001 + 0.001 * I,
> 0.0001 + 0.004 * I,
> 0.003 + 0.006 * I,
> 0.0001 + 0.005 * I,
> 0.0001 + 0.003 * I,
> 0.001 + 0.001 * I,
> 0.001 + 0.003 * I,
> 0.0001 + 0.004 * I,
> 0.003 + 0.006 * I,
> 0.0001 + 0.005 * I,
> 0.0001 + 0.003 * I,
> 0.001 + 0.001 * I,
> 0.001 + 0.003 * I,
> 0.0001 + 0.004 * I,
> 0.003 + 0.006 * I,
> 0.0001 + 0.005 * I,
> 0.0001 + 0.003 * I,
> 0.001 + 0.001 * I,
> 0.001 + 0.003 * I,
> 0.0001 + 0.004 * I,
> 0.003 + 0.006 * I,
> 0.0001 + 0.005 * I,
> 0.0001 + 0.003 * I,
> 0.001 + 0.001 * I,
> 0.001 + 0.003 * I,
> 0.0001 + 0.004 * I,
> 0.003 + 0.006 * I,
> 0.0001 + 0.005 * I,
> 0.0001 + 0.003 * I,
> 0.001 + 0.001 * I,
> 0.0001 + 0.004 * I,
> 0.003 + 0.006 * I,
> 0.0001 + 0.005 * I,
> 0.0001 + 0.003 * I,
> 0.001 + 0.001 * I,
> 0.001 + 0.003 * I,
> 0.0001 + 0.004 * I,
> 0.003 + 0.006 * I,
> 0.0001 + 0.005 * I,
> 0.0001 + 0.003 * I,
> 0.001 + 0.001 * I,
> 0.001 + 0.003 * I,
> 0.0001 + 0.004 * I,
> 0.003 + 0.006 * I,
> 0.0001 + 0.005 * I,
> 0.0001 + 0.003 * I,
> 0.001 + 0.001 * I,
> 0.001 + 0.003 * I,
> 0.0001 + 0.004 * I,
> 0.003 + 0.006 * I,
> 0.0001 + 0.005 * I,
> 0.0001 + 0.003 * I,
> 0.001 + 0.001 * I,
> 0.001 + 0.003 * I,
> 0.0001 + 0.004 * I,
> 0.003 + 0.006 * I,
> 0.0001 + 0.005 * I,
> 0.0001 + 0.003 * I,
> 0.001 + 0.001 * I,
> 0.0001 + 0.004 * I,
> 0.003 + 0.006 * I,
> 0.0001 + 0.005 * I,
> 0.0001 + 0.003 * I,
> 0.001 + 0.001 * I,
> 0.001 + 0.003 * I,
> 0.0001 + 0.004 * I,
> 0.003 + 0.006 * I,
> 0.0001 + 0.005 * I,
> 0.0001 + 0.003 * I,
> 0.001 + 0.001 * I,
> 0.001 + 0.003 * I,
> 0.0001 + 0.004 * I,
> 0.003 + 0.006 * I,
> 0.0001 + 0.005 * I,
> 0.0001 + 0.003 * I,
> 0.001 + 0.001 * I,
> 0.001 + 0.003 * I,
> 0.0001 + 0.004 * I,
> 0.003 + 0.006 * I,
> 0.0001 + 0.005 * I,
> 0.0001 + 0.003 * I,
> 0.001 + 0.001 * I,
> 0.001 + 0.003 * I,
> 0.0001 + 0.004 * I,
> 0.003 + 0.006 * I,
> 0.0001 + 0.005 * I,
> 0.0001 + 0.003 * I,
> 0.001 + 0.001 * I,
> 0.0001 + 0.004 * I,
> 0.003 + 0.006 * I,
> 0.0001 + 0.005 * I,
> 0.0001 + 0.003 * I,
> 0.001 + 0.001 * I,
> 0.001 + 0.003 * I,
> 0.0001 + 0.004 * I,
> 0.003 + 0.006 * I,
> 0.0001 + 0.005 * I,
> 0.0001 + 0.003 * I,
> 0.001 + 0.001 * I,
> 0.001 + 0.003 * I,
> 0.0001 + 0.004 * I,
> 0.003 + 0.006 * I,
> 0.0001 + 0.005 * I,
> 0.0001 + 0.003 * I,
> 0.001 + 0.001 * I,
> 0.001 + 0.003 * I,
> 0.0001 + 0.004 * I,
> 0.003 + 0.006 * I,
> 0.0001 + 0.005 * I,
> 0.0001 + 0.003 * I,
> 0.001 + 0.001 * I,
> 0.001 + 0.003 * I,
> 0.0001 + 0.004 * I,
> 0.003 + 0.006 * I,
> 0.0001 + 0.005 * I,
> 0.0001 + 0.003 * I,
> 0.001 + 0.001 * I,
> 0.0001 + 0.004 * I,
> 0.003 + 0.006 * I,
> 0.0001 + 0.005 * I,
> 0.0001 + 0.003 * I,
> 0.001 + 0.001 * I,
> 0.001 + 0.003 * I,
> 0.0001 + 0.004 * I,
> 0.003 + 0.006 * I,
> 0.0001 + 0.005 * I,
> 0.0001 + 0.003 * I,
> 0.001 + 0.001 * I,
> 0.001 + 0.003 * I,
> 0.0001 + 0.004 * I,
> 0.003 + 0.006 * I,
> 0.0001 + 0.005 * I,
> 0.0001 + 0.003 * I,
> 0.001 + 0.001 * I,
> 0.001 + 0.003 * I,
> 0.0001 + 0.004 * I,
> 0.003 + 0.006 * I,
> 0.0001 + 0.005 * I,
> 0.0001 + 0.003 * I,
> 0.001 + 0.001 * I,
> 0.001 + 0.003 * I,
> 0.0001 + 0.004 * I,
> 0.003 + 0.006 * I,
> 0.0001 + 0.005 * I,
> 0.0001 + 0.003 * I,
> 0.001 + 0.001 * I,
> 0.0001 + 0.004 * I,
> 0.003 + 0.006 * I,
> 0.0001 + 0.005 * I,
> 0.0001 + 0.003 * I,
> 0.001 + 0.001 * I,
> 0.001 + 0.003 * I,
> 0.0001 + 0.004 * I,
> 0.003 + 0.006 * I,
> 0.0001 + 0.005 * I,
> 0.0001 + 0.003 * I,
> 0.001 + 0.001 * I,
> 0.001 + 0.003 * I,
> 0.0001 + 0.004 * I,
> 0.003 + 0.006 * I,
> 0.0001 + 0.005 * I,
> 0.0001 + 0.003 * I,
> 0.001 + 0.001 * I,
> 0.001 + 0.003 * I,
> 0.0001 + 0.004 * I,
> 0.003 + 0.006 * I,
> 0.0001 + 0.005 * I,
> 0.0001 + 0.003 * I,
> 0.001 + 0.001 * I,
> 0.001 + 0.003 * I,
> 0.0001 + 0.004 * I,
> 0.003 + 0.006 * I,
> 0.0001 + 0.005 * I,
> 0.0001 + 0.003 * I,
> 0.001 + 0.001 * I,
> 0.0001 + 0.004 * I,
> 0.003 + 0.006 * I,
> 0.0001 + 0.005 * I,
> 0.0001 + 0.003 * I,
> 0.001 + 0.001 * I,
> 0.001 + 0.003 * I,
> 0.0001 + 0.004 * I,
> 0.003 + 0.006 * I,
> 0.0001 + 0.005 * I,
> 0.0001 + 0.003 * I,
> 0.001 + 0.001 * I,
> 0.001 + 0.003 * I,
> 0.0001 + 0.004 * I,
> 0.003 + 0.006 * I,
> 0.0001 + 0.005 * I,
> 0.0001 + 0.003 * I,
> 0.001 + 0.001 * I,
> 0.001 + 0.003 * I,
> 0.0001 + 0.004 * I,
> 0.003 + 0.006 * I,
> 0.0001 + 0.005 * I,
> 0.0001 + 0.003 * I,
> 0.001 + 0.001 * I,
> 0.001 + 0.003 * I,
> 0.0001 + 0.004 * I,
> 0.003 + 0.006 * I,
> 0.0001 + 0.005 * I,
> 0.0001 + 0.003 * I,
> 0.001 + 0.001 * I,
> 0.0001 + 0.004 * I,
> 0.003 + 0.006 * I,
> 0.0001 + 0.005 * I,
> 0.0001 + 0.003 * I,
> 0.001 + 0.001 * I,
> 0.001 + 0.003 * I,
> 0.0001 + 0.004 * I,
> 0.003 + 0.006 * I,
> 0.0001 + 0.005 * I,
> 0.0001 + 0.003 * I,
> 0.001 + 0.001 * I,
> 0.001 + 0.003 * I,
> 0.0001 + 0.004 * I,
> 0.003 + 0.006 * I,
> 0.0001 + 0.005 * I,
> 0.0001 + 0.003 * I,
> 0.001 + 0.001 * I,
> 0.001 + 0.003 * I,
> 0.0001 + 0.004 * I,
> 0.003 + 0.006 * I,
> 0.0001 + 0.005 * I,
> 0.0001 + 0.003 * I,
> 0.001 + 0.001 * I,
> 0.001 + 0.003 * I,
> 0.0001 + 0.004 * I,
> 0.003 + 0.006 * I,
> 0.0001 + 0.005 * I,
> 0.0001 + 0.003 * I,
> 0.001 + 0.001 * I,
> 0.0001 + 0.004 * I,
> 0.003 + 0.006 * I,
> 0.0001 + 0.005 * I,
> 0.0001 + 0.003 * I,
> 0.001 + 0.001 * I,
> 0.001 + 0.003 * I,
> 0.0001 + 0.004 * I,
> 0.003 + 0.006 * I,
> 0.0001 + 0.005 * I,
> 0.0001 + 0.003 * I,
> 0.001 + 0.001 * I,
> 0.001 + 0.003 * I,
> 0.0001 + 0.004 * I,
> 0.003 + 0.006 * I,
> 0.0001 + 0.005 * I,
> 0.0001 + 0.003 * I,
> 0.001 + 0.001 * I,
> 0.001 + 0.003 * I,
> 0.0001 + 0.004 * I,
> 0.003 + 0.006 * I,
> 0.0001 + 0.005 * I,
> 0.0001 + 0.003 * I,
> 0.001 + 0.001 * I,
> 0.001 + 0.003 * I,
> 0.0001 + 0.004 * I,
> 0.003 + 0.006 * I,
> 0.0001 + 0.005 * I,
> 0.0001 + 0.003 * I,
> 0.001 + 0.001 * I,
> 0.001 + 0.003 * I,
> 0.000 + 0.000 * I ];
> glob_nxt := glob_nxt + 1;
> it := x_delta[glob_nxt];
> return it;
> end;
Warning, `it` is implicitly declared local to procedure `next_delta`
next_delta := proc()
local it;
global glob_nxt, x_delta;
x_delta := [0.001 + 0.00004*I, 0.0001 + 0.004*I, 0.003 + 0.006*I,
0.0001 + 0.005*I, 0.0001 + 0.003*I, 0.001 + 0.001*I,
0.001 + 0.003*I, 0.0001 + 0.004*I, 0.003 + 0.006*I,
0.0001 + 0.005*I, 0.0001 + 0.003*I, 0.001 + 0.001*I,
0.001 + 0.003*I, 0.0001 + 0.004*I, 0.003 + 0.006*I,
0.0001 + 0.005*I, 0.0001 + 0.003*I, 0.001 + 0.001*I,
0.001 + 0.003*I, 0.0001 + 0.004*I, 0.003 + 0.006*I,
0.0001 + 0.005*I, 0.0001 + 0.003*I, 0.001 + 0.001*I,
0.001 + 0.003*I, 0.0001 + 0.004*I, 0.003 + 0.006*I,
0.0001 + 0.005*I, 0.0001 + 0.003*I, 0.001 + 0.001*I,
0.0001 + 0.004*I, 0.003 + 0.006*I, 0.0001 + 0.005*I,
0.0001 + 0.003*I, 0.001 + 0.001*I, 0.001 + 0.003*I,
0.0001 + 0.004*I, 0.003 + 0.006*I, 0.0001 + 0.005*I,
0.0001 + 0.003*I, 0.001 + 0.001*I, 0.001 + 0.003*I,
0.0001 + 0.004*I, 0.003 + 0.006*I, 0.0001 + 0.005*I,
0.0001 + 0.003*I, 0.001 + 0.001*I, 0.001 + 0.003*I,
0.0001 + 0.004*I, 0.003 + 0.006*I, 0.0001 + 0.005*I,
0.0001 + 0.003*I, 0.001 + 0.001*I, 0.001 + 0.003*I,
0.0001 + 0.004*I, 0.003 + 0.006*I, 0.0001 + 0.005*I,
0.0001 + 0.003*I, 0.001 + 0.001*I, 0.0001 + 0.004*I,
0.003 + 0.006*I, 0.0001 + 0.005*I, 0.0001 + 0.003*I,
0.001 + 0.001*I, 0.001 + 0.003*I, 0.0001 + 0.004*I, 0.003 + 0.006*I,
0.0001 + 0.005*I, 0.0001 + 0.003*I, 0.001 + 0.001*I,
0.001 + 0.003*I, 0.0001 + 0.004*I, 0.003 + 0.006*I,
0.0001 + 0.005*I, 0.0001 + 0.003*I, 0.001 + 0.001*I,
0.001 + 0.003*I, 0.0001 + 0.004*I, 0.003 + 0.006*I,
0.0001 + 0.005*I, 0.0001 + 0.003*I, 0.001 + 0.001*I,
0.001 + 0.003*I, 0.0001 + 0.004*I, 0.003 + 0.006*I,
0.0001 + 0.005*I, 0.0001 + 0.003*I, 0.001 + 0.001*I,
0.0001 + 0.004*I, 0.003 + 0.006*I, 0.0001 + 0.005*I,
0.0001 + 0.003*I, 0.001 + 0.001*I, 0.001 + 0.003*I,
0.0001 + 0.004*I, 0.003 + 0.006*I, 0.0001 + 0.005*I,
0.0001 + 0.003*I, 0.001 + 0.001*I, 0.001 + 0.003*I,
0.0001 + 0.004*I, 0.003 + 0.006*I, 0.0001 + 0.005*I,
0.0001 + 0.003*I, 0.001 + 0.001*I, 0.001 + 0.003*I,
0.0001 + 0.004*I, 0.003 + 0.006*I, 0.0001 + 0.005*I,
0.0001 + 0.003*I, 0.001 + 0.001*I, 0.001 + 0.003*I,
0.0001 + 0.004*I, 0.003 + 0.006*I, 0.0001 + 0.005*I,
0.0001 + 0.003*I, 0.001 + 0.001*I, 0.0001 + 0.004*I,
0.003 + 0.006*I, 0.0001 + 0.005*I, 0.0001 + 0.003*I,
0.001 + 0.001*I, 0.001 + 0.003*I, 0.0001 + 0.004*I, 0.003 + 0.006*I,
0.0001 + 0.005*I, 0.0001 + 0.003*I, 0.001 + 0.001*I,
0.001 + 0.003*I, 0.0001 + 0.004*I, 0.003 + 0.006*I,
0.0001 + 0.005*I, 0.0001 + 0.003*I, 0.001 + 0.001*I,
0.001 + 0.003*I, 0.0001 + 0.004*I, 0.003 + 0.006*I,
0.0001 + 0.005*I, 0.0001 + 0.003*I, 0.001 + 0.001*I,
0.001 + 0.003*I, 0.0001 + 0.004*I, 0.003 + 0.006*I,
0.0001 + 0.005*I, 0.0001 + 0.003*I, 0.001 + 0.001*I,
0.0001 + 0.004*I, 0.003 + 0.006*I, 0.0001 + 0.005*I,
0.0001 + 0.003*I, 0.001 + 0.001*I, 0.001 + 0.003*I,
0.0001 + 0.004*I, 0.003 + 0.006*I, 0.0001 + 0.005*I,
0.0001 + 0.003*I, 0.001 + 0.001*I, 0.001 + 0.003*I,
0.0001 + 0.004*I, 0.003 + 0.006*I, 0.0001 + 0.005*I,
0.0001 + 0.003*I, 0.001 + 0.001*I, 0.001 + 0.003*I,
0.0001 + 0.004*I, 0.003 + 0.006*I, 0.0001 + 0.005*I,
0.0001 + 0.003*I, 0.001 + 0.001*I, 0.001 + 0.003*I,
0.0001 + 0.004*I, 0.003 + 0.006*I, 0.0001 + 0.005*I,
0.0001 + 0.003*I, 0.001 + 0.001*I, 0.0001 + 0.004*I,
0.003 + 0.006*I, 0.0001 + 0.005*I, 0.0001 + 0.003*I,
0.001 + 0.001*I, 0.001 + 0.003*I, 0.0001 + 0.004*I,
0.0001 + 0.004*I, 0.003 + 0.006*I, 0.0001 + 0.005*I,
0.0001 + 0.003*I, 0.001 + 0.001*I, 0.001 + 0.003*I,
0.0001 + 0.004*I, 0.003 + 0.006*I, 0.0001 + 0.005*I,
0.0001 + 0.003*I, 0.001 + 0.001*I, 0.001 + 0.003*I,
0.0001 + 0.004*I, 0.003 + 0.006*I, 0.0001 + 0.005*I,
0.0001 + 0.003*I, 0.001 + 0.001*I, 0.001 + 0.003*I,
0.0001 + 0.004*I, 0.003 + 0.006*I, 0.0001 + 0.005*I,
0.0001 + 0.003*I, 0.001 + 0.001*I, 0.001 + 0.003*I,
0.0001 + 0.004*I, 0.003 + 0.006*I, 0.0001 + 0.005*I,
0.0001 + 0.003*I, 0.001 + 0.001*I, 0.0001 + 0.004*I,
0.003 + 0.006*I, 0.0001 + 0.005*I, 0.0001 + 0.003*I,
0.001 + 0.001*I, 0.001 + 0.003*I, 0.0001 + 0.004*I, 0.003 + 0.006*I,
0.0001 + 0.005*I, 0.0001 + 0.003*I, 0.001 + 0.001*I,
0.001 + 0.003*I, 0.0001 + 0.004*I, 0.003 + 0.006*I,
0.0001 + 0.005*I, 0.0001 + 0.003*I, 0.001 + 0.001*I,
0.001 + 0.003*I, 0.0001 + 0.004*I, 0.003 + 0.006*I,
0.0001 + 0.005*I, 0.0001 + 0.003*I, 0.001 + 0.001*I,
0.001 + 0.003*I, 0.0001 + 0.004*I, 0.003 + 0.006*I,
0.0001 + 0.005*I, 0.0001 + 0.003*I, 0.001 + 0.001*I,
0.0001 + 0.004*I, 0.003 + 0.006*I, 0.0001 + 0.005*I,
0.0001 + 0.003*I, 0.001 + 0.001*I, 0.001 + 0.003*I,
0.0001 + 0.004*I, 0.003 + 0.006*I, 0.0001 + 0.005*I,
0.0001 + 0.003*I, 0.001 + 0.001*I, 0.001 + 0.003*I,
0.0001 + 0.004*I, 0.003 + 0.006*I, 0.0001 + 0.005*I,
0.0001 + 0.003*I, 0.001 + 0.001*I, 0.001 + 0.003*I,
0.0001 + 0.004*I, 0.003 + 0.006*I, 0.0001 + 0.005*I,
0.0001 + 0.003*I, 0.001 + 0.001*I, 0.001 + 0.003*I,
0.0001 + 0.004*I, 0.003 + 0.006*I, 0.0001 + 0.005*I,
0.0001 + 0.003*I, 0.001 + 0.001*I, 0.0001 + 0.004*I,
0.003 + 0.006*I, 0.0001 + 0.005*I, 0.0001 + 0.003*I,
0.001 + 0.001*I, 0.001 + 0.003*I, 0.0001 + 0.004*I, 0.003 + 0.006*I,
0.0001 + 0.005*I, 0.0001 + 0.003*I, 0.001 + 0.001*I,
0.001 + 0.003*I, 0.0001 + 0.004*I, 0.003 + 0.006*I,
0.0001 + 0.005*I, 0.0001 + 0.003*I, 0.001 + 0.001*I,
0.001 + 0.003*I, 0.0001 + 0.004*I, 0.003 + 0.006*I,
0.0001 + 0.005*I, 0.0001 + 0.003*I, 0.001 + 0.001*I,
0.001 + 0.003*I, 0.0001 + 0.004*I, 0.003 + 0.006*I,
0.0001 + 0.005*I, 0.0001 + 0.003*I, 0.001 + 0.001*I,
0.0001 + 0.004*I, 0.003 + 0.006*I, 0.0001 + 0.005*I,
0.0001 + 0.003*I, 0.001 + 0.001*I, 0.001 + 0.003*I,
0.0001 + 0.004*I, 0.003 + 0.006*I, 0.0001 + 0.005*I,
0.0001 + 0.003*I, 0.001 + 0.001*I, 0.001 + 0.003*I,
0.0001 + 0.004*I, 0.003 + 0.006*I, 0.0001 + 0.005*I,
0.0001 + 0.003*I, 0.001 + 0.001*I, 0.001 + 0.003*I,
0.0001 + 0.004*I, 0.003 + 0.006*I, 0.0001 + 0.005*I,
0.0001 + 0.003*I, 0.001 + 0.001*I, 0.001 + 0.003*I,
0.0001 + 0.004*I, 0.003 + 0.006*I, 0.0001 + 0.005*I,
0.0001 + 0.003*I, 0.001 + 0.001*I, 0.0001 + 0.004*I,
0.003 + 0.006*I, 0.0001 + 0.005*I, 0.0001 + 0.003*I,
0.001 + 0.001*I, 0.001 + 0.003*I, 0.0001 + 0.004*I, 0.003 + 0.006*I,
0.0001 + 0.005*I, 0.0001 + 0.003*I, 0.001 + 0.001*I,
0.001 + 0.003*I, 0.0001 + 0.004*I, 0.003 + 0.006*I,
0.0001 + 0.005*I, 0.0001 + 0.003*I, 0.001 + 0.001*I,
0.001 + 0.003*I, 0.0001 + 0.004*I, 0.003 + 0.006*I,
0.0001 + 0.005*I, 0.0001 + 0.003*I, 0.001 + 0.001*I,
0.001 + 0.003*I, 0.0001 + 0.004*I, 0.003 + 0.006*I,
0.0001 + 0.005*I, 0.0001 + 0.003*I, 0.001 + 0.001*I,
0.003 + 0.006*I, 0.0001 + 0.005*I, 0.0001 + 0.003*I,
0.001 + 0.001*I, 0.001 + 0.003*I, 0.0001 + 0.004*I, 0.003 + 0.006*I,
0.0001 + 0.005*I, 0.0001 + 0.003*I, 0.001 + 0.001*I,
0.001 + 0.003*I, 0.0001 + 0.004*I, 0.003 + 0.006*I,
0.0001 + 0.005*I, 0.0001 + 0.003*I, 0.001 + 0.001*I,
0.001 + 0.003*I, 0.0001 + 0.004*I, 0.003 + 0.006*I,
0.0001 + 0.005*I, 0.0001 + 0.003*I, 0.001 + 0.001*I,
0.0001 + 0.004*I, 0.003 + 0.006*I, 0.0001 + 0.005*I,
0.0001 + 0.003*I, 0.001 + 0.001*I, 0.001 + 0.003*I,
0.0001 + 0.004*I, 0.003 + 0.006*I, 0.0001 + 0.005*I,
0.0001 + 0.003*I, 0.001 + 0.001*I, 0.001 + 0.003*I,
0.0001 + 0.004*I, 0.003 + 0.006*I, 0.0001 + 0.005*I,
0.0001 + 0.003*I, 0.001 + 0.001*I, 0.001 + 0.003*I,
0.0001 + 0.004*I, 0.003 + 0.006*I, 0.0001 + 0.005*I,
0.0001 + 0.003*I, 0.001 + 0.001*I, 0.001 + 0.003*I,
0.0001 + 0.004*I, 0.003 + 0.006*I, 0.0001 + 0.005*I,
0.0001 + 0.003*I, 0.001 + 0.001*I, 0.0001 + 0.004*I,
0.003 + 0.006*I, 0.0001 + 0.005*I, 0.0001 + 0.003*I,
0.001 + 0.001*I, 0.001 + 0.003*I, 0.0001 + 0.004*I, 0.003 + 0.006*I,
0.0001 + 0.005*I, 0.0001 + 0.003*I, 0.001 + 0.001*I,
0.001 + 0.003*I, 0.0001 + 0.004*I, 0.003 + 0.006*I,
0.0001 + 0.005*I, 0.0001 + 0.003*I, 0.001 + 0.001*I,
0.001 + 0.003*I, 0.0001 + 0.004*I, 0.003 + 0.006*I,
0.0001 + 0.005*I, 0.0001 + 0.003*I, 0.001 + 0.001*I,
0.001 + 0.003*I, 0.0001 + 0.004*I, 0.003 + 0.006*I,
0.0001 + 0.005*I, 0.0001 + 0.003*I, 0.001 + 0.001*I,
0.0001 + 0.004*I, 0.003 + 0.006*I, 0.0001 + 0.005*I,
0.0001 + 0.003*I, 0.001 + 0.001*I, 0.001 + 0.003*I,
0.0001 + 0.004*I, 0.003 + 0.006*I, 0.0001 + 0.005*I,
0.0001 + 0.003*I, 0.001 + 0.001*I, 0.001 + 0.003*I,
0.0001 + 0.004*I, 0.003 + 0.006*I, 0.0001 + 0.005*I,
0.0001 + 0.003*I, 0.001 + 0.001*I, 0.001 + 0.003*I,
0.0001 + 0.004*I, 0.003 + 0.006*I, 0.0001 + 0.005*I,
0.0001 + 0.003*I, 0.001 + 0.001*I, 0.001 + 0.003*I,
0.0001 + 0.004*I, 0.003 + 0.006*I, 0.0001 + 0.005*I,
0.0001 + 0.003*I, 0.001 + 0.001*I, 0.0001 + 0.004*I,
0.003 + 0.006*I, 0.0001 + 0.005*I, 0.0001 + 0.003*I,
0.001 + 0.001*I, 0.001 + 0.003*I, 0.0001 + 0.004*I, 0.003 + 0.006*I,
0.0001 + 0.005*I, 0.0001 + 0.003*I, 0.001 + 0.001*I,
0.001 + 0.003*I, 0.0001 + 0.004*I, 0.003 + 0.006*I,
0.0001 + 0.005*I, 0.0001 + 0.003*I, 0.001 + 0.001*I,
0.001 + 0.003*I, 0.0001 + 0.004*I, 0.003 + 0.006*I,
0.0001 + 0.005*I, 0.0001 + 0.003*I, 0.001 + 0.001*I,
0.001 + 0.003*I, 0.0001 + 0.004*I, 0.003 + 0.006*I,
0.0001 + 0.005*I, 0.0001 + 0.003*I, 0.001 + 0.001*I,
0.0001 + 0.004*I, 0.003 + 0.006*I, 0.0001 + 0.005*I,
0.0001 + 0.003*I, 0.001 + 0.001*I, 0.001 + 0.003*I,
0.0001 + 0.004*I, 0.003 + 0.006*I, 0.0001 + 0.005*I,
0.0001 + 0.003*I, 0.001 + 0.001*I, 0.001 + 0.003*I,
0.0001 + 0.004*I, 0.003 + 0.006*I, 0.0001 + 0.005*I,
0.0001 + 0.003*I, 0.001 + 0.001*I, 0.001 + 0.003*I,
0.0001 + 0.004*I, 0.003 + 0.006*I, 0.0001 + 0.005*I,
0.0001 + 0.003*I, 0.001 + 0.001*I, 0.001 + 0.003*I,
0.0001 + 0.004*I, 0.003 + 0.006*I, 0.0001 + 0.005*I,
0.0001 + 0.003*I, 0.001 + 0.001*I, 0.0001 + 0.004*I,
0.003 + 0.006*I, 0.0001 + 0.005*I, 0.0001 + 0.003*I,
0.001 + 0.001*I, 0.001 + 0.003*I, 0.0001 + 0.004*I, 0.003 + 0.006*I,
0.0001 + 0.005*I, 0.0001 + 0.003*I, 0.001 + 0.001*I,
0.001 + 0.003*I, 0.0001 + 0.004*I, 0.003 + 0.006*I,
0.0001 + 0.005*I, 0.0001 + 0.003*I, 0.001 + 0.001*I,
0.001 + 0.003*I, 0.0001 + 0.004*I, 0.003 + 0.006*I,
0.0001 + 0.005*I, 0.0001 + 0.003*I, 0.001 + 0.001*I,
0.001 + 0.003*I, 0.0001 + 0.004*I, 0.003 + 0.006*I,
0.0001 + 0.005*I, 0.0001 + 0.003*I, 0.001 + 0.001*I,
0.0001 + 0.004*I, 0.003 + 0.006*I, 0.0001 + 0.005*I,
0.0001 + 0.003*I, 0.001 + 0.001*I, 0.001 + 0.003*I,
0.0001 + 0.004*I, 0.003 + 0.006*I, 0.0001 + 0.005*I,
0.0001 + 0.003*I, 0.001 + 0.001*I, 0.001 + 0.003*I,
0.0001 + 0.004*I, 0.003 + 0.006*I, 0.0001 + 0.005*I,
0.0001 + 0.003*I, 0.001 + 0.001*I, 0.001 + 0.003*I,
0.0001 + 0.004*I, 0.003 + 0.006*I, 0.0001 + 0.005*I,
0.0001 + 0.003*I, 0.001 + 0.001*I, 0.001 + 0.003*I,
0.0001 + 0.004*I, 0.003 + 0.006*I, 0.0001 + 0.005*I,
0.0001 + 0.003*I, 0.001 + 0.001*I, 0.0001 + 0.004*I,
0.003 + 0.006*I, 0.0001 + 0.005*I, 0.0001 + 0.003*I,
0.001 + 0.001*I, 0.001 + 0.003*I, 0.0001 + 0.004*I, 0.003 + 0.006*I,
0.0001 + 0.005*I, 0.0001 + 0.003*I, 0.001 + 0.001*I,
0.001 + 0.003*I, 0.0001 + 0.004*I, 0.003 + 0.006*I,
0.0001 + 0.005*I, 0.0001 + 0.003*I, 0.001 + 0.001*I,
0.001 + 0.003*I, 0.0001 + 0.004*I, 0.003 + 0.006*I,
0.0001 + 0.005*I, 0.0001 + 0.003*I, 0.001 + 0.001*I,
0.001 + 0.003*I, 0.0001 + 0.004*I, 0.003 + 0.006*I,
0.0001 + 0.005*I, 0.0001 + 0.003*I, 0.001 + 0.001*I,
0.0001 + 0.004*I, 0.003 + 0.006*I, 0.0001 + 0.005*I,
0.0001 + 0.003*I, 0.001 + 0.001*I, 0.001 + 0.003*I,
0.0001 + 0.004*I, 0.003 + 0.006*I, 0.0001 + 0.005*I,
0.0001 + 0.003*I, 0.001 + 0.001*I, 0.001 + 0.003*I,
0.0001 + 0.004*I, 0.003 + 0.006*I, 0.0001 + 0.005*I,
0.0001 + 0.003*I, 0.001 + 0.001*I, 0.001 + 0.003*I,
0.0001 + 0.004*I, 0.003 + 0.006*I, 0.0001 + 0.005*I,
0.0001 + 0.003*I, 0.001 + 0.001*I, 0.001 + 0.003*I,
0.0001 + 0.004*I, 0.003 + 0.006*I, 0.0001 + 0.005*I,
0.0001 + 0.003*I, 0.001 + 0.001*I, 0.0001 + 0.004*I,
0.003 + 0.006*I, 0.0001 + 0.005*I, 0.0001 + 0.003*I,
0.001 + 0.001*I, 0.001 + 0.003*I, 0.0001 + 0.004*I, 0.003 + 0.006*I,
0.0001 + 0.005*I, 0.0001 + 0.003*I, 0.001 + 0.001*I,
0.001 + 0.003*I, 0.0001 + 0.004*I, 0.003 + 0.006*I,
0.0001 + 0.005*I, 0.0001 + 0.003*I, 0.001 + 0.001*I,
0.001 + 0.003*I, 0.0001 + 0.004*I, 0.003 + 0.006*I,
0.0001 + 0.005*I, 0.0001 + 0.003*I, 0.001 + 0.001*I,
0.001 + 0.003*I, 0.0001 + 0.004*I, 0.003 + 0.006*I,
0.0001 + 0.005*I, 0.0001 + 0.003*I, 0.001 + 0.001*I,
0.0001 + 0.004*I, 0.003 + 0.006*I, 0.0001 + 0.005*I,
0.0001 + 0.003*I, 0.001 + 0.001*I, 0.001 + 0.003*I,
0.0001 + 0.004*I, 0.003 + 0.006*I, 0.0001 + 0.005*I,
0.0001 + 0.003*I, 0.001 + 0.001*I, 0.001 + 0.003*I,
0.0001 + 0.004*I, 0.003 + 0.006*I, 0.0001 + 0.005*I,
0.0001 + 0.003*I, 0.001 + 0.001*I, 0.001 + 0.003*I,
0.0001 + 0.004*I, 0.003 + 0.006*I, 0.0001 + 0.005*I,
0.0001 + 0.003*I, 0.001 + 0.001*I, 0.001 + 0.003*I,
0.0001 + 0.004*I, 0.003 + 0.006*I, 0.0001 + 0.005*I,
0.0001 + 0.003*I, 0.001 + 0.001*I, 0.0001 + 0.004*I,
0.003 + 0.006*I, 0.0001 + 0.005*I, 0.0001 + 0.003*I,
0.001 + 0.001*I, 0.001 + 0.003*I, 0.0001 + 0.004*I, 0.003 + 0.006*I,
0.0001 + 0.005*I, 0.0001 + 0.003*I, 0.001 + 0.001*I,
0.001 + 0.003*I, 0.0001 + 0.004*I, 0.003 + 0.006*I,
0.0001 + 0.005*I, 0.0001 + 0.003*I, 0.001 + 0.001*I,
0.001 + 0.003*I, 0.0001 + 0.004*I, 0.003 + 0.006*I,
0.0001 + 0.005*I, 0.0001 + 0.003*I, 0.001 + 0.001*I,
0.001 + 0.003*I, 0.0001 + 0.004*I, 0.003 + 0.006*I,
0.0001 + 0.005*I, 0.0001 + 0.003*I, 0.001 + 0.001*I,
0.0001 + 0.004*I, 0.003 + 0.006*I, 0.0001 + 0.005*I,
0.0001 + 0.003*I, 0.001 + 0.001*I, 0.001 + 0.003*I,
0.0001 + 0.004*I, 0.003 + 0.006*I, 0.0001 + 0.005*I,
0.0001 + 0.003*I, 0.001 + 0.001*I, 0.001 + 0.003*I,
0.0001 + 0.004*I, 0.003 + 0.006*I, 0.0001 + 0.005*I,
0.0001 + 0.003*I, 0.001 + 0.001*I, 0.001 + 0.003*I,
0.0001 + 0.004*I, 0.003 + 0.006*I, 0.0001 + 0.005*I,
0.0001 + 0.003*I, 0.001 + 0.001*I, 0.001 + 0.003*I,
0.0001 + 0.004*I, 0.003 + 0.006*I, 0.0001 + 0.005*I,
0.0001 + 0.003*I, 0.001 + 0.001*I, 0.001 + 0.003*I, 0. + 0.*I];
glob_nxt := glob_nxt + 1;
it := x_delta[glob_nxt];
return it
end proc
#END USER DEF BLOCK
#END BLOCK 3
#END USER FUNCTION BLOCK
# before write_aux functions
# Begin Function number 2
> display_poles := proc()
> local rad_given;
> global ALWAYS,glob_display_flag,glob_larger_float, glob_large_float, glob_diff_ord_fm, glob_diff_ord_fmm1, glob_diff_ord_fmm2, glob_diff_rc_fm, glob_diff_rc_fmm1, glob_diff_rc_fmm2, glob_guess_error_ord, glob_guess_error_rc, glob_type_given_pole,array_given_rad_poles,array_given_ord_poles,array_rad_test_poles,array_ord_test_poles,glob_least_3_sing,glob_least_6_sing,glob_least_given_sing,glob_least_ratio_sing,array_x ;
> if ((glob_type_given_pole = 1) or (glob_type_given_pole = 2)) then # if number 1
> rad_given := float_abs(array_x[1] - (array_given_rad_poles[1,1] + array_given_rad_poles[1,2] * I ));
> omniout_float(ALWAYS,"Radius of convergence (given) for eq 1 ",4,rad_given,4," ");
> omniout_complex(ALWAYS,"Order of pole (given) ",4,array_given_ord_poles[1,1],4," ");
> if ((float_abs(rad_given) < float_abs(glob_least_given_sing)) and
> (float_abs(rad_given) > 0.0)) then # if number 2
> glob_least_given_sing := rad_given;
> fi;# end if 2;
> elif
> (glob_type_given_pole = 3) then # if number 2
> omniout_str(ALWAYS,"NO POLE (given) for Equation 1");
> elif
> (glob_type_given_pole = 5) then # if number 3
> omniout_str(ALWAYS,"SOME POLE (given) for Equation 1");
> else
> omniout_str(ALWAYS,"NO INFO (given) for Equation 1");
> fi;# end if 3;
> if (array_rad_test_poles[1,1] < glob_large_float) then # if number 3
> omniout_float(ALWAYS,"Radius of convergence (ratio test) for eq 1 ",4,array_rad_test_poles[1,1],4," ");
> if ((float_abs(array_rad_test_poles[1,1]) < glob_least_ratio_sing)) then # if number 4
> glob_least_ratio_sing := array_rad_test_poles[1,1];
> fi;# end if 4;
> omniout_complex(ALWAYS,"Order of pole (ratio test) ",4, array_ord_test_poles[1,1],4," ");
> else
> omniout_str(ALWAYS,"NO POLE (ratio test) for Equation 1");
> fi;# end if 3;
> if ((array_rad_test_poles[1,2] > glob__small) and (array_rad_test_poles[1,2] < glob_large_float)) then # if number 3
> omniout_float(ALWAYS,"Radius of convergence (three term test) for eq 1 ",4,array_rad_test_poles[1,2],4," ");
> if ((float_abs(array_rad_test_poles[1,2]) < glob_least_3_sing)) then # if number 4
> glob_least_3_sing := array_rad_test_poles[1,2];
> fi;# end if 4;
> omniout_complex(ALWAYS,"Order of pole (three term test) ",4, array_ord_test_poles[1,2],4," ");
> else
> omniout_str(ALWAYS,"NO REAL POLE (three term test) for Equation 1");
> fi;# end if 3;
> if ((array_rad_test_poles[1,3] > glob__small) and (array_rad_test_poles[1,3] < glob_large_float)) then # if number 3
> omniout_float(ALWAYS,"Radius of convergence (six term test) for eq 1 ",4,array_rad_test_poles[1,3],4," ");
> if ((float_abs(array_rad_test_poles[1,3]) < glob_least_6_sing)) then # if number 4
> glob_least_6_sing := array_rad_test_poles[1,3];
> fi;# end if 4;
> omniout_complex(ALWAYS,"Order of pole (six term test) ",4, array_ord_test_poles[1,3],4," ");
> else
> omniout_str(ALWAYS,"NO COMPLEX POLE (six term test) for Equation 1");
> fi;# end if 3
> ;
> end;
display_poles := proc()
local rad_given;
global ALWAYS, glob_display_flag, glob_larger_float, glob_large_float,
glob_diff_ord_fm, glob_diff_ord_fmm1, glob_diff_ord_fmm2, glob_diff_rc_fm,
glob_diff_rc_fmm1, glob_diff_rc_fmm2, glob_guess_error_ord,
glob_guess_error_rc, glob_type_given_pole, array_given_rad_poles,
array_given_ord_poles, array_rad_test_poles, array_ord_test_poles,
glob_least_3_sing, glob_least_6_sing, glob_least_given_sing,
glob_least_ratio_sing, array_x;
if glob_type_given_pole = 1 or glob_type_given_pole = 2 then
rad_given := float_abs(array_x[1] - array_given_rad_poles[1, 1]
- array_given_rad_poles[1, 2]*I);
omniout_float(ALWAYS,
"Radius of convergence (given) for eq 1 ", 4,
rad_given, 4, " ");
omniout_complex(ALWAYS,
"Order of pole (given) ", 4,
array_given_ord_poles[1, 1], 4, " ");
if float_abs(rad_given) < float_abs(glob_least_given_sing) and
0. < float_abs(rad_given) then glob_least_given_sing := rad_given
end if
elif glob_type_given_pole = 3 then
omniout_str(ALWAYS, "NO POLE (given) for Equation 1")
elif glob_type_given_pole = 5 then
omniout_str(ALWAYS, "SOME POLE (given) for Equation 1")
else omniout_str(ALWAYS, "NO INFO (given) for Equation 1")
end if;
if array_rad_test_poles[1, 1] < glob_large_float then
omniout_float(ALWAYS,
"Radius of convergence (ratio test) for eq 1 ", 4,
array_rad_test_poles[1, 1], 4, " ");
if float_abs(array_rad_test_poles[1, 1]) < glob_least_ratio_sing
then glob_least_ratio_sing := array_rad_test_poles[1, 1]
end if;
omniout_complex(ALWAYS,
"Order of pole (ratio test) ", 4,
array_ord_test_poles[1, 1], 4, " ")
else omniout_str(ALWAYS, "NO POLE (ratio test) for Equation 1")
end if;
if glob__small < array_rad_test_poles[1, 2] and
array_rad_test_poles[1, 2] < glob_large_float then
omniout_float(ALWAYS,
"Radius of convergence (three term test) for eq 1 ", 4,
array_rad_test_poles[1, 2], 4, " ");
if float_abs(array_rad_test_poles[1, 2]) < glob_least_3_sing then
glob_least_3_sing := array_rad_test_poles[1, 2]
end if;
omniout_complex(ALWAYS,
"Order of pole (three term test) ", 4,
array_ord_test_poles[1, 2], 4, " ")
else omniout_str(ALWAYS,
"NO REAL POLE (three term test) for Equation 1")
end if;
if glob__small < array_rad_test_poles[1, 3] and
array_rad_test_poles[1, 3] < glob_large_float then
omniout_float(ALWAYS,
"Radius of convergence (six term test) for eq 1 ", 4,
array_rad_test_poles[1, 3], 4, " ");
if float_abs(array_rad_test_poles[1, 3]) < glob_least_6_sing then
glob_least_6_sing := array_rad_test_poles[1, 3]
end if;
omniout_complex(ALWAYS,
"Order of pole (six term test) ", 4,
array_ord_test_poles[1, 3], 4, " ")
else omniout_str(ALWAYS,
"NO COMPLEX POLE (six term test) for Equation 1")
end if
end proc
# End Function number 2
# Begin Function number 3
> my_check_sign := proc( x0 ,xf)
> local ret;
> if (xf > x0) then # if number 3
> ret := glob__1;
> else
> ret := glob__m1;
> fi;# end if 3;
> ret;;
> end;
my_check_sign := proc(x0, xf)
local ret;
if x0 < xf then ret := glob__1 else ret := glob__m1 end if; ret
end proc
# End Function number 3
# Begin Function number 4
> est_size_answer := proc()
> global
> ALWAYS,
> INFO,
> DEBUGL,
> DEBUGMASSIVE,
> glob_iolevel,
> glob_yes_pole,
> glob_no_pole,
> glob_not_given,
> glob_no_sing_tests,
> glob_ratio_test,
> glob_three_term_test,
> glob_six_term_test,
> glob_log_10,
#Top Generate Globals Decl
> MAX_UNCHANGED,
> glob__small,
> glob_small_float,
> glob_smallish_float,
> glob_large_float,
> glob_larger_float,
> glob__m2,
> glob__m1,
> glob__0,
> glob__1,
> glob__2,
> glob__3,
> glob__4,
> glob__5,
> glob__8,
> glob__10,
> glob__100,
> glob__pi,
> glob__0_5,
> glob__0_8,
> glob__m0_8,
> glob__0_25,
> glob__0_125,
> glob_h,
> glob_nxt,
> glob_prec,
> glob_check_sign,
> glob_desired_digits_correct,
> glob_max_estimated_step_error,
> glob_ratio_of_radius,
> glob_percent_done,
> glob_total_exp_sec,
> glob_optimal_expect_sec,
> glob_estimated_size_answer,
> glob_almost_1,
> glob_clock_sec,
> glob_clock_start_sec,
> glob_disp_incr,
> glob_diff_rc_fm,
> glob_diff_rc_fmm1,
> glob_diff_rc_fmm2,
> glob_diff_ord_fm,
> glob_diff_ord_fmm1,
> glob_diff_ord_fmm2,
> glob_six_term_ord_save,
> glob_guess_error_rc,
> glob_guess_error_ord,
> glob_least_given_sing,
> glob_least_ratio_sing,
> glob_least_3_sing,
> glob_least_6_sing,
> glob_last_good_h,
> glob_max_h,
> glob_min_h,
> glob_display_interval,
> glob_abserr,
> glob_relerr,
> glob_min_pole_est,
> glob_max_rel_trunc_err,
> glob_max_trunc_err,
> glob_max_hours,
> glob_optimal_clock_start_sec,
> glob_optimal_start,
> glob_upper_ratio_limit,
> glob_lower_ratio_limit,
> glob_max_sec,
> glob_orig_start_sec,
> glob_normmax,
> glob_max_minutes,
> glob_next_display,
> glob_est_digits,
> glob_subiter_method,
> glob_html_log,
> glob_min_good_digits,
> glob_good_digits,
> glob_min_apfp_est_good_digits,
> glob_apfp_est_good_digits,
> glob_max_opt_iter,
> glob_dump,
> glob_djd_debug,
> glob_display_flag,
> glob_djd_debug2,
> glob_h_reason,
> glob_sec_in_minute,
> glob_min_in_hour,
> glob_hours_in_day,
> glob_days_in_year,
> glob_sec_in_hour,
> glob_sec_in_day,
> glob_sec_in_year,
> glob_not_yet_finished,
> glob_initial_pass,
> glob_not_yet_start_msg,
> glob_reached_optimal_h,
> glob_optimal_done,
> glob_type_given_pole,
> glob_optimize,
> glob_look_poles,
> glob_dump_closed_form,
> glob_max_iter,
> glob_no_eqs,
> glob_unchanged_h_cnt,
> glob_warned,
> glob_warned2,
> glob_start,
> glob_iter,
#Bottom Generate Globals Decl
#BEGIN CONST
> array_const_1,
> array_const_0D0,
#END CONST
> array_y_init,
> array_norms,
> array_fact_1,
> array_1st_rel_error,
> array_last_rel_error,
> array_est_rel_error,
> array_max_est_error,
> array_type_pole,
> array_type_real_pole,
> array_type_complex_pole,
> array_est_digits,
> array_y,
> array_x,
> array_tmp0,
> array_tmp1_g,
> array_tmp1,
> array_tmp2,
> array_m1,
> array_y_higher,
> array_y_higher_work,
> array_y_higher_work2,
> array_y_set_initial,
> array_given_rad_poles,
> array_given_ord_poles,
> array_rad_test_poles,
> array_ord_test_poles,
> array_fact_2,
> ATS_MAX_TERMS,
> glob_last;
> local min_size;
> min_size := glob_estimated_size_answer;
> if (float_abs(array_y[1]) < min_size) then # if number 3
> min_size := float_abs(array_y[1]);
> omniout_float(ALWAYS,"min_size",32,min_size,32,"");
> fi;# end if 3;
> if (min_size < glob__1) then # if number 3
> min_size := glob__1;
> omniout_float(ALWAYS,"min_size",32,min_size,32,"");
> fi;# end if 3;
> min_size;
> end;
est_size_answer := proc()
local min_size;
global ALWAYS, INFO, DEBUGL, DEBUGMASSIVE, glob_iolevel, glob_yes_pole,
glob_no_pole, glob_not_given, glob_no_sing_tests, glob_ratio_test,
glob_three_term_test, glob_six_term_test, glob_log_10, MAX_UNCHANGED,
glob__small, glob_small_float, glob_smallish_float, glob_large_float,
glob_larger_float, glob__m2, glob__m1, glob__0, glob__1, glob__2, glob__3,
glob__4, glob__5, glob__8, glob__10, glob__100, glob__pi, glob__0_5,
glob__0_8, glob__m0_8, glob__0_25, glob__0_125, glob_h, glob_nxt, glob_prec,
glob_check_sign, glob_desired_digits_correct, glob_max_estimated_step_error,
glob_ratio_of_radius, glob_percent_done, glob_total_exp_sec,
glob_optimal_expect_sec, glob_estimated_size_answer, glob_almost_1,
glob_clock_sec, glob_clock_start_sec, glob_disp_incr, glob_diff_rc_fm,
glob_diff_rc_fmm1, glob_diff_rc_fmm2, glob_diff_ord_fm, glob_diff_ord_fmm1,
glob_diff_ord_fmm2, glob_six_term_ord_save, glob_guess_error_rc,
glob_guess_error_ord, glob_least_given_sing, glob_least_ratio_sing,
glob_least_3_sing, glob_least_6_sing, glob_last_good_h, glob_max_h,
glob_min_h, glob_display_interval, glob_abserr, glob_relerr,
glob_min_pole_est, glob_max_rel_trunc_err, glob_max_trunc_err,
glob_max_hours, glob_optimal_clock_start_sec, glob_optimal_start,
glob_upper_ratio_limit, glob_lower_ratio_limit, glob_max_sec,
glob_orig_start_sec, glob_normmax, glob_max_minutes, glob_next_display,
glob_est_digits, glob_subiter_method, glob_html_log, glob_min_good_digits,
glob_good_digits, glob_min_apfp_est_good_digits, glob_apfp_est_good_digits,
glob_max_opt_iter, glob_dump, glob_djd_debug, glob_display_flag,
glob_djd_debug2, glob_h_reason, glob_sec_in_minute, glob_min_in_hour,
glob_hours_in_day, glob_days_in_year, glob_sec_in_hour, glob_sec_in_day,
glob_sec_in_year, glob_not_yet_finished, glob_initial_pass,
glob_not_yet_start_msg, glob_reached_optimal_h, glob_optimal_done,
glob_type_given_pole, glob_optimize, glob_look_poles, glob_dump_closed_form,
glob_max_iter, glob_no_eqs, glob_unchanged_h_cnt, glob_warned, glob_warned2,
glob_start, glob_iter, array_const_1, array_const_0D0, array_y_init,
array_norms, array_fact_1, array_1st_rel_error, array_last_rel_error,
array_est_rel_error, array_max_est_error, array_type_pole,
array_type_real_pole, array_type_complex_pole, array_est_digits, array_y,
array_x, array_tmp0, array_tmp1_g, array_tmp1, array_tmp2, array_m1,
array_y_higher, array_y_higher_work, array_y_higher_work2,
array_y_set_initial, array_given_rad_poles, array_given_ord_poles,
array_rad_test_poles, array_ord_test_poles, array_fact_2, ATS_MAX_TERMS,
glob_last;
min_size := glob_estimated_size_answer;
if float_abs(array_y[1]) < min_size then
min_size := float_abs(array_y[1]);
omniout_float(ALWAYS, "min_size", 32, min_size, 32, "")
end if;
if min_size < glob__1 then
min_size := glob__1;
omniout_float(ALWAYS, "min_size", 32, min_size, 32, "")
end if;
min_size
end proc
# End Function number 4
# Begin Function number 5
> test_suggested_h := proc()
> global
> ALWAYS,
> INFO,
> DEBUGL,
> DEBUGMASSIVE,
> glob_iolevel,
> glob_yes_pole,
> glob_no_pole,
> glob_not_given,
> glob_no_sing_tests,
> glob_ratio_test,
> glob_three_term_test,
> glob_six_term_test,
> glob_log_10,
#Top Generate Globals Decl
> MAX_UNCHANGED,
> glob__small,
> glob_small_float,
> glob_smallish_float,
> glob_large_float,
> glob_larger_float,
> glob__m2,
> glob__m1,
> glob__0,
> glob__1,
> glob__2,
> glob__3,
> glob__4,
> glob__5,
> glob__8,
> glob__10,
> glob__100,
> glob__pi,
> glob__0_5,
> glob__0_8,
> glob__m0_8,
> glob__0_25,
> glob__0_125,
> glob_h,
> glob_nxt,
> glob_prec,
> glob_check_sign,
> glob_desired_digits_correct,
> glob_max_estimated_step_error,
> glob_ratio_of_radius,
> glob_percent_done,
> glob_total_exp_sec,
> glob_optimal_expect_sec,
> glob_estimated_size_answer,
> glob_almost_1,
> glob_clock_sec,
> glob_clock_start_sec,
> glob_disp_incr,
> glob_diff_rc_fm,
> glob_diff_rc_fmm1,
> glob_diff_rc_fmm2,
> glob_diff_ord_fm,
> glob_diff_ord_fmm1,
> glob_diff_ord_fmm2,
> glob_six_term_ord_save,
> glob_guess_error_rc,
> glob_guess_error_ord,
> glob_least_given_sing,
> glob_least_ratio_sing,
> glob_least_3_sing,
> glob_least_6_sing,
> glob_last_good_h,
> glob_max_h,
> glob_min_h,
> glob_display_interval,
> glob_abserr,
> glob_relerr,
> glob_min_pole_est,
> glob_max_rel_trunc_err,
> glob_max_trunc_err,
> glob_max_hours,
> glob_optimal_clock_start_sec,
> glob_optimal_start,
> glob_upper_ratio_limit,
> glob_lower_ratio_limit,
> glob_max_sec,
> glob_orig_start_sec,
> glob_normmax,
> glob_max_minutes,
> glob_next_display,
> glob_est_digits,
> glob_subiter_method,
> glob_html_log,
> glob_min_good_digits,
> glob_good_digits,
> glob_min_apfp_est_good_digits,
> glob_apfp_est_good_digits,
> glob_max_opt_iter,
> glob_dump,
> glob_djd_debug,
> glob_display_flag,
> glob_djd_debug2,
> glob_h_reason,
> glob_sec_in_minute,
> glob_min_in_hour,
> glob_hours_in_day,
> glob_days_in_year,
> glob_sec_in_hour,
> glob_sec_in_day,
> glob_sec_in_year,
> glob_not_yet_finished,
> glob_initial_pass,
> glob_not_yet_start_msg,
> glob_reached_optimal_h,
> glob_optimal_done,
> glob_type_given_pole,
> glob_optimize,
> glob_look_poles,
> glob_dump_closed_form,
> glob_max_iter,
> glob_no_eqs,
> glob_unchanged_h_cnt,
> glob_warned,
> glob_warned2,
> glob_start,
> glob_iter,
#Bottom Generate Globals Decl
#BEGIN CONST
> array_const_1,
> array_const_0D0,
#END CONST
> array_y_init,
> array_norms,
> array_fact_1,
> array_1st_rel_error,
> array_last_rel_error,
> array_est_rel_error,
> array_max_est_error,
> array_type_pole,
> array_type_real_pole,
> array_type_complex_pole,
> array_est_digits,
> array_y,
> array_x,
> array_tmp0,
> array_tmp1_g,
> array_tmp1,
> array_tmp2,
> array_m1,
> array_y_higher,
> array_y_higher_work,
> array_y_higher_work2,
> array_y_set_initial,
> array_given_rad_poles,
> array_given_ord_poles,
> array_rad_test_poles,
> array_ord_test_poles,
> array_fact_2,
> ATS_MAX_TERMS,
> glob_last;
> local max_estimated_step_error,hn_div_ho,hn_div_ho_2,hn_div_ho_3,no_terms,est_tmp;
> max_estimated_step_error := glob__small;
> no_terms := ATS_MAX_TERMS;
> hn_div_ho := glob__0_5;
> hn_div_ho_2 := glob__0_25;
> hn_div_ho_3 := glob__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 := float_abs(array_y[no_terms-3] + array_y[no_terms - 2] * hn_div_ho + array_y[no_terms - 1] * hn_div_ho_2 + array_y[no_terms] * hn_div_ho_3);
> if (est_tmp >= max_estimated_step_error) then # if number 3
> max_estimated_step_error := est_tmp;
> fi;# end if 3;
> omniout_float(ALWAYS,"max_estimated_step_error",32,max_estimated_step_error,32,"");
> max_estimated_step_error;
> end;
test_suggested_h := proc()
local max_estimated_step_error, hn_div_ho, hn_div_ho_2, hn_div_ho_3,
no_terms, est_tmp;
global ALWAYS, INFO, DEBUGL, DEBUGMASSIVE, glob_iolevel, glob_yes_pole,
glob_no_pole, glob_not_given, glob_no_sing_tests, glob_ratio_test,
glob_three_term_test, glob_six_term_test, glob_log_10, MAX_UNCHANGED,
glob__small, glob_small_float, glob_smallish_float, glob_large_float,
glob_larger_float, glob__m2, glob__m1, glob__0, glob__1, glob__2, glob__3,
glob__4, glob__5, glob__8, glob__10, glob__100, glob__pi, glob__0_5,
glob__0_8, glob__m0_8, glob__0_25, glob__0_125, glob_h, glob_nxt, glob_prec,
glob_check_sign, glob_desired_digits_correct, glob_max_estimated_step_error,
glob_ratio_of_radius, glob_percent_done, glob_total_exp_sec,
glob_optimal_expect_sec, glob_estimated_size_answer, glob_almost_1,
glob_clock_sec, glob_clock_start_sec, glob_disp_incr, glob_diff_rc_fm,
glob_diff_rc_fmm1, glob_diff_rc_fmm2, glob_diff_ord_fm, glob_diff_ord_fmm1,
glob_diff_ord_fmm2, glob_six_term_ord_save, glob_guess_error_rc,
glob_guess_error_ord, glob_least_given_sing, glob_least_ratio_sing,
glob_least_3_sing, glob_least_6_sing, glob_last_good_h, glob_max_h,
glob_min_h, glob_display_interval, glob_abserr, glob_relerr,
glob_min_pole_est, glob_max_rel_trunc_err, glob_max_trunc_err,
glob_max_hours, glob_optimal_clock_start_sec, glob_optimal_start,
glob_upper_ratio_limit, glob_lower_ratio_limit, glob_max_sec,
glob_orig_start_sec, glob_normmax, glob_max_minutes, glob_next_display,
glob_est_digits, glob_subiter_method, glob_html_log, glob_min_good_digits,
glob_good_digits, glob_min_apfp_est_good_digits, glob_apfp_est_good_digits,
glob_max_opt_iter, glob_dump, glob_djd_debug, glob_display_flag,
glob_djd_debug2, glob_h_reason, glob_sec_in_minute, glob_min_in_hour,
glob_hours_in_day, glob_days_in_year, glob_sec_in_hour, glob_sec_in_day,
glob_sec_in_year, glob_not_yet_finished, glob_initial_pass,
glob_not_yet_start_msg, glob_reached_optimal_h, glob_optimal_done,
glob_type_given_pole, glob_optimize, glob_look_poles, glob_dump_closed_form,
glob_max_iter, glob_no_eqs, glob_unchanged_h_cnt, glob_warned, glob_warned2,
glob_start, glob_iter, array_const_1, array_const_0D0, array_y_init,
array_norms, array_fact_1, array_1st_rel_error, array_last_rel_error,
array_est_rel_error, array_max_est_error, array_type_pole,
array_type_real_pole, array_type_complex_pole, array_est_digits, array_y,
array_x, array_tmp0, array_tmp1_g, array_tmp1, array_tmp2, array_m1,
array_y_higher, array_y_higher_work, array_y_higher_work2,
array_y_set_initial, array_given_rad_poles, array_given_ord_poles,
array_rad_test_poles, array_ord_test_poles, array_fact_2, ATS_MAX_TERMS,
glob_last;
max_estimated_step_error := glob__small;
no_terms := ATS_MAX_TERMS;
hn_div_ho := glob__0_5;
hn_div_ho_2 := glob__0_25;
hn_div_ho_3 := glob__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 := float_abs(array_y[no_terms - 3]
+ array_y[no_terms - 2]*hn_div_ho
+ array_y[no_terms - 1]*hn_div_ho_2
+ array_y[no_terms]*hn_div_ho_3);
if max_estimated_step_error <= est_tmp then
max_estimated_step_error := est_tmp
end if;
omniout_float(ALWAYS, "max_estimated_step_error", 32,
max_estimated_step_error, 32, "");
max_estimated_step_error
end proc
# End Function number 5
# Begin Function number 6
> track_estimated_error := proc()
> global
> ALWAYS,
> INFO,
> DEBUGL,
> DEBUGMASSIVE,
> glob_iolevel,
> glob_yes_pole,
> glob_no_pole,
> glob_not_given,
> glob_no_sing_tests,
> glob_ratio_test,
> glob_three_term_test,
> glob_six_term_test,
> glob_log_10,
#Top Generate Globals Decl
> MAX_UNCHANGED,
> glob__small,
> glob_small_float,
> glob_smallish_float,
> glob_large_float,
> glob_larger_float,
> glob__m2,
> glob__m1,
> glob__0,
> glob__1,
> glob__2,
> glob__3,
> glob__4,
> glob__5,
> glob__8,
> glob__10,
> glob__100,
> glob__pi,
> glob__0_5,
> glob__0_8,
> glob__m0_8,
> glob__0_25,
> glob__0_125,
> glob_h,
> glob_nxt,
> glob_prec,
> glob_check_sign,
> glob_desired_digits_correct,
> glob_max_estimated_step_error,
> glob_ratio_of_radius,
> glob_percent_done,
> glob_total_exp_sec,
> glob_optimal_expect_sec,
> glob_estimated_size_answer,
> glob_almost_1,
> glob_clock_sec,
> glob_clock_start_sec,
> glob_disp_incr,
> glob_diff_rc_fm,
> glob_diff_rc_fmm1,
> glob_diff_rc_fmm2,
> glob_diff_ord_fm,
> glob_diff_ord_fmm1,
> glob_diff_ord_fmm2,
> glob_six_term_ord_save,
> glob_guess_error_rc,
> glob_guess_error_ord,
> glob_least_given_sing,
> glob_least_ratio_sing,
> glob_least_3_sing,
> glob_least_6_sing,
> glob_last_good_h,
> glob_max_h,
> glob_min_h,
> glob_display_interval,
> glob_abserr,
> glob_relerr,
> glob_min_pole_est,
> glob_max_rel_trunc_err,
> glob_max_trunc_err,
> glob_max_hours,
> glob_optimal_clock_start_sec,
> glob_optimal_start,
> glob_upper_ratio_limit,
> glob_lower_ratio_limit,
> glob_max_sec,
> glob_orig_start_sec,
> glob_normmax,
> glob_max_minutes,
> glob_next_display,
> glob_est_digits,
> glob_subiter_method,
> glob_html_log,
> glob_min_good_digits,
> glob_good_digits,
> glob_min_apfp_est_good_digits,
> glob_apfp_est_good_digits,
> glob_max_opt_iter,
> glob_dump,
> glob_djd_debug,
> glob_display_flag,
> glob_djd_debug2,
> glob_h_reason,
> glob_sec_in_minute,
> glob_min_in_hour,
> glob_hours_in_day,
> glob_days_in_year,
> glob_sec_in_hour,
> glob_sec_in_day,
> glob_sec_in_year,
> glob_not_yet_finished,
> glob_initial_pass,
> glob_not_yet_start_msg,
> glob_reached_optimal_h,
> glob_optimal_done,
> glob_type_given_pole,
> glob_optimize,
> glob_look_poles,
> glob_dump_closed_form,
> glob_max_iter,
> glob_no_eqs,
> glob_unchanged_h_cnt,
> glob_warned,
> glob_warned2,
> glob_start,
> glob_iter,
#Bottom Generate Globals Decl
#BEGIN CONST
> array_const_1,
> array_const_0D0,
#END CONST
> array_y_init,
> array_norms,
> array_fact_1,
> array_1st_rel_error,
> array_last_rel_error,
> array_est_rel_error,
> array_max_est_error,
> array_type_pole,
> array_type_real_pole,
> array_type_complex_pole,
> array_est_digits,
> array_y,
> array_x,
> array_tmp0,
> array_tmp1_g,
> array_tmp1,
> array_tmp2,
> array_m1,
> array_y_higher,
> array_y_higher_work,
> array_y_higher_work2,
> array_y_set_initial,
> array_given_rad_poles,
> array_given_ord_poles,
> array_rad_test_poles,
> array_ord_test_poles,
> array_fact_2,
> ATS_MAX_TERMS,
> glob_last;
> local hn_div_ho,hn_div_ho_2,hn_div_ho_3,no_terms,est_tmp;
> no_terms := ATS_MAX_TERMS;
> hn_div_ho := glob__0_5;
> hn_div_ho_2 := glob__0_25;
> hn_div_ho_3 := glob__0_125;
> est_tmp := c(float_abs(array_y[no_terms-3])) + c(float_abs(array_y[no_terms - 2])) * c(hn_div_ho) + c(float_abs(array_y[no_terms - 1])) * c(hn_div_ho_2) + c(float_abs(array_y[no_terms])) * c(hn_div_ho_3);
> if (glob_prec * c(float_abs(array_y[1])) > c(est_tmp)) then # if number 3
> est_tmp := c(glob_prec) * c(float_abs(array_y[1]));
> fi;# end if 3;
> if (c(est_tmp) >= c(array_max_est_error[1])) then # if number 3
> array_max_est_error[1] := c(est_tmp);
> fi;# end if 3
> ;
> end;
track_estimated_error := proc()
local hn_div_ho, hn_div_ho_2, hn_div_ho_3, no_terms, est_tmp;
global ALWAYS, INFO, DEBUGL, DEBUGMASSIVE, glob_iolevel, glob_yes_pole,
glob_no_pole, glob_not_given, glob_no_sing_tests, glob_ratio_test,
glob_three_term_test, glob_six_term_test, glob_log_10, MAX_UNCHANGED,
glob__small, glob_small_float, glob_smallish_float, glob_large_float,
glob_larger_float, glob__m2, glob__m1, glob__0, glob__1, glob__2, glob__3,
glob__4, glob__5, glob__8, glob__10, glob__100, glob__pi, glob__0_5,
glob__0_8, glob__m0_8, glob__0_25, glob__0_125, glob_h, glob_nxt, glob_prec,
glob_check_sign, glob_desired_digits_correct, glob_max_estimated_step_error,
glob_ratio_of_radius, glob_percent_done, glob_total_exp_sec,
glob_optimal_expect_sec, glob_estimated_size_answer, glob_almost_1,
glob_clock_sec, glob_clock_start_sec, glob_disp_incr, glob_diff_rc_fm,
glob_diff_rc_fmm1, glob_diff_rc_fmm2, glob_diff_ord_fm, glob_diff_ord_fmm1,
glob_diff_ord_fmm2, glob_six_term_ord_save, glob_guess_error_rc,
glob_guess_error_ord, glob_least_given_sing, glob_least_ratio_sing,
glob_least_3_sing, glob_least_6_sing, glob_last_good_h, glob_max_h,
glob_min_h, glob_display_interval, glob_abserr, glob_relerr,
glob_min_pole_est, glob_max_rel_trunc_err, glob_max_trunc_err,
glob_max_hours, glob_optimal_clock_start_sec, glob_optimal_start,
glob_upper_ratio_limit, glob_lower_ratio_limit, glob_max_sec,
glob_orig_start_sec, glob_normmax, glob_max_minutes, glob_next_display,
glob_est_digits, glob_subiter_method, glob_html_log, glob_min_good_digits,
glob_good_digits, glob_min_apfp_est_good_digits, glob_apfp_est_good_digits,
glob_max_opt_iter, glob_dump, glob_djd_debug, glob_display_flag,
glob_djd_debug2, glob_h_reason, glob_sec_in_minute, glob_min_in_hour,
glob_hours_in_day, glob_days_in_year, glob_sec_in_hour, glob_sec_in_day,
glob_sec_in_year, glob_not_yet_finished, glob_initial_pass,
glob_not_yet_start_msg, glob_reached_optimal_h, glob_optimal_done,
glob_type_given_pole, glob_optimize, glob_look_poles, glob_dump_closed_form,
glob_max_iter, glob_no_eqs, glob_unchanged_h_cnt, glob_warned, glob_warned2,
glob_start, glob_iter, array_const_1, array_const_0D0, array_y_init,
array_norms, array_fact_1, array_1st_rel_error, array_last_rel_error,
array_est_rel_error, array_max_est_error, array_type_pole,
array_type_real_pole, array_type_complex_pole, array_est_digits, array_y,
array_x, array_tmp0, array_tmp1_g, array_tmp1, array_tmp2, array_m1,
array_y_higher, array_y_higher_work, array_y_higher_work2,
array_y_set_initial, array_given_rad_poles, array_given_ord_poles,
array_rad_test_poles, array_ord_test_poles, array_fact_2, ATS_MAX_TERMS,
glob_last;
no_terms := ATS_MAX_TERMS;
hn_div_ho := glob__0_5;
hn_div_ho_2 := glob__0_25;
hn_div_ho_3 := glob__0_125;
est_tmp := c(float_abs(array_y[no_terms - 3]))
+ c(float_abs(array_y[no_terms - 2]))*c(hn_div_ho)
+ c(float_abs(array_y[no_terms - 1]))*c(hn_div_ho_2)
+ c(float_abs(array_y[no_terms]))*c(hn_div_ho_3);
if c(est_tmp) < glob_prec*c(float_abs(array_y[1])) then
est_tmp := c(glob_prec)*c(float_abs(array_y[1]))
end if;
if c(array_max_est_error[1]) <= c(est_tmp) then
array_max_est_error[1] := c(est_tmp)
end if
end proc
# End Function number 6
# Begin Function number 7
> reached_interval := proc()
> global
> ALWAYS,
> INFO,
> DEBUGL,
> DEBUGMASSIVE,
> glob_iolevel,
> glob_yes_pole,
> glob_no_pole,
> glob_not_given,
> glob_no_sing_tests,
> glob_ratio_test,
> glob_three_term_test,
> glob_six_term_test,
> glob_log_10,
#Top Generate Globals Decl
> MAX_UNCHANGED,
> glob__small,
> glob_small_float,
> glob_smallish_float,
> glob_large_float,
> glob_larger_float,
> glob__m2,
> glob__m1,
> glob__0,
> glob__1,
> glob__2,
> glob__3,
> glob__4,
> glob__5,
> glob__8,
> glob__10,
> glob__100,
> glob__pi,
> glob__0_5,
> glob__0_8,
> glob__m0_8,
> glob__0_25,
> glob__0_125,
> glob_h,
> glob_nxt,
> glob_prec,
> glob_check_sign,
> glob_desired_digits_correct,
> glob_max_estimated_step_error,
> glob_ratio_of_radius,
> glob_percent_done,
> glob_total_exp_sec,
> glob_optimal_expect_sec,
> glob_estimated_size_answer,
> glob_almost_1,
> glob_clock_sec,
> glob_clock_start_sec,
> glob_disp_incr,
> glob_diff_rc_fm,
> glob_diff_rc_fmm1,
> glob_diff_rc_fmm2,
> glob_diff_ord_fm,
> glob_diff_ord_fmm1,
> glob_diff_ord_fmm2,
> glob_six_term_ord_save,
> glob_guess_error_rc,
> glob_guess_error_ord,
> glob_least_given_sing,
> glob_least_ratio_sing,
> glob_least_3_sing,
> glob_least_6_sing,
> glob_last_good_h,
> glob_max_h,
> glob_min_h,
> glob_display_interval,
> glob_abserr,
> glob_relerr,
> glob_min_pole_est,
> glob_max_rel_trunc_err,
> glob_max_trunc_err,
> glob_max_hours,
> glob_optimal_clock_start_sec,
> glob_optimal_start,
> glob_upper_ratio_limit,
> glob_lower_ratio_limit,
> glob_max_sec,
> glob_orig_start_sec,
> glob_normmax,
> glob_max_minutes,
> glob_next_display,
> glob_est_digits,
> glob_subiter_method,
> glob_html_log,
> glob_min_good_digits,
> glob_good_digits,
> glob_min_apfp_est_good_digits,
> glob_apfp_est_good_digits,
> glob_max_opt_iter,
> glob_dump,
> glob_djd_debug,
> glob_display_flag,
> glob_djd_debug2,
> glob_h_reason,
> glob_sec_in_minute,
> glob_min_in_hour,
> glob_hours_in_day,
> glob_days_in_year,
> glob_sec_in_hour,
> glob_sec_in_day,
> glob_sec_in_year,
> glob_not_yet_finished,
> glob_initial_pass,
> glob_not_yet_start_msg,
> glob_reached_optimal_h,
> glob_optimal_done,
> glob_type_given_pole,
> glob_optimize,
> glob_look_poles,
> glob_dump_closed_form,
> glob_max_iter,
> glob_no_eqs,
> glob_unchanged_h_cnt,
> glob_warned,
> glob_warned2,
> glob_start,
> glob_iter,
#Bottom Generate Globals Decl
#BEGIN CONST
> array_const_1,
> array_const_0D0,
#END CONST
> array_y_init,
> array_norms,
> array_fact_1,
> array_1st_rel_error,
> array_last_rel_error,
> array_est_rel_error,
> array_max_est_error,
> array_type_pole,
> array_type_real_pole,
> array_type_complex_pole,
> array_est_digits,
> array_y,
> array_x,
> array_tmp0,
> array_tmp1_g,
> array_tmp1,
> array_tmp2,
> array_m1,
> array_y_higher,
> array_y_higher_work,
> array_y_higher_work2,
> array_y_set_initial,
> array_given_rad_poles,
> array_given_ord_poles,
> array_rad_test_poles,
> array_ord_test_poles,
> array_fact_2,
> ATS_MAX_TERMS,
> glob_last;
> local ret;
> if ((glob_check_sign * array_x[1]) >= (glob_check_sign * glob_next_display - glob_h/glob__10)) then # if number 3
> ret := true;
> else
> ret := false;
> fi;# end if 3;
> return(ret);
> end;
reached_interval := proc()
local ret;
global ALWAYS, INFO, DEBUGL, DEBUGMASSIVE, glob_iolevel, glob_yes_pole,
glob_no_pole, glob_not_given, glob_no_sing_tests, glob_ratio_test,
glob_three_term_test, glob_six_term_test, glob_log_10, MAX_UNCHANGED,
glob__small, glob_small_float, glob_smallish_float, glob_large_float,
glob_larger_float, glob__m2, glob__m1, glob__0, glob__1, glob__2, glob__3,
glob__4, glob__5, glob__8, glob__10, glob__100, glob__pi, glob__0_5,
glob__0_8, glob__m0_8, glob__0_25, glob__0_125, glob_h, glob_nxt, glob_prec,
glob_check_sign, glob_desired_digits_correct, glob_max_estimated_step_error,
glob_ratio_of_radius, glob_percent_done, glob_total_exp_sec,
glob_optimal_expect_sec, glob_estimated_size_answer, glob_almost_1,
glob_clock_sec, glob_clock_start_sec, glob_disp_incr, glob_diff_rc_fm,
glob_diff_rc_fmm1, glob_diff_rc_fmm2, glob_diff_ord_fm, glob_diff_ord_fmm1,
glob_diff_ord_fmm2, glob_six_term_ord_save, glob_guess_error_rc,
glob_guess_error_ord, glob_least_given_sing, glob_least_ratio_sing,
glob_least_3_sing, glob_least_6_sing, glob_last_good_h, glob_max_h,
glob_min_h, glob_display_interval, glob_abserr, glob_relerr,
glob_min_pole_est, glob_max_rel_trunc_err, glob_max_trunc_err,
glob_max_hours, glob_optimal_clock_start_sec, glob_optimal_start,
glob_upper_ratio_limit, glob_lower_ratio_limit, glob_max_sec,
glob_orig_start_sec, glob_normmax, glob_max_minutes, glob_next_display,
glob_est_digits, glob_subiter_method, glob_html_log, glob_min_good_digits,
glob_good_digits, glob_min_apfp_est_good_digits, glob_apfp_est_good_digits,
glob_max_opt_iter, glob_dump, glob_djd_debug, glob_display_flag,
glob_djd_debug2, glob_h_reason, glob_sec_in_minute, glob_min_in_hour,
glob_hours_in_day, glob_days_in_year, glob_sec_in_hour, glob_sec_in_day,
glob_sec_in_year, glob_not_yet_finished, glob_initial_pass,
glob_not_yet_start_msg, glob_reached_optimal_h, glob_optimal_done,
glob_type_given_pole, glob_optimize, glob_look_poles, glob_dump_closed_form,
glob_max_iter, glob_no_eqs, glob_unchanged_h_cnt, glob_warned, glob_warned2,
glob_start, glob_iter, array_const_1, array_const_0D0, array_y_init,
array_norms, array_fact_1, array_1st_rel_error, array_last_rel_error,
array_est_rel_error, array_max_est_error, array_type_pole,
array_type_real_pole, array_type_complex_pole, array_est_digits, array_y,
array_x, array_tmp0, array_tmp1_g, array_tmp1, array_tmp2, array_m1,
array_y_higher, array_y_higher_work, array_y_higher_work2,
array_y_set_initial, array_given_rad_poles, array_given_ord_poles,
array_rad_test_poles, array_ord_test_poles, array_fact_2, ATS_MAX_TERMS,
glob_last;
if glob_check_sign*glob_next_display - glob_h/glob__10 <=
glob_check_sign*array_x[1] then ret := true
else ret := false
end if;
return ret
end proc
# End Function number 7
# Begin Function number 8
> display_alot := proc(iter)
> global
> ALWAYS,
> INFO,
> DEBUGL,
> DEBUGMASSIVE,
> glob_iolevel,
> glob_yes_pole,
> glob_no_pole,
> glob_not_given,
> glob_no_sing_tests,
> glob_ratio_test,
> glob_three_term_test,
> glob_six_term_test,
> glob_log_10,
#Top Generate Globals Decl
> MAX_UNCHANGED,
> glob__small,
> glob_small_float,
> glob_smallish_float,
> glob_large_float,
> glob_larger_float,
> glob__m2,
> glob__m1,
> glob__0,
> glob__1,
> glob__2,
> glob__3,
> glob__4,
> glob__5,
> glob__8,
> glob__10,
> glob__100,
> glob__pi,
> glob__0_5,
> glob__0_8,
> glob__m0_8,
> glob__0_25,
> glob__0_125,
> glob_h,
> glob_nxt,
> glob_prec,
> glob_check_sign,
> glob_desired_digits_correct,
> glob_max_estimated_step_error,
> glob_ratio_of_radius,
> glob_percent_done,
> glob_total_exp_sec,
> glob_optimal_expect_sec,
> glob_estimated_size_answer,
> glob_almost_1,
> glob_clock_sec,
> glob_clock_start_sec,
> glob_disp_incr,
> glob_diff_rc_fm,
> glob_diff_rc_fmm1,
> glob_diff_rc_fmm2,
> glob_diff_ord_fm,
> glob_diff_ord_fmm1,
> glob_diff_ord_fmm2,
> glob_six_term_ord_save,
> glob_guess_error_rc,
> glob_guess_error_ord,
> glob_least_given_sing,
> glob_least_ratio_sing,
> glob_least_3_sing,
> glob_least_6_sing,
> glob_last_good_h,
> glob_max_h,
> glob_min_h,
> glob_display_interval,
> glob_abserr,
> glob_relerr,
> glob_min_pole_est,
> glob_max_rel_trunc_err,
> glob_max_trunc_err,
> glob_max_hours,
> glob_optimal_clock_start_sec,
> glob_optimal_start,
> glob_upper_ratio_limit,
> glob_lower_ratio_limit,
> glob_max_sec,
> glob_orig_start_sec,
> glob_normmax,
> glob_max_minutes,
> glob_next_display,
> glob_est_digits,
> glob_subiter_method,
> glob_html_log,
> glob_min_good_digits,
> glob_good_digits,
> glob_min_apfp_est_good_digits,
> glob_apfp_est_good_digits,
> glob_max_opt_iter,
> glob_dump,
> glob_djd_debug,
> glob_display_flag,
> glob_djd_debug2,
> glob_h_reason,
> glob_sec_in_minute,
> glob_min_in_hour,
> glob_hours_in_day,
> glob_days_in_year,
> glob_sec_in_hour,
> glob_sec_in_day,
> glob_sec_in_year,
> glob_not_yet_finished,
> glob_initial_pass,
> glob_not_yet_start_msg,
> glob_reached_optimal_h,
> glob_optimal_done,
> glob_type_given_pole,
> glob_optimize,
> glob_look_poles,
> glob_dump_closed_form,
> glob_max_iter,
> glob_no_eqs,
> glob_unchanged_h_cnt,
> glob_warned,
> glob_warned2,
> glob_start,
> glob_iter,
#Bottom Generate Globals Decl
#BEGIN CONST
> array_const_1,
> array_const_0D0,
#END CONST
> array_y_init,
> array_norms,
> array_fact_1,
> array_1st_rel_error,
> array_last_rel_error,
> array_est_rel_error,
> array_max_est_error,
> array_type_pole,
> array_type_real_pole,
> array_type_complex_pole,
> array_est_digits,
> array_y,
> array_x,
> array_tmp0,
> array_tmp1_g,
> array_tmp1,
> array_tmp2,
> array_m1,
> array_y_higher,
> array_y_higher_work,
> array_y_higher_work2,
> array_y_set_initial,
> array_given_rad_poles,
> array_given_ord_poles,
> array_rad_test_poles,
> array_ord_test_poles,
> array_fact_2,
> ATS_MAX_TERMS,
> glob_last;
> local abserr, closed_form_val_y, ind_var, numeric_val, relerr, term_no, est_rel_err;
> #TOP DISPLAY ALOT
> ind_var := array_x[1];
> omniout_complex(ALWAYS,"x[1] ",33,ind_var,20," ");
> term_no := 1;
> numeric_val := array_y[term_no];
> omniout_complex(ALWAYS,"h ",33,glob_h,20," ");
> omniout_complex(ALWAYS,"y[1] (numeric) ",33,numeric_val,20," ");
> closed_form_val_y := evalf(exact_soln_y(ind_var));
> omniout_complex(ALWAYS,"y[1] (closed_form) ",33,closed_form_val_y,20," ");
> abserr := float_abs(numeric_val - closed_form_val_y);
> if (float_abs(closed_form_val_y) > 0.0) then # if number 3
> relerr := abserr/float_abs(closed_form_val_y);
> if (float_abs(c(relerr)) > 0.0) then # if number 4
> glob_good_digits := round(-log10(relerr));
> else
> relerr := 0.0 ;
> glob_good_digits := Digits - 2;
> fi;# end if 4;
> else
> ;
> relerr := glob__m1 ;
> glob_good_digits := -16;
> fi;# end if 3;
> if (glob_good_digits < glob_min_good_digits) then # if number 3
> glob_min_good_digits := glob_good_digits;
> fi;# end if 3;
> omniout_float(ALWAYS,"absolute error ",4,abserr,4," ");
> omniout_float(ALWAYS,"relative error ",4,relerr * glob__100 ,4,"%");
> omniout_int(INFO,"Correct digits ",32,glob_good_digits,4," ")
> ;
> #BOTTOM DISPLAY ALOT
> end;
display_alot := proc(iter)
local abserr, closed_form_val_y, ind_var, numeric_val, relerr, term_no,
est_rel_err;
global ALWAYS, INFO, DEBUGL, DEBUGMASSIVE, glob_iolevel, glob_yes_pole,
glob_no_pole, glob_not_given, glob_no_sing_tests, glob_ratio_test,
glob_three_term_test, glob_six_term_test, glob_log_10, MAX_UNCHANGED,
glob__small, glob_small_float, glob_smallish_float, glob_large_float,
glob_larger_float, glob__m2, glob__m1, glob__0, glob__1, glob__2, glob__3,
glob__4, glob__5, glob__8, glob__10, glob__100, glob__pi, glob__0_5,
glob__0_8, glob__m0_8, glob__0_25, glob__0_125, glob_h, glob_nxt, glob_prec,
glob_check_sign, glob_desired_digits_correct, glob_max_estimated_step_error,
glob_ratio_of_radius, glob_percent_done, glob_total_exp_sec,
glob_optimal_expect_sec, glob_estimated_size_answer, glob_almost_1,
glob_clock_sec, glob_clock_start_sec, glob_disp_incr, glob_diff_rc_fm,
glob_diff_rc_fmm1, glob_diff_rc_fmm2, glob_diff_ord_fm, glob_diff_ord_fmm1,
glob_diff_ord_fmm2, glob_six_term_ord_save, glob_guess_error_rc,
glob_guess_error_ord, glob_least_given_sing, glob_least_ratio_sing,
glob_least_3_sing, glob_least_6_sing, glob_last_good_h, glob_max_h,
glob_min_h, glob_display_interval, glob_abserr, glob_relerr,
glob_min_pole_est, glob_max_rel_trunc_err, glob_max_trunc_err,
glob_max_hours, glob_optimal_clock_start_sec, glob_optimal_start,
glob_upper_ratio_limit, glob_lower_ratio_limit, glob_max_sec,
glob_orig_start_sec, glob_normmax, glob_max_minutes, glob_next_display,
glob_est_digits, glob_subiter_method, glob_html_log, glob_min_good_digits,
glob_good_digits, glob_min_apfp_est_good_digits, glob_apfp_est_good_digits,
glob_max_opt_iter, glob_dump, glob_djd_debug, glob_display_flag,
glob_djd_debug2, glob_h_reason, glob_sec_in_minute, glob_min_in_hour,
glob_hours_in_day, glob_days_in_year, glob_sec_in_hour, glob_sec_in_day,
glob_sec_in_year, glob_not_yet_finished, glob_initial_pass,
glob_not_yet_start_msg, glob_reached_optimal_h, glob_optimal_done,
glob_type_given_pole, glob_optimize, glob_look_poles, glob_dump_closed_form,
glob_max_iter, glob_no_eqs, glob_unchanged_h_cnt, glob_warned, glob_warned2,
glob_start, glob_iter, array_const_1, array_const_0D0, array_y_init,
array_norms, array_fact_1, array_1st_rel_error, array_last_rel_error,
array_est_rel_error, array_max_est_error, array_type_pole,
array_type_real_pole, array_type_complex_pole, array_est_digits, array_y,
array_x, array_tmp0, array_tmp1_g, array_tmp1, array_tmp2, array_m1,
array_y_higher, array_y_higher_work, array_y_higher_work2,
array_y_set_initial, array_given_rad_poles, array_given_ord_poles,
array_rad_test_poles, array_ord_test_poles, array_fact_2, ATS_MAX_TERMS,
glob_last;
ind_var := array_x[1];
omniout_complex(ALWAYS, "x[1] ", 33,
ind_var, 20, " ");
term_no := 1;
numeric_val := array_y[term_no];
omniout_complex(ALWAYS, "h ", 33, glob_h,
20, " ");
omniout_complex(ALWAYS, "y[1] (numeric) ", 33,
numeric_val, 20, " ");
closed_form_val_y := evalf(exact_soln_y(ind_var));
omniout_complex(ALWAYS, "y[1] (closed_form) ", 33,
closed_form_val_y, 20, " ");
abserr := float_abs(numeric_val - closed_form_val_y);
if 0. < float_abs(closed_form_val_y) then
relerr := abserr/float_abs(closed_form_val_y);
if 0. < float_abs(c(relerr)) then
glob_good_digits := round(-log10(relerr))
else relerr := 0.; glob_good_digits := Digits - 2
end if
else relerr := glob__m1; glob_good_digits := -16
end if;
if glob_good_digits < glob_min_good_digits then
glob_min_good_digits := glob_good_digits
end if;
omniout_float(ALWAYS, "absolute error ", 4, abserr, 4,
" ");
omniout_float(ALWAYS, "relative error ", 4,
relerr*glob__100, 4, "%");
omniout_int(INFO, "Correct digits ", 32,
glob_good_digits, 4, " ")
end proc
# End Function number 8
# Begin Function number 9
> prog_report := proc(x_start,x_end)
> global
> ALWAYS,
> INFO,
> DEBUGL,
> DEBUGMASSIVE,
> glob_iolevel,
> glob_yes_pole,
> glob_no_pole,
> glob_not_given,
> glob_no_sing_tests,
> glob_ratio_test,
> glob_three_term_test,
> glob_six_term_test,
> glob_log_10,
#Top Generate Globals Decl
> MAX_UNCHANGED,
> glob__small,
> glob_small_float,
> glob_smallish_float,
> glob_large_float,
> glob_larger_float,
> glob__m2,
> glob__m1,
> glob__0,
> glob__1,
> glob__2,
> glob__3,
> glob__4,
> glob__5,
> glob__8,
> glob__10,
> glob__100,
> glob__pi,
> glob__0_5,
> glob__0_8,
> glob__m0_8,
> glob__0_25,
> glob__0_125,
> glob_h,
> glob_nxt,
> glob_prec,
> glob_check_sign,
> glob_desired_digits_correct,
> glob_max_estimated_step_error,
> glob_ratio_of_radius,
> glob_percent_done,
> glob_total_exp_sec,
> glob_optimal_expect_sec,
> glob_estimated_size_answer,
> glob_almost_1,
> glob_clock_sec,
> glob_clock_start_sec,
> glob_disp_incr,
> glob_diff_rc_fm,
> glob_diff_rc_fmm1,
> glob_diff_rc_fmm2,
> glob_diff_ord_fm,
> glob_diff_ord_fmm1,
> glob_diff_ord_fmm2,
> glob_six_term_ord_save,
> glob_guess_error_rc,
> glob_guess_error_ord,
> glob_least_given_sing,
> glob_least_ratio_sing,
> glob_least_3_sing,
> glob_least_6_sing,
> glob_last_good_h,
> glob_max_h,
> glob_min_h,
> glob_display_interval,
> glob_abserr,
> glob_relerr,
> glob_min_pole_est,
> glob_max_rel_trunc_err,
> glob_max_trunc_err,
> glob_max_hours,
> glob_optimal_clock_start_sec,
> glob_optimal_start,
> glob_upper_ratio_limit,
> glob_lower_ratio_limit,
> glob_max_sec,
> glob_orig_start_sec,
> glob_normmax,
> glob_max_minutes,
> glob_next_display,
> glob_est_digits,
> glob_subiter_method,
> glob_html_log,
> glob_min_good_digits,
> glob_good_digits,
> glob_min_apfp_est_good_digits,
> glob_apfp_est_good_digits,
> glob_max_opt_iter,
> glob_dump,
> glob_djd_debug,
> glob_display_flag,
> glob_djd_debug2,
> glob_h_reason,
> glob_sec_in_minute,
> glob_min_in_hour,
> glob_hours_in_day,
> glob_days_in_year,
> glob_sec_in_hour,
> glob_sec_in_day,
> glob_sec_in_year,
> glob_not_yet_finished,
> glob_initial_pass,
> glob_not_yet_start_msg,
> glob_reached_optimal_h,
> glob_optimal_done,
> glob_type_given_pole,
> glob_optimize,
> glob_look_poles,
> glob_dump_closed_form,
> glob_max_iter,
> glob_no_eqs,
> glob_unchanged_h_cnt,
> glob_warned,
> glob_warned2,
> glob_start,
> glob_iter,
#Bottom Generate Globals Decl
#BEGIN CONST
> array_const_1,
> array_const_0D0,
#END CONST
> array_y_init,
> array_norms,
> array_fact_1,
> array_1st_rel_error,
> array_last_rel_error,
> array_est_rel_error,
> array_max_est_error,
> array_type_pole,
> array_type_real_pole,
> array_type_complex_pole,
> array_est_digits,
> array_y,
> array_x,
> array_tmp0,
> array_tmp1_g,
> array_tmp1,
> array_tmp2,
> array_m1,
> array_y_higher,
> array_y_higher_work,
> array_y_higher_work2,
> array_y_set_initial,
> array_given_rad_poles,
> array_given_ord_poles,
> array_rad_test_poles,
> array_ord_test_poles,
> array_fact_2,
> ATS_MAX_TERMS,
> glob_last;
> local clock_sec, opt_clock_sec, clock_sec1, expect_sec, left_sec, percent_done, total_clock_sec;
> #TOP PROGRESS REPORT
> clock_sec1 := elapsed_time_seconds();
> total_clock_sec := (clock_sec1) - (glob_orig_start_sec);
> glob_clock_sec := (clock_sec1) - (glob_clock_start_sec);
> left_sec := (glob_max_sec) + (glob_orig_start_sec) - (clock_sec1);
> expect_sec := comp_expect_sec((x_end),(x_start),(array_x[1]) + (glob_h) ,( clock_sec1) - (glob_orig_start_sec));
> opt_clock_sec := ( clock_sec1) - (glob_optimal_clock_start_sec);
> glob_optimal_expect_sec := comp_expect_sec((x_end),(x_start),(array_x[1]) +( glob_h) ,( opt_clock_sec));
> glob_total_exp_sec := glob_optimal_expect_sec + c(total_clock_sec);
> percent_done := comp_percent((x_end),(x_start),(array_x[1]) + (glob_h));
> glob_percent_done := percent_done;
> omniout_str_noeol(INFO,"Total Elapsed Time ");
> omniout_timestr((total_clock_sec));
> if (c(percent_done) < glob__100) then # if number 3
> omniout_str_noeol(INFO,"Expected Time Remaining ");
> omniout_timestr((expect_sec));
> omniout_str_noeol(INFO,"Optimized Time Remaining ");
> omniout_timestr((glob_optimal_expect_sec));
> omniout_str_noeol(INFO,"Expected Total Time ");
> omniout_timestr((glob_total_exp_sec));
> fi;# end if 3;
> #BOTTOM PROGRESS REPORT
> end;
prog_report := proc(x_start, x_end)
local clock_sec, opt_clock_sec, clock_sec1, expect_sec, left_sec,
percent_done, total_clock_sec;
global ALWAYS, INFO, DEBUGL, DEBUGMASSIVE, glob_iolevel, glob_yes_pole,
glob_no_pole, glob_not_given, glob_no_sing_tests, glob_ratio_test,
glob_three_term_test, glob_six_term_test, glob_log_10, MAX_UNCHANGED,
glob__small, glob_small_float, glob_smallish_float, glob_large_float,
glob_larger_float, glob__m2, glob__m1, glob__0, glob__1, glob__2, glob__3,
glob__4, glob__5, glob__8, glob__10, glob__100, glob__pi, glob__0_5,
glob__0_8, glob__m0_8, glob__0_25, glob__0_125, glob_h, glob_nxt, glob_prec,
glob_check_sign, glob_desired_digits_correct, glob_max_estimated_step_error,
glob_ratio_of_radius, glob_percent_done, glob_total_exp_sec,
glob_optimal_expect_sec, glob_estimated_size_answer, glob_almost_1,
glob_clock_sec, glob_clock_start_sec, glob_disp_incr, glob_diff_rc_fm,
glob_diff_rc_fmm1, glob_diff_rc_fmm2, glob_diff_ord_fm, glob_diff_ord_fmm1,
glob_diff_ord_fmm2, glob_six_term_ord_save, glob_guess_error_rc,
glob_guess_error_ord, glob_least_given_sing, glob_least_ratio_sing,
glob_least_3_sing, glob_least_6_sing, glob_last_good_h, glob_max_h,
glob_min_h, glob_display_interval, glob_abserr, glob_relerr,
glob_min_pole_est, glob_max_rel_trunc_err, glob_max_trunc_err,
glob_max_hours, glob_optimal_clock_start_sec, glob_optimal_start,
glob_upper_ratio_limit, glob_lower_ratio_limit, glob_max_sec,
glob_orig_start_sec, glob_normmax, glob_max_minutes, glob_next_display,
glob_est_digits, glob_subiter_method, glob_html_log, glob_min_good_digits,
glob_good_digits, glob_min_apfp_est_good_digits, glob_apfp_est_good_digits,
glob_max_opt_iter, glob_dump, glob_djd_debug, glob_display_flag,
glob_djd_debug2, glob_h_reason, glob_sec_in_minute, glob_min_in_hour,
glob_hours_in_day, glob_days_in_year, glob_sec_in_hour, glob_sec_in_day,
glob_sec_in_year, glob_not_yet_finished, glob_initial_pass,
glob_not_yet_start_msg, glob_reached_optimal_h, glob_optimal_done,
glob_type_given_pole, glob_optimize, glob_look_poles, glob_dump_closed_form,
glob_max_iter, glob_no_eqs, glob_unchanged_h_cnt, glob_warned, glob_warned2,
glob_start, glob_iter, array_const_1, array_const_0D0, array_y_init,
array_norms, array_fact_1, array_1st_rel_error, array_last_rel_error,
array_est_rel_error, array_max_est_error, array_type_pole,
array_type_real_pole, array_type_complex_pole, array_est_digits, array_y,
array_x, array_tmp0, array_tmp1_g, array_tmp1, array_tmp2, array_m1,
array_y_higher, array_y_higher_work, array_y_higher_work2,
array_y_set_initial, array_given_rad_poles, array_given_ord_poles,
array_rad_test_poles, array_ord_test_poles, array_fact_2, ATS_MAX_TERMS,
glob_last;
clock_sec1 := elapsed_time_seconds();
total_clock_sec := clock_sec1 - glob_orig_start_sec;
glob_clock_sec := clock_sec1 - glob_clock_start_sec;
left_sec := glob_max_sec + glob_orig_start_sec - clock_sec1;
expect_sec := comp_expect_sec(x_end, x_start, array_x[1] + glob_h,
clock_sec1 - glob_orig_start_sec);
opt_clock_sec := clock_sec1 - glob_optimal_clock_start_sec;
glob_optimal_expect_sec :=
comp_expect_sec(x_end, x_start, array_x[1] + glob_h, opt_clock_sec)
;
glob_total_exp_sec := glob_optimal_expect_sec + c(total_clock_sec);
percent_done := comp_percent(x_end, x_start, array_x[1] + glob_h);
glob_percent_done := percent_done;
omniout_str_noeol(INFO, "Total Elapsed Time ");
omniout_timestr(total_clock_sec);
if c(percent_done) < glob__100 then
omniout_str_noeol(INFO, "Expected Time Remaining ");
omniout_timestr(expect_sec);
omniout_str_noeol(INFO, "Optimized Time Remaining ");
omniout_timestr(glob_optimal_expect_sec);
omniout_str_noeol(INFO, "Expected Total Time ");
omniout_timestr(glob_total_exp_sec)
end if
end proc
# End Function number 9
# Begin Function number 10
> check_for_pole := proc()
> global
> ALWAYS,
> INFO,
> DEBUGL,
> DEBUGMASSIVE,
> glob_iolevel,
> glob_yes_pole,
> glob_no_pole,
> glob_not_given,
> glob_no_sing_tests,
> glob_ratio_test,
> glob_three_term_test,
> glob_six_term_test,
> glob_log_10,
#Top Generate Globals Decl
> MAX_UNCHANGED,
> glob__small,
> glob_small_float,
> glob_smallish_float,
> glob_large_float,
> glob_larger_float,
> glob__m2,
> glob__m1,
> glob__0,
> glob__1,
> glob__2,
> glob__3,
> glob__4,
> glob__5,
> glob__8,
> glob__10,
> glob__100,
> glob__pi,
> glob__0_5,
> glob__0_8,
> glob__m0_8,
> glob__0_25,
> glob__0_125,
> glob_h,
> glob_nxt,
> glob_prec,
> glob_check_sign,
> glob_desired_digits_correct,
> glob_max_estimated_step_error,
> glob_ratio_of_radius,
> glob_percent_done,
> glob_total_exp_sec,
> glob_optimal_expect_sec,
> glob_estimated_size_answer,
> glob_almost_1,
> glob_clock_sec,
> glob_clock_start_sec,
> glob_disp_incr,
> glob_diff_rc_fm,
> glob_diff_rc_fmm1,
> glob_diff_rc_fmm2,
> glob_diff_ord_fm,
> glob_diff_ord_fmm1,
> glob_diff_ord_fmm2,
> glob_six_term_ord_save,
> glob_guess_error_rc,
> glob_guess_error_ord,
> glob_least_given_sing,
> glob_least_ratio_sing,
> glob_least_3_sing,
> glob_least_6_sing,
> glob_last_good_h,
> glob_max_h,
> glob_min_h,
> glob_display_interval,
> glob_abserr,
> glob_relerr,
> glob_min_pole_est,
> glob_max_rel_trunc_err,
> glob_max_trunc_err,
> glob_max_hours,
> glob_optimal_clock_start_sec,
> glob_optimal_start,
> glob_upper_ratio_limit,
> glob_lower_ratio_limit,
> glob_max_sec,
> glob_orig_start_sec,
> glob_normmax,
> glob_max_minutes,
> glob_next_display,
> glob_est_digits,
> glob_subiter_method,
> glob_html_log,
> glob_min_good_digits,
> glob_good_digits,
> glob_min_apfp_est_good_digits,
> glob_apfp_est_good_digits,
> glob_max_opt_iter,
> glob_dump,
> glob_djd_debug,
> glob_display_flag,
> glob_djd_debug2,
> glob_h_reason,
> glob_sec_in_minute,
> glob_min_in_hour,
> glob_hours_in_day,
> glob_days_in_year,
> glob_sec_in_hour,
> glob_sec_in_day,
> glob_sec_in_year,
> glob_not_yet_finished,
> glob_initial_pass,
> glob_not_yet_start_msg,
> glob_reached_optimal_h,
> glob_optimal_done,
> glob_type_given_pole,
> glob_optimize,
> glob_look_poles,
> glob_dump_closed_form,
> glob_max_iter,
> glob_no_eqs,
> glob_unchanged_h_cnt,
> glob_warned,
> glob_warned2,
> glob_start,
> glob_iter,
#Bottom Generate Globals Decl
#BEGIN CONST
> array_const_1,
> array_const_0D0,
#END CONST
> array_y_init,
> array_norms,
> array_fact_1,
> array_1st_rel_error,
> array_last_rel_error,
> array_est_rel_error,
> array_max_est_error,
> array_type_pole,
> array_type_real_pole,
> array_type_complex_pole,
> array_est_digits,
> array_y,
> array_x,
> array_tmp0,
> array_tmp1_g,
> array_tmp1,
> array_tmp2,
> array_m1,
> array_y_higher,
> array_y_higher_work,
> array_y_higher_work2,
> array_y_set_initial,
> array_given_rad_poles,
> array_given_ord_poles,
> array_rad_test_poles,
> array_ord_test_poles,
> array_fact_2,
> ATS_MAX_TERMS,
> glob_last;
> local cnt, dr1, dr2, ds1, ds2, hdrc, m, n, nr1, nr2, ord_no, term1, term2, term3, part1, part2, part3, part4, part5, part6, part7, part8, part9, part10, part11, part12, part13, part14, rad_c, rcs, rm0, rm1, rm2, rm3, rm4, found_sing, h_new, ratio, term, local_test, tmp_rad,tmp_ord, tmp_ratio, prev_tmp_rad, last_no;
> #TOP CHECK FOR POLE
> tmp_rad := glob_larger_float;
> prev_tmp_rad := glob_larger_float;
> tmp_ratio := glob_larger_float;
> rad_c := glob_larger_float;
> array_rad_test_poles[1,1] := glob_larger_float;
> array_ord_test_poles[1,1] := glob_larger_float;
> found_sing := 1;
> last_no := ATS_MAX_TERMS - 1 - 10;
> cnt := 0;
> while (last_no < ATS_MAX_TERMS-3 and found_sing = 1) do # do number 1
> tmp_rad := comp_rad_from_ratio(array_y_higher[1,last_no-1],array_y_higher[1,last_no],last_no);
> if (float_abs(prev_tmp_rad) > glob__0) then # if number 3
> tmp_ratio := tmp_rad / prev_tmp_rad;
> else
> tmp_ratio := glob_large_float;
> fi;# end if 3;
> if ((cnt > 0 ) and (tmp_ratio < glob_upper_ratio_limit) and (tmp_ratio > glob_lower_ratio_limit)) then # if number 3
> rad_c := tmp_rad;
> elif
> (cnt = 0) then # if number 4
> rad_c := tmp_rad;
> elif
> (cnt > 0) then # if number 5
> found_sing := 0;
> fi;# end if 5;
> prev_tmp_rad := tmp_rad;;
> cnt := cnt + 1;
> last_no := last_no + 1;
> od;# end do number 1;
> if (found_sing = 1) then # if number 5
> if (rad_c < array_rad_test_poles[1,1]) then # if number 6
> array_rad_test_poles[1,1] := rad_c;
> last_no := last_no - 1;
> tmp_ord := comp_ord_from_ratio(array_y_higher[1,last_no-1],array_y_higher[1,last_no],last_no);
> array_rad_test_poles[1,1] := rad_c;
> array_ord_test_poles[1,1] := tmp_ord;
> fi;# end if 6;
> fi;# end if 5;
> #BOTTOM general radius test1
> tmp_rad := glob_larger_float;
> prev_tmp_rad := glob_larger_float;
> tmp_ratio := glob_larger_float;
> rad_c := glob_larger_float;
> array_rad_test_poles[1,2] := glob_larger_float;
> array_ord_test_poles[1,2] := glob_larger_float;
> found_sing := 1;
> last_no := ATS_MAX_TERMS - 1 - 10;
> cnt := 0;
> while (last_no < ATS_MAX_TERMS-4 and found_sing = 1) do # do number 1
> tmp_rad := comp_rad_from_three_terms(array_y_higher[1,last_no-2],array_y_higher[1,last_no-1],array_y_higher[1,last_no],last_no);
> if (float_abs(prev_tmp_rad) > glob__0) then # if number 5
> tmp_ratio := tmp_rad / prev_tmp_rad;
> else
> tmp_ratio := glob_large_float;
> fi;# end if 5;
> if ((cnt > 0 ) and (tmp_ratio < glob_upper_ratio_limit) and (tmp_ratio > glob_lower_ratio_limit)) then # if number 5
> rad_c := tmp_rad;
> elif
> (cnt = 0) then # if number 6
> rad_c := tmp_rad;
> elif
> (cnt > 0) then # if number 7
> found_sing := 0;
> fi;# end if 7;
> prev_tmp_rad := tmp_rad;;
> cnt := cnt + 1;
> last_no := last_no + 1;
> od;# end do number 1;
> if (found_sing = 1) then # if number 7
> if (rad_c < array_rad_test_poles[1,2]) then # if number 8
> array_rad_test_poles[1,2] := rad_c;
> last_no := last_no - 1;
> tmp_ord := comp_ord_from_three_terms(array_y_higher[1,last_no-2],array_y_higher[1,last_no-1],array_y_higher[1,last_no],last_no);
> array_rad_test_poles[1,2] := rad_c;
> if (rad_c < glob_min_pole_est) then # if number 9
> glob_min_pole_est := rad_c;
> fi;# end if 9;
> array_ord_test_poles[1,2] := tmp_ord;
> fi;# end if 8;
> fi;# end if 7;
> #BOTTOM general radius test1
> tmp_rad := glob_larger_float;
> prev_tmp_rad := glob_larger_float;
> tmp_ratio := glob_larger_float;
> rad_c := glob_larger_float;
> array_rad_test_poles[1,3] := glob_larger_float;
> array_ord_test_poles[1,3] := glob_larger_float;
> found_sing := 1;
> last_no := ATS_MAX_TERMS - 1 - 10;
> cnt := 0;
> while (last_no < ATS_MAX_TERMS-7 and found_sing = 1) do # do number 1
> tmp_rad := comp_rad_from_six_terms(array_y_higher[1,last_no-5],array_y_higher[1,last_no-4],array_y_higher[1,last_no-3],array_y_higher[1,last_no-2],array_y_higher[1,last_no-1],array_y_higher[1,last_no],last_no);
> if (float_abs(prev_tmp_rad) > glob__0) then # if number 7
> tmp_ratio := tmp_rad / prev_tmp_rad;
> else
> tmp_ratio := glob_large_float;
> fi;# end if 7;
> if ((cnt > 0 ) and (tmp_ratio < glob_upper_ratio_limit) and (tmp_ratio > glob_lower_ratio_limit)) then # if number 7
> rad_c := tmp_rad;
> elif
> (cnt = 0) then # if number 8
> rad_c := tmp_rad;
> elif
> (cnt > 0) then # if number 9
> found_sing := 0;
> fi;# end if 9;
> prev_tmp_rad := tmp_rad;;
> cnt := cnt + 1;
> last_no := last_no + 1;
> od;# end do number 1;
> if (found_sing = 1) then # if number 9
> if (rad_c < array_rad_test_poles[1,3]) then # if number 10
> array_rad_test_poles[1,3] := rad_c;
> last_no := last_no - 1;
> tmp_ord := comp_ord_from_six_terms(array_y_higher[1,last_no-5],array_y_higher[1,last_no-4],array_y_higher[1,last_no-3],array_y_higher[1,last_no-2],array_y_higher[1,last_no-1],array_y_higher[1,last_no],last_no);
> array_rad_test_poles[1,3] := rad_c;
> if (rad_c < glob_min_pole_est) then # if number 11
> glob_min_pole_est := rad_c;
> fi;# end if 11;
> array_ord_test_poles[1,3] := tmp_ord;
> fi;# end if 10;
> fi;# end if 9;
> #BOTTOM general radius test1
> ;
> if (true) then # if number 9
> display_poles();
> fi;# end if 9
> end;
check_for_pole := proc()
local cnt, dr1, dr2, ds1, ds2, hdrc, m, n, nr1, nr2, ord_no, term1, term2,
term3, part1, part2, part3, part4, part5, part6, part7, part8, part9,
part10, part11, part12, part13, part14, rad_c, rcs, rm0, rm1, rm2, rm3, rm4,
found_sing, h_new, ratio, term, local_test, tmp_rad, tmp_ord, tmp_ratio,
prev_tmp_rad, last_no;
global ALWAYS, INFO, DEBUGL, DEBUGMASSIVE, glob_iolevel, glob_yes_pole,
glob_no_pole, glob_not_given, glob_no_sing_tests, glob_ratio_test,
glob_three_term_test, glob_six_term_test, glob_log_10, MAX_UNCHANGED,
glob__small, glob_small_float, glob_smallish_float, glob_large_float,
glob_larger_float, glob__m2, glob__m1, glob__0, glob__1, glob__2, glob__3,
glob__4, glob__5, glob__8, glob__10, glob__100, glob__pi, glob__0_5,
glob__0_8, glob__m0_8, glob__0_25, glob__0_125, glob_h, glob_nxt, glob_prec,
glob_check_sign, glob_desired_digits_correct, glob_max_estimated_step_error,
glob_ratio_of_radius, glob_percent_done, glob_total_exp_sec,
glob_optimal_expect_sec, glob_estimated_size_answer, glob_almost_1,
glob_clock_sec, glob_clock_start_sec, glob_disp_incr, glob_diff_rc_fm,
glob_diff_rc_fmm1, glob_diff_rc_fmm2, glob_diff_ord_fm, glob_diff_ord_fmm1,
glob_diff_ord_fmm2, glob_six_term_ord_save, glob_guess_error_rc,
glob_guess_error_ord, glob_least_given_sing, glob_least_ratio_sing,
glob_least_3_sing, glob_least_6_sing, glob_last_good_h, glob_max_h,
glob_min_h, glob_display_interval, glob_abserr, glob_relerr,
glob_min_pole_est, glob_max_rel_trunc_err, glob_max_trunc_err,
glob_max_hours, glob_optimal_clock_start_sec, glob_optimal_start,
glob_upper_ratio_limit, glob_lower_ratio_limit, glob_max_sec,
glob_orig_start_sec, glob_normmax, glob_max_minutes, glob_next_display,
glob_est_digits, glob_subiter_method, glob_html_log, glob_min_good_digits,
glob_good_digits, glob_min_apfp_est_good_digits, glob_apfp_est_good_digits,
glob_max_opt_iter, glob_dump, glob_djd_debug, glob_display_flag,
glob_djd_debug2, glob_h_reason, glob_sec_in_minute, glob_min_in_hour,
glob_hours_in_day, glob_days_in_year, glob_sec_in_hour, glob_sec_in_day,
glob_sec_in_year, glob_not_yet_finished, glob_initial_pass,
glob_not_yet_start_msg, glob_reached_optimal_h, glob_optimal_done,
glob_type_given_pole, glob_optimize, glob_look_poles, glob_dump_closed_form,
glob_max_iter, glob_no_eqs, glob_unchanged_h_cnt, glob_warned, glob_warned2,
glob_start, glob_iter, array_const_1, array_const_0D0, array_y_init,
array_norms, array_fact_1, array_1st_rel_error, array_last_rel_error,
array_est_rel_error, array_max_est_error, array_type_pole,
array_type_real_pole, array_type_complex_pole, array_est_digits, array_y,
array_x, array_tmp0, array_tmp1_g, array_tmp1, array_tmp2, array_m1,
array_y_higher, array_y_higher_work, array_y_higher_work2,
array_y_set_initial, array_given_rad_poles, array_given_ord_poles,
array_rad_test_poles, array_ord_test_poles, array_fact_2, ATS_MAX_TERMS,
glob_last;
tmp_rad := glob_larger_float;
prev_tmp_rad := glob_larger_float;
tmp_ratio := glob_larger_float;
rad_c := glob_larger_float;
array_rad_test_poles[1, 1] := glob_larger_float;
array_ord_test_poles[1, 1] := glob_larger_float;
found_sing := 1;
last_no := ATS_MAX_TERMS - 11;
cnt := 0;
while last_no < ATS_MAX_TERMS - 3 and found_sing = 1 do
tmp_rad := comp_rad_from_ratio(array_y_higher[1, last_no - 1],
array_y_higher[1, last_no], last_no);
if glob__0 < float_abs(prev_tmp_rad) then
tmp_ratio := tmp_rad/prev_tmp_rad
else tmp_ratio := glob_large_float
end if;
if 0 < cnt and tmp_ratio < glob_upper_ratio_limit and
glob_lower_ratio_limit < tmp_ratio then rad_c := tmp_rad
elif cnt = 0 then rad_c := tmp_rad
elif 0 < cnt then found_sing := 0
end if;
prev_tmp_rad := tmp_rad;
cnt := cnt + 1;
last_no := last_no + 1
end do;
if found_sing = 1 then
if rad_c < array_rad_test_poles[1, 1] then
array_rad_test_poles[1, 1] := rad_c;
last_no := last_no - 1;
tmp_ord := comp_ord_from_ratio(array_y_higher[1, last_no - 1],
array_y_higher[1, last_no], last_no);
array_rad_test_poles[1, 1] := rad_c;
array_ord_test_poles[1, 1] := tmp_ord
end if
end if;
tmp_rad := glob_larger_float;
prev_tmp_rad := glob_larger_float;
tmp_ratio := glob_larger_float;
rad_c := glob_larger_float;
array_rad_test_poles[1, 2] := glob_larger_float;
array_ord_test_poles[1, 2] := glob_larger_float;
found_sing := 1;
last_no := ATS_MAX_TERMS - 11;
cnt := 0;
while last_no < ATS_MAX_TERMS - 4 and found_sing = 1 do
tmp_rad := comp_rad_from_three_terms(
array_y_higher[1, last_no - 2], array_y_higher[1, last_no - 1],
array_y_higher[1, last_no], last_no);
if glob__0 < float_abs(prev_tmp_rad) then
tmp_ratio := tmp_rad/prev_tmp_rad
else tmp_ratio := glob_large_float
end if;
if 0 < cnt and tmp_ratio < glob_upper_ratio_limit and
glob_lower_ratio_limit < tmp_ratio then rad_c := tmp_rad
elif cnt = 0 then rad_c := tmp_rad
elif 0 < cnt then found_sing := 0
end if;
prev_tmp_rad := tmp_rad;
cnt := cnt + 1;
last_no := last_no + 1
end do;
if found_sing = 1 then
if rad_c < array_rad_test_poles[1, 2] then
array_rad_test_poles[1, 2] := rad_c;
last_no := last_no - 1;
tmp_ord := comp_ord_from_three_terms(
array_y_higher[1, last_no - 2],
array_y_higher[1, last_no - 1], array_y_higher[1, last_no],
last_no);
array_rad_test_poles[1, 2] := rad_c;
if rad_c < glob_min_pole_est then glob_min_pole_est := rad_c
end if;
array_ord_test_poles[1, 2] := tmp_ord
end if
end if;
tmp_rad := glob_larger_float;
prev_tmp_rad := glob_larger_float;
tmp_ratio := glob_larger_float;
rad_c := glob_larger_float;
array_rad_test_poles[1, 3] := glob_larger_float;
array_ord_test_poles[1, 3] := glob_larger_float;
found_sing := 1;
last_no := ATS_MAX_TERMS - 11;
cnt := 0;
while last_no < ATS_MAX_TERMS - 7 and found_sing = 1 do
tmp_rad := comp_rad_from_six_terms(array_y_higher[1, last_no - 5],
array_y_higher[1, last_no - 4], array_y_higher[1, last_no - 3],
array_y_higher[1, last_no - 2], array_y_higher[1, last_no - 1],
array_y_higher[1, last_no], last_no);
if glob__0 < float_abs(prev_tmp_rad) then
tmp_ratio := tmp_rad/prev_tmp_rad
else tmp_ratio := glob_large_float
end if;
if 0 < cnt and tmp_ratio < glob_upper_ratio_limit and
glob_lower_ratio_limit < tmp_ratio then rad_c := tmp_rad
elif cnt = 0 then rad_c := tmp_rad
elif 0 < cnt then found_sing := 0
end if;
prev_tmp_rad := tmp_rad;
cnt := cnt + 1;
last_no := last_no + 1
end do;
if found_sing = 1 then
if rad_c < array_rad_test_poles[1, 3] then
array_rad_test_poles[1, 3] := rad_c;
last_no := last_no - 1;
tmp_ord := comp_ord_from_six_terms(
array_y_higher[1, last_no - 5],
array_y_higher[1, last_no - 4],
array_y_higher[1, last_no - 3],
array_y_higher[1, last_no - 2],
array_y_higher[1, last_no - 1], array_y_higher[1, last_no],
last_no);
array_rad_test_poles[1, 3] := rad_c;
if rad_c < glob_min_pole_est then glob_min_pole_est := rad_c
end if;
array_ord_test_poles[1, 3] := tmp_ord
end if
end if;
display_poles()
end proc
# End Function number 10
# Begin Function number 11
> atomall := proc()
> global
> ALWAYS,
> INFO,
> DEBUGL,
> DEBUGMASSIVE,
> glob_iolevel,
> glob_yes_pole,
> glob_no_pole,
> glob_not_given,
> glob_no_sing_tests,
> glob_ratio_test,
> glob_three_term_test,
> glob_six_term_test,
> glob_log_10,
#Top Generate Globals Decl
> MAX_UNCHANGED,
> glob__small,
> glob_small_float,
> glob_smallish_float,
> glob_large_float,
> glob_larger_float,
> glob__m2,
> glob__m1,
> glob__0,
> glob__1,
> glob__2,
> glob__3,
> glob__4,
> glob__5,
> glob__8,
> glob__10,
> glob__100,
> glob__pi,
> glob__0_5,
> glob__0_8,
> glob__m0_8,
> glob__0_25,
> glob__0_125,
> glob_h,
> glob_nxt,
> glob_prec,
> glob_check_sign,
> glob_desired_digits_correct,
> glob_max_estimated_step_error,
> glob_ratio_of_radius,
> glob_percent_done,
> glob_total_exp_sec,
> glob_optimal_expect_sec,
> glob_estimated_size_answer,
> glob_almost_1,
> glob_clock_sec,
> glob_clock_start_sec,
> glob_disp_incr,
> glob_diff_rc_fm,
> glob_diff_rc_fmm1,
> glob_diff_rc_fmm2,
> glob_diff_ord_fm,
> glob_diff_ord_fmm1,
> glob_diff_ord_fmm2,
> glob_six_term_ord_save,
> glob_guess_error_rc,
> glob_guess_error_ord,
> glob_least_given_sing,
> glob_least_ratio_sing,
> glob_least_3_sing,
> glob_least_6_sing,
> glob_last_good_h,
> glob_max_h,
> glob_min_h,
> glob_display_interval,
> glob_abserr,
> glob_relerr,
> glob_min_pole_est,
> glob_max_rel_trunc_err,
> glob_max_trunc_err,
> glob_max_hours,
> glob_optimal_clock_start_sec,
> glob_optimal_start,
> glob_upper_ratio_limit,
> glob_lower_ratio_limit,
> glob_max_sec,
> glob_orig_start_sec,
> glob_normmax,
> glob_max_minutes,
> glob_next_display,
> glob_est_digits,
> glob_subiter_method,
> glob_html_log,
> glob_min_good_digits,
> glob_good_digits,
> glob_min_apfp_est_good_digits,
> glob_apfp_est_good_digits,
> glob_max_opt_iter,
> glob_dump,
> glob_djd_debug,
> glob_display_flag,
> glob_djd_debug2,
> glob_h_reason,
> glob_sec_in_minute,
> glob_min_in_hour,
> glob_hours_in_day,
> glob_days_in_year,
> glob_sec_in_hour,
> glob_sec_in_day,
> glob_sec_in_year,
> glob_not_yet_finished,
> glob_initial_pass,
> glob_not_yet_start_msg,
> glob_reached_optimal_h,
> glob_optimal_done,
> glob_type_given_pole,
> glob_optimize,
> glob_look_poles,
> glob_dump_closed_form,
> glob_max_iter,
> glob_no_eqs,
> glob_unchanged_h_cnt,
> glob_warned,
> glob_warned2,
> glob_start,
> glob_iter,
#Bottom Generate Globals Decl
#BEGIN CONST
> array_const_1,
> array_const_0D0,
#END CONST
> array_y_init,
> array_norms,
> array_fact_1,
> array_1st_rel_error,
> array_last_rel_error,
> array_est_rel_error,
> array_max_est_error,
> array_type_pole,
> array_type_real_pole,
> array_type_complex_pole,
> array_est_digits,
> array_y,
> array_x,
> array_tmp0,
> array_tmp1_g,
> array_tmp1,
> array_tmp2,
> array_m1,
> array_y_higher,
> array_y_higher_work,
> array_y_higher_work2,
> array_y_set_initial,
> array_given_rad_poles,
> array_given_ord_poles,
> array_rad_test_poles,
> array_ord_test_poles,
> array_fact_2,
> ATS_MAX_TERMS,
> glob_last;
> local kkk, order_d, adj2, adj3 , temporary, term;
> #TOP ATOMALL
> # before write maple main top matter
> # before generate constants assign
> # before generate globals assign
> #END OUTFILE1
> #BEGIN OUTFILE2
> #END OUTFILE2
> #BEGIN ATOMHDR1
> #emit pre cos 1 $eq_no = 1
> array_tmp1[1] := cos(array_x[1]);
> array_tmp1_g[1] := sin(array_x[1]);
> #emit pre add CONST FULL $eq_no = 1 i = 1
> array_tmp2[1] := array_const_0D0[1] + array_tmp1[1];
> #emit pre assign xxx $eq_no = 1 i = 1 $min_hdrs = 5
> if ( not array_y_set_initial[1,2]) then # if number 1
> if (1 <= ATS_MAX_TERMS) then # if number 2
> temporary := c(array_tmp2[1]) * (expt((glob_h) , c(1))) * c(factorial_3(0,1));
> if (2 <= ATS_MAX_TERMS) then # if number 3
> array_y[2] := temporary;
> array_y_higher[1,2] := temporary;
> fi;# end if 3;
> temporary := c(temporary) / c(glob_h) * c(1);
> array_y_higher[2,1] := c(temporary);
> fi;# end if 2;
> fi;# end if 1;
> kkk := 2;
> #END ATOMHDR1
> #BEGIN ATOMHDR2
> #emit pre cos ID_LINEAR iii = 2 $eq_no = 1
> array_tmp1[2] := neg(array_tmp1_g[1]) * array_x[2] / c(1);
> array_tmp1_g[2] := array_tmp1[1] * array_x[2] / c(1);
> #emit pre add CONST FULL $eq_no = 1 i = 2
> array_tmp2[2] := array_tmp1[2];
> #emit pre assign xxx $eq_no = 1 i = 2 $min_hdrs = 5
> if ( not array_y_set_initial[1,3]) then # if number 1
> if (2 <= ATS_MAX_TERMS) then # if number 2
> temporary := c(array_tmp2[2]) * (expt((glob_h) , c(1))) * c(factorial_3(1,2));
> if (3 <= ATS_MAX_TERMS) then # if number 3
> array_y[3] := temporary;
> array_y_higher[1,3] := temporary;
> fi;# end if 3;
> temporary := c(temporary) / c(glob_h) * c(2);
> array_y_higher[2,2] := c(temporary);
> fi;# end if 2;
> fi;# end if 1;
> kkk := 3;
> #END ATOMHDR2
> #BEGIN ATOMHDR3
> #emit pre cos ID_LINEAR iii = 3 $eq_no = 1
> array_tmp1[3] := neg(array_tmp1_g[2]) * array_x[2] / c(2);
> array_tmp1_g[3] := array_tmp1[2] * array_x[2] / c(2);
> #emit pre add CONST FULL $eq_no = 1 i = 3
> array_tmp2[3] := array_tmp1[3];
> #emit pre assign xxx $eq_no = 1 i = 3 $min_hdrs = 5
> if ( not array_y_set_initial[1,4]) then # if number 1
> if (3 <= ATS_MAX_TERMS) then # if number 2
> temporary := c(array_tmp2[3]) * (expt((glob_h) , c(1))) * c(factorial_3(2,3));
> if (4 <= ATS_MAX_TERMS) then # if number 3
> array_y[4] := temporary;
> array_y_higher[1,4] := temporary;
> fi;# end if 3;
> temporary := c(temporary) / c(glob_h) * c(3);
> array_y_higher[2,3] := c(temporary);
> fi;# end if 2;
> fi;# end if 1;
> kkk := 4;
> #END ATOMHDR3
> #BEGIN ATOMHDR4
> #emit pre cos ID_LINEAR iii = 4 $eq_no = 1
> array_tmp1[4] := neg(array_tmp1_g[3]) * array_x[2] / c(3);
> array_tmp1_g[4] := array_tmp1[3] * array_x[2] / c(3);
> #emit pre add CONST FULL $eq_no = 1 i = 4
> array_tmp2[4] := array_tmp1[4];
> #emit pre assign xxx $eq_no = 1 i = 4 $min_hdrs = 5
> if ( not array_y_set_initial[1,5]) then # if number 1
> if (4 <= ATS_MAX_TERMS) then # if number 2
> temporary := c(array_tmp2[4]) * (expt((glob_h) , c(1))) * c(factorial_3(3,4));
> if (5 <= ATS_MAX_TERMS) then # if number 3
> array_y[5] := temporary;
> array_y_higher[1,5] := temporary;
> fi;# end if 3;
> temporary := c(temporary) / c(glob_h) * c(4);
> array_y_higher[2,4] := c(temporary);
> fi;# end if 2;
> fi;# end if 1;
> kkk := 5;
> #END ATOMHDR4
> #BEGIN ATOMHDR5
> #emit pre cos ID_LINEAR iii = 5 $eq_no = 1
> array_tmp1[5] := neg(array_tmp1_g[4]) * array_x[2] / c(4);
> array_tmp1_g[5] := array_tmp1[4] * array_x[2] / c(4);
> #emit pre add CONST FULL $eq_no = 1 i = 5
> array_tmp2[5] := array_tmp1[5];
> #emit pre assign xxx $eq_no = 1 i = 5 $min_hdrs = 5
> if ( not array_y_set_initial[1,6]) then # if number 1
> if (5 <= ATS_MAX_TERMS) then # if number 2
> temporary := c(array_tmp2[5]) * (expt((glob_h) , c(1))) * c(factorial_3(4,5));
> if (6 <= ATS_MAX_TERMS) then # if number 3
> array_y[6] := temporary;
> array_y_higher[1,6] := temporary;
> fi;# end if 3;
> temporary := c(temporary) / c(glob_h) * c(5);
> array_y_higher[2,5] := c(temporary);
> fi;# end if 2;
> fi;# end if 1;
> kkk := 6;
> #END ATOMHDR5
> #BEGIN OUTFILE3
> #Top Atomall While Loop-- outfile3
> while (kkk <= ATS_MAX_TERMS) do # do number 1
> #END OUTFILE3
> #BEGIN OUTFILE4
> #emit cos LINEAR $eq_no = 1
> array_tmp1[kkk] := neg(array_tmp1_g[kkk - 1]) * array_x[2] / c(kkk - 1);
> array_tmp1_g[kkk] := array_tmp1[kkk - 1] * array_x[2] / c(kkk - 1);
> #emit NOT FULL - FULL add $eq_no = 1
> array_tmp2[kkk] := array_tmp1[kkk];
> #emit assign $eq_no = 1
> order_d := 1;
> if (kkk + order_d <= ATS_MAX_TERMS) then # if number 1
> if ( not array_y_set_initial[1,kkk + order_d]) then # if number 2
> temporary := c(array_tmp2[kkk]) * expt((glob_h) , c(order_d)) * c(factorial_3((kkk - 1),(kkk + order_d - 1)));
> array_y[kkk + order_d] := c(temporary);
> array_y_higher[1,kkk + order_d] := c(temporary);
> term := kkk + order_d - 1;
> adj2 := kkk + order_d - 1;
> adj3 := 2;
> while ((term >= 1) and (term <= ATS_MAX_TERMS) and (adj3 < order_d + 1)) do # do number 1
> if (adj3 <= order_d + 1) then # if number 3
> if (adj2 > 0) then # if number 4
> temporary := c(temporary) / c(glob_h) * c(adj2);
> else
> temporary := c(temporary);
> fi;# end if 4;
> array_y_higher[adj3,term] := c(temporary);
> fi;# end if 3;
> term := term - 1;
> adj2 := adj2 - 1;
> adj3 := adj3 + 1;
> od;# end do number 1
> fi;# end if 2
> fi;# end if 1;
> kkk := kkk + 1;
> od;# end do number 1;
> #BOTTOM ATOMALL
> #END OUTFILE4
> #BEGIN OUTFILE5
> #BOTTOM ATOMALL ???
> end;
atomall := proc()
local kkk, order_d, adj2, adj3, temporary, term;
global ALWAYS, INFO, DEBUGL, DEBUGMASSIVE, glob_iolevel, glob_yes_pole,
glob_no_pole, glob_not_given, glob_no_sing_tests, glob_ratio_test,
glob_three_term_test, glob_six_term_test, glob_log_10, MAX_UNCHANGED,
glob__small, glob_small_float, glob_smallish_float, glob_large_float,
glob_larger_float, glob__m2, glob__m1, glob__0, glob__1, glob__2, glob__3,
glob__4, glob__5, glob__8, glob__10, glob__100, glob__pi, glob__0_5,
glob__0_8, glob__m0_8, glob__0_25, glob__0_125, glob_h, glob_nxt, glob_prec,
glob_check_sign, glob_desired_digits_correct, glob_max_estimated_step_error,
glob_ratio_of_radius, glob_percent_done, glob_total_exp_sec,
glob_optimal_expect_sec, glob_estimated_size_answer, glob_almost_1,
glob_clock_sec, glob_clock_start_sec, glob_disp_incr, glob_diff_rc_fm,
glob_diff_rc_fmm1, glob_diff_rc_fmm2, glob_diff_ord_fm, glob_diff_ord_fmm1,
glob_diff_ord_fmm2, glob_six_term_ord_save, glob_guess_error_rc,
glob_guess_error_ord, glob_least_given_sing, glob_least_ratio_sing,
glob_least_3_sing, glob_least_6_sing, glob_last_good_h, glob_max_h,
glob_min_h, glob_display_interval, glob_abserr, glob_relerr,
glob_min_pole_est, glob_max_rel_trunc_err, glob_max_trunc_err,
glob_max_hours, glob_optimal_clock_start_sec, glob_optimal_start,
glob_upper_ratio_limit, glob_lower_ratio_limit, glob_max_sec,
glob_orig_start_sec, glob_normmax, glob_max_minutes, glob_next_display,
glob_est_digits, glob_subiter_method, glob_html_log, glob_min_good_digits,
glob_good_digits, glob_min_apfp_est_good_digits, glob_apfp_est_good_digits,
glob_max_opt_iter, glob_dump, glob_djd_debug, glob_display_flag,
glob_djd_debug2, glob_h_reason, glob_sec_in_minute, glob_min_in_hour,
glob_hours_in_day, glob_days_in_year, glob_sec_in_hour, glob_sec_in_day,
glob_sec_in_year, glob_not_yet_finished, glob_initial_pass,
glob_not_yet_start_msg, glob_reached_optimal_h, glob_optimal_done,
glob_type_given_pole, glob_optimize, glob_look_poles, glob_dump_closed_form,
glob_max_iter, glob_no_eqs, glob_unchanged_h_cnt, glob_warned, glob_warned2,
glob_start, glob_iter, array_const_1, array_const_0D0, array_y_init,
array_norms, array_fact_1, array_1st_rel_error, array_last_rel_error,
array_est_rel_error, array_max_est_error, array_type_pole,
array_type_real_pole, array_type_complex_pole, array_est_digits, array_y,
array_x, array_tmp0, array_tmp1_g, array_tmp1, array_tmp2, array_m1,
array_y_higher, array_y_higher_work, array_y_higher_work2,
array_y_set_initial, array_given_rad_poles, array_given_ord_poles,
array_rad_test_poles, array_ord_test_poles, array_fact_2, ATS_MAX_TERMS,
glob_last;
array_tmp1[1] := cos(array_x[1]);
array_tmp1_g[1] := sin(array_x[1]);
array_tmp2[1] := array_const_0D0[1] + array_tmp1[1];
if not array_y_set_initial[1, 2] then
if 1 <= ATS_MAX_TERMS then
temporary :=
c(array_tmp2[1])*expt(glob_h, c(1))*c(factorial_3(0, 1));
if 2 <= ATS_MAX_TERMS then
array_y[2] := temporary; array_y_higher[1, 2] := temporary
end if;
temporary := c(temporary)*c(1)/c(glob_h);
array_y_higher[2, 1] := c(temporary)
end if
end if;
kkk := 2;
array_tmp1[2] := neg(array_tmp1_g[1])*array_x[2]/c(1);
array_tmp1_g[2] := array_tmp1[1]*array_x[2]/c(1);
array_tmp2[2] := array_tmp1[2];
if not array_y_set_initial[1, 3] then
if 2 <= ATS_MAX_TERMS then
temporary :=
c(array_tmp2[2])*expt(glob_h, c(1))*c(factorial_3(1, 2));
if 3 <= ATS_MAX_TERMS then
array_y[3] := temporary; array_y_higher[1, 3] := temporary
end if;
temporary := c(temporary)*c(2)/c(glob_h);
array_y_higher[2, 2] := c(temporary)
end if
end if;
kkk := 3;
array_tmp1[3] := neg(array_tmp1_g[2])*array_x[2]/c(2);
array_tmp1_g[3] := array_tmp1[2]*array_x[2]/c(2);
array_tmp2[3] := array_tmp1[3];
if not array_y_set_initial[1, 4] then
if 3 <= ATS_MAX_TERMS then
temporary :=
c(array_tmp2[3])*expt(glob_h, c(1))*c(factorial_3(2, 3));
if 4 <= ATS_MAX_TERMS then
array_y[4] := temporary; array_y_higher[1, 4] := temporary
end if;
temporary := c(temporary)*c(3)/c(glob_h);
array_y_higher[2, 3] := c(temporary)
end if
end if;
kkk := 4;
array_tmp1[4] := neg(array_tmp1_g[3])*array_x[2]/c(3);
array_tmp1_g[4] := array_tmp1[3]*array_x[2]/c(3);
array_tmp2[4] := array_tmp1[4];
if not array_y_set_initial[1, 5] then
if 4 <= ATS_MAX_TERMS then
temporary :=
c(array_tmp2[4])*expt(glob_h, c(1))*c(factorial_3(3, 4));
if 5 <= ATS_MAX_TERMS then
array_y[5] := temporary; array_y_higher[1, 5] := temporary
end if;
temporary := c(temporary)*c(4)/c(glob_h);
array_y_higher[2, 4] := c(temporary)
end if
end if;
kkk := 5;
array_tmp1[5] := neg(array_tmp1_g[4])*array_x[2]/c(4);
array_tmp1_g[5] := array_tmp1[4]*array_x[2]/c(4);
array_tmp2[5] := array_tmp1[5];
if not array_y_set_initial[1, 6] then
if 5 <= ATS_MAX_TERMS then
temporary :=
c(array_tmp2[5])*expt(glob_h, c(1))*c(factorial_3(4, 5));
if 6 <= ATS_MAX_TERMS then
array_y[6] := temporary; array_y_higher[1, 6] := temporary
end if;
temporary := c(temporary)*c(5)/c(glob_h);
array_y_higher[2, 5] := c(temporary)
end if
end if;
kkk := 6;
while kkk <= ATS_MAX_TERMS do
array_tmp1[kkk] := neg(array_tmp1_g[kkk - 1])*array_x[2]/c(kkk - 1)
;
array_tmp1_g[kkk] := array_tmp1[kkk - 1]*array_x[2]/c(kkk - 1);
array_tmp2[kkk] := array_tmp1[kkk];
order_d := 1;
if kkk + order_d <= ATS_MAX_TERMS then
if not array_y_set_initial[1, kkk + order_d] then
temporary := c(array_tmp2[kkk])*expt(glob_h, c(order_d))*
c(factorial_3(kkk - 1, kkk + order_d - 1));
array_y[kkk + order_d] := c(temporary);
array_y_higher[1, kkk + order_d] := c(temporary);
term := kkk + order_d - 1;
adj2 := kkk + order_d - 1;
adj3 := 2;
while
1 <= term and term <= ATS_MAX_TERMS and adj3 < order_d + 1
do
if adj3 <= order_d + 1 then
if 0 < adj2 then
temporary := c(temporary)*c(adj2)/c(glob_h)
else temporary := c(temporary)
end if;
array_y_higher[adj3, term] := c(temporary)
end if;
term := term - 1;
adj2 := adj2 - 1;
adj3 := adj3 + 1
end do
end if
end if;
kkk := kkk + 1
end do
end proc
# End Function number 12
#END OUTFILE5
# Begin Function number 12
> main := proc()
> #BEGIN OUTFIEMAIN
> local d1,d2,d3,d4,est_err_2,niii,done_once,max_terms,display_max,
> 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,last_min_pole_est, opt_iter, tmp,subiter, est_needed_step_err,estimated_step_error,min_value,est_answer,found_h,repeat_it;
> global
> ALWAYS,
> INFO,
> DEBUGL,
> DEBUGMASSIVE,
> glob_iolevel,
> glob_yes_pole,
> glob_no_pole,
> glob_not_given,
> glob_no_sing_tests,
> glob_ratio_test,
> glob_three_term_test,
> glob_six_term_test,
> glob_log_10,
> #Top Generate Globals Decl
> MAX_UNCHANGED,
> glob__small,
> glob_small_float,
> glob_smallish_float,
> glob_large_float,
> glob_larger_float,
> glob__m2,
> glob__m1,
> glob__0,
> glob__1,
> glob__2,
> glob__3,
> glob__4,
> glob__5,
> glob__8,
> glob__10,
> glob__100,
> glob__pi,
> glob__0_5,
> glob__0_8,
> glob__m0_8,
> glob__0_25,
> glob__0_125,
> glob_h,
> glob_nxt,
> glob_prec,
> glob_check_sign,
> glob_desired_digits_correct,
> glob_max_estimated_step_error,
> glob_ratio_of_radius,
> glob_percent_done,
> glob_total_exp_sec,
> glob_optimal_expect_sec,
> glob_estimated_size_answer,
> glob_almost_1,
> glob_clock_sec,
> glob_clock_start_sec,
> glob_disp_incr,
> glob_diff_rc_fm,
> glob_diff_rc_fmm1,
> glob_diff_rc_fmm2,
> glob_diff_ord_fm,
> glob_diff_ord_fmm1,
> glob_diff_ord_fmm2,
> glob_six_term_ord_save,
> glob_guess_error_rc,
> glob_guess_error_ord,
> glob_least_given_sing,
> glob_least_ratio_sing,
> glob_least_3_sing,
> glob_least_6_sing,
> glob_last_good_h,
> glob_max_h,
> glob_min_h,
> glob_display_interval,
> glob_abserr,
> glob_relerr,
> glob_min_pole_est,
> glob_max_rel_trunc_err,
> glob_max_trunc_err,
> glob_max_hours,
> glob_optimal_clock_start_sec,
> glob_optimal_start,
> glob_upper_ratio_limit,
> glob_lower_ratio_limit,
> glob_max_sec,
> glob_orig_start_sec,
> glob_normmax,
> glob_max_minutes,
> glob_next_display,
> glob_est_digits,
> glob_subiter_method,
> glob_html_log,
> glob_min_good_digits,
> glob_good_digits,
> glob_min_apfp_est_good_digits,
> glob_apfp_est_good_digits,
> glob_max_opt_iter,
> glob_dump,
> glob_djd_debug,
> glob_display_flag,
> glob_djd_debug2,
> glob_h_reason,
> glob_sec_in_minute,
> glob_min_in_hour,
> glob_hours_in_day,
> glob_days_in_year,
> glob_sec_in_hour,
> glob_sec_in_day,
> glob_sec_in_year,
> glob_not_yet_finished,
> glob_initial_pass,
> glob_not_yet_start_msg,
> glob_reached_optimal_h,
> glob_optimal_done,
> glob_type_given_pole,
> glob_optimize,
> glob_look_poles,
> glob_dump_closed_form,
> glob_max_iter,
> glob_no_eqs,
> glob_unchanged_h_cnt,
> glob_warned,
> glob_warned2,
> glob_start,
> glob_iter,
> #Bottom Generate Globals Decl
> #BEGIN CONST
> array_const_1,
> array_const_0D0,
> #END CONST
> array_y_init,
> array_norms,
> array_fact_1,
> array_1st_rel_error,
> array_last_rel_error,
> array_est_rel_error,
> array_max_est_error,
> array_type_pole,
> array_type_real_pole,
> array_type_complex_pole,
> array_est_digits,
> array_y,
> array_x,
> array_tmp0,
> array_tmp1_g,
> array_tmp1,
> array_tmp2,
> array_m1,
> array_y_higher,
> array_y_higher_work,
> array_y_higher_work2,
> array_y_set_initial,
> array_given_rad_poles,
> array_given_ord_poles,
> array_rad_test_poles,
> array_ord_test_poles,
> array_fact_2,
> ATS_MAX_TERMS,
> glob_last;
> ATS_MAX_TERMS := 40;
> # before first input block
> #BEGIN FIRST INPUT BLOCK
> #BEGIN BLOCK 1
> #BEGIN FIRST INPUT BLOCK
> Digits:=32;
> max_terms:=40;
> #END BLOCK 1
> #END FIRST INPUT BLOCK
> #START OF INITS AFTER INPUT BLOCK
> glob_html_log := true;
> #END OF INITS AFTER INPUT BLOCK
> # before generate arrays
> array_y_init:= Array(0..(40),[]);
> array_norms:= Array(0..(40),[]);
> array_fact_1:= Array(0..(40),[]);
> array_1st_rel_error:= Array(0..(2),[]);
> array_last_rel_error:= Array(0..(2),[]);
> array_est_rel_error:= Array(0..(2),[]);
> array_max_est_error:= Array(0..(2),[]);
> array_type_pole:= Array(0..(2),[]);
> array_type_real_pole:= Array(0..(2),[]);
> array_type_complex_pole:= Array(0..(2),[]);
> array_est_digits:= Array(0..(2),[]);
> array_y:= Array(0..(40),[]);
> array_x:= Array(0..(40),[]);
> array_tmp0:= Array(0..(40),[]);
> array_tmp1_g:= Array(0..(40),[]);
> array_tmp1:= Array(0..(40),[]);
> array_tmp2:= Array(0..(40),[]);
> array_m1:= Array(0..(40),[]);
> array_y_higher := Array(0..(2) ,(0..40+ 1),[]);
> array_y_higher_work := Array(0..(2) ,(0..40+ 1),[]);
> array_y_higher_work2 := Array(0..(2) ,(0..40+ 1),[]);
> array_y_set_initial := Array(0..(2) ,(0..40+ 1),[]);
> array_given_rad_poles := Array(0..(2) ,(0..3+ 1),[]);
> array_given_ord_poles := Array(0..(2) ,(0..3+ 1),[]);
> array_rad_test_poles := Array(0..(2) ,(0..4+ 1),[]);
> array_ord_test_poles := Array(0..(2) ,(0..4+ 1),[]);
> array_fact_2 := Array(0..(40) ,(0..40+ 1),[]);
> # before generate constants
> # before generate globals definition
> #Top Generate Globals Definition
> #Bottom Generate Globals Deninition
> # before generate const definition
> # before arrays initialized
> term := 1;
> while (term <= 40) do # do number 1
> array_y_init[term] := c(0.0);
> term := term + 1;
> od;# end do number 1;
> term := 1;
> while (term <= 40) do # do number 1
> array_norms[term] := c(0.0);
> term := term + 1;
> od;# end do number 1;
> term := 1;
> while (term <= 40) do # do number 1
> array_fact_1[term] := c(0.0);
> term := term + 1;
> od;# end do number 1;
> term := 1;
> while (term <= 2) do # do number 1
> array_1st_rel_error[term] := c(0.0);
> term := term + 1;
> od;# end do number 1;
> term := 1;
> while (term <= 2) do # do number 1
> array_last_rel_error[term] := c(0.0);
> term := term + 1;
> od;# end do number 1;
> term := 1;
> while (term <= 2) do # do number 1
> array_est_rel_error[term] := c(0.0);
> term := term + 1;
> od;# end do number 1;
> term := 1;
> while (term <= 2) do # do number 1
> array_max_est_error[term] := c(0.0);
> term := term + 1;
> od;# end do number 1;
> term := 1;
> while (term <= 2) do # do number 1
> array_type_pole[term] := 0;
> term := term + 1;
> od;# end do number 1;
> term := 1;
> while (term <= 2) do # do number 1
> array_type_real_pole[term] := 0;
> term := term + 1;
> od;# end do number 1;
> term := 1;
> while (term <= 2) do # do number 1
> array_type_complex_pole[term] := 0;
> term := term + 1;
> od;# end do number 1;
> term := 1;
> while (term <= 2) do # do number 1
> array_est_digits[term] := 0;
> term := term + 1;
> od;# end do number 1;
> term := 1;
> while (term <= 40) do # do number 1
> array_y[term] := c(0.0);
> term := term + 1;
> od;# end do number 1;
> term := 1;
> while (term <= 40) do # do number 1
> array_x[term] := c(0.0);
> term := term + 1;
> od;# end do number 1;
> term := 1;
> while (term <= 40) do # do number 1
> array_tmp0[term] := c(0.0);
> term := term + 1;
> od;# end do number 1;
> term := 1;
> while (term <= 40) do # do number 1
> array_tmp1_g[term] := c(0.0);
> term := term + 1;
> od;# end do number 1;
> term := 1;
> while (term <= 40) do # do number 1
> array_tmp1[term] := c(0.0);
> term := term + 1;
> od;# end do number 1;
> term := 1;
> while (term <= 40) do # do number 1
> array_tmp2[term] := c(0.0);
> term := term + 1;
> od;# end do number 1;
> term := 1;
> while (term <= 40) do # do number 1
> array_m1[term] := c(0.0);
> term := term + 1;
> od;# end do number 1;
> ord := 1;
> while (ord <=2) do # do number 1
> term := 1;
> while (term <= 40) do # do number 2
> array_y_higher[ord,term] := c(0.0);
> term := term + 1;
> od;# end do number 2;
> ord := ord + 1;
> od;# end do number 1;
> ord := 1;
> while (ord <=2) do # do number 1
> term := 1;
> while (term <= 40) do # do number 2
> array_y_higher_work[ord,term] := c(0.0);
> term := term + 1;
> od;# end do number 2;
> ord := ord + 1;
> od;# end do number 1;
> ord := 1;
> while (ord <=2) do # do number 1
> term := 1;
> while (term <= 40) do # do number 2
> array_y_higher_work2[ord,term] := c(0.0);
> term := term + 1;
> od;# end do number 2;
> ord := ord + 1;
> od;# end do number 1;
> ord := 1;
> while (ord <=2) do # do number 1
> term := 1;
> while (term <= 40) do # do number 2
> array_y_set_initial[ord,term] := c(0.0);
> term := term + 1;
> od;# end do number 2;
> ord := ord + 1;
> od;# end do number 1;
> ord := 1;
> while (ord <=2) do # do number 1
> term := 1;
> while (term <= 3) do # do number 2
> array_given_rad_poles[ord,term] := c(0.0);
> term := term + 1;
> od;# end do number 2;
> ord := ord + 1;
> od;# end do number 1;
> ord := 1;
> while (ord <=2) do # do number 1
> term := 1;
> while (term <= 3) do # do number 2
> array_given_ord_poles[ord,term] := c(0.0);
> term := term + 1;
> od;# end do number 2;
> ord := ord + 1;
> od;# end do number 1;
> ord := 1;
> while (ord <=2) do # do number 1
> term := 1;
> while (term <= 4) do # do number 2
> array_rad_test_poles[ord,term] := c(0.0);
> term := term + 1;
> od;# end do number 2;
> ord := ord + 1;
> od;# end do number 1;
> ord := 1;
> while (ord <=2) do # do number 1
> term := 1;
> while (term <= 4) do # do number 2
> array_ord_test_poles[ord,term] := c(0.0);
> term := term + 1;
> od;# end do number 2;
> ord := ord + 1;
> od;# end do number 1;
> ord := 1;
> while (ord <=40) do # do number 1
> term := 1;
> while (term <= 40) do # do number 2
> array_fact_2[ord,term] := c(0.0);
> term := term + 1;
> od;# end do number 2;
> ord := ord + 1;
> od;# end do number 1;
> # before symbols initialized
> #BEGIN SYMBOLS INITIALIZATED
> zero_ats_ar(array_y);
> zero_ats_ar(array_x);
> zero_ats_ar(array_tmp0);
> zero_ats_ar(array_tmp1_g);
> zero_ats_ar(array_tmp1);
> zero_ats_ar(array_tmp2);
> zero_ats_ar(array_m1);
> zero_ats_ar(array_const_1);
> array_const_1[1] := c(1);
> zero_ats_ar(array_const_0D0);
> array_const_0D0[1] := c(0.0);
> zero_ats_ar(array_m1);
> array_m1[1] := glob__m1;
> #END SYMBOLS INITIALIZATED
> # before generate factorials init
> #Initing Factorial Tables
> iiif := 0;
> while (iiif <= ATS_MAX_TERMS) do # do number 1
> jjjf := 0;
> while (jjjf <= ATS_MAX_TERMS) do # do number 2
> array_fact_1[iiif] := 0;
> array_fact_2[iiif,jjjf] := 0;
> jjjf := jjjf + 1;
> od;# end do number 2;
> iiif := iiif + 1;
> od;# end do number 1;
> #Done Initing Factorial Table
> ALWAYS := 1;
> INFO := 2;
> DEBUGL := 3;
> DEBUGMASSIVE := 4;
> glob_iolevel := 5;
> glob_yes_pole := 4;
> glob_no_pole := 3;
> glob_not_given := 0;
> glob_no_sing_tests := 4;
> glob_ratio_test := 1;
> glob_three_term_test := 2;
> glob_six_term_test := 3;
> glob_log_10 := log(c(10.0));
> MAX_UNCHANGED := 10;
> glob__small := c(0.1e-50);
> glob_small_float := c(0.1e-50);
> glob_smallish_float := c(0.1e-60);
> glob_large_float := c(1.0e100);
> glob_larger_float := c(1.1e100);
> glob__m2 := c(-2);
> glob__m1 := c(-1);
> glob__0 := c(0);
> glob__1 := c(1);
> glob__2 := c(2);
> glob__3 := c(3);
> glob__4 := c(4);
> glob__5 := c(5);
> glob__8 := c(8);
> glob__10 := c(10);
> glob__100 := c(100);
> glob__pi := c(0.0);
> glob__0_5 := c(0.5);
> glob__0_8 := c(0.8);
> glob__m0_8 := c(-0.8);
> glob__0_25 := c(0.25);
> glob__0_125 := c(0.125);
> glob_h := 0.1;
> glob_nxt := 1;
> glob_prec := c(1.0e-16);
> glob_check_sign := c(1.0);
> glob_desired_digits_correct := c(8.0);
> glob_max_estimated_step_error := c(0.0);
> glob_ratio_of_radius := c(0.1);
> glob_percent_done := c(0.0);
> glob_total_exp_sec := c(0.1);
> glob_optimal_expect_sec := c(0.1);
> glob_estimated_size_answer := c(100.0);
> glob_almost_1 := c(0.9990);
> glob_clock_sec := c(0.0);
> glob_clock_start_sec := c(0.0);
> glob_disp_incr := c(0.1);
> glob_diff_rc_fm := c(0.1);
> glob_diff_rc_fmm1 := c(0.1);
> glob_diff_rc_fmm2 := c(0.1);
> glob_diff_ord_fm := c(0.1);
> glob_diff_ord_fmm1 := c(0.1);
> glob_diff_ord_fmm2 := c(0.1);
> glob_six_term_ord_save := c(0.1);
> glob_guess_error_rc := c(0.1);
> glob_guess_error_ord := c(0.1);
> glob_least_given_sing := c(9.9e200);
> glob_least_ratio_sing := c(9.9e200);
> glob_least_3_sing := c(9.9e100);
> glob_least_6_sing := c(9.9e100);
> glob_last_good_h := c(0.1);
> glob_max_h := c(0.1);
> glob_min_h := c(0.000001);
> glob_display_interval := c(0.1);
> glob_abserr := c(0.1e-10);
> glob_relerr := c(0.1e-10);
> glob_min_pole_est := c(0.1e+10);
> glob_max_rel_trunc_err := c(0.1e-10);
> glob_max_trunc_err := c(0.1e-10);
> glob_max_hours := c(0.0);
> glob_optimal_clock_start_sec := c(0.0);
> glob_optimal_start := c(0.0);
> glob_upper_ratio_limit := c(1.0001);
> glob_lower_ratio_limit := c(0.9999);
> glob_max_sec := c(10000.0);
> glob_orig_start_sec := c(0.0);
> glob_normmax := c(0.0);
> glob_max_minutes := c(0.0);
> glob_next_display := c(0.0);
> glob_est_digits := 1;
> glob_subiter_method := 3;
> glob_html_log := true;
> glob_min_good_digits := 99999;
> glob_good_digits := 0;
> glob_min_apfp_est_good_digits := 99999;
> glob_apfp_est_good_digits := 0;
> glob_max_opt_iter := 10;
> glob_dump := false;
> glob_djd_debug := true;
> glob_display_flag := true;
> glob_djd_debug2 := true;
> glob_h_reason := 0;
> glob_sec_in_minute := 60 ;
> glob_min_in_hour := 60;
> glob_hours_in_day := 24;
> glob_days_in_year := 365;
> glob_sec_in_hour := 3600;
> glob_sec_in_day := 86400;
> glob_sec_in_year := 31536000;
> glob_not_yet_finished := true;
> glob_initial_pass := true;
> glob_not_yet_start_msg := true;
> glob_reached_optimal_h := false;
> glob_optimal_done := false;
> glob_type_given_pole := 0;
> glob_optimize := false;
> glob_look_poles := false;
> glob_dump_closed_form := false;
> glob_max_iter := 10000;
> glob_no_eqs := 0;
> glob_unchanged_h_cnt := 0;
> glob_warned := false;
> glob_warned2 := false;
> glob_start := 0;
> glob_iter := 0;
> # before generate set diff initial
> array_y_set_initial[1,1] := true;
> array_y_set_initial[1,2] := false;
> array_y_set_initial[1,3] := false;
> array_y_set_initial[1,4] := false;
> array_y_set_initial[1,5] := false;
> array_y_set_initial[1,6] := false;
> array_y_set_initial[1,7] := false;
> array_y_set_initial[1,8] := false;
> array_y_set_initial[1,9] := false;
> array_y_set_initial[1,10] := false;
> array_y_set_initial[1,11] := false;
> array_y_set_initial[1,12] := false;
> array_y_set_initial[1,13] := false;
> array_y_set_initial[1,14] := false;
> array_y_set_initial[1,15] := false;
> array_y_set_initial[1,16] := false;
> array_y_set_initial[1,17] := false;
> array_y_set_initial[1,18] := false;
> array_y_set_initial[1,19] := false;
> array_y_set_initial[1,20] := false;
> array_y_set_initial[1,21] := false;
> array_y_set_initial[1,22] := false;
> array_y_set_initial[1,23] := false;
> array_y_set_initial[1,24] := false;
> array_y_set_initial[1,25] := false;
> array_y_set_initial[1,26] := false;
> array_y_set_initial[1,27] := false;
> array_y_set_initial[1,28] := false;
> array_y_set_initial[1,29] := false;
> array_y_set_initial[1,30] := false;
> array_y_set_initial[1,31] := false;
> array_y_set_initial[1,32] := false;
> array_y_set_initial[1,33] := false;
> array_y_set_initial[1,34] := false;
> array_y_set_initial[1,35] := false;
> array_y_set_initial[1,36] := false;
> array_y_set_initial[1,37] := false;
> array_y_set_initial[1,38] := false;
> array_y_set_initial[1,39] := false;
> array_y_set_initial[1,40] := false;
> # before generate init omniout const
> ALWAYS := 1;
> INFO := 2;
> DEBUGL := 3;
> DEBUGMASSIVE := 4;
> ATS_MAX_TERMS := 40;
> glob_iolevel := INFO;
> # set default block
> #Write Set Defaults
> glob_orig_start_sec := elapsed_time_seconds();
> glob_display_flag := true;
> glob_no_eqs := 1;
> glob_iter := -1;
> opt_iter := -1;
> glob_max_iter := 10000;
> glob_max_hours := (0.0);
> glob_max_minutes := (15.0);
> omniout_str(ALWAYS,"##############ECHO OF PROBLEM#################");
> omniout_str(ALWAYS,"##############temp/cospostcpx.cpx#################");
> omniout_str(ALWAYS,"diff ( y , x , 1 ) = cos ( x ) ; ");
> omniout_str(ALWAYS,"!");
> omniout_str(ALWAYS,"#BEGIN FIRST INPUT BLOCK");
> omniout_str(ALWAYS,"Digits:=32;");
> omniout_str(ALWAYS,"max_terms:=40;");
> omniout_str(ALWAYS,"!");
> omniout_str(ALWAYS,"#END FIRST INPUT BLOCK");
> omniout_str(ALWAYS,"#BEGIN SECOND INPUT BLOCK");
> omniout_str(ALWAYS,"x_start := 0.1 + 0.1 * I;");
> omniout_str(ALWAYS,"x_end := 99.0 + 99.0 * I;");
> omniout_str(ALWAYS,"array_y_init[0 + 1] := exact_soln_y(x_start);");
> omniout_str(ALWAYS,"glob_look_poles := false;");
> omniout_str(ALWAYS,"");
> omniout_str(ALWAYS,"");
> omniout_str(ALWAYS,"");
> omniout_str(ALWAYS,"");
> omniout_str(ALWAYS,"");
> omniout_str(ALWAYS,"");
> omniout_str(ALWAYS,"");
> omniout_str(ALWAYS,"glob_type_given_pole := 3;");
> omniout_str(ALWAYS,"#END SECOND INPUT BLOCK");
> omniout_str(ALWAYS,"#BEGIN OVERRIDE BLOCK");
> omniout_str(ALWAYS,"glob_desired_digits_correct:=8;");
> omniout_str(ALWAYS,"glob_max_minutes:=(3.0);");
> omniout_str(ALWAYS,"glob_subiter_method:=3;");
> omniout_str(ALWAYS,"glob_max_iter:=10000;");
> omniout_str(ALWAYS,"glob_upper_ratio_limit:=c(1.000001);");
> omniout_str(ALWAYS,"glob_lower_ratio_limit:=c(0.999999);");
> omniout_str(ALWAYS,"glob_look_poles:=true;");
> omniout_str(ALWAYS,"glob_h:=c(0.001);");
> omniout_str(ALWAYS,"glob_display_interval:=c(0.01);");
> omniout_str(ALWAYS,"#END OVERRIDE BLOCK");
> omniout_str(ALWAYS,"!");
> omniout_str(ALWAYS,"#BEGIN USER DEF BLOCK");
> omniout_str(ALWAYS,"exact_soln_y := proc(x)");
> omniout_str(ALWAYS,"return(c(1.0) + sin(c(x)));");
> omniout_str(ALWAYS,"end;");
> omniout_str(ALWAYS,"next_delta := proc()");
> omniout_str(ALWAYS,"global glob_nxt, x_delta;");
> omniout_str(ALWAYS,"");
> omniout_str(ALWAYS,"x_delta := [ 0.001 + 0.00004 * I,");
> omniout_str(ALWAYS,"0.0001 + 0.004 * I,");
> omniout_str(ALWAYS,"0.003 + 0.006 * I,");
> omniout_str(ALWAYS,"0.0001 + 0.005 * I,");
> omniout_str(ALWAYS,"0.0001 + 0.003 * I,");
> omniout_str(ALWAYS,"0.001 + 0.001 * I,");
> omniout_str(ALWAYS,"0.001 + 0.003 * I,");
> omniout_str(ALWAYS,"0.0001 + 0.004 * I,");
> omniout_str(ALWAYS,"0.003 + 0.006 * I,");
> omniout_str(ALWAYS,"0.0001 + 0.005 * I,");
> omniout_str(ALWAYS,"0.0001 + 0.003 * I,");
> omniout_str(ALWAYS,"0.001 + 0.001 * I,");
> omniout_str(ALWAYS,"0.001 + 0.003 * I,");
> omniout_str(ALWAYS,"0.0001 + 0.004 * I,");
> omniout_str(ALWAYS,"0.003 + 0.006 * I,");
> omniout_str(ALWAYS,"0.0001 + 0.005 * I,");
> omniout_str(ALWAYS,"0.0001 + 0.003 * I,");
> omniout_str(ALWAYS,"0.001 + 0.001 * I,");
> omniout_str(ALWAYS,"0.001 + 0.003 * I,");
> omniout_str(ALWAYS,"0.0001 + 0.004 * I,");
> omniout_str(ALWAYS,"0.003 + 0.006 * I,");
> omniout_str(ALWAYS,"0.0001 + 0.005 * I,");
> omniout_str(ALWAYS,"0.0001 + 0.003 * I,");
> omniout_str(ALWAYS,"0.001 + 0.001 * I,");
> omniout_str(ALWAYS,"0.001 + 0.003 * I,");
> omniout_str(ALWAYS,"0.0001 + 0.004 * I,");
> omniout_str(ALWAYS,"0.003 + 0.006 * I,");
> omniout_str(ALWAYS,"0.0001 + 0.005 * I,");
> omniout_str(ALWAYS,"0.0001 + 0.003 * I,");
> omniout_str(ALWAYS,"0.001 + 0.001 * I,");
> omniout_str(ALWAYS,"0.0001 + 0.004 * I,");
> omniout_str(ALWAYS,"0.003 + 0.006 * I,");
> omniout_str(ALWAYS,"0.0001 + 0.005 * I,");
> omniout_str(ALWAYS,"0.0001 + 0.003 * I,");
> omniout_str(ALWAYS,"0.001 + 0.001 * I,");
> omniout_str(ALWAYS,"0.001 + 0.003 * I,");
> omniout_str(ALWAYS,"0.0001 + 0.004 * I,");
> omniout_str(ALWAYS,"0.003 + 0.006 * I,");
> omniout_str(ALWAYS,"0.0001 + 0.005 * I,");
> omniout_str(ALWAYS,"0.0001 + 0.003 * I,");
> omniout_str(ALWAYS,"0.001 + 0.001 * I,");
> omniout_str(ALWAYS,"0.001 + 0.003 * I,");
> omniout_str(ALWAYS,"0.0001 + 0.004 * I,");
> omniout_str(ALWAYS,"0.003 + 0.006 * I,");
> omniout_str(ALWAYS,"0.0001 + 0.005 * I,");
> omniout_str(ALWAYS,"0.0001 + 0.003 * I,");
> omniout_str(ALWAYS,"0.001 + 0.001 * I,");
> omniout_str(ALWAYS,"0.001 + 0.003 * I,");
> omniout_str(ALWAYS,"0.0001 + 0.004 * I,");
> omniout_str(ALWAYS,"0.003 + 0.006 * I,");
> omniout_str(ALWAYS,"0.0001 + 0.005 * I,");
> omniout_str(ALWAYS,"0.0001 + 0.003 * I,");
> omniout_str(ALWAYS,"0.001 + 0.001 * I,");
> omniout_str(ALWAYS,"0.001 + 0.003 * I,");
> omniout_str(ALWAYS,"0.0001 + 0.004 * I,");
> omniout_str(ALWAYS,"0.003 + 0.006 * I,");
> omniout_str(ALWAYS,"0.0001 + 0.005 * I,");
> omniout_str(ALWAYS,"0.0001 + 0.003 * I,");
> omniout_str(ALWAYS,"0.001 + 0.001 * I,");
> omniout_str(ALWAYS,"0.0001 + 0.004 * I,");
> omniout_str(ALWAYS,"0.003 + 0.006 * I,");
> omniout_str(ALWAYS,"0.0001 + 0.005 * I,");
> omniout_str(ALWAYS,"0.0001 + 0.003 * I,");
> omniout_str(ALWAYS,"0.001 + 0.001 * I,");
> omniout_str(ALWAYS,"0.001 + 0.003 * I,");
> omniout_str(ALWAYS,"0.0001 + 0.004 * I,");
> omniout_str(ALWAYS,"0.003 + 0.006 * I,");
> omniout_str(ALWAYS,"0.0001 + 0.005 * I,");
> omniout_str(ALWAYS,"0.0001 + 0.003 * I,");
> omniout_str(ALWAYS,"0.001 + 0.001 * I,");
> omniout_str(ALWAYS,"0.001 + 0.003 * I,");
> omniout_str(ALWAYS,"0.0001 + 0.004 * I,");
> omniout_str(ALWAYS,"0.003 + 0.006 * I,");
> omniout_str(ALWAYS,"0.0001 + 0.005 * I,");
> omniout_str(ALWAYS,"0.0001 + 0.003 * I,");
> omniout_str(ALWAYS,"0.001 + 0.001 * I,");
> omniout_str(ALWAYS,"0.001 + 0.003 * I,");
> omniout_str(ALWAYS,"0.0001 + 0.004 * I,");
> omniout_str(ALWAYS,"0.003 + 0.006 * I,");
> omniout_str(ALWAYS,"0.0001 + 0.005 * I,");
> omniout_str(ALWAYS,"0.0001 + 0.003 * I,");
> omniout_str(ALWAYS,"0.001 + 0.001 * I,");
> omniout_str(ALWAYS,"0.001 + 0.003 * I,");
> omniout_str(ALWAYS,"0.0001 + 0.004 * I,");
> omniout_str(ALWAYS,"0.003 + 0.006 * I,");
> omniout_str(ALWAYS,"0.0001 + 0.005 * I,");
> omniout_str(ALWAYS,"0.0001 + 0.003 * I,");
> omniout_str(ALWAYS,"0.001 + 0.001 * I,");
> omniout_str(ALWAYS,"0.0001 + 0.004 * I,");
> omniout_str(ALWAYS,"0.003 + 0.006 * I,");
> omniout_str(ALWAYS,"0.0001 + 0.005 * I,");
> omniout_str(ALWAYS,"0.0001 + 0.003 * I,");
> omniout_str(ALWAYS,"0.001 + 0.001 * I,");
> omniout_str(ALWAYS,"0.001 + 0.003 * I,");
> omniout_str(ALWAYS,"0.0001 + 0.004 * I,");
> omniout_str(ALWAYS,"0.003 + 0.006 * I,");
> omniout_str(ALWAYS,"0.0001 + 0.005 * I,");
> omniout_str(ALWAYS,"0.0001 + 0.003 * I,");
> omniout_str(ALWAYS,"0.001 + 0.001 * I,");
> omniout_str(ALWAYS,"0.001 + 0.003 * I,");
> omniout_str(ALWAYS,"0.0001 + 0.004 * I,");
> omniout_str(ALWAYS,"0.003 + 0.006 * I,");
> omniout_str(ALWAYS,"0.0001 + 0.005 * I,");
> omniout_str(ALWAYS,"0.0001 + 0.003 * I,");
> omniout_str(ALWAYS,"0.001 + 0.001 * I,");
> omniout_str(ALWAYS,"0.001 + 0.003 * I,");
> omniout_str(ALWAYS,"0.0001 + 0.004 * I,");
> omniout_str(ALWAYS,"0.003 + 0.006 * I,");
> omniout_str(ALWAYS,"0.0001 + 0.005 * I,");
> omniout_str(ALWAYS,"0.0001 + 0.003 * I,");
> omniout_str(ALWAYS,"0.001 + 0.001 * I,");
> omniout_str(ALWAYS,"0.001 + 0.003 * I,");
> omniout_str(ALWAYS,"0.0001 + 0.004 * I,");
> omniout_str(ALWAYS,"0.003 + 0.006 * I,");
> omniout_str(ALWAYS,"0.0001 + 0.005 * I,");
> omniout_str(ALWAYS,"0.0001 + 0.003 * I,");
> omniout_str(ALWAYS,"0.001 + 0.001 * I,");
> omniout_str(ALWAYS,"0.0001 + 0.004 * I,");
> omniout_str(ALWAYS,"0.003 + 0.006 * I,");
> omniout_str(ALWAYS,"0.0001 + 0.005 * I,");
> omniout_str(ALWAYS,"0.0001 + 0.003 * I,");
> omniout_str(ALWAYS,"0.001 + 0.001 * I,");
> omniout_str(ALWAYS,"0.001 + 0.003 * I,");
> omniout_str(ALWAYS,"0.0001 + 0.004 * I,");
> omniout_str(ALWAYS,"0.003 + 0.006 * I,");
> omniout_str(ALWAYS,"0.0001 + 0.005 * I,");
> omniout_str(ALWAYS,"0.0001 + 0.003 * I,");
> omniout_str(ALWAYS,"0.001 + 0.001 * I,");
> omniout_str(ALWAYS,"0.001 + 0.003 * I,");
> omniout_str(ALWAYS,"0.0001 + 0.004 * I,");
> omniout_str(ALWAYS,"0.003 + 0.006 * I,");
> omniout_str(ALWAYS,"0.0001 + 0.005 * I,");
> omniout_str(ALWAYS,"0.0001 + 0.003 * I,");
> omniout_str(ALWAYS,"0.001 + 0.001 * I,");
> omniout_str(ALWAYS,"0.001 + 0.003 * I,");
> omniout_str(ALWAYS,"0.0001 + 0.004 * I,");
> omniout_str(ALWAYS,"0.003 + 0.006 * I,");
> omniout_str(ALWAYS,"0.0001 + 0.005 * I,");
> omniout_str(ALWAYS,"0.0001 + 0.003 * I,");
> omniout_str(ALWAYS,"0.001 + 0.001 * I,");
> omniout_str(ALWAYS,"0.001 + 0.003 * I,");
> omniout_str(ALWAYS,"0.0001 + 0.004 * I,");
> omniout_str(ALWAYS,"0.003 + 0.006 * I,");
> omniout_str(ALWAYS,"0.0001 + 0.005 * I,");
> omniout_str(ALWAYS,"0.0001 + 0.003 * I,");
> omniout_str(ALWAYS,"0.001 + 0.001 * I,");
> omniout_str(ALWAYS,"0.0001 + 0.004 * I,");
> omniout_str(ALWAYS,"0.003 + 0.006 * I,");
> omniout_str(ALWAYS,"0.0001 + 0.005 * I,");
> omniout_str(ALWAYS,"0.0001 + 0.003 * I,");
> omniout_str(ALWAYS,"0.001 + 0.001 * I,");
> omniout_str(ALWAYS,"0.001 + 0.003 * I,");
> omniout_str(ALWAYS,"0.0001 + 0.004 * I,");
> omniout_str(ALWAYS,"0.003 + 0.006 * I,");
> omniout_str(ALWAYS,"0.0001 + 0.005 * I,");
> omniout_str(ALWAYS,"0.0001 + 0.003 * I,");
> omniout_str(ALWAYS,"0.001 + 0.001 * I,");
> omniout_str(ALWAYS,"0.001 + 0.003 * I,");
> omniout_str(ALWAYS,"0.0001 + 0.004 * I,");
> omniout_str(ALWAYS,"0.003 + 0.006 * I,");
> omniout_str(ALWAYS,"0.0001 + 0.005 * I,");
> omniout_str(ALWAYS,"0.0001 + 0.003 * I,");
> omniout_str(ALWAYS,"0.001 + 0.001 * I,");
> omniout_str(ALWAYS,"0.001 + 0.003 * I,");
> omniout_str(ALWAYS,"0.0001 + 0.004 * I,");
> omniout_str(ALWAYS,"0.003 + 0.006 * I,");
> omniout_str(ALWAYS,"0.0001 + 0.005 * I,");
> omniout_str(ALWAYS,"0.0001 + 0.003 * I,");
> omniout_str(ALWAYS,"0.001 + 0.001 * I,");
> omniout_str(ALWAYS,"0.001 + 0.003 * I,");
> omniout_str(ALWAYS,"0.0001 + 0.004 * I,");
> omniout_str(ALWAYS,"0.003 + 0.006 * I,");
> omniout_str(ALWAYS,"0.0001 + 0.005 * I,");
> omniout_str(ALWAYS,"0.0001 + 0.003 * I,");
> omniout_str(ALWAYS,"0.001 + 0.001 * I,");
> omniout_str(ALWAYS,"0.0001 + 0.004 * I,");
> omniout_str(ALWAYS,"0.003 + 0.006 * I,");
> omniout_str(ALWAYS,"0.0001 + 0.005 * I,");
> omniout_str(ALWAYS,"0.0001 + 0.003 * I,");
> omniout_str(ALWAYS,"0.001 + 0.001 * I,");
> omniout_str(ALWAYS,"0.001 + 0.003 * I,");
> omniout_str(ALWAYS,"0.0001 + 0.004 * I,");
> omniout_str(ALWAYS,"0.0001 + 0.004 * I,");
> omniout_str(ALWAYS,"0.003 + 0.006 * I,");
> omniout_str(ALWAYS,"0.0001 + 0.005 * I,");
> omniout_str(ALWAYS,"0.0001 + 0.003 * I,");
> omniout_str(ALWAYS,"0.001 + 0.001 * I,");
> omniout_str(ALWAYS,"0.001 + 0.003 * I,");
> omniout_str(ALWAYS,"0.0001 + 0.004 * I,");
> omniout_str(ALWAYS,"0.003 + 0.006 * I,");
> omniout_str(ALWAYS,"0.0001 + 0.005 * I,");
> omniout_str(ALWAYS,"0.0001 + 0.003 * I,");
> omniout_str(ALWAYS,"0.001 + 0.001 * I,");
> omniout_str(ALWAYS,"0.001 + 0.003 * I,");
> omniout_str(ALWAYS,"0.0001 + 0.004 * I,");
> omniout_str(ALWAYS,"0.003 + 0.006 * I,");
> omniout_str(ALWAYS,"0.0001 + 0.005 * I,");
> omniout_str(ALWAYS,"0.0001 + 0.003 * I,");
> omniout_str(ALWAYS,"0.001 + 0.001 * I,");
> omniout_str(ALWAYS,"0.001 + 0.003 * I,");
> omniout_str(ALWAYS,"0.0001 + 0.004 * I,");
> omniout_str(ALWAYS,"0.003 + 0.006 * I,");
> omniout_str(ALWAYS,"0.0001 + 0.005 * I,");
> omniout_str(ALWAYS,"0.0001 + 0.003 * I,");
> omniout_str(ALWAYS,"0.001 + 0.001 * I,");
> omniout_str(ALWAYS,"0.001 + 0.003 * I,");
> omniout_str(ALWAYS,"0.0001 + 0.004 * I,");
> omniout_str(ALWAYS,"0.003 + 0.006 * I,");
> omniout_str(ALWAYS,"0.0001 + 0.005 * I,");
> omniout_str(ALWAYS,"0.0001 + 0.003 * I,");
> omniout_str(ALWAYS,"0.001 + 0.001 * I,");
> omniout_str(ALWAYS,"0.0001 + 0.004 * I,");
> omniout_str(ALWAYS,"0.003 + 0.006 * I,");
> omniout_str(ALWAYS,"0.0001 + 0.005 * I,");
> omniout_str(ALWAYS,"0.0001 + 0.003 * I,");
> omniout_str(ALWAYS,"0.001 + 0.001 * I,");
> omniout_str(ALWAYS,"0.001 + 0.003 * I,");
> omniout_str(ALWAYS,"0.0001 + 0.004 * I,");
> omniout_str(ALWAYS,"0.003 + 0.006 * I,");
> omniout_str(ALWAYS,"0.0001 + 0.005 * I,");
> omniout_str(ALWAYS,"0.0001 + 0.003 * I,");
> omniout_str(ALWAYS,"0.001 + 0.001 * I,");
> omniout_str(ALWAYS,"0.001 + 0.003 * I,");
> omniout_str(ALWAYS,"0.0001 + 0.004 * I,");
> omniout_str(ALWAYS,"0.003 + 0.006 * I,");
> omniout_str(ALWAYS,"0.0001 + 0.005 * I,");
> omniout_str(ALWAYS,"0.0001 + 0.003 * I,");
> omniout_str(ALWAYS,"0.001 + 0.001 * I,");
> omniout_str(ALWAYS,"0.001 + 0.003 * I,");
> omniout_str(ALWAYS,"0.0001 + 0.004 * I,");
> omniout_str(ALWAYS,"0.003 + 0.006 * I,");
> omniout_str(ALWAYS,"0.0001 + 0.005 * I,");
> omniout_str(ALWAYS,"0.0001 + 0.003 * I,");
> omniout_str(ALWAYS,"0.001 + 0.001 * I,");
> omniout_str(ALWAYS,"0.001 + 0.003 * I,");
> omniout_str(ALWAYS,"0.0001 + 0.004 * I,");
> omniout_str(ALWAYS,"0.003 + 0.006 * I,");
> omniout_str(ALWAYS,"0.0001 + 0.005 * I,");
> omniout_str(ALWAYS,"0.0001 + 0.003 * I,");
> omniout_str(ALWAYS,"0.001 + 0.001 * I,");
> omniout_str(ALWAYS,"0.0001 + 0.004 * I,");
> omniout_str(ALWAYS,"0.003 + 0.006 * I,");
> omniout_str(ALWAYS,"0.0001 + 0.005 * I,");
> omniout_str(ALWAYS,"0.0001 + 0.003 * I,");
> omniout_str(ALWAYS,"0.001 + 0.001 * I,");
> omniout_str(ALWAYS,"0.001 + 0.003 * I,");
> omniout_str(ALWAYS,"0.0001 + 0.004 * I,");
> omniout_str(ALWAYS,"0.003 + 0.006 * I,");
> omniout_str(ALWAYS,"0.0001 + 0.005 * I,");
> omniout_str(ALWAYS,"0.0001 + 0.003 * I,");
> omniout_str(ALWAYS,"0.001 + 0.001 * I,");
> omniout_str(ALWAYS,"0.001 + 0.003 * I,");
> omniout_str(ALWAYS,"0.0001 + 0.004 * I,");
> omniout_str(ALWAYS,"0.003 + 0.006 * I,");
> omniout_str(ALWAYS,"0.0001 + 0.005 * I,");
> omniout_str(ALWAYS,"0.0001 + 0.003 * I,");
> omniout_str(ALWAYS,"0.001 + 0.001 * I,");
> omniout_str(ALWAYS,"0.001 + 0.003 * I,");
> omniout_str(ALWAYS,"0.0001 + 0.004 * I,");
> omniout_str(ALWAYS,"0.003 + 0.006 * I,");
> omniout_str(ALWAYS,"0.0001 + 0.005 * I,");
> omniout_str(ALWAYS,"0.0001 + 0.003 * I,");
> omniout_str(ALWAYS,"0.001 + 0.001 * I,");
> omniout_str(ALWAYS,"0.001 + 0.003 * I,");
> omniout_str(ALWAYS,"0.0001 + 0.004 * I,");
> omniout_str(ALWAYS,"0.003 + 0.006 * I,");
> omniout_str(ALWAYS,"0.0001 + 0.005 * I,");
> omniout_str(ALWAYS,"0.0001 + 0.003 * I,");
> omniout_str(ALWAYS,"0.001 + 0.001 * I,");
> omniout_str(ALWAYS,"0.0001 + 0.004 * I,");
> omniout_str(ALWAYS,"0.003 + 0.006 * I,");
> omniout_str(ALWAYS,"0.0001 + 0.005 * I,");
> omniout_str(ALWAYS,"0.0001 + 0.003 * I,");
> omniout_str(ALWAYS,"0.001 + 0.001 * I,");
> omniout_str(ALWAYS,"0.001 + 0.003 * I,");
> omniout_str(ALWAYS,"0.0001 + 0.004 * I,");
> omniout_str(ALWAYS,"0.003 + 0.006 * I,");
> omniout_str(ALWAYS,"0.0001 + 0.005 * I,");
> omniout_str(ALWAYS,"0.0001 + 0.003 * I,");
> omniout_str(ALWAYS,"0.001 + 0.001 * I,");
> omniout_str(ALWAYS,"0.001 + 0.003 * I,");
> omniout_str(ALWAYS,"0.0001 + 0.004 * I,");
> omniout_str(ALWAYS,"0.003 + 0.006 * I,");
> omniout_str(ALWAYS,"0.0001 + 0.005 * I,");
> omniout_str(ALWAYS,"0.0001 + 0.003 * I,");
> omniout_str(ALWAYS,"0.001 + 0.001 * I,");
> omniout_str(ALWAYS,"0.001 + 0.003 * I,");
> omniout_str(ALWAYS,"0.0001 + 0.004 * I,");
> omniout_str(ALWAYS,"0.003 + 0.006 * I,");
> omniout_str(ALWAYS,"0.0001 + 0.005 * I,");
> omniout_str(ALWAYS,"0.0001 + 0.003 * I,");
> omniout_str(ALWAYS,"0.001 + 0.001 * I,");
> omniout_str(ALWAYS,"0.001 + 0.003 * I,");
> omniout_str(ALWAYS,"0.0001 + 0.004 * I,");
> omniout_str(ALWAYS,"0.003 + 0.006 * I,");
> omniout_str(ALWAYS,"0.0001 + 0.005 * I,");
> omniout_str(ALWAYS,"0.0001 + 0.003 * I,");
> omniout_str(ALWAYS,"0.001 + 0.001 * I,");
> omniout_str(ALWAYS,"0.0001 + 0.004 * I,");
> omniout_str(ALWAYS,"0.003 + 0.006 * I,");
> omniout_str(ALWAYS,"0.0001 + 0.005 * I,");
> omniout_str(ALWAYS,"0.0001 + 0.003 * I,");
> omniout_str(ALWAYS,"0.001 + 0.001 * I,");
> omniout_str(ALWAYS,"0.001 + 0.003 * I,");
> omniout_str(ALWAYS,"0.0001 + 0.004 * I,");
> omniout_str(ALWAYS,"0.003 + 0.006 * I,");
> omniout_str(ALWAYS,"0.0001 + 0.005 * I,");
> omniout_str(ALWAYS,"0.0001 + 0.003 * I,");
> omniout_str(ALWAYS,"0.001 + 0.001 * I,");
> omniout_str(ALWAYS,"0.001 + 0.003 * I,");
> omniout_str(ALWAYS,"0.0001 + 0.004 * I,");
> omniout_str(ALWAYS,"0.003 + 0.006 * I,");
> omniout_str(ALWAYS,"0.0001 + 0.005 * I,");
> omniout_str(ALWAYS,"0.0001 + 0.003 * I,");
> omniout_str(ALWAYS,"0.001 + 0.001 * I,");
> omniout_str(ALWAYS,"0.001 + 0.003 * I,");
> omniout_str(ALWAYS,"0.0001 + 0.004 * I,");
> omniout_str(ALWAYS,"0.003 + 0.006 * I,");
> omniout_str(ALWAYS,"0.0001 + 0.005 * I,");
> omniout_str(ALWAYS,"0.0001 + 0.003 * I,");
> omniout_str(ALWAYS,"0.001 + 0.001 * I,");
> omniout_str(ALWAYS,"0.001 + 0.003 * I,");
> omniout_str(ALWAYS,"0.0001 + 0.004 * I,");
> omniout_str(ALWAYS,"0.003 + 0.006 * I,");
> omniout_str(ALWAYS,"0.0001 + 0.005 * I,");
> omniout_str(ALWAYS,"0.0001 + 0.003 * I,");
> omniout_str(ALWAYS,"0.001 + 0.001 * I,");
> omniout_str(ALWAYS,"0.0001 + 0.004 * I,");
> omniout_str(ALWAYS,"0.003 + 0.006 * I,");
> omniout_str(ALWAYS,"0.0001 + 0.005 * I,");
> omniout_str(ALWAYS,"0.0001 + 0.003 * I,");
> omniout_str(ALWAYS,"0.001 + 0.001 * I,");
> omniout_str(ALWAYS,"0.001 + 0.003 * I,");
> omniout_str(ALWAYS,"0.0001 + 0.004 * I,");
> omniout_str(ALWAYS,"0.003 + 0.006 * I,");
> omniout_str(ALWAYS,"0.0001 + 0.005 * I,");
> omniout_str(ALWAYS,"0.0001 + 0.003 * I,");
> omniout_str(ALWAYS,"0.001 + 0.001 * I,");
> omniout_str(ALWAYS,"0.001 + 0.003 * I,");
> omniout_str(ALWAYS,"0.0001 + 0.004 * I,");
> omniout_str(ALWAYS,"0.003 + 0.006 * I,");
> omniout_str(ALWAYS,"0.0001 + 0.005 * I,");
> omniout_str(ALWAYS,"0.0001 + 0.003 * I,");
> omniout_str(ALWAYS,"0.001 + 0.001 * I,");
> omniout_str(ALWAYS,"0.001 + 0.003 * I,");
> omniout_str(ALWAYS,"0.0001 + 0.004 * I,");
> omniout_str(ALWAYS,"0.003 + 0.006 * I,");
> omniout_str(ALWAYS,"0.0001 + 0.005 * I,");
> omniout_str(ALWAYS,"0.0001 + 0.003 * I,");
> omniout_str(ALWAYS,"0.001 + 0.001 * I,");
> omniout_str(ALWAYS,"0.001 + 0.003 * I,");
> omniout_str(ALWAYS,"0.0001 + 0.004 * I,");
> omniout_str(ALWAYS,"0.003 + 0.006 * I,");
> omniout_str(ALWAYS,"0.0001 + 0.005 * I,");
> omniout_str(ALWAYS,"0.0001 + 0.003 * I,");
> omniout_str(ALWAYS,"0.001 + 0.001 * I,");
> omniout_str(ALWAYS,"0.003 + 0.006 * I,");
> omniout_str(ALWAYS,"0.0001 + 0.005 * I,");
> omniout_str(ALWAYS,"0.0001 + 0.003 * I,");
> omniout_str(ALWAYS,"0.001 + 0.001 * I,");
> omniout_str(ALWAYS,"0.001 + 0.003 * I,");
> omniout_str(ALWAYS,"0.0001 + 0.004 * I,");
> omniout_str(ALWAYS,"0.003 + 0.006 * I,");
> omniout_str(ALWAYS,"0.0001 + 0.005 * I,");
> omniout_str(ALWAYS,"0.0001 + 0.003 * I,");
> omniout_str(ALWAYS,"0.001 + 0.001 * I,");
> omniout_str(ALWAYS,"0.001 + 0.003 * I,");
> omniout_str(ALWAYS,"0.0001 + 0.004 * I,");
> omniout_str(ALWAYS,"0.003 + 0.006 * I,");
> omniout_str(ALWAYS,"0.0001 + 0.005 * I,");
> omniout_str(ALWAYS,"0.0001 + 0.003 * I,");
> omniout_str(ALWAYS,"0.001 + 0.001 * I,");
> omniout_str(ALWAYS,"0.001 + 0.003 * I,");
> omniout_str(ALWAYS,"0.0001 + 0.004 * I,");
> omniout_str(ALWAYS,"0.003 + 0.006 * I,");
> omniout_str(ALWAYS,"0.0001 + 0.005 * I,");
> omniout_str(ALWAYS,"0.0001 + 0.003 * I,");
> omniout_str(ALWAYS,"0.001 + 0.001 * I,");
> omniout_str(ALWAYS,"0.0001 + 0.004 * I,");
> omniout_str(ALWAYS,"0.003 + 0.006 * I,");
> omniout_str(ALWAYS,"0.0001 + 0.005 * I,");
> omniout_str(ALWAYS,"0.0001 + 0.003 * I,");
> omniout_str(ALWAYS,"0.001 + 0.001 * I,");
> omniout_str(ALWAYS,"0.001 + 0.003 * I,");
> omniout_str(ALWAYS,"0.0001 + 0.004 * I,");
> omniout_str(ALWAYS,"0.003 + 0.006 * I,");
> omniout_str(ALWAYS,"0.0001 + 0.005 * I,");
> omniout_str(ALWAYS,"0.0001 + 0.003 * I,");
> omniout_str(ALWAYS,"0.001 + 0.001 * I,");
> omniout_str(ALWAYS,"0.001 + 0.003 * I,");
> omniout_str(ALWAYS,"0.0001 + 0.004 * I,");
> omniout_str(ALWAYS,"0.003 + 0.006 * I,");
> omniout_str(ALWAYS,"0.0001 + 0.005 * I,");
> omniout_str(ALWAYS,"0.0001 + 0.003 * I,");
> omniout_str(ALWAYS,"0.001 + 0.001 * I,");
> omniout_str(ALWAYS,"0.001 + 0.003 * I,");
> omniout_str(ALWAYS,"0.0001 + 0.004 * I,");
> omniout_str(ALWAYS,"0.003 + 0.006 * I,");
> omniout_str(ALWAYS,"0.0001 + 0.005 * I,");
> omniout_str(ALWAYS,"0.0001 + 0.003 * I,");
> omniout_str(ALWAYS,"0.001 + 0.001 * I,");
> omniout_str(ALWAYS,"0.001 + 0.003 * I,");
> omniout_str(ALWAYS,"0.0001 + 0.004 * I,");
> omniout_str(ALWAYS,"0.003 + 0.006 * I,");
> omniout_str(ALWAYS,"0.0001 + 0.005 * I,");
> omniout_str(ALWAYS,"0.0001 + 0.003 * I,");
> omniout_str(ALWAYS,"0.001 + 0.001 * I,");
> omniout_str(ALWAYS,"0.0001 + 0.004 * I,");
> omniout_str(ALWAYS,"0.003 + 0.006 * I,");
> omniout_str(ALWAYS,"0.0001 + 0.005 * I,");
> omniout_str(ALWAYS,"0.0001 + 0.003 * I,");
> omniout_str(ALWAYS,"0.001 + 0.001 * I,");
> omniout_str(ALWAYS,"0.001 + 0.003 * I,");
> omniout_str(ALWAYS,"0.0001 + 0.004 * I,");
> omniout_str(ALWAYS,"0.003 + 0.006 * I,");
> omniout_str(ALWAYS,"0.0001 + 0.005 * I,");
> omniout_str(ALWAYS,"0.0001 + 0.003 * I,");
> omniout_str(ALWAYS,"0.001 + 0.001 * I,");
> omniout_str(ALWAYS,"0.001 + 0.003 * I,");
> omniout_str(ALWAYS,"0.0001 + 0.004 * I,");
> omniout_str(ALWAYS,"0.003 + 0.006 * I,");
> omniout_str(ALWAYS,"0.0001 + 0.005 * I,");
> omniout_str(ALWAYS,"0.0001 + 0.003 * I,");
> omniout_str(ALWAYS,"0.001 + 0.001 * I,");
> omniout_str(ALWAYS,"0.001 + 0.003 * I,");
> omniout_str(ALWAYS,"0.0001 + 0.004 * I,");
> omniout_str(ALWAYS,"0.003 + 0.006 * I,");
> omniout_str(ALWAYS,"0.0001 + 0.005 * I,");
> omniout_str(ALWAYS,"0.0001 + 0.003 * I,");
> omniout_str(ALWAYS,"0.001 + 0.001 * I,");
> omniout_str(ALWAYS,"0.001 + 0.003 * I,");
> omniout_str(ALWAYS,"0.0001 + 0.004 * I,");
> omniout_str(ALWAYS,"0.003 + 0.006 * I,");
> omniout_str(ALWAYS,"0.0001 + 0.005 * I,");
> omniout_str(ALWAYS,"0.0001 + 0.003 * I,");
> omniout_str(ALWAYS,"0.001 + 0.001 * I,");
> omniout_str(ALWAYS,"0.0001 + 0.004 * I,");
> omniout_str(ALWAYS,"0.003 + 0.006 * I,");
> omniout_str(ALWAYS,"0.0001 + 0.005 * I,");
> omniout_str(ALWAYS,"0.0001 + 0.003 * I,");
> omniout_str(ALWAYS,"0.001 + 0.001 * I,");
> omniout_str(ALWAYS,"0.001 + 0.003 * I,");
> omniout_str(ALWAYS,"0.0001 + 0.004 * I,");
> omniout_str(ALWAYS,"0.003 + 0.006 * I,");
> omniout_str(ALWAYS,"0.0001 + 0.005 * I,");
> omniout_str(ALWAYS,"0.0001 + 0.003 * I,");
> omniout_str(ALWAYS,"0.001 + 0.001 * I,");
> omniout_str(ALWAYS,"0.001 + 0.003 * I,");
> omniout_str(ALWAYS,"0.0001 + 0.004 * I,");
> omniout_str(ALWAYS,"0.003 + 0.006 * I,");
> omniout_str(ALWAYS,"0.0001 + 0.005 * I,");
> omniout_str(ALWAYS,"0.0001 + 0.003 * I,");
> omniout_str(ALWAYS,"0.001 + 0.001 * I,");
> omniout_str(ALWAYS,"0.001 + 0.003 * I,");
> omniout_str(ALWAYS,"0.0001 + 0.004 * I,");
> omniout_str(ALWAYS,"0.003 + 0.006 * I,");
> omniout_str(ALWAYS,"0.0001 + 0.005 * I,");
> omniout_str(ALWAYS,"0.0001 + 0.003 * I,");
> omniout_str(ALWAYS,"0.001 + 0.001 * I,");
> omniout_str(ALWAYS,"0.001 + 0.003 * I,");
> omniout_str(ALWAYS,"0.0001 + 0.004 * I,");
> omniout_str(ALWAYS,"0.003 + 0.006 * I,");
> omniout_str(ALWAYS,"0.0001 + 0.005 * I,");
> omniout_str(ALWAYS,"0.0001 + 0.003 * I,");
> omniout_str(ALWAYS,"0.001 + 0.001 * I,");
> omniout_str(ALWAYS,"0.0001 + 0.004 * I,");
> omniout_str(ALWAYS,"0.003 + 0.006 * I,");
> omniout_str(ALWAYS,"0.0001 + 0.005 * I,");
> omniout_str(ALWAYS,"0.0001 + 0.003 * I,");
> omniout_str(ALWAYS,"0.001 + 0.001 * I,");
> omniout_str(ALWAYS,"0.001 + 0.003 * I,");
> omniout_str(ALWAYS,"0.0001 + 0.004 * I,");
> omniout_str(ALWAYS,"0.003 + 0.006 * I,");
> omniout_str(ALWAYS,"0.0001 + 0.005 * I,");
> omniout_str(ALWAYS,"0.0001 + 0.003 * I,");
> omniout_str(ALWAYS,"0.001 + 0.001 * I,");
> omniout_str(ALWAYS,"0.001 + 0.003 * I,");
> omniout_str(ALWAYS,"0.0001 + 0.004 * I,");
> omniout_str(ALWAYS,"0.003 + 0.006 * I,");
> omniout_str(ALWAYS,"0.0001 + 0.005 * I,");
> omniout_str(ALWAYS,"0.0001 + 0.003 * I,");
> omniout_str(ALWAYS,"0.001 + 0.001 * I,");
> omniout_str(ALWAYS,"0.001 + 0.003 * I,");
> omniout_str(ALWAYS,"0.0001 + 0.004 * I,");
> omniout_str(ALWAYS,"0.003 + 0.006 * I,");
> omniout_str(ALWAYS,"0.0001 + 0.005 * I,");
> omniout_str(ALWAYS,"0.0001 + 0.003 * I,");
> omniout_str(ALWAYS,"0.001 + 0.001 * I,");
> omniout_str(ALWAYS,"0.001 + 0.003 * I,");
> omniout_str(ALWAYS,"0.0001 + 0.004 * I,");
> omniout_str(ALWAYS,"0.003 + 0.006 * I,");
> omniout_str(ALWAYS,"0.0001 + 0.005 * I,");
> omniout_str(ALWAYS,"0.0001 + 0.003 * I,");
> omniout_str(ALWAYS,"0.001 + 0.001 * I,");
> omniout_str(ALWAYS,"0.0001 + 0.004 * I,");
> omniout_str(ALWAYS,"0.003 + 0.006 * I,");
> omniout_str(ALWAYS,"0.0001 + 0.005 * I,");
> omniout_str(ALWAYS,"0.0001 + 0.003 * I,");
> omniout_str(ALWAYS,"0.001 + 0.001 * I,");
> omniout_str(ALWAYS,"0.001 + 0.003 * I,");
> omniout_str(ALWAYS,"0.0001 + 0.004 * I,");
> omniout_str(ALWAYS,"0.003 + 0.006 * I,");
> omniout_str(ALWAYS,"0.0001 + 0.005 * I,");
> omniout_str(ALWAYS,"0.0001 + 0.003 * I,");
> omniout_str(ALWAYS,"0.001 + 0.001 * I,");
> omniout_str(ALWAYS,"0.001 + 0.003 * I,");
> omniout_str(ALWAYS,"0.0001 + 0.004 * I,");
> omniout_str(ALWAYS,"0.003 + 0.006 * I,");
> omniout_str(ALWAYS,"0.0001 + 0.005 * I,");
> omniout_str(ALWAYS,"0.0001 + 0.003 * I,");
> omniout_str(ALWAYS,"0.001 + 0.001 * I,");
> omniout_str(ALWAYS,"0.001 + 0.003 * I,");
> omniout_str(ALWAYS,"0.0001 + 0.004 * I,");
> omniout_str(ALWAYS,"0.003 + 0.006 * I,");
> omniout_str(ALWAYS,"0.0001 + 0.005 * I,");
> omniout_str(ALWAYS,"0.0001 + 0.003 * I,");
> omniout_str(ALWAYS,"0.001 + 0.001 * I,");
> omniout_str(ALWAYS,"0.001 + 0.003 * I,");
> omniout_str(ALWAYS,"0.0001 + 0.004 * I,");
> omniout_str(ALWAYS,"0.003 + 0.006 * I,");
> omniout_str(ALWAYS,"0.0001 + 0.005 * I,");
> omniout_str(ALWAYS,"0.0001 + 0.003 * I,");
> omniout_str(ALWAYS,"0.001 + 0.001 * I,");
> omniout_str(ALWAYS,"0.0001 + 0.004 * I,");
> omniout_str(ALWAYS,"0.003 + 0.006 * I,");
> omniout_str(ALWAYS,"0.0001 + 0.005 * I,");
> omniout_str(ALWAYS,"0.0001 + 0.003 * I,");
> omniout_str(ALWAYS,"0.001 + 0.001 * I,");
> omniout_str(ALWAYS,"0.001 + 0.003 * I,");
> omniout_str(ALWAYS,"0.0001 + 0.004 * I,");
> omniout_str(ALWAYS,"0.003 + 0.006 * I,");
> omniout_str(ALWAYS,"0.0001 + 0.005 * I,");
> omniout_str(ALWAYS,"0.0001 + 0.003 * I,");
> omniout_str(ALWAYS,"0.001 + 0.001 * I,");
> omniout_str(ALWAYS,"0.001 + 0.003 * I,");
> omniout_str(ALWAYS,"0.0001 + 0.004 * I,");
> omniout_str(ALWAYS,"0.003 + 0.006 * I,");
> omniout_str(ALWAYS,"0.0001 + 0.005 * I,");
> omniout_str(ALWAYS,"0.0001 + 0.003 * I,");
> omniout_str(ALWAYS,"0.001 + 0.001 * I,");
> omniout_str(ALWAYS,"0.001 + 0.003 * I,");
> omniout_str(ALWAYS,"0.0001 + 0.004 * I,");
> omniout_str(ALWAYS,"0.003 + 0.006 * I,");
> omniout_str(ALWAYS,"0.0001 + 0.005 * I,");
> omniout_str(ALWAYS,"0.0001 + 0.003 * I,");
> omniout_str(ALWAYS,"0.001 + 0.001 * I,");
> omniout_str(ALWAYS,"0.001 + 0.003 * I,");
> omniout_str(ALWAYS,"0.0001 + 0.004 * I,");
> omniout_str(ALWAYS,"0.003 + 0.006 * I,");
> omniout_str(ALWAYS,"0.0001 + 0.005 * I,");
> omniout_str(ALWAYS,"0.0001 + 0.003 * I,");
> omniout_str(ALWAYS,"0.001 + 0.001 * I,");
> omniout_str(ALWAYS,"0.0001 + 0.004 * I,");
> omniout_str(ALWAYS,"0.003 + 0.006 * I,");
> omniout_str(ALWAYS,"0.0001 + 0.005 * I,");
> omniout_str(ALWAYS,"0.0001 + 0.003 * I,");
> omniout_str(ALWAYS,"0.001 + 0.001 * I,");
> omniout_str(ALWAYS,"0.001 + 0.003 * I,");
> omniout_str(ALWAYS,"0.0001 + 0.004 * I,");
> omniout_str(ALWAYS,"0.003 + 0.006 * I,");
> omniout_str(ALWAYS,"0.0001 + 0.005 * I,");
> omniout_str(ALWAYS,"0.0001 + 0.003 * I,");
> omniout_str(ALWAYS,"0.001 + 0.001 * I,");
> omniout_str(ALWAYS,"0.001 + 0.003 * I,");
> omniout_str(ALWAYS,"0.0001 + 0.004 * I,");
> omniout_str(ALWAYS,"0.003 + 0.006 * I,");
> omniout_str(ALWAYS,"0.0001 + 0.005 * I,");
> omniout_str(ALWAYS,"0.0001 + 0.003 * I,");
> omniout_str(ALWAYS,"0.001 + 0.001 * I,");
> omniout_str(ALWAYS,"0.001 + 0.003 * I,");
> omniout_str(ALWAYS,"0.0001 + 0.004 * I,");
> omniout_str(ALWAYS,"0.003 + 0.006 * I,");
> omniout_str(ALWAYS,"0.0001 + 0.005 * I,");
> omniout_str(ALWAYS,"0.0001 + 0.003 * I,");
> omniout_str(ALWAYS,"0.001 + 0.001 * I,");
> omniout_str(ALWAYS,"0.001 + 0.003 * I,");
> omniout_str(ALWAYS,"0.0001 + 0.004 * I,");
> omniout_str(ALWAYS,"0.003 + 0.006 * I,");
> omniout_str(ALWAYS,"0.0001 + 0.005 * I,");
> omniout_str(ALWAYS,"0.0001 + 0.003 * I,");
> omniout_str(ALWAYS,"0.001 + 0.001 * I,");
> omniout_str(ALWAYS,"0.0001 + 0.004 * I,");
> omniout_str(ALWAYS,"0.003 + 0.006 * I,");
> omniout_str(ALWAYS,"0.0001 + 0.005 * I,");
> omniout_str(ALWAYS,"0.0001 + 0.003 * I,");
> omniout_str(ALWAYS,"0.001 + 0.001 * I,");
> omniout_str(ALWAYS,"0.001 + 0.003 * I,");
> omniout_str(ALWAYS,"0.0001 + 0.004 * I,");
> omniout_str(ALWAYS,"0.003 + 0.006 * I,");
> omniout_str(ALWAYS,"0.0001 + 0.005 * I,");
> omniout_str(ALWAYS,"0.0001 + 0.003 * I,");
> omniout_str(ALWAYS,"0.001 + 0.001 * I,");
> omniout_str(ALWAYS,"0.001 + 0.003 * I,");
> omniout_str(ALWAYS,"0.0001 + 0.004 * I,");
> omniout_str(ALWAYS,"0.003 + 0.006 * I,");
> omniout_str(ALWAYS,"0.0001 + 0.005 * I,");
> omniout_str(ALWAYS,"0.0001 + 0.003 * I,");
> omniout_str(ALWAYS,"0.001 + 0.001 * I,");
> omniout_str(ALWAYS,"0.001 + 0.003 * I,");
> omniout_str(ALWAYS,"0.0001 + 0.004 * I,");
> omniout_str(ALWAYS,"0.003 + 0.006 * I,");
> omniout_str(ALWAYS,"0.0001 + 0.005 * I,");
> omniout_str(ALWAYS,"0.0001 + 0.003 * I,");
> omniout_str(ALWAYS,"0.001 + 0.001 * I,");
> omniout_str(ALWAYS,"0.001 + 0.003 * I,");
> omniout_str(ALWAYS,"0.0001 + 0.004 * I,");
> omniout_str(ALWAYS,"0.003 + 0.006 * I,");
> omniout_str(ALWAYS,"0.0001 + 0.005 * I,");
> omniout_str(ALWAYS,"0.0001 + 0.003 * I,");
> omniout_str(ALWAYS,"0.001 + 0.001 * I,");
> omniout_str(ALWAYS,"0.0001 + 0.004 * I,");
> omniout_str(ALWAYS,"0.003 + 0.006 * I,");
> omniout_str(ALWAYS,"0.0001 + 0.005 * I,");
> omniout_str(ALWAYS,"0.0001 + 0.003 * I,");
> omniout_str(ALWAYS,"0.001 + 0.001 * I,");
> omniout_str(ALWAYS,"0.001 + 0.003 * I,");
> omniout_str(ALWAYS,"0.0001 + 0.004 * I,");
> omniout_str(ALWAYS,"0.003 + 0.006 * I,");
> omniout_str(ALWAYS,"0.0001 + 0.005 * I,");
> omniout_str(ALWAYS,"0.0001 + 0.003 * I,");
> omniout_str(ALWAYS,"0.001 + 0.001 * I,");
> omniout_str(ALWAYS,"0.001 + 0.003 * I,");
> omniout_str(ALWAYS,"0.0001 + 0.004 * I,");
> omniout_str(ALWAYS,"0.003 + 0.006 * I,");
> omniout_str(ALWAYS,"0.0001 + 0.005 * I,");
> omniout_str(ALWAYS,"0.0001 + 0.003 * I,");
> omniout_str(ALWAYS,"0.001 + 0.001 * I,");
> omniout_str(ALWAYS,"0.001 + 0.003 * I,");
> omniout_str(ALWAYS,"0.0001 + 0.004 * I,");
> omniout_str(ALWAYS,"0.003 + 0.006 * I,");
> omniout_str(ALWAYS,"0.0001 + 0.005 * I,");
> omniout_str(ALWAYS,"0.0001 + 0.003 * I,");
> omniout_str(ALWAYS,"0.001 + 0.001 * I,");
> omniout_str(ALWAYS,"0.001 + 0.003 * I,");
> omniout_str(ALWAYS,"0.0001 + 0.004 * I,");
> omniout_str(ALWAYS,"0.003 + 0.006 * I,");
> omniout_str(ALWAYS,"0.0001 + 0.005 * I,");
> omniout_str(ALWAYS,"0.0001 + 0.003 * I,");
> omniout_str(ALWAYS,"0.001 + 0.001 * I,");
> omniout_str(ALWAYS,"0.0001 + 0.004 * I,");
> omniout_str(ALWAYS,"0.003 + 0.006 * I,");
> omniout_str(ALWAYS,"0.0001 + 0.005 * I,");
> omniout_str(ALWAYS,"0.0001 + 0.003 * I,");
> omniout_str(ALWAYS,"0.001 + 0.001 * I,");
> omniout_str(ALWAYS,"0.001 + 0.003 * I,");
> omniout_str(ALWAYS,"0.0001 + 0.004 * I,");
> omniout_str(ALWAYS,"0.003 + 0.006 * I,");
> omniout_str(ALWAYS,"0.0001 + 0.005 * I,");
> omniout_str(ALWAYS,"0.0001 + 0.003 * I,");
> omniout_str(ALWAYS,"0.001 + 0.001 * I,");
> omniout_str(ALWAYS,"0.001 + 0.003 * I,");
> omniout_str(ALWAYS,"0.0001 + 0.004 * I,");
> omniout_str(ALWAYS,"0.003 + 0.006 * I,");
> omniout_str(ALWAYS,"0.0001 + 0.005 * I,");
> omniout_str(ALWAYS,"0.0001 + 0.003 * I,");
> omniout_str(ALWAYS,"0.001 + 0.001 * I,");
> omniout_str(ALWAYS,"0.001 + 0.003 * I,");
> omniout_str(ALWAYS,"0.0001 + 0.004 * I,");
> omniout_str(ALWAYS,"0.003 + 0.006 * I,");
> omniout_str(ALWAYS,"0.0001 + 0.005 * I,");
> omniout_str(ALWAYS,"0.0001 + 0.003 * I,");
> omniout_str(ALWAYS,"0.001 + 0.001 * I,");
> omniout_str(ALWAYS,"0.001 + 0.003 * I,");
> omniout_str(ALWAYS,"0.0001 + 0.004 * I,");
> omniout_str(ALWAYS,"0.003 + 0.006 * I,");
> omniout_str(ALWAYS,"0.0001 + 0.005 * I,");
> omniout_str(ALWAYS,"0.0001 + 0.003 * I,");
> omniout_str(ALWAYS,"0.001 + 0.001 * I,");
> omniout_str(ALWAYS,"0.0001 + 0.004 * I,");
> omniout_str(ALWAYS,"0.003 + 0.006 * I,");
> omniout_str(ALWAYS,"0.0001 + 0.005 * I,");
> omniout_str(ALWAYS,"0.0001 + 0.003 * I,");
> omniout_str(ALWAYS,"0.001 + 0.001 * I,");
> omniout_str(ALWAYS,"0.001 + 0.003 * I,");
> omniout_str(ALWAYS,"0.0001 + 0.004 * I,");
> omniout_str(ALWAYS,"0.003 + 0.006 * I,");
> omniout_str(ALWAYS,"0.0001 + 0.005 * I,");
> omniout_str(ALWAYS,"0.0001 + 0.003 * I,");
> omniout_str(ALWAYS,"0.001 + 0.001 * I,");
> omniout_str(ALWAYS,"0.001 + 0.003 * I,");
> omniout_str(ALWAYS,"0.0001 + 0.004 * I,");
> omniout_str(ALWAYS,"0.003 + 0.006 * I,");
> omniout_str(ALWAYS,"0.0001 + 0.005 * I,");
> omniout_str(ALWAYS,"0.0001 + 0.003 * I,");
> omniout_str(ALWAYS,"0.001 + 0.001 * I,");
> omniout_str(ALWAYS,"0.001 + 0.003 * I,");
> omniout_str(ALWAYS,"0.0001 + 0.004 * I,");
> omniout_str(ALWAYS,"0.003 + 0.006 * I,");
> omniout_str(ALWAYS,"0.0001 + 0.005 * I,");
> omniout_str(ALWAYS,"0.0001 + 0.003 * I,");
> omniout_str(ALWAYS,"0.001 + 0.001 * I,");
> omniout_str(ALWAYS,"0.001 + 0.003 * I,");
> omniout_str(ALWAYS,"0.0001 + 0.004 * I,");
> omniout_str(ALWAYS,"0.003 + 0.006 * I,");
> omniout_str(ALWAYS,"0.0001 + 0.005 * I,");
> omniout_str(ALWAYS,"0.0001 + 0.003 * I,");
> omniout_str(ALWAYS,"0.001 + 0.001 * I,");
> omniout_str(ALWAYS,"0.0001 + 0.004 * I,");
> omniout_str(ALWAYS,"0.003 + 0.006 * I,");
> omniout_str(ALWAYS,"0.0001 + 0.005 * I,");
> omniout_str(ALWAYS,"0.0001 + 0.003 * I,");
> omniout_str(ALWAYS,"0.001 + 0.001 * I,");
> omniout_str(ALWAYS,"0.001 + 0.003 * I,");
> omniout_str(ALWAYS,"0.0001 + 0.004 * I,");
> omniout_str(ALWAYS,"0.003 + 0.006 * I,");
> omniout_str(ALWAYS,"0.0001 + 0.005 * I,");
> omniout_str(ALWAYS,"0.0001 + 0.003 * I,");
> omniout_str(ALWAYS,"0.001 + 0.001 * I,");
> omniout_str(ALWAYS,"0.001 + 0.003 * I,");
> omniout_str(ALWAYS,"0.0001 + 0.004 * I,");
> omniout_str(ALWAYS,"0.003 + 0.006 * I,");
> omniout_str(ALWAYS,"0.0001 + 0.005 * I,");
> omniout_str(ALWAYS,"0.0001 + 0.003 * I,");
> omniout_str(ALWAYS,"0.001 + 0.001 * I,");
> omniout_str(ALWAYS,"0.001 + 0.003 * I,");
> omniout_str(ALWAYS,"0.0001 + 0.004 * I,");
> omniout_str(ALWAYS,"0.003 + 0.006 * I,");
> omniout_str(ALWAYS,"0.0001 + 0.005 * I,");
> omniout_str(ALWAYS,"0.0001 + 0.003 * I,");
> omniout_str(ALWAYS,"0.001 + 0.001 * I,");
> omniout_str(ALWAYS,"0.001 + 0.003 * I,");
> omniout_str(ALWAYS,"0.0001 + 0.004 * I,");
> omniout_str(ALWAYS,"0.003 + 0.006 * I,");
> omniout_str(ALWAYS,"0.0001 + 0.005 * I,");
> omniout_str(ALWAYS,"0.0001 + 0.003 * I,");
> omniout_str(ALWAYS,"0.001 + 0.001 * I,");
> omniout_str(ALWAYS,"0.0001 + 0.004 * I,");
> omniout_str(ALWAYS,"0.003 + 0.006 * I,");
> omniout_str(ALWAYS,"0.0001 + 0.005 * I,");
> omniout_str(ALWAYS,"0.0001 + 0.003 * I,");
> omniout_str(ALWAYS,"0.001 + 0.001 * I,");
> omniout_str(ALWAYS,"0.001 + 0.003 * I,");
> omniout_str(ALWAYS,"0.0001 + 0.004 * I,");
> omniout_str(ALWAYS,"0.003 + 0.006 * I,");
> omniout_str(ALWAYS,"0.0001 + 0.005 * I,");
> omniout_str(ALWAYS,"0.0001 + 0.003 * I,");
> omniout_str(ALWAYS,"0.001 + 0.001 * I,");
> omniout_str(ALWAYS,"0.001 + 0.003 * I,");
> omniout_str(ALWAYS,"0.0001 + 0.004 * I,");
> omniout_str(ALWAYS,"0.003 + 0.006 * I,");
> omniout_str(ALWAYS,"0.0001 + 0.005 * I,");
> omniout_str(ALWAYS,"0.0001 + 0.003 * I,");
> omniout_str(ALWAYS,"0.001 + 0.001 * I,");
> omniout_str(ALWAYS,"0.001 + 0.003 * I,");
> omniout_str(ALWAYS,"0.0001 + 0.004 * I,");
> omniout_str(ALWAYS,"0.003 + 0.006 * I,");
> omniout_str(ALWAYS,"0.0001 + 0.005 * I,");
> omniout_str(ALWAYS,"0.0001 + 0.003 * I,");
> omniout_str(ALWAYS,"0.001 + 0.001 * I,");
> omniout_str(ALWAYS,"0.001 + 0.003 * I,");
> omniout_str(ALWAYS,"0.0001 + 0.004 * I,");
> omniout_str(ALWAYS,"0.003 + 0.006 * I,");
> omniout_str(ALWAYS,"0.0001 + 0.005 * I,");
> omniout_str(ALWAYS,"0.0001 + 0.003 * I,");
> omniout_str(ALWAYS,"0.001 + 0.001 * I,");
> omniout_str(ALWAYS,"0.001 + 0.003 * I,");
> omniout_str(ALWAYS,"0.000 + 0.000 * I ];");
> omniout_str(ALWAYS,"");
> omniout_str(ALWAYS,"glob_nxt := glob_nxt + 1;");
> omniout_str(ALWAYS,"it := x_delta[glob_nxt];");
> omniout_str(ALWAYS,"return it;");
> omniout_str(ALWAYS,"end;");
> 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 := glob__0;
> glob_smallish_float := glob__0;
> glob_large_float := c(1.0e100);
> glob_larger_float := c( 1.1e100);
> glob_almost_1 := c( 0.99);
> # before second block
> #TOP SECOND INPUT BLOCK
> #BEGIN SECOND INPUT BLOCK
> #BEGIN BLOCK 2
> #END FIRST INPUT BLOCK
> #BEGIN SECOND INPUT BLOCK
> x_start := 0.1 + 0.1 * I;
> x_end := 99.0 + 99.0 * I;
> array_y_init[0 + 1] := exact_soln_y(x_start);
> glob_look_poles := false;
> glob_type_given_pole := 3;
> #END SECOND INPUT BLOCK
> #BEGIN OVERRIDE BLOCK
> glob_desired_digits_correct:=8;
> glob_max_minutes:=(3.0);
> glob_subiter_method:=3;
> glob_max_iter:=10000;
> glob_upper_ratio_limit:=c(1.000001);
> glob_lower_ratio_limit:=c(0.999999);
> glob_look_poles:=true;
> glob_h:=c(0.001);
> glob_display_interval:=c(0.01);
> #END OVERRIDE BLOCK
> #END BLOCK 2
> #END SECOND INPUT BLOCK
> #BEGIN INITS AFTER SECOND INPUT BLOCK
> glob_last_good_h := glob_h;
> glob_max_sec := (60.0) * (glob_max_minutes) + (3600.0) * (glob_max_hours);
> # after second input block
> found_h := true;
> glob_h := next_delta();
> #START ADJUST ALL SERIES
> if (float_abs(glob_min_pole_est) * glob_ratio_of_radius < float_abs(glob_h)) then # if number 9
> h_new := glob_check_sign * glob_min_pole_est * glob_ratio_of_radius;
> omniout_str(ALWAYS,"SETTING H FOR POLE");
> glob_h_reason := 6;
> if (glob_check_sign * glob_min_h > glob_check_sign * h_new) then # if number 10
> omniout_str(ALWAYS,"SETTING H FOR MIN H");
> h_new := glob_min_h;
> glob_h_reason := 5;
> fi;# end if 10;
> term := 1;
> ratio := c(1.0);
> while (term <= ATS_MAX_TERMS) do # do number 1
> array_y[term] := array_y[term]* ratio;
> array_y_higher[1,term] := array_y_higher[1,term]* ratio;
> array_x[term] := array_x[term]* ratio;
> ratio := ratio * h_new / float_abs(glob_h);
> term := term + 1;
> od;# end do number 1;
> glob_h := h_new;
> fi;# end if 9;
> #BOTTOM ADJUST ALL SERIES
> #END OPTIMIZE CODE
> if (glob_html_log) then # if number 9
> html_log_file := fopen("entry.html",WRITE,TEXT);
> fi;# end if 9;
> #BEGIN SOLUTION CODE
> found_h := true;
> if (found_h) then # if number 9
> omniout_str(ALWAYS,"START of Soultion");
> #Start Series -- INITIALIZE FOR SOLUTION
> array_x[1] := c(x_start);
> array_x[2] := c(glob_h);
> glob_next_display := c(x_start);
> glob_min_pole_est := glob_larger_float;
> glob_least_given_sing := glob_larger_float;
> glob_least_ratio_sing := glob_larger_float;
> glob_least_3_sing := glob_larger_float;
> glob_least_6_sing := glob_larger_float;
> order_diff := 1;
> #Start Series array_y
> term_no := 1;
> while (term_no <= order_diff) do # do number 1
> array_y[term_no] := array_y_init[term_no] * expt(glob_h , c(term_no - 1)) / c(factorial_1(term_no - 1));
> term_no := term_no + 1;
> od;# end do number 1;
> rows := order_diff;
> r_order := 1;
> while (r_order <= rows) do # do number 1
> term_no := 1;
> while (term_no <= (rows - r_order + 1)) do # do number 2
> it := term_no + r_order - 1;
> if (term_no < ATS_MAX_TERMS) then # if number 10
> array_y_higher[r_order,term_no] := array_y_init[it]* expt(glob_h , c(term_no - 1)) / (c(factorial_1(term_no - 1)));
> fi;# end if 10;
> term_no := term_no + 1;
> od;# end do number 2;
> r_order := r_order + 1;
> od;# end do number 1
> ;
> current_iter := 1;
> glob_clock_start_sec := elapsed_time_seconds();
> glob_clock_sec := elapsed_time_seconds();
> glob_iter := 0;
> omniout_str(DEBUGL," ");
> glob_reached_optimal_h := true;
> found_h := true;
> glob_h := next_delta();
> #START ADJUST ALL SERIES
> if (float_abs(glob_min_pole_est) * glob_ratio_of_radius < float_abs(glob_h)) then # if number 10
> h_new := glob_check_sign * glob_min_pole_est * glob_ratio_of_radius;
> omniout_str(ALWAYS,"SETTING H FOR POLE");
> glob_h_reason := 6;
> if (glob_check_sign * glob_min_h > glob_check_sign * h_new) then # if number 11
> omniout_str(ALWAYS,"SETTING H FOR MIN H");
> h_new := glob_min_h;
> glob_h_reason := 5;
> fi;# end if 11;
> term := 1;
> ratio := c(1.0);
> while (term <= ATS_MAX_TERMS) do # do number 1
> array_y[term] := array_y[term]* ratio;
> array_y_higher[1,term] := array_y_higher[1,term]* ratio;
> array_x[term] := array_x[term]* ratio;
> ratio := ratio * h_new / float_abs(glob_h);
> term := term + 1;
> od;# end do number 1;
> glob_h := h_new;
> fi;# end if 10;
> #BOTTOM ADJUST ALL SERIES
> #END OPTIMIZE CODE
> glob_optimal_clock_start_sec := elapsed_time_seconds();
> while ((glob_iter < glob_max_iter) and ((glob_iter < 10) or ( not ((Re(glob_h) = 0.0) and (Im(glob_h) = 0.0))))) do # do number 1
> #left paren 0001C
> if (true) then # if number 10
> omniout_str(INFO," ");
> fi;# end if 10;
> found_h := true;
> glob_h := next_delta();
> #START ADJUST ALL SERIES
> if (float_abs(glob_min_pole_est) * glob_ratio_of_radius < float_abs(glob_h)) then # if number 10
> h_new := glob_check_sign * glob_min_pole_est * glob_ratio_of_radius;
> omniout_str(ALWAYS,"SETTING H FOR POLE");
> glob_h_reason := 6;
> if (glob_check_sign * glob_min_h > glob_check_sign * h_new) then # if number 11
> omniout_str(ALWAYS,"SETTING H FOR MIN H");
> h_new := glob_min_h;
> glob_h_reason := 5;
> fi;# end if 11;
> term := 1;
> ratio := c(1.0);
> while (term <= ATS_MAX_TERMS) do # do number 2
> array_y[term] := array_y[term]* ratio;
> array_y_higher[1,term] := array_y_higher[1,term]* ratio;
> array_x[term] := array_x[term]* ratio;
> ratio := ratio * h_new / float_abs(glob_h);
> term := term + 1;
> od;# end do number 2;
> glob_h := h_new;
> fi;# end if 10;
> #BOTTOM ADJUST ALL SERIES
> #END OPTIMIZE CODE
> glob_iter := glob_iter + 1;
> glob_clock_sec := elapsed_time_seconds();
> atomall();
> if ( not ((Re(glob_h) = 0.0) and (Im(glob_h) = 0.0))) then # if number 10
> display_alot(current_iter);
> fi;# end if 10;
> if ((glob_look_poles) and ( not ((Re(glob_h) = 0.0) and (Im(glob_h) = 0.0)))) then # if number 10
> check_for_pole();
> fi;# end if 10;
> if (true) then # if number 10
> glob_next_display := glob_next_display + glob_display_interval;
> fi;# end if 10;
> array_x[1] := array_x[1] + glob_h;
> array_x[2] := glob_h;
> #Jump Series array_y;
> order_diff := 2;
> #START PART 1 SUM AND ADJUST
> #START SUM AND ADJUST EQ =1
> #sum_and_adjust array_y
> #BEFORE ADJUST SUBSERIES EQ =1
> ord := 2;
> calc_term := 1;
> #adjust_subseriesarray_y
> iii := ATS_MAX_TERMS;
> while (iii >= calc_term) do # do number 2
> array_y_higher_work[2,iii] := array_y_higher[2,iii] / expt(glob_h , c(calc_term - 1)) / c(factorial_3(iii - calc_term , iii - 1));
> iii := iii - 1;
> od;# end do number 2;
> #AFTER ADJUST SUBSERIES EQ =1
> #BEFORE SUM SUBSERIES EQ =1
> temp_sum := glob__0;
> ord := 2;
> calc_term := 1;
> #sum_subseriesarray_y
> iii := ATS_MAX_TERMS;
> while (iii >= calc_term) do # do number 2
> temp_sum := temp_sum + array_y_higher_work[ord,iii];
> iii := iii - 1;
> od;# end do number 2;
> array_y_higher_work2[ord,calc_term] := temp_sum * expt(glob_h , c(calc_term - 1)) / c(factorial_1(calc_term - 1));
> #AFTER SUM SUBSERIES EQ =1
> #BEFORE ADJUST SUBSERIES EQ =1
> ord := 1;
> calc_term := 2;
> #adjust_subseriesarray_y
> iii := ATS_MAX_TERMS;
> while (iii >= calc_term) do # do number 2
> array_y_higher_work[1,iii] := array_y_higher[1,iii] / expt(glob_h , c(calc_term - 1)) / c(factorial_3(iii - calc_term , iii - 1));
> iii := iii - 1;
> od;# end do number 2;
> #AFTER ADJUST SUBSERIES EQ =1
> #BEFORE SUM SUBSERIES EQ =1
> temp_sum := glob__0;
> ord := 1;
> calc_term := 2;
> #sum_subseriesarray_y
> iii := ATS_MAX_TERMS;
> while (iii >= calc_term) do # do number 2
> temp_sum := temp_sum + array_y_higher_work[ord,iii];
> iii := iii - 1;
> od;# end do number 2;
> array_y_higher_work2[ord,calc_term] := temp_sum * expt(glob_h , c(calc_term - 1)) / c(factorial_1(calc_term - 1));
> #AFTER SUM SUBSERIES EQ =1
> #BEFORE ADJUST SUBSERIES EQ =1
> ord := 1;
> calc_term := 1;
> #adjust_subseriesarray_y
> iii := ATS_MAX_TERMS;
> while (iii >= calc_term) do # do number 2
> array_y_higher_work[1,iii] := array_y_higher[1,iii] / expt(glob_h , c(calc_term - 1)) / c(factorial_3(iii - calc_term , iii - 1));
> iii := iii - 1;
> od;# end do number 2;
> #AFTER ADJUST SUBSERIES EQ =1
> #BEFORE SUM SUBSERIES EQ =1
> temp_sum := glob__0;
> ord := 1;
> calc_term := 1;
> #sum_subseriesarray_y
> iii := ATS_MAX_TERMS;
> while (iii >= calc_term) do # do number 2
> temp_sum := temp_sum + array_y_higher_work[ord,iii];
> iii := iii - 1;
> od;# end do number 2;
> array_y_higher_work2[ord,calc_term] := temp_sum * expt(glob_h , c(calc_term - 1)) / c(factorial_1(calc_term - 1));
> #AFTER SUM SUBSERIES EQ =1
> #END SUM AND ADJUST EQ =1
> #END PART 1
> #START PART 2 MOVE TERMS to REGULAR Array
> term_no := ATS_MAX_TERMS;
> while (term_no >= 1) do # do number 2
> array_y[term_no] := array_y_higher_work2[1,term_no];
> ord := 1;
> while (ord <= order_diff) do # do number 3
> array_y_higher[ord,term_no] := array_y_higher_work2[ord,term_no];
> ord := ord + 1;
> od;# end do number 3;
> term_no := term_no - 1;
> od;# end do number 2;
> #END PART 2 HEVE MOVED TERMS to REGULAR Array
> ;
> od;# end do number 1;#right paren 0001C
> omniout_str(ALWAYS,"Finished!");
> if (glob_iter >= glob_max_iter) then # if number 10
> omniout_str(ALWAYS,"Maximum Iterations Reached before Solution Completed!");
> fi;# end if 10;
> if (elapsed_time_seconds() - (glob_orig_start_sec) >= (glob_max_sec )) then # if number 10
> omniout_str(ALWAYS,"Maximum Time Reached before Solution Completed!");
> fi;# end if 10;
> glob_clock_sec := elapsed_time_seconds();
> omniout_str(INFO,"diff ( y , x , 1 ) = cos ( x ) ; ");
> omniout_int(INFO,"Iterations ",32,glob_iter,4," ")
> ;
> prog_report(x_start,x_end);
> if (glob_html_log) then # if number 10
> logstart(html_log_file);
> logitem_str(html_log_file,"2017-11-26T14:41:43-06:00")
> ;
> logitem_str(html_log_file,"Maple")
> ;
> logitem_str(html_log_file,"cos")
> ;
> logitem_str(html_log_file,"diff ( y , x , 1 ) = cos ( x ) ; ")
> ;
> logitem_complex(html_log_file,x_start)
> ;
> logitem_complex(html_log_file,x_end)
> ;
> logitem_complex(html_log_file,array_x[1])
> ;
> logitem_complex(html_log_file,glob_h)
> ;
> logitem_h_reason(html_log_file)
> ;
> logitem_integer(html_log_file,Digits)
> ;
> ;
> glob_desired_digits_correct := 0.0;
> logitem_float(html_log_file,glob_desired_digits_correct)
> ;
> if (array_est_digits[1] <> -16) then # if number 11
> logitem_integer(html_log_file,array_est_digits[1])
> ;
> else
> logitem_str(html_log_file,"Unknown")
> ;
> fi;# end if 11;
> if (glob_min_good_digits <> -16) then # if number 11
> logitem_integer(html_log_file,glob_min_good_digits)
> ;
> else
> logitem_str(html_log_file,"Unknown")
> ;
> fi;# end if 11;
> if (glob_good_digits <> -16) then # if number 11
> logitem_integer(html_log_file,glob_good_digits)
> ;
> else
> logitem_str(html_log_file,"Unknown")
> ;
> fi;# end if 11;
> logitem_str(html_log_file,"NA")
> ;
> logitem_str(html_log_file,"NA")
> ;
> logitem_integer(html_log_file,ATS_MAX_TERMS)
> ;
> if (glob_type_given_pole = 0) then # if number 11
> logitem_str(html_log_file,"Not Given")
> ;
> logitem_str(html_log_file,"NA")
> ;
> elif
> (glob_type_given_pole = 4) then # if number 12
> logitem_str(html_log_file,"No Solution")
> ;
> logitem_str(html_log_file,"NA")
> ;
> elif
> (glob_type_given_pole = 5) then # if number 13
> logitem_str(html_log_file,"Some Pole")
> ;
> logitem_str(html_log_file,"????")
> ;
> elif
> (glob_type_given_pole = 3) then # if number 14
> logitem_str(html_log_file,"No Pole")
> ;
> logitem_str(html_log_file,"NA")
> ;
> elif
> (glob_type_given_pole = 1) then # if number 15
> logitem_str(html_log_file,"Real Sing")
> ;
> logitem_float(html_log_file,glob_least_given_sing)
> ;
> elif
> (glob_type_given_pole = 2) then # if number 16
> logitem_str(html_log_file,"Complex Sing")
> ;
> logitem_float(html_log_file,glob_least_given_sing)
> ;
> fi;# end if 16;
> if (glob_least_ratio_sing < glob_large_float) then # if number 16
> glob_least_ratio_sing := 0;
> logitem_float(html_log_file,glob_least_ratio_sing)
> ;
> else
> logitem_str(html_log_file,"NONE")
> ;
> fi;# end if 16;
> if (glob_least_3_sing < glob_large_float) then # if number 16
> logitem_float(html_log_file,glob_least_3_sing)
> ;
> else
> logitem_str(html_log_file,"NONE")
> ;
> fi;# end if 16;
> if (glob_least_6_sing < glob_large_float) then # if number 16
> glob_least_6_sing := 0.0;
> logitem_float(html_log_file,glob_least_6_sing)
> ;
> else
> logitem_str(html_log_file,"NONE")
> ;
> fi;# end if 16;
> logitem_integer(html_log_file,glob_iter)
> ;
> logitem_time(html_log_file,(glob_clock_sec))
> ;
> if (c(glob_percent_done) < glob__100) then # if number 16
> logitem_time(html_log_file,(glob_total_exp_sec))
> ;
> 0;
> else
> logitem_str(html_log_file,"Done")
> ;
> 0;
> fi;# end if 16;
> log_revs(html_log_file," 309 | ")
> ;
> logitem_str(html_log_file,"cos diffeq.mxt")
> ;
> logitem_str(html_log_file,"cos maple results")
> ;
> logitem_str(html_log_file,"OK")
> ;
> logend(html_log_file)
> ;
> ;
> fi;# end if 15;
> if (glob_html_log) then # if number 15
> fclose(html_log_file);
> fi;# end if 15
> ;
> ;;
> end;
> # End Function number 12
> #END OUTFILEMAIN
> end;
Warning, `h_new` is implicitly declared local to procedure `main`
Warning, `ratio` is implicitly declared local to procedure `main`
main := proc()
local d1, d2, d3, d4, est_err_2, niii, done_once, max_terms, display_max,
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,
last_min_pole_est, opt_iter, tmp, subiter, est_needed_step_err,
estimated_step_error, min_value, est_answer, found_h, repeat_it, h_new,
ratio;
global ALWAYS, INFO, DEBUGL, DEBUGMASSIVE, glob_iolevel, glob_yes_pole,
glob_no_pole, glob_not_given, glob_no_sing_tests, glob_ratio_test,
glob_three_term_test, glob_six_term_test, glob_log_10, MAX_UNCHANGED,
glob__small, glob_small_float, glob_smallish_float, glob_large_float,
glob_larger_float, glob__m2, glob__m1, glob__0, glob__1, glob__2, glob__3,
glob__4, glob__5, glob__8, glob__10, glob__100, glob__pi, glob__0_5,
glob__0_8, glob__m0_8, glob__0_25, glob__0_125, glob_h, glob_nxt, glob_prec,
glob_check_sign, glob_desired_digits_correct, glob_max_estimated_step_error,
glob_ratio_of_radius, glob_percent_done, glob_total_exp_sec,
glob_optimal_expect_sec, glob_estimated_size_answer, glob_almost_1,
glob_clock_sec, glob_clock_start_sec, glob_disp_incr, glob_diff_rc_fm,
glob_diff_rc_fmm1, glob_diff_rc_fmm2, glob_diff_ord_fm, glob_diff_ord_fmm1,
glob_diff_ord_fmm2, glob_six_term_ord_save, glob_guess_error_rc,
glob_guess_error_ord, glob_least_given_sing, glob_least_ratio_sing,
glob_least_3_sing, glob_least_6_sing, glob_last_good_h, glob_max_h,
glob_min_h, glob_display_interval, glob_abserr, glob_relerr,
glob_min_pole_est, glob_max_rel_trunc_err, glob_max_trunc_err,
glob_max_hours, glob_optimal_clock_start_sec, glob_optimal_start,
glob_upper_ratio_limit, glob_lower_ratio_limit, glob_max_sec,
glob_orig_start_sec, glob_normmax, glob_max_minutes, glob_next_display,
glob_est_digits, glob_subiter_method, glob_html_log, glob_min_good_digits,
glob_good_digits, glob_min_apfp_est_good_digits, glob_apfp_est_good_digits,
glob_max_opt_iter, glob_dump, glob_djd_debug, glob_display_flag,
glob_djd_debug2, glob_h_reason, glob_sec_in_minute, glob_min_in_hour,
glob_hours_in_day, glob_days_in_year, glob_sec_in_hour, glob_sec_in_day,
glob_sec_in_year, glob_not_yet_finished, glob_initial_pass,
glob_not_yet_start_msg, glob_reached_optimal_h, glob_optimal_done,
glob_type_given_pole, glob_optimize, glob_look_poles, glob_dump_closed_form,
glob_max_iter, glob_no_eqs, glob_unchanged_h_cnt, glob_warned, glob_warned2,
glob_start, glob_iter, array_const_1, array_const_0D0, array_y_init,
array_norms, array_fact_1, array_1st_rel_error, array_last_rel_error,
array_est_rel_error, array_max_est_error, array_type_pole,
array_type_real_pole, array_type_complex_pole, array_est_digits, array_y,
array_x, array_tmp0, array_tmp1_g, array_tmp1, array_tmp2, array_m1,
array_y_higher, array_y_higher_work, array_y_higher_work2,
array_y_set_initial, array_given_rad_poles, array_given_ord_poles,
array_rad_test_poles, array_ord_test_poles, array_fact_2, ATS_MAX_TERMS,
glob_last;
ATS_MAX_TERMS := 40;
Digits := 32;
max_terms := 40;
glob_html_log := true;
array_y_init := Array(0 .. 40, []);
array_norms := Array(0 .. 40, []);
array_fact_1 := Array(0 .. 40, []);
array_1st_rel_error := Array(0 .. 2, []);
array_last_rel_error := Array(0 .. 2, []);
array_est_rel_error := Array(0 .. 2, []);
array_max_est_error := Array(0 .. 2, []);
array_type_pole := Array(0 .. 2, []);
array_type_real_pole := Array(0 .. 2, []);
array_type_complex_pole := Array(0 .. 2, []);
array_est_digits := Array(0 .. 2, []);
array_y := Array(0 .. 40, []);
array_x := Array(0 .. 40, []);
array_tmp0 := Array(0 .. 40, []);
array_tmp1_g := Array(0 .. 40, []);
array_tmp1 := Array(0 .. 40, []);
array_tmp2 := Array(0 .. 40, []);
array_m1 := Array(0 .. 40, []);
array_y_higher := Array(0 .. 2, 0 .. 41, []);
array_y_higher_work := Array(0 .. 2, 0 .. 41, []);
array_y_higher_work2 := Array(0 .. 2, 0 .. 41, []);
array_y_set_initial := Array(0 .. 2, 0 .. 41, []);
array_given_rad_poles := Array(0 .. 2, 0 .. 4, []);
array_given_ord_poles := Array(0 .. 2, 0 .. 4, []);
array_rad_test_poles := Array(0 .. 2, 0 .. 5, []);
array_ord_test_poles := Array(0 .. 2, 0 .. 5, []);
array_fact_2 := Array(0 .. 40, 0 .. 41, []);
term := 1;
while term <= 40 do array_y_init[term] := c(0.); term := term + 1
end do;
term := 1;
while term <= 40 do array_norms[term] := c(0.); term := term + 1 end do
;
term := 1;
while term <= 40 do array_fact_1[term] := c(0.); term := term + 1
end do;
term := 1;
while term <= 2 do array_1st_rel_error[term] := c(0.); term := term + 1
end do;
term := 1;
while term <= 2 do
array_last_rel_error[term] := c(0.); term := term + 1
end do;
term := 1;
while term <= 2 do array_est_rel_error[term] := c(0.); term := term + 1
end do;
term := 1;
while term <= 2 do array_max_est_error[term] := c(0.); term := term + 1
end do;
term := 1;
while term <= 2 do array_type_pole[term] := 0; term := term + 1 end do;
term := 1;
while term <= 2 do array_type_real_pole[term] := 0; term := term + 1
end do;
term := 1;
while term <= 2 do array_type_complex_pole[term] := 0; term := term + 1
end do;
term := 1;
while term <= 2 do array_est_digits[term] := 0; term := term + 1 end do
;
term := 1;
while term <= 40 do array_y[term] := c(0.); term := term + 1 end do;
term := 1;
while term <= 40 do array_x[term] := c(0.); term := term + 1 end do;
term := 1;
while term <= 40 do array_tmp0[term] := c(0.); term := term + 1 end do;
term := 1;
while term <= 40 do array_tmp1_g[term] := c(0.); term := term + 1
end do;
term := 1;
while term <= 40 do array_tmp1[term] := c(0.); term := term + 1 end do;
term := 1;
while term <= 40 do array_tmp2[term] := c(0.); term := term + 1 end do;
term := 1;
while term <= 40 do array_m1[term] := c(0.); term := term + 1 end do;
ord := 1;
while ord <= 2 do
term := 1;
while term <= 40 do
array_y_higher[ord, term] := c(0.); term := term + 1
end do;
ord := ord + 1
end do;
ord := 1;
while ord <= 2 do
term := 1;
while term <= 40 do
array_y_higher_work[ord, term] := c(0.); term := term + 1
end do;
ord := ord + 1
end do;
ord := 1;
while ord <= 2 do
term := 1;
while term <= 40 do
array_y_higher_work2[ord, term] := c(0.); term := term + 1
end do;
ord := ord + 1
end do;
ord := 1;
while ord <= 2 do
term := 1;
while term <= 40 do
array_y_set_initial[ord, term] := c(0.); term := term + 1
end do;
ord := ord + 1
end do;
ord := 1;
while ord <= 2 do
term := 1;
while term <= 3 do
array_given_rad_poles[ord, term] := c(0.); term := term + 1
end do;
ord := ord + 1
end do;
ord := 1;
while ord <= 2 do
term := 1;
while term <= 3 do
array_given_ord_poles[ord, term] := c(0.); term := term + 1
end do;
ord := ord + 1
end do;
ord := 1;
while ord <= 2 do
term := 1;
while term <= 4 do
array_rad_test_poles[ord, term] := c(0.); term := term + 1
end do;
ord := ord + 1
end do;
ord := 1;
while ord <= 2 do
term := 1;
while term <= 4 do
array_ord_test_poles[ord, term] := c(0.); term := term + 1
end do;
ord := ord + 1
end do;
ord := 1;
while ord <= 40 do
term := 1;
while term <= 40 do
array_fact_2[ord, term] := c(0.); term := term + 1
end do;
ord := ord + 1
end do;
zero_ats_ar(array_y);
zero_ats_ar(array_x);
zero_ats_ar(array_tmp0);
zero_ats_ar(array_tmp1_g);
zero_ats_ar(array_tmp1);
zero_ats_ar(array_tmp2);
zero_ats_ar(array_m1);
zero_ats_ar(array_const_1);
array_const_1[1] := c(1);
zero_ats_ar(array_const_0D0);
array_const_0D0[1] := c(0.);
zero_ats_ar(array_m1);
array_m1[1] := glob__m1;
iiif := 0;
while iiif <= ATS_MAX_TERMS do
jjjf := 0;
while jjjf <= ATS_MAX_TERMS do
array_fact_1[iiif] := 0;
array_fact_2[iiif, jjjf] := 0;
jjjf := jjjf + 1
end do;
iiif := iiif + 1
end do;
ALWAYS := 1;
INFO := 2;
DEBUGL := 3;
DEBUGMASSIVE := 4;
glob_iolevel := 5;
glob_yes_pole := 4;
glob_no_pole := 3;
glob_not_given := 0;
glob_no_sing_tests := 4;
glob_ratio_test := 1;
glob_three_term_test := 2;
glob_six_term_test := 3;
glob_log_10 := log(c(10.0));
MAX_UNCHANGED := 10;
glob__small := c(0.1*10^(-50));
glob_small_float := c(0.1*10^(-50));
glob_smallish_float := c(0.1*10^(-60));
glob_large_float := c(0.10*10^101);
glob_larger_float := c(0.11*10^101);
glob__m2 := c(-2);
glob__m1 := c(-1);
glob__0 := c(0);
glob__1 := c(1);
glob__2 := c(2);
glob__3 := c(3);
glob__4 := c(4);
glob__5 := c(5);
glob__8 := c(8);
glob__10 := c(10);
glob__100 := c(100);
glob__pi := c(0.);
glob__0_5 := c(0.5);
glob__0_8 := c(0.8);
glob__m0_8 := c(-0.8);
glob__0_25 := c(0.25);
glob__0_125 := c(0.125);
glob_h := 0.1;
glob_nxt := 1;
glob_prec := c(0.10*10^(-15));
glob_check_sign := c(1.0);
glob_desired_digits_correct := c(8.0);
glob_max_estimated_step_error := c(0.);
glob_ratio_of_radius := c(0.1);
glob_percent_done := c(0.);
glob_total_exp_sec := c(0.1);
glob_optimal_expect_sec := c(0.1);
glob_estimated_size_answer := c(100.0);
glob_almost_1 := c(0.9990);
glob_clock_sec := c(0.);
glob_clock_start_sec := c(0.);
glob_disp_incr := c(0.1);
glob_diff_rc_fm := c(0.1);
glob_diff_rc_fmm1 := c(0.1);
glob_diff_rc_fmm2 := c(0.1);
glob_diff_ord_fm := c(0.1);
glob_diff_ord_fmm1 := c(0.1);
glob_diff_ord_fmm2 := c(0.1);
glob_six_term_ord_save := c(0.1);
glob_guess_error_rc := c(0.1);
glob_guess_error_ord := c(0.1);
glob_least_given_sing := c(0.99*10^201);
glob_least_ratio_sing := c(0.99*10^201);
glob_least_3_sing := c(0.99*10^101);
glob_least_6_sing := c(0.99*10^101);
glob_last_good_h := c(0.1);
glob_max_h := c(0.1);
glob_min_h := c(0.1*10^(-5));
glob_display_interval := c(0.1);
glob_abserr := c(0.1*10^(-10));
glob_relerr := c(0.1*10^(-10));
glob_min_pole_est := c(0.1*10^10);
glob_max_rel_trunc_err := c(0.1*10^(-10));
glob_max_trunc_err := c(0.1*10^(-10));
glob_max_hours := c(0.);
glob_optimal_clock_start_sec := c(0.);
glob_optimal_start := c(0.);
glob_upper_ratio_limit := c(1.0001);
glob_lower_ratio_limit := c(0.9999);
glob_max_sec := c(10000.0);
glob_orig_start_sec := c(0.);
glob_normmax := c(0.);
glob_max_minutes := c(0.);
glob_next_display := c(0.);
glob_est_digits := 1;
glob_subiter_method := 3;
glob_html_log := true;
glob_min_good_digits := 99999;
glob_good_digits := 0;
glob_min_apfp_est_good_digits := 99999;
glob_apfp_est_good_digits := 0;
glob_max_opt_iter := 10;
glob_dump := false;
glob_djd_debug := true;
glob_display_flag := true;
glob_djd_debug2 := true;
glob_h_reason := 0;
glob_sec_in_minute := 60;
glob_min_in_hour := 60;
glob_hours_in_day := 24;
glob_days_in_year := 365;
glob_sec_in_hour := 3600;
glob_sec_in_day := 86400;
glob_sec_in_year := 31536000;
glob_not_yet_finished := true;
glob_initial_pass := true;
glob_not_yet_start_msg := true;
glob_reached_optimal_h := false;
glob_optimal_done := false;
glob_type_given_pole := 0;
glob_optimize := false;
glob_look_poles := false;
glob_dump_closed_form := false;
glob_max_iter := 10000;
glob_no_eqs := 0;
glob_unchanged_h_cnt := 0;
glob_warned := false;
glob_warned2 := false;
glob_start := 0;
glob_iter := 0;
array_y_set_initial[1, 1] := true;
array_y_set_initial[1, 2] := false;
array_y_set_initial[1, 3] := false;
array_y_set_initial[1, 4] := false;
array_y_set_initial[1, 5] := false;
array_y_set_initial[1, 6] := false;
array_y_set_initial[1, 7] := false;
array_y_set_initial[1, 8] := false;
array_y_set_initial[1, 9] := false;
array_y_set_initial[1, 10] := false;
array_y_set_initial[1, 11] := false;
array_y_set_initial[1, 12] := false;
array_y_set_initial[1, 13] := false;
array_y_set_initial[1, 14] := false;
array_y_set_initial[1, 15] := false;
array_y_set_initial[1, 16] := false;
array_y_set_initial[1, 17] := false;
array_y_set_initial[1, 18] := false;
array_y_set_initial[1, 19] := false;
array_y_set_initial[1, 20] := false;
array_y_set_initial[1, 21] := false;
array_y_set_initial[1, 22] := false;
array_y_set_initial[1, 23] := false;
array_y_set_initial[1, 24] := false;
array_y_set_initial[1, 25] := false;
array_y_set_initial[1, 26] := false;
array_y_set_initial[1, 27] := false;
array_y_set_initial[1, 28] := false;
array_y_set_initial[1, 29] := false;
array_y_set_initial[1, 30] := false;
array_y_set_initial[1, 31] := false;
array_y_set_initial[1, 32] := false;
array_y_set_initial[1, 33] := false;
array_y_set_initial[1, 34] := false;
array_y_set_initial[1, 35] := false;
array_y_set_initial[1, 36] := false;
array_y_set_initial[1, 37] := false;
array_y_set_initial[1, 38] := false;
array_y_set_initial[1, 39] := false;
array_y_set_initial[1, 40] := false;
ALWAYS := 1;
INFO := 2;
DEBUGL := 3;
DEBUGMASSIVE := 4;
ATS_MAX_TERMS := 40;
glob_iolevel := INFO;
glob_orig_start_sec := elapsed_time_seconds();
glob_display_flag := true;
glob_no_eqs := 1;
glob_iter := -1;
opt_iter := -1;
glob_max_iter := 10000;
glob_max_hours := 0.;
glob_max_minutes := 15.0;
omniout_str(ALWAYS, "##############ECHO OF PROBLEM#################");
omniout_str(ALWAYS,
"##############temp/cospostcpx.cpx#################");
omniout_str(ALWAYS, "diff ( y , x , 1 ) = cos ( x ) ; ")
;
omniout_str(ALWAYS, "!");
omniout_str(ALWAYS, "#BEGIN FIRST INPUT BLOCK");
omniout_str(ALWAYS, "Digits:=32;");
omniout_str(ALWAYS, "max_terms:=40;");
omniout_str(ALWAYS, "!");
omniout_str(ALWAYS, "#END FIRST INPUT BLOCK");
omniout_str(ALWAYS, "#BEGIN SECOND INPUT BLOCK");
omniout_str(ALWAYS, "x_start := 0.1 + 0.1 * I;");
omniout_str(ALWAYS, "x_end := 99.0 + 99.0 * I;");
omniout_str(ALWAYS, "array_y_init[0 + 1] := exact_soln_y(x_start);");
omniout_str(ALWAYS, "glob_look_poles := false;");
omniout_str(ALWAYS, "");
omniout_str(ALWAYS, "");
omniout_str(ALWAYS, "");
omniout_str(ALWAYS, "");
omniout_str(ALWAYS, "");
omniout_str(ALWAYS, "");
omniout_str(ALWAYS, "");
omniout_str(ALWAYS, "glob_type_given_pole := 3;");
omniout_str(ALWAYS, "#END SECOND INPUT BLOCK");
omniout_str(ALWAYS, "#BEGIN OVERRIDE BLOCK");
omniout_str(ALWAYS, "glob_desired_digits_correct:=8;");
omniout_str(ALWAYS, "glob_max_minutes:=(3.0);");
omniout_str(ALWAYS, "glob_subiter_method:=3;");
omniout_str(ALWAYS, "glob_max_iter:=10000;");
omniout_str(ALWAYS, "glob_upper_ratio_limit:=c(1.000001);");
omniout_str(ALWAYS, "glob_lower_ratio_limit:=c(0.999999);");
omniout_str(ALWAYS, "glob_look_poles:=true;");
omniout_str(ALWAYS, "glob_h:=c(0.001);");
omniout_str(ALWAYS, "glob_display_interval:=c(0.01);");
omniout_str(ALWAYS, "#END OVERRIDE BLOCK");
omniout_str(ALWAYS, "!");
omniout_str(ALWAYS, "#BEGIN USER DEF BLOCK");
omniout_str(ALWAYS, "exact_soln_y := proc(x)");
omniout_str(ALWAYS, "return(c(1.0) + sin(c(x)));");
omniout_str(ALWAYS, "end;");
omniout_str(ALWAYS, "next_delta := proc()");
omniout_str(ALWAYS, "global glob_nxt, x_delta;");
omniout_str(ALWAYS, "");
omniout_str(ALWAYS, "x_delta := [ 0.001 + 0.00004 * I,");
omniout_str(ALWAYS, "0.0001 + 0.004 * I,");
omniout_str(ALWAYS, "0.003 + 0.006 * I,");
omniout_str(ALWAYS, "0.0001 + 0.005 * I,");
omniout_str(ALWAYS, "0.0001 + 0.003 * I,");
omniout_str(ALWAYS, "0.001 + 0.001 * I,");
omniout_str(ALWAYS, "0.001 + 0.003 * I,");
omniout_str(ALWAYS, "0.0001 + 0.004 * I,");
omniout_str(ALWAYS, "0.003 + 0.006 * I,");
omniout_str(ALWAYS, "0.0001 + 0.005 * I,");
omniout_str(ALWAYS, "0.0001 + 0.003 * I,");
omniout_str(ALWAYS, "0.001 + 0.001 * I,");
omniout_str(ALWAYS, "0.001 + 0.003 * I,");
omniout_str(ALWAYS, "0.0001 + 0.004 * I,");
omniout_str(ALWAYS, "0.003 + 0.006 * I,");
omniout_str(ALWAYS, "0.0001 + 0.005 * I,");
omniout_str(ALWAYS, "0.0001 + 0.003 * I,");
omniout_str(ALWAYS, "0.001 + 0.001 * I,");
omniout_str(ALWAYS, "0.001 + 0.003 * I,");
omniout_str(ALWAYS, "0.0001 + 0.004 * I,");
omniout_str(ALWAYS, "0.003 + 0.006 * I,");
omniout_str(ALWAYS, "0.0001 + 0.005 * I,");
omniout_str(ALWAYS, "0.0001 + 0.003 * I,");
omniout_str(ALWAYS, "0.001 + 0.001 * I,");
omniout_str(ALWAYS, "0.001 + 0.003 * I,");
omniout_str(ALWAYS, "0.0001 + 0.004 * I,");
omniout_str(ALWAYS, "0.003 + 0.006 * I,");
omniout_str(ALWAYS, "0.0001 + 0.005 * I,");
omniout_str(ALWAYS, "0.0001 + 0.003 * I,");
omniout_str(ALWAYS, "0.001 + 0.001 * I,");
omniout_str(ALWAYS, "0.0001 + 0.004 * I,");
omniout_str(ALWAYS, "0.003 + 0.006 * I,");
omniout_str(ALWAYS, "0.0001 + 0.005 * I,");
omniout_str(ALWAYS, "0.0001 + 0.003 * I,");
omniout_str(ALWAYS, "0.001 + 0.001 * I,");
omniout_str(ALWAYS, "0.001 + 0.003 * I,");
omniout_str(ALWAYS, "0.0001 + 0.004 * I,");
omniout_str(ALWAYS, "0.003 + 0.006 * I,");
omniout_str(ALWAYS, "0.0001 + 0.005 * I,");
omniout_str(ALWAYS, "0.0001 + 0.003 * I,");
omniout_str(ALWAYS, "0.001 + 0.001 * I,");
omniout_str(ALWAYS, "0.001 + 0.003 * I,");
omniout_str(ALWAYS, "0.0001 + 0.004 * I,");
omniout_str(ALWAYS, "0.003 + 0.006 * I,");
omniout_str(ALWAYS, "0.0001 + 0.005 * I,");
omniout_str(ALWAYS, "0.0001 + 0.003 * I,");
omniout_str(ALWAYS, "0.001 + 0.001 * I,");
omniout_str(ALWAYS, "0.001 + 0.003 * I,");
omniout_str(ALWAYS, "0.0001 + 0.004 * I,");
omniout_str(ALWAYS, "0.003 + 0.006 * I,");
omniout_str(ALWAYS, "0.0001 + 0.005 * I,");
omniout_str(ALWAYS, "0.0001 + 0.003 * I,");
omniout_str(ALWAYS, "0.001 + 0.001 * I,");
omniout_str(ALWAYS, "0.001 + 0.003 * I,");
omniout_str(ALWAYS, "0.0001 + 0.004 * I,");
omniout_str(ALWAYS, "0.003 + 0.006 * I,");
omniout_str(ALWAYS, "0.0001 + 0.005 * I,");
omniout_str(ALWAYS, "0.0001 + 0.003 * I,");
omniout_str(ALWAYS, "0.001 + 0.001 * I,");
omniout_str(ALWAYS, "0.0001 + 0.004 * I,");
omniout_str(ALWAYS, "0.003 + 0.006 * I,");
omniout_str(ALWAYS, "0.0001 + 0.005 * I,");
omniout_str(ALWAYS, "0.0001 + 0.003 * I,");
omniout_str(ALWAYS, "0.001 + 0.001 * I,");
omniout_str(ALWAYS, "0.001 + 0.003 * I,");
omniout_str(ALWAYS, "0.0001 + 0.004 * I,");
omniout_str(ALWAYS, "0.003 + 0.006 * I,");
omniout_str(ALWAYS, "0.0001 + 0.005 * I,");
omniout_str(ALWAYS, "0.0001 + 0.003 * I,");
omniout_str(ALWAYS, "0.001 + 0.001 * I,");
omniout_str(ALWAYS, "0.001 + 0.003 * I,");
omniout_str(ALWAYS, "0.0001 + 0.004 * I,");
omniout_str(ALWAYS, "0.003 + 0.006 * I,");
omniout_str(ALWAYS, "0.0001 + 0.005 * I,");
omniout_str(ALWAYS, "0.0001 + 0.003 * I,");
omniout_str(ALWAYS, "0.001 + 0.001 * I,");
omniout_str(ALWAYS, "0.001 + 0.003 * I,");
omniout_str(ALWAYS, "0.0001 + 0.004 * I,");
omniout_str(ALWAYS, "0.003 + 0.006 * I,");
omniout_str(ALWAYS, "0.0001 + 0.005 * I,");
omniout_str(ALWAYS, "0.0001 + 0.003 * I,");
omniout_str(ALWAYS, "0.001 + 0.001 * I,");
omniout_str(ALWAYS, "0.001 + 0.003 * I,");
omniout_str(ALWAYS, "0.0001 + 0.004 * I,");
omniout_str(ALWAYS, "0.003 + 0.006 * I,");
omniout_str(ALWAYS, "0.0001 + 0.005 * I,");
omniout_str(ALWAYS, "0.0001 + 0.003 * I,");
omniout_str(ALWAYS, "0.001 + 0.001 * I,");
omniout_str(ALWAYS, "0.0001 + 0.004 * I,");
omniout_str(ALWAYS, "0.003 + 0.006 * I,");
omniout_str(ALWAYS, "0.0001 + 0.005 * I,");
omniout_str(ALWAYS, "0.0001 + 0.003 * I,");
omniout_str(ALWAYS, "0.001 + 0.001 * I,");
omniout_str(ALWAYS, "0.001 + 0.003 * I,");
omniout_str(ALWAYS, "0.0001 + 0.004 * I,");
omniout_str(ALWAYS, "0.003 + 0.006 * I,");
omniout_str(ALWAYS, "0.0001 + 0.005 * I,");
omniout_str(ALWAYS, "0.0001 + 0.003 * I,");
omniout_str(ALWAYS, "0.001 + 0.001 * I,");
omniout_str(ALWAYS, "0.001 + 0.003 * I,");
omniout_str(ALWAYS, "0.0001 + 0.004 * I,");
omniout_str(ALWAYS, "0.003 + 0.006 * I,");
omniout_str(ALWAYS, "0.0001 + 0.005 * I,");
omniout_str(ALWAYS, "0.0001 + 0.003 * I,");
omniout_str(ALWAYS, "0.001 + 0.001 * I,");
omniout_str(ALWAYS, "0.001 + 0.003 * I,");
omniout_str(ALWAYS, "0.0001 + 0.004 * I,");
omniout_str(ALWAYS, "0.003 + 0.006 * I,");
omniout_str(ALWAYS, "0.0001 + 0.005 * I,");
omniout_str(ALWAYS, "0.0001 + 0.003 * I,");
omniout_str(ALWAYS, "0.001 + 0.001 * I,");
omniout_str(ALWAYS, "0.001 + 0.003 * I,");
omniout_str(ALWAYS, "0.0001 + 0.004 * I,");
omniout_str(ALWAYS, "0.003 + 0.006 * I,");
omniout_str(ALWAYS, "0.0001 + 0.005 * I,");
omniout_str(ALWAYS, "0.0001 + 0.003 * I,");
omniout_str(ALWAYS, "0.001 + 0.001 * I,");
omniout_str(ALWAYS, "0.0001 + 0.004 * I,");
omniout_str(ALWAYS, "0.003 + 0.006 * I,");
omniout_str(ALWAYS, "0.0001 + 0.005 * I,");
omniout_str(ALWAYS, "0.0001 + 0.003 * I,");
omniout_str(ALWAYS, "0.001 + 0.001 * I,");
omniout_str(ALWAYS, "0.001 + 0.003 * I,");
omniout_str(ALWAYS, "0.0001 + 0.004 * I,");
omniout_str(ALWAYS, "0.003 + 0.006 * I,");
omniout_str(ALWAYS, "0.0001 + 0.005 * I,");
omniout_str(ALWAYS, "0.0001 + 0.003 * I,");
omniout_str(ALWAYS, "0.001 + 0.001 * I,");
omniout_str(ALWAYS, "0.001 + 0.003 * I,");
omniout_str(ALWAYS, "0.0001 + 0.004 * I,");
omniout_str(ALWAYS, "0.003 + 0.006 * I,");
omniout_str(ALWAYS, "0.0001 + 0.005 * I,");
omniout_str(ALWAYS, "0.0001 + 0.003 * I,");
omniout_str(ALWAYS, "0.001 + 0.001 * I,");
omniout_str(ALWAYS, "0.001 + 0.003 * I,");
omniout_str(ALWAYS, "0.0001 + 0.004 * I,");
omniout_str(ALWAYS, "0.003 + 0.006 * I,");
omniout_str(ALWAYS, "0.0001 + 0.005 * I,");
omniout_str(ALWAYS, "0.0001 + 0.003 * I,");
omniout_str(ALWAYS, "0.001 + 0.001 * I,");
omniout_str(ALWAYS, "0.001 + 0.003 * I,");
omniout_str(ALWAYS, "0.0001 + 0.004 * I,");
omniout_str(ALWAYS, "0.003 + 0.006 * I,");
omniout_str(ALWAYS, "0.0001 + 0.005 * I,");
omniout_str(ALWAYS, "0.0001 + 0.003 * I,");
omniout_str(ALWAYS, "0.001 + 0.001 * I,");
omniout_str(ALWAYS, "0.0001 + 0.004 * I,");
omniout_str(ALWAYS, "0.003 + 0.006 * I,");
omniout_str(ALWAYS, "0.0001 + 0.005 * I,");
omniout_str(ALWAYS, "0.0001 + 0.003 * I,");
omniout_str(ALWAYS, "0.001 + 0.001 * I,");
omniout_str(ALWAYS, "0.001 + 0.003 * I,");
omniout_str(ALWAYS, "0.0001 + 0.004 * I,");
omniout_str(ALWAYS, "0.003 + 0.006 * I,");
omniout_str(ALWAYS, "0.0001 + 0.005 * I,");
omniout_str(ALWAYS, "0.0001 + 0.003 * I,");
omniout_str(ALWAYS, "0.001 + 0.001 * I,");
omniout_str(ALWAYS, "0.001 + 0.003 * I,");
omniout_str(ALWAYS, "0.0001 + 0.004 * I,");
omniout_str(ALWAYS, "0.003 + 0.006 * I,");
omniout_str(ALWAYS, "0.0001 + 0.005 * I,");
omniout_str(ALWAYS, "0.0001 + 0.003 * I,");
omniout_str(ALWAYS, "0.001 + 0.001 * I,");
omniout_str(ALWAYS, "0.001 + 0.003 * I,");
omniout_str(ALWAYS, "0.0001 + 0.004 * I,");
omniout_str(ALWAYS, "0.003 + 0.006 * I,");
omniout_str(ALWAYS, "0.0001 + 0.005 * I,");
omniout_str(ALWAYS, "0.0001 + 0.003 * I,");
omniout_str(ALWAYS, "0.001 + 0.001 * I,");
omniout_str(ALWAYS, "0.001 + 0.003 * I,");
omniout_str(ALWAYS, "0.0001 + 0.004 * I,");
omniout_str(ALWAYS, "0.003 + 0.006 * I,");
omniout_str(ALWAYS, "0.0001 + 0.005 * I,");
omniout_str(ALWAYS, "0.0001 + 0.003 * I,");
omniout_str(ALWAYS, "0.001 + 0.001 * I,");
omniout_str(ALWAYS, "0.0001 + 0.004 * I,");
omniout_str(ALWAYS, "0.003 + 0.006 * I,");
omniout_str(ALWAYS, "0.0001 + 0.005 * I,");
omniout_str(ALWAYS, "0.0001 + 0.003 * I,");
omniout_str(ALWAYS, "0.001 + 0.001 * I,");
omniout_str(ALWAYS, "0.001 + 0.003 * I,");
omniout_str(ALWAYS, "0.0001 + 0.004 * I,");
omniout_str(ALWAYS, "0.0001 + 0.004 * I,");
omniout_str(ALWAYS, "0.003 + 0.006 * I,");
omniout_str(ALWAYS, "0.0001 + 0.005 * I,");
omniout_str(ALWAYS, "0.0001 + 0.003 * I,");
omniout_str(ALWAYS, "0.001 + 0.001 * I,");
omniout_str(ALWAYS, "0.001 + 0.003 * I,");
omniout_str(ALWAYS, "0.0001 + 0.004 * I,");
omniout_str(ALWAYS, "0.003 + 0.006 * I,");
omniout_str(ALWAYS, "0.0001 + 0.005 * I,");
omniout_str(ALWAYS, "0.0001 + 0.003 * I,");
omniout_str(ALWAYS, "0.001 + 0.001 * I,");
omniout_str(ALWAYS, "0.001 + 0.003 * I,");
omniout_str(ALWAYS, "0.0001 + 0.004 * I,");
omniout_str(ALWAYS, "0.003 + 0.006 * I,");
omniout_str(ALWAYS, "0.0001 + 0.005 * I,");
omniout_str(ALWAYS, "0.0001 + 0.003 * I,");
omniout_str(ALWAYS, "0.001 + 0.001 * I,");
omniout_str(ALWAYS, "0.001 + 0.003 * I,");
omniout_str(ALWAYS, "0.0001 + 0.004 * I,");
omniout_str(ALWAYS, "0.003 + 0.006 * I,");
omniout_str(ALWAYS, "0.0001 + 0.005 * I,");
omniout_str(ALWAYS, "0.0001 + 0.003 * I,");
omniout_str(ALWAYS, "0.001 + 0.001 * I,");
omniout_str(ALWAYS, "0.001 + 0.003 * I,");
omniout_str(ALWAYS, "0.0001 + 0.004 * I,");
omniout_str(ALWAYS, "0.003 + 0.006 * I,");
omniout_str(ALWAYS, "0.0001 + 0.005 * I,");
omniout_str(ALWAYS, "0.0001 + 0.003 * I,");
omniout_str(ALWAYS, "0.001 + 0.001 * I,");
omniout_str(ALWAYS, "0.0001 + 0.004 * I,");
omniout_str(ALWAYS, "0.003 + 0.006 * I,");
omniout_str(ALWAYS, "0.0001 + 0.005 * I,");
omniout_str(ALWAYS, "0.0001 + 0.003 * I,");
omniout_str(ALWAYS, "0.001 + 0.001 * I,");
omniout_str(ALWAYS, "0.001 + 0.003 * I,");
omniout_str(ALWAYS, "0.0001 + 0.004 * I,");
omniout_str(ALWAYS, "0.003 + 0.006 * I,");
omniout_str(ALWAYS, "0.0001 + 0.005 * I,");
omniout_str(ALWAYS, "0.0001 + 0.003 * I,");
omniout_str(ALWAYS, "0.001 + 0.001 * I,");
omniout_str(ALWAYS, "0.001 + 0.003 * I,");
omniout_str(ALWAYS, "0.0001 + 0.004 * I,");
omniout_str(ALWAYS, "0.003 + 0.006 * I,");
omniout_str(ALWAYS, "0.0001 + 0.005 * I,");
omniout_str(ALWAYS, "0.0001 + 0.003 * I,");
omniout_str(ALWAYS, "0.001 + 0.001 * I,");
omniout_str(ALWAYS, "0.001 + 0.003 * I,");
omniout_str(ALWAYS, "0.0001 + 0.004 * I,");
omniout_str(ALWAYS, "0.003 + 0.006 * I,");
omniout_str(ALWAYS, "0.0001 + 0.005 * I,");
omniout_str(ALWAYS, "0.0001 + 0.003 * I,");
omniout_str(ALWAYS, "0.001 + 0.001 * I,");
omniout_str(ALWAYS, "0.001 + 0.003 * I,");
omniout_str(ALWAYS, "0.0001 + 0.004 * I,");
omniout_str(ALWAYS, "0.003 + 0.006 * I,");
omniout_str(ALWAYS, "0.0001 + 0.005 * I,");
omniout_str(ALWAYS, "0.0001 + 0.003 * I,");
omniout_str(ALWAYS, "0.001 + 0.001 * I,");
omniout_str(ALWAYS, "0.0001 + 0.004 * I,");
omniout_str(ALWAYS, "0.003 + 0.006 * I,");
omniout_str(ALWAYS, "0.0001 + 0.005 * I,");
omniout_str(ALWAYS, "0.0001 + 0.003 * I,");
omniout_str(ALWAYS, "0.001 + 0.001 * I,");
omniout_str(ALWAYS, "0.001 + 0.003 * I,");
omniout_str(ALWAYS, "0.0001 + 0.004 * I,");
omniout_str(ALWAYS, "0.003 + 0.006 * I,");
omniout_str(ALWAYS, "0.0001 + 0.005 * I,");
omniout_str(ALWAYS, "0.0001 + 0.003 * I,");
omniout_str(ALWAYS, "0.001 + 0.001 * I,");
omniout_str(ALWAYS, "0.001 + 0.003 * I,");
omniout_str(ALWAYS, "0.0001 + 0.004 * I,");
omniout_str(ALWAYS, "0.003 + 0.006 * I,");
omniout_str(ALWAYS, "0.0001 + 0.005 * I,");
omniout_str(ALWAYS, "0.0001 + 0.003 * I,");
omniout_str(ALWAYS, "0.001 + 0.001 * I,");
omniout_str(ALWAYS, "0.001 + 0.003 * I,");
omniout_str(ALWAYS, "0.0001 + 0.004 * I,");
omniout_str(ALWAYS, "0.003 + 0.006 * I,");
omniout_str(ALWAYS, "0.0001 + 0.005 * I,");
omniout_str(ALWAYS, "0.0001 + 0.003 * I,");
omniout_str(ALWAYS, "0.001 + 0.001 * I,");
omniout_str(ALWAYS, "0.001 + 0.003 * I,");
omniout_str(ALWAYS, "0.0001 + 0.004 * I,");
omniout_str(ALWAYS, "0.003 + 0.006 * I,");
omniout_str(ALWAYS, "0.0001 + 0.005 * I,");
omniout_str(ALWAYS, "0.0001 + 0.003 * I,");
omniout_str(ALWAYS, "0.001 + 0.001 * I,");
omniout_str(ALWAYS, "0.0001 + 0.004 * I,");
omniout_str(ALWAYS, "0.003 + 0.006 * I,");
omniout_str(ALWAYS, "0.0001 + 0.005 * I,");
omniout_str(ALWAYS, "0.0001 + 0.003 * I,");
omniout_str(ALWAYS, "0.001 + 0.001 * I,");
omniout_str(ALWAYS, "0.001 + 0.003 * I,");
omniout_str(ALWAYS, "0.0001 + 0.004 * I,");
omniout_str(ALWAYS, "0.003 + 0.006 * I,");
omniout_str(ALWAYS, "0.0001 + 0.005 * I,");
omniout_str(ALWAYS, "0.0001 + 0.003 * I,");
omniout_str(ALWAYS, "0.001 + 0.001 * I,");
omniout_str(ALWAYS, "0.001 + 0.003 * I,");
omniout_str(ALWAYS, "0.0001 + 0.004 * I,");
omniout_str(ALWAYS, "0.003 + 0.006 * I,");
omniout_str(ALWAYS, "0.0001 + 0.005 * I,");
omniout_str(ALWAYS, "0.0001 + 0.003 * I,");
omniout_str(ALWAYS, "0.001 + 0.001 * I,");
omniout_str(ALWAYS, "0.001 + 0.003 * I,");
omniout_str(ALWAYS, "0.0001 + 0.004 * I,");
omniout_str(ALWAYS, "0.003 + 0.006 * I,");
omniout_str(ALWAYS, "0.0001 + 0.005 * I,");
omniout_str(ALWAYS, "0.0001 + 0.003 * I,");
omniout_str(ALWAYS, "0.001 + 0.001 * I,");
omniout_str(ALWAYS, "0.001 + 0.003 * I,");
omniout_str(ALWAYS, "0.0001 + 0.004 * I,");
omniout_str(ALWAYS, "0.003 + 0.006 * I,");
omniout_str(ALWAYS, "0.0001 + 0.005 * I,");
omniout_str(ALWAYS, "0.0001 + 0.003 * I,");
omniout_str(ALWAYS, "0.001 + 0.001 * I,");
omniout_str(ALWAYS, "0.0001 + 0.004 * I,");
omniout_str(ALWAYS, "0.003 + 0.006 * I,");
omniout_str(ALWAYS, "0.0001 + 0.005 * I,");
omniout_str(ALWAYS, "0.0001 + 0.003 * I,");
omniout_str(ALWAYS, "0.001 + 0.001 * I,");
omniout_str(ALWAYS, "0.001 + 0.003 * I,");
omniout_str(ALWAYS, "0.0001 + 0.004 * I,");
omniout_str(ALWAYS, "0.003 + 0.006 * I,");
omniout_str(ALWAYS, "0.0001 + 0.005 * I,");
omniout_str(ALWAYS, "0.0001 + 0.003 * I,");
omniout_str(ALWAYS, "0.001 + 0.001 * I,");
omniout_str(ALWAYS, "0.001 + 0.003 * I,");
omniout_str(ALWAYS, "0.0001 + 0.004 * I,");
omniout_str(ALWAYS, "0.003 + 0.006 * I,");
omniout_str(ALWAYS, "0.0001 + 0.005 * I,");
omniout_str(ALWAYS, "0.0001 + 0.003 * I,");
omniout_str(ALWAYS, "0.001 + 0.001 * I,");
omniout_str(ALWAYS, "0.001 + 0.003 * I,");
omniout_str(ALWAYS, "0.0001 + 0.004 * I,");
omniout_str(ALWAYS, "0.003 + 0.006 * I,");
omniout_str(ALWAYS, "0.0001 + 0.005 * I,");
omniout_str(ALWAYS, "0.0001 + 0.003 * I,");
omniout_str(ALWAYS, "0.001 + 0.001 * I,");
omniout_str(ALWAYS, "0.001 + 0.003 * I,");
omniout_str(ALWAYS, "0.0001 + 0.004 * I,");
omniout_str(ALWAYS, "0.003 + 0.006 * I,");
omniout_str(ALWAYS, "0.0001 + 0.005 * I,");
omniout_str(ALWAYS, "0.0001 + 0.003 * I,");
omniout_str(ALWAYS, "0.001 + 0.001 * I,");
omniout_str(ALWAYS, "0.0001 + 0.004 * I,");
omniout_str(ALWAYS, "0.003 + 0.006 * I,");
omniout_str(ALWAYS, "0.0001 + 0.005 * I,");
omniout_str(ALWAYS, "0.0001 + 0.003 * I,");
omniout_str(ALWAYS, "0.001 + 0.001 * I,");
omniout_str(ALWAYS, "0.001 + 0.003 * I,");
omniout_str(ALWAYS, "0.0001 + 0.004 * I,");
omniout_str(ALWAYS, "0.003 + 0.006 * I,");
omniout_str(ALWAYS, "0.0001 + 0.005 * I,");
omniout_str(ALWAYS, "0.0001 + 0.003 * I,");
omniout_str(ALWAYS, "0.001 + 0.001 * I,");
omniout_str(ALWAYS, "0.001 + 0.003 * I,");
omniout_str(ALWAYS, "0.0001 + 0.004 * I,");
omniout_str(ALWAYS, "0.003 + 0.006 * I,");
omniout_str(ALWAYS, "0.0001 + 0.005 * I,");
omniout_str(ALWAYS, "0.0001 + 0.003 * I,");
omniout_str(ALWAYS, "0.001 + 0.001 * I,");
omniout_str(ALWAYS, "0.001 + 0.003 * I,");
omniout_str(ALWAYS, "0.0001 + 0.004 * I,");
omniout_str(ALWAYS, "0.003 + 0.006 * I,");
omniout_str(ALWAYS, "0.0001 + 0.005 * I,");
omniout_str(ALWAYS, "0.0001 + 0.003 * I,");
omniout_str(ALWAYS, "0.001 + 0.001 * I,");
omniout_str(ALWAYS, "0.001 + 0.003 * I,");
omniout_str(ALWAYS, "0.0001 + 0.004 * I,");
omniout_str(ALWAYS, "0.003 + 0.006 * I,");
omniout_str(ALWAYS, "0.0001 + 0.005 * I,");
omniout_str(ALWAYS, "0.0001 + 0.003 * I,");
omniout_str(ALWAYS, "0.001 + 0.001 * I,");
omniout_str(ALWAYS, "0.003 + 0.006 * I,");
omniout_str(ALWAYS, "0.0001 + 0.005 * I,");
omniout_str(ALWAYS, "0.0001 + 0.003 * I,");
omniout_str(ALWAYS, "0.001 + 0.001 * I,");
omniout_str(ALWAYS, "0.001 + 0.003 * I,");
omniout_str(ALWAYS, "0.0001 + 0.004 * I,");
omniout_str(ALWAYS, "0.003 + 0.006 * I,");
omniout_str(ALWAYS, "0.0001 + 0.005 * I,");
omniout_str(ALWAYS, "0.0001 + 0.003 * I,");
omniout_str(ALWAYS, "0.001 + 0.001 * I,");
omniout_str(ALWAYS, "0.001 + 0.003 * I,");
omniout_str(ALWAYS, "0.0001 + 0.004 * I,");
omniout_str(ALWAYS, "0.003 + 0.006 * I,");
omniout_str(ALWAYS, "0.0001 + 0.005 * I,");
omniout_str(ALWAYS, "0.0001 + 0.003 * I,");
omniout_str(ALWAYS, "0.001 + 0.001 * I,");
omniout_str(ALWAYS, "0.001 + 0.003 * I,");
omniout_str(ALWAYS, "0.0001 + 0.004 * I,");
omniout_str(ALWAYS, "0.003 + 0.006 * I,");
omniout_str(ALWAYS, "0.0001 + 0.005 * I,");
omniout_str(ALWAYS, "0.0001 + 0.003 * I,");
omniout_str(ALWAYS, "0.001 + 0.001 * I,");
omniout_str(ALWAYS, "0.0001 + 0.004 * I,");
omniout_str(ALWAYS, "0.003 + 0.006 * I,");
omniout_str(ALWAYS, "0.0001 + 0.005 * I,");
omniout_str(ALWAYS, "0.0001 + 0.003 * I,");
omniout_str(ALWAYS, "0.001 + 0.001 * I,");
omniout_str(ALWAYS, "0.001 + 0.003 * I,");
omniout_str(ALWAYS, "0.0001 + 0.004 * I,");
omniout_str(ALWAYS, "0.003 + 0.006 * I,");
omniout_str(ALWAYS, "0.0001 + 0.005 * I,");
omniout_str(ALWAYS, "0.0001 + 0.003 * I,");
omniout_str(ALWAYS, "0.001 + 0.001 * I,");
omniout_str(ALWAYS, "0.001 + 0.003 * I,");
omniout_str(ALWAYS, "0.0001 + 0.004 * I,");
omniout_str(ALWAYS, "0.003 + 0.006 * I,");
omniout_str(ALWAYS, "0.0001 + 0.005 * I,");
omniout_str(ALWAYS, "0.0001 + 0.003 * I,");
omniout_str(ALWAYS, "0.001 + 0.001 * I,");
omniout_str(ALWAYS, "0.001 + 0.003 * I,");
omniout_str(ALWAYS, "0.0001 + 0.004 * I,");
omniout_str(ALWAYS, "0.003 + 0.006 * I,");
omniout_str(ALWAYS, "0.0001 + 0.005 * I,");
omniout_str(ALWAYS, "0.0001 + 0.003 * I,");
omniout_str(ALWAYS, "0.001 + 0.001 * I,");
omniout_str(ALWAYS, "0.001 + 0.003 * I,");
omniout_str(ALWAYS, "0.0001 + 0.004 * I,");
omniout_str(ALWAYS, "0.003 + 0.006 * I,");
omniout_str(ALWAYS, "0.0001 + 0.005 * I,");
omniout_str(ALWAYS, "0.0001 + 0.003 * I,");
omniout_str(ALWAYS, "0.001 + 0.001 * I,");
omniout_str(ALWAYS, "0.0001 + 0.004 * I,");
omniout_str(ALWAYS, "0.003 + 0.006 * I,");
omniout_str(ALWAYS, "0.0001 + 0.005 * I,");
omniout_str(ALWAYS, "0.0001 + 0.003 * I,");
omniout_str(ALWAYS, "0.001 + 0.001 * I,");
omniout_str(ALWAYS, "0.001 + 0.003 * I,");
omniout_str(ALWAYS, "0.0001 + 0.004 * I,");
omniout_str(ALWAYS, "0.003 + 0.006 * I,");
omniout_str(ALWAYS, "0.0001 + 0.005 * I,");
omniout_str(ALWAYS, "0.0001 + 0.003 * I,");
omniout_str(ALWAYS, "0.001 + 0.001 * I,");
omniout_str(ALWAYS, "0.001 + 0.003 * I,");
omniout_str(ALWAYS, "0.0001 + 0.004 * I,");
omniout_str(ALWAYS, "0.003 + 0.006 * I,");
omniout_str(ALWAYS, "0.0001 + 0.005 * I,");
omniout_str(ALWAYS, "0.0001 + 0.003 * I,");
omniout_str(ALWAYS, "0.001 + 0.001 * I,");
omniout_str(ALWAYS, "0.001 + 0.003 * I,");
omniout_str(ALWAYS, "0.0001 + 0.004 * I,");
omniout_str(ALWAYS, "0.003 + 0.006 * I,");
omniout_str(ALWAYS, "0.0001 + 0.005 * I,");
omniout_str(ALWAYS, "0.0001 + 0.003 * I,");
omniout_str(ALWAYS, "0.001 + 0.001 * I,");
omniout_str(ALWAYS, "0.001 + 0.003 * I,");
omniout_str(ALWAYS, "0.0001 + 0.004 * I,");
omniout_str(ALWAYS, "0.003 + 0.006 * I,");
omniout_str(ALWAYS, "0.0001 + 0.005 * I,");
omniout_str(ALWAYS, "0.0001 + 0.003 * I,");
omniout_str(ALWAYS, "0.001 + 0.001 * I,");
omniout_str(ALWAYS, "0.0001 + 0.004 * I,");
omniout_str(ALWAYS, "0.003 + 0.006 * I,");
omniout_str(ALWAYS, "0.0001 + 0.005 * I,");
omniout_str(ALWAYS, "0.0001 + 0.003 * I,");
omniout_str(ALWAYS, "0.001 + 0.001 * I,");
omniout_str(ALWAYS, "0.001 + 0.003 * I,");
omniout_str(ALWAYS, "0.0001 + 0.004 * I,");
omniout_str(ALWAYS, "0.003 + 0.006 * I,");
omniout_str(ALWAYS, "0.0001 + 0.005 * I,");
omniout_str(ALWAYS, "0.0001 + 0.003 * I,");
omniout_str(ALWAYS, "0.001 + 0.001 * I,");
omniout_str(ALWAYS, "0.001 + 0.003 * I,");
omniout_str(ALWAYS, "0.0001 + 0.004 * I,");
omniout_str(ALWAYS, "0.003 + 0.006 * I,");
omniout_str(ALWAYS, "0.0001 + 0.005 * I,");
omniout_str(ALWAYS, "0.0001 + 0.003 * I,");
omniout_str(ALWAYS, "0.001 + 0.001 * I,");
omniout_str(ALWAYS, "0.001 + 0.003 * I,");
omniout_str(ALWAYS, "0.0001 + 0.004 * I,");
omniout_str(ALWAYS, "0.003 + 0.006 * I,");
omniout_str(ALWAYS, "0.0001 + 0.005 * I,");
omniout_str(ALWAYS, "0.0001 + 0.003 * I,");
omniout_str(ALWAYS, "0.001 + 0.001 * I,");
omniout_str(ALWAYS, "0.001 + 0.003 * I,");
omniout_str(ALWAYS, "0.0001 + 0.004 * I,");
omniout_str(ALWAYS, "0.003 + 0.006 * I,");
omniout_str(ALWAYS, "0.0001 + 0.005 * I,");
omniout_str(ALWAYS, "0.0001 + 0.003 * I,");
omniout_str(ALWAYS, "0.001 + 0.001 * I,");
omniout_str(ALWAYS, "0.0001 + 0.004 * I,");
omniout_str(ALWAYS, "0.003 + 0.006 * I,");
omniout_str(ALWAYS, "0.0001 + 0.005 * I,");
omniout_str(ALWAYS, "0.0001 + 0.003 * I,");
omniout_str(ALWAYS, "0.001 + 0.001 * I,");
omniout_str(ALWAYS, "0.001 + 0.003 * I,");
omniout_str(ALWAYS, "0.0001 + 0.004 * I,");
omniout_str(ALWAYS, "0.003 + 0.006 * I,");
omniout_str(ALWAYS, "0.0001 + 0.005 * I,");
omniout_str(ALWAYS, "0.0001 + 0.003 * I,");
omniout_str(ALWAYS, "0.001 + 0.001 * I,");
omniout_str(ALWAYS, "0.001 + 0.003 * I,");
omniout_str(ALWAYS, "0.0001 + 0.004 * I,");
omniout_str(ALWAYS, "0.003 + 0.006 * I,");
omniout_str(ALWAYS, "0.0001 + 0.005 * I,");
omniout_str(ALWAYS, "0.0001 + 0.003 * I,");
omniout_str(ALWAYS, "0.001 + 0.001 * I,");
omniout_str(ALWAYS, "0.001 + 0.003 * I,");
omniout_str(ALWAYS, "0.0001 + 0.004 * I,");
omniout_str(ALWAYS, "0.003 + 0.006 * I,");
omniout_str(ALWAYS, "0.0001 + 0.005 * I,");
omniout_str(ALWAYS, "0.0001 + 0.003 * I,");
omniout_str(ALWAYS, "0.001 + 0.001 * I,");
omniout_str(ALWAYS, "0.001 + 0.003 * I,");
omniout_str(ALWAYS, "0.0001 + 0.004 * I,");
omniout_str(ALWAYS, "0.003 + 0.006 * I,");
omniout_str(ALWAYS, "0.0001 + 0.005 * I,");
omniout_str(ALWAYS, "0.0001 + 0.003 * I,");
omniout_str(ALWAYS, "0.001 + 0.001 * I,");
omniout_str(ALWAYS, "0.0001 + 0.004 * I,");
omniout_str(ALWAYS, "0.003 + 0.006 * I,");
omniout_str(ALWAYS, "0.0001 + 0.005 * I,");
omniout_str(ALWAYS, "0.0001 + 0.003 * I,");
omniout_str(ALWAYS, "0.001 + 0.001 * I,");
omniout_str(ALWAYS, "0.001 + 0.003 * I,");
omniout_str(ALWAYS, "0.0001 + 0.004 * I,");
omniout_str(ALWAYS, "0.003 + 0.006 * I,");
omniout_str(ALWAYS, "0.0001 + 0.005 * I,");
omniout_str(ALWAYS, "0.0001 + 0.003 * I,");
omniout_str(ALWAYS, "0.001 + 0.001 * I,");
omniout_str(ALWAYS, "0.001 + 0.003 * I,");
omniout_str(ALWAYS, "0.0001 + 0.004 * I,");
omniout_str(ALWAYS, "0.003 + 0.006 * I,");
omniout_str(ALWAYS, "0.0001 + 0.005 * I,");
omniout_str(ALWAYS, "0.0001 + 0.003 * I,");
omniout_str(ALWAYS, "0.001 + 0.001 * I,");
omniout_str(ALWAYS, "0.001 + 0.003 * I,");
omniout_str(ALWAYS, "0.0001 + 0.004 * I,");
omniout_str(ALWAYS, "0.003 + 0.006 * I,");
omniout_str(ALWAYS, "0.0001 + 0.005 * I,");
omniout_str(ALWAYS, "0.0001 + 0.003 * I,");
omniout_str(ALWAYS, "0.001 + 0.001 * I,");
omniout_str(ALWAYS, "0.001 + 0.003 * I,");
omniout_str(ALWAYS, "0.0001 + 0.004 * I,");
omniout_str(ALWAYS, "0.003 + 0.006 * I,");
omniout_str(ALWAYS, "0.0001 + 0.005 * I,");
omniout_str(ALWAYS, "0.0001 + 0.003 * I,");
omniout_str(ALWAYS, "0.001 + 0.001 * I,");
omniout_str(ALWAYS, "0.0001 + 0.004 * I,");
omniout_str(ALWAYS, "0.003 + 0.006 * I,");
omniout_str(ALWAYS, "0.0001 + 0.005 * I,");
omniout_str(ALWAYS, "0.0001 + 0.003 * I,");
omniout_str(ALWAYS, "0.001 + 0.001 * I,");
omniout_str(ALWAYS, "0.001 + 0.003 * I,");
omniout_str(ALWAYS, "0.0001 + 0.004 * I,");
omniout_str(ALWAYS, "0.003 + 0.006 * I,");
omniout_str(ALWAYS, "0.0001 + 0.005 * I,");
omniout_str(ALWAYS, "0.0001 + 0.003 * I,");
omniout_str(ALWAYS, "0.001 + 0.001 * I,");
omniout_str(ALWAYS, "0.001 + 0.003 * I,");
omniout_str(ALWAYS, "0.0001 + 0.004 * I,");
omniout_str(ALWAYS, "0.003 + 0.006 * I,");
omniout_str(ALWAYS, "0.0001 + 0.005 * I,");
omniout_str(ALWAYS, "0.0001 + 0.003 * I,");
omniout_str(ALWAYS, "0.001 + 0.001 * I,");
omniout_str(ALWAYS, "0.001 + 0.003 * I,");
omniout_str(ALWAYS, "0.0001 + 0.004 * I,");
omniout_str(ALWAYS, "0.003 + 0.006 * I,");
omniout_str(ALWAYS, "0.0001 + 0.005 * I,");
omniout_str(ALWAYS, "0.0001 + 0.003 * I,");
omniout_str(ALWAYS, "0.001 + 0.001 * I,");
omniout_str(ALWAYS, "0.001 + 0.003 * I,");
omniout_str(ALWAYS, "0.0001 + 0.004 * I,");
omniout_str(ALWAYS, "0.003 + 0.006 * I,");
omniout_str(ALWAYS, "0.0001 + 0.005 * I,");
omniout_str(ALWAYS, "0.0001 + 0.003 * I,");
omniout_str(ALWAYS, "0.001 + 0.001 * I,");
omniout_str(ALWAYS, "0.0001 + 0.004 * I,");
omniout_str(ALWAYS, "0.003 + 0.006 * I,");
omniout_str(ALWAYS, "0.0001 + 0.005 * I,");
omniout_str(ALWAYS, "0.0001 + 0.003 * I,");
omniout_str(ALWAYS, "0.001 + 0.001 * I,");
omniout_str(ALWAYS, "0.001 + 0.003 * I,");
omniout_str(ALWAYS, "0.0001 + 0.004 * I,");
omniout_str(ALWAYS, "0.003 + 0.006 * I,");
omniout_str(ALWAYS, "0.0001 + 0.005 * I,");
omniout_str(ALWAYS, "0.0001 + 0.003 * I,");
omniout_str(ALWAYS, "0.001 + 0.001 * I,");
omniout_str(ALWAYS, "0.001 + 0.003 * I,");
omniout_str(ALWAYS, "0.0001 + 0.004 * I,");
omniout_str(ALWAYS, "0.003 + 0.006 * I,");
omniout_str(ALWAYS, "0.0001 + 0.005 * I,");
omniout_str(ALWAYS, "0.0001 + 0.003 * I,");
omniout_str(ALWAYS, "0.001 + 0.001 * I,");
omniout_str(ALWAYS, "0.001 + 0.003 * I,");
omniout_str(ALWAYS, "0.0001 + 0.004 * I,");
omniout_str(ALWAYS, "0.003 + 0.006 * I,");
omniout_str(ALWAYS, "0.0001 + 0.005 * I,");
omniout_str(ALWAYS, "0.0001 + 0.003 * I,");
omniout_str(ALWAYS, "0.001 + 0.001 * I,");
omniout_str(ALWAYS, "0.001 + 0.003 * I,");
omniout_str(ALWAYS, "0.0001 + 0.004 * I,");
omniout_str(ALWAYS, "0.003 + 0.006 * I,");
omniout_str(ALWAYS, "0.0001 + 0.005 * I,");
omniout_str(ALWAYS, "0.0001 + 0.003 * I,");
omniout_str(ALWAYS, "0.001 + 0.001 * I,");
omniout_str(ALWAYS, "0.0001 + 0.004 * I,");
omniout_str(ALWAYS, "0.003 + 0.006 * I,");
omniout_str(ALWAYS, "0.0001 + 0.005 * I,");
omniout_str(ALWAYS, "0.0001 + 0.003 * I,");
omniout_str(ALWAYS, "0.001 + 0.001 * I,");
omniout_str(ALWAYS, "0.001 + 0.003 * I,");
omniout_str(ALWAYS, "0.0001 + 0.004 * I,");
omniout_str(ALWAYS, "0.003 + 0.006 * I,");
omniout_str(ALWAYS, "0.0001 + 0.005 * I,");
omniout_str(ALWAYS, "0.0001 + 0.003 * I,");
omniout_str(ALWAYS, "0.001 + 0.001 * I,");
omniout_str(ALWAYS, "0.001 + 0.003 * I,");
omniout_str(ALWAYS, "0.0001 + 0.004 * I,");
omniout_str(ALWAYS, "0.003 + 0.006 * I,");
omniout_str(ALWAYS, "0.0001 + 0.005 * I,");
omniout_str(ALWAYS, "0.0001 + 0.003 * I,");
omniout_str(ALWAYS, "0.001 + 0.001 * I,");
omniout_str(ALWAYS, "0.001 + 0.003 * I,");
omniout_str(ALWAYS, "0.0001 + 0.004 * I,");
omniout_str(ALWAYS, "0.003 + 0.006 * I,");
omniout_str(ALWAYS, "0.0001 + 0.005 * I,");
omniout_str(ALWAYS, "0.0001 + 0.003 * I,");
omniout_str(ALWAYS, "0.001 + 0.001 * I,");
omniout_str(ALWAYS, "0.001 + 0.003 * I,");
omniout_str(ALWAYS, "0.0001 + 0.004 * I,");
omniout_str(ALWAYS, "0.003 + 0.006 * I,");
omniout_str(ALWAYS, "0.0001 + 0.005 * I,");
omniout_str(ALWAYS, "0.0001 + 0.003 * I,");
omniout_str(ALWAYS, "0.001 + 0.001 * I,");
omniout_str(ALWAYS, "0.0001 + 0.004 * I,");
omniout_str(ALWAYS, "0.003 + 0.006 * I,");
omniout_str(ALWAYS, "0.0001 + 0.005 * I,");
omniout_str(ALWAYS, "0.0001 + 0.003 * I,");
omniout_str(ALWAYS, "0.001 + 0.001 * I,");
omniout_str(ALWAYS, "0.001 + 0.003 * I,");
omniout_str(ALWAYS, "0.0001 + 0.004 * I,");
omniout_str(ALWAYS, "0.003 + 0.006 * I,");
omniout_str(ALWAYS, "0.0001 + 0.005 * I,");
omniout_str(ALWAYS, "0.0001 + 0.003 * I,");
omniout_str(ALWAYS, "0.001 + 0.001 * I,");
omniout_str(ALWAYS, "0.001 + 0.003 * I,");
omniout_str(ALWAYS, "0.0001 + 0.004 * I,");
omniout_str(ALWAYS, "0.003 + 0.006 * I,");
omniout_str(ALWAYS, "0.0001 + 0.005 * I,");
omniout_str(ALWAYS, "0.0001 + 0.003 * I,");
omniout_str(ALWAYS, "0.001 + 0.001 * I,");
omniout_str(ALWAYS, "0.001 + 0.003 * I,");
omniout_str(ALWAYS, "0.0001 + 0.004 * I,");
omniout_str(ALWAYS, "0.003 + 0.006 * I,");
omniout_str(ALWAYS, "0.0001 + 0.005 * I,");
omniout_str(ALWAYS, "0.0001 + 0.003 * I,");
omniout_str(ALWAYS, "0.001 + 0.001 * I,");
omniout_str(ALWAYS, "0.001 + 0.003 * I,");
omniout_str(ALWAYS, "0.0001 + 0.004 * I,");
omniout_str(ALWAYS, "0.003 + 0.006 * I,");
omniout_str(ALWAYS, "0.0001 + 0.005 * I,");
omniout_str(ALWAYS, "0.0001 + 0.003 * I,");
omniout_str(ALWAYS, "0.001 + 0.001 * I,");
omniout_str(ALWAYS, "0.0001 + 0.004 * I,");
omniout_str(ALWAYS, "0.003 + 0.006 * I,");
omniout_str(ALWAYS, "0.0001 + 0.005 * I,");
omniout_str(ALWAYS, "0.0001 + 0.003 * I,");
omniout_str(ALWAYS, "0.001 + 0.001 * I,");
omniout_str(ALWAYS, "0.001 + 0.003 * I,");
omniout_str(ALWAYS, "0.0001 + 0.004 * I,");
omniout_str(ALWAYS, "0.003 + 0.006 * I,");
omniout_str(ALWAYS, "0.0001 + 0.005 * I,");
omniout_str(ALWAYS, "0.0001 + 0.003 * I,");
omniout_str(ALWAYS, "0.001 + 0.001 * I,");
omniout_str(ALWAYS, "0.001 + 0.003 * I,");
omniout_str(ALWAYS, "0.0001 + 0.004 * I,");
omniout_str(ALWAYS, "0.003 + 0.006 * I,");
omniout_str(ALWAYS, "0.0001 + 0.005 * I,");
omniout_str(ALWAYS, "0.0001 + 0.003 * I,");
omniout_str(ALWAYS, "0.001 + 0.001 * I,");
omniout_str(ALWAYS, "0.001 + 0.003 * I,");
omniout_str(ALWAYS, "0.0001 + 0.004 * I,");
omniout_str(ALWAYS, "0.003 + 0.006 * I,");
omniout_str(ALWAYS, "0.0001 + 0.005 * I,");
omniout_str(ALWAYS, "0.0001 + 0.003 * I,");
omniout_str(ALWAYS, "0.001 + 0.001 * I,");
omniout_str(ALWAYS, "0.001 + 0.003 * I,");
omniout_str(ALWAYS, "0.0001 + 0.004 * I,");
omniout_str(ALWAYS, "0.003 + 0.006 * I,");
omniout_str(ALWAYS, "0.0001 + 0.005 * I,");
omniout_str(ALWAYS, "0.0001 + 0.003 * I,");
omniout_str(ALWAYS, "0.001 + 0.001 * I,");
omniout_str(ALWAYS, "0.0001 + 0.004 * I,");
omniout_str(ALWAYS, "0.003 + 0.006 * I,");
omniout_str(ALWAYS, "0.0001 + 0.005 * I,");
omniout_str(ALWAYS, "0.0001 + 0.003 * I,");
omniout_str(ALWAYS, "0.001 + 0.001 * I,");
omniout_str(ALWAYS, "0.001 + 0.003 * I,");
omniout_str(ALWAYS, "0.0001 + 0.004 * I,");
omniout_str(ALWAYS, "0.003 + 0.006 * I,");
omniout_str(ALWAYS, "0.0001 + 0.005 * I,");
omniout_str(ALWAYS, "0.0001 + 0.003 * I,");
omniout_str(ALWAYS, "0.001 + 0.001 * I,");
omniout_str(ALWAYS, "0.001 + 0.003 * I,");
omniout_str(ALWAYS, "0.0001 + 0.004 * I,");
omniout_str(ALWAYS, "0.003 + 0.006 * I,");
omniout_str(ALWAYS, "0.0001 + 0.005 * I,");
omniout_str(ALWAYS, "0.0001 + 0.003 * I,");
omniout_str(ALWAYS, "0.001 + 0.001 * I,");
omniout_str(ALWAYS, "0.001 + 0.003 * I,");
omniout_str(ALWAYS, "0.0001 + 0.004 * I,");
omniout_str(ALWAYS, "0.003 + 0.006 * I,");
omniout_str(ALWAYS, "0.0001 + 0.005 * I,");
omniout_str(ALWAYS, "0.0001 + 0.003 * I,");
omniout_str(ALWAYS, "0.001 + 0.001 * I,");
omniout_str(ALWAYS, "0.001 + 0.003 * I,");
omniout_str(ALWAYS, "0.0001 + 0.004 * I,");
omniout_str(ALWAYS, "0.003 + 0.006 * I,");
omniout_str(ALWAYS, "0.0001 + 0.005 * I,");
omniout_str(ALWAYS, "0.0001 + 0.003 * I,");
omniout_str(ALWAYS, "0.001 + 0.001 * I,");
omniout_str(ALWAYS, "0.0001 + 0.004 * I,");
omniout_str(ALWAYS, "0.003 + 0.006 * I,");
omniout_str(ALWAYS, "0.0001 + 0.005 * I,");
omniout_str(ALWAYS, "0.0001 + 0.003 * I,");
omniout_str(ALWAYS, "0.001 + 0.001 * I,");
omniout_str(ALWAYS, "0.001 + 0.003 * I,");
omniout_str(ALWAYS, "0.0001 + 0.004 * I,");
omniout_str(ALWAYS, "0.003 + 0.006 * I,");
omniout_str(ALWAYS, "0.0001 + 0.005 * I,");
omniout_str(ALWAYS, "0.0001 + 0.003 * I,");
omniout_str(ALWAYS, "0.001 + 0.001 * I,");
omniout_str(ALWAYS, "0.001 + 0.003 * I,");
omniout_str(ALWAYS, "0.0001 + 0.004 * I,");
omniout_str(ALWAYS, "0.003 + 0.006 * I,");
omniout_str(ALWAYS, "0.0001 + 0.005 * I,");
omniout_str(ALWAYS, "0.0001 + 0.003 * I,");
omniout_str(ALWAYS, "0.001 + 0.001 * I,");
omniout_str(ALWAYS, "0.001 + 0.003 * I,");
omniout_str(ALWAYS, "0.0001 + 0.004 * I,");
omniout_str(ALWAYS, "0.003 + 0.006 * I,");
omniout_str(ALWAYS, "0.0001 + 0.005 * I,");
omniout_str(ALWAYS, "0.0001 + 0.003 * I,");
omniout_str(ALWAYS, "0.001 + 0.001 * I,");
omniout_str(ALWAYS, "0.001 + 0.003 * I,");
omniout_str(ALWAYS, "0.0001 + 0.004 * I,");
omniout_str(ALWAYS, "0.003 + 0.006 * I,");
omniout_str(ALWAYS, "0.0001 + 0.005 * I,");
omniout_str(ALWAYS, "0.0001 + 0.003 * I,");
omniout_str(ALWAYS, "0.001 + 0.001 * I,");
omniout_str(ALWAYS, "0.0001 + 0.004 * I,");
omniout_str(ALWAYS, "0.003 + 0.006 * I,");
omniout_str(ALWAYS, "0.0001 + 0.005 * I,");
omniout_str(ALWAYS, "0.0001 + 0.003 * I,");
omniout_str(ALWAYS, "0.001 + 0.001 * I,");
omniout_str(ALWAYS, "0.001 + 0.003 * I,");
omniout_str(ALWAYS, "0.0001 + 0.004 * I,");
omniout_str(ALWAYS, "0.003 + 0.006 * I,");
omniout_str(ALWAYS, "0.0001 + 0.005 * I,");
omniout_str(ALWAYS, "0.0001 + 0.003 * I,");
omniout_str(ALWAYS, "0.001 + 0.001 * I,");
omniout_str(ALWAYS, "0.001 + 0.003 * I,");
omniout_str(ALWAYS, "0.0001 + 0.004 * I,");
omniout_str(ALWAYS, "0.003 + 0.006 * I,");
omniout_str(ALWAYS, "0.0001 + 0.005 * I,");
omniout_str(ALWAYS, "0.0001 + 0.003 * I,");
omniout_str(ALWAYS, "0.001 + 0.001 * I,");
omniout_str(ALWAYS, "0.001 + 0.003 * I,");
omniout_str(ALWAYS, "0.0001 + 0.004 * I,");
omniout_str(ALWAYS, "0.003 + 0.006 * I,");
omniout_str(ALWAYS, "0.0001 + 0.005 * I,");
omniout_str(ALWAYS, "0.0001 + 0.003 * I,");
omniout_str(ALWAYS, "0.001 + 0.001 * I,");
omniout_str(ALWAYS, "0.001 + 0.003 * I,");
omniout_str(ALWAYS, "0.0001 + 0.004 * I,");
omniout_str(ALWAYS, "0.003 + 0.006 * I,");
omniout_str(ALWAYS, "0.0001 + 0.005 * I,");
omniout_str(ALWAYS, "0.0001 + 0.003 * I,");
omniout_str(ALWAYS, "0.001 + 0.001 * I,");
omniout_str(ALWAYS, "0.001 + 0.003 * I,");
omniout_str(ALWAYS, "0.000 + 0.000 * I ];");
omniout_str(ALWAYS, "");
omniout_str(ALWAYS, "glob_nxt := glob_nxt + 1;");
omniout_str(ALWAYS, "it := x_delta[glob_nxt];");
omniout_str(ALWAYS, "return it;");
omniout_str(ALWAYS, "end;");
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 := glob__0;
glob_smallish_float := glob__0;
glob_large_float := c(0.10*10^101);
glob_larger_float := c(0.11*10^101);
glob_almost_1 := c(0.99);
x_start := 0.1 + 0.1*I;
x_end := 99.0 + 99.0*I;
array_y_init[1] := exact_soln_y(x_start);
glob_look_poles := false;
glob_type_given_pole := 3;
glob_desired_digits_correct := 8;
glob_max_minutes := 3.0;
glob_subiter_method := 3;
glob_max_iter := 10000;
glob_upper_ratio_limit := c(1.000001);
glob_lower_ratio_limit := c(0.999999);
glob_look_poles := true;
glob_h := c(0.001);
glob_display_interval := c(0.01);
glob_last_good_h := glob_h;
glob_max_sec := 60.0*glob_max_minutes + 3600.0*glob_max_hours;
found_h := true;
glob_h := next_delta();
if
float_abs(glob_min_pole_est)*glob_ratio_of_radius < float_abs(glob_h)
then
h_new := glob_check_sign*glob_min_pole_est*glob_ratio_of_radius;
omniout_str(ALWAYS, "SETTING H FOR POLE");
glob_h_reason := 6;
if glob_check_sign*h_new < glob_check_sign*glob_min_h then
omniout_str(ALWAYS, "SETTING H FOR MIN H");
h_new := glob_min_h;
glob_h_reason := 5
end if;
term := 1;
ratio := c(1.0);
while term <= ATS_MAX_TERMS do
array_y[term] := array_y[term]*ratio;
array_y_higher[1, term] := array_y_higher[1, term]*ratio;
array_x[term] := array_x[term]*ratio;
ratio := ratio*h_new/float_abs(glob_h);
term := term + 1
end do;
glob_h := h_new
end if;
if glob_html_log then html_log_file := fopen("entry.html", WRITE, TEXT)
end if;
found_h := true;
if found_h then
omniout_str(ALWAYS, "START of Soultion");
array_x[1] := c(x_start);
array_x[2] := c(glob_h);
glob_next_display := c(x_start);
glob_min_pole_est := glob_larger_float;
glob_least_given_sing := glob_larger_float;
glob_least_ratio_sing := glob_larger_float;
glob_least_3_sing := glob_larger_float;
glob_least_6_sing := glob_larger_float;
order_diff := 1;
term_no := 1;
while term_no <= order_diff do
array_y[term_no] := array_y_init[term_no]*
expt(glob_h, c(term_no - 1))/c(factorial_1(term_no - 1));
term_no := term_no + 1
end do;
rows := order_diff;
r_order := 1;
while r_order <= rows do
term_no := 1;
while term_no <= rows - r_order + 1 do
it := term_no + r_order - 1;
if term_no < ATS_MAX_TERMS then
array_y_higher[r_order, term_no] := array_y_init[it]*
expt(glob_h, c(term_no - 1))/
c(factorial_1(term_no - 1))
end if;
term_no := term_no + 1
end do;
r_order := r_order + 1
end do;
current_iter := 1;
glob_clock_start_sec := elapsed_time_seconds();
glob_clock_sec := elapsed_time_seconds();
glob_iter := 0;
omniout_str(DEBUGL, " ");
glob_reached_optimal_h := true;
found_h := true;
glob_h := next_delta();
if float_abs(glob_min_pole_est)*glob_ratio_of_radius <
float_abs(glob_h) then
h_new := glob_check_sign*glob_min_pole_est*glob_ratio_of_radius
;
omniout_str(ALWAYS, "SETTING H FOR POLE");
glob_h_reason := 6;
if glob_check_sign*h_new < glob_check_sign*glob_min_h then
omniout_str(ALWAYS, "SETTING H FOR MIN H");
h_new := glob_min_h;
glob_h_reason := 5
end if;
term := 1;
ratio := c(1.0);
while term <= ATS_MAX_TERMS do
array_y[term] := array_y[term]*ratio;
array_y_higher[1, term] := array_y_higher[1, term]*ratio;
array_x[term] := array_x[term]*ratio;
ratio := ratio*h_new/float_abs(glob_h);
term := term + 1
end do;
glob_h := h_new
end if;
glob_optimal_clock_start_sec := elapsed_time_seconds();
while glob_iter < glob_max_iter and
(glob_iter < 10 or not (Re(glob_h) = 0. and Im(glob_h) = 0.)) do
omniout_str(INFO, " ");
found_h := true;
glob_h := next_delta();
if float_abs(glob_min_pole_est)*glob_ratio_of_radius <
float_abs(glob_h) then
h_new :=
glob_check_sign*glob_min_pole_est*glob_ratio_of_radius;
omniout_str(ALWAYS, "SETTING H FOR POLE");
glob_h_reason := 6;
if glob_check_sign*h_new < glob_check_sign*glob_min_h then
omniout_str(ALWAYS, "SETTING H FOR MIN H");
h_new := glob_min_h;
glob_h_reason := 5
end if;
term := 1;
ratio := c(1.0);
while term <= ATS_MAX_TERMS do
array_y[term] := array_y[term]*ratio;
array_y_higher[1, term] :=
array_y_higher[1, term]*ratio;
array_x[term] := array_x[term]*ratio;
ratio := ratio*h_new/float_abs(glob_h);
term := term + 1
end do;
glob_h := h_new
end if;
glob_iter := glob_iter + 1;
glob_clock_sec := elapsed_time_seconds();
atomall();
if not (Re(glob_h) = 0. and Im(glob_h) = 0.) then
display_alot(current_iter)
end if;
if
glob_look_poles and not (Re(glob_h) = 0. and Im(glob_h) = 0.)
then check_for_pole()
end if;
glob_next_display := glob_next_display + glob_display_interval;
array_x[1] := array_x[1] + glob_h;
array_x[2] := glob_h;
order_diff := 2;
ord := 2;
calc_term := 1;
iii := ATS_MAX_TERMS;
while calc_term <= iii do
array_y_higher_work[2, iii] := array_y_higher[2, iii]/(
expt(glob_h, c(calc_term - 1))*
c(factorial_3(iii - calc_term, iii - 1)));
iii := iii - 1
end do;
temp_sum := glob__0;
ord := 2;
calc_term := 1;
iii := ATS_MAX_TERMS;
while calc_term <= iii do
temp_sum := temp_sum + array_y_higher_work[ord, iii];
iii := iii - 1
end do;
array_y_higher_work2[ord, calc_term] := temp_sum*
expt(glob_h, c(calc_term - 1))/
c(factorial_1(calc_term - 1));
ord := 1;
calc_term := 2;
iii := ATS_MAX_TERMS;
while calc_term <= iii do
array_y_higher_work[1, iii] := array_y_higher[1, iii]/(
expt(glob_h, c(calc_term - 1))*
c(factorial_3(iii - calc_term, iii - 1)));
iii := iii - 1
end do;
temp_sum := glob__0;
ord := 1;
calc_term := 2;
iii := ATS_MAX_TERMS;
while calc_term <= iii do
temp_sum := temp_sum + array_y_higher_work[ord, iii];
iii := iii - 1
end do;
array_y_higher_work2[ord, calc_term] := temp_sum*
expt(glob_h, c(calc_term - 1))/
c(factorial_1(calc_term - 1));
ord := 1;
calc_term := 1;
iii := ATS_MAX_TERMS;
while calc_term <= iii do
array_y_higher_work[1, iii] := array_y_higher[1, iii]/(
expt(glob_h, c(calc_term - 1))*
c(factorial_3(iii - calc_term, iii - 1)));
iii := iii - 1
end do;
temp_sum := glob__0;
ord := 1;
calc_term := 1;
iii := ATS_MAX_TERMS;
while calc_term <= iii do
temp_sum := temp_sum + array_y_higher_work[ord, iii];
iii := iii - 1
end do;
array_y_higher_work2[ord, calc_term] := temp_sum*
expt(glob_h, c(calc_term - 1))/
c(factorial_1(calc_term - 1));
term_no := ATS_MAX_TERMS;
while 1 <= term_no do
array_y[term_no] := array_y_higher_work2[1, term_no];
ord := 1;
while ord <= order_diff do
array_y_higher[ord, term_no] :=
array_y_higher_work2[ord, term_no];
ord := ord + 1
end do;
term_no := term_no - 1
end do
end do;
omniout_str(ALWAYS, "Finished!");
if glob_max_iter <= glob_iter then omniout_str(ALWAYS,
"Maximum Iterations Reached before Solution Completed!")
end if;
if glob_max_sec <= elapsed_time_seconds() - glob_orig_start_sec
then omniout_str(ALWAYS,
"Maximum Time Reached before Solution Completed!")
end if;
glob_clock_sec := elapsed_time_seconds();
omniout_str(INFO,
"diff ( y , x , 1 ) = cos ( 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, "2017-11-26T14:41:43-06:00");
logitem_str(html_log_file, "Maple");
logitem_str(html_log_file, "cos");
logitem_str(html_log_file,
"diff ( y , x , 1 ) = cos ( x ) ; ");
logitem_complex(html_log_file, x_start);
logitem_complex(html_log_file, x_end);
logitem_complex(html_log_file, array_x[1]);
logitem_complex(html_log_file, glob_h);
logitem_h_reason(html_log_file);
logitem_integer(html_log_file, Digits);
glob_desired_digits_correct := 0.;
logitem_float(html_log_file, glob_desired_digits_correct);
if array_est_digits[1] <> -16 then
logitem_integer(html_log_file, array_est_digits[1])
else logitem_str(html_log_file, "Unknown")
end if;
if glob_min_good_digits <> -16 then
logitem_integer(html_log_file, glob_min_good_digits)
else logitem_str(html_log_file, "Unknown")
end if;
if glob_good_digits <> -16 then
logitem_integer(html_log_file, glob_good_digits)
else logitem_str(html_log_file, "Unknown")
end if;
logitem_str(html_log_file, "NA");
logitem_str(html_log_file, "NA");
logitem_integer(html_log_file, ATS_MAX_TERMS);
if glob_type_given_pole = 0 then
logitem_str(html_log_file, "Not Given");
logitem_str(html_log_file, "NA")
elif glob_type_given_pole = 4 then
logitem_str(html_log_file, "No Solution");
logitem_str(html_log_file, "NA")
elif glob_type_given_pole = 5 then
logitem_str(html_log_file, "Some Pole");
logitem_str(html_log_file, "????")
elif glob_type_given_pole = 3 then
logitem_str(html_log_file, "No Pole");
logitem_str(html_log_file, "NA")
elif glob_type_given_pole = 1 then
logitem_str(html_log_file, "Real Sing");
logitem_float(html_log_file, glob_least_given_sing)
elif glob_type_given_pole = 2 then
logitem_str(html_log_file, "Complex Sing");
logitem_float(html_log_file, glob_least_given_sing)
end if;
if glob_least_ratio_sing < glob_large_float then
glob_least_ratio_sing := 0;
logitem_float(html_log_file, glob_least_ratio_sing)
else logitem_str(html_log_file, "NONE")
end if;
if glob_least_3_sing < glob_large_float then
logitem_float(html_log_file, glob_least_3_sing)
else logitem_str(html_log_file, "NONE")
end if;
if glob_least_6_sing < glob_large_float then
glob_least_6_sing := 0.;
logitem_float(html_log_file, glob_least_6_sing)
else logitem_str(html_log_file, "NONE")
end if;
logitem_integer(html_log_file, glob_iter);
logitem_time(html_log_file, glob_clock_sec);
if c(glob_percent_done) < glob__100 then
logitem_time(html_log_file, glob_total_exp_sec); 0
else logitem_str(html_log_file, "Done"); 0
end if;
log_revs(html_log_file, " 309 | ");
logitem_str(html_log_file,
"cos diffeq.mxt");
logitem_str(html_log_file,
"cos maple results");
logitem_str(html_log_file, "OK");
logend(html_log_file)
end if;
if glob_html_log then fclose(html_log_file) end if
end if
end proc
# End Function number 12
> main();
memory used=3.9MB, alloc=40.3MB, time=0.08
##############ECHO OF PROBLEM#################
##############temp/cospostcpx.cpx#################
diff ( y , x , 1 ) = cos ( x ) ;
!
#BEGIN FIRST INPUT BLOCK
Digits:=32;
max_terms:=40;
!
#END FIRST INPUT BLOCK
#BEGIN SECOND INPUT BLOCK
x_start := 0.1 + 0.1 * I;
x_end := 99.0 + 99.0 * I;
array_y_init[0 + 1] := exact_soln_y(x_start);
glob_look_poles := false;
glob_type_given_pole := 3;
#END SECOND INPUT BLOCK
#BEGIN OVERRIDE BLOCK
glob_desired_digits_correct:=8;
glob_max_minutes:=(3.0);
glob_subiter_method:=3;
glob_max_iter:=10000;
glob_upper_ratio_limit:=c(1.000001);
glob_lower_ratio_limit:=c(0.999999);
glob_look_poles:=true;
glob_h:=c(0.001);
glob_display_interval:=c(0.01);
#END OVERRIDE BLOCK
!
#BEGIN USER DEF BLOCK
exact_soln_y := proc(x)
return(c(1.0) + sin(c(x)));
end;
next_delta := proc()
global glob_nxt, x_delta;
x_delta := [ 0.001 + 0.00004 * I,
0.0001 + 0.004 * I,
0.003 + 0.006 * I,
0.0001 + 0.005 * I,
0.0001 + 0.003 * I,
0.001 + 0.001 * I,
0.001 + 0.003 * I,
0.0001 + 0.004 * I,
0.003 + 0.006 * I,
0.0001 + 0.005 * I,
0.0001 + 0.003 * I,
0.001 + 0.001 * I,
0.001 + 0.003 * I,
0.0001 + 0.004 * I,
0.003 + 0.006 * I,
0.0001 + 0.005 * I,
0.0001 + 0.003 * I,
0.001 + 0.001 * I,
0.001 + 0.003 * I,
0.0001 + 0.004 * I,
0.003 + 0.006 * I,
0.0001 + 0.005 * I,
0.0001 + 0.003 * I,
0.001 + 0.001 * I,
0.001 + 0.003 * I,
0.0001 + 0.004 * I,
0.003 + 0.006 * I,
0.0001 + 0.005 * I,
0.0001 + 0.003 * I,
0.001 + 0.001 * I,
0.0001 + 0.004 * I,
0.003 + 0.006 * I,
0.0001 + 0.005 * I,
0.0001 + 0.003 * I,
0.001 + 0.001 * I,
0.001 + 0.003 * I,
0.0001 + 0.004 * I,
0.003 + 0.006 * I,
0.0001 + 0.005 * I,
0.0001 + 0.003 * I,
0.001 + 0.001 * I,
0.001 + 0.003 * I,
0.0001 + 0.004 * I,
0.003 + 0.006 * I,
0.0001 + 0.005 * I,
0.0001 + 0.003 * I,
0.001 + 0.001 * I,
0.001 + 0.003 * I,
0.0001 + 0.004 * I,
0.003 + 0.006 * I,
0.0001 + 0.005 * I,
0.0001 + 0.003 * I,
0.001 + 0.001 * I,
0.001 + 0.003 * I,
0.0001 + 0.004 * I,
0.003 + 0.006 * I,
0.0001 + 0.005 * I,
0.0001 + 0.003 * I,
0.001 + 0.001 * I,
0.0001 + 0.004 * I,
0.003 + 0.006 * I,
0.0001 + 0.005 * I,
0.0001 + 0.003 * I,
0.001 + 0.001 * I,
0.001 + 0.003 * I,
0.0001 + 0.004 * I,
0.003 + 0.006 * I,
0.0001 + 0.005 * I,
0.0001 + 0.003 * I,
0.001 + 0.001 * I,
0.001 + 0.003 * I,
0.0001 + 0.004 * I,
0.003 + 0.006 * I,
0.0001 + 0.005 * I,
0.0001 + 0.003 * I,
0.001 + 0.001 * I,
0.001 + 0.003 * I,
0.0001 + 0.004 * I,
0.003 + 0.006 * I,
0.0001 + 0.005 * I,
0.0001 + 0.003 * I,
0.001 + 0.001 * I,
0.001 + 0.003 * I,
0.0001 + 0.004 * I,
0.003 + 0.006 * I,
0.0001 + 0.005 * I,
0.0001 + 0.003 * I,
0.001 + 0.001 * I,
0.0001 + 0.004 * I,
0.003 + 0.006 * I,
0.0001 + 0.005 * I,
0.0001 + 0.003 * I,
0.001 + 0.001 * I,
0.001 + 0.003 * I,
0.0001 + 0.004 * I,
0.003 + 0.006 * I,
0.0001 + 0.005 * I,
0.0001 + 0.003 * I,
0.001 + 0.001 * I,
0.001 + 0.003 * I,
0.0001 + 0.004 * I,
0.003 + 0.006 * I,
0.0001 + 0.005 * I,
0.0001 + 0.003 * I,
0.001 + 0.001 * I,
0.001 + 0.003 * I,
0.0001 + 0.004 * I,
0.003 + 0.006 * I,
0.0001 + 0.005 * I,
0.0001 + 0.003 * I,
0.001 + 0.001 * I,
0.001 + 0.003 * I,
0.0001 + 0.004 * I,
0.003 + 0.006 * I,
0.0001 + 0.005 * I,
0.0001 + 0.003 * I,
0.001 + 0.001 * I,
0.0001 + 0.004 * I,
0.003 + 0.006 * I,
0.0001 + 0.005 * I,
0.0001 + 0.003 * I,
0.001 + 0.001 * I,
0.001 + 0.003 * I,
0.0001 + 0.004 * I,
0.003 + 0.006 * I,
0.0001 + 0.005 * I,
0.0001 + 0.003 * I,
0.001 + 0.001 * I,
0.001 + 0.003 * I,
0.0001 + 0.004 * I,
0.003 + 0.006 * I,
0.0001 + 0.005 * I,
0.0001 + 0.003 * I,
0.001 + 0.001 * I,
0.001 + 0.003 * I,
0.0001 + 0.004 * I,
0.003 + 0.006 * I,
0.0001 + 0.005 * I,
0.0001 + 0.003 * I,
0.001 + 0.001 * I,
0.001 + 0.003 * I,
0.0001 + 0.004 * I,
0.003 + 0.006 * I,
0.0001 + 0.005 * I,
0.0001 + 0.003 * I,
0.001 + 0.001 * I,
0.0001 + 0.004 * I,
0.003 + 0.006 * I,
0.0001 + 0.005 * I,
0.0001 + 0.003 * I,
0.001 + 0.001 * I,
0.001 + 0.003 * I,
0.0001 + 0.004 * I,
0.003 + 0.006 * I,
0.0001 + 0.005 * I,
0.0001 + 0.003 * I,
0.001 + 0.001 * I,
0.001 + 0.003 * I,
0.0001 + 0.004 * I,
0.003 + 0.006 * I,
0.0001 + 0.005 * I,
0.0001 + 0.003 * I,
0.001 + 0.001 * I,
0.001 + 0.003 * I,
0.0001 + 0.004 * I,
0.003 + 0.006 * I,
0.0001 + 0.005 * I,
0.0001 + 0.003 * I,
0.001 + 0.001 * I,
0.001 + 0.003 * I,
0.0001 + 0.004 * I,
0.003 + 0.006 * I,
0.0001 + 0.005 * I,
0.0001 + 0.003 * I,
0.001 + 0.001 * I,
0.0001 + 0.004 * I,
0.003 + 0.006 * I,
0.0001 + 0.005 * I,
0.0001 + 0.003 * I,
0.001 + 0.001 * I,
0.001 + 0.003 * I,
0.0001 + 0.004 * I,
0.0001 + 0.004 * I,
0.003 + 0.006 * I,
0.0001 + 0.005 * I,
0.0001 + 0.003 * I,
0.001 + 0.001 * I,
0.001 + 0.003 * I,
0.0001 + 0.004 * I,
0.003 + 0.006 * I,
0.0001 + 0.005 * I,
0.0001 + 0.003 * I,
0.001 + 0.001 * I,
0.001 + 0.003 * I,
0.0001 + 0.004 * I,
0.003 + 0.006 * I,
0.0001 + 0.005 * I,
0.0001 + 0.003 * I,
0.001 + 0.001 * I,
0.001 + 0.003 * I,
0.0001 + 0.004 * I,
0.003 + 0.006 * I,
0.0001 + 0.005 * I,
0.0001 + 0.003 * I,
0.001 + 0.001 * I,
0.001 + 0.003 * I,
0.0001 + 0.004 * I,
0.003 + 0.006 * I,
0.0001 + 0.005 * I,
0.0001 + 0.003 * I,
0.001 + 0.001 * I,
0.0001 + 0.004 * I,
0.003 + 0.006 * I,
0.0001 + 0.005 * I,
0.0001 + 0.003 * I,
0.001 + 0.001 * I,
0.001 + 0.003 * I,
0.0001 + 0.004 * I,
0.003 + 0.006 * I,
0.0001 + 0.005 * I,
0.0001 + 0.003 * I,
0.001 + 0.001 * I,
0.001 + 0.003 * I,
0.0001 + 0.004 * I,
0.003 + 0.006 * I,
0.0001 + 0.005 * I,
0.0001 + 0.003 * I,
0.001 + 0.001 * I,
0.001 + 0.003 * I,
0.0001 + 0.004 * I,
0.003 + 0.006 * I,
0.0001 + 0.005 * I,
0.0001 + 0.003 * I,
0.001 + 0.001 * I,
0.001 + 0.003 * I,
0.0001 + 0.004 * I,
0.003 + 0.006 * I,
0.0001 + 0.005 * I,
0.0001 + 0.003 * I,
0.001 + 0.001 * I,
0.0001 + 0.004 * I,
0.003 + 0.006 * I,
0.0001 + 0.005 * I,
0.0001 + 0.003 * I,
0.001 + 0.001 * I,
0.001 + 0.003 * I,
0.0001 + 0.004 * I,
0.003 + 0.006 * I,
0.0001 + 0.005 * I,
0.0001 + 0.003 * I,
0.001 + 0.001 * I,
0.001 + 0.003 * I,
0.0001 + 0.004 * I,
0.003 + 0.006 * I,
0.0001 + 0.005 * I,
0.0001 + 0.003 * I,
0.001 + 0.001 * I,
0.001 + 0.003 * I,
0.0001 + 0.004 * I,
0.003 + 0.006 * I,
0.0001 + 0.005 * I,
0.0001 + 0.003 * I,
0.001 + 0.001 * I,
0.001 + 0.003 * I,
0.0001 + 0.004 * I,
0.003 + 0.006 * I,
0.0001 + 0.005 * I,
0.0001 + 0.003 * I,
0.001 + 0.001 * I,
0.0001 + 0.004 * I,
0.003 + 0.006 * I,
0.0001 + 0.005 * I,
0.0001 + 0.003 * I,
0.001 + 0.001 * I,
0.001 + 0.003 * I,
0.0001 + 0.004 * I,
0.003 + 0.006 * I,
0.0001 + 0.005 * I,
0.0001 + 0.003 * I,
0.001 + 0.001 * I,
0.001 + 0.003 * I,
0.0001 + 0.004 * I,
0.003 + 0.006 * I,
0.0001 + 0.005 * I,
0.0001 + 0.003 * I,
0.001 + 0.001 * I,
0.001 + 0.003 * I,
0.0001 + 0.004 * I,
0.003 + 0.006 * I,
0.0001 + 0.005 * I,
0.0001 + 0.003 * I,
0.001 + 0.001 * I,
0.001 + 0.003 * I,
0.0001 + 0.004 * I,
0.003 + 0.006 * I,
0.0001 + 0.005 * I,
0.0001 + 0.003 * I,
0.001 + 0.001 * I,
0.0001 + 0.004 * I,
0.003 + 0.006 * I,
0.0001 + 0.005 * I,
0.0001 + 0.003 * I,
0.001 + 0.001 * I,
0.001 + 0.003 * I,
0.0001 + 0.004 * I,
0.003 + 0.006 * I,
0.0001 + 0.005 * I,
0.0001 + 0.003 * I,
0.001 + 0.001 * I,
0.001 + 0.003 * I,
0.0001 + 0.004 * I,
0.003 + 0.006 * I,
0.0001 + 0.005 * I,
0.0001 + 0.003 * I,
0.001 + 0.001 * I,
0.001 + 0.003 * I,
0.0001 + 0.004 * I,
0.003 + 0.006 * I,
0.0001 + 0.005 * I,
0.0001 + 0.003 * I,
0.001 + 0.001 * I,
0.001 + 0.003 * I,
0.0001 + 0.004 * I,
0.003 + 0.006 * I,
0.0001 + 0.005 * I,
0.0001 + 0.003 * I,
0.001 + 0.001 * I,
0.0001 + 0.004 * I,
0.003 + 0.006 * I,
0.0001 + 0.005 * I,
0.0001 + 0.003 * I,
0.001 + 0.001 * I,
0.001 + 0.003 * I,
0.0001 + 0.004 * I,
0.003 + 0.006 * I,
0.0001 + 0.005 * I,
0.0001 + 0.003 * I,
0.001 + 0.001 * I,
0.001 + 0.003 * I,
0.0001 + 0.004 * I,
0.003 + 0.006 * I,
0.0001 + 0.005 * I,
0.0001 + 0.003 * I,
0.001 + 0.001 * I,
0.001 + 0.003 * I,
0.0001 + 0.004 * I,
0.003 + 0.006 * I,
0.0001 + 0.005 * I,
0.0001 + 0.003 * I,
0.001 + 0.001 * I,
0.001 + 0.003 * I,
0.0001 + 0.004 * I,
0.003 + 0.006 * I,
0.0001 + 0.005 * I,
0.0001 + 0.003 * I,
0.001 + 0.001 * I,
0.003 + 0.006 * I,
0.0001 + 0.005 * I,
0.0001 + 0.003 * I,
0.001 + 0.001 * I,
0.001 + 0.003 * I,
0.0001 + 0.004 * I,
0.003 + 0.006 * I,
0.0001 + 0.005 * I,
0.0001 + 0.003 * I,
0.001 + 0.001 * I,
0.001 + 0.003 * I,
0.0001 + 0.004 * I,
0.003 + 0.006 * I,
0.0001 + 0.005 * I,
0.0001 + 0.003 * I,
0.001 + 0.001 * I,
0.001 + 0.003 * I,
0.0001 + 0.004 * I,
0.003 + 0.006 * I,
0.0001 + 0.005 * I,
0.0001 + 0.003 * I,
0.001 + 0.001 * I,
0.0001 + 0.004 * I,
0.003 + 0.006 * I,
0.0001 + 0.005 * I,
0.0001 + 0.003 * I,
0.001 + 0.001 * I,
0.001 + 0.003 * I,
0.0001 + 0.004 * I,
0.003 + 0.006 * I,
0.0001 + 0.005 * I,
0.0001 + 0.003 * I,
0.001 + 0.001 * I,
0.001 + 0.003 * I,
0.0001 + 0.004 * I,
0.003 + 0.006 * I,
0.0001 + 0.005 * I,
0.0001 + 0.003 * I,
0.001 + 0.001 * I,
0.001 + 0.003 * I,
0.0001 + 0.004 * I,
0.003 + 0.006 * I,
0.0001 + 0.005 * I,
0.0001 + 0.003 * I,
0.001 + 0.001 * I,
0.001 + 0.003 * I,
0.0001 + 0.004 * I,
0.003 + 0.006 * I,
0.0001 + 0.005 * I,
0.0001 + 0.003 * I,
0.001 + 0.001 * I,
0.0001 + 0.004 * I,
0.003 + 0.006 * I,
0.0001 + 0.005 * I,
0.0001 + 0.003 * I,
0.001 + 0.001 * I,
0.001 + 0.003 * I,
0.0001 + 0.004 * I,
0.003 + 0.006 * I,
0.0001 + 0.005 * I,
0.0001 + 0.003 * I,
0.001 + 0.001 * I,
0.001 + 0.003 * I,
0.0001 + 0.004 * I,
0.003 + 0.006 * I,
0.0001 + 0.005 * I,
0.0001 + 0.003 * I,
0.001 + 0.001 * I,
0.001 + 0.003 * I,
0.0001 + 0.004 * I,
0.003 + 0.006 * I,
0.0001 + 0.005 * I,
0.0001 + 0.003 * I,
0.001 + 0.001 * I,
0.001 + 0.003 * I,
0.0001 + 0.004 * I,
0.003 + 0.006 * I,
0.0001 + 0.005 * I,
0.0001 + 0.003 * I,
0.001 + 0.001 * I,
0.0001 + 0.004 * I,
0.003 + 0.006 * I,
0.0001 + 0.005 * I,
0.0001 + 0.003 * I,
0.001 + 0.001 * I,
0.001 + 0.003 * I,
0.0001 + 0.004 * I,
0.003 + 0.006 * I,
0.0001 + 0.005 * I,
0.0001 + 0.003 * I,
0.001 + 0.001 * I,
0.001 + 0.003 * I,
0.0001 + 0.004 * I,
0.003 + 0.006 * I,
0.0001 + 0.005 * I,
0.0001 + 0.003 * I,
0.001 + 0.001 * I,
0.001 + 0.003 * I,
0.0001 + 0.004 * I,
0.003 + 0.006 * I,
0.0001 + 0.005 * I,
0.0001 + 0.003 * I,
0.001 + 0.001 * I,
0.001 + 0.003 * I,
0.0001 + 0.004 * I,
0.003 + 0.006 * I,
0.0001 + 0.005 * I,
0.0001 + 0.003 * I,
0.001 + 0.001 * I,
0.0001 + 0.004 * I,
0.003 + 0.006 * I,
0.0001 + 0.005 * I,
0.0001 + 0.003 * I,
0.001 + 0.001 * I,
0.001 + 0.003 * I,
0.0001 + 0.004 * I,
0.003 + 0.006 * I,
0.0001 + 0.005 * I,
0.0001 + 0.003 * I,
0.001 + 0.001 * I,
0.001 + 0.003 * I,
0.0001 + 0.004 * I,
0.003 + 0.006 * I,
0.0001 + 0.005 * I,
0.0001 + 0.003 * I,
0.001 + 0.001 * I,
0.001 + 0.003 * I,
0.0001 + 0.004 * I,
0.003 + 0.006 * I,
0.0001 + 0.005 * I,
0.0001 + 0.003 * I,
0.001 + 0.001 * I,
0.001 + 0.003 * I,
0.0001 + 0.004 * I,
0.003 + 0.006 * I,
0.0001 + 0.005 * I,
0.0001 + 0.003 * I,
0.001 + 0.001 * I,
0.0001 + 0.004 * I,
0.003 + 0.006 * I,
0.0001 + 0.005 * I,
0.0001 + 0.003 * I,
0.001 + 0.001 * I,
0.001 + 0.003 * I,
0.0001 + 0.004 * I,
0.003 + 0.006 * I,
0.0001 + 0.005 * I,
0.0001 + 0.003 * I,
0.001 + 0.001 * I,
0.001 + 0.003 * I,
0.0001 + 0.004 * I,
0.003 + 0.006 * I,
0.0001 + 0.005 * I,
0.0001 + 0.003 * I,
0.001 + 0.001 * I,
0.001 + 0.003 * I,
0.0001 + 0.004 * I,
0.003 + 0.006 * I,
0.0001 + 0.005 * I,
0.0001 + 0.003 * I,
0.001 + 0.001 * I,
0.001 + 0.003 * I,
0.0001 + 0.004 * I,
0.003 + 0.006 * I,
0.0001 + 0.005 * I,
0.0001 + 0.003 * I,
0.001 + 0.001 * I,
0.0001 + 0.004 * I,
0.003 + 0.006 * I,
0.0001 + 0.005 * I,
0.0001 + 0.003 * I,
0.001 + 0.001 * I,
0.001 + 0.003 * I,
0.0001 + 0.004 * I,
0.003 + 0.006 * I,
0.0001 + 0.005 * I,
0.0001 + 0.003 * I,
0.001 + 0.001 * I,
0.001 + 0.003 * I,
0.0001 + 0.004 * I,
0.003 + 0.006 * I,
0.0001 + 0.005 * I,
0.0001 + 0.003 * I,
0.001 + 0.001 * I,
0.001 + 0.003 * I,
0.0001 + 0.004 * I,
0.003 + 0.006 * I,
0.0001 + 0.005 * I,
0.0001 + 0.003 * I,
0.001 + 0.001 * I,
0.001 + 0.003 * I,
0.0001 + 0.004 * I,
0.003 + 0.006 * I,
0.0001 + 0.005 * I,
0.0001 + 0.003 * I,
0.001 + 0.001 * I,
0.0001 + 0.004 * I,
0.003 + 0.006 * I,
0.0001 + 0.005 * I,
0.0001 + 0.003 * I,
0.001 + 0.001 * I,
0.001 + 0.003 * I,
0.0001 + 0.004 * I,
0.003 + 0.006 * I,
0.0001 + 0.005 * I,
0.0001 + 0.003 * I,
0.001 + 0.001 * I,
0.001 + 0.003 * I,
0.0001 + 0.004 * I,
0.003 + 0.006 * I,
0.0001 + 0.005 * I,
0.0001 + 0.003 * I,
0.001 + 0.001 * I,
0.001 + 0.003 * I,
0.0001 + 0.004 * I,
0.003 + 0.006 * I,
0.0001 + 0.005 * I,
0.0001 + 0.003 * I,
0.001 + 0.001 * I,
0.001 + 0.003 * I,
0.0001 + 0.004 * I,
0.003 + 0.006 * I,
0.0001 + 0.005 * I,
0.0001 + 0.003 * I,
0.001 + 0.001 * I,
0.0001 + 0.004 * I,
0.003 + 0.006 * I,
0.0001 + 0.005 * I,
0.0001 + 0.003 * I,
0.001 + 0.001 * I,
0.001 + 0.003 * I,
0.0001 + 0.004 * I,
0.003 + 0.006 * I,
0.0001 + 0.005 * I,
0.0001 + 0.003 * I,
0.001 + 0.001 * I,
0.001 + 0.003 * I,
0.0001 + 0.004 * I,
0.003 + 0.006 * I,
0.0001 + 0.005 * I,
0.0001 + 0.003 * I,
0.001 + 0.001 * I,
0.001 + 0.003 * I,
0.0001 + 0.004 * I,
0.003 + 0.006 * I,
0.0001 + 0.005 * I,
0.0001 + 0.003 * I,
0.001 + 0.001 * I,
0.001 + 0.003 * I,
0.0001 + 0.004 * I,
0.003 + 0.006 * I,
0.0001 + 0.005 * I,
0.0001 + 0.003 * I,
0.001 + 0.001 * I,
0.0001 + 0.004 * I,
0.003 + 0.006 * I,
0.0001 + 0.005 * I,
0.0001 + 0.003 * I,
0.001 + 0.001 * I,
0.001 + 0.003 * I,
0.0001 + 0.004 * I,
0.003 + 0.006 * I,
0.0001 + 0.005 * I,
0.0001 + 0.003 * I,
0.001 + 0.001 * I,
0.001 + 0.003 * I,
0.0001 + 0.004 * I,
0.003 + 0.006 * I,
0.0001 + 0.005 * I,
0.0001 + 0.003 * I,
0.001 + 0.001 * I,
0.001 + 0.003 * I,
0.0001 + 0.004 * I,
0.003 + 0.006 * I,
0.0001 + 0.005 * I,
0.0001 + 0.003 * I,
0.001 + 0.001 * I,
0.001 + 0.003 * I,
0.0001 + 0.004 * I,
0.003 + 0.006 * I,
0.0001 + 0.005 * I,
0.0001 + 0.003 * I,
0.001 + 0.001 * I,
0.0001 + 0.004 * I,
0.003 + 0.006 * I,
0.0001 + 0.005 * I,
0.0001 + 0.003 * I,
0.001 + 0.001 * I,
0.001 + 0.003 * I,
0.0001 + 0.004 * I,
0.003 + 0.006 * I,
0.0001 + 0.005 * I,
0.0001 + 0.003 * I,
0.001 + 0.001 * I,
0.001 + 0.003 * I,
0.0001 + 0.004 * I,
0.003 + 0.006 * I,
0.0001 + 0.005 * I,
0.0001 + 0.003 * I,
0.001 + 0.001 * I,
0.001 + 0.003 * I,
0.0001 + 0.004 * I,
0.003 + 0.006 * I,
0.0001 + 0.005 * I,
0.0001 + 0.003 * I,
0.001 + 0.001 * I,
0.001 + 0.003 * I,
0.0001 + 0.004 * I,
0.003 + 0.006 * I,
0.0001 + 0.005 * I,
0.0001 + 0.003 * I,
0.001 + 0.001 * I,
0.0001 + 0.004 * I,
0.003 + 0.006 * I,
0.0001 + 0.005 * I,
0.0001 + 0.003 * I,
0.001 + 0.001 * I,
0.001 + 0.003 * I,
0.0001 + 0.004 * I,
0.003 + 0.006 * I,
0.0001 + 0.005 * I,
0.0001 + 0.003 * I,
0.001 + 0.001 * I,
0.001 + 0.003 * I,
0.0001 + 0.004 * I,
0.003 + 0.006 * I,
0.0001 + 0.005 * I,
0.0001 + 0.003 * I,
0.001 + 0.001 * I,
0.001 + 0.003 * I,
0.0001 + 0.004 * I,
0.003 + 0.006 * I,
0.0001 + 0.005 * I,
0.0001 + 0.003 * I,
0.001 + 0.001 * I,
0.001 + 0.003 * I,
0.0001 + 0.004 * I,
0.003 + 0.006 * I,
0.0001 + 0.005 * I,
0.0001 + 0.003 * I,
0.001 + 0.001 * I,
0.0001 + 0.004 * I,
0.003 + 0.006 * I,
0.0001 + 0.005 * I,
0.0001 + 0.003 * I,
0.001 + 0.001 * I,
0.001 + 0.003 * I,
0.0001 + 0.004 * I,
0.003 + 0.006 * I,
0.0001 + 0.005 * I,
0.0001 + 0.003 * I,
0.001 + 0.001 * I,
0.001 + 0.003 * I,
0.0001 + 0.004 * I,
0.003 + 0.006 * I,
0.0001 + 0.005 * I,
0.0001 + 0.003 * I,
0.001 + 0.001 * I,
0.001 + 0.003 * I,
0.0001 + 0.004 * I,
0.003 + 0.006 * I,
0.0001 + 0.005 * I,
0.0001 + 0.003 * I,
0.001 + 0.001 * I,
0.001 + 0.003 * I,
0.0001 + 0.004 * I,
0.003 + 0.006 * I,
0.0001 + 0.005 * I,
0.0001 + 0.003 * I,
0.001 + 0.001 * I,
0.0001 + 0.004 * I,
0.003 + 0.006 * I,
0.0001 + 0.005 * I,
0.0001 + 0.003 * I,
0.001 + 0.001 * I,
0.001 + 0.003 * I,
0.0001 + 0.004 * I,
0.003 + 0.006 * I,
0.0001 + 0.005 * I,
0.0001 + 0.003 * I,
0.001 + 0.001 * I,
0.001 + 0.003 * I,
0.0001 + 0.004 * I,
0.003 + 0.006 * I,
0.0001 + 0.005 * I,
0.0001 + 0.003 * I,
0.001 + 0.001 * I,
0.001 + 0.003 * I,
0.0001 + 0.004 * I,
0.003 + 0.006 * I,
0.0001 + 0.005 * I,
0.0001 + 0.003 * I,
0.001 + 0.001 * I,
0.001 + 0.003 * I,
0.0001 + 0.004 * I,
0.003 + 0.006 * I,
0.0001 + 0.005 * I,
0.0001 + 0.003 * I,
0.001 + 0.001 * I,
0.001 + 0.003 * I,
0.000 + 0.000 * I ];
glob_nxt := glob_nxt + 1;
it := x_delta[glob_nxt];
return it;
end;
#END USER DEF BLOCK
#######END OF ECHO OF PROBLEM#################
START of Soultion
x[1] = 0.1 0.1
h = 0.0001 0.005
y[1] (numeric) = 1.10033299984 0.0996663334921
y[1] (closed_form) = 1.10033299984 0.0996663334921
absolute error = 0
relative error = 0 %
Correct digits = 30
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
Radius of convergence (three term test) for eq 1 = 0.1768
Order of pole (three term test) = 33 0
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.1001 0.105
h = 0.0001 0.003
y[1] (numeric) = 1.10048404687 0.104666214478
y[1] (closed_form) = 1.10048430307 0.104666466122
absolute error = 3.591e-07
relative error = 3.249e-05 %
Correct digits = 6
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
Radius of convergence (three term test) for eq 1 = 0.08713
Order of pole (three term test) = 33 0
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.1002 0.108
h = 0.001 0.001
y[1] (numeric) = 1.10061642807 0.107667372382
y[1] (closed_form) = 1.1006163718 0.107667312081
absolute error = 8.247e-08
relative error = 7.458e-06 %
Correct digits = 7
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
Radius of convergence (three term test) for eq 1 = 0.06949
Order of pole (three term test) = 33 0
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.1012 0.109
h = 0.001 0.003
y[1] (numeric) = 1.10162835954 0.10865734198
y[1] (closed_form) = 1.10162809688 0.108657179181
absolute error = 3.090e-07
relative error = 2.792e-05 %
Correct digits = 7
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
Radius of convergence (three term test) for eq 1 = 0.333
Order of pole (three term test) = 33 0
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.1022 0.112
h = 0.0001 0.004
y[1] (numeric) = 1.10266258049 0.111648612063
y[1] (closed_form) = 1.10266273475 0.111648676907
absolute error = 1.673e-07
relative error = 1.510e-05 %
Correct digits = 7
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
Radius of convergence (three term test) for eq 1 = 0.1921
Order of pole (three term test) = 33 0
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.1023 0.116
h = 0.003 0.006
y[1] (numeric) = 1.10280933992 0.11565202749
y[1] (closed_form) = 1.10280950546 0.115652505773
absolute error = 5.061e-07
relative error = 4.564e-05 %
Correct digits = 6
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
Radius of convergence (three term test) for eq 1 = 0.2598
Order of pole (three term test) = 33 0
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.1053 0.122
h = 0.0001 0.005
y[1] (numeric) = 1.10588694876 0.121625981193
y[1] (closed_form) = 1.10588867776 0.121625440337
absolute error = 1.812e-06
relative error = 0.0001628 %
Correct digits = 6
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
Radius of convergence (three term test) for eq 1 = 0.1205
Order of pole (three term test) = 33 0
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.1054 0.127
h = 0.0001 0.003
y[1] (numeric) = 1.10605396131 0.126635052668
y[1] (closed_form) = 1.10605452381 0.126634997662
absolute error = 5.652e-07
relative error = 5.077e-05 %
Correct digits = 6
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
Radius of convergence (three term test) for eq 1 = 0.0994
Order of pole (three term test) = 33 0
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.1055 0.13
h = 0.001 0.001
y[1] (numeric) = 1.10619524697 0.129642075453
y[1] (closed_form) = 1.10619547806 0.129641643138
absolute error = 4.902e-07
relative error = 4.401e-05 %
Correct digits = 6
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
Radius of convergence (three term test) for eq 1 = 0.07919
Order of pole (three term test) = 33.01 0
NO COMPLEX POLE (six term test) for Equation 1
memory used=29.3MB, alloc=40.3MB, time=0.37
x[1] = 0.1065 0.131
h = 0.001 0.003
y[1] (numeric) = 1.10721218657 0.130631226941
y[1] (closed_form) = 1.10721219109 0.130630663334
absolute error = 5.636e-07
relative error = 5.055e-05 %
Correct digits = 6
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
Radius of convergence (three term test) for eq 1 = 0.379
Order of pole (three term test) = 33.01 0
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.1075 0.134
h = 0.0001 0.004
y[1] (numeric) = 1.10825732938 0.133625812774
y[1] (closed_form) = 1.10825778955 0.133625537144
absolute error = 5.364e-07
relative error = 4.805e-05 %
Correct digits = 6
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
Radius of convergence (three term test) for eq 1 = 0.2183
Order of pole (three term test) = 33.01 0
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.1076 0.138
h = 0.003 0.006
y[1] (numeric) = 1.10841626308 0.137637606152
y[1] (closed_form) = 1.10841670753 0.137637798716
absolute error = 4.844e-07
relative error = 4.337e-05 %
Correct digits = 6
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
Radius of convergence (three term test) for eq 1 = 0.2949
Order of pole (three term test) = 33.01 0
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.1106 0.144
h = 0.0001 0.005
y[1] (numeric) = 1.11151872349 0.143616159917
y[1] (closed_form) = 1.11152099795 0.143615303875
absolute error = 2.430e-06
relative error = 0.0002168 %
Correct digits = 6
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
Radius of convergence (three term test) for eq 1 = 0.1361
Order of pole (three term test) = 33.01 0
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.1107 0.149
h = 0.0001 0.003
y[1] (numeric) = 1.11170169665 0.148636911962
y[1] (closed_form) = 1.11170263074 0.148636531188
absolute error = 1.009e-06
relative error = 8.994e-05 %
Correct digits = 6
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
Radius of convergence (three term test) for eq 1 = 0.1122
Order of pole (three term test) = 33.01 0
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.1108 0.152
h = 0.001 0.001
y[1] (numeric) = 1.11185265246 0.151651137647
y[1] (closed_form) = 1.11185323598 0.151650314108
absolute error = 1.009e-06
relative error = 8.994e-05 %
Correct digits = 6
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
Radius of convergence (three term test) for eq 1 = 0.08927
Order of pole (three term test) = 33.01 0
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.1118 0.153
h = 0.001 0.003
y[1] (numeric) = 1.11287529454 0.152639684834
y[1] (closed_form) = 1.11287563116 0.152638701201
absolute error = 1.040e-06
relative error = 9.255e-05 %
Correct digits = 6
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
Radius of convergence (three term test) for eq 1 = 0.4269
Order of pole (three term test) = 33.01 0
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.1128 0.156
h = 0.0001 0.004
y[1] (numeric) = 1.1139325341 0.155638707971
y[1] (closed_form) = 1.1139333654 0.155638072673
absolute error = 1.046e-06
relative error = 9.302e-05 %
Correct digits = 6
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
Radius of convergence (three term test) for eq 1 = 0.2455
Order of pole (three term test) = 33.01 0
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.1129 0.16
h = 0.003 0.006
y[1] (numeric) = 1.11410465014 0.159660671301
y[1] (closed_form) = 1.11410543881 0.159660559171
absolute error = 7.966e-07
relative error = 7.078e-05 %
Correct digits = 6
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
Radius of convergence (three term test) for eq 1 = 0.3312
Order of pole (three term test) = 33.01 0
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.1159 0.166
h = 0.0001 0.005
y[1] (numeric) = 1.11723477092 0.165645827339
y[1] (closed_form) = 1.11723765674 0.165644636231
absolute error = 3.122e-06
relative error = 0.0002764 %
Correct digits = 6
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
Radius of convergence (three term test) for eq 1 = 0.1524
Order of pole (three term test) = 33.01 0
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.116 0.171
h = 0.0001 0.003
y[1] (numeric) = 1.11743495903 0.170680506356
y[1] (closed_form) = 1.11743633012 0.170679780464
absolute error = 1.551e-06
relative error = 0.0001372 %
Correct digits = 6
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
Radius of convergence (three term test) for eq 1 = 0.1254
Order of pole (three term test) = 33.02 0
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.1161 0.174
h = 0.001 0.001
y[1] (numeric) = 1.1175963568 0.173703273991
y[1] (closed_form) = 1.11759735788 0.173702039755
absolute error = 1.589e-06
relative error = 0.0001405 %
Correct digits = 6
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
Radius of convergence (three term test) for eq 1 = 0.09967
Order of pole (three term test) = 33.02 0
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.1171 0.175
h = 0.001 0.003
y[1] (numeric) = 1.11862539813 0.174691429079
y[1] (closed_form) = 1.11862613185 0.174690005932
absolute error = 1.601e-06
relative error = 0.0001414 %
Correct digits = 6
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
Radius of convergence (three term test) for eq 1 = 0.4762
Order of pole (three term test) = 33.02 0
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.1181 0.178
h = 0.0001 0.004
y[1] (numeric) = 1.1196959159 0.177696010277
y[1] (closed_form) = 1.11969718362 0.177694995866
absolute error = 1.624e-06
relative error = 0.0001432 %
Correct digits = 6
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
Radius of convergence (three term test) for eq 1 = 0.2735
Order of pole (three term test) = 33.02 0
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.1182 0.182
h = 0.003 0.006
y[1] (numeric) = 1.11988223075 0.181729937123
y[1] (closed_form) = 1.11988342903 0.181729501103
absolute error = 1.275e-06
relative error = 0.0001124 %
Correct digits = 6
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
Radius of convergence (three term test) for eq 1 = 0.3686
Order of pole (three term test) = 33.02 0
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.1212 0.188
h = 0.0001 0.005
y[1] (numeric) = 1.12304283483 0.187723694202
y[1] (closed_form) = 1.12304639811 0.187722147852
absolute error = 3.884e-06
relative error = 0.0003411 %
Correct digits = 5
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
Radius of convergence (three term test) for eq 1 = 0.1691
Order of pole (three term test) = 33.02 0
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.1213 0.193
h = 0.0001 0.003
y[1] (numeric) = 1.12326150335 0.19277454893
y[1] (closed_form) = 1.12326337695 0.192773458308
absolute error = 2.168e-06
relative error = 0.0001902 %
Correct digits = 6
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
Radius of convergence (three term test) for eq 1 = 0.1389
Order of pole (three term test) = 33.02 0
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.1214 0.196
h = 0.001 0.001
y[1] (numeric) = 1.12343412162 0.195807199023
y[1] (closed_form) = 1.12343560549 0.195805534333
absolute error = 2.230e-06
relative error = 0.0001956 %
Correct digits = 6
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
Radius of convergence (three term test) for eq 1 = 0.1104
Order of pole (three term test) = 33.02 0
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.1224 0.197
h = 0.0001 0.004
y[1] (numeric) = 1.12447026183 0.196795172543
y[1] (closed_form) = 1.1244714577 0.196793290103
absolute error = 2.230e-06
relative error = 0.0001954 %
Correct digits = 6
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
Radius of convergence (three term test) for eq 1 = 0.6668
Order of pole (three term test) = 33.02 0
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.1225 0.201
h = 0.003 0.006
y[1] (numeric) = 1.1246689274 0.200840240842
y[1] (closed_form) = 1.12467055071 0.200839764217
absolute error = 1.692e-06
relative error = 0.0001481 %
Correct digits = 6
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
Radius of convergence (three term test) for eq 1 = 0.4014
Order of pole (three term test) = 33.02 0
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.1255 0.207
h = 0.0001 0.005
y[1] (numeric) = 1.12785790831 0.206843408702
y[1] (closed_form) = 1.12786212822 0.206841797121
absolute error = 4.517e-06
relative error = 0.0003939 %
Correct digits = 5
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
Radius of convergence (three term test) for eq 1 = 0.1838
Order of pole (three term test) = 33.03 0
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.1256 0.212
h = 0.0001 0.003
y[1] (numeric) = 1.12809327757 0.211910230868
y[1] (closed_form) = 1.12809565679 0.211909065234
absolute error = 2.649e-06
relative error = 0.0002308 %
Correct digits = 6
memory used=73.5MB, alloc=52.3MB, time=0.91
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
Radius of convergence (three term test) for eq 1 = 0.1508
Order of pole (three term test) = 33.03 0
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.1257 0.215
h = 0.001 0.001
y[1] (numeric) = 1.12827604368 0.21495260874
y[1] (closed_form) = 1.12827801673 0.214950812089
absolute error = 2.668e-06
relative error = 0.0002323 %
Correct digits = 6
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
Radius of convergence (three term test) for eq 1 = 0.1198
Order of pole (three term test) = 33.03 0
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.1267 0.216
h = 0.001 0.003
y[1] (numeric) = 1.12931885581 0.215940689198
y[1] (closed_form) = 1.1293205233 0.215938649698
absolute error = 2.634e-06
relative error = 0.0002291 %
Correct digits = 6
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
Radius of convergence (three term test) for eq 1 = 0.5716
Order of pole (three term test) = 33.03 0
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.1277 0.219
h = 0.0001 0.004
y[1] (numeric) = 1.13041715374 0.218958785582
y[1] (closed_form) = 1.13041942861 0.218957267869
absolute error = 2.735e-06
relative error = 0.0002375 %
Correct digits = 6
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
Radius of convergence (three term test) for eq 1 = 0.3277
Order of pole (three term test) = 33.03 0
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.1278 0.223
h = 0.003 0.006
y[1] (numeric) = 1.13063243395 0.223019953321
y[1] (closed_form) = 1.13063458912 0.223019117204
absolute error = 2.312e-06
relative error = 0.0002006 %
Correct digits = 6
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
Radius of convergence (three term test) for eq 1 = 0.4407
Order of pole (three term test) = 33.03 0
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.1308 0.229
h = 0.0001 0.005
y[1] (numeric) = 1.13385717094 0.229035467278
y[1] (closed_form) = 1.13386219218 0.229033462834
absolute error = 5.407e-06
relative error = 0.0004674 %
Correct digits = 5
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
Radius of convergence (three term test) for eq 1 = 0.2013
Order of pole (three term test) = 33.03 0
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.1309 0.234
h = 0.0001 0.003
y[1] (numeric) = 1.13411338172 0.234122673681
y[1] (closed_form) = 1.13411638602 0.234121106838
absolute error = 3.388e-06
relative error = 0.0002926 %
Correct digits = 6
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
Radius of convergence (three term test) for eq 1 = 0.1651
Order of pole (three term test) = 33.04 0
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.131 0.237
h = 0.001 0.001
y[1] (numeric) = 1.13430882127 0.237177443232
y[1] (closed_form) = 1.13431139908 0.237175179306
absolute error = 3.431e-06
relative error = 0.0002961 %
Correct digits = 6
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
Radius of convergence (three term test) for eq 1 = 0.131
Order of pole (three term test) = 33.04 0
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.132 0.238
h = 0.001 0.003
y[1] (numeric) = 1.13536004042 0.238165737626
y[1] (closed_form) = 1.1353622917 0.238163201941
absolute error = 3.391e-06
relative error = 0.0002923 %
Correct digits = 6
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
Radius of convergence (three term test) for eq 1 = 0.6248
Order of pole (three term test) = 33.04 0
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.133 0.241
h = 0.0001 0.004
y[1] (numeric) = 1.1364750264 0.241192610387
y[1] (closed_form) = 1.13647792542 0.241190657123
absolute error = 3.496e-06
relative error = 0.0003009 %
Correct digits = 6
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
Radius of convergence (three term test) for eq 1 = 0.3579
Order of pole (three term test) = 33.04 0
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.1331 0.245
h = 0.003 0.006
y[1] (numeric) = 1.136707446 0.245270898951
y[1] (closed_form) = 1.13671019882 0.245269683389
absolute error = 3.009e-06
relative error = 0.0002588 %
Correct digits = 6
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
Radius of convergence (three term test) for eq 1 = 0.4809
Order of pole (three term test) = 33.04 0
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.1361 0.251
h = 0.0001 0.005
y[1] (numeric) = 1.13997081223 0.251300749549
y[1] (closed_form) = 1.13997670163 0.251298331088
absolute error = 6.367e-06
relative error = 0.0005454 %
Correct digits = 5
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
Radius of convergence (three term test) for eq 1 = 0.2193
Order of pole (three term test) = 33.04 0
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.1362 0.256
h = 0.0001 0.003
y[1] (numeric) = 1.14024916778 0.256410599809
y[1] (closed_form) = 1.14025286316 0.256408611272
absolute error = 4.196e-06
relative error = 0.0003591 %
Correct digits = 5
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
Radius of convergence (three term test) for eq 1 = 0.1796
Order of pole (three term test) = 33.05 0
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.1363 0.259
h = 0.001 0.001
y[1] (numeric) = 1.14045808229 0.259479108199
y[1] (closed_form) = 1.14046133051 0.259476356295
absolute error = 4.257e-06
relative error = 0.000364 %
Correct digits = 5
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
Radius of convergence (three term test) for eq 1 = 0.1425
Order of pole (three term test) = 33.05 0
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.1373 0.26
h = 0.001 0.003
y[1] (numeric) = 1.14151841824 0.26046782195
y[1] (closed_form) = 1.14152131872 0.26046476933
absolute error = 4.211e-06
relative error = 0.0003596 %
Correct digits = 5
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
Radius of convergence (three term test) for eq 1 = 0.6793
Order of pole (three term test) = 33.05 0
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.1383 0.263
h = 0.0001 0.004
y[1] (numeric) = 1.14265130653 0.263504591075
y[1] (closed_form) = 1.14265489557 0.263502181622
absolute error = 4.323e-06
relative error = 0.0003686 %
Correct digits = 5
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
Radius of convergence (three term test) for eq 1 = 0.3888
Order of pole (three term test) = 33.05 0
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.1384 0.267
h = 0.003 0.006
y[1] (numeric) = 1.14290192262 0.267601805643
y[1] (closed_form) = 1.14290533905 0.267600190372
absolute error = 3.779e-06
relative error = 0.0003219 %
Correct digits = 5
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
Radius of convergence (three term test) for eq 1 = 0.5221
Order of pole (three term test) = 33.05 0
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.1414 0.273
h = 0.0001 0.005
y[1] (numeric) = 1.14620681219 0.273647980954
y[1] (closed_form) = 1.14621363686 0.273645126931
absolute error = 7.397e-06
relative error = 0.0006277 %
Correct digits = 5
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
Radius of convergence (three term test) for eq 1 = 0.2377
Order of pole (three term test) = 33.05 0
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.1415 0.278
h = 0.0001 0.003
y[1] (numeric) = 1.14650863113 0.278782739851
y[1] (closed_form) = 1.14651308381 0.278780308783
absolute error = 5.073e-06
relative error = 0.00043 %
Correct digits = 5
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
Radius of convergence (three term test) for eq 1 = 0.1946
Order of pole (three term test) = 33.06 0
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.1416 0.281
h = 0.001 0.001
y[1] (numeric) = 1.14673183148 0.28186633736
y[1] (closed_form) = 1.14673581594 0.281863076396
absolute error = 5.149e-06
relative error = 0.000436 %
Correct digits = 5
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
Radius of convergence (three term test) for eq 1 = 0.1542
Order of pole (three term test) = 33.06 0
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.1426 0.282
h = 0.001 0.003
y[1] (numeric) = 1.14780199824 0.282855673957
y[1] (closed_form) = 1.14780561354 0.282852083264
absolute error = 5.095e-06
relative error = 0.000431 %
Correct digits = 5
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
Radius of convergence (three term test) for eq 1 = 0.7352
Order of pole (three term test) = 33.06 0
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.1436 0.285
h = 0.0001 0.004
y[1] (numeric) = 1.14895401357 0.285903459768
y[1] (closed_form) = 1.14895835871 0.285900573122
absolute error = 5.217e-06
relative error = 0.0004406 %
Correct digits = 5
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
Radius of convergence (three term test) for eq 1 = 0.4206
Order of pole (three term test) = 33.06 0
NO COMPLEX POLE (six term test) for Equation 1
memory used=117.5MB, alloc=52.3MB, time=1.48
x[1] = 0.1437 0.289
h = 0.003 0.006
y[1] (numeric) = 1.14922389597 0.290021409906
y[1] (closed_form) = 1.14922804219 0.290019374322
absolute error = 4.619e-06
relative error = 0.0003897 %
Correct digits = 5
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
Radius of convergence (three term test) for eq 1 = 0.5644
Order of pole (three term test) = 33.06 0
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.1467 0.295
h = 0.0001 0.005
y[1] (numeric) = 1.15257322573 0.296085895759
y[1] (closed_form) = 1.15258105312 0.296082584212
absolute error = 8.499e-06
relative error = 0.0007142 %
Correct digits = 5
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
Radius of convergence (three term test) for eq 1 = 0.2566
Order of pole (three term test) = 33.06 0
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.1468 0.3
h = 0.0001 0.003
y[1] (numeric) = 1.15289984318 0.301247833958
y[1] (closed_form) = 1.15290511962 0.301244939142
absolute error = 6.018e-06
relative error = 0.0005051 %
Correct digits = 5
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
Radius of convergence (three term test) for eq 1 = 0.2099
Order of pole (three term test) = 33.07 0
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.1469 0.303
h = 0.001 0.001
y[1] (numeric) = 1.15313815028 0.304347874414
y[1] (closed_form) = 1.15314293705 0.304344082905
absolute error = 6.106e-06
relative error = 0.000512 %
Correct digits = 5
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
Radius of convergence (three term test) for eq 1 = 0.1663
Order of pole (three term test) = 33.07 0
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.1479 0.304
h = 0.0001 0.004
y[1] (numeric) = 1.15421886649 0.305338035336
y[1] (closed_form) = 1.15422326242 0.305333885021
absolute error = 6.046e-06
relative error = 0.0005064 %
Correct digits = 5
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
Radius of convergence (three term test) for eq 1 = 1.003
Order of pole (three term test) = 33.07 0
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.148 0.308
h = 0.003 0.006
y[1] (numeric) = 1.15450527272 0.309474322642
y[1] (closed_form) = 1.15451009707 0.309472283621
absolute error = 5.238e-06
relative error = 0.0004382 %
Correct digits = 5
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
Radius of convergence (three term test) for eq 1 = 0.6016
Order of pole (three term test) = 33.07 0
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.151 0.314
h = 0.0001 0.005
y[1] (numeric) = 1.15789495927 0.315556735362
y[1] (closed_form) = 1.15790370128 0.315553390472
absolute error = 9.360e-06
relative error = 0.0007799 %
Correct digits = 5
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
Radius of convergence (three term test) for eq 1 = 0.2733
Order of pole (three term test) = 33.07 0
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.1511 0.319
h = 0.0001 0.003
y[1] (numeric) = 1.15824364432 0.320744209279
y[1] (closed_form) = 1.15824968056 0.320741274242
absolute error = 6.712e-06
relative error = 0.0005585 %
Correct digits = 5
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
Radius of convergence (three term test) for eq 1 = 0.2234
Order of pole (three term test) = 33.08 0
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.1512 0.322
h = 0.001 0.001
y[1] (numeric) = 1.15849540247 0.323859683865
y[1] (closed_form) = 1.158500931 0.32385579414
absolute error = 6.760e-06
relative error = 0.0005619 %
Correct digits = 5
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
Radius of convergence (three term test) for eq 1 = 0.1769
Order of pole (three term test) = 33.08 0
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.1522 0.323
h = 0.001 0.003
y[1] (numeric) = 1.15958576552 0.324850851495
y[1] (closed_form) = 1.15959088471 0.324846577615
absolute error = 6.669e-06
relative error = 0.0005538 %
Correct digits = 5
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
Radius of convergence (three term test) for eq 1 = 0.843
Order of pole (three term test) = 33.08 0
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.1532 0.326
h = 0.0001 0.004
y[1] (numeric) = 1.16077650804 0.327922383486
y[1] (closed_form) = 1.16078243448 0.327918927857
absolute error = 6.860e-06
relative error = 0.0005687 %
Correct digits = 5
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
Radius of convergence (three term test) for eq 1 = 0.4817
Order of pole (three term test) = 33.08 0
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.1533 0.33
h = 0.003 0.006
y[1] (numeric) = 1.16108483703 0.332084011564
y[1] (closed_form) = 1.16109051522 0.332081513707
absolute error = 6.203e-06
relative error = 0.0005137 %
Correct digits = 5
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
Radius of convergence (three term test) for eq 1 = 0.6459
Order of pole (three term test) = 33.08 0
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.1563 0.336
h = 0.0001 0.005
y[1] (numeric) = 1.16452443441 0.338188460264
y[1] (closed_form) = 1.16453430587 0.338184616598
absolute error = 1.059e-05
relative error = 0.0008736 %
Correct digits = 5
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
Radius of convergence (three term test) for eq 1 = 0.2931
Order of pole (three term test) = 33.09 0
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.1564 0.341
h = 0.0001 0.003
y[1] (numeric) = 1.16490042292 0.34340737322
y[1] (closed_form) = 1.16490740759 0.343403934662
absolute error = 7.785e-06
relative error = 0.000641 %
Correct digits = 5
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
Radius of convergence (three term test) for eq 1 = 0.2394
Order of pole (three term test) = 33.09 0
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.1565 0.344
h = 0.001 0.001
y[1] (numeric) = 1.16516882817 0.346541830904
y[1] (closed_form) = 1.16517528284 0.346537370287
absolute error = 7.846e-06
relative error = 0.0006454 %
Correct digits = 5
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
Radius of convergence (three term test) for eq 1 = 0.1896
Order of pole (three term test) = 33.09 0
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.1575 0.345
h = 0.001 0.003
y[1] (numeric) = 1.16627108917 0.347534200866
y[1] (closed_form) = 1.16627711233 0.347529326872
absolute error = 7.748e-06
relative error = 0.0006367 %
Correct digits = 5
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
Radius of convergence (three term test) for eq 1 = 0.9032
Order of pole (three term test) = 33.09 0
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.1585 0.348
h = 0.0001 0.004
y[1] (numeric) = 1.16748451422 0.350619973469
y[1] (closed_form) = 1.16749138741 0.350615979092
absolute error = 7.950e-06
relative error = 0.0006521 %
Correct digits = 5
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
Radius of convergence (three term test) for eq 1 = 0.5159
Order of pole (three term test) = 33.1 0
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.1586 0.352
h = 0.003 0.006
y[1] (numeric) = 1.16781522655 0.354807556554
y[1] (closed_form) = 1.1678218255 0.35480457816
absolute error = 7.240e-06
relative error = 0.0005932 %
Correct digits = 5
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
Radius of convergence (three term test) for eq 1 = 0.6914
Order of pole (three term test) = 33.1 0
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.1616 0.358
h = 0.0001 0.005
y[1] (numeric) = 1.17130772663 0.360936022216
y[1] (closed_form) = 1.17131879605 0.360931656483
absolute error = 1.190e-05
relative error = 0.0009708 %
Correct digits = 5
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
Radius of convergence (three term test) for eq 1 = 0.3135
Order of pole (three term test) = 33.1 0
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.1617 0.363
h = 0.0001 0.003
y[1] (numeric) = 1.17171240715 0.366188665945
y[1] (closed_form) = 1.17172040754 0.366184701432
absolute error = 8.929e-06
relative error = 0.0007273 %
Correct digits = 5
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
Radius of convergence (three term test) for eq 1 = 0.256
Order of pole (three term test) = 33.1 0
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.1618 0.366
h = 0.001 0.001
y[1] (numeric) = 1.17199831288 0.369343473202
y[1] (closed_form) = 1.17200576052 0.369338418916
absolute error = 9.001e-06
relative error = 0.0007325 %
Correct digits = 5
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
Radius of convergence (three term test) for eq 1 = 0.2026
Order of pole (three term test) = 33.11 0
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.1628 0.367
h = 0.001 0.003
y[1] (numeric) = 1.1731132058 0.370337240873
y[1] (closed_form) = 1.17312019947 0.370331743901
absolute error = 8.895e-06
relative error = 0.0007231 %
Correct digits = 5
memory used=161.6MB, alloc=52.3MB, time=2.00
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
Radius of convergence (three term test) for eq 1 = 0.965
Order of pole (three term test) = 33.11 0
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.1638 0.37
h = 0.0001 0.004
y[1] (numeric) = 1.17435058628 0.37343837797
y[1] (closed_form) = 1.17435847335 0.373433822183
absolute error = 9.108e-06
relative error = 0.0007391 %
Correct digits = 5
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
Radius of convergence (three term test) for eq 1 = 0.5511
Order of pole (three term test) = 33.11 0
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.1639 0.374
h = 0.003 0.006
y[1] (numeric) = 1.17470480935 0.377653748149
y[1] (closed_form) = 1.17471239629 0.377650267082
absolute error = 8.347e-06
relative error = 0.0006765 %
Correct digits = 5
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
Radius of convergence (three term test) for eq 1 = 0.7383
Order of pole (three term test) = 33.11 0
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.1669 0.38
h = 0.0001 0.005
y[1] (numeric) = 1.17825323369 0.383808210367
y[1] (closed_form) = 1.17826557003 0.383803298756
absolute error = 1.328e-05
relative error = 0.001072 %
Correct digits = 5
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
Radius of convergence (three term test) for eq 1 = 0.3345
Order of pole (three term test) = 33.12 0
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.167 0.385
h = 0.0001 0.003
y[1] (numeric) = 1.17868801574 0.389096885291
y[1] (closed_form) = 1.17869709951 0.389092371911
absolute error = 1.014e-05
relative error = 0.0008172 %
Correct digits = 5
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
Radius of convergence (three term test) for eq 1 = 0.273
Order of pole (three term test) = 33.12 0
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.1671 0.388
h = 0.001 0.001
y[1] (numeric) = 1.17899228806 0.39227341379
y[1] (closed_form) = 1.17900079581 0.392267742556
absolute error = 1.022e-05
relative error = 0.0008229 %
Correct digits = 5
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
Radius of convergence (three term test) for eq 1 = 0.216
Order of pole (three term test) = 33.12 0
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.1681 0.389
h = 0.001 0.003
y[1] (numeric) = 1.18012055299 0.393268772239
y[1] (closed_form) = 1.18012858398 0.393262628912
absolute error = 1.011e-05
relative error = 0.0008128 %
Correct digits = 5
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
Radius of convergence (three term test) for eq 1 = 1.029
Order of pole (three term test) = 33.12 0
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.1691 0.392
h = 0.0001 0.004
y[1] (numeric) = 1.18138317627 0.396386399129
y[1] (closed_form) = 1.18139214467 0.396381258778
absolute error = 1.034e-05
relative error = 0.0008295 %
Correct digits = 5
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
Radius of convergence (three term test) for eq 1 = 0.5872
Order of pole (three term test) = 33.12 0
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.1692 0.396
h = 0.003 0.006
y[1] (numeric) = 1.18176205467 0.400631395675
y[1] (closed_form) = 1.18177069718 0.400627389341
absolute error = 9.526e-06
relative error = 0.0007634 %
Correct digits = 5
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
Radius of convergence (three term test) for eq 1 = 0.7864
Order of pole (three term test) = 33.13 0
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.1722 0.402
h = 0.0001 0.005
y[1] (numeric) = 1.18536945642 0.406813832853
y[1] (closed_form) = 1.18538312907 0.40680835101
absolute error = 1.473e-05
relative error = 0.001175 %
Correct digits = 5
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
Radius of convergence (three term test) for eq 1 = 0.356
Order of pole (three term test) = 33.13 0
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.1723 0.407
h = 0.0001 0.003
y[1] (numeric) = 1.18583577164 0.4121408488
y[1] (closed_form) = 1.18584600679 0.41213576314
absolute error = 1.143e-05
relative error = 0.0009104 %
Correct digits = 5
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
Radius of convergence (three term test) for eq 1 = 0.2904
Order of pole (three term test) = 33.14 0
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.1724 0.41
h = 0.001 0.001
y[1] (numeric) = 1.18615929011 0.415340475832
y[1] (closed_form) = 1.18616892543 0.415334163842
absolute error = 1.152e-05
relative error = 0.0009165 %
Correct digits = 5
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
Radius of convergence (three term test) for eq 1 = 0.2298
Order of pole (three term test) = 33.14 0
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.1734 0.411
h = 0.0001 0.004
y[1] (numeric) = 1.18730167356 0.416337615733
y[1] (closed_form) = 1.18731080903 0.416330802141
absolute error = 1.140e-05
relative error = 0.0009058 %
Correct digits = 5
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
Radius of convergence (three term test) for eq 1 = 1.384
Order of pole (three term test) = 33.14 0
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.1735 0.415
h = 0.003 0.006
y[1] (numeric) = 1.18770152772 0.42060825298
y[1] (closed_form) = 1.18771110875 0.420604276634
absolute error = 1.037e-05
relative error = 0.0008233 %
Correct digits = 5
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
Radius of convergence (three term test) for eq 1 = 0.829
Order of pole (three term test) = 33.14 0
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.1765 0.421
h = 0.0001 0.005
y[1] (numeric) = 1.1913618003 0.426817106205
y[1] (closed_form) = 1.19137665525 0.426811617548
absolute error = 1.584e-05
relative error = 0.001251 %
Correct digits = 5
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
Radius of convergence (three term test) for eq 1 = 0.3751
Order of pole (three term test) = 33.15 0
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.1766 0.426
h = 0.0001 0.003
y[1] (numeric) = 1.19185592806 0.432179381449
y[1] (closed_form) = 1.19186718516 0.43217428577
absolute error = 1.236e-05
relative error = 0.0009747 %
Correct digits = 5
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
Radius of convergence (three term test) for eq 1 = 0.3059
Order of pole (three term test) = 33.15 0
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.1767 0.429
h = 0.001 0.001
y[1] (numeric) = 1.19219643048 0.435400242208
y[1] (closed_form) = 1.19220706764 0.43539386063
absolute error = 1.240e-05
relative error = 0.0009773 %
Correct digits = 5
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
Radius of convergence (three term test) for eq 1 = 0.242
Order of pole (three term test) = 33.15 0
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.1777 0.43
h = 0.001 0.003
y[1] (numeric) = 1.19335154546 0.436399246729
y[1] (closed_form) = 1.19336166296 0.436392337778
absolute error = 1.225e-05
relative error = 0.0009642 %
Correct digits = 5
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
Radius of convergence (three term test) for eq 1 = 1.152
Order of pole (three term test) = 33.15 0
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.1787 0.433
h = 0.0001 0.004
y[1] (numeric) = 1.19466439124 0.439550895679
y[1] (closed_form) = 1.19467552906 0.439545105871
absolute error = 1.255e-05
relative error = 0.0009861 %
Correct digits = 5
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
Radius of convergence (three term test) for eq 1 = 0.6574
Order of pole (three term test) = 33.16 0
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.1788 0.437
h = 0.003 0.006
y[1] (numeric) = 1.19509185172 0.443856269014
y[1] (closed_form) = 1.19510261529 0.44385172486
absolute error = 1.168e-05
relative error = 0.0009165 %
Correct digits = 5
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
Radius of convergence (three term test) for eq 1 = 0.8799
Order of pole (three term test) = 33.16 0
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.1818 0.443
h = 0.0001 0.005
y[1] (numeric) = 1.1988168497 0.450096813368
y[1] (closed_form) = 1.19883317169 0.450090708459
absolute error = 1.743e-05
relative error = 0.001361 %
Correct digits = 5
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
Radius of convergence (three term test) for eq 1 = 0.3979
Order of pole (three term test) = 33.16 0
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.1819 0.448
h = 0.0001 0.003
y[1] (numeric) = 1.19934520975 0.45550177292
y[1] (closed_form) = 1.19935774612 0.455496060783
absolute error = 1.378e-05
relative error = 0.001074 %
Correct digits = 5
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
Radius of convergence (three term test) for eq 1 = 0.3244
Order of pole (three term test) = 33.17 0
NO COMPLEX POLE (six term test) for Equation 1
memory used=205.8MB, alloc=52.3MB, time=2.52
x[1] = 0.182 0.451
h = 0.001 0.001
y[1] (numeric) = 1.19970661661 0.458748322321
y[1] (closed_form) = 1.19971850818 0.458741255002
absolute error = 1.383e-05
relative error = 0.001077 %
Correct digits = 5
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
Radius of convergence (three term test) for eq 1 = 0.2566
Order of pole (three term test) = 33.17 0
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.183 0.452
h = 0.001 0.003
y[1] (numeric) = 1.20087725559 0.459749465519
y[1] (closed_form) = 1.20088860374 0.459741841098
absolute error = 1.367e-05
relative error = 0.001063 %
Correct digits = 5
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
Radius of convergence (three term test) for eq 1 = 1.221
Order of pole (three term test) = 33.17 0
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.184 0.455
h = 0.0001 0.004
y[1] (numeric) = 1.20221910135 0.462920849198
y[1] (closed_form) = 1.20223151582 0.462914406448
absolute error = 1.399e-05
relative error = 0.001086 %
Correct digits = 5
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
Radius of convergence (three term test) for eq 1 = 0.6967
Order of pole (three term test) = 33.17 0
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.1841 0.459
h = 0.003 0.006
y[1] (numeric) = 1.20267457288 0.467261169827
y[1] (closed_form) = 1.20268658765 0.467256033816
absolute error = 1.307e-05
relative error = 0.001013 %
Correct digits = 5
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
Radius of convergence (three term test) for eq 1 = 0.9324
Order of pole (three term test) = 33.18 0
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.1871 0.465
h = 0.0001 0.005
y[1] (numeric) = 1.20646744997 0.473535381781
y[1] (closed_form) = 1.20648530983 0.473528634562
absolute error = 1.909e-05
relative error = 0.001473 %
Correct digits = 5
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
Radius of convergence (three term test) for eq 1 = 0.4215
Order of pole (three term test) = 33.18 0
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.1872 0.47
h = 0.0001 0.003
y[1] (numeric) = 1.20703154372 0.478985366661
y[1] (closed_form) = 1.20704542858 0.478979013072
absolute error = 1.527e-05
relative error = 0.001176 %
Correct digits = 5
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
Radius of convergence (three term test) for eq 1 = 0.3435
Order of pole (three term test) = 33.19 0
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.1873 0.473
h = 0.001 0.001
y[1] (numeric) = 1.20741477695 0.482259000594
y[1] (closed_form) = 1.20742799154 0.482251222072
absolute error = 1.533e-05
relative error = 0.001179 %
Correct digits = 5
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
Radius of convergence (three term test) for eq 1 = 0.2716
Order of pole (three term test) = 33.19 0
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.1883 0.474
h = 0.001 0.003
y[1] (numeric) = 1.20860170713 0.483262465899
y[1] (closed_form) = 1.20861435416 0.483254100418
absolute error = 1.516e-05
relative error = 0.001165 %
Correct digits = 5
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
Radius of convergence (three term test) for eq 1 = 1.293
Order of pole (three term test) = 33.19 0
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.1893 0.477
h = 0.0001 0.004
y[1] (numeric) = 1.20997390428 0.486454717271
y[1] (closed_form) = 1.20998766437 0.48644759628
absolute error = 1.549e-05
relative error = 0.001188 %
Correct digits = 5
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
Radius of convergence (three term test) for eq 1 = 0.7374
Order of pole (three term test) = 33.19 0
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.1894 0.481
h = 0.003 0.006
y[1] (numeric) = 1.21045860675 0.490831857821
y[1] (closed_form) = 1.21047194183 0.490826105342
absolute error = 1.452e-05
relative error = 0.001112 %
Correct digits = 5
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
Radius of convergence (three term test) for eq 1 = 0.9866
Order of pole (three term test) = 33.2 0
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.1924 0.487
h = 0.0001 0.005
y[1] (numeric) = 1.21432255547 0.497141713365
y[1] (closed_form) = 1.2143420246 0.497134297128
absolute error = 2.083e-05
relative error = 0.001588 %
Correct digits = 5
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
Radius of convergence (three term test) for eq 1 = 0.4458
Order of pole (three term test) = 33.2 0
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.1925 0.492
h = 0.0001 0.003
y[1] (numeric) = 1.21492391115 0.502639076789
y[1] (closed_form) = 1.21493921416 0.502632056145
absolute error = 1.684e-05
relative error = 0.001281 %
Correct digits = 5
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
Radius of convergence (three term test) for eq 1 = 0.3632
Order of pole (three term test) = 33.21 0
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.1926 0.495
h = 0.001 0.001
y[1] (numeric) = 1.21532990894 0.505941198401
y[1] (closed_form) = 1.21534451557 0.50593268258
absolute error = 1.691e-05
relative error = 0.001284 %
Correct digits = 5
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
Radius of convergence (three term test) for eq 1 = 0.2872
Order of pole (three term test) = 33.21 0
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.1936 0.496
h = 0.001 0.003
y[1] (numeric) = 1.2165339055 0.506947166504
y[1] (closed_form) = 1.21654792004 0.506938033732
absolute error = 1.673e-05
relative error = 0.001269 %
Correct digits = 5
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
Radius of convergence (three term test) for eq 1 = 1.367
Order of pole (three term test) = 33.21 0
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.1946 0.499
h = 0.0001 0.004
y[1] (numeric) = 1.21793782414 0.510161420967
y[1] (closed_form) = 1.21795299929 0.510153595812
absolute error = 1.707e-05
relative error = 0.001293 %
Correct digits = 5
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
Radius of convergence (three term test) for eq 1 = 0.7794
Order of pole (three term test) = 33.21 0
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.1947 0.503
h = 0.003 0.006
y[1] (numeric) = 1.21845299937 0.514577264036
y[1] (closed_form) = 1.21846772431 0.514570869889
absolute error = 1.605e-05
relative error = 0.001214 %
Correct digits = 5
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
Radius of convergence (three term test) for eq 1 = 1.043
Order of pole (three term test) = 33.22 0
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.1977 0.509
h = 0.0001 0.005
y[1] (numeric) = 1.22239125296 0.520924738836
y[1] (closed_form) = 1.22241240331 0.520916626191
absolute error = 2.265e-05
relative error = 0.001705 %
Correct digits = 5
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
Radius of convergence (three term test) for eq 1 = 0.4709
Order of pole (three term test) = 33.22 0
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.1978 0.514
h = 0.0001 0.003
y[1] (numeric) = 1.22303142681 0.52647184693
y[1] (closed_form) = 1.22304821813 0.526464132994
absolute error = 1.848e-05
relative error = 0.001388 %
Correct digits = 5
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
Radius of convergence (three term test) for eq 1 = 0.3836
Order of pole (three term test) = 33.23 0
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.1979 0.517
h = 0.001 0.001
y[1] (numeric) = 1.22346114438 0.529803867048
y[1] (closed_form) = 1.22347721254 0.529794587172
absolute error = 1.856e-05
relative error = 0.001392 %
Correct digits = 5
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
Radius of convergence (three term test) for eq 1 = 0.3033
Order of pole (three term test) = 33.23 0
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.1989 0.518
h = 0.0001 0.004
y[1] (numeric) = 1.22468299085 0.530812515798
y[1] (closed_form) = 1.22469844199 0.530802588836
absolute error = 1.837e-05
relative error = 0.001376 %
Correct digits = 5
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
Radius of convergence (three term test) for eq 1 = 1.826
Order of pole (three term test) = 33.23 0
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.199 0.522
h = 0.003 0.006
y[1] (numeric) = 1.22522396059 0.535261465502
y[1] (closed_form) = 1.22523989476 0.535255129962
absolute error = 1.715e-05
relative error = 0.001282 %
Correct digits = 5
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
Radius of convergence (three term test) for eq 1 = 1.092
Order of pole (three term test) = 33.24 0
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.202 0.528
h = 0.0001 0.005
y[1] (numeric) = 1.22922831478 0.541643841945
y[1] (closed_form) = 1.22925092786 0.541635742479
absolute error = 2.402e-05
relative error = 0.001788 %
Correct digits = 5
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
Radius of convergence (three term test) for eq 1 = 0.4932
Order of pole (three term test) = 33.24 0
NO COMPLEX POLE (six term test) for Equation 1
memory used=249.9MB, alloc=52.3MB, time=3.05
x[1] = 0.2021 0.533
h = 0.0001 0.003
y[1] (numeric) = 1.22990253941 0.547236161882
y[1] (closed_form) = 1.22992062582 0.547228462435
absolute error = 1.966e-05
relative error = 0.00146 %
Correct digits = 5
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
Radius of convergence (three term test) for eq 1 = 0.4018
Order of pole (three term test) = 33.25 0
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.2022 0.536
h = 0.001 0.001
y[1] (numeric) = 1.23035307347 0.550595351926
y[1] (closed_form) = 1.23037041397 0.550586024862
absolute error = 1.969e-05
relative error = 0.001461 %
Correct digits = 5
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
Radius of convergence (three term test) for eq 1 = 0.3176
Order of pole (three term test) = 33.25 0
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.2032 0.537
h = 0.001 0.003
y[1] (numeric) = 1.23159088391 0.551606673755
y[1] (closed_form) = 1.23160758594 0.551596673241
absolute error = 1.947e-05
relative error = 0.001443 %
Correct digits = 5
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
Radius of convergence (three term test) for eq 1 = 1.511
Order of pole (three term test) = 33.25 0
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.2042 0.54
h = 0.0001 0.004
y[1] (numeric) = 1.23305724906 0.554865319242
y[1] (closed_form) = 1.23307520164 0.554856745278
absolute error = 1.989e-05
relative error = 0.001471 %
Correct digits = 5
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
Radius of convergence (three term test) for eq 1 = 0.8615
Order of pole (three term test) = 33.25 0
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.2043 0.544
h = 0.003 0.006
y[1] (numeric) = 1.23363199689 0.559358624789
y[1] (closed_form) = 1.23364945198 0.55935159987
absolute error = 1.882e-05
relative error = 0.001389 %
Correct digits = 5
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
Radius of convergence (three term test) for eq 1 = 1.152
Order of pole (three term test) = 33.26 0
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.2073 0.55
h = 0.0001 0.005
y[1] (numeric) = 1.23771676372 0.565782336122
y[1] (closed_form) = 1.23774119391 0.565773488247
absolute error = 2.598e-05
relative error = 0.001909 %
Correct digits = 5
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
Radius of convergence (three term test) for eq 1 = 0.52
Order of pole (three term test) = 33.26 0
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.2074 0.555
h = 0.0001 0.003
y[1] (numeric) = 1.23843275273 0.571428859739
y[1] (closed_form) = 1.23845245972 0.571420417242
absolute error = 2.144e-05
relative error = 0.001572 %
Correct digits = 5
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
Radius of convergence (three term test) for eq 1 = 0.4235
Order of pole (three term test) = 33.27 0
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.2075 0.558
h = 0.001 0.001
y[1] (numeric) = 1.23890881489 0.574820607279
y[1] (closed_form) = 1.23892774789 0.574810465358
absolute error = 2.148e-05
relative error = 0.001573 %
Correct digits = 5
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
Radius of convergence (three term test) for eq 1 = 0.3347
Order of pole (three term test) = 33.27 0
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.2085 0.559
h = 0.001 0.003
y[1] (numeric) = 1.24016595483 0.575834942374
y[1] (closed_form) = 1.24018422359 0.575824096575
absolute error = 2.125e-05
relative error = 0.001554 %
Correct digits = 5
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
Radius of convergence (three term test) for eq 1 = 1.593
Order of pole (three term test) = 33.28 0
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.2095 0.562
h = 0.0001 0.004
y[1] (numeric) = 1.24166805868 0.579118871422
y[1] (closed_form) = 1.24168762801 0.579109516289
absolute error = 2.169e-05
relative error = 0.001583 %
Correct digits = 5
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
Radius of convergence (three term test) for eq 1 = 0.9078
Order of pole (three term test) = 33.28 0
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.2096 0.566
h = 0.003 0.006
y[1] (numeric) = 1.24227693899 0.583656341059
y[1] (closed_form) = 1.24229598602 0.583648599727
absolute error = 2.056e-05
relative error = 0.001498 %
Correct digits = 5
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
Radius of convergence (three term test) for eq 1 = 1.214
Order of pole (three term test) = 33.28 0
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.2126 0.572
h = 0.0001 0.005
y[1] (numeric) = 1.24644547891 0.590123363358
y[1] (closed_form) = 1.24647179999 0.590113737583
absolute error = 2.803e-05
relative error = 0.002032 %
Correct digits = 5
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
Radius of convergence (three term test) for eq 1 = 0.5477
Order of pole (three term test) = 33.29 0
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.2127 0.577
h = 0.0001 0.003
y[1] (numeric) = 1.2472048756 0.595826498052
y[1] (closed_form) = 1.2472262749 0.595817284301
absolute error = 2.330e-05
relative error = 0.001686 %
Correct digits = 5
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
Radius of convergence (three term test) for eq 1 = 0.446
Order of pole (three term test) = 33.3 0
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.2128 0.58
h = 0.001 0.001
y[1] (numeric) = 1.24770747393 0.599252238437
y[1] (closed_form) = 1.2477280704 0.59924125286
absolute error = 2.334e-05
relative error = 0.001686 %
Correct digits = 5
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
Radius of convergence (three term test) for eq 1 = 0.3525
Order of pole (three term test) = 33.3 0
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.2138 0.581
h = 0.001 0.003
y[1] (numeric) = 1.24898475309 0.600269756069
y[1] (closed_form) = 1.24900465909 0.60025803602
absolute error = 2.310e-05
relative error = 0.001667 %
Correct digits = 5
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
Radius of convergence (three term test) for eq 1 = 1.677
Order of pole (three term test) = 33.3 0
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.2148 0.584
h = 0.0001 0.004
y[1] (numeric) = 1.25052404635 0.603580115579
y[1] (closed_form) = 1.25054530389 0.603569950688
absolute error = 2.356e-05
relative error = 0.001697 %
Correct digits = 5
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
Radius of convergence (three term test) for eq 1 = 0.9558
Order of pole (three term test) = 33.3 0
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.2149 0.588
h = 0.003 0.006
y[1] (numeric) = 1.25116839497 0.608163676039
y[1] (closed_form) = 1.25118910551 0.608155190564
absolute error = 2.238e-05
relative error = 0.001609 %
Correct digits = 5
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
Radius of convergence (three term test) for eq 1 = 1.278
Order of pole (three term test) = 33.31 0
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.2179 0.594
h = 0.0001 0.005
y[1] (numeric) = 1.25542411674 0.61467598559
y[1] (closed_form) = 1.25545240316 0.61466555163
absolute error = 3.015e-05
relative error = 0.002157 %
Correct digits = 5
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
Radius of convergence (three term test) for eq 1 = 0.5765
Order of pole (three term test) = 33.31 0
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.218 0.599
h = 0.0001 0.003
y[1] (numeric) = 1.25622859742 0.620438154446
y[1] (closed_form) = 1.25625176132 0.62042814049
absolute error = 2.524e-05
relative error = 0.001801 %
Correct digits = 5
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
Radius of convergence (three term test) for eq 1 = 0.4693
Order of pole (three term test) = 33.32 0
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.2181 0.602
h = 0.001 0.001
y[1] (numeric) = 1.25675876 0.623899332334
y[1] (closed_form) = 1.25678109146 0.623887473529
absolute error = 2.528e-05
relative error = 0.001802 %
Correct digits = 5
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
Radius of convergence (three term test) for eq 1 = 0.3709
Order of pole (three term test) = 33.32 0
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.2191 0.603
h = 0.001 0.003
y[1] (numeric) = 1.25805699802 0.624920198528
y[1] (closed_form) = 1.2580786123 0.624907574485
absolute error = 2.503e-05
relative error = 0.001782 %
Correct digits = 5
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
Radius of convergence (three term test) for eq 1 = 1.765
Order of pole (three term test) = 33.33 0
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.2201 0.606
h = 0.0001 0.004
y[1] (numeric) = 1.25963495453 0.628258138777
y[1] (closed_form) = 1.25965797228 0.628247134777
absolute error = 2.551e-05
relative error = 0.001812 %
Correct digits = 5
memory used=294.2MB, alloc=52.3MB, time=3.57
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
Radius of convergence (three term test) for eq 1 = 1.006
Order of pole (three term test) = 33.33 0
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.2202 0.61
h = 0.003 0.006
y[1] (numeric) = 1.26031613419 0.632889729538
y[1] (closed_form) = 1.26033858041 0.632880471461
absolute error = 2.428e-05
relative error = 0.001722 %
Correct digits = 5
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
Radius of convergence (three term test) for eq 1 = 1.344
Order of pole (three term test) = 33.33 0
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.2232 0.616
h = 0.0001 0.005
y[1] (numeric) = 1.26466249688 0.639449302941
y[1] (closed_form) = 1.2646928238 0.639438029682
absolute error = 3.235e-05
relative error = 0.002283 %
Correct digits = 5
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
Radius of convergence (three term test) for eq 1 = 0.6063
Order of pole (three term test) = 33.34 0
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.2233 0.621
h = 0.0001 0.003
y[1] (numeric) = 1.26551377216 0.645272945443
y[1] (closed_form) = 1.26553877359 0.645262101556
absolute error = 2.725e-05
relative error = 0.001918 %
Correct digits = 5
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
Radius of convergence (three term test) for eq 1 = 0.4936
Order of pole (three term test) = 33.35 0
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.2234 0.624
h = 0.001 0.001
y[1] (numeric) = 1.26607254792 0.648771015221
y[1] (closed_form) = 1.26609668649 0.648758252816
absolute error = 2.730e-05
relative error = 0.001919 %
Correct digits = 5
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
Radius of convergence (three term test) for eq 1 = 0.39
Order of pole (three term test) = 33.35 0
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.2244 0.625
h = 0.0001 0.004
y[1] (numeric) = 1.26739257478 0.649795392642
y[1] (closed_form) = 1.26741596895 0.649781834048
absolute error = 2.704e-05
relative error = 0.001898 %
Correct digits = 5
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
Radius of convergence (three term test) for eq 1 = 2.348
Order of pole (three term test) = 33.35 0
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.2245 0.629
h = 0.003 0.006
y[1] (numeric) = 1.26810482745 0.654467772709
y[1] (closed_form) = 1.26812876697 0.654458595881
absolute error = 2.564e-05
relative error = 0.001797 %
Correct digits = 5
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
Radius of convergence (three term test) for eq 1 = 1.404
Order of pole (three term test) = 33.36 0
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.2275 0.635
h = 0.0001 0.005
y[1] (numeric) = 1.2725314256 0.661070749138
y[1] (closed_form) = 1.27256351154 0.661059501194
absolute error = 3.400e-05
relative error = 0.002371 %
Correct digits = 5
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
Radius of convergence (three term test) for eq 1 = 0.6329
Order of pole (three term test) = 33.36 0
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.2276 0.64
h = 0.0001 0.003
y[1] (numeric) = 1.273423605 0.666949858435
y[1] (closed_form) = 1.27345018874 0.666939046621
absolute error = 2.870e-05
relative error = 0.001996 %
Correct digits = 5
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
Radius of convergence (three term test) for eq 1 = 0.5151
Order of pole (three term test) = 33.37 0
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.2277 0.643
h = 0.001 0.001
y[1] (numeric) = 1.27400740326 0.670481214137
y[1] (closed_form) = 1.27403309817 0.670468419478
absolute error = 2.870e-05
relative error = 0.001994 %
Correct digits = 5
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
Radius of convergence (three term test) for eq 1 = 0.407
Order of pole (three term test) = 33.38 0
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.2287 0.644
h = 0.001 0.003
y[1] (numeric) = 1.27534681365 0.67150901471
y[1] (closed_form) = 1.27537174069 0.671495396738
absolute error = 2.840e-05
relative error = 0.001971 %
Correct digits = 5
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
Radius of convergence (three term test) for eq 1 = 1.937
Order of pole (three term test) = 33.38 0
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.2297 0.647
h = 0.0001 0.004
y[1] (numeric) = 1.27700035815 0.674901853251
y[1] (closed_form) = 1.27702678727 0.674889977815
absolute error = 2.897e-05
relative error = 0.002006 %
Correct digits = 5
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
Radius of convergence (three term test) for eq 1 = 1.103
Order of pole (three term test) = 33.38 0
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.2298 0.651
h = 0.003 0.006
y[1] (numeric) = 1.27775316817 0.679628503565
y[1] (closed_form) = 1.27777897965 0.679618500022
absolute error = 2.768e-05
relative error = 0.001913 %
Correct digits = 5
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
Radius of convergence (three term test) for eq 1 = 1.475
Order of pole (three term test) = 33.39 0
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.2328 0.657
h = 0.0001 0.005
y[1] (numeric) = 1.28227696109 0.686282465707
y[1] (closed_form) = 1.28231122977 0.686270319178
absolute error = 3.636e-05
relative error = 0.0025 %
Correct digits = 5
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
Radius of convergence (three term test) for eq 1 = 0.6648
Order of pole (three term test) = 33.39 0
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.2329 0.662
h = 0.0001 0.003
y[1] (numeric) = 1.28321918459 0.692227655463
y[1] (closed_form) = 1.28324774368 0.692215957118
absolute error = 3.086e-05
relative error = 0.002117 %
Correct digits = 5
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
Radius of convergence (three term test) for eq 1 = 0.5411
Order of pole (three term test) = 33.4 0
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.233 0.665
h = 0.001 0.001
y[1] (numeric) = 1.28383358847 0.695798649773
y[1] (closed_form) = 1.28386122671 0.695784893628
absolute error = 3.087e-05
relative error = 0.002114 %
Correct digits = 5
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
Radius of convergence (three term test) for eq 1 = 0.4275
Order of pole (three term test) = 33.41 0
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.234 0.666
h = 0.001 0.003
y[1] (numeric) = 1.2851963592 0.696830265091
y[1] (closed_form) = 1.28522320137 0.696815654319
absolute error = 3.056e-05
relative error = 0.00209 %
Correct digits = 5
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
Radius of convergence (three term test) for eq 1 = 2.034
Order of pole (three term test) = 33.41 0
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.235 0.669
h = 0.0001 0.004
y[1] (numeric) = 1.28689290552 0.700254013861
y[1] (closed_form) = 1.28692130472 0.700241211747
absolute error = 3.115e-05
relative error = 0.002126 %
Correct digits = 5
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
Radius of convergence (three term test) for eq 1 = 1.159
Order of pole (three term test) = 33.41 0
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.2351 0.673
h = 0.003 0.006
y[1] (numeric) = 1.28768657974 0.7050343357
y[1] (closed_form) = 1.28771433718 0.705023474745
absolute error = 2.981e-05
relative error = 0.00203 %
Correct digits = 5
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
Radius of convergence (three term test) for eq 1 = 1.549
Order of pole (three term test) = 33.42 0
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.2381 0.679
h = 0.0001 0.005
y[1] (numeric) = 1.29231118176 0.71174126222
y[1] (closed_form) = 1.29234771052 0.711728183458
absolute error = 3.880e-05
relative error = 0.00263 %
Correct digits = 5
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
Radius of convergence (three term test) for eq 1 = 0.698
Order of pole (three term test) = 33.42 0
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.2382 0.684
h = 0.0001 0.003
y[1] (numeric) = 1.29330526547 0.717755023237
y[1] (closed_form) = 1.29333587474 0.717742406252
absolute error = 3.311e-05
relative error = 0.002238 %
Correct digits = 5
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
Radius of convergence (three term test) for eq 1 = 0.5681
Order of pole (three term test) = 33.43 0
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.2383 0.687
h = 0.001 0.001
y[1] (numeric) = 1.2939513879 0.721367140963
y[1] (closed_form) = 1.29398104342 0.7213523905
absolute error = 3.312e-05
relative error = 0.002236 %
Correct digits = 5
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
Radius of convergence (three term test) for eq 1 = 0.4488
Order of pole (three term test) = 33.44 0
NO COMPLEX POLE (six term test) for Equation 1
memory used=338.3MB, alloc=52.3MB, time=4.08
x[1] = 0.2393 0.688
h = 0.001 0.003
y[1] (numeric) = 1.29533838088 0.722402723541
y[1] (closed_form) = 1.29536721156 0.722387086932
absolute error = 3.280e-05
relative error = 0.002211 %
Correct digits = 5
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
Radius of convergence (three term test) for eq 1 = 2.135
Order of pole (three term test) = 33.44 0
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.2403 0.691
h = 0.0001 0.004
y[1] (numeric) = 1.297079501 0.725858547841
y[1] (closed_form) = 1.29710994479 0.725844786474
absolute error = 3.341e-05
relative error = 0.002248 %
Correct digits = 5
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
Radius of convergence (three term test) for eq 1 = 1.216
Order of pole (three term test) = 33.44 0
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.2404 0.695
h = 0.003 0.006
y[1] (numeric) = 1.29791551613 0.730694535564
y[1] (closed_form) = 1.2979452942 0.730682785655
absolute error = 3.201e-05
relative error = 0.002149 %
Correct digits = 5
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
Radius of convergence (three term test) for eq 1 = 1.625
Order of pole (three term test) = 33.45 0
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.2434 0.701
h = 0.0001 0.005
y[1] (numeric) = 1.30264459988 0.737456405763
y[1] (closed_form) = 1.30268346688 0.73744236017
absolute error = 4.133e-05
relative error = 0.002761 %
Correct digits = 5
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
Radius of convergence (three term test) for eq 1 = 0.7325
Order of pole (three term test) = 33.46 0
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.2435 0.706
h = 0.0001 0.003
y[1] (numeric) = 1.30369239954 0.743541248015
y[1] (closed_form) = 1.30372513456 0.743527679381
absolute error = 3.544e-05
relative error = 0.002361 %
Correct digits = 5
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
Radius of convergence (three term test) for eq 1 = 0.5961
Order of pole (three term test) = 33.46 0
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.2436 0.709
h = 0.001 0.001
y[1] (numeric) = 1.30437137751 0.747195985316
y[1] (closed_form) = 1.30440312495 0.747180206777
absolute error = 3.545e-05
relative error = 0.002358 %
Correct digits = 5
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
Radius of convergence (three term test) for eq 1 = 0.4709
Order of pole (three term test) = 33.47 0
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.2446 0.71
h = 0.001 0.003
y[1] (numeric) = 1.30578346662 0.748235683828
y[1] (closed_form) = 1.30581435986 0.748218987413
absolute error = 3.512e-05
relative error = 0.002333 %
Correct digits = 5
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
Radius of convergence (three term test) for eq 1 = 2.24
Order of pole (three term test) = 33.47 0
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.2456 0.713
h = 0.0001 0.004
y[1] (numeric) = 1.30757076031 0.751724753187
y[1] (closed_form) = 1.30760332392 0.751709999076
absolute error = 3.575e-05
relative error = 0.00237 %
Correct digits = 5
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
Radius of convergence (three term test) for eq 1 = 1.276
Order of pole (three term test) = 33.47 0
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.2457 0.717
h = 0.003 0.006
y[1] (numeric) = 1.30845062534 0.756618416658
y[1] (closed_form) = 1.30848249944 0.756605745377
absolute error = 3.430e-05
relative error = 0.002269 %
Correct digits = 5
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
Radius of convergence (three term test) for eq 1 = 1.705
Order of pole (three term test) = 33.48 0
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.2487 0.723
h = 0.0001 0.005
y[1] (numeric) = 1.31328792391 0.76343721052
y[1] (closed_form) = 1.31332920816 0.763422162512
absolute error = 4.394e-05
relative error = 0.002893 %
Correct digits = 5
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
Radius of convergence (three term test) for eq 1 = 0.7683
Order of pole (three term test) = 33.49 0
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.2488 0.728
h = 0.0001 0.003
y[1] (numeric) = 1.31439133633 0.76959566386
y[1] (closed_form) = 1.31442627342 0.769581109641
absolute error = 3.785e-05
relative error = 0.002485 %
Correct digits = 5
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
Radius of convergence (three term test) for eq 1 = 0.6252
Order of pole (three term test) = 33.5 0
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.2489 0.731
h = 0.001 0.001
y[1] (numeric) = 1.31510433175 0.773294528665
y[1] (closed_form) = 1.31513824646 0.773277687335
absolute error = 3.787e-05
relative error = 0.002482 %
Correct digits = 5
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
Radius of convergence (three term test) for eq 1 = 0.4939
Order of pole (three term test) = 33.5 0
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.2499 0.732
h = 0.0001 0.004
y[1] (numeric) = 1.31654240328 0.774338487808
y[1] (closed_form) = 1.31657543382 0.774320696654
absolute error = 3.752e-05
relative error = 0.002456 %
Correct digits = 5
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
Radius of convergence (three term test) for eq 1 = 2.973
Order of pole (three term test) = 33.5 0
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.25 0.736
h = 0.003 0.006
y[1] (numeric) = 1.31745917856 0.779280894154
y[1] (closed_form) = 1.31749284662 0.779268319478
absolute error = 3.594e-05
relative error = 0.002348 %
Correct digits = 5
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
Radius of convergence (three term test) for eq 1 = 1.776
Order of pole (three term test) = 33.51 0
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.253 0.742
h = 0.0001 0.005
y[1] (numeric) = 1.32239195175 0.786151622803
y[1] (closed_form) = 1.32243531047 0.786136602907
absolute error = 4.589e-05
relative error = 0.002983 %
Correct digits = 5
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
Radius of convergence (three term test) for eq 1 = 0.8004
Order of pole (three term test) = 33.52 0
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.2531 0.747
h = 0.0001 0.003
y[1] (numeric) = 1.32354386687 0.79237617365
y[1] (closed_form) = 1.32358069077 0.792361660785
absolute error = 3.958e-05
relative error = 0.002566 %
Correct digits = 5
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
Radius of convergence (three term test) for eq 1 = 0.6513
Order of pole (three term test) = 33.53 0
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.2532 0.75
h = 0.001 0.001
y[1] (numeric) = 1.32428654317 0.79611466327
y[1] (closed_form) = 1.32432231487 0.796097795764
absolute error = 3.955e-05
relative error = 0.002559 %
Correct digits = 5
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
Radius of convergence (three term test) for eq 1 = 0.5144
Order of pole (three term test) = 33.53 0
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.2542 0.751
h = 0.001 0.003
y[1] (numeric) = 1.32574764597 0.797162726662
y[1] (closed_form) = 1.3257825076 0.797144881281
absolute error = 3.916e-05
relative error = 0.002532 %
Correct digits = 5
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
Radius of convergence (three term test) for eq 1 = 2.447
Order of pole (three term test) = 33.53 0
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.2552 0.754
h = 0.0001 0.004
y[1] (numeric) = 1.32762478605 0.800717381585
y[1] (closed_form) = 1.32766142705 0.800701605346
absolute error = 3.989e-05
relative error = 0.002573 %
Correct digits = 5
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
Radius of convergence (three term test) for eq 1 = 1.394
Order of pole (three term test) = 33.54 0
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.2553 0.758
h = 0.0001 0.004
y[1] (numeric) = 1.32858963288 0.805724337307
y[1] (closed_form) = 1.32862553967 0.805710779413
absolute error = 3.838e-05
relative error = 0.00247 %
Correct digits = 5
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
Radius of convergence (three term test) for eq 1 = 1.111
Order of pole (three term test) = 33.55 0
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.2554 0.762
h = 0.003 0.006
y[1] (numeric) = 1.3295596448 0.810746131806
y[1] (closed_form) = 1.32959555158 0.810732573911
absolute error = 3.838e-05
relative error = 0.002465 %
Correct digits = 5
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
Radius of convergence (three term test) for eq 1 = 1.878
Order of pole (three term test) = 33.55 0
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.2584 0.768
h = 0.0001 0.005
y[1] (numeric) = 1.3346257506 0.817692578072
y[1] (closed_form) = 1.33467173681 0.817676484628
absolute error = 4.872e-05
relative error = 0.003113 %
Correct digits = 5
memory used=382.4MB, alloc=52.3MB, time=4.60
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
Radius of convergence (three term test) for eq 1 = 0.8461
Order of pole (three term test) = 33.56 0
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.2585 0.773
h = 0.0001 0.003
y[1] (numeric) = 1.3358443595 0.824011587984
y[1] (closed_form) = 1.33588355128 0.823996016976
absolute error = 4.217e-05
relative error = 0.002687 %
Correct digits = 5
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
Radius of convergence (three term test) for eq 1 = 0.6883
Order of pole (three term test) = 33.57 0
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.2586 0.776
h = 0.001 0.001
y[1] (numeric) = 1.33662787214 0.827806710492
y[1] (closed_form) = 1.33666597153 0.827788691023
absolute error = 4.215e-05
relative error = 0.002681 %
Correct digits = 5
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
Radius of convergence (three term test) for eq 1 = 0.5437
Order of pole (three term test) = 33.58 0
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.2596 0.777
h = 0.001 0.003
y[1] (numeric) = 1.33812134331 0.828861149638
y[1] (closed_form) = 1.33815849726 0.828842113114
absolute error = 4.175e-05
relative error = 0.002652 %
Correct digits = 5
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
Radius of convergence (three term test) for eq 1 = 2.586
Order of pole (three term test) = 33.58 0
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.2606 0.78
h = 0.0001 0.004
y[1] (numeric) = 1.34005696437 0.8324608246
y[1] (closed_form) = 1.34009596661 0.832443939954
absolute error = 4.250e-05
relative error = 0.002694 %
Correct digits = 5
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
Radius of convergence (three term test) for eq 1 = 1.473
Order of pole (three term test) = 33.58 0
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.2607 0.784
h = 0.003 0.006
y[1] (numeric) = 1.34107625302 0.837544342409
y[1] (closed_form) = 1.34111449093 0.837529762931
absolute error = 4.092e-05
relative error = 0.002588 %
Correct digits = 5
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
Radius of convergence (three term test) for eq 1 = 1.968
Order of pole (three term test) = 33.59 0
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.2637 0.79
h = 0.0001 0.005
y[1] (numeric) = 1.34626219344 0.844553917647
y[1] (closed_form) = 1.34631084392 0.844536711474
absolute error = 5.160e-05
relative error = 0.003247 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
Radius of convergence (three term test) for eq 1 = 0.8865
Order of pole (three term test) = 33.6 0
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.2638 0.795
h = 0.0001 0.003
y[1] (numeric) = 1.34754230791 0.850954442887
y[1] (closed_form) = 1.34758393995 0.850937781192
absolute error = 4.484e-05
relative error = 0.002814 %
Correct digits = 5
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
Radius of convergence (three term test) for eq 1 = 0.7212
Order of pole (three term test) = 33.61 0
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.2639 0.798
h = 0.001 0.001
y[1] (numeric) = 1.34836344827 0.854798405299
y[1] (closed_form) = 1.34840395003 0.85477921536
absolute error = 4.482e-05
relative error = 0.002807 %
Correct digits = 5
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
Radius of convergence (three term test) for eq 1 = 0.5697
Order of pole (three term test) = 33.61 0
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.2649 0.799
h = 0.001 0.003
y[1] (numeric) = 1.34988566454 0.855857564008
y[1] (closed_form) = 1.34992518895 0.85583732432
absolute error = 4.441e-05
relative error = 0.002778 %
Correct digits = 5
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
Radius of convergence (three term test) for eq 1 = 2.71
Order of pole (three term test) = 33.62 0
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.2659 0.802
h = 0.0001 0.004
y[1] (numeric) = 1.35187415664 0.859495332828
y[1] (closed_form) = 1.35191559174 0.859477314253
absolute error = 4.518e-05
relative error = 0.00282 %
Correct digits = 5
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
Radius of convergence (three term test) for eq 1 = 1.543
Order of pole (three term test) = 33.62 0
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.266 0.806
h = 0.003 0.006
y[1] (numeric) = 1.35294363129 0.864644884222
y[1] (closed_form) = 1.35298427893 0.864629246913
absolute error = 4.355e-05
relative error = 0.002712 %
Correct digits = 5
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
Radius of convergence (three term test) for eq 1 = 2.062
Order of pole (three term test) = 33.63 0
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.269 0.812
h = 0.0001 0.005
y[1] (numeric) = 1.35825340549 0.871719574802
y[1] (closed_form) = 1.35830480296 0.871701216028
absolute error = 5.458e-05
relative error = 0.003382 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
Radius of convergence (three term test) for eq 1 = 0.9287
Order of pole (three term test) = 33.64 0
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.2691 0.817
h = 0.0001 0.003
y[1] (numeric) = 1.35959710186 0.878204234972
y[1] (closed_form) = 1.35964125383 0.878186444601
absolute error = 4.760e-05
relative error = 0.002941 %
Correct digits = 5
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
Radius of convergence (three term test) for eq 1 = 0.7555
Order of pole (three term test) = 33.65 0
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.2692 0.82
h = 0.001 0.001
y[1] (numeric) = 1.3604571408 0.882098598333
y[1] (closed_form) = 1.36050012349 0.882078199046
absolute error = 4.758e-05
relative error = 0.002934 %
Correct digits = 5
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
Radius of convergence (three term test) for eq 1 = 0.5967
Order of pole (three term test) = 33.65 0
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.2702 0.821
h = 0.001 0.003
y[1] (numeric) = 1.36200904321 0.883162604492
y[1] (closed_form) = 1.36205101595 0.883141122511
absolute error = 4.715e-05
relative error = 0.002905 %
Correct digits = 5
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
Radius of convergence (three term test) for eq 1 = 2.838
Order of pole (three term test) = 33.65 0
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.2712 0.824
h = 0.0001 0.004
y[1] (numeric) = 1.36405216133 0.88683966196
y[1] (closed_form) = 1.36409610854 0.886820470894
absolute error = 4.795e-05
relative error = 0.002947 %
Correct digits = 5
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
Radius of convergence (three term test) for eq 1 = 1.616
Order of pole (three term test) = 33.66 0
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.2713 0.828
h = 0.003 0.006
y[1] (numeric) = 1.36517351055 0.892057345316
y[1] (closed_form) = 1.36521664737 0.892040612884
absolute error = 4.627e-05
relative error = 0.002837 %
Correct digits = 5
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
Radius of convergence (three term test) for eq 1 = 2.159
Order of pole (three term test) = 33.67 0
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.2743 0.834
h = 0.0001 0.005
y[1] (numeric) = 1.37061118933 0.899199138417
y[1] (closed_form) = 1.37066541749 0.899179586003
absolute error = 5.765e-05
relative error = 0.003517 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
Radius of convergence (three term test) for eq 1 = 0.9726
Order of pole (three term test) = 33.68 0
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.2744 0.839
h = 0.0001 0.003
y[1] (numeric) = 1.37202059256 0.905770576647
y[1] (closed_form) = 1.372067345 0.90575161851
absolute error = 5.045e-05
relative error = 0.003069 %
Correct digits = 5
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
Radius of convergence (three term test) for eq 1 = 0.7911
Order of pole (three term test) = 33.69 0
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.2745 0.842
h = 0.001 0.001
y[1] (numeric) = 1.37292083043 0.90971691591
y[1] (closed_form) = 1.37296637343 0.909695267268
absolute error = 5.043e-05
relative error = 0.003062 %
Correct digits = 5
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
Radius of convergence (three term test) for eq 1 = 0.6249
Order of pole (three term test) = 33.7 0
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.2755 0.843
h = 0.001 0.003
y[1] (numeric) = 1.37450337466 0.910785892692
y[1] (closed_form) = 1.37454787441 0.910763128154
absolute error = 4.998e-05
relative error = 0.003031 %
Correct digits = 5
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
Radius of convergence (three term test) for eq 1 = 2.972
Order of pole (three term test) = 33.7 0
NO COMPLEX POLE (six term test) for Equation 1
memory used=426.6MB, alloc=52.3MB, time=5.12
x[1] = 0.2765 0.846
h = 0.0001 0.004
y[1] (numeric) = 1.37660290787 0.914503438772
y[1] (closed_form) = 1.37664944731 0.914483035533
absolute error = 5.082e-05
relative error = 0.003075 %
Correct digits = 5
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
Radius of convergence (three term test) for eq 1 = 1.692
Order of pole (three term test) = 33.7 0
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.2766 0.85
h = 0.003 0.006
y[1] (numeric) = 1.37777785976 0.919791371431
y[1] (closed_form) = 1.37782356608 0.919773505505
absolute error = 4.907e-05
relative error = 0.002962 %
Correct digits = 5
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
Radius of convergence (three term test) for eq 1 = 2.261
Order of pole (three term test) = 33.71 0
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.2796 0.856
h = 0.0001 0.005
y[1] (numeric) = 1.38334758786 0.927002254997
y[1] (closed_form) = 1.38340473144 0.9269814667
absolute error = 6.081e-05
relative error = 0.003652 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
Radius of convergence (three term test) for eq 1 = 1.018
Order of pole (three term test) = 33.72 0
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.2797 0.861
h = 0.0001 0.003
y[1] (numeric) = 1.38482487311 0.933663138657
y[1] (closed_form) = 1.38487430748 0.933642972525
absolute error = 5.339e-05
relative error = 0.003197 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
Radius of convergence (three term test) for eq 1 = 0.8283
Order of pole (three term test) = 33.73 0
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.2798 0.864
h = 0.001 0.001
y[1] (numeric) = 1.3857666407 0.937663043097
y[1] (closed_form) = 1.38581482431 0.937640103926
absolute error = 5.337e-05
relative error = 0.003189 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
Radius of convergence (three term test) for eq 1 = 0.6542
Order of pole (three term test) = 33.74 0
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.2808 0.865
h = 0.0001 0.004
y[1] (numeric) = 1.38738079757 0.938737108796
y[1] (closed_form) = 1.38742790388 0.938713020261
absolute error = 5.291e-05
relative error = 0.003158 %
Correct digits = 5
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
Radius of convergence (three term test) for eq 1 = 3.937
Order of pole (three term test) = 33.74 0
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.2809 0.869
h = 0.003 0.006
y[1] (numeric) = 1.38860078354 0.944084164978
y[1] (closed_form) = 1.38864868516 0.944066404719
absolute error = 5.109e-05
relative error = 0.003042 %
Correct digits = 5
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
Radius of convergence (three term test) for eq 1 = 2.352
Order of pole (three term test) = 33.75 0
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.2839 0.875
h = 0.0001 0.005
y[1] (numeric) = 1.39428669727 0.951357753319
y[1] (closed_form) = 1.39434633881 0.951336983551
absolute error = 6.315e-05
relative error = 0.003741 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
Radius of convergence (three term test) for eq 1 = 1.059
Order of pole (three term test) = 33.76 0
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.284 0.88
h = 0.0001 0.003
y[1] (numeric) = 1.39582308524 0.958098628445
y[1] (closed_form) = 1.39587481352 0.958078503676
absolute error = 5.551e-05
relative error = 0.003278 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
Radius of convergence (three term test) for eq 1 = 0.8616
Order of pole (three term test) = 33.77 0
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.2841 0.883
h = 0.001 0.001
y[1] (numeric) = 1.39680102576 0.962146440749
y[1] (closed_form) = 1.39685146774 0.96212347061
absolute error = 5.543e-05
relative error = 0.003268 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
Radius of convergence (three term test) for eq 1 = 0.6805
Order of pole (three term test) = 33.78 0
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.2851 0.884
h = 0.001 0.003
y[1] (numeric) = 1.39844312061 0.963225370288
y[1] (closed_form) = 1.39849245578 0.96320122134
absolute error = 5.493e-05
relative error = 0.003235 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
Radius of convergence (three term test) for eq 1 = 3.237
Order of pole (three term test) = 33.78 0
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.2861 0.887
h = 0.0001 0.004
y[1] (numeric) = 1.40065199575 0.96702219222
y[1] (closed_form) = 1.40070349508 0.967000537974
absolute error = 5.587e-05
relative error = 0.003282 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
Radius of convergence (three term test) for eq 1 = 1.843
Order of pole (three term test) = 33.78 0
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.2862 0.891
h = 0.003 0.006
y[1] (numeric) = 1.40193053263 0.972447234171
y[1] (closed_form) = 1.40198115614 0.972428267003
absolute error = 5.406e-05
relative error = 0.003168 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
Radius of convergence (three term test) for eq 1 = 2.462
Order of pole (three term test) = 33.79 0
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.2892 0.897
h = 0.0001 0.005
y[1] (numeric) = 1.40775638934 0.979793665452
y[1] (closed_form) = 1.40781910731 0.979771578895
absolute error = 6.649e-05
relative error = 0.003877 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
Radius of convergence (three term test) for eq 1 = 1.109
Order of pole (three term test) = 33.8 0
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.2893 0.902
h = 0.0001 0.003
y[1] (numeric) = 1.40936481345 0.986629043705
y[1] (closed_form) = 1.40941937827 0.986607633921
absolute error = 5.861e-05
relative error = 0.003407 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
Radius of convergence (three term test) for eq 1 = 0.9018
Order of pole (three term test) = 33.82 0
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.2894 0.905
h = 0.001 0.001
y[1] (numeric) = 1.41038682504 0.990733434745
y[1] (closed_form) = 1.41044005995 0.990709095211
absolute error = 5.854e-05
relative error = 0.003396 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
Radius of convergence (three term test) for eq 1 = 0.7122
Order of pole (three term test) = 33.82 0
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.2904 0.906
h = 0.001 0.003
y[1] (numeric) = 1.41206237963 0.991817671747
y[1] (closed_form) = 1.41211447225 0.991792119412
absolute error = 5.802e-05
relative error = 0.003362 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
Radius of convergence (three term test) for eq 1 = 3.387
Order of pole (three term test) = 33.82 0
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.2914 0.909
h = 0.0001 0.004
y[1] (numeric) = 1.41433297144 0.995658467579
y[1] (closed_form) = 1.41438729779 0.995635482114
absolute error = 5.899e-05
relative error = 0.00341 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
Radius of convergence (three term test) for eq 1 = 1.929
Order of pole (three term test) = 33.83 0
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.2915 0.913
h = 0.003 0.006
y[1] (numeric) = 1.41567025859 1.0011599481
y[1] (closed_form) = 1.415723687 1.00113973237
absolute error = 5.713e-05
relative error = 0.003295 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
Radius of convergence (three term test) for eq 1 = 2.577
Order of pole (three term test) = 33.84 0
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.2945 0.919
h = 0.0001 0.005
y[1] (numeric) = 1.42164042775 1.00858121303
y[1] (closed_form) = 1.42170630992 1.00855776379
absolute error = 6.993e-05
relative error = 0.004012 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
Radius of convergence (three term test) for eq 1 = 1.16
Order of pole (three term test) = 33.85 0
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.2946 0.924
h = 0.0001 0.003
y[1] (numeric) = 1.42332321543 1.0155138357
y[1] (closed_form) = 1.42338070103 1.01549109722
absolute error = 6.182e-05
relative error = 0.003536 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
Radius of convergence (three term test) for eq 1 = 0.9436
Order of pole (three term test) = 33.86 0
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.2947 0.927
h = 0.001 0.001
y[1] (numeric) = 1.42439072127 1.01967643841
y[1] (closed_form) = 1.42444683205 1.01965068477
absolute error = 6.174e-05
relative error = 0.003524 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
Radius of convergence (three term test) for eq 1 = 0.7452
Order of pole (three term test) = 33.87 0
NO COMPLEX POLE (six term test) for Equation 1
memory used=471.0MB, alloc=52.3MB, time=5.66
x[1] = 0.2957 0.928
h = 0.001 0.003
y[1] (numeric) = 1.42610075238 1.02076608643
y[1] (closed_form) = 1.42615568461 1.02073908572
absolute error = 6.121e-05
relative error = 0.00349 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
Radius of convergence (three term test) for eq 1 = 3.545
Order of pole (three term test) = 33.87 0
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.2967 0.931
h = 0.0001 0.004
y[1] (numeric) = 1.42843499181 1.02465207773
y[1] (closed_form) = 1.42849222895 1.0246277167
absolute error = 6.221e-05
relative error = 0.003538 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
Radius of convergence (three term test) for eq 1 = 2.018
Order of pole (three term test) = 33.88 0
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.2968 0.935
h = 0.003 0.006
y[1] (numeric) = 1.42983292197 1.03023219318
y[1] (closed_form) = 1.42988923929 1.03021068602
absolute error = 6.028e-05
relative error = 0.003421 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
Radius of convergence (three term test) for eq 1 = 2.696
Order of pole (three term test) = 33.89 0
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.2998 0.941
h = 0.0001 0.005
y[1] (numeric) = 1.43595185628 1.03773028294
y[1] (closed_form) = 1.43602099159 1.03770542376
absolute error = 7.347e-05
relative error = 0.004147 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
Radius of convergence (three term test) for eq 1 = 1.214
Order of pole (three term test) = 33.9 0
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.2999 0.946
h = 0.0001 0.003
y[1] (numeric) = 1.43771139158 1.04476291832
y[1] (closed_form) = 1.43777188321 1.04473880616
absolute error = 6.512e-05
relative error = 0.003664 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
Radius of convergence (three term test) for eq 1 = 0.9873
Order of pole (three term test) = 33.91 0
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.3 0.949
h = 0.001 0.001
y[1] (numeric) = 1.43882584916 1.04898538156
y[1] (closed_form) = 1.43888491975 1.04895816779
absolute error = 6.504e-05
relative error = 0.003652 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
Radius of convergence (three term test) for eq 1 = 0.7797
Order of pole (three term test) = 33.92 0
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.301 0.95
h = 0.001 0.003
y[1] (numeric) = 1.44057139057 1.05008053859
y[1] (closed_form) = 1.44062924549 1.05005204317
absolute error = 6.449e-05
relative error = 0.003618 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
Radius of convergence (three term test) for eq 1 = 3.708
Order of pole (three term test) = 33.92 0
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.302 0.953
h = 0.0001 0.004
y[1] (numeric) = 1.44297124813 1.05401295268
y[1] (closed_form) = 1.44303148082 1.05398717043
absolute error = 6.552e-05
relative error = 0.003666 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
Radius of convergence (three term test) for eq 1 = 2.111
Order of pole (three term test) = 33.93 0
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.3021 0.957
h = 0.003 0.006
y[1] (numeric) = 1.44443176003 1.05967392115
y[1] (closed_form) = 1.44449105127 1.05965107841
absolute error = 6.354e-05
relative error = 0.003547 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
Radius of convergence (three term test) for eq 1 = 2.82
Order of pole (three term test) = 33.94 0
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.3051 0.963
h = 0.0001 0.005
y[1] (numeric) = 1.45070399794 1.06725082724
y[1] (closed_form) = 1.45077647646 1.06722450947
absolute error = 7.711e-05
relative error = 0.004281 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
Radius of convergence (three term test) for eq 1 = 1.27
Order of pole (three term test) = 33.95 0
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.3052 0.968
h = 0.0001 0.003
y[1] (numeric) = 1.4525427232 1.0743862713
y[1] (closed_form) = 1.45260630718 1.07436073918
absolute error = 6.852e-05
relative error = 0.003792 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
Radius of convergence (three term test) for eq 1 = 1.033
Order of pole (three term test) = 33.96 0
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.3053 0.971
h = 0.001 0.001
y[1] (numeric) = 1.45370562538 1.07867026029
y[1] (closed_form) = 1.45376774071 1.07864153901
absolute error = 6.843e-05
relative error = 0.00378 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
Radius of convergence (three term test) for eq 1 = 0.8157
Order of pole (three term test) = 33.97 0
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.3063 0.972
h = 0.0001 0.004
y[1] (numeric) = 1.45548772832 1.07977101854
y[1] (closed_form) = 1.45554859003 1.07974098074
absolute error = 6.787e-05
relative error = 0.003745 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
Radius of convergence (three term test) for eq 1 = 4.908
Order of pole (three term test) = 33.97 0
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.3064 0.976
h = 0.003 0.006
y[1] (numeric) = 1.45700076162 1.0854998735
y[1] (closed_form) = 1.45706259844 1.08547712996
absolute error = 6.589e-05
relative error = 0.003626 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
Radius of convergence (three term test) for eq 1 = 2.932
Order of pole (three term test) = 33.98 0
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.3094 0.982
h = 0.0001 0.005
y[1] (numeric) = 1.46340768862 1.09314811831
y[1] (closed_form) = 1.46348303628 1.09312179461
absolute error = 7.981e-05
relative error = 0.004369 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
Radius of convergence (three term test) for eq 1 = 1.32
Order of pole (three term test) = 34 0
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.3095 0.987
h = 0.0001 0.003
y[1] (numeric) = 1.46531530904 1.1003753013
y[1] (closed_form) = 1.46538154263 1.10034979538
absolute error = 7.097e-05
relative error = 0.003873 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
Radius of convergence (three term test) for eq 1 = 1.074
Order of pole (three term test) = 34.01 0
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.3096 0.99
h = 0.001 0.001
y[1] (numeric) = 1.46652037375 1.10471419777
y[1] (closed_form) = 1.46658509766 1.10468542586
absolute error = 7.083e-05
relative error = 0.003858 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
Radius of convergence (three term test) for eq 1 = 0.8479
Order of pole (three term test) = 34.02 0
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.3106 0.991
h = 0.001 0.003
y[1] (numeric) = 1.46833473505 1.10582029956
y[1] (closed_form) = 1.46839817238 1.10579018039
absolute error = 7.022e-05
relative error = 0.00382 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
Radius of convergence (three term test) for eq 1 = 4.033
Order of pole (three term test) = 34.02 0
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.3116 0.994
h = 0.0001 0.004
y[1] (numeric) = 1.47086148993 1.10984322133
y[1] (closed_form) = 1.47092744429 1.10981595482
absolute error = 7.137e-05
relative error = 0.003873 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
Radius of convergence (three term test) for eq 1 = 2.296
Order of pole (three term test) = 34.03 0
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.3117 0.998
h = 0.003 0.006
y[1] (numeric) = 1.47244274865 1.11566142082
y[1] (closed_form) = 1.47250772094 1.11563725712
absolute error = 6.932e-05
relative error = 0.003752 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
Radius of convergence (three term test) for eq 1 = 3.067
Order of pole (three term test) = 34.04 0
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.3147 1.004
h = 0.0001 0.005
y[1] (numeric) = 1.47901163744 1.12339224464
y[1] (closed_form) = 1.47909049971 1.12336436903
absolute error = 8.364e-05
relative error = 0.004503 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
Radius of convergence (three term test) for eq 1 = 1.381
Order of pole (three term test) = 34.05 0
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.3148 1.009
h = 0.0001 0.003
y[1] (numeric) = 1.48100311963 1.13072754593
y[1] (closed_form) = 1.48107260964 1.13070053128
absolute error = 7.456e-05
relative error = 0.004001 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
Radius of convergence (three term test) for eq 1 = 1.123
Order of pole (three term test) = 34.06 0
NO COMPLEX POLE (six term test) for Equation 1
memory used=515.2MB, alloc=52.3MB, time=6.21
x[1] = 0.3149 1.012
h = 0.001 0.001
y[1] (numeric) = 1.48225948428 1.13513113044
y[1] (closed_form) = 1.48232741437 1.13510076014
absolute error = 7.441e-05
relative error = 0.003986 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
Radius of convergence (three term test) for eq 1 = 0.8868
Order of pole (three term test) = 34.07 0
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.3159 1.013
h = 0.001 0.003
y[1] (numeric) = 1.48411241055 1.13624300202
y[1] (closed_form) = 1.48417901444 1.13621124901
absolute error = 7.379e-05
relative error = 0.003948 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
Radius of convergence (three term test) for eq 1 = 4.218
Order of pole (three term test) = 34.07 0
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.3169 1.016
h = 0.0001 0.004
y[1] (numeric) = 1.48671063502 1.14031591552
y[1] (closed_form) = 1.48677983384 1.14028709067
absolute error = 7.496e-05
relative error = 0.004001 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
Radius of convergence (three term test) for eq 1 = 2.401
Order of pole (three term test) = 34.08 0
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.317 1.02
h = 0.003 0.006
y[1] (numeric) = 1.48836026101 1.14622146337
y[1] (closed_form) = 1.48842845687 1.14619583156
absolute error = 7.285e-05
relative error = 0.003878 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
Radius of convergence (three term test) for eq 1 = 3.208
Order of pole (three term test) = 34.09 0
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.32 1.026
h = 0.0001 0.005
y[1] (numeric) = 1.49509590946 1.15403685887
y[1] (closed_form) = 1.4951783799 1.15400737847
absolute error = 8.758e-05
relative error = 0.004637 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
Radius of convergence (three term test) for eq 1 = 1.444
Order of pole (three term test) = 34.11 0
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.3201 1.031
h = 0.0001 0.003
y[1] (numeric) = 1.49717387209 1.16148315837
y[1] (closed_form) = 1.49724670802 1.16145458467
absolute error = 7.824e-05
relative error = 0.004129 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
Radius of convergence (three term test) for eq 1 = 1.174
Order of pole (three term test) = 34.12 0
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.3202 1.034
h = 0.001 0.001
y[1] (numeric) = 1.4984831365 1.16595314559
y[1] (closed_form) = 1.49855436076 1.16592112543
absolute error = 7.809e-05
relative error = 0.004113 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
Radius of convergence (three term test) for eq 1 = 0.9274
Order of pole (three term test) = 34.13 0
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.3212 1.035
h = 0.001 0.003
y[1] (numeric) = 1.50037573181 1.16707086175
y[1] (closed_form) = 1.50044558935 1.1670374231
absolute error = 7.745e-05
relative error = 0.004074 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
Radius of convergence (three term test) for eq 1 = 4.411
Order of pole (three term test) = 34.13 0
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.3222 1.038
h = 0.0001 0.004
y[1] (numeric) = 1.50304756035 1.17119501797
y[1] (closed_form) = 1.50312009257 1.1711645837
absolute error = 7.866e-05
relative error = 0.004128 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
Radius of convergence (three term test) for eq 1 = 2.511
Order of pole (three term test) = 34.14 0
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.3223 1.042
h = 0.003 0.006
y[1] (numeric) = 1.50476768298 1.17719022193
y[1] (closed_form) = 1.50483919164 1.17716307263
absolute error = 7.649e-05
relative error = 0.004003 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
Radius of convergence (three term test) for eq 1 = 3.354
Order of pole (three term test) = 34.15 0
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.3253 1.048
h = 0.0001 0.005
y[1] (numeric) = 1.51167498471 1.18509218146
y[1] (closed_form) = 1.51176115817 1.18506104181
absolute error = 9.163e-05
relative error = 0.00477 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
Radius of convergence (three term test) for eq 1 = 1.51
Order of pole (three term test) = 34.16 0
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.3254 1.053
h = 0.0001 0.003
y[1] (numeric) = 1.51384211179 1.19265238947
y[1] (closed_form) = 1.5139183843 1.19262220492
absolute error = 8.203e-05
relative error = 0.004256 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
Radius of convergence (three term test) for eq 1 = 1.228
Order of pole (three term test) = 34.18 0
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.3255 1.056
h = 0.001 0.001
y[1] (numeric) = 1.51520591536 1.19719051204
y[1] (closed_form) = 1.51528052292 1.19715678901
absolute error = 8.188e-05
relative error = 0.00424 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
Radius of convergence (three term test) for eq 1 = 0.9698
Order of pole (three term test) = 34.19 0
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.3265 1.057
h = 0.001 0.003
y[1] (numeric) = 1.51713930328 1.198314141
y[1] (closed_form) = 1.51721250261 1.19827896336
absolute error = 8.121e-05
relative error = 0.004201 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
Radius of convergence (three term test) for eq 1 = 4.612
Order of pole (three term test) = 34.19 0
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.3275 1.06
h = 0.0001 0.004
y[1] (numeric) = 1.51988691586 1.2024907971
y[1] (closed_form) = 1.51996287155 1.20245870083
absolute error = 8.246e-05
relative error = 0.004255 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
Radius of convergence (three term test) for eq 1 = 2.626
Order of pole (three term test) = 34.2 0
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.3276 1.064
h = 0.003 0.006
y[1] (numeric) = 1.52167971756 1.20857798937
y[1] (closed_form) = 1.52175462939 1.20854927172
absolute error = 8.023e-05
relative error = 0.004128 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
Radius of convergence (three term test) for eq 1 = 3.507
Order of pole (three term test) = 34.21 0
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.3306 1.07
h = 0.0001 0.005
y[1] (numeric) = 1.52876366465 1.2165685047
y[1] (closed_form) = 1.52885363725 1.21653564971
absolute error = 9.578e-05
relative error = 0.004902 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
Radius of convergence (three term test) for eq 1 = 1.579
Order of pole (three term test) = 34.22 0
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.3307 1.075
h = 0.0001 0.003
y[1] (numeric) = 1.53102270739 1.22424556269
y[1] (closed_form) = 1.53110250831 1.22421371394
absolute error = 8.592e-05
relative error = 0.004383 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
Radius of convergence (three term test) for eq 1 = 1.284
Order of pole (three term test) = 34.24 0
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.3308 1.078
h = 0.001 0.001
y[1] (numeric) = 1.53244273027 1.22885357157
y[1] (closed_form) = 1.53252081138 1.22881809111
absolute error = 8.576e-05
relative error = 0.004366 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
Radius of convergence (three term test) for eq 1 = 1.014
Order of pole (three term test) = 34.25 0
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.3318 1.079
h = 0.0001 0.004
y[1] (numeric) = 1.53441805432 1.22998317471
y[1] (closed_form) = 1.53449468473 1.2299462032
absolute error = 8.508e-05
relative error = 0.004326 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
Radius of convergence (three term test) for eq 1 = 6.102
Order of pole (three term test) = 34.25 0
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.3319 1.083
h = 0.003 0.006
y[1] (numeric) = 1.53627180343 1.23614746288
y[1] (closed_form) = 1.53634963915 1.23611882512
absolute error = 8.294e-05
relative error = 0.004206 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
Radius of convergence (three term test) for eq 1 = 3.645
Order of pole (three term test) = 34.27 0
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.3349 1.089
h = 0.0001 0.005
y[1] (numeric) = 1.5435107885 1.24421798544
y[1] (closed_form) = 1.5436040324 1.2441850843
absolute error = 9.888e-05
relative error = 0.004987 %
Correct digits = 4
memory used=559.5MB, alloc=52.3MB, time=6.76
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
Radius of convergence (three term test) for eq 1 = 1.641
Order of pole (three term test) = 34.28 0
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.335 1.094
h = 0.0001 0.003
y[1] (numeric) = 1.54584976485 1.2519991445
y[1] (closed_form) = 1.54593259985 1.2519672926
absolute error = 8.875e-05
relative error = 0.004461 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
Radius of convergence (three term test) for eq 1 = 1.334
Order of pole (three term test) = 34.3 0
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.3351 1.097
h = 0.001 0.001
y[1] (numeric) = 1.54731869564 1.25666942333
y[1] (closed_form) = 1.54739976343 1.25663385777
absolute error = 8.853e-05
relative error = 0.004441 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
Radius of convergence (three term test) for eq 1 = 1.054
Order of pole (three term test) = 34.31 0
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.3361 1.098
h = 0.001 0.003
y[1] (numeric) = 1.54933097623 1.25780473108
y[1] (closed_form) = 1.5494105564 1.25776764231
absolute error = 8.780e-05
relative error = 0.004399 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
Radius of convergence (three term test) for eq 1 = 5.011
Order of pole (three term test) = 34.31 0
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.3371 1.101
h = 0.0001 0.004
y[1] (numeric) = 1.55222490753 1.262083411
y[1] (closed_form) = 1.5523074004 1.2620495499
absolute error = 8.917e-05
relative error = 0.004457 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
Radius of convergence (three term test) for eq 1 = 2.853
Order of pole (three term test) = 34.32 0
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.3372 1.105
h = 0.003 0.006
y[1] (numeric) = 1.55415778225 1.26834899495
y[1] (closed_form) = 1.55423919315 1.26831869129
absolute error = 8.687e-05
relative error = 0.00433 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
Radius of convergence (three term test) for eq 1 = 3.811
Order of pole (three term test) = 34.33 0
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.3402 1.111
h = 0.0001 0.005
y[1] (numeric) = 1.56158294952 1.27651183951
y[1] (closed_form) = 1.56168017573 1.27647711538
absolute error = 0.0001032
relative error = 0.005119 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
Radius of convergence (three term test) for eq 1 = 1.715
Order of pole (three term test) = 34.34 0
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.3403 1.116
h = 0.0001 0.003
y[1] (numeric) = 1.56401911053 1.28441544194
y[1] (closed_form) = 1.5641056488 1.28438182348
absolute error = 9.284e-05
relative error = 0.004587 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
Radius of convergence (three term test) for eq 1 = 1.395
Order of pole (three term test) = 34.36 0
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.3404 1.119
h = 0.001 0.001
y[1] (numeric) = 1.56554747814 1.28915893666
y[1] (closed_form) = 1.56563219128 1.28912150893
absolute error = 9.261e-05
relative error = 0.004567 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
Radius of convergence (three term test) for eq 1 = 1.102
Order of pole (three term test) = 34.37 0
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.3414 1.12
h = 0.001 0.003
y[1] (numeric) = 1.56760387718 1.29030032806
y[1] (closed_form) = 1.56768705832 1.29026134001
absolute error = 9.186e-05
relative error = 0.004525 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
Radius of convergence (three term test) for eq 1 = 5.239
Order of pole (three term test) = 34.37 0
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.3424 1.123
h = 0.0001 0.004
y[1] (numeric) = 1.57058007661 1.29463516704
y[1] (closed_form) = 1.57066625793 1.29459948589
absolute error = 9.328e-05
relative error = 0.004583 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
Radius of convergence (three term test) for eq 1 = 2.983
Order of pole (three term test) = 34.38 0
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.3425 1.127
h = 0.003 0.006
y[1] (numeric) = 1.57259215188 1.30099957928
y[1] (closed_form) = 1.57267723182 1.30096755446
absolute error = 9.091e-05
relative error = 0.004454 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
Radius of convergence (three term test) for eq 1 = 3.984
Order of pole (three term test) = 34.4 0
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.3455 1.133
h = 0.0001 0.005
y[1] (numeric) = 1.58020879036 1.30925673579
y[1] (closed_form) = 1.58031009893 1.30922012769
absolute error = 0.0001077
relative error = 0.005249 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
Radius of convergence (three term test) for eq 1 = 1.793
Order of pole (three term test) = 34.41 0
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.3456 1.138
h = 0.0001 0.003
y[1] (numeric) = 1.58274509 1.31728581686
y[1] (closed_form) = 1.58283542697 1.31725037387
absolute error = 9.704e-05
relative error = 0.004712 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
Radius of convergence (three term test) for eq 1 = 1.458
Order of pole (three term test) = 34.43 0
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.3457 1.141
h = 0.001 0.001
y[1] (numeric) = 1.58433469752 1.3221043337
y[1] (closed_form) = 1.58442314971 1.3220649845
absolute error = 9.681e-05
relative error = 0.004691 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
Radius of convergence (three term test) for eq 1 = 1.152
Order of pole (three term test) = 34.44 0
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.3467 1.142
h = 0.001 0.003
y[1] (numeric) = 1.58643641876 1.32325184954
y[1] (closed_form) = 1.58652329352 1.32321090258
absolute error = 9.604e-05
relative error = 0.004649 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
Radius of convergence (three term test) for eq 1 = 5.477
Order of pole (three term test) = 34.44 0
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.3477 1.145
h = 0.0001 0.004
y[1] (numeric) = 1.58949725419 1.32764412983
y[1] (closed_form) = 1.58958721874 1.32760656979
absolute error = 9.749e-05
relative error = 0.004707 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
Radius of convergence (three term test) for eq 1 = 3.118
Order of pole (three term test) = 34.45 0
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.3478 1.149
h = 0.003 0.006
y[1] (numeric) = 1.59159093166 1.33410980279
y[1] (closed_form) = 1.59167977579 1.33407599991
absolute error = 9.506e-05
relative error = 0.004577 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
Radius of convergence (three term test) for eq 1 = 4.165
Order of pole (three term test) = 34.47 0
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.3508 1.155
h = 0.0001 0.005
y[1] (numeric) = 1.59940443966 1.34246325954
y[1] (closed_form) = 1.59950993207 1.3424247047
absolute error = 0.0001123
relative error = 0.005379 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
Radius of convergence (three term test) for eq 1 = 1.875
Order of pole (three term test) = 34.48 0
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.3509 1.16
h = 0.0001 0.003
y[1] (numeric) = 1.60204390681 1.35062088839
y[1] (closed_form) = 1.60213813922 1.35058356117
absolute error = 0.0001014
relative error = 0.004837 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
Radius of convergence (three term test) for eq 1 = 1.525
Order of pole (three term test) = 34.5 0
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.351 1.163
h = 0.001 0.001
y[1] (numeric) = 1.60369660274 1.35551625349
y[1] (closed_form) = 1.60378888895 1.3554749218
absolute error = 0.0001011
relative error = 0.004815 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
Radius of convergence (three term test) for eq 1 = 1.204
Order of pole (three term test) = 34.51 0
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.352 1.164
h = 0.001 0.003
y[1] (numeric) = 1.60584487202 1.35666992681
y[1] (closed_form) = 1.60593553428 1.35662695953
absolute error = 0.0001003
relative error = 0.004772 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
Radius of convergence (three term test) for eq 1 = 5.725
Order of pole (three term test) = 34.51 0
NO COMPLEX POLE (six term test) for Equation 1
memory used=603.7MB, alloc=52.3MB, time=7.31
x[1] = 0.353 1.167
h = 0.0001 0.004
y[1] (numeric) = 1.60899276333 1.3611209371
y[1] (closed_form) = 1.60908660719 1.36108143761
absolute error = 0.0001018
relative error = 0.004831 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
Radius of convergence (three term test) for eq 1 = 3.26
Order of pole (three term test) = 34.52 0
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.3531 1.171
h = 0.003 0.006
y[1] (numeric) = 1.61117050545 1.36769033035
y[1] (closed_form) = 1.6112632102 1.3676546908
absolute error = 9.932e-05
relative error = 0.004699 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
Radius of convergence (three term test) for eq 1 = 4.354
Order of pole (three term test) = 34.54 0
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.3561 1.177
h = 0.0001 0.005
y[1] (numeric) = 1.61918639351 1.37614207362
y[1] (closed_form) = 1.61929617267 1.37610150738
absolute error = 0.000117
relative error = 0.005507 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
Radius of convergence (three term test) for eq 1 = 1.96
Order of pole (three term test) = 34.55 0
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.3562 1.182
h = 0.0001 0.003
y[1] (numeric) = 1.62193213406 1.38443135392
y[1] (closed_form) = 1.62203035999 1.38439208101
absolute error = 0.0001058
relative error = 0.004961 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
Radius of convergence (three term test) for eq 1 = 1.594
Order of pole (three term test) = 34.57 0
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.3563 1.185
h = 0.001 0.001
y[1] (numeric) = 1.62364981359 1.38940541376
y[1] (closed_form) = 1.62374603009 1.38936203674
absolute error = 0.0001055
relative error = 0.004939 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
Radius of convergence (three term test) for eq 1 = 1.258
Order of pole (three term test) = 34.58 0
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.3573 1.186
h = 0.0001 0.004
y[1] (numeric) = 1.62584587942 1.39056526951
y[1] (closed_form) = 1.62594042431 1.39052021872
absolute error = 0.0001047
relative error = 0.004895 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
Radius of convergence (three term test) for eq 1 = 7.573
Order of pole (three term test) = 34.59 0
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.3574 1.19
h = 0.003 0.006
y[1] (numeric) = 1.62809407501 1.39722146799
y[1] (closed_form) = 1.62819011401 1.3971858739
absolute error = 0.0001024
relative error = 0.004774 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
Radius of convergence (three term test) for eq 1 = 4.523
Order of pole (three term test) = 34.6 0
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.3604 1.196
h = 0.0001 0.005
y[1] (numeric) = 1.63628746269 1.40576190399
y[1] (closed_form) = 1.63640095039 1.40572123301
absolute error = 0.0001206
relative error = 0.005588 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
Radius of convergence (three term test) for eq 1 = 2.036
Order of pole (three term test) = 34.62 0
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.3605 1.201
h = 0.0001 0.003
y[1] (numeric) = 1.63912560815 1.41416833545
y[1] (closed_form) = 1.6392272854 1.41412901341
absolute error = 0.000109
relative error = 0.005036 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
Radius of convergence (three term test) for eq 1 = 1.656
Order of pole (three term test) = 34.64 0
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.3606 1.204
h = 0.001 0.001
y[1] (numeric) = 1.64089980988 1.41921243321
y[1] (closed_form) = 1.64099942297 1.41916891938
absolute error = 0.0001087
relative error = 0.00501 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
Radius of convergence (three term test) for eq 1 = 1.307
Order of pole (three term test) = 34.65 0
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.3616 1.205
h = 0.001 0.003
y[1] (numeric) = 1.64313796097 1.42037821426
y[1] (closed_form) = 1.64323586099 1.42033299292
absolute error = 0.0001078
relative error = 0.004965 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
Radius of convergence (three term test) for eq 1 = 6.218
Order of pole (three term test) = 34.65 0
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.3626 1.208
h = 0.0001 0.004
y[1] (numeric) = 1.64645373127 1.42494306708
y[1] (closed_form) = 1.6465549888 1.42490146738
absolute error = 0.0001095
relative error = 0.005027 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
Radius of convergence (three term test) for eq 1 = 3.54
Order of pole (three term test) = 34.66 0
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.3627 1.212
h = 0.003 0.006
y[1] (numeric) = 1.64879336147 1.4317131746
y[1] (closed_form) = 1.64889344487 1.43167563134
absolute error = 0.0001069
relative error = 0.004895 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
Radius of convergence (three term test) for eq 1 = 4.728
Order of pole (three term test) = 34.68 0
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.3657 1.218
h = 0.0001 0.005
y[1] (numeric) = 1.65719966833 1.44035565541
y[1] (closed_form) = 1.6573176391 1.44031284887
absolute error = 0.0001255
relative error = 0.005716 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
Radius of convergence (three term test) for eq 1 = 2.128
Order of pole (three term test) = 34.69 0
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.3658 1.223
h = 0.0001 0.003
y[1] (numeric) = 1.66015004091 1.44889964712
y[1] (closed_form) = 1.66025589862 1.44885826136
absolute error = 0.0001137
relative error = 0.005158 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
Radius of convergence (three term test) for eq 1 = 1.731
Order of pole (three term test) = 34.72 0
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.3659 1.226
h = 0.001 0.001
y[1] (numeric) = 1.66199285886 1.45402595487
y[1] (closed_form) = 1.66209658567 1.45398027503
absolute error = 0.0001133
relative error = 0.005132 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
Radius of convergence (three term test) for eq 1 = 1.367
Order of pole (three term test) = 34.73 0
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.3669 1.227
h = 0.001 0.003
y[1] (numeric) = 1.66428119189 1.45519795798
y[1] (closed_form) = 1.66438315582 1.45515053172
absolute error = 0.0001125
relative error = 0.005087 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
Radius of convergence (three term test) for eq 1 = 6.499
Order of pole (three term test) = 34.73 0
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.3679 1.23
h = 0.0001 0.004
y[1] (numeric) = 1.66769122486 1.45982529429
y[1] (closed_form) = 1.66779664471 1.459781573
absolute error = 0.0001141
relative error = 0.005149 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
Radius of convergence (three term test) for eq 1 = 3.7
Order of pole (three term test) = 34.74 0
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.368 1.234
h = 0.003 0.006
y[1] (numeric) = 1.67012228501 1.466706345
y[1] (closed_form) = 1.67022651316 1.46666678888
absolute error = 0.0001115
relative error = 0.005015 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
Radius of convergence (three term test) for eq 1 = 4.942
Order of pole (three term test) = 34.76 0
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.371 1.24
h = 0.0001 0.005
y[1] (numeric) = 1.67874735925 1.47545285041
y[1] (closed_form) = 1.67886992039 1.47540783806
absolute error = 0.0001306
relative error = 0.005842 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
Radius of convergence (three term test) for eq 1 = 2.224
Order of pole (three term test) = 34.77 0
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.3711 1.245
h = 0.0001 0.003
y[1] (numeric) = 1.68181329671 1.4841376097
y[1] (closed_form) = 1.68192343697 1.48409409343
absolute error = 0.0001184
relative error = 0.00528 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
Radius of convergence (three term test) for eq 1 = 1.809
Order of pole (three term test) = 34.8 0
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.3712 1.248
h = 0.001 0.001
y[1] (numeric) = 1.68372676662 1.48934803487
y[1] (closed_form) = 1.68383470725 1.48930012076
absolute error = 0.0001181
relative error = 0.005254 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
Radius of convergence (three term test) for eq 1 = 1.428
Order of pole (three term test) = 34.81 0
NO COMPLEX POLE (six term test) for Equation 1
memory used=647.9MB, alloc=52.3MB, time=7.85
x[1] = 0.3722 1.249
h = 0.001 0.003
y[1] (numeric) = 1.68606659822 1.49052626069
y[1] (closed_form) = 1.68617272495 1.49047656089
absolute error = 0.0001172
relative error = 0.005207 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
Radius of convergence (three term test) for eq 1 = 6.793
Order of pole (three term test) = 34.81 0
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.3732 1.252
h = 0.0001 0.004
y[1] (numeric) = 1.68957352773 1.49521739492
y[1] (closed_form) = 1.68968321127 1.4951714843
absolute error = 0.0001189
relative error = 0.00527 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
Radius of convergence (three term test) for eq 1 = 3.867
Order of pole (three term test) = 34.82 0
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.3733 1.256
h = 0.003 0.006
y[1] (numeric) = 1.692098731 1.50221195909
y[1] (closed_form) = 1.69220720568 1.50217032453
absolute error = 0.0001162
relative error = 0.005135 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
Radius of convergence (three term test) for eq 1 = 5.165
Order of pole (three term test) = 34.84 0
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.3763 1.262
h = 0.0001 0.005
y[1] (numeric) = 1.70094854483 1.51106446532
y[1] (closed_form) = 1.7010758052 1.51101717482
absolute error = 0.0001358
relative error = 0.005967 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
Radius of convergence (three term test) for eq 1 = 2.325
Order of pole (three term test) = 34.86 0
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.3764 1.267
h = 0.0001 0.003
y[1] (numeric) = 1.70413347044 1.51989323672
y[1] (closed_form) = 1.7042479968 1.51984752119
absolute error = 0.0001233
relative error = 0.0054 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
Radius of convergence (three term test) for eq 1 = 1.891
Order of pole (three term test) = 34.88 0
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.3765 1.27
h = 0.001 0.001
y[1] (numeric) = 1.70611967986 1.52518970861
y[1] (closed_form) = 1.70623193585 1.52513948999
absolute error = 0.000123
relative error = 0.005374 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
Radius of convergence (three term test) for eq 1 = 1.493
Order of pole (three term test) = 34.89 0
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.3775 1.271
h = 0.001 0.003
y[1] (numeric) = 1.7085123516 1.52637414864
y[1] (closed_form) = 1.70862274142 1.52632210466
absolute error = 0.000122
relative error = 0.005327 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
Radius of convergence (three term test) for eq 1 = 7.1
Order of pole (three term test) = 34.89 0
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.3785 1.274
h = 0.0001 0.004
y[1] (numeric) = 1.71211887061 1.53113040171
y[1] (closed_form) = 1.7122329206 1.53108223201
absolute error = 0.0001238
relative error = 0.00539 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
Radius of convergence (three term test) for eq 1 = 4.042
Order of pole (three term test) = 34.91 0
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.3786 1.278
h = 0.003 0.006
y[1] (numeric) = 1.71474099954 1.53824107938
y[1] (closed_form) = 1.71485382398 1.53819729889
absolute error = 0.000121
relative error = 0.005253 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
Radius of convergence (three term test) for eq 1 = 5.398
Order of pole (three term test) = 34.92 0
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.3816 1.284
h = 0.0001 0.005
y[1] (numeric) = 1.72382165236 1.54720155855
y[1] (closed_form) = 1.72395372242 1.54715191543
absolute error = 0.0001411
relative error = 0.006091 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
Radius of convergence (three term test) for eq 1 = 2.43
Order of pole (three term test) = 34.94 0
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.3817 1.289
h = 0.0001 0.003
y[1] (numeric) = 1.72712907722 1.55617762453
y[1] (closed_form) = 1.72724809471 1.55612963896
absolute error = 0.0001283
relative error = 0.00552 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
Radius of convergence (three term test) for eq 1 = 1.976
Order of pole (three term test) = 34.97 0
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.3818 1.292
h = 0.001 0.001
y[1] (numeric) = 1.72919016693 1.5615620947
y[1] (closed_form) = 1.72930684123 1.56150949926
absolute error = 0.000128
relative error = 0.005493 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
Radius of convergence (three term test) for eq 1 = 1.56
Order of pole (three term test) = 34.98 0
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.3828 1.293
h = 0.0001 0.004
y[1] (numeric) = 1.73163704592 1.56275273094
y[1] (closed_form) = 1.7317518005 1.56269827007
absolute error = 0.000127
relative error = 0.005446 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
Radius of convergence (three term test) for eq 1 = 9.389
Order of pole (three term test) = 34.98 0
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.3829 1.297
h = 0.003 0.006
y[1] (numeric) = 1.73434037025 1.56996047602
y[1] (closed_form) = 1.73445697558 1.56991668882
absolute error = 0.0001246
relative error = 0.005324 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
Radius of convergence (three term test) for eq 1 = 5.608
Order of pole (three term test) = 35 0
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.3859 1.303
h = 0.0001 0.005
y[1] (numeric) = 1.74362338725 1.57901832148
y[1] (closed_form) = 1.7437596426 1.57896849362
absolute error = 0.0001451
relative error = 0.006167 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
Radius of convergence (three term test) for eq 1 = 2.524
Order of pole (three term test) = 35.02 0
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.386 1.308
h = 0.0001 0.003
y[1] (numeric) = 1.74703732729 1.58812534947
y[1] (closed_form) = 1.74716025038 1.58807724939
absolute error = 0.000132
relative error = 0.005591 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
Radius of convergence (three term test) for eq 1 = 2.053
Order of pole (three term test) = 35.04 0
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.3861 1.311
h = 0.001 0.001
y[1] (numeric) = 1.74916354717 1.59358807337
y[1] (closed_form) = 1.74928406394 1.59353526936
absolute error = 0.0001316
relative error = 0.00556 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
Radius of convergence (three term test) for eq 1 = 1.621
Order of pole (three term test) = 35.06 0
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.3871 1.312
h = 0.001 0.003
y[1] (numeric) = 1.75165812731 1.59478468955
y[1] (closed_form) = 1.75177667772 1.59472998465
absolute error = 0.0001306
relative error = 0.005511 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
Radius of convergence (three term test) for eq 1 = 7.708
Order of pole (three term test) = 35.06 0
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.3881 1.315
h = 0.0001 0.004
y[1] (numeric) = 1.75545652205 1.59966691626
y[1] (closed_form) = 1.75557893084 1.59961624775
absolute error = 0.0001325
relative error = 0.005578 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
Radius of convergence (three term test) for eq 1 = 4.388
Order of pole (three term test) = 35.07 0
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.3882 1.319
h = 0.003 0.006
y[1] (numeric) = 1.75826520073 1.60700191472
y[1] (closed_form) = 1.75838635273 1.60695585189
absolute error = 0.0001296
relative error = 0.005441 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
Radius of convergence (three term test) for eq 1 = 5.861
Order of pole (three term test) = 35.09 0
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.3912 1.325
h = 0.0001 0.005
y[1] (numeric) = 1.76779073257 1.61617146648
y[1] (closed_form) = 1.76793200853 1.61611914291
absolute error = 0.0001507
relative error = 0.00629 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
Radius of convergence (three term test) for eq 1 = 2.638
Order of pole (three term test) = 35.11 0
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.3913 1.33
h = 0.0001 0.003
y[1] (numeric) = 1.77133390693 1.62543204456
y[1] (closed_form) = 1.77146152156 1.62538153844
absolute error = 0.0001372
relative error = 0.005709 %
Correct digits = 4
memory used=692.3MB, alloc=52.3MB, time=8.40
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
Radius of convergence (three term test) for eq 1 = 2.145
Order of pole (three term test) = 35.14 0
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.3914 1.333
h = 0.001 0.001
y[1] (numeric) = 1.77353911332 1.6309864858
y[1] (closed_form) = 1.77366424479 1.63093116603
absolute error = 0.0001368
relative error = 0.005678 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
Radius of convergence (three term test) for eq 1 = 1.694
Order of pole (three term test) = 35.15 0
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.3924 1.334
h = 0.001 0.003
y[1] (numeric) = 1.77609051518 1.63218925534
y[1] (closed_form) = 1.77621362428 1.63213199384
absolute error = 0.0001358
relative error = 0.005629 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
Radius of convergence (three term test) for eq 1 = 8.056
Order of pole (three term test) = 35.15 0
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.3934 1.337
h = 0.0001 0.004
y[1] (numeric) = 1.77999652729 1.63714044986
y[1] (closed_form) = 1.78012360568 1.63708731254
absolute error = 0.0001377
relative error = 0.005695 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
Radius of convergence (three term test) for eq 1 = 4.586
Order of pole (three term test) = 35.16 0
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.3935 1.341
h = 0.003 0.006
y[1] (numeric) = 1.78291045984 1.64459920541
y[1] (closed_form) = 1.78303626608 1.64455079361
absolute error = 0.0001348
relative error = 0.005557 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
Radius of convergence (three term test) for eq 1 = 6.125
Order of pole (three term test) = 35.19 0
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.3965 1.347
h = 0.0001 0.005
y[1] (numeric) = 1.79268498791 1.65388242256
y[1] (closed_form) = 1.79283139978 1.6538275224
absolute error = 0.0001564
relative error = 0.006411 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
Radius of convergence (three term test) for eq 1 = 2.757
Order of pole (three term test) = 35.2 0
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.3966 1.352
h = 0.0001 0.003
y[1] (numeric) = 1.79636117174 1.6632999465
y[1] (closed_form) = 1.79649358741 1.66324695748
absolute error = 0.0001426
relative error = 0.005826 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
Radius of convergence (three term test) for eq 1 = 2.242
Order of pole (three term test) = 35.23 0
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.3967 1.355
h = 0.001 0.001
y[1] (numeric) = 1.79864766545 1.6689481232
y[1] (closed_form) = 1.79877751885 1.66889020918
absolute error = 0.0001422
relative error = 0.005795 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
Radius of convergence (three term test) for eq 1 = 1.77
Order of pole (three term test) = 35.25 0
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.3977 1.356
h = 0.001 0.003
y[1] (numeric) = 1.80125733277 1.67015699943
y[1] (closed_form) = 1.80138510642 1.67009710244
absolute error = 0.0001411
relative error = 0.005745 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
Radius of convergence (three term test) for eq 1 = 8.419
Order of pole (three term test) = 35.25 0
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.3987 1.359
h = 0.0001 0.004
y[1] (numeric) = 1.80527389781 1.67517850817
y[1] (closed_form) = 1.80540575442 1.67512282409
absolute error = 0.0001431
relative error = 0.005812 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
Radius of convergence (three term test) for eq 1 = 4.793
Order of pole (three term test) = 35.26 0
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.3988 1.363
h = 0.003 0.006
y[1] (numeric) = 1.80829615225 1.68276374185
y[1] (closed_form) = 1.8084267219 1.68271290559
absolute error = 0.0001401
relative error = 0.005672 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
Radius of convergence (three term test) for eq 1 = 6.402
Order of pole (three term test) = 35.28 0
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.4018 1.369
h = 0.0001 0.005
y[1] (numeric) = 1.81832629801 1.69216257723
y[1] (closed_form) = 1.81847796281 1.69210501722
absolute error = 0.0001622
relative error = 0.006531 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
Radius of convergence (three term test) for eq 1 = 2.881
Order of pole (three term test) = 35.3 0
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.4019 1.374
h = 0.0001 0.003
y[1] (numeric) = 1.8221393637 1.70174048335
y[1] (closed_form) = 1.8222766915 1.70168493229
absolute error = 0.0001481
relative error = 0.005941 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
Radius of convergence (three term test) for eq 1 = 2.343
Order of pole (three term test) = 35.33 0
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.402 1.377
h = 0.001 0.001
y[1] (numeric) = 1.82450950445 1.70748443737
y[1] (closed_form) = 1.82464418855 1.70742384834
absolute error = 0.0001477
relative error = 0.00591 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
Radius of convergence (three term test) for eq 1 = 1.85
Order of pole (three term test) = 35.35 0
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.403 1.378
h = 0.001 0.003
y[1] (numeric) = 1.82717890896 1.70869936284
y[1] (closed_form) = 1.82731145453 1.70863674915
absolute error = 0.0001466
relative error = 0.00586 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
Radius of convergence (three term test) for eq 1 = 8.799
Order of pole (three term test) = 35.35 0
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.404 1.381
h = 0.0001 0.004
y[1] (numeric) = 1.83130902928 1.71379253847
y[1] (closed_form) = 1.83144577433 1.71373422742
absolute error = 0.0001487
relative error = 0.005927 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
Radius of convergence (three term test) for eq 1 = 5.009
Order of pole (three term test) = 35.36 0
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.4041 1.385
h = 0.003 0.006
y[1] (numeric) = 1.83444275254 1.72150700373
y[1] (closed_form) = 1.83457819635 1.72145366529
absolute error = 0.0001456
relative error = 0.005786 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
Radius of convergence (three term test) for eq 1 = 6.69
Order of pole (three term test) = 35.38 0
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.4071 1.391
h = 0.0001 0.005
y[1] (numeric) = 1.84473528093 1.73102340327
y[1] (closed_form) = 1.84489231748 1.73096309771
absolute error = 0.0001682
relative error = 0.006649 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
Radius of convergence (three term test) for eq 1 = 3.011
Order of pole (three term test) = 35.4 0
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.4072 1.396
h = 0.0001 0.003
y[1] (numeric) = 1.84868920068 1.74076516908
y[1] (closed_form) = 1.84883155335 1.74070697454
absolute error = 0.0001538
relative error = 0.006056 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
Radius of convergence (three term test) for eq 1 = 2.448
Order of pole (three term test) = 35.43 0
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.4073 1.399
h = 0.001 0.001
y[1] (numeric) = 1.85114540866 1.74660696647
y[1] (closed_form) = 1.85128503383 1.7465436193
absolute error = 0.0001533
relative error = 0.006024 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
Radius of convergence (three term test) for eq 1 = 1.934
Order of pole (three term test) = 35.45 0
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.4083 1.4
h = 0.003 0.006
y[1] (numeric) = 1.85387605075 1.74782787253
y[1] (closed_form) = 1.85401347716 1.74776245861
absolute error = 0.0001522
relative error = 0.005973 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
Radius of convergence (three term test) for eq 1 = 19.51
Order of pole (three term test) = 35.45 0
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.4113 1.406
h = 0.0001 0.005
y[1] (numeric) = 1.86434407867 1.75740287158
y[1] (closed_form) = 1.86451544948 1.75734688534
absolute error = 0.0001803
relative error = 0.007036 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
Radius of convergence (three term test) for eq 1 = 3.103
Order of pole (three term test) = 35.47 0
NO COMPLEX POLE (six term test) for Equation 1
memory used=736.5MB, alloc=52.3MB, time=8.95
x[1] = 0.4114 1.411
h = 0.0001 0.003
y[1] (numeric) = 1.8684014811 1.76725572341
y[1] (closed_form) = 1.86855792855 1.76720192988
absolute error = 0.0001654
relative error = 0.006433 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
Radius of convergence (three term test) for eq 1 = 2.523
Order of pole (three term test) = 35.5 0
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.4115 1.414
h = 0.001 0.001
y[1] (numeric) = 1.87092085738 1.77316379497
y[1] (closed_form) = 1.87107451533 1.77310477112
absolute error = 0.0001646
relative error = 0.006386 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
Radius of convergence (three term test) for eq 1 = 1.992
Order of pole (three term test) = 35.52 0
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.4125 1.415
h = 0.001 0.003
y[1] (numeric) = 1.873694658 1.77438718072
y[1] (closed_form) = 1.87384607382 1.77432606248
absolute error = 0.0001633
relative error = 0.006327 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
Radius of convergence (three term test) for eq 1 = 9.475
Order of pole (three term test) = 35.52 0
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.4135 1.418
h = 0.0001 0.004
y[1] (numeric) = 1.87802532861 1.77960137521
y[1] (closed_form) = 1.87818114954 1.77954471017
absolute error = 0.0001658
relative error = 0.006408 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
Radius of convergence (three term test) for eq 1 = 5.394
Order of pole (three term test) = 35.53 0
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.4136 1.422
h = 0.003 0.006
y[1] (numeric) = 1.88135797301 1.78753731732
y[1] (closed_form) = 1.88151247317 1.78748584172
absolute error = 0.0001628
relative error = 0.006275 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
Radius of convergence (three term test) for eq 1 = 7.205
Order of pole (three term test) = 35.56 0
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.4166 1.428
h = 0.0001 0.005
y[1] (numeric) = 1.89211219698 1.79724954857
y[1] (closed_form) = 1.8922891419 1.79719066332
absolute error = 0.0001865
relative error = 0.007146 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
Radius of convergence (three term test) for eq 1 = 3.242
Order of pole (three term test) = 35.58 0
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.4167 1.433
h = 0.0001 0.003
y[1] (numeric) = 1.89631748174 1.80727211922
y[1] (closed_form) = 1.89647914599 1.8072155364
absolute error = 0.0001713
relative error = 0.006538 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
Radius of convergence (three term test) for eq 1 = 2.637
Order of pole (three term test) = 35.61 0
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.4168 1.436
h = 0.001 0.001
y[1] (numeric) = 1.89892720528 1.81328151281
y[1] (closed_form) = 1.89908599201 1.81321958215
absolute error = 0.0001704
relative error = 0.006491 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
Radius of convergence (three term test) for eq 1 = 2.082
Order of pole (three term test) = 35.63 0
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.4178 1.437
h = 0.001 0.003
y[1] (numeric) = 1.90176484042 1.81451069745
y[1] (closed_form) = 1.90192132225 1.81444662962
absolute error = 0.0001691
relative error = 0.006433 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
Radius of convergence (three term test) for eq 1 = 9.902
Order of pole (three term test) = 35.63 0
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.4188 1.44
h = 0.0001 0.004
y[1] (numeric) = 1.90621751505 1.81980014383
y[1] (closed_form) = 1.90637852656 1.8197406215
absolute error = 0.0001717
relative error = 0.006513 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
Radius of convergence (three term test) for eq 1 = 5.637
Order of pole (three term test) = 35.64 0
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.4189 1.444
h = 0.003 0.006
y[1] (numeric) = 1.90967056608 1.82787279709
y[1] (closed_form) = 1.90983024418 1.82781859604
absolute error = 0.0001686
relative error = 0.006379 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
Radius of convergence (three term test) for eq 1 = 7.529
Order of pole (three term test) = 35.67 0
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.4219 1.45
h = 0.0001 0.005
y[1] (numeric) = 1.92070614327 1.83770760075
y[1] (closed_form) = 1.92088878598 1.83764572385
absolute error = 0.0001928
relative error = 0.007254 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
Radius of convergence (three term test) for eq 1 = 3.388
Order of pole (three term test) = 35.69 0
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.422 1.455
h = 0.0001 0.003
y[1] (numeric) = 1.9250635651 1.84790347898
y[1] (closed_form) = 1.92523056339 1.84784401885
absolute error = 0.0001773
relative error = 0.006643 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
Radius of convergence (three term test) for eq 1 = 2.755
Order of pole (three term test) = 35.72 0
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.4221 1.458
h = 0.001 0.001
y[1] (numeric) = 1.9277662272 1.85401632578
y[1] (closed_form) = 1.92793025742 1.85395139853
absolute error = 0.0001764
relative error = 0.006596 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
Radius of convergence (three term test) for eq 1 = 2.176
Order of pole (three term test) = 35.74 0
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.4231 1.459
h = 0.001 0.003
y[1] (numeric) = 1.93066927728 1.85525120793
y[1] (closed_form) = 1.93083093826 1.85518410029
absolute error = 0.000175
relative error = 0.006537 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
Radius of convergence (three term test) for eq 1 = 10.35
Order of pole (three term test) = 35.74 0
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.4241 1.462
h = 0.0001 0.004
y[1] (numeric) = 1.93524721962 1.86061727934
y[1] (closed_form) = 1.93541353796 1.86055481053
absolute error = 0.0001777
relative error = 0.006618 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
Radius of convergence (three term test) for eq 1 = 5.891
Order of pole (three term test) = 35.76 0
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.4242 1.466
h = 0.003 0.006
y[1] (numeric) = 1.93882413429 1.86882951895
y[1] (closed_form) = 1.93898910722 1.86877250597
absolute error = 0.0001745
relative error = 0.006482 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
Radius of convergence (three term test) for eq 1 = 7.868
Order of pole (three term test) = 35.78 0
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.4272 1.472
h = 0.0001 0.005
y[1] (numeric) = 1.95014838971 1.87878880523
y[1] (closed_form) = 1.95033685578 1.87872384136
absolute error = 0.0001993
relative error = 0.007361 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
Radius of convergence (three term test) for eq 1 = 3.541
Order of pole (three term test) = 35.8 0
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.4273 1.477
h = 0.0001 0.003
y[1] (numeric) = 1.9546623131 1.88916162335
y[1] (closed_form) = 1.95483476446 1.88909919533
absolute error = 0.0001834
relative error = 0.006747 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
Radius of convergence (three term test) for eq 1 = 2.879
Order of pole (three term test) = 35.84 0
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.4274 1.48
h = 0.001 0.001
y[1] (numeric) = 1.95746057162 1.89538008003
y[1] (closed_form) = 1.95762996169 1.89531206382
absolute error = 0.0001825
relative error = 0.006699 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
Radius of convergence (three term test) for eq 1 = 2.274
Order of pole (three term test) = 35.86 0
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.4284 1.481
h = 0.0001 0.004
y[1] (numeric) = 1.9604306482 1.89662054567
y[1] (closed_form) = 1.96059760312 1.8965503054
absolute error = 0.0001811
relative error = 0.00664 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
Radius of convergence (three term test) for eq 1 = 13.68
Order of pole (three term test) = 35.86 0
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.4285 1.485
h = 0.003 0.006
y[1] (numeric) = 1.96411126424 1.9049492998
y[1] (closed_form) = 1.96428090481 1.90489213211
absolute error = 0.000179
relative error = 0.006542 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
Radius of convergence (three term test) for eq 1 = 8.173
Order of pole (three term test) = 35.89 0
NO COMPLEX POLE (six term test) for Equation 1
memory used=780.8MB, alloc=52.3MB, time=9.50
x[1] = 0.4315 1.491
h = 0.0001 0.005
y[1] (numeric) = 1.9756884789 1.91502081863
y[1] (closed_form) = 1.97588207807 1.91495546245
absolute error = 0.0002043
relative error = 0.007426 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
Radius of convergence (three term test) for eq 1 = 3.678
Order of pole (three term test) = 35.91 0
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.4316 1.496
h = 0.0001 0.003
y[1] (numeric) = 1.98033852711 1.92555082017
y[1] (closed_form) = 1.98051578594 1.92548810173
absolute error = 0.000188
relative error = 0.006807 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
Radius of convergence (three term test) for eq 1 = 2.991
Order of pole (three term test) = 35.94 0
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.4317 1.499
h = 0.001 0.001
y[1] (numeric) = 1.98321995871 1.93186311216
y[1] (closed_form) = 1.98339407536 1.93179469868
absolute error = 0.0001871
relative error = 0.006757 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
Radius of convergence (three term test) for eq 1 = 2.362
Order of pole (three term test) = 35.97 0
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.4327 1.5
h = 0.001 0.003
y[1] (numeric) = 1.98624897985 1.93310910771
y[1] (closed_form) = 1.98642060384 1.93303843142
absolute error = 0.0001856
relative error = 0.006696 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
Radius of convergence (three term test) for eq 1 = 11.23
Order of pole (three term test) = 35.97 0
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.4337 1.503
h = 0.0001 0.004
y[1] (numeric) = 1.99106800907 1.93862302208
y[1] (closed_form) = 1.99124453546 1.93855716263
absolute error = 0.0001884
relative error = 0.00678 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
Radius of convergence (three term test) for eq 1 = 6.394
Order of pole (three term test) = 35.98 0
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.4338 1.507
h = 0.003 0.006
y[1] (numeric) = 1.99488316741 1.94710434802
y[1] (closed_form) = 1.99505832615 1.94704420219
absolute error = 0.0001852
relative error = 0.006643 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
Radius of convergence (three term test) for eq 1 = 8.541
Order of pole (three term test) = 36.01 0
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.4368 1.513
h = 0.0001 0.005
y[1] (numeric) = 2.00676309853 1.95730396699
y[1] (closed_form) = 2.00696276114 1.95723534058
absolute error = 0.0002111
relative error = 0.007531 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
Radius of convergence (three term test) for eq 1 = 3.844
Order of pole (three term test) = 36.03 0
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.4369 1.518
h = 0.0001 0.003
y[1] (numeric) = 2.01157802707 1.96801784055
y[1] (closed_form) = 2.01176096637 1.96795198011
absolute error = 0.0001944
relative error = 0.006909 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
Radius of convergence (three term test) for eq 1 = 3.126
Order of pole (three term test) = 36.07 0
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.437 1.521
h = 0.001 0.001
y[1] (numeric) = 2.01456015715 1.9744398582
y[1] (closed_form) = 2.014739856 1.97436817816
absolute error = 0.0001935
relative error = 0.006858 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
Radius of convergence (three term test) for eq 1 = 2.468
Order of pole (three term test) = 36.09 0
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.438 1.522
h = 0.001 0.003
y[1] (numeric) = 2.01765929061 1.97569120999
y[1] (closed_form) = 2.01783642784 1.97561722263
absolute error = 0.000192
relative error = 0.006798 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
Radius of convergence (three term test) for eq 1 = 11.74
Order of pole (three term test) = 36.09 0
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.439 1.525
h = 0.0001 0.004
y[1] (numeric) = 2.02261332796 1.98128575064
y[1] (closed_form) = 2.02279550466 1.98121667646
absolute error = 0.0001948
relative error = 0.006881 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
Radius of convergence (three term test) for eq 1 = 6.682
Order of pole (three term test) = 36.11 0
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.4391 1.529
h = 0.003 0.006
y[1] (numeric) = 2.02656270351 1.98991512666
y[1] (closed_form) = 2.02674350247 1.98985190887
absolute error = 0.0001915
relative error = 0.006743 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
Radius of convergence (three term test) for eq 1 = 8.925
Order of pole (three term test) = 36.14 0
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.4421 1.535
h = 0.0001 0.005
y[1] (numeric) = 2.03875314616 2.00024472539
y[1] (closed_form) = 2.03895900344 2.00017272536
absolute error = 0.0002181
relative error = 0.007635 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
Radius of convergence (three term test) for eq 1 = 4.017
Order of pole (three term test) = 36.16 0
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.4422 1.54
h = 0.0001 0.003
y[1] (numeric) = 2.04373764891 2.01114623275
y[1] (closed_form) = 2.04392639296 2.01107713205
absolute error = 0.000201
relative error = 0.00701 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
Radius of convergence (three term test) for eq 1 = 3.266
Order of pole (three term test) = 36.2 0
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.4423 1.543
h = 0.001 0.001
y[1] (numeric) = 2.04682333482 2.01768020852
y[1] (closed_form) = 2.04700873732 2.01760516178
absolute error = 0.0002
relative error = 0.006959 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
Radius of convergence (three term test) for eq 1 = 2.579
Order of pole (three term test) = 36.22 0
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.4433 1.544
h = 0.001 0.003
y[1] (numeric) = 2.04999428541 2.01893676429
y[1] (closed_form) = 2.05017705561 2.01885936525
absolute error = 0.0001985
relative error = 0.006898 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
Radius of convergence (three term test) for eq 1 = 12.27
Order of pole (three term test) = 36.22 0
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.4443 1.547
h = 0.0001 0.004
y[1] (numeric) = 2.0550868943 2.02461332654
y[1] (closed_form) = 2.05527484447 2.02454093809
absolute error = 0.0002014
relative error = 0.006981 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
Radius of convergence (three term test) for eq 1 = 6.983
Order of pole (three term test) = 36.24 0
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.4444 1.551
h = 0.003 0.006
y[1] (numeric) = 2.05917430019 2.0333937659
y[1] (closed_form) = 2.05936086328 2.0333273796
absolute error = 0.000198
relative error = 0.006842 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
Radius of convergence (three term test) for eq 1 = 9.326
Order of pole (three term test) = 36.27 0
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.4474 1.557
h = 0.0001 0.005
y[1] (numeric) = 2.07168322131 2.04385521087
y[1] (closed_form) = 2.07189540655 2.0437797308
absolute error = 0.0002252
relative error = 0.007738 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
Radius of convergence (three term test) for eq 1 = 4.197
Order of pole (three term test) = 36.29 0
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.4475 1.562
h = 0.0001 0.003
y[1] (numeric) = 2.07684211326 2.0549481598
y[1] (closed_form) = 2.0770367882 2.05487571776
absolute error = 0.0002077
relative error = 0.007109 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
Radius of convergence (three term test) for eq 1 = 3.413
Order of pole (three term test) = 36.33 0
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.4476 1.565
h = 0.001 0.001
y[1] (numeric) = 2.08003428566 2.06159635304
y[1] (closed_form) = 2.08022551506 2.06151783657
absolute error = 0.0002067
relative error = 0.007058 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
Radius of convergence (three term test) for eq 1 = 2.695
Order of pole (three term test) = 36.36 0
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.4486 1.566
h = 0.001 0.003
y[1] (numeric) = 2.08327879214 2.06285794616
y[1] (closed_form) = 2.08346731681 2.06277703198
absolute error = 0.0002052
relative error = 0.006997 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
Radius of convergence (three term test) for eq 1 = 12.82
Order of pole (three term test) = 36.36 0
NO COMPLEX POLE (six term test) for Equation 1
memory used=825.3MB, alloc=52.3MB, time=10.05
x[1] = 0.4496 1.569
h = 0.0001 0.004
y[1] (numeric) = 2.08851361828 2.0686179304
y[1] (closed_form) = 2.08870746695 2.06854212527
absolute error = 0.0002081
relative error = 0.007081 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
Radius of convergence (three term test) for eq 1 = 7.297
Order of pole (three term test) = 36.37 0
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.4497 1.573
h = 0.003 0.006
y[1] (numeric) = 2.0927429658 2.07755248305
y[1] (closed_form) = 2.09293541882 2.07748282889
absolute error = 0.0002047
relative error = 0.00694 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
Radius of convergence (three term test) for eq 1 = 9.746
Order of pole (three term test) = 36.41 0
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.4527 1.579
h = 0.0001 0.005
y[1] (numeric) = 2.10557850829 2.08814762656
y[1] (closed_form) = 2.10579715686 2.08806855701
absolute error = 0.0002325
relative error = 0.00784 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
Radius of convergence (three term test) for eq 1 = 4.386
Order of pole (three term test) = 36.43 0
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.4528 1.584
h = 0.0001 0.003
y[1] (numeric) = 2.11091672857 2.09943587144
y[1] (closed_form) = 2.11111746249 2.09935998408
absolute error = 0.0002146
relative error = 0.007208 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
Radius of convergence (three term test) for eq 1 = 3.567
Order of pole (three term test) = 36.47 0
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.4529 1.587
h = 0.001 0.001
y[1] (numeric) = 2.11421839333 2.10620056874
y[1] (closed_form) = 2.11441557471 2.1061184766
absolute error = 0.0002136
relative error = 0.007157 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
Radius of convergence (three term test) for eq 1 = 2.817
Order of pole (three term test) = 36.5 0
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.4539 1.588
h = 0.0001 0.004
y[1] (numeric) = 2.11753822916 2.10746701773
y[1] (closed_form) = 2.1177326316 2.10738248198
absolute error = 0.000212
relative error = 0.007096 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
Radius of convergence (three term test) for eq 1 = 16.95
Order of pole (three term test) = 36.5 0
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.454 1.592
h = 0.003 0.006
y[1] (numeric) = 2.12188638473 2.11653012577
y[1] (closed_form) = 2.12208407645 2.11646019845
absolute error = 0.0002097
relative error = 0.006997 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
Radius of convergence (three term test) for eq 1 = 10.12
Order of pole (three term test) = 36.53 0
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.457 1.598
h = 0.0001 0.005
y[1] (numeric) = 2.13500810765 2.12724585028
y[1] (closed_form) = 2.13523250029 2.12716622938
absolute error = 0.0002381
relative error = 0.0079 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
Radius of convergence (three term test) for eq 1 = 4.556
Order of pole (three term test) = 36.56 0
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.4571 1.603
h = 0.0001 0.003
y[1] (numeric) = 2.14050235029 2.13870754052
y[1] (closed_form) = 2.14070847248 2.13863122546
absolute error = 0.0002198
relative error = 0.007264 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
Radius of convergence (three term test) for eq 1 = 3.705
Order of pole (three term test) = 36.6 0
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.4572 1.606
h = 0.001 0.001
y[1] (numeric) = 2.14389930287 2.14557572715
y[1] (closed_form) = 2.14410177957 2.14549309219
absolute error = 0.0002187
relative error = 0.00721 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
Radius of convergence (three term test) for eq 1 = 2.926
Order of pole (three term test) = 36.62 0
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.4582 1.607
h = 0.001 0.003
y[1] (numeric) = 2.1472853723 2.1468471256
y[1] (closed_form) = 2.14748500526 2.14676200624
absolute error = 0.000217
relative error = 0.007147 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
Radius of convergence (three term test) for eq 1 = 13.91
Order of pole (three term test) = 36.62 0
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.4592 1.61
h = 0.0001 0.004
y[1] (numeric) = 2.15279379165 2.15276788296
y[1] (closed_form) = 2.15299902511 2.15268806063
absolute error = 0.0002202
relative error = 0.007233 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
Radius of convergence (three term test) for eq 1 = 7.92
Order of pole (three term test) = 36.64 0
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.4593 1.614
h = 0.003 0.006
y[1] (numeric) = 2.15729609283 2.16199925521
y[1] (closed_form) = 2.15749991496 2.16192586907
absolute error = 0.0002166
relative error = 0.007093 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
Radius of convergence (three term test) for eq 1 = 10.58
Order of pole (three term test) = 36.68 0
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.4623 1.62
h = 0.0001 0.005
y[1] (numeric) = 2.17076005008 2.17285218578
y[1] (closed_form) = 2.17099116495 2.17276876495
absolute error = 0.0002457
relative error = 0.008 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
Radius of convergence (three term test) for eq 1 = 4.761
Order of pole (three term test) = 36.7 0
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.4624 1.625
h = 0.0001 0.003
y[1] (numeric) = 2.17644310565 2.18451653268
y[1] (closed_form) = 2.17665553172 2.18443657237
absolute error = 0.000227
relative error = 0.00736 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
Radius of convergence (three term test) for eq 1 = 3.872
Order of pole (three term test) = 36.75 0
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.4625 1.628
h = 0.001 0.001
y[1] (numeric) = 2.17995532244 2.19150558986
y[1] (closed_form) = 2.18016399027 2.19141917551
absolute error = 0.0002259
relative error = 0.007306 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
Radius of convergence (three term test) for eq 1 = 3.057
Order of pole (three term test) = 36.78 0
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.4635 1.629
h = 0.001 0.003
y[1] (numeric) = 2.18342011886 2.19278148735
y[1] (closed_form) = 2.18362586529 2.19269254182
absolute error = 0.0002241
relative error = 0.007243 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
Radius of convergence (three term test) for eq 1 = 14.54
Order of pole (three term test) = 36.78 0
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.4645 1.632
h = 0.0001 0.004
y[1] (numeric) = 2.18908164061 2.19878974585
y[1] (closed_form) = 2.18929314216 2.19870619901
absolute error = 0.0002274
relative error = 0.007329 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
Radius of convergence (three term test) for eq 1 = 8.277
Order of pole (three term test) = 36.79 0
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.4646 1.636
h = 0.003 0.006
y[1] (numeric) = 2.19373759951 2.20818421414
y[1] (closed_form) = 2.19394768349 2.20810726147
absolute error = 0.0002237
relative error = 0.007188 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
Radius of convergence (three term test) for eq 1 = 11.05
Order of pole (three term test) = 36.83 0
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.4676 1.642
h = 0.0001 0.005
y[1] (numeric) = 2.20755246072 2.21917615884
y[1] (closed_form) = 2.20779043935 2.21908881943
absolute error = 0.0002535
relative error = 0.008098 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
Radius of convergence (three term test) for eq 1 = 4.975
Order of pole (three term test) = 36.86 0
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.4677 1.647
h = 0.0001 0.003
y[1] (numeric) = 2.21342964059 2.23104715504
y[1] (closed_form) = 2.21364850434 2.23096343677
absolute error = 0.0002343
relative error = 0.007456 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
Radius of convergence (three term test) for eq 1 = 4.046
Order of pole (three term test) = 36.9 0
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.4678 1.65
h = 0.001 0.001
y[1] (numeric) = 2.21706035286 2.23815945014
y[1] (closed_form) = 2.21727534242 2.23806914163
absolute error = 0.0002332
relative error = 0.007402 %
Correct digits = 4
memory used=869.7MB, alloc=52.3MB, time=10.60
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
Radius of convergence (three term test) for eq 1 = 3.195
Order of pole (three term test) = 36.93 0
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.4688 1.651
h = 0.001 0.003
y[1] (numeric) = 2.22060575351 2.23943962033
y[1] (closed_form) = 2.22081774208 2.23934673338
absolute error = 0.0002314
relative error = 0.007339 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
Radius of convergence (three term test) for eq 1 = 15.19
Order of pole (three term test) = 36.93 0
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.4698 1.654
h = 0.0001 0.004
y[1] (numeric) = 2.22642436011 2.2455367989
y[1] (closed_form) = 2.2266422623 2.24544941343
absolute error = 0.0002348
relative error = 0.007424 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
Radius of convergence (three term test) for eq 1 = 8.649
Order of pole (three term test) = 36.95 0
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.4699 1.658
h = 0.003 0.006
y[1] (numeric) = 2.23123829045 2.25509756054
y[1] (closed_form) = 2.23145476971 2.25501693053
absolute error = 0.000231
relative error = 0.007282 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
Radius of convergence (three term test) for eq 1 = 11.55
Order of pole (three term test) = 36.99 0
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.4729 1.664
h = 0.0001 0.005
y[1] (numeric) = 2.24541291764 2.26623030896
y[1] (closed_form) = 2.24565790377 2.26613892894
absolute error = 0.0002615
relative error = 0.008196 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
Radius of convergence (three term test) for eq 1 = 5.199
Order of pole (three term test) = 37.02 0
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.473 1.669
h = 0.0001 0.003
y[1] (numeric) = 2.25148966987 2.27831199608
y[1] (closed_form) = 2.25171510718 2.27822440391
absolute error = 0.0002419
relative error = 0.00755 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
Radius of convergence (three term test) for eq 1 = 4.228
Order of pole (three term test) = 37.06 0
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.4731 1.672
h = 0.001 0.001
y[1] (numeric) = 2.25524219166 2.28554992499
y[1] (closed_form) = 2.25546363553 2.28545560429
absolute error = 0.0002407
relative error = 0.007496 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
Radius of convergence (three term test) for eq 1 = 3.338
Order of pole (three term test) = 37.09 0
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.4741 1.673
h = 0.001 0.003
y[1] (numeric) = 2.25887011153 2.28683412469
y[1] (closed_form) = 2.25908847285 2.28673717781
absolute error = 0.0002389
relative error = 0.007433 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
Radius of convergence (three term test) for eq 1 = 15.88
Order of pole (three term test) = 37.09 0
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.4751 1.676
h = 0.0001 0.004
y[1] (numeric) = 2.26484987777 2.29302164618
y[1] (closed_form) = 2.26507431519 2.29293030469
absolute error = 0.0002423
relative error = 0.007518 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
Radius of convergence (three term test) for eq 1 = 9.038
Order of pole (three term test) = 37.11 0
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.4752 1.68
h = 0.003 0.006
y[1] (numeric) = 2.26982620408 2.30275193743
y[1] (closed_form) = 2.27004921414 2.30266751613
absolute error = 0.0002385
relative error = 0.007375 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
Radius of convergence (three term test) for eq 1 = 12.07
Order of pole (three term test) = 37.15 0
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.4782 1.686
h = 0.0001 0.005
y[1] (numeric) = 2.28436965614 2.31402725948
y[1] (closed_form) = 2.28462179578 2.31393171334
absolute error = 0.0002696
relative error = 0.008292 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
Radius of convergence (three term test) for eq 1 = 5.433
Order of pole (three term test) = 37.18 0
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.4783 1.691
h = 0.0001 0.003
y[1] (numeric) = 2.29065156892 2.32632372862
y[1] (closed_form) = 2.29088371777 2.32623214333
absolute error = 0.0002496
relative error = 0.007644 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
Radius of convergence (three term test) for eq 1 = 4.418
Order of pole (three term test) = 37.23 0
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.4784 1.694
h = 0.001 0.001
y[1] (numeric) = 2.2945292991 2.33368971613
y[1] (closed_form) = 2.29475733186 2.33359126187
absolute error = 0.0002484
relative error = 0.007589 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
Radius of convergence (three term test) for eq 1 = 3.489
Order of pole (three term test) = 37.26 0
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.4794 1.695
h = 0.0001 0.004
y[1] (numeric) = 2.29824169175 2.33497768474
y[1] (closed_form) = 2.29846655837 2.3348765561
absolute error = 0.0002466
relative error = 0.007525 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
Radius of convergence (three term test) for eq 1 = 20.99
Order of pole (three term test) = 37.26 0
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.4795 1.699
h = 0.003 0.006
y[1] (numeric) = 2.30335391938 2.34484931192
y[1] (closed_form) = 2.30358279433 2.34476446742
absolute error = 0.0002441
relative error = 0.007426 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
Radius of convergence (three term test) for eq 1 = 12.54
Order of pole (three term test) = 37.3 0
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.4825 1.705
h = 0.0001 0.005
y[1] (numeric) = 2.31822052474 2.3562533019
y[1] (closed_form) = 2.31847907848 2.35615700801
absolute error = 0.0002759
relative error = 0.008347 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
Radius of convergence (three term test) for eq 1 = 5.643
Order of pole (three term test) = 37.33 0
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.4826 1.71
h = 0.0001 0.003
y[1] (numeric) = 2.3246809916 2.36874049964
y[1] (closed_form) = 2.3249191654 2.3686483153
absolute error = 0.0002554
relative error = 0.007695 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
Radius of convergence (three term test) for eq 1 = 4.589
Order of pole (three term test) = 37.39 0
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.4827 1.713
h = 0.001 0.001
y[1] (numeric) = 2.32866771976 2.3762202279
y[1] (closed_form) = 2.32890167083 2.37612105044
absolute error = 0.0002541
relative error = 0.007637 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
Radius of convergence (three term test) for eq 1 = 3.624
Order of pole (three term test) = 37.42 0
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.4837 1.714
h = 0.001 0.003
y[1] (numeric) = 2.33245437782 2.3775122569
y[1] (closed_form) = 2.33268508975 2.37741036215
absolute error = 0.0002522
relative error = 0.007572 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
Radius of convergence (three term test) for eq 1 = 17.23
Order of pole (three term test) = 37.42 0
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.4847 1.717
h = 0.0001 0.004
y[1] (numeric) = 2.33874407896 2.38387372332
y[1] (closed_form) = 2.33898117898 2.3837776324
absolute error = 0.0002558
relative error = 0.00766 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
Radius of convergence (three term test) for eq 1 = 9.81
Order of pole (three term test) = 37.44 0
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.4848 1.721
h = 0.003 0.006
y[1] (numeric) = 2.34403264109 2.39393028267
y[1] (closed_form) = 2.34426830603 2.39384142778
absolute error = 0.0002519
relative error = 0.007517 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
Radius of convergence (three term test) for eq 1 = 13.1
Order of pole (three term test) = 37.48 0
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.4878 1.727
h = 0.0001 0.005
y[1] (numeric) = 2.35928544691 2.40548019635
y[1] (closed_form) = 2.35955143354 2.40537949502
absolute error = 0.0002844
relative error = 0.008441 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
Radius of convergence (three term test) for eq 1 = 5.897
Order of pole (three term test) = 37.51 0
NO COMPLEX POLE (six term test) for Equation 1
memory used=913.9MB, alloc=52.3MB, time=11.15
x[1] = 0.4879 1.732
h = 0.0001 0.003
y[1] (numeric) = 2.3659618075 2.41818999308
y[1] (closed_form) = 2.36620695678 2.4180935864
absolute error = 0.0002634
relative error = 0.007786 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
Radius of convergence (three term test) for eq 1 = 4.795
Order of pole (three term test) = 37.57 0
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.488 1.735
h = 0.001 0.001
y[1] (numeric) = 2.37008027193 2.42580241278
y[1] (closed_form) = 2.3703210693 2.42569886843
absolute error = 0.0002621
relative error = 0.007729 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
Radius of convergence (three term test) for eq 1 = 3.787
Order of pole (three term test) = 37.6 0
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.489 1.736
h = 0.001 0.003
y[1] (numeric) = 2.37395514697 2.42709770186
y[1] (closed_form) = 2.37419261774 2.42699139108
absolute error = 0.0002602
relative error = 0.007663 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
Radius of convergence (three term test) for eq 1 = 18.01
Order of pole (three term test) = 37.6 0
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.49 1.739
h = 0.0001 0.004
y[1] (numeric) = 2.38041817755 2.43355365282
y[1] (closed_form) = 2.3806622108 2.43345325312
absolute error = 0.0002639
relative error = 0.007751 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
Radius of convergence (three term test) for eq 1 = 10.25
Order of pole (three term test) = 37.62 0
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.4901 1.743
h = 0.003 0.006
y[1] (numeric) = 2.38588238996 2.44378927657
y[1] (closed_form) = 2.38612498653 2.44369628781
absolute error = 0.0002598
relative error = 0.007607 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
Radius of convergence (three term test) for eq 1 = 13.69
Order of pole (three term test) = 37.66 0
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.4931 1.749
h = 0.0001 0.005
y[1] (numeric) = 2.401531044 2.45548682259
y[1] (closed_form) = 2.40180461621 2.45538157787
absolute error = 0.0002931
relative error = 0.008534 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
Radius of convergence (three term test) for eq 1 = 6.162
Order of pole (three term test) = 37.7 0
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.4932 1.754
h = 0.0001 0.003
y[1] (numeric) = 2.40842930638 2.46842345595
y[1] (closed_form) = 2.40868157531 2.46832269779
absolute error = 0.0002716
relative error = 0.007877 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
Radius of convergence (three term test) for eq 1 = 5.011
Order of pole (three term test) = 37.75 0
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.4933 1.757
h = 0.001 0.001
y[1] (numeric) = 2.41268316012 2.47617107727
y[1] (closed_form) = 2.41293094433 2.47606303465
absolute error = 0.0002703
relative error = 0.007819 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
Radius of convergence (three term test) for eq 1 = 3.957
Order of pole (three term test) = 37.79 0
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.4943 1.758
h = 0.001 0.003
y[1] (numeric) = 2.41664832087 2.47746931329
y[1] (closed_form) = 2.41689268886 2.47735845462
absolute error = 0.0002683
relative error = 0.007753 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
Radius of convergence (three term test) for eq 1 = 18.82
Order of pole (three term test) = 37.79 0
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.4953 1.761
h = 0.0001 0.004
y[1] (numeric) = 2.42328913316 2.48402118491
y[1] (closed_form) = 2.42354024241 2.48391634574
absolute error = 0.0002721
relative error = 0.007841 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
Radius of convergence (three term test) for eq 1 = 10.71
Order of pole (three term test) = 37.81 0
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.4954 1.765
h = 0.003 0.006
y[1] (numeric) = 2.42893387425 2.49443926536
y[1] (closed_form) = 2.42918354627 2.49434201576
absolute error = 0.0002679
relative error = 0.007696 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
Radius of convergence (three term test) for eq 1 = 14.31
Order of pole (three term test) = 37.86 0
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.4984 1.771
h = 0.0001 0.005
y[1] (numeric) = 2.44498823916 2.50628612735
y[1] (closed_form) = 2.44526955204 2.50617619947
absolute error = 0.000302
relative error = 0.008626 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
Radius of convergence (three term test) for eq 1 = 6.439
Order of pole (three term test) = 37.89 0
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.4985 1.776
h = 0.0001 0.003
y[1] (numeric) = 2.45211456545 2.51945388666
y[1] (closed_form) = 2.45237410047 2.51934864425
absolute error = 0.0002801
relative error = 0.007966 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
Radius of convergence (three term test) for eq 1 = 5.236
Order of pole (three term test) = 37.95 0
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.4986 1.779
h = 0.001 0.001
y[1] (numeric) = 2.45650755482 2.52733924983
y[1] (closed_form) = 2.45676246856 2.5272265739
absolute error = 0.0002787
relative error = 0.007908 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
Radius of convergence (three term test) for eq 1 = 4.135
Order of pole (three term test) = 37.99 0
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.4996 1.78
h = 0.001 0.003
y[1] (numeric) = 2.46056511185 2.52864009994
y[1] (closed_form) = 2.46081651754 2.52852455786
absolute error = 0.0002767
relative error = 0.007842 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
Radius of convergence (three term test) for eq 1 = 19.66
Order of pole (three term test) = 37.98 0
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.5006 1.783
h = 0.0001 0.004
y[1] (numeric) = 2.46738826158 2.53528933062
y[1] (closed_form) = 2.46764659177 2.53517991762
absolute error = 0.0002805
relative error = 0.00793 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
Radius of convergence (three term test) for eq 1 = 11.19
Order of pole (three term test) = 38.01 0
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.5007 1.787
h = 0.003 0.006
y[1] (numeric) = 2.47321853459 2.54589330116
y[1] (closed_form) = 2.47347542812 2.54579166015
absolute error = 0.0002763
relative error = 0.007783 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
Radius of convergence (three term test) for eq 1 = 14.95
Order of pole (three term test) = 38.06 0
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.5037 1.793
h = 0.0001 0.005
y[1] (numeric) = 2.48968869281 2.55789113621
y[1] (closed_form) = 2.48997790389 2.55777638144
absolute error = 0.0003111
relative error = 0.008716 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
Radius of convergence (three term test) for eq 1 = 6.728
Order of pole (three term test) = 38.09 0
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.5038 1.798
h = 0.0001 0.003
y[1] (numeric) = 2.49704940302 2.57129436296
y[1] (closed_form) = 2.49731635283 2.5711844998
absolute error = 0.0002887
relative error = 0.008054 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
Radius of convergence (three term test) for eq 1 = 5.472
Order of pole (three term test) = 38.15 0
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.5039 1.801
h = 0.001 0.001
y[1] (numeric) = 2.5015853699 2.57932003858
y[1] (closed_form) = 2.50184755801 2.57920259052
absolute error = 0.0002873
relative error = 0.007995 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
Radius of convergence (three term test) for eq 1 = 4.321
Order of pole (three term test) = 38.19 0
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.5049 1.802
h = 0.0001 0.004
y[1] (numeric) = 2.50573747653 2.58062314957
y[1] (closed_form) = 2.50599606249 2.58050278477
absolute error = 0.0002852
relative error = 0.007929 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
Radius of convergence (three term test) for eq 1 = 26
Order of pole (three term test) = 38.19 0
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.505 1.806
h = 0.003 0.006
y[1] (numeric) = 2.51172298536 2.59138202089
y[1] (closed_form) = 2.51198643104 2.59127977001
absolute error = 0.0002826
relative error = 0.00783 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
Radius of convergence (three term test) for eq 1 = 15.53
Order of pole (three term test) = 38.24 0
NO COMPLEX POLE (six term test) for Equation 1
memory used=958.3MB, alloc=52.3MB, time=11.70
x[1] = 0.508 1.812
h = 0.0001 0.005
y[1] (numeric) = 2.52855746513 2.60351623457
y[1] (closed_form) = 2.52885382557 2.60340049252
absolute error = 0.0003182
relative error = 0.008766 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
Radius of convergence (three term test) for eq 1 = 6.989
Order of pole (three term test) = 38.28 0
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.5081 1.817
h = 0.0001 0.003
y[1] (numeric) = 2.53612223327 2.61712855805
y[1] (closed_form) = 2.53639590654 2.61701788508
absolute error = 0.0002952
relative error = 0.0081 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
Radius of convergence (three term test) for eq 1 = 5.683
Order of pole (three term test) = 38.34 0
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.5082 1.82
h = 0.001 0.001
y[1] (numeric) = 2.54078270793 2.62527885904
y[1] (closed_form) = 2.54105149735 2.62516046725
absolute error = 0.0002937
relative error = 0.008039 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
Radius of convergence (three term test) for eq 1 = 4.488
Order of pole (three term test) = 38.38 0
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.5092 1.821
h = 0.001 0.003
y[1] (numeric) = 2.54501793649 2.62658477925
y[1] (closed_form) = 2.54528304152 2.62646342561
absolute error = 0.0002916
relative error = 0.007972 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
Radius of convergence (three term test) for eq 1 = 21.34
Order of pole (three term test) = 38.38 0
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.5102 1.824
h = 0.0001 0.004
y[1] (numeric) = 2.55219166288 2.63342131193
y[1] (closed_form) = 2.55246404434 2.63330629674
absolute error = 0.0002957
relative error = 0.008062 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
Radius of convergence (three term test) for eq 1 = 12.15
Order of pole (three term test) = 38.4 0
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.5103 1.828
h = 0.003 0.006
y[1] (numeric) = 2.55837861156 2.64438281779
y[1] (closed_form) = 2.55864955826 2.64427592448
absolute error = 0.0002913
relative error = 0.007916 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
Radius of convergence (three term test) for eq 1 = 16.23
Order of pole (three term test) = 38.46 0
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.5133 1.834
h = 0.0001 0.005
y[1] (numeric) = 2.57564822894 2.65667113836
y[1] (closed_form) = 2.57595278916 2.65655029309
absolute error = 0.0003277
relative error = 0.008855 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
Radius of convergence (three term test) for eq 1 = 7.303
Order of pole (three term test) = 38.5 0
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.5134 1.839
h = 0.0001 0.003
y[1] (numeric) = 2.58345952147 2.67052722832
y[1] (closed_form) = 2.5837408941 2.67041167214
absolute error = 0.0003042
relative error = 0.008186 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
Radius of convergence (three term test) for eq 1 = 5.939
Order of pole (three term test) = 38.56 0
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.5135 1.842
h = 0.001 0.001
y[1] (numeric) = 2.58827035339 2.67882275531
y[1] (closed_form) = 2.58854669439 2.67869932449
absolute error = 0.0003027
relative error = 0.008125 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
Radius of convergence (three term test) for eq 1 = 4.69
Order of pole (three term test) = 38.6 0
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.5145 1.843
h = 0.001 0.003
y[1] (numeric) = 2.59260426001 2.6801302496
y[1] (closed_form) = 2.59287681815 2.68000380539
absolute error = 0.0003005
relative error = 0.008057 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
Radius of convergence (three term test) for eq 1 = 22.3
Order of pole (three term test) = 38.6 0
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.5155 1.846
h = 0.0001 0.004
y[1] (numeric) = 2.5999739324 2.68706832366
y[1] (closed_form) = 2.60025396363 2.68694833093
absolute error = 0.0003047
relative error = 0.008148 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
Radius of convergence (three term test) for eq 1 = 12.7
Order of pole (three term test) = 38.63 0
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.5156 1.85
h = 0.003 0.006
y[1] (numeric) = 2.60636140092 2.69822583699
y[1] (closed_form) = 2.60664000133 2.69811415991
absolute error = 0.0003001
relative error = 0.008001 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
Radius of convergence (three term test) for eq 1 = 16.96
Order of pole (three term test) = 38.68 0
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.5186 1.856
h = 0.0001 0.005
y[1] (numeric) = 2.62407689538 2.71066983939
y[1] (closed_form) = 2.62438982014 2.71054373536
absolute error = 0.0003374
relative error = 0.008942 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
Radius of convergence (three term test) for eq 1 = 7.632
Order of pole (three term test) = 38.72 0
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.5187 1.861
h = 0.0001 0.003
y[1] (numeric) = 2.63214150514 2.7247741914
y[1] (closed_form) = 2.63243073254 2.72465360429
absolute error = 0.0003134
relative error = 0.008271 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
Radius of convergence (three term test) for eq 1 = 6.206
Order of pole (three term test) = 38.79 0
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.5188 1.864
h = 0.001 0.001
y[1] (numeric) = 2.63710682235 2.73321760455
y[1] (closed_form) = 2.63739086621 2.73308898455
absolute error = 0.0003118
relative error = 0.00821 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
Radius of convergence (three term test) for eq 1 = 4.901
Order of pole (three term test) = 38.83 0
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.5198 1.865
h = 0.001 0.003
y[1] (numeric) = 2.64154168789 2.73452625828
y[1] (closed_form) = 2.641821848 2.73439457288
absolute error = 0.0003096
relative error = 0.008142 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
Radius of convergence (three term test) for eq 1 = 23.31
Order of pole (three term test) = 38.83 0
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.5208 1.868
h = 0.0001 0.004
y[1] (numeric) = 2.64911228436 2.74156731822
y[1] (closed_form) = 2.64940011912 2.74144219853
absolute error = 0.0003139
relative error = 0.008232 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
Radius of convergence (three term test) for eq 1 = 13.27
Order of pole (three term test) = 38.86 0
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.5209 1.872
h = 0.003 0.006
y[1] (numeric) = 2.65570578703 2.75292443631
y[1] (closed_form) = 2.65599219623 2.75280783015
absolute error = 0.0003092
relative error = 0.008084 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
Radius of convergence (three term test) for eq 1 = 17.72
Order of pole (three term test) = 38.92 0
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.5239 1.878
h = 0.0001 0.005
y[1] (numeric) = 2.67387813765 2.76552566247
y[1] (closed_form) = 2.67419959429 2.7653941398
absolute error = 0.0003473
relative error = 0.009029 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
Radius of convergence (three term test) for eq 1 = 7.975
Order of pole (three term test) = 38.96 0
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.524 1.883
h = 0.0001 0.003
y[1] (numeric) = 2.68220303084 2.77988282622
y[1] (closed_form) = 2.68250027086 2.77975705634
absolute error = 0.0003228
relative error = 0.008355 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
Radius of convergence (three term test) for eq 1 = 6.485
Order of pole (three term test) = 39.03 0
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.5241 1.886
h = 0.001 0.001
y[1] (numeric) = 2.6873270663 2.78847681707
y[1] (closed_form) = 2.68761896662 2.78834285361
absolute error = 0.0003212
relative error = 0.008293 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
Radius of convergence (three term test) for eq 1 = 5.121
Order of pole (three term test) = 39.08 0
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.5251 1.887
h = 0.001 0.003
y[1] (numeric) = 2.69186521791 2.78978619261
y[1] (closed_form) = 2.69215313111 2.78964911122
absolute error = 0.0003189
relative error = 0.008225 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
Radius of convergence (three term test) for eq 1 = 24.35
Order of pole (three term test) = 39.08 0
NO COMPLEX POLE (six term test) for Equation 1
memory used=1002.7MB, alloc=52.3MB, time=12.24
x[1] = 0.5261 1.89
h = 0.0001 0.004
y[1] (numeric) = 2.69964183218 2.796931683
y[1] (closed_form) = 2.69993762662 2.79680128276
absolute error = 0.0003233
relative error = 0.008316 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
Radius of convergence (three term test) for eq 1 = 13.86
Order of pole (three term test) = 39.11 0
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.5262 1.894
h = 0.003 0.006
y[1] (numeric) = 2.70644702382 2.8084920461
y[1] (closed_form) = 2.70674139927 2.8083703615
absolute error = 0.0003185
relative error = 0.008167 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
Radius of convergence (three term test) for eq 1 = 18.52
Order of pole (three term test) = 39.17 0
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.5292 1.9
h = 0.0001 0.005
y[1] (numeric) = 2.7250874546 2.82125200311
y[1] (closed_form) = 2.7254176131 2.82111489744
absolute error = 0.0003575
relative error = 0.009114 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
Radius of convergence (three term test) for eq 1 = 8.333
Order of pole (three term test) = 39.21 0
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.5293 1.905
h = 0.0001 0.003
y[1] (numeric) = 2.73367977509 2.83586658284
y[1] (closed_form) = 2.733985188 2.8357354741
absolute error = 0.0003324
relative error = 0.008438 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
Radius of convergence (three term test) for eq 1 = 6.777
Order of pole (three term test) = 39.29 0
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.5294 1.908
h = 0.001 0.001
y[1] (numeric) = 2.73896686923 2.84461387457
y[1] (closed_form) = 2.73926678195 2.84447440907
absolute error = 0.0003308
relative error = 0.008376 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
Radius of convergence (three term test) for eq 1 = 5.351
Order of pole (three term test) = 39.33 0
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.5304 1.909
h = 0.0001 0.004
y[1] (numeric) = 2.74361068133 2.84592351051
y[1] (closed_form) = 2.74390650101 2.84578087407
absolute error = 0.0003284
relative error = 0.008308 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
Radius of convergence (three term test) for eq 1 = 32.2
Order of pole (three term test) = 39.33 0
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.5305 1.913
h = 0.003 0.006
y[1] (numeric) = 2.75059296758 2.85765316445
y[1] (closed_form) = 2.75089464989 2.85753064089
absolute error = 0.0003256
relative error = 0.008209 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
Radius of convergence (three term test) for eq 1 = 19.23
Order of pole (three term test) = 39.39 0
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.5335 1.919
h = 0.0001 0.005
y[1] (numeric) = 2.76964357057 2.87055669281
y[1] (closed_form) = 2.76998168555 2.87041831057
absolute error = 0.0003653
relative error = 0.009159 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
Radius of convergence (three term test) for eq 1 = 8.656
Order of pole (three term test) = 39.44 0
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.5336 1.924
h = 0.0001 0.003
y[1] (numeric) = 2.77846880099 2.88539988135
y[1] (closed_form) = 2.77878170411 2.88526770653
absolute error = 0.0003397
relative error = 0.00848 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
Radius of convergence (three term test) for eq 1 = 7.039
Order of pole (three term test) = 39.52 0
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.5337 1.927
h = 0.001 0.001
y[1] (numeric) = 2.78389793945 2.8942833491
y[1] (closed_form) = 2.78420520264 2.89414267305
absolute error = 0.0003379
relative error = 0.008415 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
Radius of convergence (three term test) for eq 1 = 5.559
Order of pole (three term test) = 39.56 0
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.5347 1.928
h = 0.001 0.003
y[1] (numeric) = 2.78863464358 2.89559411901
y[1] (closed_form) = 2.78893772112 2.8954502247
absolute error = 0.0003355
relative error = 0.008345 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
Radius of convergence (three term test) for eq 1 = 26.43
Order of pole (three term test) = 39.56 0
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.5357 1.931
h = 0.0001 0.004
y[1] (numeric) = 2.79680728855 2.90294037594
y[1] (closed_form) = 2.79711864415 2.90280338338
absolute error = 0.0003402
relative error = 0.008438 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
Radius of convergence (three term test) for eq 1 = 15.05
Order of pole (three term test) = 39.6 0
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.5358 1.935
h = 0.003 0.006
y[1] (numeric) = 2.80401940451 2.91489145521
y[1] (closed_form) = 2.80432935455 2.91476356601
absolute error = 0.0003353
relative error = 0.00829 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
Radius of convergence (three term test) for eq 1 = 20.1
Order of pole (three term test) = 39.66 0
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.5388 1.941
h = 0.0001 0.005
y[1] (numeric) = 2.82355962683 2.9279565601
y[1] (closed_form) = 2.82390676918 2.9278122789
absolute error = 0.0003759
relative error = 0.009242 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
Radius of convergence (three term test) for eq 1 = 9.045
Order of pole (three term test) = 39.71 0
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.5389 1.946
h = 0.0001 0.003
y[1] (numeric) = 2.83266600886 2.94306596904
y[1] (closed_form) = 2.83298739173 2.94292815528
absolute error = 0.0003497
relative error = 0.00856 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
Radius of convergence (three term test) for eq 1 = 7.356
Order of pole (three term test) = 39.79 0
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.539 1.949
h = 0.001 0.001
y[1] (numeric) = 2.83826654426 2.9521079447
y[1] (closed_form) = 2.83858211836 2.95196146174
absolute error = 0.0003479
relative error = 0.008495 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
Radius of convergence (three term test) for eq 1 = 5.809
Order of pole (three term test) = 39.84 0
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.54 1.95
h = 0.001 0.003
y[1] (numeric) = 2.84311346245 2.95341808024
y[1] (closed_form) = 2.84342474007 2.95326832507
absolute error = 0.0003454
relative error = 0.008426 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
Radius of convergence (three term test) for eq 1 = 27.62
Order of pole (three term test) = 39.84 0
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.541 1.953
h = 0.0001 0.004
y[1] (numeric) = 2.85150734249 2.96087296144
y[1] (closed_form) = 2.85182711982 2.96073022699
absolute error = 0.0003502
relative error = 0.008519 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
Radius of convergence (three term test) for eq 1 = 15.72
Order of pole (three term test) = 39.87 0
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.5411 1.957
h = 0.003 0.006
y[1] (numeric) = 2.85894808619 2.9730380131
y[1] (closed_form) = 2.85926646858 2.97290459669
absolute error = 0.0003452
relative error = 0.008369 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
Radius of convergence (three term test) for eq 1 = 21
Order of pole (three term test) = 39.94 0
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.5441 1.963
h = 0.0001 0.005
y[1] (numeric) = 2.87898988369 2.98626609408
y[1] (closed_form) = 2.87934623117 2.98611573619
absolute error = 0.0003868
relative error = 0.009324 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
Radius of convergence (three term test) for eq 1 = 9.452
Order of pole (three term test) = 39.99 0
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.5442 1.968
h = 0.0001 0.003
y[1] (numeric) = 2.88838509292 3.00164648836
y[1] (closed_form) = 2.88871512307 3.00150286692
absolute error = 0.0003599
relative error = 0.00864 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
Radius of convergence (three term test) for eq 1 = 7.686
Order of pole (three term test) = 40.08 0
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.5443 1.971
h = 0.001 0.001
y[1] (numeric) = 2.89416168743 3.01084978823
y[1] (closed_form) = 2.89448573528 3.01069732701
absolute error = 0.0003581
relative error = 0.008575 %
Correct digits = 4
memory used=1047.1MB, alloc=52.3MB, time=12.80
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
Radius of convergence (three term test) for eq 1 = 6.07
Order of pole (three term test) = 40.13 0
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.5453 1.972
h = 0.001 0.003
y[1] (numeric) = 2.89912133504 3.01215875633
y[1] (closed_form) = 2.89944097289 3.01200296845
absolute error = 0.0003556
relative error = 0.008505 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
Radius of convergence (three term test) for eq 1 = 28.87
Order of pole (three term test) = 40.13 0
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.5463 1.975
h = 0.0001 0.004
y[1] (numeric) = 2.90774201572 3.01972370305
y[1] (closed_form) = 2.90807038043 3.01957505609
absolute error = 0.0003604
relative error = 0.008598 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
Radius of convergence (three term test) for eq 1 = 16.43
Order of pole (three term test) = 40.17 0
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.5464 1.979
h = 0.003 0.006
y[1] (numeric) = 2.91541761667 3.03210653812
y[1] (closed_form) = 2.91574459861 3.03196742845
absolute error = 0.0003553
relative error = 0.008448 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
Radius of convergence (three term test) for eq 1 = 21.95
Order of pole (three term test) = 40.24 0
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.5494 1.985
h = 0.0001 0.005
y[1] (numeric) = 2.93597321189 3.04549895206
y[1] (closed_form) = 2.93633894504 3.04534233485
absolute error = 0.0003979
relative error = 0.009405 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
Radius of convergence (three term test) for eq 1 = 9.877
Order of pole (three term test) = 40.29 0
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.5495 1.99
h = 0.0001 0.003
y[1] (numeric) = 2.94566511879 3.06115515283
y[1] (closed_form) = 2.94600396634 3.06100555027
absolute error = 0.0003704
relative error = 0.008719 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
Radius of convergence (three term test) for eq 1 = 8.032
Order of pole (three term test) = 40.38 0
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.5496 1.993
h = 0.001 0.001
y[1] (numeric) = 2.95162255245 3.0705226257
y[1] (closed_form) = 2.95195523939 3.07036401017
absolute error = 0.0003686
relative error = 0.008653 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
Radius of convergence (three term test) for eq 1 = 6.343
Order of pole (three term test) = 40.43 0
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.5506 1.994
h = 0.001 0.003
y[1] (numeric) = 2.95669749599 3.07182986647
y[1] (closed_form) = 2.95702565659 3.07166786934
absolute error = 0.000366
relative error = 0.008583 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
Radius of convergence (three term test) for eq 1 = 30.16
Order of pole (three term test) = 40.43 0
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.5516 1.997
h = 0.0001 0.004
y[1] (numeric) = 2.96555067194 3.07950631725
y[1] (closed_form) = 2.96588779222 3.07935158244
absolute error = 0.0003709
relative error = 0.008676 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
Radius of convergence (three term test) for eq 1 = 17.17
Order of pole (three term test) = 40.47 0
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.5517 2.001
h = 0.003 0.006
y[1] (numeric) = 2.97346751752 3.09211079125
y[1] (closed_form) = 2.97380326878 3.09196581766
absolute error = 0.0003657
relative error = 0.008525 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
Radius of convergence (three term test) for eq 1 = 22.93
Order of pole (three term test) = 40.55 0
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.5547 2.007
h = 0.0001 0.005
y[1] (numeric) = 2.99454940557 3.10566885013
y[1] (closed_form) = 2.99492470776 3.10550578593
absolute error = 0.0004092
relative error = 0.009485 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
Radius of convergence (three term test) for eq 1 = 10.32
Order of pole (three term test) = 40.6 0
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.5548 2.012
h = 0.0001 0.003
y[1] (numeric) = 3.00454608022 3.12160573509
y[1] (closed_form) = 3.00489391789 3.12144997321
absolute error = 0.0003811
relative error = 0.008796 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
Radius of convergence (three term test) for eq 1 = 8.393
Order of pole (three term test) = 40.7 0
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.5549 2.015
h = 0.001 0.001
y[1] (numeric) = 3.01068925382 3.13114026242
y[1] (closed_form) = 3.01103074767 3.13097531169
absolute error = 0.0003792
relative error = 0.008731 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
Radius of convergence (three term test) for eq 1 = 6.628
Order of pole (three term test) = 40.75 0
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.5559 2.016
h = 0.0001 0.004
y[1] (numeric) = 3.01588211192 3.13244518829
y[1] (closed_form) = 3.01621896027 3.13227680055
absolute error = 0.0003766
relative error = 0.00866 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
Radius of convergence (three term test) for eq 1 = 39.88
Order of pole (three term test) = 40.75 0
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.556 2.02
h = 0.003 0.006
y[1] (numeric) = 3.02400075007 3.14523420441
y[1] (closed_form) = 3.02434463728 3.14508811377
absolute error = 0.0003736
relative error = 0.008563 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
Radius of convergence (three term test) for eq 1 = 23.82
Order of pole (three term test) = 40.83 0
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.559 2.026
h = 0.0001 0.005
y[1] (numeric) = 3.04554387818 3.15894233646
y[1] (closed_form) = 3.04592802297 3.1587776491
absolute error = 0.000418
relative error = 0.009525 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
Radius of convergence (three term test) for eq 1 = 10.72
Order of pole (three term test) = 40.89 0
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.5591 2.031
h = 0.0001 0.003
y[1] (numeric) = 3.05580608134 3.17512853937
y[1] (closed_form) = 3.05616225107 3.17497140266
absolute error = 0.0003893
relative error = 0.008834 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
Radius of convergence (three term test) for eq 1 = 8.718
Order of pole (three term test) = 40.99 0
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.5592 2.034
h = 0.001 0.001
y[1] (numeric) = 3.06211111517 3.18481148837
y[1] (closed_form) = 3.06246078148 3.18464500699
absolute error = 0.0003873
relative error = 0.008765 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
Radius of convergence (three term test) for eq 1 = 6.885
Order of pole (three term test) = 41.05 0
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.5602 2.035
h = 0.001 0.003
y[1] (numeric) = 3.06740764539 3.1861153774
y[1] (closed_form) = 3.06775256195 3.18594540945
absolute error = 0.0003845
relative error = 0.008694 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
Radius of convergence (three term test) for eq 1 = 32.74
Order of pole (three term test) = 41.05 0
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.5612 2.038
h = 0.0001 0.004
y[1] (numeric) = 3.07670768315 3.19400606369
y[1] (closed_form) = 3.07706200658 3.19384359015
absolute error = 0.0003898
relative error = 0.008789 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
Radius of convergence (three term test) for eq 1 = 18.64
Order of pole (three term test) = 41.09 0
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.5613 2.042
h = 0.003 0.006
y[1] (numeric) = 3.0850882349 3.20703643221
y[1] (closed_form) = 3.08544121655 3.20688414955
absolute error = 0.0003844
relative error = 0.008639 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
Radius of convergence (three term test) for eq 1 = 24.89
Order of pole (three term test) = 41.17 0
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.5643 2.048
h = 0.0001 0.005
y[1] (numeric) = 3.1071816382 3.22091267977
y[1] (closed_form) = 3.10757570324 3.2207411846
absolute error = 0.0004298
relative error = 0.009603 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
Radius of convergence (three term test) for eq 1 = 11.2
Order of pole (three term test) = 41.23 0
NO COMPLEX POLE (six term test) for Equation 1
memory used=1091.4MB, alloc=52.3MB, time=13.34
x[1] = 0.5644 2.053
h = 0.0001 0.003
y[1] (numeric) = 3.11776411369 3.23738889675
y[1] (closed_form) = 3.11812960437 3.2372252581
absolute error = 0.0004005
relative error = 0.008909 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
Radius of convergence (three term test) for eq 1 = 9.11
Order of pole (three term test) = 41.33 0
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.5645 2.056
h = 0.001 0.001
y[1] (numeric) = 3.1242643028 3.2472444114
y[1] (closed_form) = 3.12462309739 3.24707124707
absolute error = 0.0003984
relative error = 0.008841 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
Radius of convergence (three term test) for eq 1 = 7.194
Order of pole (three term test) = 41.4 0
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.5655 2.057
h = 0.001 0.003
y[1] (numeric) = 3.12968377058 3.24854484824
y[1] (closed_form) = 3.13003769077 3.24836814098
absolute error = 0.0003956
relative error = 0.008769 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
Radius of convergence (three term test) for eq 1 = 34.21
Order of pole (three term test) = 41.4 0
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.5665 2.06
h = 0.0001 0.004
y[1] (numeric) = 3.13923331696 3.25655120603
y[1] (closed_form) = 3.13959689371 3.25638211815
absolute error = 0.000401
relative error = 0.008864 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
Radius of convergence (three term test) for eq 1 = 19.48
Order of pole (three term test) = 41.44 0
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.5666 2.064
h = 0.003 0.006
y[1] (numeric) = 3.14787424465 3.26981457417
y[1] (closed_form) = 3.1482364982 3.26965591504
absolute error = 0.0003955
relative error = 0.008713 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
Radius of convergence (three term test) for eq 1 = 26.01
Order of pole (three term test) = 41.52 0
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.5696 2.07
h = 0.0001 0.005
y[1] (numeric) = 3.17053123221 3.28386011117
y[1] (closed_form) = 3.17093540923 3.2836816054
absolute error = 0.0004418
relative error = 0.009679 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
Radius of convergence (three term test) for eq 1 = 11.71
Order of pole (three term test) = 41.59 0
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.5697 2.075
h = 0.0001 0.003
y[1] (numeric) = 3.18144264738 3.30063138609
y[1] (closed_form) = 3.18181763952 3.30046105296
absolute error = 0.0004119
relative error = 0.008984 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
Radius of convergence (three term test) for eq 1 = 9.52
Order of pole (three term test) = 41.7 0
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.5698 2.078
h = 0.001 0.001
y[1] (numeric) = 3.18814325382 3.31066244378
y[1] (closed_form) = 3.18851135195 3.31048240117
absolute error = 0.0004098
relative error = 0.008915 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
Radius of convergence (three term test) for eq 1 = 7.518
Order of pole (three term test) = 41.76 0
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.5708 2.079
h = 0.001 0.003
y[1] (numeric) = 3.19368843331 3.3119587574
y[1] (closed_form) = 3.19405152932 3.31177511504
absolute error = 0.0004069
relative error = 0.008843 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
Radius of convergence (three term test) for eq 1 = 35.75
Order of pole (three term test) = 41.76 0
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.5718 2.082
h = 0.0001 0.004
y[1] (numeric) = 3.20349370939 3.32008220986
y[1] (closed_form) = 3.20386671783 3.31990631307
absolute error = 0.0004124
relative error = 0.008939 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
Radius of convergence (three term test) for eq 1 = 20.35
Order of pole (three term test) = 41.81 0
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.5719 2.086
h = 0.003 0.006
y[1] (numeric) = 3.21240204587 3.33358260948
y[1] (closed_form) = 3.21277375154 3.33341738436
absolute error = 0.0004068
relative error = 0.008786 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
Radius of convergence (three term test) for eq 1 = 27.18
Order of pole (three term test) = 41.9 0
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.5749 2.092
h = 0.0001 0.005
y[1] (numeric) = 3.23563622319 3.34779855558
y[1] (closed_form) = 3.23605070687 3.34761283087
absolute error = 0.0004542
relative error = 0.009755 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
Radius of convergence (three term test) for eq 1 = 12.23
Order of pole (three term test) = 41.97 0
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.575 2.097
h = 0.0001 0.003
y[1] (numeric) = 3.24688546416 3.3648699901
y[1] (closed_form) = 3.24727014106 3.36469276468
absolute error = 0.0004235
relative error = 0.009058 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
Radius of convergence (three term test) for eq 1 = 9.948
Order of pole (three term test) = 42.08 0
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.5751 2.1
h = 0.001 0.001
y[1] (numeric) = 3.25379188232 3.37507960153
y[1] (closed_form) = 3.25416946186 3.37489248002
absolute error = 0.0004214
relative error = 0.008989 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
Radius of convergence (three term test) for eq 1 = 7.856
Order of pole (three term test) = 42.15 0
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.5761 2.101
h = 0.001 0.003
y[1] (numeric) = 3.259465604 3.37637108972
y[1] (closed_form) = 3.25983805061 3.37618031115
absolute error = 0.0004185
relative error = 0.008917 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
Radius of convergence (three term test) for eq 1 = 37.36
Order of pole (three term test) = 42.15 0
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.5771 2.104
h = 0.0001 0.004
y[1] (numeric) = 3.26953297478 3.38461305375
y[1] (closed_form) = 3.269915596 3.38443014816
absolute error = 0.0004241
relative error = 0.009012 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
Radius of convergence (three term test) for eq 1 = 21.27
Order of pole (three term test) = 42.2 0
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.5772 2.108
h = 0.003 0.006
y[1] (numeric) = 3.27871593009 3.3983545624
y[1] (closed_form) = 3.27909727085 3.39818257659
absolute error = 0.0004183
relative error = 0.008859 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
Radius of convergence (three term test) for eq 1 = 28.41
Order of pole (three term test) = 42.29 0
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.5802 2.114
h = 0.0001 0.005
y[1] (numeric) = 3.30254120558 3.41274198036
y[1] (closed_form) = 3.30296619363 3.41254882267
absolute error = 0.0004668
relative error = 0.009829 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
Radius of convergence (three term test) for eq 1 = 12.78
Order of pole (three term test) = 42.37 0
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.5803 2.119
h = 0.0001 0.003
y[1] (numeric) = 3.3141373825 3.43011873422
y[1] (closed_form) = 3.31453193025 3.4299344133
absolute error = 0.0004355
relative error = 0.00913 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
Radius of convergence (three term test) for eq 1 = 10.4
Order of pole (three term test) = 42.49 0
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.5804 2.122
h = 0.001 0.001
y[1] (numeric) = 3.32125514222 3.44050994347
y[1] (closed_form) = 3.32164238373 3.440315537
absolute error = 0.0004333
relative error = 0.009061 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
Radius of convergence (three term test) for eq 1 = 8.209
Order of pole (three term test) = 42.56 0
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.5814 2.123
h = 0.0001 0.004
y[1] (numeric) = 3.32706029408 3.44179587184
y[1] (closed_form) = 3.32744226864 3.44159775053
absolute error = 0.0004303
relative error = 0.008989 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
Radius of convergence (three term test) for eq 1 = 49.4
Order of pole (three term test) = 42.56 0
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.5815 2.127
h = 0.003 0.006
y[1] (numeric) = 3.33647292935 3.45573806488
y[1] (closed_form) = 3.33686331695 3.45556462738
absolute error = 0.0004272
relative error = 0.008893 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
Radius of convergence (three term test) for eq 1 = 29.51
Order of pole (three term test) = 42.66 0
NO COMPLEX POLE (six term test) for Equation 1
memory used=1135.8MB, alloc=52.3MB, time=13.89
x[1] = 0.5845 2.133
h = 0.0001 0.005
y[1] (numeric) = 3.36081631734 3.47028115799
y[1] (closed_form) = 3.36125112078 3.47008596468
absolute error = 0.0004766
relative error = 0.009865 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
Radius of convergence (three term test) for eq 1 = 13.28
Order of pole (three term test) = 42.73 0
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.5846 2.138
h = 0.0001 0.003
y[1] (numeric) = 3.37271487362 3.48792918148
y[1] (closed_form) = 3.3731186778 3.48774311659
absolute error = 0.0004446
relative error = 0.009163 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
Radius of convergence (three term test) for eq 1 = 10.8
Order of pole (three term test) = 42.86 0
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.5847 2.141
h = 0.001 0.001
y[1] (numeric) = 3.38001686995 3.49848177702
y[1] (closed_form) = 3.38041318584 3.49828545858
absolute error = 0.0004423
relative error = 0.009092 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
Radius of convergence (three term test) for eq 1 = 8.527
Order of pole (three term test) = 42.93 0
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.5857 2.142
h = 0.001 0.003
y[1] (numeric) = 3.38593758862 3.49976391978
y[1] (closed_form) = 3.38632852029 3.49956383476
absolute error = 0.0004392
relative error = 0.009018 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
Radius of convergence (three term test) for eq 1 = 40.55
Order of pole (three term test) = 42.93 0
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.5867 2.145
h = 0.0001 0.004
y[1] (numeric) = 3.39650865227 3.50823346039
y[1] (closed_form) = 3.39691026223 3.50804149198
absolute error = 0.0004451
relative error = 0.009116 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
Radius of convergence (three term test) for eq 1 = 23.08
Order of pole (three term test) = 42.99 0
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.5868 2.149
h = 0.003 0.006
y[1] (numeric) = 3.40621943469 3.52243810912
y[1] (closed_form) = 3.40661980788 3.52225753658
absolute error = 0.0004392
relative error = 0.008963 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
Radius of convergence (three term test) for eq 1 = 30.83
Order of pole (three term test) = 43.09 0
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.5898 2.155
h = 0.0001 0.005
y[1] (numeric) = 3.43118061905 3.53715466511
y[1] (closed_form) = 3.43162630562 3.53695162734
absolute error = 0.0004898
relative error = 0.009938 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
Radius of convergence (three term test) for eq 1 = 13.88
Order of pole (three term test) = 43.17 0
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.5899 2.16
h = 0.0001 0.003
y[1] (numeric) = 3.44344361471 3.55511787936
y[1] (closed_form) = 3.44385764621 3.55492432831
absolute error = 0.000457
relative error = 0.009234 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
Radius of convergence (three term test) for eq 1 = 11.28
Order of pole (three term test) = 43.3 0
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.59 2.163
h = 0.001 0.001
y[1] (numeric) = 3.45096757687 3.56585789616
y[1] (closed_form) = 3.45137390054 3.5656538966
absolute error = 0.0004547
relative error = 0.009162 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
Radius of convergence (three term test) for eq 1 = 8.911
Order of pole (three term test) = 43.38 0
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.591 2.164
h = 0.001 0.003
y[1] (numeric) = 3.45702526619 3.56713305951
y[1] (closed_form) = 3.45742606549 3.56692523469
absolute error = 0.0004515
relative error = 0.009088 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
Radius of convergence (three term test) for eq 1 = 42.37
Order of pole (three term test) = 43.38 0
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.592 2.167
h = 0.0001 0.004
y[1] (numeric) = 3.46787744056 3.57572520478
y[1] (closed_form) = 3.46828919926 3.57552562754
absolute error = 0.0004576
relative error = 0.009186 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
Radius of convergence (three term test) for eq 1 = 24.12
Order of pole (three term test) = 43.44 0
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.5921 2.171
h = 0.003 0.006
y[1] (numeric) = 3.47788443452 3.59018297474
y[1] (closed_form) = 3.47829498449 3.58999505687
absolute error = 0.0004515
relative error = 0.009033 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
Radius of convergence (three term test) for eq 1 = 32.22
Order of pole (three term test) = 43.55 0
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.5951 2.177
h = 0.0001 0.005
y[1] (numeric) = 3.50347822777 3.60507388183
y[1] (closed_form) = 3.5039350041 3.60486276852
absolute error = 0.0005032
relative error = 0.01001 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
Radius of convergence (three term test) for eq 1 = 14.5
Order of pole (three term test) = 43.63 0
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.5952 2.182
h = 0.0001 0.003
y[1] (numeric) = 3.51611544313 3.62335761675
y[1] (closed_form) = 3.51653989636 3.62315636013
absolute error = 0.0004697
relative error = 0.009304 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
Radius of convergence (three term test) for eq 1 = 11.79
Order of pole (three term test) = 43.77 0
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.5953 2.185
h = 0.001 0.001
y[1] (numeric) = 3.52386730623 3.63428819669
y[1] (closed_form) = 3.52428382614 3.63407629366
absolute error = 0.0004673
relative error = 0.009231 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
Radius of convergence (three term test) for eq 1 = 9.311
Order of pole (three term test) = 43.86 0
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.5963 2.186
h = 0.001 0.003
y[1] (numeric) = 3.53006502544 3.63555554925
y[1] (closed_form) = 3.53047587741 3.63533976182
absolute error = 0.0004641
relative error = 0.009158 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
Radius of convergence (three term test) for eq 1 = 44.28
Order of pole (three term test) = 43.86 0
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.5973 2.189
h = 0.0001 0.004
y[1] (numeric) = 3.54120526212 3.64427168562
y[1] (closed_form) = 3.54162736153 3.64406427794
absolute error = 0.0004703
relative error = 0.009255 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
Radius of convergence (three term test) for eq 1 = 25.21
Order of pole (three term test) = 43.92 0
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.5974 2.193
h = 0.003 0.006
y[1] (numeric) = 3.55151640184 3.65898683461
y[1] (closed_form) = 3.55193732273 3.65879135542
absolute error = 0.0004641
relative error = 0.009101 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
Radius of convergence (three term test) for eq 1 = 33.67
Order of pole (three term test) = 44.03 0
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.6004 2.199
h = 0.0001 0.005
y[1] (numeric) = 3.57775794559 3.67405291299
y[1] (closed_form) = 3.57822602149 3.67383348676
absolute error = 0.000517
relative error = 0.01008 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
Radius of convergence (three term test) for eq 1 = 15.15
Order of pole (three term test) = 44.12 0
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.6005 2.204
h = 0.0001 0.003
y[1] (numeric) = 3.59077940635 3.69266255731
y[1] (closed_form) = 3.59121447866 3.69245336982
absolute error = 0.0004827
relative error = 0.009372 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
Radius of convergence (three term test) for eq 1 = 12.32
Order of pole (three term test) = 44.27 0
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.6006 2.207
h = 0.001 0.001
y[1] (numeric) = 3.59876525384 3.70378687604
y[1] (closed_form) = 3.59919216125 3.7035668412
absolute error = 0.0004803
relative error = 0.0093 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
Radius of convergence (three term test) for eq 1 = 9.73
Order of pole (three term test) = 44.36 0
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.6016 2.208
h = 0.001 0.003
y[1] (numeric) = 3.60510612418 3.7050455502
y[1] (closed_form) = 3.6055272166 3.70482157139
absolute error = 0.000477
relative error = 0.009226 %
Correct digits = 4
memory used=1179.9MB, alloc=52.3MB, time=14.43
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
Radius of convergence (three term test) for eq 1 = 46.27
Order of pole (three term test) = 44.36 0
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.6026 2.211
h = 0.0001 0.004
y[1] (numeric) = 3.61654153503 3.71388705346
y[1] (closed_form) = 3.61697417 3.71367158775
absolute error = 0.0004833
relative error = 0.009323 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
Radius of convergence (three term test) for eq 1 = 26.34
Order of pole (three term test) = 44.42 0
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.6027 2.215
h = 0.003 0.006
y[1] (numeric) = 3.62716495342 3.72886388572
y[1] (closed_form) = 3.62759644233 3.72866062332
absolute error = 0.000477
relative error = 0.009169 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
Radius of convergence (three term test) for eq 1 = 35.18
Order of pole (three term test) = 44.54 0
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.6057 2.221
h = 0.0001 0.005
y[1] (numeric) = 3.65406972548 3.74410588435
y[1] (closed_form) = 3.65454931394 3.74387790143
absolute error = 0.000531
relative error = 0.01015 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
Radius of convergence (three term test) for eq 1 = 15.83
Order of pole (three term test) = 44.64 0
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.6058 2.226
h = 0.0001 0.003
y[1] (numeric) = 3.6674857085 3.76304688581
y[1] (closed_form) = 3.66793160025 3.76282953601
absolute error = 0.000496
relative error = 0.00944 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
Radius of convergence (three term test) for eq 1 = 12.88
Order of pole (three term test) = 44.79 0
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.6059 2.229
h = 0.001 0.001
y[1] (numeric) = 3.6757117757 3.77436815271
y[1] (closed_form) = 3.67614926471 3.77413975159
absolute error = 0.0004935
relative error = 0.009367 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
Radius of convergence (three term test) for eq 1 = 10.17
Order of pole (three term test) = 44.88 0
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.6069 2.23
h = 0.0001 0.004
y[1] (numeric) = 3.68219898167 3.77561724353
y[1] (closed_form) = 3.68263050506 3.77538483842
absolute error = 0.0004901
relative error = 0.009293 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
Radius of convergence (three term test) for eq 1 = 61.18
Order of pole (three term test) = 44.89 0
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.607 2.234
h = 0.003 0.006
y[1] (numeric) = 3.69308354641 3.79081181542
y[1] (closed_form) = 3.69352508289 3.79060670154
absolute error = 0.0004869
relative error = 0.009199 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
Radius of convergence (three term test) for eq 1 = 36.54
Order of pole (three term test) = 45.01 0
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.61 2.24
h = 0.0001 0.005
y[1] (numeric) = 3.72056975318 3.80621394098
y[1] (closed_form) = 3.72106022476 3.80598343431
absolute error = 0.0005419
relative error = 0.01018 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
Radius of convergence (three term test) for eq 1 = 16.45
Order of pole (three term test) = 45.12 0
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.6101 2.245
h = 0.0001 0.003
y[1] (numeric) = 3.73432971691 3.82544944202
y[1] (closed_form) = 3.73478587995 3.82522990964
absolute error = 0.0005062
relative error = 0.009469 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
Radius of convergence (three term test) for eq 1 = 13.37
Order of pole (three term test) = 45.28 0
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.6102 2.248
h = 0.001 0.001
y[1] (numeric) = 3.74276527021 3.83694579657
y[1] (closed_form) = 3.74321282313 3.83671503191
absolute error = 0.0005035
relative error = 0.009394 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
Radius of convergence (three term test) for eq 1 = 10.56
Order of pole (three term test) = 45.37 0
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.6112 2.249
h = 0.001 0.003
y[1] (numeric) = 3.7493811658 3.83818768033
y[1] (closed_form) = 3.74982262126 3.8379528578
absolute error = 0.0005
relative error = 0.009319 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
Radius of convergence (three term test) for eq 1 = 50.23
Order of pole (three term test) = 45.38 0
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.6122 2.252
h = 0.0001 0.004
y[1] (numeric) = 3.76138378761 3.84726980684
y[1] (closed_form) = 3.76183735255 3.84704375246
absolute error = 0.0005068
relative error = 0.009419 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
Radius of convergence (three term test) for eq 1 = 28.59
Order of pole (three term test) = 45.45 0
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.6123 2.256
h = 0.003 0.006
y[1] (numeric) = 3.77260738966 3.86274914387
y[1] (closed_form) = 3.77305987175 3.86253582025
absolute error = 0.0005002
relative error = 0.009265 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
Radius of convergence (three term test) for eq 1 = 38.19
Order of pole (three term test) = 45.58 0
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.6153 2.262
h = 0.0001 0.005
y[1] (numeric) = 3.80078653815 3.87832857674
y[1] (closed_form) = 3.80128893047 3.87808904471
absolute error = 0.0005566
relative error = 0.01025 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
Radius of convergence (three term test) for eq 1 = 17.19
Order of pole (three term test) = 45.69 0
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.6154 2.267
h = 0.0001 0.003
y[1] (numeric) = 3.81496076953 3.89790585886
y[1] (closed_form) = 3.81542813586 3.89767771929
absolute error = 0.0005201
relative error = 0.009535 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
Radius of convergence (three term test) for eq 1 = 13.98
Order of pole (three term test) = 45.86 0
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.6155 2.27
h = 0.001 0.001
y[1] (numeric) = 3.82364852238 3.90960530209
y[1] (closed_form) = 3.82410702873 3.90936572043
absolute error = 0.0005173
relative error = 0.00946 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
Radius of convergence (three term test) for eq 1 = 11.04
Order of pole (three term test) = 45.96 0
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.6165 2.271
h = 0.001 0.003
y[1] (numeric) = 3.83041686367 3.91083585502
y[1] (closed_form) = 3.83086911506 3.91059215462
absolute error = 0.0005137
relative error = 0.009384 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
Radius of convergence (three term test) for eq 1 = 52.48
Order of pole (three term test) = 45.96 0
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.6175 2.274
h = 0.0001 0.004
y[1] (numeric) = 3.84273590624 3.92004730743
y[1] (closed_form) = 3.84320058341 3.91981251202
absolute error = 0.0005206
relative error = 0.009484 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
Radius of convergence (three term test) for eq 1 = 29.88
Order of pole (three term test) = 46.04 0
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.6176 2.278
h = 0.003 0.006
y[1] (numeric) = 3.85429614004 3.93580100317
y[1] (closed_form) = 3.85475977361 3.93557923036
absolute error = 0.0005139
relative error = 0.009329 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
Radius of convergence (three term test) for eq 1 = 39.91
Order of pole (three term test) = 46.18 0
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.6206 2.284
h = 0.0001 0.005
y[1] (numeric) = 3.88318471116 3.95155827449
y[1] (closed_form) = 3.88369924671 3.95130945406
absolute error = 0.0005715
relative error = 0.01032 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
Radius of convergence (three term test) for eq 1 = 17.96
Order of pole (three term test) = 46.29 0
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.6207 2.289
h = 0.0001 0.003
y[1] (numeric) = 3.89778423831 3.97148295774
y[1] (closed_form) = 3.89826301712 3.9712459613
absolute error = 0.0005342
relative error = 0.0096 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
Radius of convergence (three term test) for eq 1 = 14.6
Order of pole (three term test) = 46.47 0
NO COMPLEX POLE (six term test) for Equation 1
memory used=1224.1MB, alloc=52.3MB, time=14.97
x[1] = 0.6208 2.292
h = 0.001 0.001
y[1] (numeric) = 3.90673088018 3.98338879755
y[1] (closed_form) = 3.90720054244 3.98314014607
absolute error = 0.0005314
relative error = 0.009524 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
Radius of convergence (three term test) for eq 1 = 11.53
Order of pole (three term test) = 46.58 0
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.6218 2.293
h = 0.001 0.003
y[1] (numeric) = 3.91365503998 3.98460700219
y[1] (closed_form) = 3.914118286 3.98435417068
absolute error = 0.0005278
relative error = 0.009449 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
Radius of convergence (three term test) for eq 1 = 54.84
Order of pole (three term test) = 46.58 0
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.6228 2.296
h = 0.0001 0.004
y[1] (numeric) = 3.92629826812 3.9939491072
y[1] (closed_form) = 3.92677426394 3.99370531867
absolute error = 0.0005348
relative error = 0.009548 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
Radius of convergence (three term test) for eq 1 = 31.22
Order of pole (three term test) = 46.66 0
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.6229 2.3
h = 0.003 0.006
y[1] (numeric) = 3.93820407828 4.00998164806
y[1] (closed_form) = 3.93867907232 4.00975118017
absolute error = 0.000528
relative error = 0.009393 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
Radius of convergence (three term test) for eq 1 = 41.7
Order of pole (three term test) = 46.81 0
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.6259 2.306
h = 0.0001 0.005
y[1] (numeric) = 3.96781891788 4.02591720459
y[1] (closed_form) = 3.96834582255 4.02565882568
absolute error = 0.0005868
relative error = 0.01038 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
Radius of convergence (three term test) for eq 1 = 18.77
Order of pole (three term test) = 46.94 0
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.626 2.311
h = 0.0001 0.003
y[1] (numeric) = 3.98285504385 4.04619496823
y[1] (closed_form) = 3.98334544747 4.04594885855
absolute error = 0.0005487
relative error = 0.009664 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
Radius of convergence (three term test) for eq 1 = 15.26
Order of pole (three term test) = 47.12 0
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.6261 2.314
h = 0.001 0.001
y[1] (numeric) = 3.99206743036 4.05831054625
y[1] (closed_form) = 3.992548454 4.0580525654
absolute error = 0.0005458
relative error = 0.009588 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
Radius of convergence (three term test) for eq 1 = 12.05
Order of pole (three term test) = 47.24 0
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.6271 2.315
h = 0.001 0.003
y[1] (numeric) = 3.99915084967 4.05951534318
y[1] (closed_form) = 3.99962529186 4.05925312059
absolute error = 0.0005421
relative error = 0.009513 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
Radius of convergence (three term test) for eq 1 = 57.31
Order of pole (three term test) = 47.24 0
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.6281 2.318
h = 0.0001 0.004
y[1] (numeric) = 4.01212620646 4.06898941143
y[1] (closed_form) = 4.01261373041 4.06873637096
absolute error = 0.0005493
relative error = 0.009612 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
Radius of convergence (three term test) for eq 1 = 32.63
Order of pole (three term test) = 47.32 0
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.6282 2.322
h = 0.003 0.006
y[1] (numeric) = 4.02438676018 4.08530533036
y[1] (closed_form) = 4.02487332681 4.08506591489
absolute error = 0.0005423
relative error = 0.009456 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
Radius of convergence (three term test) for eq 1 = 43.58
Order of pole (three term test) = 47.48 0
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.6312 2.328
h = 0.0001 0.005
y[1] (numeric) = 4.05474508679 4.1014195308
y[1] (closed_form) = 4.05528458987 4.10115131606
absolute error = 0.0006025
relative error = 0.01045 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
Radius of convergence (three term test) for eq 1 = 19.61
Order of pole (three term test) = 47.61 0
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.6313 2.333
h = 0.0001 0.003
y[1] (numeric) = 4.07022939602 4.12205611322
y[1] (closed_form) = 4.07073163997 4.12180062707
absolute error = 0.0005635
relative error = 0.009727 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
Radius of convergence (three term test) for eq 1 = 15.95
Order of pole (three term test) = 47.81 0
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.6314 2.336
h = 0.001 0.001
y[1] (numeric) = 4.07971455287 4.13438480473
y[1] (closed_form) = 4.08020714636 4.13411722804
absolute error = 0.0005606
relative error = 0.009651 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
Radius of convergence (three term test) for eq 1 = 12.59
Order of pole (three term test) = 47.93 0
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.6324 2.337
h = 0.0001 0.004
y[1] (numeric) = 4.08696074217 4.13557509125
y[1] (closed_form) = 4.08744658502 4.13530321073
absolute error = 0.0005567
relative error = 0.009575 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
Radius of convergence (three term test) for eq 1 = 75.78
Order of pole (three term test) = 47.94 0
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.6325 2.341
h = 0.003 0.006
y[1] (numeric) = 4.09951792094 4.1521267303
y[1] (closed_form) = 4.10001563431 4.15188498863
absolute error = 0.0005533
relative error = 0.009483 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
Radius of convergence (three term test) for eq 1 = 45.26
Order of pole (three term test) = 48.1 0
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.6355 2.347
h = 0.0001 0.005
y[1] (numeric) = 4.13052816282 4.16840406117
y[1] (closed_form) = 4.13107972055 4.1681327478
absolute error = 0.0006147
relative error = 0.01047 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
Radius of convergence (three term test) for eq 1 = 20.37
Order of pole (three term test) = 48.24 0
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.6356 2.352
h = 0.0001 0.003
y[1] (numeric) = 4.14640338114 4.189359675
y[1] (closed_form) = 4.1469170103 4.18910148795
absolute error = 0.0005749
relative error = 0.009753 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
Radius of convergence (three term test) for eq 1 = 16.57
Order of pole (three term test) = 48.45 0
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.6357 2.355
h = 0.001 0.001
y[1] (numeric) = 4.15612649447 4.20187790231
y[1] (closed_form) = 4.15663023723 4.20160742994
absolute error = 0.0005718
relative error = 0.009674 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
Radius of convergence (three term test) for eq 1 = 13.08
Order of pole (three term test) = 48.57 0
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.6367 2.356
h = 0.001 0.003
y[1] (numeric) = 4.16351584742 4.20305677889
y[1] (closed_form) = 4.16401269139 4.20278194686
absolute error = 0.0005678
relative error = 0.009597 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
Radius of convergence (three term test) for eq 1 = 62.21
Order of pole (three term test) = 48.58 0
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.6377 2.359
h = 0.0001 0.004
y[1] (numeric) = 4.17712937798 4.2127840164
y[1] (closed_form) = 4.17763994142 4.21251863259
absolute error = 0.0005754
relative error = 0.009699 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
Radius of convergence (three term test) for eq 1 = 35.41
Order of pole (three term test) = 48.67 0
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.6378 2.363
h = 0.003 0.006
y[1] (numeric) = 4.1900717046 4.22964395377
y[1] (closed_form) = 4.19058139701 4.2293927791
absolute error = 0.0005682
relative error = 0.009544 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
Radius of convergence (three term test) for eq 1 = 47.3
Order of pole (three term test) = 48.84 0
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.6408 2.369
h = 0.0001 0.005
y[1] (numeric) = 4.22185849079 4.24610056415
y[1] (closed_form) = 4.22242308632 4.24581888182
absolute error = 0.000631
relative error = 0.01054 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
Radius of convergence (three term test) for eq 1 = 21.29
Order of pole (three term test) = 49 0
NO COMPLEX POLE (six term test) for Equation 1
memory used=1268.4MB, alloc=52.3MB, time=15.52
x[1] = 0.6409 2.374
h = 0.0001 0.003
y[1] (numeric) = 4.23820415005 4.26742597794
y[1] (closed_form) = 4.23873003246 4.2671579084
absolute error = 0.0005903
relative error = 0.009814 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
Radius of convergence (three term test) for eq 1 = 17.31
Order of pole (three term test) = 49.21 0
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.641 2.377
h = 0.001 0.001
y[1] (numeric) = 4.24821353216 4.28016377719
y[1] (closed_form) = 4.24872924415 4.27988319678
absolute error = 0.0005871
relative error = 0.009735 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
Radius of convergence (three term test) for eq 1 = 13.67
Order of pole (three term test) = 49.35 0
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.642 2.378
h = 0.001 0.003
y[1] (numeric) = 4.25577239122 4.28132601569
y[1] (closed_form) = 4.25628102758 4.28104101275
absolute error = 0.000583
relative error = 0.009658 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
Radius of convergence (three term test) for eq 1 = 65.01
Order of pole (three term test) = 49.35 0
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.643 2.381
h = 0.0001 0.004
y[1] (numeric) = 4.26974177883 4.29118896801
y[1] (closed_form) = 4.27026449028 4.29091355576
absolute error = 0.0005908
relative error = 0.00976 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
Radius of convergence (three term test) for eq 1 = 37.01
Order of pole (three term test) = 49.45 0
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.6431 2.385
h = 0.003 0.006
y[1] (numeric) = 4.28306629492 4.30834562598
y[1] (closed_form) = 4.28358818782 4.30808474599
absolute error = 0.0005835
relative error = 0.009604 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
Radius of convergence (three term test) for eq 1 = 49.43
Order of pole (three term test) = 49.63 0
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.6461 2.391
h = 0.0001 0.005
y[1] (numeric) = 4.31564795572 4.32498160559
y[1] (closed_form) = 4.3162258284 4.32468925527
absolute error = 0.0006476
relative error = 0.0106 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
Radius of convergence (three term test) for eq 1 = 22.24
Order of pole (three term test) = 49.8 0
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.6462 2.396
h = 0.0001 0.003
y[1] (numeric) = 4.33247648173 4.34668272997
y[1] (closed_form) = 4.33301484229 4.34640449415
absolute error = 0.000606
relative error = 0.009874 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
Radius of convergence (three term test) for eq 1 = 18.09
Order of pole (three term test) = 50.03 0
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.6463 2.399
h = 0.001 0.001
y[1] (numeric) = 4.34277966682 4.35964357426
y[1] (closed_form) = 4.34330756538 4.35935259868
absolute error = 0.0006028
relative error = 0.009795 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
Radius of convergence (three term test) for eq 1 = 14.28
Order of pole (three term test) = 50.16 0
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.6473 2.4
h = 0.001 0.003
y[1] (numeric) = 4.35051174931 4.36078794171
y[1] (closed_form) = 4.35103239112 4.36049248037
absolute error = 0.0005986
relative error = 0.009718 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
Radius of convergence (three term test) for eq 1 = 67.93
Order of pole (three term test) = 50.17 0
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.6483 2.403
h = 0.0001 0.004
y[1] (numeric) = 4.36484566314 4.37078784768
y[1] (closed_form) = 4.36538074432 4.37050212057
absolute error = 0.0006066
relative error = 0.00982 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
Radius of convergence (three term test) for eq 1 = 38.67
Order of pole (three term test) = 50.28 0
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.6484 2.407
h = 0.003 0.006
y[1] (numeric) = 4.37856244488 4.38824594084
y[1] (closed_form) = 4.37909676302 4.38797507595
absolute error = 0.0005991
relative error = 0.009663 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
Radius of convergence (three term test) for eq 1 = 51.65
Order of pole (three term test) = 50.47 0
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.6514 2.413
h = 0.0001 0.005
y[1] (numeric) = 4.41195771482 4.40506127577
y[1] (closed_form) = 4.41254910758 4.40475795047
absolute error = 0.0006646
relative error = 0.01066 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
Radius of convergence (three term test) for eq 1 = 23.24
Order of pole (three term test) = 50.64 0
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.6515 2.418
h = 0.0001 0.003
y[1] (numeric) = 4.42928184119 4.42714408008
y[1] (closed_form) = 4.42983290809 4.42685538664
absolute error = 0.0006221
relative error = 0.009934 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
Radius of convergence (three term test) for eq 1 = 18.9
Order of pole (three term test) = 50.89 0
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.6516 2.421
h = 0.001 0.001
y[1] (numeric) = 4.43988654941 4.44033147566
y[1] (closed_form) = 4.44042685499 4.44002981021
absolute error = 0.0006188
relative error = 0.009855 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
Radius of convergence (three term test) for eq 1 = 14.93
Order of pole (three term test) = 51.03 0
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.6526 2.422
h = 0.001 0.003
y[1] (numeric) = 4.44779564744 4.44145669054
y[1] (closed_form) = 4.44832851081 4.44115047575
absolute error = 0.0006146
relative error = 0.009777 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
Radius of convergence (three term test) for eq 1 = 70.99
Order of pole (three term test) = 51.04 0
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.6536 2.425
h = 0.0001 0.004
y[1] (numeric) = 4.4625029548 4.45159476642
y[1] (closed_form) = 4.46305063068 4.45129843048
absolute error = 0.0006227
relative error = 0.009879 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
Radius of convergence (three term test) for eq 1 = 40.41
Order of pole (three term test) = 51.16 0
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.6537 2.429
h = 0.003 0.006
y[1] (numeric) = 4.47662232754 4.46935905532
y[1] (closed_form) = 4.47716929898 4.46907791851
absolute error = 0.000615
relative error = 0.009722 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
Radius of convergence (three term test) for eq 1 = 53.97
Order of pole (three term test) = 51.35 0
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.6567 2.435
h = 0.0001 0.005
y[1] (numeric) = 4.51085035391 4.4863536237
y[1] (closed_form) = 4.51145551328 4.48603900829
absolute error = 0.0006821
relative error = 0.01072 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
Radius of convergence (three term test) for eq 1 = 24.29
Order of pole (three term test) = 51.54 0
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.6568 2.44
h = 0.0001 0.003
y[1] (numeric) = 4.5286831292 4.5088241357
y[1] (closed_form) = 4.529247134 4.50852468558
absolute error = 0.0006386
relative error = 0.009992 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
Radius of convergence (three term test) for eq 1 = 19.75
Order of pole (three term test) = 51.8 0
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.6569 2.443
h = 0.001 0.001
y[1] (numeric) = 4.539597271 4.5222416218
y[1] (closed_form) = 4.54015020724 4.52192896401
absolute error = 0.0006352
relative error = 0.009913 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
Radius of convergence (three term test) for eq 1 = 15.6
Order of pole (three term test) = 51.95 0
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.6579 2.444
h = 0.0001 0.004
y[1] (numeric) = 4.54768725294 4.52334635258
y[1] (closed_form) = 4.54823255705 4.52302908153
absolute error = 0.0006309
relative error = 0.009836 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
Radius of convergence (three term test) for eq 1 = 93.86
Order of pole (three term test) = 51.97 0
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.658 2.448
h = 0.003 0.006
y[1] (numeric) = 4.5621432234 4.54136526767
y[1] (closed_form) = 4.56270254849 4.54108124387
absolute error = 0.0006273
relative error = 0.009745 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
Radius of convergence (three term test) for eq 1 = 56.06
Order of pole (three term test) = 52.17 0
NO COMPLEX POLE (six term test) for Equation 1
memory used=1312.7MB, alloc=52.3MB, time=16.07
x[1] = 0.661 2.454
h = 0.0001 0.005
y[1] (numeric) = 4.59710158199 4.55852416886
y[1] (closed_form) = 4.59772008088 4.55820578055
absolute error = 0.0006956
relative error = 0.01074 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
Radius of convergence (three term test) for eq 1 = 25.23
Order of pole (three term test) = 52.37 0
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.6611 2.459
h = 0.0001 0.003
y[1] (numeric) = 4.615378163 4.58133955452
y[1] (closed_form) = 4.61595477519 4.58103679374
absolute error = 0.0006513
relative error = 0.01001 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
Radius of convergence (three term test) for eq 1 = 20.52
Order of pole (three term test) = 52.64 0
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.6612 2.462
h = 0.001 0.001
y[1] (numeric) = 4.62656233917 4.59496177181
y[1] (closed_form) = 4.62712761469 4.59464559397
absolute error = 0.0006477
relative error = 0.009933 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
Radius of convergence (three term test) for eq 1 = 16.2
Order of pole (three term test) = 52.8 0
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.6622 2.463
h = 0.001 0.003
y[1] (numeric) = 4.63481144345 4.59604998384
y[1] (closed_form) = 4.63536892048 4.59572913514
absolute error = 0.0006432
relative error = 0.009854 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
Radius of convergence (three term test) for eq 1 = 77.05
Order of pole (three term test) = 52.82 0
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.6632 2.466
h = 0.0001 0.004
y[1] (numeric) = 4.65023616752 4.60645302194
y[1] (closed_form) = 4.65080917389 4.60614232864
absolute error = 0.0006518
relative error = 0.009958 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
Radius of convergence (three term test) for eq 1 = 43.86
Order of pole (three term test) = 52.94 0
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.6633 2.47
h = 0.003 0.006
y[1] (numeric) = 4.66512924366 4.62480499445
y[1] (closed_form) = 4.6657016591 4.62451014697
absolute error = 0.0006439
relative error = 0.009802 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
Radius of convergence (three term test) for eq 1 = 58.58
Order of pole (three term test) = 53.16 0
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.6663 2.476
h = 0.0001 0.005
y[1] (numeric) = 4.70095712058 4.64214283943
y[1] (closed_form) = 4.70158985853 4.64181255524
absolute error = 0.0007138
relative error = 0.0108 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
Radius of convergence (three term test) for eq 1 = 26.37
Order of pole (three term test) = 53.38 0
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.6664 2.481
h = 0.0001 0.003
y[1] (numeric) = 4.71976742103 4.66535746815
y[1] (closed_form) = 4.72035741483 4.66504337581
absolute error = 0.0006684
relative error = 0.01007 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
Radius of convergence (three term test) for eq 1 = 21.44
Order of pole (three term test) = 53.66 0
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.6665 2.484
h = 0.001 0.001
y[1] (numeric) = 4.73127622899 4.67921654837
y[1] (closed_form) = 4.73185456364 4.67888879678
absolute error = 0.0006647
relative error = 0.009989 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
Radius of convergence (three term test) for eq 1 = 16.93
Order of pole (three term test) = 53.83 0
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.6675 2.485
h = 0.001 0.003
y[1] (numeric) = 4.73971364053 4.6802817086
y[1] (closed_form) = 4.74028397821 4.67994922159
absolute error = 0.0006602
relative error = 0.009911 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
Radius of convergence (three term test) for eq 1 = 80.52
Order of pole (three term test) = 53.85 0
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.6685 2.488
h = 0.0001 0.004
y[1] (numeric) = 4.75553824524 4.69082637155
y[1] (closed_form) = 4.75612451186 4.69050418762
absolute error = 0.000669
relative error = 0.01001 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
Radius of convergence (three term test) for eq 1 = 45.84
Order of pole (three term test) = 53.98 0
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.6686 2.492
h = 0.003 0.006
y[1] (numeric) = 4.77086482063 4.70949854355
y[1] (closed_form) = 4.77145056436 4.70919256305
absolute error = 0.0006608
relative error = 0.009858 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
Radius of convergence (three term test) for eq 1 = 61.22
Order of pole (three term test) = 54.21 0
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.6716 2.498
h = 0.0001 0.005
y[1] (numeric) = 4.80758259412 4.72701488134
y[1] (closed_form) = 4.80822982829 4.7266723617
absolute error = 0.0007323
relative error = 0.01086 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
Radius of convergence (three term test) for eq 1 = 27.55
Order of pole (three term test) = 54.44 0
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.6717 2.503
h = 0.0001 0.003
y[1] (numeric) = 4.82694060411 4.7506349503
y[1] (closed_form) = 4.82754422098 4.7503092042
absolute error = 0.0006859
relative error = 0.01013 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
Radius of convergence (three term test) for eq 1 = 22.4
Order of pole (three term test) = 54.74 0
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.6718 2.506
h = 0.001 0.001
y[1] (numeric) = 4.83878252319 4.76473452806
y[1] (closed_form) = 4.8393741499 4.76439487701
absolute error = 0.0006822
relative error = 0.01005 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
Radius of convergence (three term test) for eq 1 = 17.69
Order of pole (three term test) = 54.92 0
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.6728 2.507
h = 0.001 0.003
y[1] (numeric) = 4.84741233721 4.76577515438
y[1] (closed_form) = 4.84799576374 4.76543070305
absolute error = 0.0006775
relative error = 0.009967 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
Radius of convergence (three term test) for eq 1 = 84.14
Order of pole (three term test) = 54.94 0
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.6738 2.51
h = 0.0001 0.004
y[1] (numeric) = 4.86364649655 4.77646255915
y[1] (closed_form) = 4.86424626128 4.77612855955
absolute error = 0.0006865
relative error = 0.01007 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
Radius of convergence (three term test) for eq 1 = 47.9
Order of pole (three term test) = 55.08 0
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.6739 2.514
h = 0.003 0.006
y[1] (numeric) = 4.87941791362 4.79545986927
y[1] (closed_form) = 4.88001722702 4.79514243824
absolute error = 0.0006782
relative error = 0.009913 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
Radius of convergence (three term test) for eq 1 = 63.97
Order of pole (three term test) = 55.32 0
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.6769 2.52
h = 0.0001 0.005
y[1] (numeric) = 4.91704640926 4.81315412274
y[1] (closed_form) = 4.91770840057 4.81279901914
absolute error = 0.0007512
relative error = 0.01092 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
Radius of convergence (three term test) for eq 1 = 28.79
Order of pole (three term test) = 55.57 0
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.677 2.525
h = 0.0001 0.003
y[1] (numeric) = 4.93696646317 4.83718588624
y[1] (closed_form) = 4.93758394804 4.83684815568
absolute error = 0.0007038
relative error = 0.01018 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
Radius of convergence (three term test) for eq 1 = 23.41
Order of pole (three term test) = 55.88 0
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.6771 2.528
h = 0.001 0.001
y[1] (numeric) = 4.94915018064 4.85152962811
y[1] (closed_form) = 4.94975533565 4.85117774336
absolute error = 0.0007
relative error = 0.0101 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
Radius of convergence (three term test) for eq 1 = 18.49
Order of pole (three term test) = 56.07 0
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.6781 2.529
h = 0.001 0.003
y[1] (numeric) = 4.95797657436 4.85254418233
y[1] (closed_form) = 4.95857332111 4.85218743216
absolute error = 0.0006953
relative error = 0.01002 %
Correct digits = 4
memory used=1357.1MB, alloc=52.3MB, time=16.63
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
Radius of convergence (three term test) for eq 1 = 87.92
Order of pole (three term test) = 56.09 0
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.6791 2.532
h = 0.0001 0.004
y[1] (numeric) = 4.97463018235 4.86337541547
y[1] (closed_form) = 4.97524368644 4.86302926663
absolute error = 0.0007044
relative error = 0.01013 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
Radius of convergence (three term test) for eq 1 = 50.05
Order of pole (three term test) = 56.24 0
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.6792 2.536
h = 0.003 0.006
y[1] (numeric) = 4.99085806215 4.88270284685
y[1] (closed_form) = 4.99147119016 4.88237363938
absolute error = 0.0006959
relative error = 0.009967 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
Radius of convergence (three term test) for eq 1 = 66.85
Order of pole (three term test) = 56.5 0
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.6822 2.542
h = 0.0001 0.005
y[1] (numeric) = 5.02941856224 4.90057430758
y[1] (closed_form) = 5.03009557541 4.9002062623
absolute error = 0.0007706
relative error = 0.01097 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
Radius of convergence (three term test) for eq 1 = 30.09
Order of pole (three term test) = 56.76 0
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.6823 2.547
h = 0.0001 0.003
y[1] (numeric) = 5.04991534672 4.92502407653
y[1] (closed_form) = 5.05054694806 4.9246740221
absolute error = 0.0007221
relative error = 0.01024 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
Radius of convergence (three term test) for eq 1 = 24.47
Order of pole (three term test) = 57.1 0
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.6824 2.55
h = 0.001 0.001
y[1] (numeric) = 5.06244976262 4.93961568069
y[1] (closed_form) = 5.06306868549 4.93925121926
absolute error = 0.0007183
relative error = 0.01015 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
Radius of convergence (three term test) for eq 1 = 19.32
Order of pole (three term test) = 57.3 0
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.6834 2.551
h = 0.0001 0.004
y[1] (numeric) = 5.07147699681 4.9406025669
y[1] (closed_form) = 5.07208729836 4.94023317466
absolute error = 0.0007134
relative error = 0.01008 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
Radius of convergence (three term test) for eq 1 = 116.3
Order of pole (three term test) = 57.32 0
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.6835 2.555
h = 0.003 0.006
y[1] (numeric) = 5.08808647625 4.96020444192
y[1] (closed_form) = 5.08871328253 4.95987168794
absolute error = 0.0007097
relative error = 0.009987 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
Radius of convergence (three term test) for eq 1 = 69.44
Order of pole (three term test) = 57.59 0
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.6865 2.561
h = 0.0001 0.005
y[1] (numeric) = 5.12746451587 4.97823922102
y[1] (closed_form) = 5.12815627694 4.97786661488
absolute error = 0.0007857
relative error = 0.01099 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
Radius of convergence (three term test) for eq 1 = 31.25
Order of pole (three term test) = 57.87 0
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.6866 2.566
h = 0.0001 0.003
y[1] (numeric) = 5.14846468382 5.00306100637
y[1] (closed_form) = 5.14911023287 5.00270692683
absolute error = 0.0007363
relative error = 0.01026 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
Radius of convergence (three term test) for eq 1 = 25.41
Order of pole (three term test) = 58.22 0
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.6867 2.569
h = 0.001 0.001
y[1] (numeric) = 5.16130524918 5.01787327321
y[1] (closed_form) = 5.16193781543 5.01750456186
absolute error = 0.0007322
relative error = 0.01017 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
Radius of convergence (three term test) for eq 1 = 20.07
Order of pole (three term test) = 58.42 0
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.6877 2.57
h = 0.001 0.003
y[1] (numeric) = 5.17050919356 5.01883748347
y[1] (closed_form) = 5.17113295182 5.01846378221
absolute error = 0.0007271
relative error = 0.01009 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
Radius of convergence (three term test) for eq 1 = 95.44
Order of pole (three term test) = 58.45 0
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.6887 2.573
h = 0.0001 0.004
y[1] (numeric) = 5.18796866211 5.02994441296
y[1] (closed_form) = 5.18860998293 5.02958159913
absolute error = 0.0007368
relative error = 0.0102 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
Radius of convergence (three term test) for eq 1 = 54.33
Order of pole (three term test) = 58.62 0
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.6888 2.577
h = 0.003 0.006
y[1] (numeric) = 5.20507374921 5.04990531393
y[1] (closed_form) = 5.20571483943 5.04956015707
absolute error = 0.0007281
relative error = 0.01004 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
Radius of convergence (three term test) for eq 1 = 72.56
Order of pole (three term test) = 58.9 0
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.6918 2.583
h = 0.0001 0.005
y[1] (numeric) = 5.24542465542 5.06811588126
y[1] (closed_form) = 5.24613194566 5.06772964592
absolute error = 0.0008059
relative error = 0.01105 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
Radius of convergence (three term test) for eq 1 = 32.66
Order of pole (three term test) = 59.2 0
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.6919 2.588
h = 0.0001 0.003
y[1] (numeric) = 5.26702977127 5.09336774923
y[1] (closed_form) = 5.26768991294 5.09300069347
absolute error = 0.0007553
relative error = 0.01031 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
Radius of convergence (three term test) for eq 1 = 26.56
Order of pole (three term test) = 59.57 0
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.692 2.591
h = 0.001 0.001
y[1] (numeric) = 5.2802381343 5.1084349548
y[1] (closed_form) = 5.28088492741 5.10805300755
absolute error = 0.0007511
relative error = 0.01022 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
Radius of convergence (three term test) for eq 1 = 20.97
Order of pole (three term test) = 59.79 0
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.693 2.592
h = 0.001 0.003
y[1] (numeric) = 5.28965109591 5.10936842102
y[1] (closed_form) = 5.29028885844 5.10898141798
absolute error = 0.000746
relative error = 0.01014 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
Radius of convergence (three term test) for eq 1 = 99.73
Order of pole (three term test) = 59.82 0
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.694 2.595
h = 0.0001 0.004
y[1] (numeric) = 5.30755956403 5.12062222972
y[1] (closed_form) = 5.30821533779 5.12024626641
absolute error = 0.0007559
relative error = 0.01025 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
Radius of convergence (three term test) for eq 1 = 56.77
Order of pole (three term test) = 59.99 0
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.6941 2.599
h = 0.003 0.006
y[1] (numeric) = 5.32515589503 5.14092789927
y[1] (closed_form) = 5.32581152448 5.14056998853
absolute error = 0.000747
relative error = 0.01009 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
Radius of convergence (three term test) for eq 1 = 75.83
Order of pole (three term test) = 60.3 0
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.6971 2.605
h = 0.0001 0.005
y[1] (numeric) = 5.36650231176 5.15931314688
y[1] (closed_form) = 5.36722540705 5.15891289718
absolute error = 0.0008265
relative error = 0.0111 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
Radius of convergence (three term test) for eq 1 = 34.13
Order of pole (three term test) = 60.61 0
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.6972 2.61
h = 0.0001 0.003
y[1] (numeric) = 5.38872811495 5.18500157169
y[1] (closed_form) = 5.38940310811 5.18462117427
absolute error = 0.0007748
relative error = 0.01036 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
Radius of convergence (three term test) for eq 1 = 27.75
Order of pole (three term test) = 61 0
NO COMPLEX POLE (six term test) for Equation 1
memory used=1401.3MB, alloc=52.3MB, time=17.18
x[1] = 0.6973 2.613
h = 0.001 0.001
y[1] (numeric) = 5.40231381159 5.20032750506
y[1] (closed_form) = 5.40297508086 5.19993195279
absolute error = 0.0007705
relative error = 0.01028 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
Radius of convergence (three term test) for eq 1 = 21.91
Order of pole (three term test) = 61.23 0
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.6983 2.614
h = 0.001 0.003
y[1] (numeric) = 5.41194029972 5.20122845755
y[1] (closed_form) = 5.41259231051 5.20082778343
absolute error = 0.0007653
relative error = 0.0102 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
Radius of convergence (three term test) for eq 1 = 104.2
Order of pole (three term test) = 61.26 0
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.6993 2.617
h = 0.0001 0.004
y[1] (numeric) = 5.43030855688 5.21263009975
y[1] (closed_form) = 5.43097903838 5.21224061848
absolute error = 0.0007754
relative error = 0.0103 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
Radius of convergence (three term test) for eq 1 = 59.33
Order of pole (three term test) = 61.45 0
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.6994 2.621
h = 0.003 0.006
y[1] (numeric) = 5.44840888999 5.23328569192
y[1] (closed_form) = 5.4490793176 5.23291466709
absolute error = 0.0007662
relative error = 0.01014 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
Radius of convergence (three term test) for eq 1 = 79.24
Order of pole (three term test) = 61.77 0
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.7024 2.627
h = 0.0001 0.005
y[1] (numeric) = 5.49077395577 5.25184435936
y[1] (closed_form) = 5.49151313593 5.25142970004
absolute error = 0.0008475
relative error = 0.01115 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
Radius of convergence (three term test) for eq 1 = 35.66
Order of pole (three term test) = 62.11 0
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.7025 2.632
h = 0.0001 0.003
y[1] (numeric) = 5.51363657056 5.27797586949
y[1] (closed_form) = 5.51432667772 5.27758175544
absolute error = 0.0007947
relative error = 0.01041 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
Radius of convergence (three term test) for eq 1 = 29
Order of pole (three term test) = 62.52 0
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.7026 2.635
h = 0.001 0.001
y[1] (numeric) = 5.5276093691 5.29356434966
y[1] (closed_form) = 5.52828536726 5.29315481371
absolute error = 0.0007904
relative error = 0.01033 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
Radius of convergence (three term test) for eq 1 = 22.9
Order of pole (three term test) = 62.76 0
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.7036 2.636
h = 0.001 0.003
y[1] (numeric) = 5.5374539828 5.29443095413
y[1] (closed_form) = 5.53812048918 5.29401623007
absolute error = 0.000785
relative error = 0.01025 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
Radius of convergence (three term test) for eq 1 = 108.9
Order of pole (three term test) = 62.8 0
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.7046 2.639
h = 0.0001 0.004
y[1] (numeric) = 5.55629306258 5.3059813443
y[1] (closed_form) = 5.55697851016 5.30557796701
absolute error = 0.0007953
relative error = 0.01035 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
Radius of convergence (three term test) for eq 1 = 61.99
Order of pole (three term test) = 63 0
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.7047 2.643
h = 0.003 0.006
y[1] (numeric) = 5.5749104674 5.32699205513
y[1] (closed_form) = 5.5755959558 5.32660754657
absolute error = 0.000786
relative error = 0.01019 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
Radius of convergence (three term test) for eq 1 = 82.8
Order of pole (three term test) = 63.33 0
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.7077 2.649
h = 0.0001 0.005
y[1] (numeric) = 5.61831782565 5.34572272343
y[1] (closed_form) = 5.61907337448 5.34529324893
absolute error = 0.0008691
relative error = 0.01121 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
Radius of convergence (three term test) for eq 1 = 37.26
Order of pole (three term test) = 63.7 0
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.7078 2.654
h = 0.0001 0.003
y[1] (numeric) = 5.64183376994 5.37230390086
y[1] (closed_form) = 5.64253925732 5.37189568543
absolute error = 0.0008151
relative error = 0.01046 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
Radius of convergence (three term test) for eq 1 = 30.3
Order of pole (three term test) = 64.13 0
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.7079 2.657
h = 0.001 0.001
y[1] (numeric) = 5.65620367643 5.38815877629
y[1] (closed_form) = 5.65689465966 5.38773486814
absolute error = 0.0008107
relative error = 0.01038 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
Radius of convergence (three term test) for eq 1 = 23.93
Order of pole (three term test) = 64.39 0
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.7089 2.658
h = 0.0001 0.004
y[1] (numeric) = 5.66627110619 5.38898913189
y[1] (closed_form) = 5.66695235879 5.38855996923
absolute error = 0.0008052
relative error = 0.0103 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
Radius of convergence (three term test) for eq 1 = 144
Order of pole (three term test) = 64.42 0
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.709 2.662
h = 0.003 0.006
y[1] (numeric) = 5.68532073648 5.41029498331
y[1] (closed_form) = 5.6860213562 5.40990615561
absolute error = 0.0008013
relative error = 0.01021 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
Radius of convergence (three term test) for eq 1 = 86.01
Order of pole (three term test) = 64.77 0
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.712 2.668
h = 0.0001 0.005
y[1] (numeric) = 5.72964256872 5.42918525101
y[1] (closed_form) = 5.73041440826 5.42875029776
absolute error = 0.000886
relative error = 0.01122 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
Radius of convergence (three term test) for eq 1 = 38.71
Order of pole (three term test) = 65.16 0
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.7121 2.673
h = 0.0001 0.003
y[1] (numeric) = 5.75372894753 5.45616685566
y[1] (closed_form) = 5.75444985165 5.45575378092
absolute error = 0.0008309
relative error = 0.01048 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
Radius of convergence (three term test) for eq 1 = 31.48
Order of pole (three term test) = 65.61 0
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.7122 2.676
h = 0.001 0.001
y[1] (numeric) = 5.76844563316 5.47225903607
y[1] (closed_form) = 5.76915168808 5.47183002762
absolute error = 0.0008262
relative error = 0.01039 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
Radius of convergence (three term test) for eq 1 = 24.86
Order of pole (three term test) = 65.88 0
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.7132 2.677
h = 0.001 0.003
y[1] (numeric) = 5.77870914652 5.47305934743
y[1] (closed_form) = 5.77940526148 5.47262502427
absolute error = 0.0008205
relative error = 0.01031 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
Radius of convergence (three term test) for eq 1 = 118.2
Order of pole (three term test) = 65.92 0
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.7142 2.68
h = 0.0001 0.004
y[1] (numeric) = 5.79845274599 5.48489474177
y[1] (closed_form) = 5.79916870601 5.48447205971
absolute error = 0.0008314
relative error = 0.01042 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
Radius of convergence (three term test) for eq 1 = 67.29
Order of pole (three term test) = 66.14 0
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.7143 2.684
h = 0.003 0.006
y[1] (numeric) = 5.81806380418 5.5065867579
y[1] (closed_form) = 5.81877998797 5.50618373601
absolute error = 0.0008218
relative error = 0.01026 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
Radius of convergence (three term test) for eq 1 = 89.88
Order of pole (three term test) = 66.51 0
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.7173 2.69
h = 0.0001 0.005
y[1] (numeric) = 5.86347332506 5.52564623933
y[1] (closed_form) = 5.86426207717 5.5251956914
absolute error = 0.0009084
relative error = 0.01127 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
Radius of convergence (three term test) for eq 1 = 40.45
Order of pole (three term test) = 66.92 0
NO COMPLEX POLE (six term test) for Equation 1
memory used=1445.7MB, alloc=52.3MB, time=17.73
x[1] = 0.7174 2.695
h = 0.0001 0.003
y[1] (numeric) = 5.88824476848 5.5530901065
y[1] (closed_form) = 5.88898156298 5.55266219087
absolute error = 0.000852
relative error = 0.01053 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
Radius of convergence (three term test) for eq 1 = 32.89
Order of pole (three term test) = 67.4 0
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.7175 2.698
h = 0.001 0.001
y[1] (numeric) = 5.90337778577 5.56945604563
y[1] (closed_form) = 5.90409931665 5.56901191832
absolute error = 0.0008473
relative error = 0.01044 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
Radius of convergence (three term test) for eq 1 = 25.97
Order of pole (three term test) = 67.68 0
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.7185 2.699
h = 0.001 0.003
y[1] (numeric) = 5.9138731169 5.57021644582
y[1] (closed_form) = 5.91458445834 5.56976693711
absolute error = 0.0008415
relative error = 0.01036 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
Radius of convergence (three term test) for eq 1 = 123.5
Order of pole (three term test) = 67.73 0
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.7195 2.702
h = 0.0001 0.004
y[1] (numeric) = 5.93412048972 5.5822031063
y[1] (closed_form) = 5.93485217969 5.5817653948
absolute error = 0.0008526
relative error = 0.01047 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
Radius of convergence (three term test) for eq 1 = 70.32
Order of pole (three term test) = 67.97 0
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.7196 2.706
h = 0.003 0.006
y[1] (numeric) = 5.95428772962 5.60426550012
y[1] (closed_form) = 5.95501975098 5.60384788617
absolute error = 0.0008428
relative error = 0.01031 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
Radius of convergence (three term test) for eq 1 = 93.92
Order of pole (three term test) = 68.35 0
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.7226 2.712
h = 0.0001 0.005
y[1] (numeric) = 6.00081008739 5.62349229462
y[1] (closed_form) = 6.00161604755 5.62302571555
absolute error = 0.0009313
relative error = 0.01132 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
Radius of convergence (three term test) for eq 1 = 42.27
Order of pole (three term test) = 68.79 0
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.7227 2.717
h = 0.0001 0.003
y[1] (numeric) = 6.02628428967 5.65140515945
y[1] (closed_form) = 6.02703725163 5.65096198892
absolute error = 0.0008737
relative error = 0.01058 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
Radius of convergence (three term test) for eq 1 = 34.37
Order of pole (three term test) = 69.29 0
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.7228 2.72
h = 0.001 0.001
y[1] (numeric) = 6.04184435494 5.66804878962
y[1] (closed_form) = 6.04258162813 5.6675891256
absolute error = 0.0008688
relative error = 0.01049 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
Radius of convergence (three term test) for eq 1 = 27.14
Order of pole (three term test) = 69.59 0
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.7238 2.721
h = 0.001 0.003
y[1] (numeric) = 6.05257646624 5.66876717763
y[1] (closed_form) = 6.05330329461 5.66830206545
absolute error = 0.0008629
relative error = 0.01041 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
Radius of convergence (three term test) for eq 1 = 129.1
Order of pole (three term test) = 69.64 0
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.7248 2.724
h = 0.0001 0.004
y[1] (numeric) = 6.07333963917 5.68090584719
y[1] (closed_form) = 6.07408733153 5.68045268896
absolute error = 0.0008743
relative error = 0.01051 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
Radius of convergence (three term test) for eq 1 = 73.48
Order of pole (three term test) = 69.89 0
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.7249 2.728
h = 0.003 0.006
y[1] (numeric) = 6.09407740081 5.7033439741
y[1] (closed_form) = 6.09482553705 5.70291135989
absolute error = 0.0008642
relative error = 0.01035 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
Radius of convergence (three term test) for eq 1 = 98.15
Order of pole (three term test) = 70.3 0
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.7279 2.734
h = 0.0001 0.005
y[1] (numeric) = 6.14173829011 5.72273599776
y[1] (closed_form) = 6.14256175792 5.72225293979
absolute error = 0.0009547
relative error = 0.01137 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
Radius of convergence (three term test) for eq 1 = 44.17
Order of pole (three term test) = 70.77 0
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.728 2.739
h = 0.0001 0.003
y[1] (numeric) = 6.1679333753 5.75112464533
y[1] (closed_form) = 6.1687027856 5.75066579516
absolute error = 0.0008958
relative error = 0.01062 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
Radius of convergence (three term test) for eq 1 = 35.92
Order of pole (three term test) = 71.29 0
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.7281 2.742
h = 0.001 0.001
y[1] (numeric) = 6.18393146433 5.76804992587
y[1] (closed_form) = 6.1846847497 5.76757429654
absolute error = 0.0008909
relative error = 0.01053 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
Radius of convergence (three term test) for eq 1 = 28.36
Order of pole (three term test) = 71.61 0
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.7291 2.743
h = 0.001 0.003
y[1] (numeric) = 6.19490541635 5.7687241263
y[1] (closed_form) = 6.19564799549 5.768242982
absolute error = 0.0008848
relative error = 0.01045 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
Radius of convergence (three term test) for eq 1 = 134.9
Order of pole (three term test) = 71.66 0
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.7301 2.746
h = 0.0001 0.004
y[1] (numeric) = 6.21619668673 5.7810154969
y[1] (closed_form) = 6.21696065765 5.78054646388
absolute error = 0.0008965
relative error = 0.01056 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
Radius of convergence (three term test) for eq 1 = 76.79
Order of pole (three term test) = 71.93 0
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.7302 2.75
h = 0.003 0.006
y[1] (numeric) = 6.23751965791 5.80383475053
y[1] (closed_form) = 6.23828419016 5.80338671727
absolute error = 0.0008861
relative error = 0.0104 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
Radius of convergence (three term test) for eq 1 = 102.6
Order of pole (three term test) = 72.36 0
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.7332 2.756
h = 0.0001 0.005
y[1] (numeric) = 6.28634533098 5.82338972927
y[1] (closed_form) = 6.28718661017 5.82288973302
absolute error = 0.0009786
relative error = 0.01142 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
Radius of convergence (three term test) for eq 1 = 46.16
Order of pole (three term test) = 72.86 0
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.7333 2.761
h = 0.0001 0.003
y[1] (numeric) = 6.31327986276 5.85226099345
y[1] (closed_form) = 6.31406600613 5.8517860279
absolute error = 0.0009185
relative error = 0.01067 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
Radius of convergence (three term test) for eq 1 = 37.53
Order of pole (three term test) = 73.41 0
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.7334 2.764
h = 0.001 0.001
y[1] (numeric) = 6.32972721671 5.86947190993
y[1] (closed_form) = 6.33049678774 5.86897987568
absolute error = 0.0009134
relative error = 0.01058 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
Radius of convergence (three term test) for eq 1 = 29.64
Order of pole (three term test) = 73.74 0
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.7344 2.765
h = 0.0001 0.004
y[1] (numeric) = 6.34094816996 5.87009967085
y[1] (closed_form) = 6.34170676718 5.8696020548
absolute error = 0.0009072
relative error = 0.0105 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
Radius of convergence (three term test) for eq 1 = 178.4
Order of pole (three term test) = 73.8 0
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.7345 2.769
h = 0.003 0.006
y[1] (numeric) = 6.36276027655 5.8932355884
y[1] (closed_form) = 6.36354153305 5.89278233398
absolute error = 0.0009032
relative error = 0.01041 %
Correct digits = 4
memory used=1489.8MB, alloc=52.3MB, time=18.27
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
Radius of convergence (three term test) for eq 1 = 106.5
Order of pole (three term test) = 74.25 0
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.7375 2.775
h = 0.0001 0.005
y[1] (numeric) = 6.41260811236 5.91294317292
y[1] (closed_form) = 6.41346737115 5.91243663179
absolute error = 0.0009975
relative error = 0.01143 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
Radius of convergence (three term test) for eq 1 = 47.94
Order of pole (three term test) = 74.78 0
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.7376 2.78
h = 0.0001 0.003
y[1] (numeric) = 6.44018848288 5.9422444837
y[1] (closed_form) = 6.44099165205 5.94176368786
absolute error = 0.0009361
relative error = 0.01068 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
Radius of convergence (three term test) for eq 1 = 38.99
Order of pole (three term test) = 75.36 0
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.7377 2.783
h = 0.001 0.001
y[1] (numeric) = 6.45702829025 5.959710016
y[1] (closed_form) = 6.45781449624 5.95921189356
absolute error = 0.0009307
relative error = 0.01059 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
Radius of convergence (three term test) for eq 1 = 30.79
Order of pole (three term test) = 75.7 0
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.7387 2.784
h = 0.001 0.003
y[1] (numeric) = 6.46846665514 5.96029896778
y[1] (closed_form) = 6.46924165275 5.95979520273
absolute error = 0.0009243
relative error = 0.01051 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
Radius of convergence (three term test) for eq 1 = 146.4
Order of pole (three term test) = 75.77 0
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.7397 2.787
h = 0.0001 0.004
y[1] (numeric) = 6.49077243665 5.97288278526
y[1] (closed_form) = 6.49156983992 5.97239143227
absolute error = 0.0009366
relative error = 0.01062 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
Radius of convergence (three term test) for eq 1 = 83.35
Order of pole (three term test) = 76.07 0
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.7398 2.791
h = 0.003 0.006
y[1] (numeric) = 6.51321996925 5.99643310995
y[1] (closed_form) = 6.51401816056 5.99596363155
absolute error = 0.000926
relative error = 0.01046 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
Radius of convergence (three term test) for eq 1 = 111.3
Order of pole (three term test) = 76.54 0
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.7428 2.797
h = 0.0001 0.005
y[1] (numeric) = 6.56428299437 6.01629921602
y[1] (closed_form) = 6.56516064664 6.01577485375
absolute error = 0.001022
relative error = 0.01148 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
Radius of convergence (three term test) for eq 1 = 50.1
Order of pole (three term test) = 77.1 0
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.7429 2.802
h = 0.0001 0.003
y[1] (numeric) = 6.59263847611 6.04609621928
y[1] (closed_form) = 6.593458924 6.04559847064
absolute error = 0.0009596
relative error = 0.01073 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
Radius of convergence (three term test) for eq 1 = 40.74
Order of pole (three term test) = 77.7 0
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.743 2.805
h = 0.001 0.001
y[1] (numeric) = 6.6099491446 6.06385501251
y[1] (closed_form) = 6.61075216025 6.06333964027
absolute error = 0.0009542
relative error = 0.01064 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
Radius of convergence (three term test) for eq 1 = 32.17
Order of pole (three term test) = 78.07 0
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.744 2.806
h = 0.001 0.003
y[1] (numeric) = 6.62164441463 6.0643931874
y[1] (closed_form) = 6.62243594247 6.0638721057
absolute error = 0.0009477
relative error = 0.01055 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
Radius of convergence (three term test) for eq 1 = 153
Order of pole (three term test) = 78.14 0
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.745 2.809
h = 0.0001 0.004
y[1] (numeric) = 6.644515014 6.07713153848
y[1] (closed_form) = 6.64532951202 6.0766230277
absolute error = 0.0009602
relative error = 0.01066 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
Radius of convergence (three term test) for eq 1 = 87.1
Order of pole (three term test) = 78.46 0
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.7451 2.813
h = 0.003 0.006
y[1] (numeric) = 6.667591701 6.10107881172
y[1] (closed_form) = 6.66840711958 6.10059265885
absolute error = 0.0009493
relative error = 0.0105 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
Radius of convergence (three term test) for eq 1 = 116.3
Order of pole (three term test) = 78.95 0
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.7481 2.819
h = 0.0001 0.005
y[1] (numeric) = 6.71989782935 6.12110058795
y[1] (closed_form) = 6.72079419099 6.12055791047
absolute error = 0.001048
relative error = 0.01153 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
Radius of convergence (three term test) for eq 1 = 52.35
Order of pole (three term test) = 79.55 0
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.7482 2.824
h = 0.0001 0.003
y[1] (numeric) = 6.74904829941 6.15140025582
y[1] (closed_form) = 6.74988632203 6.1508850858
absolute error = 0.0009837
relative error = 0.01077 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
Radius of convergence (three term test) for eq 1 = 42.57
Order of pole (three term test) = 80.19 0
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.7483 2.827
h = 0.001 0.001
y[1] (numeric) = 6.76684186302 6.16945636947
y[1] (closed_form) = 6.76766197228 6.16892327487
absolute error = 0.0009781
relative error = 0.01068 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
Radius of convergence (three term test) for eq 1 = 33.62
Order of pole (three term test) = 80.57 0
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.7493 2.828
h = 0.001 0.003
y[1] (numeric) = 6.77879949584 6.1699412853
y[1] (closed_form) = 6.7796078313 6.16940241445
absolute error = 0.0009715
relative error = 0.0106 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
Radius of convergence (three term test) for eq 1 = 159.9
Order of pole (three term test) = 80.65 0
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.7503 2.831
h = 0.0001 0.004
y[1] (numeric) = 6.8022483111 6.18283464386
y[1] (closed_form) = 6.80308019466 6.18230850318
absolute error = 0.0009843
relative error = 0.01071 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
Radius of convergence (three term test) for eq 1 = 91.02
Order of pole (three term test) = 80.98 0
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.7504 2.835
h = 0.003 0.006
y[1] (numeric) = 6.82597025861 6.20718440187
y[1] (closed_form) = 6.8268032009 6.20668111238
absolute error = 0.0009732
relative error = 0.01055 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
Radius of convergence (three term test) for eq 1 = 121.6
Order of pole (three term test) = 81.51 0
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.7534 2.841
h = 0.0001 0.005
y[1] (numeric) = 6.87954800719 6.22735877791
y[1] (closed_form) = 6.88046339835 6.22679727845
absolute error = 0.001074
relative error = 0.01157 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
Radius of convergence (three term test) for eq 1 = 54.71
Order of pole (three term test) = 82.14 0
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.7535 2.846
h = 0.0001 0.003
y[1] (numeric) = 6.90951382236 6.2581681263
y[1] (closed_form) = 6.91036971968 6.25763505427
absolute error = 0.001008
relative error = 0.01082 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
Radius of convergence (three term test) for eq 1 = 44.49
Order of pole (three term test) = 82.81 0
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.7536 2.849
h = 0.001 0.001
y[1] (numeric) = 6.92780260457 6.27652564279
y[1] (closed_form) = 6.92864009507 6.2759743412
absolute error = 0.001003
relative error = 0.01073 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
Radius of convergence (three term test) for eq 1 = 35.13
Order of pole (three term test) = 83.21 0
NO COMPLEX POLE (six term test) for Equation 1
memory used=1534.0MB, alloc=52.3MB, time=18.82
x[1] = 0.7546 2.85
h = 0.001 0.003
y[1] (numeric) = 6.94002816503 6.2769547319
y[1] (closed_form) = 6.94085358901 6.27639758741
absolute error = 0.0009959
relative error = 0.01064 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
Radius of convergence (three term test) for eq 1 = 167.1
Order of pole (three term test) = 83.29 0
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.7556 2.853
h = 0.0001 0.004
y[1] (numeric) = 6.964068894 6.29000350763
y[1] (closed_form) = 6.9649184577 6.28945925286
absolute error = 0.001009
relative error = 0.01075 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
Radius of convergence (three term test) for eq 1 = 95.11
Order of pole (three term test) = 83.65 0
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.7557 2.857
h = 0.003 0.006
y[1] (numeric) = 6.98845259619 6.31476131964
y[1] (closed_form) = 6.9893033626 6.31424041951
absolute error = 0.0009976
relative error = 0.01059 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
Radius of convergence (three term test) for eq 1 = 127
Order of pole (three term test) = 84.2 0
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.7587 2.863
h = 0.0001 0.005
y[1] (numeric) = 7.04333109734 6.33508499819
y[1] (closed_form) = 7.04426584244 6.33450415695
absolute error = 0.001101
relative error = 0.01162 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
Radius of convergence (three term test) for eq 1 = 57.17
Order of pole (three term test) = 84.87 0
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.7588 2.868
h = 0.0001 0.003
y[1] (numeric) = 7.07413310499 6.36641108522
y[1] (closed_form) = 7.07500718095 6.36585961822
absolute error = 0.001034
relative error = 0.01086 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
Radius of convergence (three term test) for eq 1 = 46.49
Order of pole (three term test) = 85.58 0
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.7589 2.871
h = 0.001 0.001
y[1] (numeric) = 7.09292972539 6.38507410888
y[1] (closed_form) = 7.09378488842 6.38450410333
absolute error = 0.001028
relative error = 0.01077 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
Radius of convergence (three term test) for eq 1 = 36.71
Order of pole (three term test) = 86 0
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.7599 2.872
h = 0.001 0.003
y[1] (numeric) = 7.10542888746 6.38544471569
y[1] (closed_form) = 7.1062716844 6.38486880073
absolute error = 0.001021
relative error = 0.01069 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
Radius of convergence (three term test) for eq 1 = 174.6
Order of pole (three term test) = 86.09 0
NO COMPLEX POLE (six term test) for Equation 1
Finished!
diff ( y , x , 1 ) = cos ( x ) ;
Iterations = 754
Total Elapsed Time = 18 Seconds
Expected Time Remaining = 0 Seconds
Optimized Time Remaining = 0 Seconds
Expected Total Time = 18 Seconds
> quit
memory used=1549.2MB, alloc=52.3MB, time=19.00