|\^/| 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(5.0)/c(3.0) * expt((c(0.2) * c(x) + c(0.3)),c(3.0))) ;
> end;
exact_soln_y :=
proc(x) return c(5.0)*expt(c(0.2)*c(x) + c(0.3), c(3.0))/c(3.0) 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,
> array_const_0D2,
> array_const_0D3,
> array_const_2D0,
#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,
> array_tmp2,
> array_tmp3_c1,
> array_tmp3_a1,
> array_tmp3_a2,
> array_tmp3,
> array_tmp4,
> 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_const_0D2,
array_const_0D3, array_const_2D0, 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, array_tmp2, array_tmp3_c1, array_tmp3_a1, array_tmp3_a2,
array_tmp3, array_tmp4, 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,
> array_const_0D2,
> array_const_0D3,
> array_const_2D0,
#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,
> array_tmp2,
> array_tmp3_c1,
> array_tmp3_a1,
> array_tmp3_a2,
> array_tmp3,
> array_tmp4,
> 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_const_0D2,
array_const_0D3, array_const_2D0, 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, array_tmp2, array_tmp3_c1, array_tmp3_a1, array_tmp3_a2,
array_tmp3, array_tmp4, 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,
> array_const_0D2,
> array_const_0D3,
> array_const_2D0,
#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,
> array_tmp2,
> array_tmp3_c1,
> array_tmp3_a1,
> array_tmp3_a2,
> array_tmp3,
> array_tmp4,
> 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_const_0D2,
array_const_0D3, array_const_2D0, 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, array_tmp2, array_tmp3_c1, array_tmp3_a1, array_tmp3_a2,
array_tmp3, array_tmp4, 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,
> array_const_0D2,
> array_const_0D3,
> array_const_2D0,
#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,
> array_tmp2,
> array_tmp3_c1,
> array_tmp3_a1,
> array_tmp3_a2,
> array_tmp3,
> array_tmp4,
> 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_const_0D2,
array_const_0D3, array_const_2D0, 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, array_tmp2, array_tmp3_c1, array_tmp3_a1, array_tmp3_a2,
array_tmp3, array_tmp4, 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,
> array_const_0D2,
> array_const_0D3,
> array_const_2D0,
#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,
> array_tmp2,
> array_tmp3_c1,
> array_tmp3_a1,
> array_tmp3_a2,
> array_tmp3,
> array_tmp4,
> 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_const_0D2,
array_const_0D3, array_const_2D0, 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, array_tmp2, array_tmp3_c1, array_tmp3_a1, array_tmp3_a2,
array_tmp3, array_tmp4, 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,
> array_const_0D2,
> array_const_0D3,
> array_const_2D0,
#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,
> array_tmp2,
> array_tmp3_c1,
> array_tmp3_a1,
> array_tmp3_a2,
> array_tmp3,
> array_tmp4,
> 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_const_0D2,
array_const_0D3, array_const_2D0, 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, array_tmp2, array_tmp3_c1, array_tmp3_a1, array_tmp3_a2,
array_tmp3, array_tmp4, 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,
> array_const_0D2,
> array_const_0D3,
> array_const_2D0,
#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,
> array_tmp2,
> array_tmp3_c1,
> array_tmp3_a1,
> array_tmp3_a2,
> array_tmp3,
> array_tmp4,
> 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_const_0D2,
array_const_0D3, array_const_2D0, 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, array_tmp2, array_tmp3_c1, array_tmp3_a1, array_tmp3_a2,
array_tmp3, array_tmp4, 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,
> array_const_0D2,
> array_const_0D3,
> array_const_2D0,
#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,
> array_tmp2,
> array_tmp3_c1,
> array_tmp3_a1,
> array_tmp3_a2,
> array_tmp3,
> array_tmp4,
> 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 mult CONST - LINEAR $eq_no = 1 i = 1
> array_tmp1[1] := array_const_0D2[1] * array_x[1];
> #emit pre add LINEAR - CONST $eq_no = 1 i = 1
> array_tmp2[1] := array_tmp1[1] + array_const_0D3[1];
> #emit pre expt LINEAR - CONST $eq_no = 1 iii = 1
> array_tmp3[1] := expt(array_tmp2[1] , c(array_const_2D0[1]));
> #emit pre add CONST FULL $eq_no = 1 i = 1
> array_tmp4[1] := array_const_0D0[1] + array_tmp3[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_tmp4[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 mult CONST - LINEAR $eq_no = 1 i = 2
> array_tmp1[2] := array_const_0D2[1] * array_x[2];
> #emit pre add LINEAR - CONST $eq_no = 1 i = 2
> array_tmp2[2] := array_tmp1[2];
> #emit pre expt LINEAR - CONST $eq_no = 1 i = 2
> array_tmp3[2] := (array_const_2D0[1] - c(0)) * array_tmp2[2] * array_tmp3[1] / array_tmp2[1] / c(1);
> #emit pre add CONST FULL $eq_no = 1 i = 2
> array_tmp4[2] := array_tmp3[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_tmp4[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 expt LINEAR - CONST $eq_no = 1 i = 3
> array_tmp3[3] := (array_const_2D0[1] - c(1)) * array_tmp2[2] * array_tmp3[2] / array_tmp2[1] / c(2);
> #emit pre add CONST FULL $eq_no = 1 i = 3
> array_tmp4[3] := array_tmp3[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_tmp4[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 expt LINEAR - CONST $eq_no = 1 i = 4
> array_tmp3[4] := (array_const_2D0[1] - c(2)) * array_tmp2[2] * array_tmp3[3] / array_tmp2[1] / c(3);
> #emit pre add CONST FULL $eq_no = 1 i = 4
> array_tmp4[4] := array_tmp3[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_tmp4[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 expt LINEAR - CONST $eq_no = 1 i = 5
> array_tmp3[5] := (array_const_2D0[1] - c(3)) * array_tmp2[2] * array_tmp3[4] / array_tmp2[1] / c(4);
> #emit pre add CONST FULL $eq_no = 1 i = 5
> array_tmp4[5] := array_tmp3[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_tmp4[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 expt LINEAR CONST (NOP) $eq_no = 1 i = 1
> array_tmp3[kkk] := (array_const_2D0[1] - c(kkk-2)) * array_tmp2[2] * array_tmp3[kkk-1] / array_tmp2[1] / c(kkk-1);
> #emit NOT FULL - FULL add $eq_no = 1
> array_tmp4[kkk] := array_tmp3[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_tmp4[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_const_0D2,
array_const_0D3, array_const_2D0, 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, array_tmp2, array_tmp3_c1, array_tmp3_a1, array_tmp3_a2,
array_tmp3, array_tmp4, 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] := array_const_0D2[1]*array_x[1];
array_tmp2[1] := array_tmp1[1] + array_const_0D3[1];
array_tmp3[1] := expt(array_tmp2[1], c(array_const_2D0[1]));
array_tmp4[1] := array_const_0D0[1] + array_tmp3[1];
if not array_y_set_initial[1, 2] then
if 1 <= ATS_MAX_TERMS then
temporary :=
c(array_tmp4[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] := array_const_0D2[1]*array_x[2];
array_tmp2[2] := array_tmp1[2];
array_tmp3[2] := (array_const_2D0[1] - c(0))*array_tmp2[2]*
array_tmp3[1]/(array_tmp2[1]*c(1));
array_tmp4[2] := array_tmp3[2];
if not array_y_set_initial[1, 3] then
if 2 <= ATS_MAX_TERMS then
temporary :=
c(array_tmp4[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_tmp3[3] := (array_const_2D0[1] - c(1))*array_tmp2[2]*
array_tmp3[2]/(array_tmp2[1]*c(2));
array_tmp4[3] := array_tmp3[3];
if not array_y_set_initial[1, 4] then
if 3 <= ATS_MAX_TERMS then
temporary :=
c(array_tmp4[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_tmp3[4] := (array_const_2D0[1] - c(2))*array_tmp2[2]*
array_tmp3[3]/(array_tmp2[1]*c(3));
array_tmp4[4] := array_tmp3[4];
if not array_y_set_initial[1, 5] then
if 4 <= ATS_MAX_TERMS then
temporary :=
c(array_tmp4[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_tmp3[5] := (array_const_2D0[1] - c(3))*array_tmp2[2]*
array_tmp3[4]/(array_tmp2[1]*c(4));
array_tmp4[5] := array_tmp3[5];
if not array_y_set_initial[1, 6] then
if 5 <= ATS_MAX_TERMS then
temporary :=
c(array_tmp4[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_tmp3[kkk] := (array_const_2D0[1] - c(kkk - 2))*array_tmp2[2]*
array_tmp3[kkk - 1]/(array_tmp2[1]*c(kkk - 1));
array_tmp4[kkk] := array_tmp3[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_tmp4[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,
> array_const_0D2,
> array_const_0D3,
> array_const_2D0,
> #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,
> array_tmp2,
> array_tmp3_c1,
> array_tmp3_a1,
> array_tmp3_a2,
> array_tmp3,
> array_tmp4,
> 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 := 30;
> # before first input block
> #BEGIN FIRST INPUT BLOCK
> #BEGIN BLOCK 1
> #BEGIN FIRST INPUT BLOCK
> Digits:=32;
> max_terms:=30;
> #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..(30),[]);
> array_norms:= Array(0..(30),[]);
> array_fact_1:= Array(0..(30),[]);
> 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..(30),[]);
> array_x:= Array(0..(30),[]);
> array_tmp0:= Array(0..(30),[]);
> array_tmp1:= Array(0..(30),[]);
> array_tmp2:= Array(0..(30),[]);
> array_tmp3_c1:= Array(0..(30),[]);
> array_tmp3_a1:= Array(0..(30),[]);
> array_tmp3_a2:= Array(0..(30),[]);
> array_tmp3:= Array(0..(30),[]);
> array_tmp4:= Array(0..(30),[]);
> array_m1:= Array(0..(30),[]);
> array_y_higher := Array(0..(2) ,(0..30+ 1),[]);
> array_y_higher_work := Array(0..(2) ,(0..30+ 1),[]);
> array_y_higher_work2 := Array(0..(2) ,(0..30+ 1),[]);
> array_y_set_initial := Array(0..(2) ,(0..30+ 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..(30) ,(0..30+ 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 <= 30) do # do number 1
> array_y_init[term] := c(0.0);
> term := term + 1;
> od;# end do number 1;
> term := 1;
> while (term <= 30) do # do number 1
> array_norms[term] := c(0.0);
> term := term + 1;
> od;# end do number 1;
> term := 1;
> while (term <= 30) 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 <= 30) do # do number 1
> array_y[term] := c(0.0);
> term := term + 1;
> od;# end do number 1;
> term := 1;
> while (term <= 30) do # do number 1
> array_x[term] := c(0.0);
> term := term + 1;
> od;# end do number 1;
> term := 1;
> while (term <= 30) do # do number 1
> array_tmp0[term] := c(0.0);
> term := term + 1;
> od;# end do number 1;
> term := 1;
> while (term <= 30) do # do number 1
> array_tmp1[term] := c(0.0);
> term := term + 1;
> od;# end do number 1;
> term := 1;
> while (term <= 30) do # do number 1
> array_tmp2[term] := c(0.0);
> term := term + 1;
> od;# end do number 1;
> term := 1;
> while (term <= 30) do # do number 1
> array_tmp3_c1[term] := c(0.0);
> term := term + 1;
> od;# end do number 1;
> term := 1;
> while (term <= 30) do # do number 1
> array_tmp3_a1[term] := c(0.0);
> term := term + 1;
> od;# end do number 1;
> term := 1;
> while (term <= 30) do # do number 1
> array_tmp3_a2[term] := c(0.0);
> term := term + 1;
> od;# end do number 1;
> term := 1;
> while (term <= 30) do # do number 1
> array_tmp3[term] := c(0.0);
> term := term + 1;
> od;# end do number 1;
> term := 1;
> while (term <= 30) do # do number 1
> array_tmp4[term] := c(0.0);
> term := term + 1;
> od;# end do number 1;
> term := 1;
> while (term <= 30) 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 <= 30) 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 <= 30) 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 <= 30) 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 <= 30) 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 <=30) do # do number 1
> term := 1;
> while (term <= 30) 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);
> zero_ats_ar(array_tmp2);
> zero_ats_ar(array_tmp3_c1);
> zero_ats_ar(array_tmp3_a1);
> zero_ats_ar(array_tmp3_a2);
> zero_ats_ar(array_tmp3);
> zero_ats_ar(array_tmp4);
> 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_const_0D2);
> array_const_0D2[1] := c(0.2);
> zero_ats_ar(array_const_0D3);
> array_const_0D3[1] := c(0.3);
> zero_ats_ar(array_const_2D0);
> array_const_2D0[1] := c(2.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;
> # before generate init omniout const
> ALWAYS := 1;
> INFO := 2;
> DEBUGL := 3;
> DEBUGMASSIVE := 4;
> ATS_MAX_TERMS := 30;
> 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/expt_lin_cpostcpx.cpx#################");
> omniout_str(ALWAYS,"diff ( y , x , 1 ) = expt ( ( 0.2 * x + 0.3 ) , 2.0 ) ; ");
> omniout_str(ALWAYS,"!");
> omniout_str(ALWAYS,"#BEGIN FIRST INPUT BLOCK");
> omniout_str(ALWAYS,"Digits:=32;");
> omniout_str(ALWAYS,"max_terms:=30;");
> omniout_str(ALWAYS,"!");
> omniout_str(ALWAYS,"#END FIRST INPUT BLOCK");
> omniout_str(ALWAYS,"#BEGIN SECOND INPUT BLOCK");
> omniout_str(ALWAYS,"x_start := 0.1 + 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 := true;");
> 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,"");
> omniout_str(ALWAYS,"return(c(5.0)/c(3.0) * expt((c(0.2) * c(x) + c(0.3)),c(3.0))) ;");
> 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 := true;
> 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 ) = expt ( ( 0.2 * x + 0.3 ) , 2.0 ) ; ");
> omniout_int(INFO,"Iterations ",32,glob_iter,4," ")
> ;
> prog_report(x_start,x_end);
> if (glob_html_log) then # if number 10
> logstart(html_log_file);
> logitem_str(html_log_file,"2017-11-26T14:50:52-06:00")
> ;
> logitem_str(html_log_file,"Maple")
> ;
> logitem_str(html_log_file,"expt_lin_c")
> ;
> logitem_str(html_log_file,"diff ( y , x , 1 ) = expt ( ( 0.2 * x + 0.3 ) , 2.0 ) ; ")
> ;
> logitem_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,"expt_lin_c diffeq.mxt")
> ;
> logitem_str(html_log_file,"expt_lin_c 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_const_0D2,
array_const_0D3, array_const_2D0, 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, array_tmp2, array_tmp3_c1, array_tmp3_a1, array_tmp3_a2,
array_tmp3, array_tmp4, 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 := 30;
Digits := 32;
max_terms := 30;
glob_html_log := true;
array_y_init := Array(0 .. 30, []);
array_norms := Array(0 .. 30, []);
array_fact_1 := Array(0 .. 30, []);
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 .. 30, []);
array_x := Array(0 .. 30, []);
array_tmp0 := Array(0 .. 30, []);
array_tmp1 := Array(0 .. 30, []);
array_tmp2 := Array(0 .. 30, []);
array_tmp3_c1 := Array(0 .. 30, []);
array_tmp3_a1 := Array(0 .. 30, []);
array_tmp3_a2 := Array(0 .. 30, []);
array_tmp3 := Array(0 .. 30, []);
array_tmp4 := Array(0 .. 30, []);
array_m1 := Array(0 .. 30, []);
array_y_higher := Array(0 .. 2, 0 .. 31, []);
array_y_higher_work := Array(0 .. 2, 0 .. 31, []);
array_y_higher_work2 := Array(0 .. 2, 0 .. 31, []);
array_y_set_initial := Array(0 .. 2, 0 .. 31, []);
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 .. 30, 0 .. 31, []);
term := 1;
while term <= 30 do array_y_init[term] := c(0.); term := term + 1
end do;
term := 1;
while term <= 30 do array_norms[term] := c(0.); term := term + 1 end do
;
term := 1;
while term <= 30 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 <= 30 do array_y[term] := c(0.); term := term + 1 end do;
term := 1;
while term <= 30 do array_x[term] := c(0.); term := term + 1 end do;
term := 1;
while term <= 30 do array_tmp0[term] := c(0.); term := term + 1 end do;
term := 1;
while term <= 30 do array_tmp1[term] := c(0.); term := term + 1 end do;
term := 1;
while term <= 30 do array_tmp2[term] := c(0.); term := term + 1 end do;
term := 1;
while term <= 30 do array_tmp3_c1[term] := c(0.); term := term + 1
end do;
term := 1;
while term <= 30 do array_tmp3_a1[term] := c(0.); term := term + 1
end do;
term := 1;
while term <= 30 do array_tmp3_a2[term] := c(0.); term := term + 1
end do;
term := 1;
while term <= 30 do array_tmp3[term] := c(0.); term := term + 1 end do;
term := 1;
while term <= 30 do array_tmp4[term] := c(0.); term := term + 1 end do;
term := 1;
while term <= 30 do array_m1[term] := c(0.); term := term + 1 end do;
ord := 1;
while ord <= 2 do
term := 1;
while term <= 30 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 <= 30 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 <= 30 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 <= 30 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 <= 30 do
term := 1;
while term <= 30 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);
zero_ats_ar(array_tmp2);
zero_ats_ar(array_tmp3_c1);
zero_ats_ar(array_tmp3_a1);
zero_ats_ar(array_tmp3_a2);
zero_ats_ar(array_tmp3);
zero_ats_ar(array_tmp4);
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_const_0D2);
array_const_0D2[1] := c(0.2);
zero_ats_ar(array_const_0D3);
array_const_0D3[1] := c(0.3);
zero_ats_ar(array_const_2D0);
array_const_2D0[1] := c(2.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;
ALWAYS := 1;
INFO := 2;
DEBUGL := 3;
DEBUGMASSIVE := 4;
ATS_MAX_TERMS := 30;
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/expt_lin_cpostcpx.cpx#################");
omniout_str(ALWAYS, "diff ( y , x , 1 ) = expt ( ( 0.2 *\
x + 0.3 ) , 2.0 ) ; ");
omniout_str(ALWAYS, "!");
omniout_str(ALWAYS, "#BEGIN FIRST INPUT BLOCK");
omniout_str(ALWAYS, "Digits:=32;");
omniout_str(ALWAYS, "max_terms:=30;");
omniout_str(ALWAYS, "!");
omniout_str(ALWAYS, "#END FIRST INPUT BLOCK");
omniout_str(ALWAYS, "#BEGIN SECOND INPUT BLOCK");
omniout_str(ALWAYS, "x_start := 0.1 + 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 := true;");
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, "");
omniout_str(ALWAYS,
"return(c(5.0)/c(3.0) * expt((c(0.2) * c(x) + c(0.3)),c(3.0))) ;");
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 := true;
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 ) = expt ( ( 0.2 \
* x + 0.3 ) , 2.0 ) ; ");
omniout_int(INFO, "Iterations ", 32, glob_iter,
4, " ");
prog_report(x_start, x_end);
if glob_html_log then
logstart(html_log_file);
logitem_str(html_log_file, "2017-11-26T14:50:52-06:00");
logitem_str(html_log_file, "Maple");
logitem_str(html_log_file,
"expt_lin_c");
logitem_str(html_log_file, "diff ( y , x , 1 ) = e\
xpt ( ( 0.2 * x + 0.3 ) , 2.0 ) ; ");
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, "expt_lin_c diffeq.mxt");
logitem_str(html_log_file, "expt_lin_c 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/expt_lin_cpostcpx.cpx#################
diff ( y , x , 1 ) = expt ( ( 0.2 * x + 0.3 ) , 2.0 ) ;
!
#BEGIN FIRST INPUT BLOCK
Digits:=32;
max_terms:=30;
!
#END FIRST INPUT BLOCK
#BEGIN SECOND INPUT BLOCK
x_start := 0.1 + 0.1 * I;
x_end := 99.0 + 99.0 * I;
array_y_init[0 + 1] := exact_soln_y(x_start);
glob_look_poles := true;
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(5.0)/c(3.0) * expt((c(0.2) * c(x) + c(0.3)),c(3.0))) ;
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) = 0.0539733333333 0.0102266666667
y[1] (closed_form) = 0.0539733333333 0.0102266666667
absolute error = 0
relative error = 0 %
Correct digits = 30
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
NO REAL POLE (three term test) for Equation 1
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.1001 0.105
h = 0.0001 0.003
y[1] (numeric) = 0.0539182502987 0.0107379232417
y[1] (closed_form) = 0.0539179298733 0.010737909042
absolute error = 3.207e-07
relative error = 0.0005834 %
Correct digits = 5
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
NO REAL POLE (three term test) for Equation 1
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.1002 0.108
h = 0.001 0.001
y[1] (numeric) = 0.0538871621054 0.0110451699739
y[1] (closed_form) = 0.0538872265814 0.0110451688128
absolute error = 6.449e-08
relative error = 0.0001172 %
Correct digits = 6
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
NO REAL POLE (three term test) for Equation 1
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.1012 0.109
h = 0.001 0.003
y[1] (numeric) = 0.053975096276 0.0111611405284
y[1] (closed_form) = 0.0539753512284 0.0111610816251
absolute error = 2.617e-07
relative error = 0.0004747 %
Correct digits = 5
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
NO REAL POLE (three term test) for Equation 1
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.1022 0.112
h = 0.0001 0.004
y[1] (numeric) = 0.0540351416856 0.0114815857439
y[1] (closed_form) = 0.0540350033633 0.0114816285099
absolute error = 1.448e-07
relative error = 0.0002621 %
Correct digits = 6
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
NO REAL POLE (three term test) for Equation 1
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.1023 0.116
h = 0.003 0.006
y[1] (numeric) = 0.0539871545991 0.0118919632972
y[1] (closed_form) = 0.0539867701036 0.0118917629989
absolute error = 4.335e-07
relative error = 0.0007842 %
Correct digits = 5
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
NO REAL POLE (three term test) for Equation 1
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.1053 0.122
h = 0.0001 0.005
y[1] (numeric) = 0.0542028295019 0.0125502059028
y[1] (closed_form) = 0.0542021216704 0.0125514905725
absolute error = 1.467e-06
relative error = 0.002636 %
Correct digits = 5
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
NO REAL POLE (three term test) for Equation 1
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.1054 0.127
h = 0.0001 0.003
y[1] (numeric) = 0.0541327536178 0.0130650485128
y[1] (closed_form) = 0.0541324218089 0.0130654187595
absolute error = 4.972e-07
relative error = 0.0008928 %
Correct digits = 5
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
NO REAL POLE (three term test) for Equation 1
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.1055 0.13
h = 0.001 0.001
y[1] (numeric) = 0.0540930990113 0.0133739954437
y[1] (closed_form) = 0.0540931535517 0.0133743839667
absolute error = 3.923e-07
relative error = 0.0007041 %
Correct digits = 5
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
NO REAL POLE (three term test) for Equation 1
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.1065 0.131
h = 0.001 0.003
y[1] (numeric) = 0.0541786285354 0.0134933057439
y[1] (closed_form) = 0.054178875135 0.0134936388433
absolute error = 4.144e-07
relative error = 0.0007423 %
Correct digits = 5
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
NO REAL POLE (three term test) for Equation 1
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.1075 0.134
h = 0.0001 0.004
y[1] (numeric) = 0.0542305178654 0.0138180302005
y[1] (closed_form) = 0.0542303681583 0.0138184601133
absolute error = 4.552e-07
relative error = 0.0008135 %
Correct digits = 5
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
NO REAL POLE (three term test) for Equation 1
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.1076 0.138
h = 0.003 0.006
y[1] (numeric) = 0.0541710641178 0.0142305417679
y[1] (closed_form) = 0.0541706704503 0.0142307242752
absolute error = 4.339e-07
relative error = 0.0007747 %
Correct digits = 5
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
NO REAL POLE (three term test) for Equation 1
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.1106 0.144
h = 0.0001 0.005
y[1] (numeric) = 0.0543708224846 0.0149001437415
y[1] (closed_form) = 0.0543700841895 0.0149018132736
absolute error = 1.825e-06
relative error = 0.003238 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
NO REAL POLE (three term test) for Equation 1
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.1107 0.149
h = 0.0001 0.003
y[1] (numeric) = 0.0542863394252 0.0154174906151
y[1] (closed_form) = 0.0542859909992 0.0154182467737
absolute error = 8.326e-07
relative error = 0.001475 %
Correct digits = 5
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
NO REAL POLE (three term test) for Equation 1
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.1108 0.152
h = 0.001 0.001
y[1] (numeric) = 0.0542380587901 0.015728030192
y[1] (closed_form) = 0.0542380981615 0.0157288098645
absolute error = 7.807e-07
relative error = 0.001382 %
Correct digits = 5
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
NO REAL POLE (three term test) for Equation 1
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.1118 0.153
h = 0.001 0.003
y[1] (numeric) = 0.0543211285391 0.0158506624209
y[1] (closed_form) = 0.0543213615524 0.0158513889888
absolute error = 7.630e-07
relative error = 0.001348 %
Correct digits = 5
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
NO REAL POLE (three term test) for Equation 1
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.1128 0.156
h = 0.0001 0.004
y[1] (numeric) = 0.0543647693487 0.0161795753564
y[1] (closed_form) = 0.0543646030234 0.0161803938816
absolute error = 8.353e-07
relative error = 0.001473 %
Correct digits = 5
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
NO REAL POLE (three term test) for Equation 1
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.1129 0.16
h = 0.003 0.006
y[1] (numeric) = 0.0542937706686 0.0165940769121
y[1] (closed_form) = 0.0542933625959 0.0165946436907
absolute error = 6.984e-07
relative error = 0.00123 %
Correct digits = 5
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
NO REAL POLE (three term test) for Equation 1
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.1159 0.166
h = 0.0001 0.005
y[1] (numeric) = 0.054477391145 0.0172748753849
y[1] (closed_form) = 0.0544766171531 0.0172769312451
absolute error = 2.197e-06
relative error = 0.003844 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
NO REAL POLE (three term test) for Equation 1
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.116 0.171
h = 0.0001 0.003
y[1] (numeric) = 0.054378403983 0.0177945460237
y[1] (closed_form) = 0.0543780337067 0.01779568956
absolute error = 1.202e-06
relative error = 0.002101 %
Correct digits = 5
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
NO REAL POLE (three term test) for Equation 1
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.1161 0.174
h = 0.001 0.001
y[1] (numeric) = 0.0543214377041 0.0181065706939
y[1] (closed_form) = 0.0543214566731 0.0181077429816
absolute error = 1.172e-06
relative error = 0.002048 %
Correct digits = 5
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
NO REAL POLE (three term test) for Equation 1
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.1171 0.175
h = 0.001 0.003
y[1] (numeric) = 0.054401992549 0.0182325070348
y[1] (closed_form) = 0.0544022067428 0.0182336285367
absolute error = 1.142e-06
relative error = 0.00199 %
Correct digits = 5
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
NO REAL POLE (three term test) for Equation 1
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.1181 0.178
h = 0.0001 0.004
y[1] (numeric) = 0.0544372923974 0.0185655176867
y[1] (closed_form) = 0.0544371042205 0.0185667262899
absolute error = 1.223e-06
relative error = 0.002127 %
Correct digits = 5
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
NO REAL POLE (three term test) for Equation 1
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.1182 0.182
h = 0.003 0.006
y[1] (numeric) = 0.0543546705136 0.0189818652052
y[1] (closed_form) = 0.0543542428022 0.0189828177205
absolute error = 1.044e-06
relative error = 0.001814 %
Correct digits = 5
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
NO REAL POLE (three term test) for Equation 1
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.1212 0.188
h = 0.0001 0.005
y[1] (numeric) = 0.0545219317452 0.0196736973084
y[1] (closed_form) = 0.054521116823 0.0196761409621
absolute error = 2.576e-06
relative error = 0.004444 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
NO REAL POLE (three term test) for Equation 1
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.1213 0.193
h = 0.0001 0.003
y[1] (numeric) = 0.0544083435533 0.020195511214
y[1] (closed_form) = 0.0544079461933 0.0201970435935
absolute error = 1.583e-06
relative error = 0.002728 %
Correct digits = 5
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
NO REAL POLE (three term test) for Equation 1
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.1214 0.196
h = 0.001 0.001
y[1] (numeric) = 0.0543426320153 0.0205089134245
y[1] (closed_form) = 0.0543426253486 0.0205104797931
absolute error = 1.566e-06
relative error = 0.002697 %
Correct digits = 5
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
NO REAL POLE (three term test) for Equation 1
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.1224 0.197
h = 0.0001 0.004
y[1] (numeric) = 0.0544206168274 0.0206381360607
y[1] (closed_form) = 0.0544208069683 0.0206396539621
absolute error = 1.530e-06
relative error = 0.002628 %
Correct digits = 5
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
NO REAL POLE (three term test) for Equation 1
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.1225 0.201
h = 0.003 0.006
y[1] (numeric) = 0.0543284287134 0.0210558679489
y[1] (closed_form) = 0.0543278603083 0.02105707557
absolute error = 1.335e-06
relative error = 0.002291 %
Correct digits = 5
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
NO REAL POLE (three term test) for Equation 1
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.1255 0.207
h = 0.0001 0.005
y[1] (numeric) = 0.0544813024058 0.0217568685537
y[1] (closed_form) = 0.0544803284383 0.02175956883
absolute error = 2.871e-06
relative error = 0.004893 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
NO REAL POLE (three term test) for Equation 1
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.1256 0.212
h = 0.0001 0.003
y[1] (numeric) = 0.0543550459128 0.0222802072757
y[1] (closed_form) = 0.0543545014135 0.0222819973461
absolute error = 1.871e-06
relative error = 0.003185 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
NO REAL POLE (three term test) for Equation 1
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.1257 0.215
h = 0.001 0.001
y[1] (numeric) = 0.0542817443432 0.0225946039623
y[1] (closed_form) = 0.0542815917212 0.0225964325473
absolute error = 1.835e-06
relative error = 0.003121 %
Correct digits = 5
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
NO REAL POLE (three term test) for Equation 1
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.1267 0.216
h = 0.001 0.003
y[1] (numeric) = 0.0543574339537 0.0227266095568
y[1] (closed_form) = 0.0543574794742 0.0227283916896
absolute error = 1.783e-06
relative error = 0.003026 %
Correct digits = 5
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
NO REAL POLE (three term test) for Equation 1
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.1277 0.219
h = 0.0001 0.004
y[1] (numeric) = 0.0543769209253 0.0230669015783
y[1] (closed_form) = 0.0543765584911 0.0230687617404
absolute error = 1.895e-06
relative error = 0.003208 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
NO REAL POLE (three term test) for Equation 1
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.1278 0.223
h = 0.003 0.006
y[1] (numeric) = 0.0542724447106 0.0234861600168
y[1] (closed_form) = 0.0542718469114 0.0234877560395
absolute error = 1.704e-06
relative error = 0.002882 %
Correct digits = 5
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
NO REAL POLE (three term test) for Equation 1
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.1308 0.229
h = 0.0001 0.005
y[1] (numeric) = 0.0544085492094 0.0241978885544
y[1] (closed_form) = 0.0544075245562 0.0242009792891
absolute error = 3.256e-06
relative error = 0.005468 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
NO REAL POLE (three term test) for Equation 1
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.1309 0.234
h = 0.0001 0.003
y[1] (numeric) = 0.0542675134776 0.0247230335232
y[1] (closed_form) = 0.0542669321391 0.0247252151016
absolute error = 2.258e-06
relative error = 0.003786 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
NO REAL POLE (three term test) for Equation 1
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.131 0.237
h = 0.001 0.001
y[1] (numeric) = 0.0541853569998 0.0250386069093
y[1] (closed_form) = 0.0541851689867 0.02504083224
absolute error = 2.233e-06
relative error = 0.003741 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
NO REAL POLE (three term test) for Equation 1
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.132 0.238
h = 0.001 0.003
y[1] (numeric) = 0.054258374208 0.0251738649895
y[1] (closed_form) = 0.05425838592 0.0251760461867
absolute error = 2.181e-06
relative error = 0.003647 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
NO REAL POLE (three term test) for Equation 1
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.133 0.241
h = 0.0001 0.004
y[1] (numeric) = 0.054269256848 0.0255179939761
y[1] (closed_form) = 0.0542688575733 0.0255202483467
absolute error = 2.289e-06
relative error = 0.003818 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
NO REAL POLE (three term test) for Equation 1
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.1331 0.245
h = 0.003 0.006
y[1] (numeric) = 0.0541529352293 0.0259386854215
y[1] (closed_form) = 0.0541523028025 0.0259406713113
absolute error = 2.084e-06
relative error = 0.003471 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
NO REAL POLE (three term test) for Equation 1
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.1361 0.251
h = 0.0001 0.005
y[1] (numeric) = 0.0542720491801 0.0266609790231
y[1] (closed_form) = 0.0542709686077 0.0266644616817
absolute error = 3.646e-06
relative error = 0.00603 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
NO REAL POLE (three term test) for Equation 1
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.1362 0.256
h = 0.0001 0.003
y[1] (numeric) = 0.0541161372821 0.0271877497403
y[1] (closed_form) = 0.054115513871 0.0271903242923
absolute error = 2.649e-06
relative error = 0.004374 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
NO REAL POLE (three term test) for Equation 1
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.1363 0.259
h = 0.001 0.001
y[1] (numeric) = 0.0540250662811 0.0275043922732
y[1] (closed_form) = 0.0540248376433 0.0275070158151
absolute error = 2.633e-06
relative error = 0.004344 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
NO REAL POLE (three term test) for Equation 1
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.1373 0.26
h = 0.001 0.003
y[1] (numeric) = 0.054095355958 0.0276428850221
y[1] (closed_form) = 0.0540953286282 0.0276454667493
absolute error = 2.582e-06
relative error = 0.00425 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
NO REAL POLE (three term test) for Equation 1
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.1383 0.263
h = 0.0001 0.004
y[1] (numeric) = 0.0540975418256 0.0279907602116
y[1] (closed_form) = 0.0540971004772 0.0279934102561
absolute error = 2.687e-06
relative error = 0.004411 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
NO REAL POLE (three term test) for Equation 1
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.1384 0.267
h = 0.003 0.006
y[1] (numeric) = 0.0539692965317 0.0284127406381
y[1] (closed_form) = 0.0539686242441 0.0284151178608
absolute error = 2.470e-06
relative error = 0.00405 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
NO REAL POLE (three term test) for Equation 1
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.1414 0.273
h = 0.0001 0.005
y[1] (numeric) = 0.0540711985801 0.0291454364349
y[1] (closed_form) = 0.0540700568553 0.0291493124832
absolute error = 4.041e-06
relative error = 0.006578 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
NO REAL POLE (three term test) for Equation 1
NO COMPLEX POLE (six term test) for Equation 1
memory used=55.9MB, alloc=40.3MB, time=0.77
x[1] = 0.1415 0.278
h = 0.0001 0.003
y[1] (numeric) = 0.0539003135887 0.0296736524021
y[1] (closed_form) = 0.0538996428717 0.0296766213933
absolute error = 3.044e-06
relative error = 0.004947 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
NO REAL POLE (three term test) for Equation 1
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.1416 0.281
h = 0.001 0.001
y[1] (numeric) = 0.053800268449 0.0299912565291
y[1] (closed_form) = 0.0537999939533 0.0299942797477
absolute error = 3.036e-06
relative error = 0.004928 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
NO REAL POLE (three term test) for Equation 1
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.1426 0.282
h = 0.001 0.003
y[1] (numeric) = 0.0538677754659 0.03013296613
y[1] (closed_form) = 0.053867703861 0.0301359498528
absolute error = 2.985e-06
relative error = 0.004835 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
NO REAL POLE (three term test) for Equation 1
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.1436 0.285
h = 0.0001 0.004
y[1] (numeric) = 0.0538611721203 0.0304844967599
y[1] (closed_form) = 0.0538606834647 0.030487543944
absolute error = 3.086e-06
relative error = 0.004986 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
NO REAL POLE (three term test) for Equation 1
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.1437 0.289
h = 0.003 0.006
y[1] (numeric) = 0.0537209248799 0.030907622142
y[1] (closed_form) = 0.053720207498 0.0309103921631
absolute error = 2.861e-06
relative error = 0.004617 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
NO REAL POLE (three term test) for Equation 1
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.1467 0.295
h = 0.0001 0.005
y[1] (numeric) = 0.0538053936715 0.0316505572652
y[1] (closed_form) = 0.0538041855608 0.0316548281687
absolute error = 4.438e-06
relative error = 0.00711 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
NO REAL POLE (three term test) for Equation 1
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.1468 0.3
h = 0.0001 0.003
y[1] (numeric) = 0.0536194386595 0.032180037984
y[1] (closed_form) = 0.0536187154031 0.03218340288
absolute error = 3.442e-06
relative error = 0.005504 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
NO REAL POLE (three term test) for Equation 1
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.1469 0.303
h = 0.001 0.001
y[1] (numeric) = 0.0535103597658 0.0324984961521
y[1] (closed_form) = 0.0535100341788 0.0325019205132
absolute error = 3.440e-06
relative error = 0.005494 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
NO REAL POLE (three term test) for Equation 1
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.1479 0.304
h = 0.0001 0.004
y[1] (numeric) = 0.053575028994 0.0326434047883
y[1] (closed_form) = 0.0535749078805 0.0326467919723
absolute error = 3.389e-06
relative error = 0.005402 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
NO REAL POLE (three term test) for Equation 1
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.148 0.308
h = 0.003 0.006
y[1] (numeric) = 0.0534249068805 0.0330673406609
y[1] (closed_form) = 0.0534240290133 0.0330703624533
absolute error = 3.147e-06
relative error = 0.005008 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
NO REAL POLE (three term test) for Equation 1
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.151 0.314
h = 0.0001 0.005
y[1] (numeric) = 0.0534940731209 0.0338187477817
y[1] (closed_form) = 0.0534926861733 0.0338232719733
absolute error = 4.732e-06
relative error = 0.007477 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
NO REAL POLE (three term test) for Equation 1
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.1511 0.319
h = 0.0001 0.003
y[1] (numeric) = 0.0532950565809 0.0343489915337
y[1] (closed_form) = 0.0532941663937 0.0343526107863
absolute error = 3.727e-06
relative error = 0.005878 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
NO REAL POLE (three term test) for Equation 1
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.1512 0.322
h = 0.001 0.001
y[1] (numeric) = 0.0531781455649 0.0346679901307
y[1] (closed_form) = 0.053177654231 0.0346716733739
absolute error = 3.716e-06
relative error = 0.005853 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
NO REAL POLE (three term test) for Equation 1
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.1522 0.323
h = 0.001 0.003
y[1] (numeric) = 0.0532402901554 0.0348156034252
y[1] (closed_form) = 0.05324000463 0.0348192515061
absolute error = 3.659e-06
relative error = 0.005752 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
NO REAL POLE (three term test) for Equation 1
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.1532 0.326
h = 0.0001 0.004
y[1] (numeric) = 0.053217045109 0.0351735871127
y[1] (closed_form) = 0.0532163369489 0.0351772895829
absolute error = 3.770e-06
relative error = 0.005909 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
NO REAL POLE (three term test) for Equation 1
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.1533 0.33
h = 0.003 0.006
y[1] (numeric) = 0.0530542471361 0.0355983144924
y[1] (closed_form) = 0.0530533144192 0.035601731748
absolute error = 3.542e-06
relative error = 0.005544 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
NO REAL POLE (three term test) for Equation 1
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.1563 0.336
h = 0.0001 0.005
y[1] (numeric) = 0.0531055701709 0.036359655242
y[1] (closed_form) = 0.053104107082 0.0363645769536
absolute error = 5.135e-06
relative error = 0.007978 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
NO REAL POLE (three term test) for Equation 1
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.1564 0.341
h = 0.0001 0.003
y[1] (numeric) = 0.0528913054013 0.0368908267256
y[1] (closed_form) = 0.0528903529193 0.0368948445477
absolute error = 4.129e-06
relative error = 0.006403 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
NO REAL POLE (three term test) for Equation 1
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.1565 0.344
h = 0.001 0.001
y[1] (numeric) = 0.0527652509824 0.0372104785229
y[1] (closed_form) = 0.0527646988017 0.0372145655733
absolute error = 4.124e-06
relative error = 0.006387 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
NO REAL POLE (three term test) for Equation 1
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.1575 0.345
h = 0.001 0.003
y[1] (numeric) = 0.0528244554145 0.0373612570431
y[1] (closed_form) = 0.052824110625 0.03736531125
absolute error = 4.069e-06
relative error = 0.006288 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
NO REAL POLE (three term test) for Equation 1
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.1585 0.348
h = 0.0001 0.004
y[1] (numeric) = 0.0527921577845 0.0377226354197
y[1] (closed_form) = 0.0527913873283 0.03772673916
absolute error = 4.175e-06
relative error = 0.006435 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
NO REAL POLE (three term test) for Equation 1
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.1586 0.352
h = 0.003 0.006
y[1] (numeric) = 0.0526171356648 0.0381480947991
y[1] (closed_form) = 0.0526161428647 0.0381519089835
absolute error = 3.941e-06
relative error = 0.006064 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
NO REAL POLE (three term test) for Equation 1
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.1616 0.358
h = 0.0001 0.005
y[1] (numeric) = 0.0526503941396 0.0389192063087
y[1] (closed_form) = 0.0526488496759 0.0389245270059
absolute error = 5.540e-06
relative error = 0.008462 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
NO REAL POLE (three term test) for Equation 1
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.1617 0.363
h = 0.0001 0.003
y[1] (numeric) = 0.0524207842131 0.0394511250255
y[1] (closed_form) = 0.0524197642028 0.0394555428828
absolute error = 4.534e-06
relative error = 0.006911 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
NO REAL POLE (three term test) for Equation 1
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.1618 0.366
h = 0.001 0.001
y[1] (numeric) = 0.052285526776 0.0397713224704
y[1] (closed_form) = 0.0522849085151 0.0397758147936
absolute error = 4.535e-06
relative error = 0.006903 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
NO REAL POLE (three term test) for Equation 1
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.1628 0.367
h = 0.001 0.003
y[1] (numeric) = 0.0523417359209 0.0399252483993
y[1] (closed_form) = 0.052341326634 0.0399297101979
absolute error = 4.481e-06
relative error = 0.006806 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
NO REAL POLE (three term test) for Equation 1
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.1638 0.37
h = 0.0001 0.004
y[1] (numeric) = 0.0523002932665 0.0402899307028
y[1] (closed_form) = 0.052299455281 0.0402944371787
absolute error = 4.584e-06
relative error = 0.006943 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
NO REAL POLE (three term test) for Equation 1
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.1639 0.374
h = 0.003 0.006
y[1] (numeric) = 0.0521129687288 0.0407159780561
y[1] (closed_form) = 0.0521119106123 0.0407201906349
absolute error = 4.343e-06
relative error = 0.006568 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
NO REAL POLE (three term test) for Equation 1
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.1669 0.38
h = 0.0001 0.005
y[1] (numeric) = 0.0521279412892 0.0414966974569
y[1] (closed_form) = 0.0521263102175 0.0415024186053
absolute error = 5.949e-06
relative error = 0.008929 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
NO REAL POLE (three term test) for Equation 1
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.167 0.385
h = 0.0001 0.003
y[1] (numeric) = 0.0518828892785 0.0420291829085
y[1] (closed_form) = 0.0518817965067 0.0420340022667
absolute error = 4.942e-06
relative error = 0.007401 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
NO REAL POLE (three term test) for Equation 1
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.1671 0.388
h = 0.001 0.001
y[1] (numeric) = 0.0517383692079 0.0423498184483
y[1] (closed_form) = 0.0517376796335 0.0423547175099
absolute error = 4.947e-06
relative error = 0.007399 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
NO REAL POLE (three term test) for Equation 1
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.1681 0.389
h = 0.001 0.003
y[1] (numeric) = 0.0517915279369 0.0425068739692
y[1] (closed_form) = 0.0517910489192 0.0425117448249
absolute error = 4.894e-06
relative error = 0.007305 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
NO REAL POLE (three term test) for Equation 1
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.1691 0.392
h = 0.0001 0.004
y[1] (numeric) = 0.0517408478173 0.0428747694371
y[1] (closed_form) = 0.0517399370689 0.0428796801141
absolute error = 4.994e-06
relative error = 0.007432 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
NO REAL POLE (three term test) for Equation 1
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.1692 0.396
h = 0.003 0.006
y[1] (numeric) = 0.0515411425903 0.0433012607388
y[1] (closed_form) = 0.0515400139238 0.0433058731776
absolute error = 4.749e-06
relative error = 0.007054 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
NO REAL POLE (three term test) for Equation 1
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.1722 0.402
h = 0.0001 0.005
y[1] (numeric) = 0.0515376078819 0.044091425162
y[1] (closed_form) = 0.0515358849686 0.0440975482272
absolute error = 6.361e-06
relative error = 0.009378 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
NO REAL POLE (three term test) for Equation 1
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.1723 0.407
h = 0.0001 0.003
y[1] (numeric) = 0.0512770168596 0.04462429685
y[1] (closed_form) = 0.0512758460929 0.0446295191745
absolute error = 5.352e-06
relative error = 0.007873 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
NO REAL POLE (three term test) for Equation 1
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.1724 0.41
h = 0.001 0.001
y[1] (numeric) = 0.0511231745404 0.0449452629317
y[1] (closed_form) = 0.051122408419 0.0449505701973
absolute error = 5.362e-06
relative error = 0.007877 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
NO REAL POLE (three term test) for Equation 1
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.1734 0.411
h = 0.0001 0.004
y[1] (numeric) = 0.0511732277245 0.0451054302279
y[1] (closed_form) = 0.0511726737427 0.0451107116064
absolute error = 5.310e-06
relative error = 0.007784 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
NO REAL POLE (three term test) for Equation 1
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.1735 0.415
h = 0.003 0.006
y[1] (numeric) = 0.0509633389817 0.0455321581409
y[1] (closed_form) = 0.0509620300383 0.0455370190167
absolute error = 5.034e-06
relative error = 0.007366 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
NO REAL POLE (three term test) for Equation 1
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.1765 0.421
h = 0.0001 0.005
y[1] (numeric) = 0.0509435867101 0.0463300980577
y[1] (closed_form) = 0.0509416651683 0.0463364710767
absolute error = 6.656e-06
relative error = 0.009666 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
NO REAL POLE (three term test) for Equation 1
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.1766 0.426
h = 0.0001 0.003
y[1] (numeric) = 0.0506695409331 0.0468629709957
y[1] (closed_form) = 0.0506681834439 0.0468684443424
absolute error = 5.639e-06
relative error = 0.00817 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
NO REAL POLE (three term test) for Equation 1
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.1767 0.429
h = 0.001 0.001
y[1] (numeric) = 0.0505076244006 0.0471840234591
y[1] (closed_form) = 0.0505066727408 0.0471895862724
absolute error = 5.644e-06
relative error = 0.008165 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
NO REAL POLE (three term test) for Equation 1
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.1777 0.43
h = 0.001 0.003
y[1] (numeric) = 0.0505549235112 0.0473468171136
y[1] (closed_form) = 0.0505541853258 0.0473523560547
absolute error = 5.588e-06
relative error = 0.008067 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
NO REAL POLE (three term test) for Equation 1
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.1787 0.433
h = 0.0001 0.004
y[1] (numeric) = 0.0504867728668 0.0477203373271
y[1] (closed_form) = 0.0504855973667 0.0477259070175
absolute error = 5.692e-06
relative error = 0.008194 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
NO REAL POLE (three term test) for Equation 1
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.1788 0.437
h = 0.003 0.006
y[1] (numeric) = 0.0502638205057 0.048147121704
y[1] (closed_form) = 0.050262431257 0.0481523851045
absolute error = 5.444e-06
relative error = 0.007821 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
NO REAL POLE (three term test) for Equation 1
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.1818 0.443
h = 0.0001 0.005
y[1] (numeric) = 0.0502251510165 0.0489542009456
y[1] (closed_form) = 0.0502231278778 0.0489609785461
absolute error = 7.073e-06
relative error = 0.01008 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
NO REAL POLE (three term test) for Equation 1
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.1819 0.448
h = 0.0001 0.003
y[1] (numeric) = 0.049935388019 0.0494871231
y[1] (closed_form) = 0.0499339427795 0.0494930020779
absolute error = 6.054e-06
relative error = 0.008611 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
NO REAL POLE (three term test) for Equation 1
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.182 0.451
h = 0.001 0.001
y[1] (numeric) = 0.0497640395889 0.0498083052645
y[1] (closed_form) = 0.0497630016267 0.0498142789467
absolute error = 6.063e-06
relative error = 0.008611 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
NO REAL POLE (three term test) for Equation 1
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.183 0.452
h = 0.001 0.003
y[1] (numeric) = 0.049808130785 0.0499741768847
y[1] (closed_form) = 0.04980730788 0.0499801290133
absolute error = 6.009e-06
relative error = 0.008516 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
NO REAL POLE (three term test) for Equation 1
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.184 0.455
h = 0.0001 0.004
y[1] (numeric) = 0.049730479305 0.0503506495113
y[1] (closed_form) = 0.0497292160533 0.0503566275333
absolute error = 6.110e-06
relative error = 0.008633 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
NO REAL POLE (three term test) for Equation 1
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.1841 0.459
h = 0.003 0.006
y[1] (numeric) = 0.0494949240544 0.0507774648807
y[1] (closed_form) = 0.0494934492669 0.0507831322716
absolute error = 5.856e-06
relative error = 0.008258 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
NO REAL POLE (three term test) for Equation 1
NO COMPLEX POLE (six term test) for Equation 1
memory used=104.9MB, alloc=40.3MB, time=1.43
x[1] = 0.1871 0.465
h = 0.0001 0.005
y[1] (numeric) = 0.0494371159932 0.0515935205783
y[1] (closed_form) = 0.0494349860241 0.051600704226
absolute error = 7.493e-06
relative error = 0.01049 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
NO REAL POLE (three term test) for Equation 1
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.1872 0.47
h = 0.0001 0.003
y[1] (numeric) = 0.049131538848 0.0521263114507
y[1] (closed_form) = 0.0491300006246 0.0521325975253
absolute error = 6.472e-06
relative error = 0.009034 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
NO REAL POLE (three term test) for Equation 1
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.1873 0.473
h = 0.001 0.001
y[1] (numeric) = 0.0489506989049 0.0524475157636
y[1] (closed_form) = 0.0489495694069 0.0524539017801
absolute error = 6.485e-06
relative error = 0.009039 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
NO REAL POLE (three term test) for Equation 1
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.1883 0.474
h = 0.001 0.003
y[1] (numeric) = 0.0489915270579 0.0526164475325
y[1] (closed_form) = 0.0489906141998 0.0526228143144
absolute error = 6.432e-06
relative error = 0.008946 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
NO REAL POLE (three term test) for Equation 1
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.1893 0.477
h = 0.0001 0.004
y[1] (numeric) = 0.0489042823015 0.05299578181
y[1] (closed_form) = 0.0489029260648 0.0530021696292
absolute error = 6.530e-06
relative error = 0.009055 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
NO REAL POLE (three term test) for Equation 1
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.1894 0.481
h = 0.003 0.006
y[1] (numeric) = 0.04865604589 0.0534224841461
y[1] (closed_form) = 0.0486544803305 0.0534285569931
absolute error = 6.271e-06
relative error = 0.008679 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
NO REAL POLE (three term test) for Equation 1
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.1924 0.487
h = 0.0001 0.005
y[1] (numeric) = 0.0485788779024 0.0542473534309
y[1] (closed_form) = 0.0485766358697 0.0542549445915
absolute error = 7.915e-06
relative error = 0.01087 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
NO REAL POLE (three term test) for Equation 1
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.1925 0.492
h = 0.0001 0.003
y[1] (numeric) = 0.0482573896822 0.0547798325229
y[1] (closed_form) = 0.0482557532417 0.05478652716
absolute error = 6.892e-06
relative error = 0.00944 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
NO REAL POLE (three term test) for Equation 1
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.1926 0.495
h = 0.001 0.001
y[1] (numeric) = 0.0480669986109 0.0551009514315
y[1] (closed_form) = 0.0480657723437 0.055107751248
absolute error = 6.910e-06
relative error = 0.009449 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
NO REAL POLE (three term test) for Equation 1
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.1936 0.496
h = 0.001 0.003
y[1] (numeric) = 0.0481045085918 0.0552729255324
y[1] (closed_form) = 0.0481035005474 0.0552797084331
absolute error = 6.857e-06
relative error = 0.009358 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
NO REAL POLE (three term test) for Equation 1
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.1946 0.499
h = 0.0001 0.004
y[1] (numeric) = 0.0480075781182 0.0556550306983
y[1] (closed_form) = 0.0480061236631 0.0556618297803
absolute error = 6.953e-06
relative error = 0.009459 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
NO REAL POLE (three term test) for Equation 1
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.1947 0.503
h = 0.003 0.006
y[1] (numeric) = 0.0477465822746 0.0560814759756
y[1] (closed_form) = 0.0477449207096 0.0560879557441
absolute error = 6.689e-06
relative error = 0.009082 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
NO REAL POLE (three term test) for Equation 1
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.1977 0.509
h = 0.0001 0.005
y[1] (numeric) = 0.0476498330062 0.0569149959788
y[1] (closed_form) = 0.0476474736764 0.0569229961177
absolute error = 8.341e-06
relative error = 0.01124 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
NO REAL POLE (three term test) for Equation 1
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.1978 0.514
h = 0.0001 0.003
y[1] (numeric) = 0.0473123367837 0.057446982792
y[1] (closed_form) = 0.0473105968927 0.0574540874571
absolute error = 7.315e-06
relative error = 0.009828 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
NO REAL POLE (three term test) for Equation 1
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.1979 0.517
h = 0.001 0.001
y[1] (numeric) = 0.0471123349689 0.0577679087433
y[1] (closed_form) = 0.0471110066992 0.0577751238255
absolute error = 7.336e-06
relative error = 0.009841 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
NO REAL POLE (three term test) for Equation 1
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.1989 0.518
h = 0.0001 0.004
y[1] (numeric) = 0.047146471649 0.0579429073595
y[1] (closed_form) = 0.0471453631849 0.0579501078445
absolute error = 7.285e-06
relative error = 0.009752 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
NO REAL POLE (three term test) for Equation 1
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.199 0.522
h = 0.003 0.006
y[1] (numeric) = 0.0468749836468 0.0583690153689
y[1] (closed_form) = 0.0468731220133 0.05837574024
absolute error = 6.978e-06
relative error = 0.00932 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
NO REAL POLE (three term test) for Equation 1
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.202 0.528
h = 0.0001 0.005
y[1] (numeric) = 0.0467611018032 0.0592096143617
y[1] (closed_form) = 0.0467585240533 0.05921786112
absolute error = 8.640e-06
relative error = 0.01145 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
NO REAL POLE (three term test) for Equation 1
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.2021 0.533
h = 0.0001 0.003
y[1] (numeric) = 0.0464097575992 0.0597408406417
y[1] (closed_form) = 0.0464078111941 0.0597481929945
absolute error = 7.606e-06
relative error = 0.01005 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
NO REAL POLE (three term test) for Equation 1
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.2022 0.536
h = 0.001 0.001
y[1] (numeric) = 0.0462014394804 0.0600613989275
y[1] (closed_form) = 0.0461999058806 0.0600688662229
absolute error = 7.623e-06
relative error = 0.01006 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
NO REAL POLE (three term test) for Equation 1
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.2032 0.537
h = 0.001 0.003
y[1] (numeric) = 0.0462325926509 0.060238945602
y[1] (closed_form) = 0.0462312801916 0.0602464003152
absolute error = 7.569e-06
relative error = 0.009967 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
NO REAL POLE (three term test) for Equation 1
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.2042 0.54
h = 0.0001 0.004
y[1] (numeric) = 0.0461173628285 0.0606258472015
y[1] (closed_form) = 0.0461155983745 0.060633309024
absolute error = 7.668e-06
relative error = 0.01007 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
NO REAL POLE (three term test) for Equation 1
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.2043 0.544
h = 0.003 0.006
y[1] (numeric) = 0.0458324234492 0.0610512766316
y[1] (closed_form) = 0.0458304560548 0.0610584110891
absolute error = 7.401e-06
relative error = 0.009694 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
NO REAL POLE (three term test) for Equation 1
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.2073 0.55
h = 0.0001 0.005
y[1] (numeric) = 0.045698550376 0.0619002206452
y[1] (closed_form) = 0.0456958455736 0.0619088790467
absolute error = 9.071e-06
relative error = 0.01179 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
NO REAL POLE (three term test) for Equation 1
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.2074 0.555
h = 0.0001 0.003
y[1] (numeric) = 0.0453310199608 0.0624306176264
y[1] (closed_form) = 0.0453289603497 0.062438382672
absolute error = 8.034e-06
relative error = 0.01041 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
NO REAL POLE (three term test) for Equation 1
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.2075 0.558
h = 0.001 0.001
y[1] (numeric) = 0.0451129814494 0.0627507821141
y[1] (closed_form) = 0.0451113360917 0.06275866734
absolute error = 8.055e-06
relative error = 0.01042 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
NO REAL POLE (three term test) for Equation 1
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.2085 0.559
h = 0.001 0.003
y[1] (numeric) = 0.0451406589496 0.0629313194943
y[1] (closed_form) = 0.045139236315 0.0629391944567
absolute error = 8.002e-06
relative error = 0.01033 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
NO REAL POLE (three term test) for Equation 1
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.2095 0.562
h = 0.0001 0.004
y[1] (numeric) = 0.0450154800396 0.0633207312309
y[1] (closed_form) = 0.0450136023783 0.0633286084467
absolute error = 8.098e-06
relative error = 0.01042 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
NO REAL POLE (three term test) for Equation 1
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.2096 0.566
h = 0.003 0.006
y[1] (numeric) = 0.0447175590279 0.0637454906463
y[1] (closed_form) = 0.0447154806391 0.0637530361557
absolute error = 7.827e-06
relative error = 0.01005 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
NO REAL POLE (three term test) for Equation 1
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.2126 0.572
h = 0.0001 0.005
y[1] (numeric) = 0.0445634733707 0.0646026168119
y[1] (closed_form) = 0.0445606362823 0.0646116883221
absolute error = 9.505e-06
relative error = 0.01211 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
NO REAL POLE (three term test) for Equation 1
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.2127 0.577
h = 0.0001 0.003
y[1] (numeric) = 0.0441796598169 0.0651320039959
y[1] (closed_form) = 0.0441774817664 0.0651401831999
absolute error = 8.464e-06
relative error = 0.01075 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
NO REAL POLE (three term test) for Equation 1
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.2128 0.58
h = 0.001 0.001
y[1] (numeric) = 0.0439518412979 0.0654516671328
y[1] (closed_form) = 0.0439500789487 0.0654599717547
absolute error = 8.490e-06
relative error = 0.01077 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
NO REAL POLE (three term test) for Equation 1
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.2138 0.581
h = 0.001 0.003
y[1] (numeric) = 0.0439759879988 0.0656351774017
y[1] (closed_form) = 0.0439744499556 0.0656434740789
absolute error = 8.438e-06
relative error = 0.01068 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
NO REAL POLE (three term test) for Equation 1
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.2148 0.584
h = 0.0001 0.004
y[1] (numeric) = 0.0438407675604 0.0660270085132
y[1] (closed_form) = 0.0438387714586 0.0660353025877
absolute error = 8.531e-06
relative error = 0.01076 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
NO REAL POLE (three term test) for Equation 1
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.2149 0.588
h = 0.003 0.006
y[1] (numeric) = 0.0435297866451 0.0664509538881
y[1] (closed_form) = 0.0435275920287 0.0664589119152
absolute error = 8.255e-06
relative error = 0.01039 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
NO REAL POLE (three term test) for Equation 1
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.2179 0.594
h = 0.0001 0.005
y[1] (numeric) = 0.0433552670495 0.0673160993369
y[1] (closed_form) = 0.0433522924419 0.0673255854216
absolute error = 9.942e-06
relative error = 0.01242 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
NO REAL POLE (three term test) for Equation 1
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.218 0.599
h = 0.0001 0.003
y[1] (numeric) = 0.0429550734299 0.0678442962253
y[1] (closed_form) = 0.0429527717067 0.0678528910533
absolute error = 8.898e-06
relative error = 0.01108 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
NO REAL POLE (three term test) for Equation 1
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.2181 0.602
h = 0.001 0.001
y[1] (numeric) = 0.0427174152878 0.0681633504587
y[1] (closed_form) = 0.0427155307139 0.0681720759421
absolute error = 8.927e-06
relative error = 0.0111 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
NO REAL POLE (three term test) for Equation 1
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.2191 0.603
h = 0.001 0.003
y[1] (numeric) = 0.0427379760607 0.0683498157996
y[1] (closed_form) = 0.0427363173756 0.0683585356572
absolute error = 8.876e-06
relative error = 0.01101 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
NO REAL POLE (three term test) for Equation 1
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.2201 0.606
h = 0.0001 0.004
y[1] (numeric) = 0.0425926216531 0.0687439755235
y[1] (closed_form) = 0.0425905018773 0.0687526879224
absolute error = 8.967e-06
relative error = 0.01109 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
NO REAL POLE (three term test) for Equation 1
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.2202 0.61
h = 0.003 0.006
y[1] (numeric) = 0.0422685025629 0.0691669628324
y[1] (closed_form) = 0.0422661864854 0.0691753348427
absolute error = 8.686e-06
relative error = 0.01072 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
NO REAL POLE (three term test) for Equation 1
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.2232 0.616
h = 0.0001 0.005
y[1] (numeric) = 0.0420733276745 0.0700399646956
y[1] (closed_form) = 0.0420702103142 0.0700498668203
absolute error = 1.038e-05
relative error = 0.0127 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
NO REAL POLE (three term test) for Equation 1
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.2233 0.621
h = 0.0001 0.003
y[1] (numeric) = 0.0416566570619 0.07056679079
y[1] (closed_form) = 0.0416542264325 0.0705758027076
absolute error = 9.334e-06
relative error = 0.01139 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
NO REAL POLE (three term test) for Equation 1
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.2234 0.624
h = 0.001 0.001
y[1] (numeric) = 0.0414090996814 0.0708851285669
y[1] (closed_form) = 0.0414070876494 0.0708942763776
absolute error = 9.366e-06
relative error = 0.01141 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
NO REAL POLE (three term test) for Equation 1
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.2244 0.625
h = 0.0001 0.004
y[1] (numeric) = 0.0414260193976 0.0710745311631
y[1] (closed_form) = 0.0414242348371 0.0710836756667
absolute error = 9.317e-06
relative error = 0.01132 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
NO REAL POLE (three term test) for Equation 1
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.2245 0.629
h = 0.003 0.006
y[1] (numeric) = 0.0410910995059 0.0714966073249
y[1] (closed_form) = 0.0410885635683 0.0715052211033
absolute error = 8.979e-06
relative error = 0.01089 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
NO REAL POLE (three term test) for Equation 1
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.2275 0.635
h = 0.0001 0.005
y[1] (numeric) = 0.0408778770303 0.0723759916737
y[1] (closed_form) = 0.0408745214583 0.0723861370833
absolute error = 1.069e-05
relative error = 0.01285 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
NO REAL POLE (three term test) for Equation 1
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.2276 0.64
h = 0.0001 0.003
y[1] (numeric) = 0.0404469652093 0.0729012954517
y[1] (closed_form) = 0.0404443082743 0.0729105517227
absolute error = 9.630e-06
relative error = 0.01155 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
NO REAL POLE (three term test) for Equation 1
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.2277 0.643
h = 0.001 0.001
y[1] (numeric) = 0.0401908494341 0.0732188115159
y[1] (closed_form) = 0.0401886122804 0.0732282082055
absolute error = 9.659e-06
relative error = 0.01156 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
NO REAL POLE (three term test) for Equation 1
NO COMPLEX POLE (six term test) for Equation 1
memory used=151.9MB, alloc=40.3MB, time=2.07
x[1] = 0.2287 0.644
h = 0.001 0.003
y[1] (numeric) = 0.0402045562046 0.0734106838704
y[1] (closed_form) = 0.0402025478574 0.0734200792677
absolute error = 9.608e-06
relative error = 0.01148 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
NO REAL POLE (three term test) for Equation 1
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.2297 0.647
h = 0.0001 0.004
y[1] (numeric) = 0.0400400736242 0.0738088117159
y[1] (closed_form) = 0.0400375986023 0.0738181905825
absolute error = 9.700e-06
relative error = 0.01155 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
NO REAL POLE (three term test) for Equation 1
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.2298 0.651
h = 0.003 0.006
y[1] (numeric) = 0.0396913145967 0.0742294742552
y[1] (closed_form) = 0.0396886474426 0.0742385046816
absolute error = 9.416e-06
relative error = 0.01119 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
NO REAL POLE (three term test) for Equation 1
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.2328 0.657
h = 0.0001 0.005
y[1] (numeric) = 0.0394570268795 0.0751164093208
y[1] (closed_form) = 0.0394535187994 0.0751269734352
absolute error = 1.113e-05
relative error = 0.01312 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
NO REAL POLE (three term test) for Equation 1
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.2329 0.662
h = 0.0001 0.003
y[1] (numeric) = 0.0390094598565 0.0756400052848
y[1] (closed_form) = 0.0390066642599 0.0756496813101
absolute error = 1.007e-05
relative error = 0.01183 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
NO REAL POLE (three term test) for Equation 1
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.233 0.665
h = 0.001 0.001
y[1] (numeric) = 0.038743335194 0.0759566040517
y[1] (closed_form) = 0.0387409608267 0.0759664257333
absolute error = 1.010e-05
relative error = 0.01185 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
NO REAL POLE (three term test) for Equation 1
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.234 0.666
h = 0.001 0.003
y[1] (numeric) = 0.0387532985381 0.0761513798519
y[1] (closed_form) = 0.03875115456 0.07616120256
absolute error = 1.005e-05
relative error = 0.01177 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
NO REAL POLE (three term test) for Equation 1
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.235 0.669
h = 0.0001 0.004
y[1] (numeric) = 0.0385784186181 0.0765515755585
y[1] (closed_form) = 0.0385758049333 0.07656137688
absolute error = 1.014e-05
relative error = 0.01183 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
NO REAL POLE (three term test) for Equation 1
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.2351 0.673
h = 0.003 0.006
y[1] (numeric) = 0.0382162992154 0.0769708670759
y[1] (closed_form) = 0.0382134956113 0.0769803156159
absolute error = 9.856e-06
relative error = 0.01147 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
NO REAL POLE (three term test) for Equation 1
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.2381 0.679
h = 0.0001 0.005
y[1] (numeric) = 0.0379607249022 0.0778651899895
y[1] (closed_form) = 0.0379570590805 0.0778761742743
absolute error = 1.158e-05
relative error = 0.01337 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
NO REAL POLE (three term test) for Equation 1
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.2382 0.684
h = 0.0001 0.003
y[1] (numeric) = 0.0374964057499 0.0783868976411
y[1] (closed_form) = 0.0374934662582 0.0783969948864
absolute error = 1.052e-05
relative error = 0.0121 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
NO REAL POLE (three term test) for Equation 1
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.2383 0.687
h = 0.001 0.001
y[1] (numeric) = 0.0372202125848 0.078702471558
y[1] (closed_form) = 0.0372176957705 0.0787127196972
absolute error = 1.055e-05
relative error = 0.01212 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
NO REAL POLE (three term test) for Equation 1
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.2393 0.688
h = 0.001 0.003
y[1] (numeric) = 0.0372263773737 0.0789001329869
y[1] (closed_form) = 0.0372240925314 0.0789103844715
absolute error = 1.050e-05
relative error = 0.01204 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
NO REAL POLE (three term test) for Equation 1
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.2403 0.691
h = 0.0001 0.004
y[1] (numeric) = 0.0370410076733 0.0793023057924
y[1] (closed_form) = 0.0370382500924 0.0793125310343
absolute error = 1.059e-05
relative error = 0.0121 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
NO REAL POLE (three term test) for Equation 1
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.2404 0.695
h = 0.003 0.006
y[1] (numeric) = 0.0366654496242 0.0797200822621
y[1] (closed_form) = 0.0366625043369 0.0797299503813
absolute error = 1.030e-05
relative error = 0.01174 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
NO REAL POLE (three term test) for Equation 1
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.2434 0.701
h = 0.0001 0.005
y[1] (numeric) = 0.0363883673606 0.0806216301549
y[1] (closed_form) = 0.0363845385641 0.0806330360757
absolute error = 1.203e-05
relative error = 0.0136 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
NO REAL POLE (three term test) for Equation 1
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.2435 0.706
h = 0.0001 0.003
y[1] (numeric) = 0.0359071991517 0.0811412689957
y[1] (closed_form) = 0.0359041105317 0.0811517889267
absolute error = 1.096e-05
relative error = 0.01236 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
NO REAL POLE (three term test) for Equation 1
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.2436 0.709
h = 0.001 0.001
y[1] (numeric) = 0.0356208778687 0.0814557105099
y[1] (closed_form) = 0.0356182133741 0.0814663865723
absolute error = 1.100e-05
relative error = 0.01238 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
NO REAL POLE (three term test) for Equation 1
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.2446 0.71
h = 0.001 0.003
y[1] (numeric) = 0.0356231889737 0.0816562397508
y[1] (closed_form) = 0.0356207580338 0.0816669214773
absolute error = 1.095e-05
relative error = 0.0123 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
NO REAL POLE (three term test) for Equation 1
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.2456 0.713
h = 0.0001 0.004
y[1] (numeric) = 0.0354272370521 0.0820602988927
y[1] (closed_form) = 0.0354243303415 0.0820709495205
absolute error = 1.104e-05
relative error = 0.01235 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
NO REAL POLE (three term test) for Equation 1
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.2457 0.717
h = 0.003 0.006
y[1] (numeric) = 0.0350381620853 0.0824764162892
y[1] (closed_form) = 0.0350350698812 0.0824867054532
absolute error = 1.074e-05
relative error = 0.01199 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
NO REAL POLE (three term test) for Equation 1
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.2487 0.723
h = 0.0001 0.005
y[1] (numeric) = 0.0347393505169 0.0833850262924
y[1] (closed_form) = 0.034735353512 0.0833968553148
absolute error = 1.249e-05
relative error = 0.01382 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
NO REAL POLE (three term test) for Equation 1
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.2488 0.728
h = 0.0001 0.003
y[1] (numeric) = 0.034241236324 0.083902415824
y[1] (closed_form) = 0.0342379933423 0.0839133599061
absolute error = 1.141e-05
relative error = 0.01259 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
NO REAL POLE (three term test) for Equation 1
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.2489 0.731
h = 0.001 0.001
y[1] (numeric) = 0.033944727308 0.0842156173825
y[1] (closed_form) = 0.0339419098996 0.0842267228337
absolute error = 1.146e-05
relative error = 0.01262 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
NO REAL POLE (three term test) for Equation 1
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.2499 0.732
h = 0.0001 0.004
y[1] (numeric) = 0.0339431296001 0.0844189966187
y[1] (closed_form) = 0.0339405473293 0.0844301100528
absolute error = 1.141e-05
relative error = 0.01254 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
NO REAL POLE (three term test) for Equation 1
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.25 0.736
h = 0.003 0.006
y[1] (numeric) = 0.0335429451891 0.0848336289889
y[1] (closed_form) = 0.0335396133333 0.0848441565867
absolute error = 1.104e-05
relative error = 0.0121 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
NO REAL POLE (three term test) for Equation 1
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.253 0.742
h = 0.0001 0.005
y[1] (numeric) = 0.0332251710215 0.0857479249737
y[1] (closed_form) = 0.0332209160133 0.0857599939467
absolute error = 1.280e-05
relative error = 0.01391 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
NO REAL POLE (three term test) for Equation 1
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.2531 0.747
h = 0.0001 0.003
y[1] (numeric) = 0.0327124223935 0.0862630304057
y[1] (closed_form) = 0.0327089333145 0.0862742155068
absolute error = 1.172e-05
relative error = 0.0127 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
NO REAL POLE (three term test) for Equation 1
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.2532 0.75
h = 0.001 0.001
y[1] (numeric) = 0.0324071128918 0.0865749562043
y[1] (closed_form) = 0.0324040505702 0.0865863072
absolute error = 1.176e-05
relative error = 0.01272 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
NO REAL POLE (three term test) for Equation 1
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.2542 0.751
h = 0.001 0.003
y[1] (numeric) = 0.0324020728024 0.0867807268988
y[1] (closed_form) = 0.0323992469532 0.0867920878923
absolute error = 1.171e-05
relative error = 0.01264 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
NO REAL POLE (three term test) for Equation 1
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.2552 0.754
h = 0.0001 0.004
y[1] (numeric) = 0.032186163884 0.0871879258503
y[1] (closed_form) = 0.0321828566801 0.0871992466731
absolute error = 1.179e-05
relative error = 0.01269 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
NO REAL POLE (three term test) for Equation 1
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.2553 0.758
h = 0.0001 0.004
y[1] (numeric) = 0.0317717525783 0.0876004095548
y[1] (closed_form) = 0.0317682640504 0.0876113608621
absolute error = 1.149e-05
relative error = 0.01233 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
NO REAL POLE (three term test) for Equation 1
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.2554 0.762
h = 0.003 0.006
y[1] (numeric) = 0.0313548660568 0.0880116664495
y[1] (closed_form) = 0.0313513775289 0.0880226177568
absolute error = 1.149e-05
relative error = 0.0123 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
NO REAL POLE (three term test) for Equation 1
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.2584 0.768
h = 0.0001 0.005
y[1] (numeric) = 0.0310108563012 0.0889330435383
y[1] (closed_form) = 0.0310064195721 0.0889455378432
absolute error = 1.326e-05
relative error = 0.01408 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
NO REAL POLE (three term test) for Equation 1
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.2585 0.773
h = 0.0001 0.003
y[1] (numeric) = 0.0304781137602 0.0894444595655
y[1] (closed_form) = 0.0304744591617 0.0894560717433
absolute error = 1.217e-05
relative error = 0.01288 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
NO REAL POLE (three term test) for Equation 1
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.2586 0.776
h = 0.001 0.001
y[1] (numeric) = 0.0301607768073 0.0897543011024
y[1] (closed_form) = 0.0301575504701 0.0897660853717
absolute error = 1.222e-05
relative error = 0.0129 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
NO REAL POLE (three term test) for Equation 1
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.2596 0.777
h = 0.001 0.003
y[1] (numeric) = 0.0301509224882 0.0899632228473
y[1] (closed_form) = 0.0301479343938 0.0899750198928
absolute error = 1.217e-05
relative error = 0.01282 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
NO REAL POLE (three term test) for Equation 1
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.2606 0.78
h = 0.0001 0.004
y[1] (numeric) = 0.0299222256386 0.0903719145652
y[1] (closed_form) = 0.0299187528135 0.090383665632
absolute error = 1.225e-05
relative error = 0.01287 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
NO REAL POLE (three term test) for Equation 1
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.2607 0.784
h = 0.003 0.006
y[1] (numeric) = 0.0294917725918 0.0907814418113
y[1] (closed_form) = 0.0294881211992 0.0907928183531
absolute error = 1.195e-05
relative error = 0.01252 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
NO REAL POLE (three term test) for Equation 1
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.2637 0.79
h = 0.0001 0.005
y[1] (numeric) = 0.0291253700034 0.0917093760745
y[1] (closed_form) = 0.029120749118 0.0917222976707
absolute error = 1.372e-05
relative error = 0.01426 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
NO REAL POLE (three term test) for Equation 1
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.2638 0.795
h = 0.0001 0.003
y[1] (numeric) = 0.0285753962825 0.0922179904733
y[1] (closed_form) = 0.0285715713743 0.092230030992
absolute error = 1.263e-05
relative error = 0.01308 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
NO REAL POLE (three term test) for Equation 1
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.2639 0.798
h = 0.001 0.001
y[1] (numeric) = 0.0282476960165 0.0925262628555
y[1] (closed_form) = 0.0282443008176 0.0925384807032
absolute error = 1.268e-05
relative error = 0.01311 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
NO REAL POLE (three term test) for Equation 1
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.2649 0.799
h = 0.001 0.003
y[1] (numeric) = 0.0282337665166 0.0927379778436
y[1] (closed_form) = 0.0282306111433 0.0927502107863
absolute error = 1.263e-05
relative error = 0.01303 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
NO REAL POLE (three term test) for Equation 1
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.2659 0.802
h = 0.0001 0.004
y[1] (numeric) = 0.027994119021 0.0931481852635
y[1] (closed_form) = 0.0279904758851 0.0931603673715
absolute error = 1.272e-05
relative error = 0.01307 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
NO REAL POLE (three term test) for Equation 1
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.266 0.806
h = 0.003 0.006
y[1] (numeric) = 0.0275498403972 0.0935554686516
y[1] (closed_form) = 0.0275460209067 0.0935672718933
absolute error = 1.241e-05
relative error = 0.01272 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
NO REAL POLE (three term test) for Equation 1
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.269 0.812
h = 0.0001 0.005
y[1] (numeric) = 0.0271608236216 0.0944897972204
y[1] (closed_form) = 0.0271560133467 0.0945031475733
absolute error = 1.419e-05
relative error = 0.01443 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
NO REAL POLE (three term test) for Equation 1
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.2691 0.817
h = 0.0001 0.003
y[1] (numeric) = 0.0265935217936 0.0949954294924
y[1] (closed_form) = 0.0265895213423 0.0950078998175
absolute error = 1.310e-05
relative error = 0.01327 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
NO REAL POLE (three term test) for Equation 1
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.2692 0.82
h = 0.001 0.001
y[1] (numeric) = 0.0262553985992 0.0953020251669
y[1] (closed_form) = 0.0262518293052 0.0953146780587
absolute error = 1.315e-05
relative error = 0.0133 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
NO REAL POLE (three term test) for Equation 1
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.2702 0.821
h = 0.001 0.003
y[1] (numeric) = 0.0262373387897 0.0955165155815
y[1] (closed_form) = 0.0262340109041 0.0955291858869
absolute error = 1.310e-05
relative error = 0.01322 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
NO REAL POLE (three term test) for Equation 1
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.2712 0.824
h = 0.0001 0.004
y[1] (numeric) = 0.0259866482073 0.0959281479409
y[1] (closed_form) = 0.025982829527 0.0959407625557
absolute error = 1.318e-05
relative error = 0.01326 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
NO REAL POLE (three term test) for Equation 1
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.2713 0.828
h = 0.003 0.006
y[1] (numeric) = 0.0255284657352 0.0963330434455
y[1] (closed_form) = 0.0255244729133 0.0963452748528
absolute error = 1.287e-05
relative error = 0.01291 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
NO REAL POLE (three term test) for Equation 1
NO COMPLEX POLE (six term test) for Equation 1
memory used=200.8MB, alloc=40.3MB, time=2.76
x[1] = 0.2743 0.834
h = 0.0001 0.005
y[1] (numeric) = 0.025116613418 0.0972736034511
y[1] (closed_form) = 0.0251116085201 0.0972873840264
absolute error = 1.466e-05
relative error = 0.01459 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
NO REAL POLE (three term test) for Equation 1
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.2744 0.839
h = 0.0001 0.003
y[1] (numeric) = 0.0245318865556 0.0977760730979
y[1] (closed_form) = 0.0245277053278 0.0977889746949
absolute error = 1.356e-05
relative error = 0.01345 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
NO REAL POLE (three term test) for Equation 1
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.2745 0.842
h = 0.001 0.001
y[1] (numeric) = 0.0241832808174 0.098080884512
y[1] (closed_form) = 0.024179532195 0.0980939739133
absolute error = 1.362e-05
relative error = 0.01348 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
NO REAL POLE (three term test) for Equation 1
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.2755 0.843
h = 0.001 0.003
y[1] (numeric) = 0.0241610355696 0.0982981325361
y[1] (closed_form) = 0.0241575299383 0.09831124167
absolute error = 1.357e-05
relative error = 0.0134 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
NO REAL POLE (three term test) for Equation 1
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.2765 0.846
h = 0.0001 0.004
y[1] (numeric) = 0.0238992094596 0.0987110990728
y[1] (closed_form) = 0.0238952100017 0.09872414766
absolute error = 1.365e-05
relative error = 0.01344 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
NO REAL POLE (three term test) for Equation 1
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.2766 0.85
h = 0.003 0.006
y[1] (numeric) = 0.0234270448679 0.0991134626681
y[1] (closed_form) = 0.0234228734813 0.0991261237067
absolute error = 1.333e-05
relative error = 0.01309 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
NO REAL POLE (three term test) for Equation 1
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.2796 0.856
h = 0.0001 0.005
y[1] (numeric) = 0.0229921356547 0.100060091242
y[1] (closed_form) = 0.0229869309005 0.100074303505
absolute error = 1.514e-05
relative error = 0.01474 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
NO REAL POLE (three term test) for Equation 1
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.2797 0.861
h = 0.0001 0.003
y[1] (numeric) = 0.0223898868305 0.100559217765
y[1] (closed_form) = 0.022385519593 0.1005725521
absolute error = 1.403e-05
relative error = 0.01362 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
NO REAL POLE (three term test) for Equation 1
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.2798 0.864
h = 0.001 0.001
y[1] (numeric) = 0.0220307389335 0.100862137366
y[1] (closed_form) = 0.0220268057492 0.100875664742
absolute error = 1.409e-05
relative error = 0.01364 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
NO REAL POLE (three term test) for Equation 1
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.2808 0.865
h = 0.0001 0.004
y[1] (numeric) = 0.0220042531184 0.101082125183
y[1] (closed_form) = 0.0220005645082 0.101095674611
absolute error = 1.404e-05
relative error = 0.01357 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
NO REAL POLE (three term test) for Equation 1
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.2809 0.869
h = 0.003 0.006
y[1] (numeric) = 0.0215206000015 0.101482289215
y[1] (closed_form) = 0.0215161644191 0.101495184409
absolute error = 1.364e-05
relative error = 0.01314 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
NO REAL POLE (three term test) for Equation 1
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.2839 0.875
h = 0.0001 0.005
y[1] (numeric) = 0.0210655972779 0.102433732748
y[1] (closed_form) = 0.0210601099763 0.102448180683
absolute error = 1.545e-05
relative error = 0.01478 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
NO REAL POLE (three term test) for Equation 1
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.284 0.88
h = 0.0001 0.003
y[1] (numeric) = 0.0204482312655 0.102929626791
y[1] (closed_form) = 0.0204435933867 0.102943197867
absolute error = 1.434e-05
relative error = 0.01366 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
NO REAL POLE (three term test) for Equation 1
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.2841 0.883
h = 0.001 0.001
y[1] (numeric) = 0.0200799855698 0.103230705313
y[1] (closed_form) = 0.0200757829283 0.103244473956
absolute error = 1.440e-05
relative error = 0.01369 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
NO REAL POLE (three term test) for Equation 1
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.2851 0.884
h = 0.001 0.003
y[1] (numeric) = 0.0200497731227 0.103452985778
y[1] (closed_form) = 0.02004581639 0.103466778487
absolute error = 1.435e-05
relative error = 0.01362 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
NO REAL POLE (three term test) for Equation 1
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.2861 0.887
h = 0.0001 0.004
y[1] (numeric) = 0.0197669670191 0.103868058094
y[1] (closed_form) = 0.0197625108757 0.103881781184
absolute error = 1.443e-05
relative error = 0.01364 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
NO REAL POLE (three term test) for Equation 1
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.2862 0.891
h = 0.003 0.006
y[1] (numeric) = 0.0192686108537 0.104265158312
y[1] (closed_form) = 0.019263986951 0.104278485802
absolute error = 1.411e-05
relative error = 0.0133 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
NO REAL POLE (three term test) for Equation 1
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.2892 0.897
h = 0.0001 0.005
y[1] (numeric) = 0.0187901412853 0.105222364715
y[1] (closed_form) = 0.0187844443718 0.105237247003
absolute error = 1.594e-05
relative error = 0.01491 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
NO REAL POLE (three term test) for Equation 1
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.2893 0.902
h = 0.0001 0.003
y[1] (numeric) = 0.0181550751023 0.105714578615
y[1] (closed_form) = 0.0181502414581 0.105728585093
absolute error = 1.482e-05
relative error = 0.01381 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
NO REAL POLE (three term test) for Equation 1
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.2894 0.905
h = 0.001 0.001
y[1] (numeric) = 0.0177761775986 0.106013564483
y[1] (closed_form) = 0.0177717806398 0.106027773765
absolute error = 1.487e-05
relative error = 0.01384 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
NO REAL POLE (three term test) for Equation 1
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.2904 0.906
h = 0.001 0.003
y[1] (numeric) = 0.0177416222148 0.106238550931
y[1] (closed_form) = 0.0177374727475 0.106252786598
absolute error = 1.483e-05
relative error = 0.01377 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
NO REAL POLE (three term test) for Equation 1
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.2914 0.909
h = 0.0001 0.004
y[1] (numeric) = 0.0174474172132 0.106654696673
y[1] (closed_form) = 0.0174427653033 0.106668857866
absolute error = 1.491e-05
relative error = 0.01379 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
NO REAL POLE (three term test) for Equation 1
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.2915 0.913
h = 0.003 0.006
y[1] (numeric) = 0.0169348567279 0.107048852025
y[1] (closed_form) = 0.0169300392717 0.107062613277
absolute error = 1.458e-05
relative error = 0.01345 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
NO REAL POLE (three term test) for Equation 1
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.2945 0.919
h = 0.0001 0.005
y[1] (numeric) = 0.0164326989603 0.10801165843
y[1] (closed_form) = 0.0164267872017 0.108026976537
absolute error = 1.642e-05
relative error = 0.01503 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
NO REAL POLE (three term test) for Equation 1
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.2946 0.924
h = 0.0001 0.003
y[1] (numeric) = 0.0157798356793 0.108500011688
y[1] (closed_form) = 0.0157748010365 0.108514455034
absolute error = 1.530e-05
relative error = 0.01395 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
NO REAL POLE (three term test) for Equation 1
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.2947 0.927
h = 0.001 0.001
y[1] (numeric) = 0.0153902267525 0.108796797349
y[1] (closed_form) = 0.015385630243 0.108811448737
absolute error = 1.536e-05
relative error = 0.01397 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
NO REAL POLE (three term test) for Equation 1
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.2957 0.928
h = 0.001 0.003
y[1] (numeric) = 0.015351273303 0.109024471963
y[1] (closed_form) = 0.0153469258679 0.109039152055
absolute error = 1.531e-05
relative error = 0.0139 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
NO REAL POLE (three term test) for Equation 1
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.2967 0.931
h = 0.0001 0.004
y[1] (numeric) = 0.0150455769626 0.109441600369
y[1] (closed_form) = 0.0150407240528 0.10945620113
absolute error = 1.539e-05
relative error = 0.01393 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
NO REAL POLE (three term test) for Equation 1
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.2968 0.935
h = 0.003 0.006
y[1] (numeric) = 0.0145187338863 0.109832666831
y[1] (closed_form) = 0.0145137176431 0.109846863309
absolute error = 1.506e-05
relative error = 0.01359 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
NO REAL POLE (three term test) for Equation 1
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.2998 0.941
h = 0.0001 0.005
y[1] (numeric) = 0.0139926665651 0.110800910368
y[1] (closed_form) = 0.0139865347279 0.110816665759
absolute error = 1.691e-05
relative error = 0.01514 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
NO REAL POLE (three term test) for Equation 1
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.2999 0.946
h = 0.0001 0.003
y[1] (numeric) = 0.0133219092589 0.111285222486
y[1] (closed_form) = 0.013316668384 0.111300104165
absolute error = 1.578e-05
relative error = 0.01408 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
NO REAL POLE (three term test) for Equation 1
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.3 0.949
h = 0.001 0.001
y[1] (numeric) = 0.0129215292936 0.111579700387
y[1] (closed_form) = 0.012916728 0.111594795347
absolute error = 1.584e-05
relative error = 0.0141 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
NO REAL POLE (three term test) for Equation 1
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.301 0.95
h = 0.001 0.003
y[1] (numeric) = 0.0128781226497 0.111810045351
y[1] (closed_form) = 0.0128735720133 0.111825171333
absolute error = 1.580e-05
relative error = 0.01403 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
NO REAL POLE (three term test) for Equation 1
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.302 0.953
h = 0.0001 0.004
y[1] (numeric) = 0.0125608425297 0.112228065658
y[1] (closed_form) = 0.0125557833867 0.112243107453
absolute error = 1.587e-05
relative error = 0.01405 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
NO REAL POLE (three term test) for Equation 1
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.3021 0.957
h = 0.003 0.006
y[1] (numeric) = 0.012019638591 0.112615899203
y[1] (closed_form) = 0.0120144183275 0.112630532375
absolute error = 1.554e-05
relative error = 0.01372 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
NO REAL POLE (three term test) for Equation 1
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.3051 0.963
h = 0.0001 0.005
y[1] (numeric) = 0.0114694403618 0.113589417005
y[1] (closed_form) = 0.0114630832127 0.113605611145
absolute error = 1.740e-05
relative error = 0.01524 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
NO REAL POLE (three term test) for Equation 1
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.3052 0.968
h = 0.0001 0.003
y[1] (numeric) = 0.0107806921031 0.114069507484
y[1] (closed_form) = 0.0107752397628 0.114084828962
absolute error = 1.626e-05
relative error = 0.01419 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
NO REAL POLE (three term test) for Equation 1
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.3053 0.971
h = 0.001 0.001
y[1] (numeric) = 0.010369481484 0.114361570073
y[1] (closed_form) = 0.010364470173 0.114377110069
absolute error = 1.633e-05
relative error = 0.01422 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
NO REAL POLE (three term test) for Equation 1
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.3063 0.972
h = 0.0001 0.004
y[1] (numeric) = 0.0103215665169 0.11459456757
y[1] (closed_form) = 0.010316807446 0.114610140907
absolute error = 1.628e-05
relative error = 0.01415 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
NO REAL POLE (three term test) for Equation 1
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.3064 0.976
h = 0.003 0.006
y[1] (numeric) = 0.00976856541023 0.114979627673
y[1] (closed_form) = 0.00976306115925 0.114994491665
absolute error = 1.585e-05
relative error = 0.01373 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
NO REAL POLE (three term test) for Equation 1
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.3094 0.982
h = 0.0001 0.005
y[1] (numeric) = 0.00919735865863 0.115957263929
y[1] (closed_form) = 0.00919069917045 0.115973690407
absolute error = 1.773e-05
relative error = 0.01524 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
NO REAL POLE (three term test) for Equation 1
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.3095 0.987
h = 0.0001 0.003
y[1] (numeric) = 0.00849309998487 0.116433360145
y[1] (closed_form) = 0.00848735721167 0.11644891503
absolute error = 1.658e-05
relative error = 0.0142 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
NO REAL POLE (three term test) for Equation 1
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.3096 0.99
h = 0.001 0.001
y[1] (numeric) = 0.00807254947635 0.116723127608
y[1] (closed_form) = 0.00806724891648 0.116738905536
absolute error = 1.664e-05
relative error = 0.01422 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
NO REAL POLE (three term test) for Equation 1
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.3106 0.991
h = 0.001 0.003
y[1] (numeric) = 0.00802067844128 0.116958339453
y[1] (closed_form) = 0.00801563145621 0.116974152737
absolute error = 1.660e-05
relative error = 0.01416 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
NO REAL POLE (three term test) for Equation 1
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.3116 0.994
h = 0.0001 0.004
y[1] (numeric) = 0.00768158950368 0.117377637227
y[1] (closed_form) = 0.00767602842795 0.117393357252
absolute error = 1.667e-05
relative error = 0.01417 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
NO REAL POLE (three term test) for Equation 1
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.3117 0.998
h = 0.003 0.006
y[1] (numeric) = 0.00711349758965 0.117758898472
y[1] (closed_form) = 0.00710777956284 0.117774201822
absolute error = 1.634e-05
relative error = 0.01385 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
NO REAL POLE (three term test) for Equation 1
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.3147 1.004
h = 0.0001 0.005
y[1] (numeric) = 0.00651774998125 0.118741503295
y[1] (closed_form) = 0.00651085542564 0.118758371188
absolute error = 1.822e-05
relative error = 0.01532 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
NO REAL POLE (three term test) for Equation 1
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.3148 1.009
h = 0.0001 0.003
y[1] (numeric) = 0.00579532214601 0.119213040853
y[1] (closed_form) = 0.00578935815189 0.119229038201
absolute error = 1.707e-05
relative error = 0.0143 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
NO REAL POLE (three term test) for Equation 1
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.3149 1.012
h = 0.001 0.001
y[1] (numeric) = 0.00536383133477 0.119500192162
y[1] (closed_form) = 0.00535831100199 0.119516417791
absolute error = 1.714e-05
relative error = 0.01433 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
NO REAL POLE (three term test) for Equation 1
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.3159 1.013
h = 0.001 0.003
y[1] (numeric) = 0.00530734960691 0.11973802273
y[1] (closed_form) = 0.00530208443172 0.119754286035
absolute error = 1.709e-05
relative error = 0.01426 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
NO REAL POLE (three term test) for Equation 1
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.3169 1.016
h = 0.0001 0.004
y[1] (numeric) = 0.00495641351931 0.120157951654
y[1] (closed_form) = 0.00495063122145 0.120174116844
absolute error = 1.717e-05
relative error = 0.01427 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
NO REAL POLE (three term test) for Equation 1
NO COMPLEX POLE (six term test) for Equation 1
memory used=249.5MB, alloc=40.3MB, time=3.42
x[1] = 0.317 1.02
h = 0.003 0.006
y[1] (numeric) = 0.00437373854268 0.120535567027
y[1] (closed_form) = 0.00436780150667 0.1205513112
absolute error = 1.683e-05
relative error = 0.01395 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
NO REAL POLE (three term test) for Equation 1
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.32 1.026
h = 0.0001 0.005
y[1] (numeric) = 0.00375322872308 0.121522977548
y[1] (closed_form) = 0.00374609386667 0.12154028832
absolute error = 1.872e-05
relative error = 0.0154 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
NO REAL POLE (three term test) for Equation 1
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.3201 1.031
h = 0.0001 0.003
y[1] (numeric) = 0.00301253479908 0.121989775948
y[1] (closed_form) = 0.00300634435068 0.122006217226
absolute error = 1.757e-05
relative error = 0.01439 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
NO REAL POLE (three term test) for Equation 1
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.3202 1.034
h = 0.001 0.001
y[1] (numeric) = 0.00257004406984 0.122274203551
y[1] (closed_form) = 0.00256429873077 0.122290878348
absolute error = 1.764e-05
relative error = 0.01442 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
NO REAL POLE (three term test) for Equation 1
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.3212 1.035
h = 0.001 0.003
y[1] (numeric) = 0.00250889652037 0.122514635025
y[1] (closed_form) = 0.00250340792171 0.122531349816
absolute error = 1.759e-05
relative error = 0.01435 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
NO REAL POLE (three term test) for Equation 1
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.3222 1.038
h = 0.0001 0.004
y[1] (numeric) = 0.00214602084197 0.122935104337
y[1] (closed_form) = 0.00214001208864 0.122951716157
absolute error = 1.767e-05
relative error = 0.01437 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
NO REAL POLE (three term test) for Equation 1
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.3223 1.042
h = 0.003 0.006
y[1] (numeric) = 0.00154868453147 0.123308929812
y[1] (closed_form) = 0.00154252325289 0.123325116274
absolute error = 1.732e-05
relative error = 0.01404 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
NO REAL POLE (three term test) for Equation 1
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.3253 1.048
h = 0.0001 0.005
y[1] (numeric) = 0.000903191146267 0.124300983161
y[1] (closed_form) = 0.000895810755693 0.124318738279
absolute error = 1.923e-05
relative error = 0.01547 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
NO REAL POLE (three term test) for Equation 1
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.3254 1.053
h = 0.0001 0.003
y[1] (numeric) = 0.000144134206227 0.124762861906
y[1] (closed_form) = 0.000137712070187 0.124779748579
absolute error = 1.807e-05
relative error = 0.01448 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
NO REAL POLE (three term test) for Equation 1
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.3255 1.056
h = 0.001 0.001
y[1] (numeric) = -0.000309416056293 0.12504445825
y[1] (closed_form) = -0.000315391635 0.12506158368
absolute error = 1.814e-05
relative error = 0.0145 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
NO REAL POLE (three term test) for Equation 1
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.3265 1.057
h = 0.001 0.003
y[1] (numeric) = -0.00037528455616 0.125287472815
y[1] (closed_form) = -0.000381001811667 0.125304640557
absolute error = 1.809e-05
relative error = 0.01444 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
NO REAL POLE (three term test) for Equation 1
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.3275 1.06
h = 0.0001 0.004
y[1] (numeric) = -0.00075019226616 0.125708391751
y[1] (closed_form) = -0.000756432708333 0.125725451667
absolute error = 1.817e-05
relative error = 0.01445 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
NO REAL POLE (three term test) for Equation 1
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.3276 1.064
h = 0.003 0.006
y[1] (numeric) = -0.00136226818183 0.126078283303
y[1] (closed_form) = -0.00136865893632 0.126094913519
absolute error = 1.782e-05
relative error = 0.01413 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
NO REAL POLE (three term test) for Equation 1
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.3306 1.07
h = 0.0001 0.005
y[1] (numeric) = -0.00203296648703 0.127074816612
y[1] (closed_form) = -0.00204059764512 0.127093017541
absolute error = 1.974e-05
relative error = 0.01553 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
NO REAL POLE (three term test) for Equation 1
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.3307 1.075
h = 0.0001 0.003
y[1] (numeric) = -0.00281048337039 0.127531595203
y[1] (closed_form) = -0.00281714242743 0.127548928737
absolute error = 1.857e-05
relative error = 0.01455 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
NO REAL POLE (three term test) for Equation 1
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.3308 1.078
h = 0.001 0.001
y[1] (numeric) = -0.00327515278147 0.127810252735
y[1] (closed_form) = -0.00328136383317 0.127827830263
absolute error = 1.864e-05
relative error = 0.01458 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
NO REAL POLE (three term test) for Equation 1
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.3318 1.079
h = 0.0001 0.004
y[1] (numeric) = -0.00334579736053 0.128055832572
y[1] (closed_form) = -0.00335174850624 0.128073454732
absolute error = 1.860e-05
relative error = 0.01452 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
NO REAL POLE (three term test) for Equation 1
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.3319 1.083
h = 0.003 0.006
y[1] (numeric) = -0.00396997908704 0.128422376802
y[1] (closed_form) = -0.00397667362055 0.128439234505
absolute error = 1.814e-05
relative error = 0.01412 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
NO REAL POLE (three term test) for Equation 1
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.3349 1.089
h = 0.0001 0.005
y[1] (numeric) = -0.00466260092664 0.129422332063
y[1] (closed_form) = -0.00467055421535 0.129440761996
absolute error = 2.007e-05
relative error = 0.0155 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
NO REAL POLE (three term test) for Equation 1
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.335 1.094
h = 0.0001 0.003
y[1] (numeric) = -0.0054560214518 0.129874354607
y[1] (closed_form) = -0.00546299073333 0.129891918213
absolute error = 1.890e-05
relative error = 0.01453 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
NO REAL POLE (three term test) for Equation 1
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.3351 1.097
h = 0.001 0.001
y[1] (numeric) = -0.00593027284312 0.130150262967
y[1] (closed_form) = -0.00593679293532 0.130168075092
absolute error = 1.897e-05
relative error = 0.01456 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
NO REAL POLE (three term test) for Equation 1
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.3361 1.098
h = 0.001 0.003
y[1] (numeric) = -0.00600510292619 0.130397978852
y[1] (closed_form) = -0.00601136177759 0.130415837623
absolute error = 1.892e-05
relative error = 0.01449 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
NO REAL POLE (three term test) for Equation 1
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.3371 1.101
h = 0.0001 0.004
y[1] (numeric) = -0.00640264827779 0.130819346944
y[1] (closed_form) = -0.00640943589985 0.130837088816
absolute error = 1.900e-05
relative error = 0.0145 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
NO REAL POLE (three term test) for Equation 1
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.3372 1.105
h = 0.003 0.006
y[1] (numeric) = -0.00704230857041 0.131181357273
y[1] (closed_form) = -0.00704924233536 0.131198661395
absolute error = 1.864e-05
relative error = 0.01419 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
NO REAL POLE (three term test) for Equation 1
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.3402 1.111
h = 0.0001 0.005
y[1] (numeric) = -0.00776054527881 0.132185486796
y[1] (closed_form) = -0.00776875909056 0.132204365204
absolute error = 2.059e-05
relative error = 0.01555 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
NO REAL POLE (three term test) for Equation 1
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.3403 1.116
h = 0.0001 0.003
y[1] (numeric) = -0.00857260395625 0.132632072166
y[1] (closed_form) = -0.00857981991431 0.132650085298
absolute error = 1.940e-05
relative error = 0.0146 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
NO REAL POLE (three term test) for Equation 1
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.3404 1.119
h = 0.001 0.001
y[1] (numeric) = -0.00905808414509 0.132904840873
y[1] (closed_form) = -0.00906484946581 0.132923107762
absolute error = 1.948e-05
relative error = 0.01462 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
NO REAL POLE (three term test) for Equation 1
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.3414 1.12
h = 0.001 0.003
y[1] (numeric) = -0.00913779267696 0.133155088221
y[1] (closed_form) = -0.00914429517408 0.133173404075
absolute error = 1.944e-05
relative error = 0.01456 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
NO REAL POLE (three term test) for Equation 1
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.3424 1.123
h = 0.0001 0.004
y[1] (numeric) = -0.00954763343056 0.133576645187
y[1] (closed_form) = -0.00955466773035 0.133594839286
absolute error = 1.951e-05
relative error = 0.01456 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
NO REAL POLE (three term test) for Equation 1
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.3425 1.127
h = 0.003 0.006
y[1] (numeric) = -0.0102022555286 0.133934308636
y[1] (closed_form) = -0.0102094337583 0.133952060643
absolute error = 1.915e-05
relative error = 0.01425 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
NO REAL POLE (three term test) for Equation 1
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.3455 1.133
h = 0.0001 0.005
y[1] (numeric) = -0.0109463284602 0.134942449553
y[1] (closed_form) = -0.0109548080283 0.134961777903
absolute error = 2.111e-05
relative error = 0.01559 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
NO REAL POLE (three term test) for Equation 1
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.3456 1.138
h = 0.0001 0.003
y[1] (numeric) = -0.0117771222172 0.135383417251
y[1] (closed_form) = -0.0117845900851 0.135401881374
absolute error = 1.992e-05
relative error = 0.01465 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
NO REAL POLE (three term test) for Equation 1
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.3457 1.141
h = 0.001 0.001
y[1] (numeric) = -0.0122738908188 0.135652938753
y[1] (closed_form) = -0.0122809066014 0.13567166187
absolute error = 1.999e-05
relative error = 0.01468 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
NO REAL POLE (three term test) for Equation 1
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.3467 1.142
h = 0.001 0.003
y[1] (numeric) = -0.0123585329283 0.135905699747
y[1] (closed_form) = -0.0123652843045 0.135924474149
absolute error = 1.995e-05
relative error = 0.01462 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
NO REAL POLE (three term test) for Equation 1
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.3477 1.145
h = 0.0001 0.004
y[1] (numeric) = -0.0127807615247 0.136327354825
y[1] (closed_form) = -0.0127880477356 0.136346002615
absolute error = 2.002e-05
relative error = 0.01462 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
NO REAL POLE (three term test) for Equation 1
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.3478 1.149
h = 0.003 0.006
y[1] (numeric) = -0.0134504236994 0.136680527369
y[1] (closed_form) = -0.0134578516273 0.136698728726
absolute error = 1.966e-05
relative error = 0.01431 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
NO REAL POLE (three term test) for Equation 1
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.3508 1.155
h = 0.0001 0.005
y[1] (numeric) = -0.0142205542086 0.137692516811
y[1] (closed_form) = -0.0142293047665 0.137712296568
absolute error = 2.163e-05
relative error = 0.01562 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
NO REAL POLE (three term test) for Equation 1
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.3509 1.16
h = 0.0001 0.003
y[1] (numeric) = -0.0150701799724 0.138127686338
y[1] (closed_form) = -0.0150779049836 0.138146602917
absolute error = 2.043e-05
relative error = 0.0147 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
NO REAL POLE (three term test) for Equation 1
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.351 1.163
h = 0.001 0.001
y[1] (numeric) = -0.0155782966022 0.138393853082
y[1] (closed_form) = -0.01558556808 0.138413033893
absolute error = 2.051e-05
relative error = 0.01473 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
NO REAL POLE (three term test) for Equation 1
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.352 1.164
h = 0.001 0.003
y[1] (numeric) = -0.015667927418 0.138649109906
y[1] (closed_form) = -0.0156749329067 0.13866834432
absolute error = 2.047e-05
relative error = 0.01467 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
NO REAL POLE (three term test) for Equation 1
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.353 1.167
h = 0.0001 0.004
y[1] (numeric) = -0.016102636298 0.139070772332
y[1] (closed_form) = -0.0161101796533 0.13908987528
absolute error = 2.054e-05
relative error = 0.01467 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
NO REAL POLE (three term test) for Equation 1
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.3531 1.171
h = 0.003 0.006
y[1] (numeric) = -0.0167874168207 0.139419309946
y[1] (closed_form) = -0.0167950996801 0.139437962119
absolute error = 2.017e-05
relative error = 0.01436 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
NO REAL POLE (three term test) for Equation 1
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.3561 1.177
h = 0.0001 0.005
y[1] (numeric) = -0.0175838262619 0.140434985043
y[1] (closed_form) = -0.0175928530429 0.140455217673
absolute error = 2.215e-05
relative error = 0.01565 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
NO REAL POLE (three term test) for Equation 1
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.3562 1.182
h = 0.0001 0.003
y[1] (numeric) = -0.0184523809599 0.140864175901
y[1] (closed_form) = -0.0184603683476 0.140883546403
absolute error = 2.095e-05
relative error = 0.01475 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
NO REAL POLE (three term test) for Equation 1
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.3563 1.185
h = 0.001 0.001
y[1] (numeric) = -0.0189719052329 0.141126880334
y[1] (closed_form) = -0.0189794376394 0.141146520306
absolute error = 2.103e-05
relative error = 0.01477 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
NO REAL POLE (three term test) for Equation 1
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.3573 1.186
h = 0.0001 0.004
y[1] (numeric) = -0.019066579884 0.141384615171
y[1] (closed_form) = -0.0190738447184 0.141404311064
absolute error = 2.099e-05
relative error = 0.01471 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
NO REAL POLE (three term test) for Equation 1
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.3574 1.19
h = 0.003 0.006
y[1] (numeric) = -0.0197637748603 0.141729231584
y[1] (closed_form) = -0.0197717812903 0.141748107909
absolute error = 2.050e-05
relative error = 0.01433 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
NO REAL POLE (three term test) for Equation 1
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.3604 1.196
h = 0.0001 0.005
y[1] (numeric) = -0.0205830228479 0.142747632129
y[1] (closed_form) = -0.0205923915511 0.142768090428
absolute error = 2.250e-05
relative error = 0.0156 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
NO REAL POLE (three term test) for Equation 1
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.3605 1.201
h = 0.0001 0.003
y[1] (numeric) = -0.0214678744145 0.143171305157
y[1] (closed_form) = -0.0214761918183 0.143190902397
absolute error = 2.129e-05
relative error = 0.0147 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
NO REAL POLE (three term test) for Equation 1
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.3606 1.204
h = 0.001 0.001
y[1] (numeric) = -0.0219972227586 0.14343080637
y[1] (closed_form) = -0.0220050839971 0.143450677604
absolute error = 2.137e-05
relative error = 0.01472 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
NO REAL POLE (three term test) for Equation 1
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.3616 1.205
h = 0.001 0.003
y[1] (numeric) = -0.0220963123497 0.143690598955
y[1] (closed_form) = -0.0221039046814 0.143710528125
absolute error = 2.133e-05
relative error = 0.01467 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
NO REAL POLE (three term test) for Equation 1
NO COMPLEX POLE (six term test) for Equation 1
memory used=298.3MB, alloc=40.3MB, time=4.09
x[1] = 0.3626 1.208
h = 0.0001 0.004
y[1] (numeric) = -0.0225544876953 0.144111882224
y[1] (closed_form) = -0.0225626234777 0.144131670857
absolute error = 2.140e-05
relative error = 0.01467 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
NO REAL POLE (three term test) for Equation 1
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.3627 1.212
h = 0.003 0.006
y[1] (numeric) = -0.0232675489965 0.144451229693
y[1] (closed_form) = -0.0232758201136 0.144470559499
absolute error = 2.103e-05
relative error = 0.01437 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
NO REAL POLE (three term test) for Equation 1
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.3657 1.218
h = 0.0001 0.005
y[1] (numeric) = -0.0241134858649 0.145473010196
y[1] (closed_form) = -0.0241231405468 0.145493924033
absolute error = 2.303e-05
relative error = 0.01562 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
NO REAL POLE (three term test) for Equation 1
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.3658 1.223
h = 0.0001 0.003
y[1] (numeric) = -0.0250174445745 0.145890367536
y[1] (closed_form) = -0.0250260341105 0.145910421362
absolute error = 2.182e-05
relative error = 0.01474 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
NO REAL POLE (three term test) for Equation 1
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.3659 1.226
h = 0.001 0.001
y[1] (numeric) = -0.025558310211 0.146146205596
y[1] (closed_form) = -0.0255664421336 0.146166538656
absolute error = 2.190e-05
relative error = 0.01476 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
NO REAL POLE (three term test) for Equation 1
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.3669 1.227
h = 0.001 0.003
y[1] (numeric) = -0.0256625460068 0.146408442384
y[1] (closed_form) = -0.0256704074399 0.146428835699
absolute error = 2.186e-05
relative error = 0.0147 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
NO REAL POLE (three term test) for Equation 1
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.3679 1.23
h = 0.0001 0.004
y[1] (numeric) = -0.0261334650064 0.146829472252
y[1] (closed_form) = -0.0261418729221 0.146849720172
absolute error = 2.192e-05
relative error = 0.0147 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
NO REAL POLE (three term test) for Equation 1
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.368 1.234
h = 0.003 0.006
y[1] (numeric) = -0.0268618668559 0.147163771834
y[1] (closed_form) = -0.0268704078933 0.147183556587
absolute error = 2.155e-05
relative error = 0.0144 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
NO REAL POLE (three term test) for Equation 1
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.371 1.24
h = 0.0001 0.005
y[1] (numeric) = -0.0277347139595 0.148188769427
y[1] (closed_form) = -0.0277446598533 0.148210140267
absolute error = 2.357e-05
relative error = 0.01563 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
NO REAL POLE (three term test) for Equation 1
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.3711 1.245
h = 0.0001 0.003
y[1] (numeric) = -0.0286578767395 0.148599630579
y[1] (closed_form) = -0.0286667436409 0.148620142458
absolute error = 2.235e-05
relative error = 0.01476 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
NO REAL POLE (three term test) for Equation 1
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.3712 1.248
h = 0.001 0.001
y[1] (numeric) = -0.0292103192835 0.148851697935
y[1] (closed_form) = -0.0292187271236 0.148872494285
absolute error = 2.243e-05
relative error = 0.01479 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
NO REAL POLE (three term test) for Equation 1
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.3722 1.249
h = 0.001 0.003
y[1] (numeric) = -0.029319756413 0.149116361109
y[1] (closed_form) = -0.0293278921807 0.149137220033
absolute error = 2.239e-05
relative error = 0.01473 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
NO REAL POLE (three term test) for Equation 1
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.3732 1.252
h = 0.0001 0.004
y[1] (numeric) = -0.0298035115074 0.149537046813
y[1] (closed_form) = -0.0298121967898 0.149557755486
absolute error = 2.246e-05
relative error = 0.01473 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
NO REAL POLE (three term test) for Equation 1
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.3733 1.256
h = 0.003 0.006
y[1] (numeric) = -0.0305473321763 0.149866154482
y[1] (closed_form) = -0.0305561483675 0.149886395647
absolute error = 2.208e-05
relative error = 0.01443 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
NO REAL POLE (three term test) for Equation 1
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.3763 1.262
h = 0.0001 0.005
y[1] (numeric) = -0.0314473108695 0.150894206296
y[1] (closed_form) = -0.0314575532087 0.150916035605
absolute error = 2.411e-05
relative error = 0.01564 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
NO REAL POLE (three term test) for Equation 1
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.3764 1.267
h = 0.0001 0.003
y[1] (numeric) = -0.0323897746471 0.151298390762
y[1] (closed_form) = -0.0323989241474 0.151319362159
absolute error = 2.288e-05
relative error = 0.01479 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
NO REAL POLE (three term test) for Equation 1
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.3765 1.27
h = 0.001 0.001
y[1] (numeric) = -0.032953853714 0.151546579861
y[1] (closed_form) = -0.032962542705 0.151567840967
absolute error = 2.297e-05
relative error = 0.01481 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
NO REAL POLE (three term test) for Equation 1
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.3775 1.271
h = 0.001 0.003
y[1] (numeric) = -0.0330685473059 0.151813651605
y[1] (closed_form) = -0.0330769626417 0.151834977603
absolute error = 2.293e-05
relative error = 0.01475 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
NO REAL POLE (three term test) for Equation 1
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.3785 1.274
h = 0.0001 0.004
y[1] (numeric) = -0.0335652309359 0.152233902382
y[1] (closed_form) = -0.0335741988183 0.152255073273
absolute error = 2.299e-05
relative error = 0.01475 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
NO REAL POLE (three term test) for Equation 1
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.3786 1.278
h = 0.003 0.006
y[1] (numeric) = -0.0343245486956 0.152557674113
y[1] (closed_form) = -0.0343336452739 0.152578373155
absolute error = 2.261e-05
relative error = 0.01446 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
NO REAL POLE (three term test) for Equation 1
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.3816 1.284
h = 0.0001 0.005
y[1] (numeric) = -0.0352518803328 0.153588617279
y[1] (closed_form) = -0.0352624243507 0.153610906522
absolute error = 2.466e-05
relative error = 0.01564 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
NO REAL POLE (three term test) for Equation 1
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.3817 1.289
h = 0.0001 0.003
y[1] (numeric) = -0.0362137420353 0.15398594456
y[1] (closed_form) = -0.0362231793678 0.154007376942
absolute error = 2.342e-05
relative error = 0.0148 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
NO REAL POLE (three term test) for Equation 1
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.3818 1.292
h = 0.001 0.001
y[1] (numeric) = -0.0367895172404 0.154230147849
y[1] (closed_form) = -0.0367984926156 0.154251875177
absolute error = 2.351e-05
relative error = 0.01482 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
NO REAL POLE (three term test) for Equation 1
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.3828 1.293
h = 0.0001 0.004
y[1] (numeric) = -0.0369095224235 0.154499610346
y[1] (closed_form) = -0.0369182225606 0.154521404885
absolute error = 2.347e-05
relative error = 0.01477 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
NO REAL POLE (three term test) for Equation 1
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.3829 1.297
h = 0.003 0.006
y[1] (numeric) = -0.0376815632796 0.154818886997
y[1] (closed_form) = -0.0376910032201 0.154839806857
absolute error = 2.295e-05
relative error = 0.0144 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
NO REAL POLE (three term test) for Equation 1
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.3859 1.303
h = 0.0001 0.005
y[1] (numeric) = -0.0386326484752 0.155851859106
y[1] (closed_form) = -0.0386435542069 0.155874370684
absolute error = 2.501e-05
relative error = 0.01558 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
NO REAL POLE (three term test) for Equation 1
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.386 1.308
h = 0.0001 0.003
y[1] (numeric) = -0.0396112002731 0.156242906775
y[1] (closed_form) = -0.0396209874133 0.15626456256
absolute error = 2.376e-05
relative error = 0.01474 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
NO REAL POLE (three term test) for Equation 1
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.3861 1.311
h = 0.001 0.001
y[1] (numeric) = -0.0401970416401 0.156483452796
y[1] (closed_form) = -0.0402063656389 0.156505408052
absolute error = 2.385e-05
relative error = 0.01476 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
NO REAL POLE (three term test) for Equation 1
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.3871 1.312
h = 0.001 0.003
y[1] (numeric) = -0.0403216911991 0.156754894741
y[1] (closed_form) = -0.0403307386252 0.156776919223
absolute error = 2.381e-05
relative error = 0.01471 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
NO REAL POLE (three term test) for Equation 1
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.3881 1.315
h = 0.0001 0.004
y[1] (numeric) = -0.0408426701187 0.157173938049
y[1] (closed_form) = -0.0408522756755 0.157195798353
absolute error = 2.388e-05
relative error = 0.0147 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
NO REAL POLE (three term test) for Equation 1
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.3882 1.319
h = 0.003 0.006
y[1] (numeric) = -0.0416309650585 0.157487210713
y[1] (closed_form) = -0.0416406951418 0.157508591116
absolute error = 2.349e-05
relative error = 0.01442 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
NO REAL POLE (three term test) for Equation 1
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.3912 1.325
h = 0.0001 0.005
y[1] (numeric) = -0.0426098131469 0.158522768477
y[1] (closed_form) = -0.042621030313 0.158545742653
absolute error = 2.557e-05
relative error = 0.01557 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
NO REAL POLE (three term test) for Equation 1
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.3913 1.33
h = 0.0001 0.003
y[1] (numeric) = -0.0436079410788 0.158906621941
y[1] (closed_form) = -0.0436180258067 0.158928741375
absolute error = 2.431e-05
relative error = 0.01475 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
NO REAL POLE (three term test) for Equation 1
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.3914 1.333
h = 0.001 0.001
y[1] (numeric) = -0.0442055882328 0.159142981311
y[1] (closed_form) = -0.0442152083714 0.159165405454
absolute error = 2.440e-05
relative error = 0.01477 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
NO REAL POLE (three term test) for Equation 1
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.3924 1.334
h = 0.001 0.003
y[1] (numeric) = -0.0443356517527 0.1594167802
y[1] (closed_form) = -0.0443449937357 0.159439275887
absolute error = 2.436e-05
relative error = 0.01472 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
NO REAL POLE (three term test) for Equation 1
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.3934 1.337
h = 0.0001 0.004
y[1] (numeric) = -0.0448698225783 0.159835127829
y[1] (closed_form) = -0.0448797257239 0.159857454482
absolute error = 2.442e-05
relative error = 0.01471 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
NO REAL POLE (three term test) for Equation 1
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.3935 1.341
h = 0.003 0.006
y[1] (numeric) = -0.0456738368091 0.1601426516
y[1] (closed_form) = -0.0456838622683 0.16016449401
absolute error = 2.403e-05
relative error = 0.01443 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
NO REAL POLE (three term test) for Equation 1
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.3965 1.347
h = 0.0001 0.005
y[1] (numeric) = -0.0466806691447 0.161180632148
y[1] (closed_form) = -0.0466922029783 0.16120407039
absolute error = 2.612e-05
relative error = 0.01556 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
NO REAL POLE (three term test) for Equation 1
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.3966 1.352
h = 0.0001 0.003
y[1] (numeric) = -0.0476984701377 0.16155711091
y[1] (closed_form) = -0.0477088576867 0.161579695458
absolute error = 2.486e-05
relative error = 0.01476 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
NO REAL POLE (three term test) for Equation 1
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.3967 1.355
h = 0.001 0.001
y[1] (numeric) = -0.0483079826942 0.161789176077
y[1] (closed_form) = -0.0483179042058 0.161812070571
absolute error = 2.495e-05
relative error = 0.01478 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
NO REAL POLE (three term test) for Equation 1
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.3977 1.356
h = 0.001 0.003
y[1] (numeric) = -0.0484435153036 0.162065314091
y[1] (closed_form) = -0.0484531570769 0.16208828245
absolute error = 2.491e-05
relative error = 0.01472 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
NO REAL POLE (three term test) for Equation 1
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.3987 1.359
h = 0.0001 0.004
y[1] (numeric) = -0.048990970476 0.162482875281
y[1] (closed_form) = -0.049001176444 0.162505669748
absolute error = 2.497e-05
relative error = 0.01471 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
NO REAL POLE (three term test) for Equation 1
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.3988 1.363
h = 0.003 0.006
y[1] (numeric) = -0.0498107822691 0.162784506131
y[1] (closed_form) = -0.0498211083377 0.162806812015
absolute error = 2.458e-05
relative error = 0.01444 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
NO REAL POLE (three term test) for Equation 1
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.4018 1.369
h = 0.0001 0.005
y[1] (numeric) = -0.0508458202063 0.163824746597
y[1] (closed_form) = -0.0508576759409 0.163848650369
absolute error = 2.668e-05
relative error = 0.01555 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
NO REAL POLE (three term test) for Equation 1
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.4019 1.374
h = 0.0001 0.003
y[1] (numeric) = -0.0518833911878 0.164193670158
y[1] (closed_form) = -0.0518940867912 0.164216721286
absolute error = 2.541e-05
relative error = 0.01476 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
NO REAL POLE (three term test) for Equation 1
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.402 1.377
h = 0.001 0.001
y[1] (numeric) = -0.0525048287619 0.164421333568
y[1] (closed_form) = -0.05251505688 0.16444469988
absolute error = 2.551e-05
relative error = 0.01478 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
NO REAL POLE (three term test) for Equation 1
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.403 1.378
h = 0.001 0.003
y[1] (numeric) = -0.0526458855898 0.164699792892
y[1] (closed_form) = -0.0526558323867 0.164723235387
absolute error = 2.547e-05
relative error = 0.01473 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
NO REAL POLE (three term test) for Equation 1
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.404 1.381
h = 0.0001 0.004
y[1] (numeric) = -0.0532067175498 0.165116476879
y[1] (closed_form) = -0.0532172315733 0.165139740627
absolute error = 2.553e-05
relative error = 0.01471 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
NO REAL POLE (three term test) for Equation 1
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.4041 1.385
h = 0.003 0.006
y[1] (numeric) = -0.0540424051764 0.165412070784
y[1] (closed_form) = -0.0540530370877 0.165434841607
absolute error = 2.513e-05
relative error = 0.01444 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
NO REAL POLE (three term test) for Equation 1
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.4071 1.391
h = 0.0001 0.005
y[1] (numeric) = -0.0551058700696 0.166454408298
y[1] (closed_form) = -0.0551180529385 0.166478779066
absolute error = 2.725e-05
relative error = 0.01554 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
NO REAL POLE (three term test) for Equation 1
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.4072 1.396
h = 0.0001 0.003
y[1] (numeric) = -0.0561633079668 0.166815596159
y[1] (closed_form) = -0.056174316858 0.166839115332
absolute error = 2.597e-05
relative error = 0.01475 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
NO REAL POLE (three term test) for Equation 1
NO COMPLEX POLE (six term test) for Equation 1
memory used=347.2MB, alloc=40.3MB, time=4.78
x[1] = 0.4073 1.399
h = 0.001 0.001
y[1] (numeric) = -0.0567967301739 0.16703875026
y[1] (closed_form) = -0.0568072701318 0.167062589855
absolute error = 2.607e-05
relative error = 0.01477 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
NO REAL POLE (three term test) for Equation 1
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.4083 1.4
h = 0.003 0.006
y[1] (numeric) = -0.0569433663489 0.167319513077
y[1] (closed_form) = -0.0569536234028 0.167343431173
absolute error = 2.602e-05
relative error = 0.01472 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
NO REAL POLE (three term test) for Equation 1
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.4113 1.406
h = 0.0001 0.005
y[1] (numeric) = -0.0580246840381 0.168364807078
y[1] (closed_form) = -0.05803828886 0.168389441339
absolute error = 2.814e-05
relative error = 0.0158 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
NO REAL POLE (three term test) for Equation 1
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.4114 1.411
h = 0.0001 0.003
y[1] (numeric) = -0.0590960446358 0.16872107229
y[1] (closed_form) = -0.0591084659287 0.168744855329
absolute error = 2.683e-05
relative error = 0.01501 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
NO REAL POLE (three term test) for Equation 1
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.4115 1.414
h = 0.001 0.001
y[1] (numeric) = -0.0597378623167 0.168941365779
y[1] (closed_form) = -0.0597498135483 0.168965472807
absolute error = 2.691e-05
relative error = 0.01501 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
NO REAL POLE (three term test) for Equation 1
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.4125 1.415
h = 0.001 0.003
y[1] (numeric) = -0.0598883109446 0.169223844999
y[1] (closed_form) = -0.059899978125 0.169248032083
absolute error = 2.685e-05
relative error = 0.01496 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
NO REAL POLE (three term test) for Equation 1
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.4135 1.418
h = 0.0001 0.004
y[1] (numeric) = -0.0604719581746 0.169639184576
y[1] (closed_form) = -0.0604841978217 0.169663184793
absolute error = 2.694e-05
relative error = 0.01496 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
NO REAL POLE (three term test) for Equation 1
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.4136 1.422
h = 0.003 0.006
y[1] (numeric) = -0.0613347799542 0.169924666375
y[1] (closed_form) = -0.0613471338633 0.169948166285
absolute error = 2.655e-05
relative error = 0.01469 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
NO REAL POLE (three term test) for Equation 1
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.4166 1.428
h = 0.0001 0.005
y[1] (numeric) = -0.0624466845394 0.170970902365
y[1] (closed_form) = -0.0624606252921 0.170996006227
absolute error = 2.871e-05
relative error = 0.01577 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
NO REAL POLE (three term test) for Equation 1
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.4167 1.433
h = 0.0001 0.003
y[1] (numeric) = -0.063538080202 0.171319129658
y[1] (closed_form) = -0.0635508235792 0.171343383348
absolute error = 2.740e-05
relative error = 0.01499 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
NO REAL POLE (three term test) for Equation 1
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.4168 1.436
h = 0.001 0.001
y[1] (numeric) = -0.0641919858491 0.171534733803
y[1] (closed_form) = -0.0642042577169 0.171559316719
absolute error = 2.748e-05
relative error = 0.015 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
NO REAL POLE (three term test) for Equation 1
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.4178 1.437
h = 0.001 0.003
y[1] (numeric) = -0.0643481073241 0.171819487832
y[1] (closed_form) = -0.064360093558 0.171844153123
absolute error = 2.742e-05
relative error = 0.01494 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
NO REAL POLE (three term test) for Equation 1
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.4188 1.44
h = 0.0001 0.004
y[1] (numeric) = -0.0649453820985 0.172233708575
y[1] (closed_form) = -0.064957943831 0.172258182144
absolute error = 2.751e-05
relative error = 0.01494 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
NO REAL POLE (three term test) for Equation 1
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.4189 1.444
h = 0.003 0.006
y[1] (numeric) = -0.0658242937242 0.172512768277
y[1] (closed_form) = -0.0658369675057 0.172536737196
absolute error = 2.711e-05
relative error = 0.01468 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
NO REAL POLE (three term test) for Equation 1
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.4219 1.45
h = 0.0001 0.005
y[1] (numeric) = -0.0669652243438 0.173560669117
y[1] (closed_form) = -0.0669795062605 0.173586244047
absolute error = 2.929e-05
relative error = 0.01574 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
NO REAL POLE (three term test) for Equation 1
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.422 1.455
h = 0.0001 0.003
y[1] (numeric) = -0.0680767519986 0.173900677993
y[1] (closed_form) = -0.0680898226933 0.1739254038
absolute error = 2.797e-05
relative error = 0.01497 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
NO REAL POLE (three term test) for Equation 1
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.4221 1.458
h = 0.001 0.001
y[1] (numeric) = -0.0687428052271 0.174111485241
y[1] (closed_form) = -0.0687554029645 0.174136545511
absolute error = 2.805e-05
relative error = 0.01498 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
NO REAL POLE (three term test) for Equation 1
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.4231 1.459
h = 0.001 0.003
y[1] (numeric) = -0.0689046546782 0.174398496262
y[1] (closed_form) = -0.0689169651988 0.174423641226
absolute error = 2.800e-05
relative error = 0.01493 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
NO REAL POLE (three term test) for Equation 1
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.4241 1.462
h = 0.0001 0.004
y[1] (numeric) = -0.0695156494378 0.174811507409
y[1] (closed_form) = -0.0695285384891 0.174836455795
absolute error = 2.808e-05
relative error = 0.01492 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
NO REAL POLE (three term test) for Equation 1
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.4242 1.466
h = 0.003 0.006
y[1] (numeric) = -0.0704107291808 0.175084000987
y[1] (closed_form) = -0.0704237280682 0.175108440383
absolute error = 2.768e-05
relative error = 0.01467 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
NO REAL POLE (three term test) for Equation 1
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.4272 1.472
h = 0.0001 0.005
y[1] (numeric) = -0.0715809071892 0.17613340381
y[1] (closed_form) = -0.0715955355034 0.176159451273
absolute error = 2.987e-05
relative error = 0.01571 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
NO REAL POLE (three term test) for Equation 1
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.4273 1.477
h = 0.0001 0.003
y[1] (numeric) = -0.0727126637635 0.17646501377
y[1] (closed_form) = -0.0727260670091 0.17649021316
absolute error = 2.854e-05
relative error = 0.01495 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
NO REAL POLE (three term test) for Equation 1
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.4274 1.48
h = 0.001 0.001
y[1] (numeric) = -0.0733909241887 0.176670916568
y[1] (closed_form) = -0.073403853029 0.176696455659
absolute error = 2.863e-05
relative error = 0.01496 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
NO REAL POLE (three term test) for Equation 1
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.4284 1.481
h = 0.0001 0.004
y[1] (numeric) = -0.0735585567446 0.176960166764
y[1] (closed_form) = -0.0735711967853 0.176985792868
absolute error = 2.857e-05
relative error = 0.01491 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
NO REAL POLE (three term test) for Equation 1
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.4285 1.485
h = 0.003 0.006
y[1] (numeric) = -0.0744669064314 0.177227158161
y[1] (closed_form) = -0.0744802835117 0.17725181265
absolute error = 2.805e-05
relative error = 0.01459 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
NO REAL POLE (three term test) for Equation 1
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.4315 1.491
h = 0.0001 0.005
y[1] (numeric) = -0.075662452123 0.178277371438
y[1] (closed_form) = -0.0756774769817 0.17830363551
absolute error = 3.026e-05
relative error = 0.01562 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
NO REAL POLE (three term test) for Equation 1
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.4316 1.496
h = 0.0001 0.003
y[1] (numeric) = -0.07681159572 0.178601364816
y[1] (closed_form) = -0.0768253836041 0.178626781884
absolute error = 2.892e-05
relative error = 0.01487 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
NO REAL POLE (three term test) for Equation 1
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.4317 1.499
h = 0.001 0.001
y[1] (numeric) = -0.0775003512664 0.178802813523
y[1] (closed_form) = -0.0775136635612 0.178828574818
absolute error = 2.900e-05
relative error = 0.01488 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
NO REAL POLE (three term test) for Equation 1
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.4327 1.5
h = 0.001 0.003
y[1] (numeric) = -0.0776730322559 0.179093907078
y[1] (closed_form) = -0.0776860544162 0.1791197574
absolute error = 2.895e-05
relative error = 0.01483 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
NO REAL POLE (three term test) for Equation 1
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.4337 1.503
h = 0.0001 0.004
y[1] (numeric) = -0.0783097857803 0.179504259851
y[1] (closed_form) = -0.0783233920553 0.179529904523
absolute error = 2.903e-05
relative error = 0.01482 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
NO REAL POLE (three term test) for Equation 1
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.4338 1.507
h = 0.003 0.006
y[1] (numeric) = -0.0792350766734 0.17976395728
y[1] (closed_form) = -0.079248788615 0.17978908491
absolute error = 2.863e-05
relative error = 0.01457 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
NO REAL POLE (three term test) for Equation 1
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.4368 1.513
h = 0.0001 0.005
y[1] (numeric) = -0.0804602797026 0.180815366842
y[1] (closed_form) = -0.0804756607142 0.180842106111
absolute error = 3.085e-05
relative error = 0.01558 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
NO REAL POLE (three term test) for Equation 1
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.4369 1.518
h = 0.0001 0.003
y[1] (numeric) = -0.081629830428 0.181130624284
y[1] (closed_form) = -0.0816439606185 0.181156517599
absolute error = 2.950e-05
relative error = 0.01485 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
NO REAL POLE (three term test) for Equation 1
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.437 1.521
h = 0.001 0.001
y[1] (numeric) = -0.0823309028202 0.181326967701
y[1] (closed_form) = -0.0823445559733 0.18135321048
absolute error = 2.958e-05
relative error = 0.01485 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
NO REAL POLE (three term test) for Equation 1
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.438 1.522
h = 0.001 0.003
y[1] (numeric) = -0.082509469284 0.181620266621
y[1] (closed_form) = -0.08252283072 0.181646600747
absolute error = 2.953e-05
relative error = 0.0148 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
NO REAL POLE (three term test) for Equation 1
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.439 1.525
h = 0.0001 0.004
y[1] (numeric) = -0.083160206164 0.182029149048
y[1] (closed_form) = -0.0831741547467 0.182055272667
absolute error = 2.961e-05
relative error = 0.0148 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
NO REAL POLE (three term test) for Equation 1
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.4391 1.529
h = 0.003 0.006
y[1] (numeric) = -0.0841018873747 0.182281867397
y[1] (closed_form) = -0.0841159394111 0.182307469633
absolute error = 2.921e-05
relative error = 0.01455 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
NO REAL POLE (three term test) for Equation 1
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.4421 1.535
h = 0.0001 0.005
y[1] (numeric) = -0.0853569690959 0.183334310375
y[1] (closed_form) = -0.0853727114939 0.183361526307
absolute error = 3.144e-05
relative error = 0.01554 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
NO REAL POLE (three term test) for Equation 1
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.4422 1.54
h = 0.0001 0.003
y[1] (numeric) = -0.0865470238771 0.183640651383
y[1] (closed_form) = -0.0865615016074 0.183667022411
absolute error = 3.008e-05
relative error = 0.01482 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
NO REAL POLE (three term test) for Equation 1
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.4423 1.543
h = 0.001 0.001
y[1] (numeric) = -0.0872604727301 0.183831781956
y[1] (closed_form) = -0.0872744719751 0.183858507685
absolute error = 3.017e-05
relative error = 0.01482 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
NO REAL POLE (three term test) for Equation 1
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.4433 1.544
h = 0.001 0.003
y[1] (numeric) = -0.0874449797972 0.184127268425
y[1] (closed_form) = -0.0874586857422 0.18415408782
absolute error = 3.012e-05
relative error = 0.01477 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
NO REAL POLE (three term test) for Equation 1
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.4443 1.547
h = 0.0001 0.004
y[1] (numeric) = -0.0881097924736 0.184534589742
y[1] (closed_form) = -0.0881240885972 0.184561193775
absolute error = 3.020e-05
relative error = 0.01477 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
NO REAL POLE (three term test) for Equation 1
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.4444 1.551
h = 0.003 0.006
y[1] (numeric) = -0.0890679422731 0.184780184987
y[1] (closed_form) = -0.0890823396375 0.184806263294
absolute error = 2.979e-05
relative error = 0.01452 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
NO REAL POLE (three term test) for Equation 1
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.4474 1.557
h = 0.0001 0.005
y[1] (numeric) = -0.0903531240407 0.185833498511
y[1] (closed_form) = -0.0903692330583 0.185861192573
absolute error = 3.204e-05
relative error = 0.0155 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
NO REAL POLE (three term test) for Equation 1
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.4475 1.562
h = 0.0001 0.003
y[1] (numeric) = -0.0915637798049 0.186130742587
y[1] (closed_form) = -0.0915786103083 0.186157592793
absolute error = 3.067e-05
relative error = 0.01479 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
NO REAL POLE (three term test) for Equation 1
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.4476 1.565
h = 0.001 0.001
y[1] (numeric) = -0.0922896647342 0.186316552764
y[1] (closed_form) = -0.0923040153043 0.186343762909
absolute error = 3.076e-05
relative error = 0.01479 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
NO REAL POLE (three term test) for Equation 1
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.4486 1.566
h = 0.001 0.003
y[1] (numeric) = -0.0924801675333 0.186614208965
y[1] (closed_form) = -0.0924942232206 0.186641515094
absolute error = 3.071e-05
relative error = 0.01474 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
NO REAL POLE (three term test) for Equation 1
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.4496 1.569
h = 0.0001 0.004
y[1] (numeric) = -0.0931591484469 0.187019878411
y[1] (closed_form) = -0.0931737973449 0.187046964322
absolute error = 3.079e-05
relative error = 0.01474 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
NO REAL POLE (three term test) for Equation 1
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.4497 1.573
h = 0.003 0.006
y[1] (numeric) = -0.0941338451065 0.187258206524
y[1] (closed_form) = -0.0941485930324 0.187284762369
absolute error = 3.038e-05
relative error = 0.01449 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
NO REAL POLE (three term test) for Equation 1
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.4527 1.579
h = 0.0001 0.005
y[1] (numeric) = -0.0954493482749 0.188312227727
y[1] (closed_form) = -0.0954658291456 0.188340401383
absolute error = 3.264e-05
relative error = 0.01546 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
NO REAL POLE (three term test) for Equation 1
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.4528 1.584
h = 0.0001 0.003
y[1] (numeric) = -0.0966807019493 0.188600194372
y[1] (closed_form) = -0.0966958904593 0.188627525222
absolute error = 3.127e-05
relative error = 0.01475 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
NO REAL POLE (three term test) for Equation 1
NO COMPLEX POLE (six term test) for Equation 1
memory used=396.2MB, alloc=40.3MB, time=5.46
x[1] = 0.4529 1.587
h = 0.001 0.001
y[1] (numeric) = -0.0974190825702 0.1887805766
y[1] (closed_form) = -0.0974337896988 0.188808272627
absolute error = 3.136e-05
relative error = 0.01476 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
NO REAL POLE (three term test) for Equation 1
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.4539 1.588
h = 0.0001 0.004
y[1] (numeric) = -0.09761563623 0.189080384716
y[1] (closed_form) = -0.0976300468931 0.189108179046
absolute error = 3.131e-05
relative error = 0.01471 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
NO REAL POLE (three term test) for Equation 1
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.454 1.592
h = 0.003 0.006
y[1] (numeric) = -0.0986039114763 0.189312636769
y[1] (closed_form) = -0.0986190573867 0.189339404373
absolute error = 3.076e-05
relative error = 0.01441 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
NO REAL POLE (three term test) for Equation 1
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.457 1.598
h = 0.0001 0.005
y[1] (numeric) = -0.0999456973399 0.190366771922
y[1] (closed_form) = -0.0999625945467 0.190395158853
absolute error = 3.304e-05
relative error = 0.01536 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
NO REAL POLE (three term test) for Equation 1
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.4571 1.603
h = 0.0001 0.003
y[1] (numeric) = -0.101194831264 0.190646360202
y[1] (closed_form) = -0.101210424204 0.190673905396
absolute error = 3.165e-05
relative error = 0.01466 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
NO REAL POLE (three term test) for Equation 1
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.4572 1.606
h = 0.001 0.001
y[1] (numeric) = -0.101943949097 0.190821834292
y[1] (closed_form) = -0.101959059471 0.190849749188
absolute error = 3.174e-05
relative error = 0.01467 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
NO REAL POLE (three term test) for Equation 1
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.4582 1.607
h = 0.001 0.003
y[1] (numeric) = -0.102145780626 0.191123407466
y[1] (closed_form) = -0.1021605932 0.191151422681
absolute error = 3.169e-05
relative error = 0.01462 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
NO REAL POLE (three term test) for Equation 1
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.4592 1.61
h = 0.0001 0.004
y[1] (numeric) = -0.102851349129 0.191525590226
y[1] (closed_form) = -0.102866760497 0.191553376149
absolute error = 3.177e-05
relative error = 0.01461 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
NO REAL POLE (three term test) for Equation 1
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.4593 1.614
h = 0.003 0.006
y[1] (numeric) = -0.10385695334 0.191749813268
y[1] (closed_form) = -0.103872459567 0.191777061074
absolute error = 3.135e-05
relative error = 0.01437 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
NO REAL POLE (three term test) for Equation 1
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.4623 1.62
h = 0.0001 0.005
y[1] (numeric) = -0.105229470553 0.192804350402
y[1] (closed_form) = -0.105246749368 0.192833219592
absolute error = 3.365e-05
relative error = 0.01532 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
NO REAL POLE (three term test) for Equation 1
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.4624 1.625
h = 0.0001 0.003
y[1] (numeric) = -0.106499480596 0.193074324231
y[1] (closed_form) = -0.106515441298 0.193102352733
absolute error = 3.225e-05
relative error = 0.01463 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
NO REAL POLE (three term test) for Equation 1
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.4625 1.628
h = 0.001 0.001
y[1] (numeric) = -0.10726120377 0.193244169531
y[1] (closed_form) = -0.107276680458 0.193272572973
absolute error = 3.235e-05
relative error = 0.01463 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
NO REAL POLE (three term test) for Equation 1
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.4635 1.629
h = 0.001 0.003
y[1] (numeric) = -0.107469188529 0.193547860811
y[1] (closed_form) = -0.107484365835 0.19357636689
absolute error = 3.229e-05
relative error = 0.01459 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
NO REAL POLE (three term test) for Equation 1
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.4645 1.632
h = 0.0001 0.004
y[1] (numeric) = -0.108189188639 0.193948130947
y[1] (closed_form) = -0.108204967772 0.19397640288
absolute error = 3.238e-05
relative error = 0.01458 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
NO REAL POLE (three term test) for Equation 1
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.4646 1.636
h = 0.003 0.006
y[1] (numeric) = -0.109211561911 0.194164673903
y[1] (closed_form) = -0.109227433689 0.194192403377
absolute error = 3.195e-05
relative error = 0.01434 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
NO REAL POLE (three term test) for Equation 1
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.4676 1.642
h = 0.0001 0.005
y[1] (numeric) = -0.110615031828 0.195219450148
y[1] (closed_form) = -0.110632697486 0.195248803063
absolute error = 3.426e-05
relative error = 0.01527 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
NO REAL POLE (three term test) for Equation 1
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.4677 1.647
h = 0.0001 0.003
y[1] (numeric) = -0.111906014918 0.195479629028
y[1] (closed_form) = -0.111922348616 0.195508142305
absolute error = 3.286e-05
relative error = 0.01459 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
NO REAL POLE (three term test) for Equation 1
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.4678 1.65
h = 0.001 0.001
y[1] (numeric) = -0.112680403047 0.195643737985
y[1] (closed_form) = -0.112696251283 0.19567263144
absolute error = 3.295e-05
relative error = 0.01459 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
NO REAL POLE (three term test) for Equation 1
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.4688 1.651
h = 0.001 0.003
y[1] (numeric) = -0.112894596166 0.195949529554
y[1] (closed_form) = -0.112910143436 0.195978527964
absolute error = 3.290e-05
relative error = 0.01455 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
NO REAL POLE (three term test) for Equation 1
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.4698 1.654
h = 0.0001 0.004
y[1] (numeric) = -0.113629120325 0.196347796306
y[1] (closed_form) = -0.113645272453 0.196376555713
absolute error = 3.298e-05
relative error = 0.01454 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
NO REAL POLE (three term test) for Equation 1
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.4699 1.658
h = 0.003 0.006
y[1] (numeric) = -0.114668340928 0.196556515149
y[1] (closed_form) = -0.114684583489 0.196584727757
absolute error = 3.255e-05
relative error = 0.0143 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
NO REAL POLE (three term test) for Equation 1
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.4729 1.664
h = 0.0001 0.005
y[1] (numeric) = -0.116102984904 0.197611367637
y[1] (closed_form) = -0.116121042636 0.197641205743
absolute error = 3.488e-05
relative error = 0.01521 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
NO REAL POLE (three term test) for Equation 1
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.473 1.669
h = 0.0001 0.003
y[1] (numeric) = -0.117415037967 0.19786157107
y[1] (closed_form) = -0.117431749893 0.197890570587
absolute error = 3.347e-05
relative error = 0.01455 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
NO REAL POLE (three term test) for Equation 1
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.4731 1.672
h = 0.001 0.001
y[1] (numeric) = -0.118202150667 0.198019836131
y[1] (closed_form) = -0.118218375684 0.198049221063
absolute error = 3.357e-05
relative error = 0.01455 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
NO REAL POLE (three term test) for Equation 1
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.4741 1.673
h = 0.001 0.003
y[1] (numeric) = -0.118422607274 0.198327710172
y[1] (closed_form) = -0.118438529742 0.198357202379
absolute error = 3.352e-05
relative error = 0.01451 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
NO REAL POLE (three term test) for Equation 1
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.4751 1.676
h = 0.0001 0.004
y[1] (numeric) = -0.119171747922 0.198723882776
y[1] (closed_form) = -0.119188278281 0.198753131124
absolute error = 3.360e-05
relative error = 0.0145 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
NO REAL POLE (three term test) for Equation 1
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.4752 1.68
h = 0.003 0.006
y[1] (numeric) = -0.120227894128 0.198924633481
y[1] (closed_form) = -0.120244512707 0.198953330688
absolute error = 3.316e-05
relative error = 0.01427 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
NO REAL POLE (three term test) for Equation 1
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.4782 1.686
h = 0.0001 0.005
y[1] (numeric) = -0.121693933517 0.199979399344
y[1] (closed_form) = -0.121712388558 0.200009724106
absolute error = 3.550e-05
relative error = 0.01516 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
NO REAL POLE (three term test) for Equation 1
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.4783 1.691
h = 0.0001 0.003
y[1] (numeric) = -0.123027153481 0.20021944683
y[1] (closed_form) = -0.12304424887 0.200248934053
absolute error = 3.408e-05
relative error = 0.0145 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
NO REAL POLE (three term test) for Equation 1
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.4784 1.694
h = 0.001 0.001
y[1] (numeric) = -0.123827050368 0.200371760443
y[1] (closed_form) = -0.123843657399 0.200401638319
absolute error = 3.418e-05
relative error = 0.01451 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
NO REAL POLE (three term test) for Equation 1
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.4794 1.695
h = 0.0001 0.004
y[1] (numeric) = -0.124053825591 0.200681699139
y[1] (closed_form) = -0.124070128491 0.200711686608
absolute error = 3.413e-05
relative error = 0.01447 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
NO REAL POLE (three term test) for Equation 1
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.4795 1.699
h = 0.003 0.006
y[1] (numeric) = -0.125123859027 0.200875799905
y[1] (closed_form) = -0.125140895382 0.200904705537
absolute error = 3.355e-05
relative error = 0.01418 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
NO REAL POLE (three term test) for Equation 1
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.4825 1.705
h = 0.0001 0.005
y[1] (numeric) = -0.126617096123 0.201929983214
y[1] (closed_form) = -0.126635987292 0.201960517917
absolute error = 3.591e-05
relative error = 0.01506 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
NO REAL POLE (three term test) for Equation 1
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.4826 1.71
h = 0.0001 0.003
y[1] (numeric) = -0.127968489564 0.202160890552
y[1] (closed_form) = -0.127986009174 0.202190588784
absolute error = 3.448e-05
relative error = 0.01441 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
NO REAL POLE (three term test) for Equation 1
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.4827 1.713
h = 0.001 0.001
y[1] (numeric) = -0.128779365753 0.20230784198
y[1] (closed_form) = -0.128796395822 0.202337935391
absolute error = 3.458e-05
relative error = 0.01442 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
NO REAL POLE (three term test) for Equation 1
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.4837 1.714
h = 0.001 0.003
y[1] (numeric) = -0.129011648282 0.202619467435
y[1] (closed_form) = -0.129028372885 0.202649672453
absolute error = 3.453e-05
relative error = 0.01437 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
NO REAL POLE (three term test) for Equation 1
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.4847 1.717
h = 0.0001 0.004
y[1] (numeric) = -0.129788205343 0.20301132504
y[1] (closed_form) = -0.12980554342 0.203041277128
absolute error = 3.461e-05
relative error = 0.01436 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
NO REAL POLE (three term test) for Equation 1
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.4848 1.721
h = 0.003 0.006
y[1] (numeric) = -0.130875955502 0.203196661752
y[1] (closed_form) = -0.130893377629 0.203226054647
absolute error = 3.417e-05
relative error = 0.01413 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
NO REAL POLE (three term test) for Equation 1
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.4878 1.727
h = 0.0001 0.005
y[1] (numeric) = -0.13240099796 0.204250452737
y[1] (closed_form) = -0.132420296193 0.204281476761
absolute error = 3.654e-05
relative error = 0.01501 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
NO REAL POLE (three term test) for Equation 1
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.4879 1.732
h = 0.0001 0.003
y[1] (numeric) = -0.133773736511 0.204470867109
y[1] (closed_form) = -0.133791649338 0.204501055711
absolute error = 3.510e-05
relative error = 0.01436 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
NO REAL POLE (three term test) for Equation 1
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.488 1.735
h = 0.001 0.001
y[1] (numeric) = -0.134597506535 0.204611666248
y[1] (closed_form) = -0.134614928373 0.204642255267
absolute error = 3.520e-05
relative error = 0.01437 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
NO REAL POLE (three term test) for Equation 1
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.489 1.736
h = 0.001 0.003
y[1] (numeric) = -0.134836210051 0.204925322548
y[1] (closed_form) = -0.13485332484 0.204956025493
absolute error = 3.515e-05
relative error = 0.01433 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
NO REAL POLE (three term test) for Equation 1
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.49 1.739
h = 0.0001 0.004
y[1] (numeric) = -0.135627646971 0.205314825255
y[1] (closed_form) = -0.135645378267 0.205345270413
absolute error = 3.523e-05
relative error = 0.01432 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
NO REAL POLE (three term test) for Equation 1
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.4901 1.743
h = 0.003 0.006
y[1] (numeric) = -0.136732544934 0.205491780872
y[1] (closed_form) = -0.136750358067 0.205521662497
absolute error = 3.479e-05
relative error = 0.01409 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
NO REAL POLE (three term test) for Equation 1
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.4931 1.749
h = 0.0001 0.005
y[1] (numeric) = -0.138289614107 0.206545016666
y[1] (closed_form) = -0.138309324637 0.206576531476
absolute error = 3.717e-05
relative error = 0.01495 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
NO REAL POLE (three term test) for Equation 1
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.4932 1.754
h = 0.0001 0.003
y[1] (numeric) = -0.139683794695 0.206754757573
y[1] (closed_form) = -0.139702105974 0.206785438012
absolute error = 3.573e-05
relative error = 0.01432 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
NO REAL POLE (three term test) for Equation 1
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.4933 1.757
h = 0.001 0.001
y[1] (numeric) = -0.14052051817 0.20688929687
y[1] (closed_form) = -0.140538337012 0.206920382963
absolute error = 3.583e-05
relative error = 0.01432 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
NO REAL POLE (three term test) for Equation 1
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.4943 1.758
h = 0.001 0.003
y[1] (numeric) = -0.140765697801 0.207204966199
y[1] (closed_form) = -0.140783208011 0.207236168537
absolute error = 3.578e-05
relative error = 0.01428 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
NO REAL POLE (three term test) for Equation 1
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.4953 1.761
h = 0.0001 0.004
y[1] (numeric) = -0.141572107022 0.207592023245
y[1] (closed_form) = -0.14159023677 0.20762296294
absolute error = 3.586e-05
relative error = 0.01427 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
NO REAL POLE (three term test) for Equation 1
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.4954 1.765
h = 0.003 0.006
y[1] (numeric) = -0.142694231059 0.207760453743
y[1] (closed_form) = -0.142712440431 0.207790825563
absolute error = 3.541e-05
relative error = 0.01405 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
NO REAL POLE (three term test) for Equation 1
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.4984 1.771
h = 0.0001 0.005
y[1] (numeric) = -0.144283548302 0.208812971475
y[1] (closed_form) = -0.144303676364 0.208844978537
absolute error = 3.781e-05
relative error = 0.01489 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
NO REAL POLE (three term test) for Equation 1
NO COMPLEX POLE (six term test) for Equation 1
memory used=445.2MB, alloc=40.3MB, time=6.13
x[1] = 0.4985 1.776
h = 0.0001 0.003
y[1] (numeric) = -0.145699267855 0.20901185842
y[1] (closed_form) = -0.145717982818 0.20904303216
absolute error = 3.636e-05
relative error = 0.01427 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
NO REAL POLE (three term test) for Equation 1
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.4986 1.779
h = 0.001 0.001
y[1] (numeric) = -0.146549004396 0.209140030322
y[1] (closed_form) = -0.146567225474 0.209171614954
absolute error = 3.646e-05
relative error = 0.01428 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
NO REAL POLE (three term test) for Equation 1
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.4996 1.78
h = 0.001 0.003
y[1] (numeric) = -0.146800715271 0.209457694863
y[1] (closed_form) = -0.146818626134 0.209489398059
absolute error = 3.641e-05
relative error = 0.01423 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
NO REAL POLE (three term test) for Equation 1
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.5006 1.783
h = 0.0001 0.004
y[1] (numeric) = -0.147622189233 0.209842215485
y[1] (closed_form) = -0.147640722666 0.209873651182
absolute error = 3.649e-05
relative error = 0.01422 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
NO REAL POLE (three term test) for Equation 1
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.5007 1.787
h = 0.003 0.006
y[1] (numeric) = -0.148761617616 0.210001976838
y[1] (closed_form) = -0.148780228461 0.210032840319
absolute error = 3.604e-05
relative error = 0.014 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
NO REAL POLE (three term test) for Equation 1
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.5037 1.793
h = 0.0001 0.005
y[1] (numeric) = -0.150383404284 0.211053613641
y[1] (closed_form) = -0.15040395511 0.21108611442
absolute error = 3.845e-05
relative error = 0.01484 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
NO REAL POLE (three term test) for Equation 1
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.5038 1.798
h = 0.0001 0.003
y[1] (numeric) = -0.151820759729 0.211241466124
y[1] (closed_form) = -0.15183988361 0.211273134631
absolute error = 3.699e-05
relative error = 0.01422 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
NO REAL POLE (three term test) for Equation 1
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.5039 1.801
h = 0.001 0.001
y[1] (numeric) = -0.152683568951 0.211363163079
y[1] (closed_form) = -0.152702197498 0.211395247715
absolute error = 3.710e-05
relative error = 0.01423 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
NO REAL POLE (three term test) for Equation 1
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.5049 1.802
h = 0.0001 0.004
y[1] (numeric) = -0.152941866199 0.211682805015
y[1] (closed_form) = -0.152960182949 0.211715010534
absolute error = 3.705e-05
relative error = 0.01419 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
NO REAL POLE (three term test) for Equation 1
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.505 1.806
h = 0.003 0.006
y[1] (numeric) = -0.154095490454 0.211835342549
y[1] (closed_form) = -0.154114538867 0.21186641112
absolute error = 3.644e-05
relative error = 0.01391 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
NO REAL POLE (three term test) for Equation 1
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.508 1.812
h = 0.0001 0.005
y[1] (numeric) = -0.155745389842 0.212885700294
y[1] (closed_form) = -0.155766396587 0.21291840768
absolute error = 3.887e-05
relative error = 0.01473 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
NO REAL POLE (three term test) for Equation 1
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.5081 1.817
h = 0.0001 0.003
y[1] (numeric) = -0.15720131199 0.213063650846
y[1] (closed_form) = -0.157220879883 0.213095527028
absolute error = 3.740e-05
relative error = 0.01412 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
NO REAL POLE (three term test) for Equation 1
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.5082 1.82
h = 0.001 0.001
y[1] (numeric) = -0.158075342605 0.213179531569
y[1] (closed_form) = -0.158094413982 0.213211828405
absolute error = 3.751e-05
relative error = 0.01413 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
NO REAL POLE (three term test) for Equation 1
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.5092 1.821
h = 0.001 0.003
y[1] (numeric) = -0.158339376595 0.213500781963
y[1] (closed_form) = -0.158358134839 0.213533201698
absolute error = 3.746e-05
relative error = 0.01409 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
NO REAL POLE (three term test) for Equation 1
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.5102 1.824
h = 0.0001 0.004
y[1] (numeric) = -0.159189095793 0.213880159275
y[1] (closed_form) = -0.159208482192 0.213912302438
absolute error = 3.754e-05
relative error = 0.01408 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
NO REAL POLE (three term test) for Equation 1
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.5103 1.828
h = 0.003 0.006
y[1] (numeric) = -0.160360824531 0.214023197711
y[1] (closed_form) = -0.160380284172 0.214054760607
absolute error = 3.708e-05
relative error = 0.01386 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
NO REAL POLE (three term test) for Equation 1
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.5133 1.834
h = 0.0001 0.005
y[1] (numeric) = -0.162043603292 0.215072368829
y[1] (closed_form) = -0.162065042557 0.215105572597
absolute error = 3.952e-05
relative error = 0.01468 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
NO REAL POLE (three term test) for Equation 1
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.5134 1.839
h = 0.0001 0.003
y[1] (numeric) = -0.163521339541 0.2152389479
y[1] (closed_form) = -0.163541326108 0.215271321514
absolute error = 3.805e-05
relative error = 0.01407 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
NO REAL POLE (three term test) for Equation 1
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.5135 1.842
h = 0.001 0.001
y[1] (numeric) = -0.164408552487 0.215348152834
y[1] (closed_form) = -0.164428041088 0.21538095234
absolute error = 3.815e-05
relative error = 0.01408 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
NO REAL POLE (three term test) for Equation 1
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.5145 1.843
h = 0.001 0.003
y[1] (numeric) = -0.164679275218 0.215671346814
y[1] (closed_form) = -0.164698449105 0.215704271537
absolute error = 3.810e-05
relative error = 0.01404 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
NO REAL POLE (three term test) for Equation 1
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.5155 1.846
h = 0.0001 0.004
y[1] (numeric) = -0.165544322528 0.216047926951
y[1] (closed_form) = -0.165564127602 0.216080570247
absolute error = 3.818e-05
relative error = 0.01403 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
NO REAL POLE (three term test) for Equation 1
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.5156 1.85
h = 0.003 0.006
y[1] (numeric) = -0.166733577812 0.216181883286
y[1] (closed_form) = -0.166753453914 0.216213941973
absolute error = 3.772e-05
relative error = 0.01381 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
NO REAL POLE (three term test) for Equation 1
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.5186 1.856
h = 0.0001 0.005
y[1] (numeric) = -0.168449457301 0.217229704907
y[1] (closed_form) = -0.168471334319 0.217263406524
absolute error = 4.018e-05
relative error = 0.01461 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
NO REAL POLE (three term test) for Equation 1
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.5187 1.861
h = 0.0001 0.003
y[1] (numeric) = -0.169949104578 0.217384731999
y[1] (closed_form) = -0.169969515052 0.21741760451
absolute error = 3.869e-05
relative error = 0.01402 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
NO REAL POLE (three term test) for Equation 1
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.5188 1.864
h = 0.001 0.001
y[1] (numeric) = -0.170849559469 0.217487153592
y[1] (closed_form) = -0.17086947053 0.217520457233
absolute error = 3.880e-05
relative error = 0.01403 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
NO REAL POLE (three term test) for Equation 1
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.5198 1.865
h = 0.001 0.003
y[1] (numeric) = -0.171127026072 0.217812273341
y[1] (closed_form) = -0.171146620835 0.217845704517
absolute error = 3.875e-05
relative error = 0.01399 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
NO REAL POLE (three term test) for Equation 1
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.5208 1.868
h = 0.0001 0.004
y[1] (numeric) = -0.172007493935 0.21818596554
y[1] (closed_form) = -0.172027722916 0.218219110434
absolute error = 3.883e-05
relative error = 0.01397 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
NO REAL POLE (three term test) for Equation 1
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.5209 1.872
h = 0.003 0.006
y[1] (numeric) = -0.173214354036 0.218310695749
y[1] (closed_form) = -0.173234651833 0.218343251693
absolute error = 3.837e-05
relative error = 0.01376 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
NO REAL POLE (three term test) for Equation 1
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.5239 1.878
h = 0.0001 0.005
y[1] (numeric) = -0.174963555607 0.219357005005
y[1] (closed_form) = -0.174985875612 0.219391205935
absolute error = 4.084e-05
relative error = 0.01455 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
NO REAL POLE (three term test) for Equation 1
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.524 1.883
h = 0.0001 0.003
y[1] (numeric) = -0.17648521084 0.219500299619
y[1] (closed_form) = -0.176506050453 0.219533672493
absolute error = 3.935e-05
relative error = 0.01397 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
NO REAL POLE (three term test) for Equation 1
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.5241 1.886
h = 0.001 0.001
y[1] (numeric) = -0.177398967291 0.219595830317
y[1] (closed_form) = -0.177419306044 0.21962963956
absolute error = 3.946e-05
relative error = 0.01397 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
NO REAL POLE (three term test) for Equation 1
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.5251 1.887
h = 0.001 0.003
y[1] (numeric) = -0.177683232894 0.219922858018
y[1] (closed_form) = -0.177703253766 0.219956797115
absolute error = 3.940e-05
relative error = 0.01394 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
NO REAL POLE (three term test) for Equation 1
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.5261 1.89
h = 0.0001 0.004
y[1] (numeric) = -0.17857921375 0.220293571518
y[1] (closed_form) = -0.178599871872 0.220327219476
absolute error = 3.948e-05
relative error = 0.01392 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
NO REAL POLE (three term test) for Equation 1
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.5262 1.894
h = 0.003 0.006
y[1] (numeric) = -0.179803756939 0.220408931574
y[1] (closed_form) = -0.179824481665 0.220441986241
absolute error = 3.901e-05
relative error = 0.01371 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
NO REAL POLE (three term test) for Equation 1
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.5292 1.9
h = 0.0001 0.005
y[1] (numeric) = -0.181586501948 0.221453565598
y[1] (closed_form) = -0.181609270172 0.221488267307
absolute error = 4.150e-05
relative error = 0.01449 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
NO REAL POLE (three term test) for Equation 1
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.5293 1.905
h = 0.0001 0.003
y[1] (numeric) = -0.183130262063 0.221584947234
y[1] (closed_form) = -0.18315153605 0.221618821938
absolute error = 4.000e-05
relative error = 0.01391 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
NO REAL POLE (three term test) for Equation 1
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.5294 1.908
h = 0.001 0.001
y[1] (numeric) = -0.184057379691 0.221673479487
y[1] (closed_form) = -0.184078151368 0.221707795795
absolute error = 4.011e-05
relative error = 0.01392 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
NO REAL POLE (three term test) for Equation 1
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.5304 1.909
h = 0.0001 0.004
y[1] (numeric) = -0.184348499422 0.222002397323
y[1] (closed_form) = -0.184368951636 0.222036845804
absolute error = 4.006e-05
relative error = 0.01388 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
NO REAL POLE (three term test) for Equation 1
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.5305 1.913
h = 0.003 0.006
y[1] (numeric) = -0.185587547127 0.222109959681
y[1] (closed_form) = -0.185608729212 0.222143216103
absolute error = 3.943e-05
relative error = 0.01362 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
NO REAL POLE (three term test) for Equation 1
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.5335 1.919
h = 0.0001 0.005
y[1] (numeric) = -0.187399319866 0.223152618142
y[1] (closed_form) = -0.187422563802 0.223187523123
absolute error = 4.194e-05
relative error = 0.01439 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
NO REAL POLE (three term test) for Equation 1
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.5336 1.924
h = 0.0001 0.003
y[1] (numeric) = -0.188962039911 0.223273336064
y[1] (closed_form) = -0.188983777703 0.223307415108
absolute error = 4.042e-05
relative error = 0.01382 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
NO REAL POLE (three term test) for Equation 1
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.5337 1.927
h = 0.001 0.001
y[1] (numeric) = -0.189900621023 0.223355598037
y[1] (closed_form) = -0.189921855322 0.223390123212
absolute error = 4.053e-05
relative error = 0.01382 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
NO REAL POLE (three term test) for Equation 1
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.5347 1.928
h = 0.001 0.003
y[1] (numeric) = -0.190197706933 0.223686046032
y[1] (closed_form) = -0.190218620433 0.223720705394
absolute error = 4.048e-05
relative error = 0.01378 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
NO REAL POLE (three term test) for Equation 1
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.5357 1.931
h = 0.0001 0.004
y[1] (numeric) = -0.191122761849 0.224050787909
y[1] (closed_form) = -0.191144318184 0.224085147061
absolute error = 4.056e-05
relative error = 0.01377 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
NO REAL POLE (three term test) for Equation 1
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.5358 1.935
h = 0.003 0.006
y[1] (numeric) = -0.192380301795 0.224148116127
y[1] (closed_form) = -0.192401920564 0.224181873936
absolute error = 4.009e-05
relative error = 0.01357 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
NO REAL POLE (three term test) for Equation 1
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.5388 1.941
h = 0.0001 0.005
y[1] (numeric) = -0.19422602792 0.225188793656
y[1] (closed_form) = -0.194249729831 0.225224202082
absolute error = 4.261e-05
relative error = 0.01433 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
NO REAL POLE (three term test) for Equation 1
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.5389 1.946
h = 0.0001 0.003
y[1] (numeric) = -0.195811031057 0.225297261582
y[1] (closed_form) = -0.195833212978 0.22533184512
absolute error = 4.109e-05
relative error = 0.01376 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
NO REAL POLE (three term test) for Equation 1
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.539 1.949
h = 0.001 0.001
y[1] (numeric) = -0.196763082994 0.225372324267
y[1] (closed_form) = -0.196784759973 0.225407359173
absolute error = 4.120e-05
relative error = 0.01377 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
NO REAL POLE (three term test) for Equation 1
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.54 1.95
h = 0.001 0.003
y[1] (numeric) = -0.197067125402 0.225704628587
y[1] (closed_form) = -0.19708848 0.2257398
absolute error = 4.115e-05
relative error = 0.01373 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
NO REAL POLE (three term test) for Equation 1
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.541 1.953
h = 0.0001 0.004
y[1] (numeric) = -0.198007956682 0.226066131014
y[1] (closed_form) = -0.198029957147 0.22610099736
absolute error = 4.123e-05
relative error = 0.01372 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
NO REAL POLE (three term test) for Equation 1
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.5411 1.957
h = 0.003 0.006
y[1] (numeric) = -0.199283401917 0.226153676123
y[1] (closed_form) = -0.199305462602 0.226187936785
absolute error = 4.075e-05
relative error = 0.01352 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
NO REAL POLE (three term test) for Equation 1
NO COMPLEX POLE (six term test) for Equation 1
memory used=494.0MB, alloc=44.3MB, time=6.81
x[1] = 0.5441 1.963
h = 0.0001 0.005
y[1] (numeric) = -0.201163302782 0.227192209853
y[1] (closed_form) = -0.201187467901 0.227228123188
absolute error = 4.329e-05
relative error = 0.01426 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
NO REAL POLE (three term test) for Equation 1
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.5442 1.968
h = 0.0001 0.003
y[1] (numeric) = -0.202770685937 0.227288247284
y[1] (closed_form) = -0.20279331722 0.227323336781
absolute error = 4.175e-05
relative error = 0.01371 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
NO REAL POLE (three term test) for Equation 1
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.5443 1.971
h = 0.001 0.001
y[1] (numeric) = -0.203736268314 0.227356003129
y[1] (closed_form) = -0.203758393208 0.227391549232
absolute error = 4.187e-05
relative error = 0.01371 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
NO REAL POLE (three term test) for Equation 1
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.5453 1.972
h = 0.001 0.003
y[1] (numeric) = -0.204047322349 0.227690145958
y[1] (closed_form) = -0.204069123279 0.227725830886
absolute error = 4.182e-05
relative error = 0.01368 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
NO REAL POLE (three term test) for Equation 1
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.5463 1.975
h = 0.0001 0.004
y[1] (numeric) = -0.205004022434 0.228048318171
y[1] (closed_form) = -0.205026472262 0.228083693177
absolute error = 4.190e-05
relative error = 0.01366 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
NO REAL POLE (three term test) for Equation 1
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.5464 1.979
h = 0.003 0.006
y[1] (numeric) = -0.206297451229 0.228125936147
y[1] (closed_form) = -0.206319959065 0.228160701127
absolute error = 4.142e-05
relative error = 0.01346 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
NO REAL POLE (three term test) for Equation 1
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.5494 1.985
h = 0.0001 0.005
y[1] (numeric) = -0.208211748188 0.229162163207
y[1] (closed_form) = -0.20823638175 0.229198582917
absolute error = 4.397e-05
relative error = 0.0142 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
NO REAL POLE (three term test) for Equation 1
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.5495 1.99
h = 0.0001 0.003
y[1] (numeric) = -0.20984160829 0.229245589645
y[1] (closed_form) = -0.209864694168 0.229281186567
absolute error = 4.243e-05
relative error = 0.01365 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
NO REAL POLE (three term test) for Equation 1
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.5496 1.993
h = 0.001 0.001
y[1] (numeric) = -0.210820780722 0.229305931097
y[1] (closed_form) = -0.210843358764 0.229341989862
absolute error = 4.254e-05
relative error = 0.01366 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
NO REAL POLE (three term test) for Equation 1
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.5506 1.994
h = 0.001 0.003
y[1] (numeric) = -0.211138901514 0.229641894618
y[1] (closed_form) = -0.211161154008 0.229678094527
absolute error = 4.249e-05
relative error = 0.01362 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
NO REAL POLE (three term test) for Equation 1
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.5516 1.997
h = 0.0001 0.004
y[1] (numeric) = -0.212111562843 0.229996645855
y[1] (closed_form) = -0.212134467268 0.230032530986
absolute error = 4.257e-05
relative error = 0.0136 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
NO REAL POLE (three term test) for Equation 1
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.5517 2.001
h = 0.003 0.006
y[1] (numeric) = -0.213423053469 0.230064192671
y[1] (closed_form) = -0.213446013689 0.230099463436
absolute error = 4.209e-05
relative error = 0.01341 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
NO REAL POLE (three term test) for Equation 1
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.5547 2.007
h = 0.0001 0.005
y[1] (numeric) = -0.215371967878 0.231097950194
y[1] (closed_form) = -0.215397075114 0.231134877745
absolute error = 4.465e-05
relative error = 0.01413 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
NO REAL POLE (three term test) for Equation 1
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.5548 2.012
h = 0.0001 0.003
y[1] (numeric) = -0.217024401853 0.23116858514
y[1] (closed_form) = -0.21704794756 0.231204690953
absolute error = 4.310e-05
relative error = 0.01359 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
NO REAL POLE (three term test) for Equation 1
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.5549 2.015
h = 0.001 0.001
y[1] (numeric) = -0.218017223956 0.231221404646
y[1] (closed_form) = -0.218040260378 0.231257977539
absolute error = 4.322e-05
relative error = 0.0136 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
NO REAL POLE (three term test) for Equation 1
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.5559 2.016
h = 0.0001 0.004
y[1] (numeric) = -0.218342466632 0.231559171042
y[1] (closed_form) = -0.218365175924 0.231595887398
absolute error = 4.317e-05
relative error = 0.01356 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
NO REAL POLE (three term test) for Equation 1
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.556 2.02
h = 0.003 0.006
y[1] (numeric) = -0.219668770416 0.231618346281
y[1] (closed_form) = -0.219692207787 0.231653815467
absolute error = 4.251e-05
relative error = 0.01332 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
NO REAL POLE (three term test) for Equation 1
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.559 2.026
h = 0.0001 0.005
y[1] (numeric) = -0.221647627567 0.232649431738
y[1] (closed_form) = -0.221673230307 0.232686559227
absolute error = 4.510e-05
relative error = 0.01403 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
NO REAL POLE (three term test) for Equation 1
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.5591 2.031
h = 0.0001 0.003
y[1] (numeric) = -0.223319414699 0.232708641186
y[1] (closed_form) = -0.223343444003 0.232744948004
absolute error = 4.354e-05
relative error = 0.0135 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
NO REAL POLE (three term test) for Equation 1
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.5592 2.034
h = 0.001 0.001
y[1] (numeric) = -0.224323942378 0.232754736365
y[1] (closed_form) = -0.224347461212 0.23279151479
absolute error = 4.366e-05
relative error = 0.0135 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
NO REAL POLE (three term test) for Equation 1
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.5602 2.035
h = 0.001 0.003
y[1] (numeric) = -0.224655380667 0.23309395462
y[1] (closed_form) = -0.224678571037 0.233130878523
absolute error = 4.360e-05
relative error = 0.01347 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
NO REAL POLE (three term test) for Equation 1
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.5612 2.038
h = 0.0001 0.004
y[1] (numeric) = -0.225657944882 0.233441905923
y[1] (closed_form) = -0.225681792766 0.233478505975
absolute error = 4.368e-05
relative error = 0.01345 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
NO REAL POLE (three term test) for Equation 1
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.5613 2.042
h = 0.003 0.006
y[1] (numeric) = -0.227003128666 0.233490111978
y[1] (closed_form) = -0.227027028176 0.233526089613
absolute error = 4.319e-05
relative error = 0.01326 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
NO REAL POLE (three term test) for Equation 1
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.5643 2.048
h = 0.0001 0.005
y[1] (numeric) = -0.229017013215 0.2345184222
y[1] (closed_form) = -0.229043099385 0.234556060194
absolute error = 4.579e-05
relative error = 0.01397 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
NO REAL POLE (three term test) for Equation 1
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.5644 2.053
h = 0.0001 0.003
y[1] (numeric) = -0.230711552429 0.234564503136
y[1] (closed_form) = -0.230736051318 0.23460132151
absolute error = 4.422e-05
relative error = 0.01344 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
NO REAL POLE (three term test) for Equation 1
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.5645 2.056
h = 0.001 0.001
y[1] (numeric) = -0.231729839427 0.234602875529
y[1] (closed_form) = -0.231753826398 0.234640170747
absolute error = 4.434e-05
relative error = 0.01345 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
NO REAL POLE (three term test) for Equation 1
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.5655 2.057
h = 0.001 0.003
y[1] (numeric) = -0.232068501971 0.234943862849
y[1] (closed_form) = -0.232092158895 0.234981305863
absolute error = 4.429e-05
relative error = 0.01341 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
NO REAL POLE (three term test) for Equation 1
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.5665 2.06
h = 0.0001 0.004
y[1] (numeric) = -0.233087290801 0.235288132426
y[1] (closed_form) = -0.233111608272 0.235325246733
absolute error = 4.437e-05
relative error = 0.0134 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
NO REAL POLE (three term test) for Equation 1
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.5666 2.064
h = 0.003 0.006
y[1] (numeric) = -0.234450758617 0.235325854365
y[1] (closed_form) = -0.2344751255 0.235362341914
absolute error = 4.388e-05
relative error = 0.01321 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
NO REAL POLE (three term test) for Equation 1
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.5696 2.07
h = 0.0001 0.005
y[1] (numeric) = -0.236499891918 0.236351226483
y[1] (closed_form) = -0.236526466753 0.236389376448
absolute error = 4.649e-05
relative error = 0.0139 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
NO REAL POLE (three term test) for Equation 1
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.5697 2.075
h = 0.0001 0.003
y[1] (numeric) = -0.238217280142 0.236383998409
y[1] (closed_form) = -0.238242253848 0.236421329803
absolute error = 4.491e-05
relative error = 0.01338 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
NO REAL POLE (three term test) for Equation 1
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.5698 2.078
h = 0.001 0.001
y[1] (numeric) = -0.239249386075 0.236414540462
y[1] (closed_form) = -0.239273846416 0.236452353938
absolute error = 4.504e-05
relative error = 0.01339 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
NO REAL POLE (three term test) for Equation 1
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.5708 2.079
h = 0.001 0.003
y[1] (numeric) = -0.239595328003 0.236757279031
y[1] (closed_form) = -0.239619456713 0.236795242622
absolute error = 4.498e-05
relative error = 0.01335 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
NO REAL POLE (three term test) for Equation 1
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.5718 2.082
h = 0.0001 0.004
y[1] (numeric) = -0.240630433889 0.237097776118
y[1] (closed_form) = -0.240655226178 0.237135406147
absolute error = 4.506e-05
relative error = 0.01334 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
NO REAL POLE (three term test) for Equation 1
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.5719 2.086
h = 0.003 0.006
y[1] (numeric) = -0.242012264007 0.237124869917
y[1] (closed_form) = -0.242037103497 0.237161868845
absolute error = 4.456e-05
relative error = 0.01315 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
NO REAL POLE (three term test) for Equation 1
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.5749 2.092
h = 0.0001 0.005
y[1] (numeric) = -0.244096867415 0.238147141061
y[1] (closed_form) = -0.244123936147 0.238185804463
absolute error = 4.720e-05
relative error = 0.01384 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
NO REAL POLE (three term test) for Equation 1
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.575 2.097
h = 0.0001 0.003
y[1] (numeric) = -0.245837201576 0.238166423479
y[1] (closed_form) = -0.245862655333 0.23820426936
absolute error = 4.561e-05
relative error = 0.01332 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
NO REAL POLE (three term test) for Equation 1
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.5751 2.1
h = 0.001 0.001
y[1] (numeric) = -0.24688318606 0.23818902764
y[1] (closed_form) = -0.246908125003 0.23822736084
absolute error = 4.573e-05
relative error = 0.01333 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
NO REAL POLE (three term test) for Equation 1
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.5761 2.101
h = 0.001 0.003
y[1] (numeric) = -0.247236462499 0.238533499641
y[1] (closed_form) = -0.24726106823 0.238571985275
absolute error = 4.568e-05
relative error = 0.01329 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
NO REAL POLE (three term test) for Equation 1
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.5771 2.104
h = 0.0001 0.004
y[1] (numeric) = -0.248287977882 0.238870133477
y[1] (closed_form) = -0.248313250224 0.238908280692
absolute error = 4.576e-05
relative error = 0.01328 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
NO REAL POLE (three term test) for Equation 1
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.5772 2.108
h = 0.003 0.006
y[1] (numeric) = -0.249688248575 0.238886455108
y[1] (closed_form) = -0.249713565903 0.238923966882
absolute error = 4.526e-05
relative error = 0.01309 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
NO REAL POLE (three term test) for Equation 1
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.5802 2.114
h = 0.0001 0.005
y[1] (numeric) = -0.251808543443 0.239905462411
y[1] (closed_form) = -0.251836111307 0.239944640716
absolute error = 4.791e-05
relative error = 0.01377 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
NO REAL POLE (three term test) for Equation 1
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.5803 2.119
h = 0.0001 0.003
y[1] (numeric) = -0.253571920469 0.239911074822
y[1] (closed_form) = -0.25359785951 0.239949436655
absolute error = 4.631e-05
relative error = 0.01326 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
NO REAL POLE (three term test) for Equation 1
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.5804 2.122
h = 0.001 0.001
y[1] (numeric) = -0.254631843117 0.239925633538
y[1] (closed_form) = -0.254657265898 0.239964487927
absolute error = 4.643e-05
relative error = 0.01327 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
NO REAL POLE (three term test) for Equation 1
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.5814 2.123
h = 0.0001 0.004
y[1] (numeric) = -0.254992509197 0.240271821154
y[1] (closed_form) = -0.255017597182 0.240310830297
absolute error = 4.638e-05
relative error = 0.01324 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
NO REAL POLE (three term test) for Equation 1
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.5815 2.127
h = 0.003 0.006
y[1] (numeric) = -0.256407901691 0.240279197329
y[1] (closed_form) = -0.256433715962 0.24031690419
absolute error = 4.570e-05
relative error = 0.013 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
NO REAL POLE (three term test) for Equation 1
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.5845 2.133
h = 0.0001 0.005
y[1] (numeric) = -0.258559054314 0.241294836062
y[1] (closed_form) = -0.258587137472 0.24133421097
absolute error = 4.836e-05
relative error = 0.01367 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
NO REAL POLE (three term test) for Equation 1
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.5846 2.138
h = 0.0001 0.003
y[1] (numeric) = -0.260342177723 0.241288261192
y[1] (closed_form) = -0.260368620153 0.241326820697
absolute error = 4.676e-05
relative error = 0.01317 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
NO REAL POLE (three term test) for Equation 1
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.5847 2.141
h = 0.001 0.001
y[1] (numeric) = -0.261414048038 0.241295641534
y[1] (closed_form) = -0.261439973022 0.241334698121
absolute error = 4.688e-05
relative error = 0.01318 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
NO REAL POLE (three term test) for Equation 1
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.5857 2.142
h = 0.001 0.003
y[1] (numeric) = -0.261781139167 0.241643202708
y[1] (closed_form) = -0.261806728021 0.241682416063
absolute error = 4.682e-05
relative error = 0.01314 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
NO REAL POLE (three term test) for Equation 1
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.5867 2.145
h = 0.0001 0.004
y[1] (numeric) = -0.26286338626 0.241972208298
y[1] (closed_form) = -0.262889647308 0.242011074162
absolute error = 4.691e-05
relative error = 0.01313 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
NO REAL POLE (three term test) for Equation 1
NO COMPLEX POLE (six term test) for Equation 1
memory used=543.0MB, alloc=44.3MB, time=7.47
x[1] = 0.5868 2.149
h = 0.003 0.006
y[1] (numeric) = -0.264298046512 0.241967880246
y[1] (closed_form) = -0.264324348378 0.242006102617
absolute error = 4.640e-05
relative error = 0.01295 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
NO REAL POLE (three term test) for Equation 1
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.5898 2.155
h = 0.0001 0.005
y[1] (numeric) = -0.266485300545 0.24297994944
y[1] (closed_form) = -0.266513892589 0.243019841915
absolute error = 4.908e-05
relative error = 0.01361 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
NO REAL POLE (three term test) for Equation 1
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.5899 2.16
h = 0.0001 0.003
y[1] (numeric) = -0.268291645028 0.242959367543
y[1] (closed_form) = -0.268318582497 0.242998445664
absolute error = 4.746e-05
relative error = 0.01311 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
NO REAL POLE (three term test) for Equation 1
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.59 2.163
h = 0.001 0.001
y[1] (numeric) = -0.269377563157 0.242958501599
y[1] (closed_form) = -0.269403981733 0.24299808204
absolute error = 4.759e-05
relative error = 0.01312 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
NO REAL POLE (three term test) for Equation 1
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.591 2.164
h = 0.001 0.003
y[1] (numeric) = -0.269752146297 0.243307744579
y[1] (closed_form) = -0.26977822716 0.243347484107
absolute error = 4.753e-05
relative error = 0.01308 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
NO REAL POLE (three term test) for Equation 1
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.592 2.167
h = 0.0001 0.004
y[1] (numeric) = -0.270851066257 0.243632626165
y[1] (closed_form) = -0.270877822347 0.243672013347
absolute error = 4.762e-05
relative error = 0.01307 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
NO REAL POLE (three term test) for Equation 1
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.5921 2.171
h = 0.003 0.006
y[1] (numeric) = -0.272304389283 0.243617112991
y[1] (closed_form) = -0.272331183978 0.243655852338
absolute error = 4.710e-05
relative error = 0.01289 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
NO REAL POLE (three term test) for Equation 1
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.5951 2.177
h = 0.0001 0.005
y[1] (numeric) = -0.274527966081 0.244625449776
y[1] (closed_form) = -0.274557072245 0.244665861284
absolute error = 4.980e-05
relative error = 0.01354 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
NO REAL POLE (three term test) for Equation 1
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.5952 2.182
h = 0.0001 0.003
y[1] (numeric) = -0.276357628563 0.244590680354
y[1] (closed_form) = -0.276385066307 0.244630278558
absolute error = 4.818e-05
relative error = 0.01305 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
NO REAL POLE (three term test) for Equation 1
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.5953 2.185
h = 0.001 0.001
y[1] (numeric) = -0.277457654123 0.244581460571
y[1] (closed_form) = -0.277484571524 0.244621566333
absolute error = 4.830e-05
relative error = 0.01306 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
NO REAL POLE (three term test) for Equation 1
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.5963 2.186
h = 0.001 0.003
y[1] (numeric) = -0.277839784402 0.24493236754
y[1] (closed_form) = -0.277866362507 0.244972634707
absolute error = 4.825e-05
relative error = 0.01302 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
NO REAL POLE (three term test) for Equation 1
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.5973 2.189
h = 0.0001 0.004
y[1] (numeric) = -0.27895546967 0.245253034362
y[1] (closed_form) = -0.278982726034 0.245292944326
absolute error = 4.833e-05
relative error = 0.01301 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
NO REAL POLE (three term test) for Equation 1
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.5974 2.193
h = 0.003 0.006
y[1] (numeric) = -0.280427533742 0.245226192039
y[1] (closed_form) = -0.280454826498 0.245265449827
absolute error = 4.781e-05
relative error = 0.01283 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
NO REAL POLE (three term test) for Equation 1
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.6004 2.199
h = 0.0001 0.005
y[1] (numeric) = -0.282687654658 0.246230633547
y[1] (closed_form) = -0.282717280175 0.246271565554
absolute error = 5.053e-05
relative error = 0.01348 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
NO REAL POLE (three term test) for Equation 1
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.6005 2.204
h = 0.0001 0.003
y[1] (numeric) = -0.284540732068 0.246181496102
y[1] (closed_form) = -0.284568675318 0.246221615853
absolute error = 4.889e-05
relative error = 0.01299 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
NO REAL POLE (three term test) for Equation 1
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.6006 2.207
h = 0.001 0.001
y[1] (numeric) = -0.285654924673 0.246163814927
y[1] (closed_form) = -0.285682346133 0.246204447474
absolute error = 4.902e-05
relative error = 0.013 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
NO REAL POLE (three term test) for Equation 1
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.6016 2.208
h = 0.001 0.003
y[1] (numeric) = -0.28604465722 0.246516368068
y[1] (closed_form) = -0.286071737801 0.246557164339
absolute error = 4.897e-05
relative error = 0.01297 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
NO REAL POLE (three term test) for Equation 1
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.6026 2.211
h = 0.0001 0.004
y[1] (numeric) = -0.287177200237 0.246832729362
y[1] (closed_form) = -0.28720496211 0.246873163574
absolute error = 4.905e-05
relative error = 0.01295 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
NO REAL POLE (three term test) for Equation 1
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.6027 2.215
h = 0.003 0.006
y[1] (numeric) = -0.288668083626 0.246794413865
y[1] (closed_form) = -0.288695879678 0.246834191561
absolute error = 4.853e-05
relative error = 0.01278 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
NO REAL POLE (three term test) for Equation 1
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.6057 2.221
h = 0.0001 0.005
y[1] (numeric) = -0.290964970015 0.247794797228
y[1] (closed_form) = -0.290995120119 0.247836251198
absolute error = 5.126e-05
relative error = 0.01341 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
NO REAL POLE (three term test) for Equation 1
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.6058 2.226
h = 0.0001 0.003
y[1] (numeric) = -0.292841559281 0.24773111126
y[1] (closed_form) = -0.292870013271 0.247771754026
absolute error = 4.961e-05
relative error = 0.01293 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
NO REAL POLE (three term test) for Equation 1
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.6059 2.229
h = 0.001 0.001
y[1] (numeric) = -0.293969978545 0.247704861141
y[1] (closed_form) = -0.293997909298 0.24774602194
absolute error = 4.974e-05
relative error = 0.01294 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
NO REAL POLE (three term test) for Equation 1
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.6069 2.23
h = 0.0001 0.004
y[1] (numeric) = -0.294367368489 0.248059042637
y[1] (closed_form) = -0.29439495678 0.248100369479
absolute error = 4.969e-05
relative error = 0.01291 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
NO REAL POLE (three term test) for Equation 1
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.607 2.234
h = 0.003 0.006
y[1] (numeric) = -0.295873682321 0.248011207805
y[1] (closed_form) = -0.295901995107 0.248051177253
absolute error = 4.898e-05
relative error = 0.01269 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
NO REAL POLE (three term test) for Equation 1
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.61 2.24
h = 0.0001 0.005
y[1] (numeric) = -0.298202341477 0.249007526094
y[1] (closed_form) = -0.298233026667 0.249049173333
absolute error = 5.173e-05
relative error = 0.01331 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
NO REAL POLE (three term test) for Equation 1
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.6101 2.245
h = 0.0001 0.003
y[1] (numeric) = -0.300099070353 0.248930891062
y[1] (closed_form) = -0.300128047523 0.248971728165
absolute error = 5.007e-05
relative error = 0.01284 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
NO REAL POLE (three term test) for Equation 1
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.6102 2.248
h = 0.001 0.001
y[1] (numeric) = -0.301239679374 0.248897008522
y[1] (closed_form) = -0.301268132123 0.248938368183
absolute error = 5.020e-05
relative error = 0.01285 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
NO REAL POLE (three term test) for Equation 1
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.6112 2.249
h = 0.001 0.003
y[1] (numeric) = -0.301643723804 0.249252485277
y[1] (closed_form) = -0.301671832756 0.249294012996
absolute error = 5.015e-05
relative error = 0.01281 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
NO REAL POLE (three term test) for Equation 1
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.6122 2.252
h = 0.0001 0.004
y[1] (numeric) = -0.302807827354 0.249560390012
y[1] (closed_form) = -0.302836623181 0.249601546601
absolute error = 5.023e-05
relative error = 0.0128 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
NO REAL POLE (three term test) for Equation 1
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.6123 2.256
h = 0.003 0.006
y[1] (numeric) = -0.304333796705 0.24950011591
y[1] (closed_form) = -0.30436262254 0.24954060793
absolute error = 4.970e-05
relative error = 0.01263 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
NO REAL POLE (three term test) for Equation 1
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.6153 2.262
h = 0.0001 0.005
y[1] (numeric) = -0.306699631282 0.250492070355
y[1] (closed_form) = -0.306730850814 0.250534242223
absolute error = 5.247e-05
relative error = 0.01325 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
NO REAL POLE (three term test) for Equation 1
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.6154 2.267
h = 0.0001 0.003
y[1] (numeric) = -0.308620050222 0.250400549781
y[1] (closed_form) = -0.308649547887 0.250441912562
absolute error = 5.080e-05
relative error = 0.01278 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
NO REAL POLE (three term test) for Equation 1
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.6155 2.27
h = 0.001 0.001
y[1] (numeric) = -0.309774995552 0.250357897456
y[1] (closed_form) = -0.309803967348 0.250399788033
absolute error = 5.093e-05
relative error = 0.01279 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
NO REAL POLE (three term test) for Equation 1
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.6165 2.271
h = 0.001 0.003
y[1] (numeric) = -0.310186799748 0.250714968756
y[1] (closed_form) = -0.310215426165 0.25075702971
absolute error = 5.088e-05
relative error = 0.01275 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
NO REAL POLE (three term test) for Equation 1
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.6175 2.274
h = 0.0001 0.004
y[1] (numeric) = -0.311368024418 0.251018307213
y[1] (closed_form) = -0.311397340742 0.25105999218
absolute error = 5.096e-05
relative error = 0.01274 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
NO REAL POLE (three term test) for Equation 1
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.6176 2.278
h = 0.003 0.006
y[1] (numeric) = -0.312913035286 0.25094614698
y[1] (closed_form) = -0.312942379406 0.250987163038
absolute error = 5.043e-05
relative error = 0.01257 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
NO REAL POLE (three term test) for Equation 1
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.6206 2.284
h = 0.0001 0.005
y[1] (numeric) = -0.315316266639 0.251933574714
y[1] (closed_form) = -0.315348025746 0.251976272676
absolute error = 5.321e-05
relative error = 0.01318 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
NO REAL POLE (three term test) for Equation 1
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.6207 2.289
h = 0.0001 0.003
y[1] (numeric) = -0.317260472571 0.251826988099
y[1] (closed_form) = -0.317290495965 0.251868878024
absolute error = 5.154e-05
relative error = 0.01272 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
NO REAL POLE (three term test) for Equation 1
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.6208 2.292
h = 0.001 0.001
y[1] (numeric) = -0.318429813826 0.251775458436
y[1] (closed_form) = -0.318459309903 0.251817881395
absolute error = 5.167e-05
relative error = 0.01273 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
NO REAL POLE (three term test) for Equation 1
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.6218 2.293
h = 0.001 0.003
y[1] (numeric) = -0.318849432917 0.252134106465
y[1] (closed_form) = -0.318878582032 0.252176702119
absolute error = 5.161e-05
relative error = 0.0127 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
NO REAL POLE (three term test) for Equation 1
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.6228 2.296
h = 0.0001 0.004
y[1] (numeric) = -0.320047871147 0.252432787881
y[1] (closed_form) = -0.320077713201 0.252475002692
absolute error = 5.170e-05
relative error = 0.01268 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
NO REAL POLE (three term test) for Equation 1
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.6229 2.3
h = 0.003 0.006
y[1] (numeric) = -0.321612001803 0.252348597493
y[1] (closed_form) = -0.32164186944 0.252390139053
absolute error = 5.116e-05
relative error = 0.01251 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
NO REAL POLE (three term test) for Equation 1
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.6259 2.306
h = 0.0001 0.005
y[1] (numeric) = -0.324052851287 0.253331335645
y[1] (closed_form) = -0.324085155203 0.253374561168
absolute error = 5.396e-05
relative error = 0.01312 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
NO REAL POLE (three term test) for Equation 1
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.626 2.311
h = 0.0001 0.003
y[1] (numeric) = -0.326020941137 0.253209502492
y[1] (closed_form) = -0.326051495493 0.253251921027
absolute error = 5.228e-05
relative error = 0.01266 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
NO REAL POLE (three term test) for Equation 1
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.6261 2.314
h = 0.001 0.001
y[1] (numeric) = -0.327204737932 0.253148987938
y[1] (closed_form) = -0.327234763523 0.253191944744
absolute error = 5.241e-05
relative error = 0.01267 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
NO REAL POLE (three term test) for Equation 1
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.6271 2.315
h = 0.001 0.003
y[1] (numeric) = -0.327632227047 0.253509194879
y[1] (closed_form) = -0.327661904093 0.253552326699
absolute error = 5.236e-05
relative error = 0.01264 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
NO REAL POLE (three term test) for Equation 1
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.6281 2.318
h = 0.0001 0.004
y[1] (numeric) = -0.328847971278 0.253803128491
y[1] (closed_form) = -0.328878344295 0.253845874613
absolute error = 5.244e-05
relative error = 0.01262 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
NO REAL POLE (three term test) for Equation 1
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.6282 2.322
h = 0.003 0.006
y[1] (numeric) = -0.330431299994 0.253706763922
y[1] (closed_form) = -0.330461696382 0.253748832451
absolute error = 5.190e-05
relative error = 0.01246 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
NO REAL POLE (three term test) for Equation 1
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.6312 2.328
h = 0.0001 0.005
y[1] (numeric) = -0.332909988963 0.254684649625
y[1] (closed_form) = -0.332942842921 0.254728404173
absolute error = 5.472e-05
relative error = 0.01305 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
NO REAL POLE (three term test) for Equation 1
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.6313 2.333
h = 0.0001 0.003
y[1] (numeric) = -0.334902059658 0.254547389434
y[1] (closed_form) = -0.334933150211 0.254590338044
absolute error = 5.302e-05
relative error = 0.0126 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
NO REAL POLE (three term test) for Equation 1
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.6314 2.336
h = 0.001 0.001
y[1] (numeric) = -0.336100371608 0.254477782437
y[1] (closed_form) = -0.336130931947 0.254521274556
absolute error = 5.316e-05
relative error = 0.01261 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
NO REAL POLE (three term test) for Equation 1
NO COMPLEX POLE (six term test) for Equation 1
memory used=592.0MB, alloc=44.3MB, time=8.15
x[1] = 0.6324 2.337
h = 0.0001 0.004
y[1] (numeric) = -0.336535785876 0.254839530473
y[1] (closed_form) = -0.336565996088 0.254883199925
absolute error = 5.310e-05
relative error = 0.01258 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
NO REAL POLE (three term test) for Equation 1
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.6325 2.341
h = 0.003 0.006
y[1] (numeric) = -0.338134853678 0.254733072689
y[1] (closed_form) = -0.338165786592 0.254775329637
absolute error = 5.237e-05
relative error = 0.01237 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
NO REAL POLE (three term test) for Equation 1
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.6355 2.347
h = 0.0001 0.005
y[1] (numeric) = -0.340646230426 0.255706196814
y[1] (closed_form) = -0.340679639262 0.255750141297
absolute error = 5.520e-05
relative error = 0.01296 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
NO REAL POLE (three term test) for Equation 1
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.6356 2.352
h = 0.0001 0.003
y[1] (numeric) = -0.342658833959 0.255555225776
y[1] (closed_form) = -0.342690467482 0.255598365389
absolute error = 5.349e-05
relative error = 0.01251 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
NO REAL POLE (three term test) for Equation 1
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.6357 2.355
h = 0.001 0.001
y[1] (numeric) = -0.343869577757 0.255477532311
y[1] (closed_form) = -0.343900679883 0.255521219958
absolute error = 5.363e-05
relative error = 0.01252 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
NO REAL POLE (three term test) for Equation 1
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.6367 2.356
h = 0.001 0.003
y[1] (numeric) = -0.344311875946 0.255840497305
y[1] (closed_form) = -0.34434262661 0.2558843643
absolute error = 5.357e-05
relative error = 0.01249 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
NO REAL POLE (three term test) for Equation 1
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.6377 2.359
h = 0.0001 0.004
y[1] (numeric) = -0.345560009534 0.256125146047
y[1] (closed_form) = -0.345591461753 0.256168618271
absolute error = 5.366e-05
relative error = 0.01247 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
NO REAL POLE (three term test) for Equation 1
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.6378 2.363
h = 0.003 0.006
y[1] (numeric) = -0.347179120613 0.256005513949
y[1] (closed_form) = -0.347210592033 0.25604830053
absolute error = 5.311e-05
relative error = 0.01231 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
NO REAL POLE (three term test) for Equation 1
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.6408 2.369
h = 0.0001 0.005
y[1] (numeric) = -0.349728746794 0.256973479927
y[1] (closed_form) = -0.349762715428 0.2570179561
absolute error = 5.596e-05
relative error = 0.01289 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
NO REAL POLE (three term test) for Equation 1
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.6409 2.374
h = 0.0001 0.003
y[1] (numeric) = -0.351765509382 0.256806744832
y[1] (closed_form) = -0.351797688857 0.256850417184
absolute error = 5.425e-05
relative error = 0.01245 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
NO REAL POLE (three term test) for Equation 1
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.641 2.377
h = 0.001 0.001
y[1] (numeric) = -0.352990877984 0.256719758082
y[1] (closed_form) = -0.353022524613 0.256763983707
absolute error = 5.438e-05
relative error = 0.01246 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
NO REAL POLE (three term test) for Equation 1
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.642 2.378
h = 0.001 0.003
y[1] (numeric) = -0.353441203696 0.257084230362
y[1] (closed_form) = -0.35347249728 0.257128637653
absolute error = 5.433e-05
relative error = 0.01243 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
NO REAL POLE (three term test) for Equation 1
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.643 2.381
h = 0.0001 0.004
y[1] (numeric) = -0.354706906656 0.257363870549
y[1] (closed_form) = -0.354738904827 0.257407878213
absolute error = 5.441e-05
relative error = 0.01241 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
NO REAL POLE (three term test) for Equation 1
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.6431 2.385
h = 0.003 0.006
y[1] (numeric) = -0.356345437994 0.257231651314
y[1] (closed_form) = -0.356377453153 0.257274968994
absolute error = 5.386e-05
relative error = 0.01225 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
NO REAL POLE (three term test) for Equation 1
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.6461 2.391
h = 0.0001 0.005
y[1] (numeric) = -0.358933534964 0.258194296275
y[1] (closed_form) = -0.358968068628 0.258239305604
absolute error = 5.673e-05
relative error = 0.01283 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
NO REAL POLE (three term test) for Equation 1
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.6462 2.396
h = 0.0001 0.003
y[1] (numeric) = -0.360994553534 0.258011616625
y[1] (closed_form) = -0.361027284193 0.258055823183
absolute error = 5.500e-05
relative error = 0.01239 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
NO REAL POLE (three term test) for Equation 1
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.6463 2.399
h = 0.001 0.001
y[1] (numeric) = -0.362234606555 0.257915229038
y[1] (closed_form) = -0.362266802921 0.257959994106
absolute error = 5.514e-05
relative error = 0.0124 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
NO REAL POLE (three term test) for Equation 1
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.6473 2.4
h = 0.001 0.003
y[1] (numeric) = -0.362693014918 0.258281190787
y[1] (closed_form) = -0.362724856656 0.25832613984
absolute error = 5.508e-05
relative error = 0.01237 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
NO REAL POLE (three term test) for Equation 1
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.6483 2.403
h = 0.0001 0.004
y[1] (numeric) = -0.36397637969 0.258555731656
y[1] (closed_form) = -0.364008929047 0.258600276227
absolute error = 5.517e-05
relative error = 0.01236 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
NO REAL POLE (three term test) for Equation 1
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.6484 2.407
h = 0.003 0.006
y[1] (numeric) = -0.36563440956 0.258410781259
y[1] (closed_form) = -0.365666973692 0.258454631503
absolute error = 5.462e-05
relative error = 0.0122 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
NO REAL POLE (three term test) for Equation 1
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.6514 2.413
h = 0.0001 0.005
y[1] (numeric) = -0.368261198672 0.259367942335
y[1] (closed_form) = -0.368296302601 0.259413486286
absolute error = 5.750e-05
relative error = 0.01276 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
NO REAL POLE (three term test) for Equation 1
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.6515 2.418
h = 0.0001 0.003
y[1] (numeric) = -0.370346570151 0.259169137631
y[1] (closed_form) = -0.370379857228 0.25921387986
absolute error = 5.577e-05
relative error = 0.01234 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
NO REAL POLE (three term test) for Equation 1
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.6516 2.421
h = 0.001 0.001
y[1] (numeric) = -0.371601367207 0.259063241653
y[1] (closed_form) = -0.371634118543 0.25910854763
absolute error = 5.590e-05
relative error = 0.01234 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
NO REAL POLE (three term test) for Equation 1
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.6526 2.422
h = 0.001 0.003
y[1] (numeric) = -0.37206791335 0.259430675054
y[1] (closed_form) = -0.372100308475 0.259476167335
absolute error = 5.585e-05
relative error = 0.01231 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
NO REAL POLE (three term test) for Equation 1
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.6536 2.425
h = 0.0001 0.004
y[1] (numeric) = -0.373369032375 0.259700025844
y[1] (closed_form) = -0.373402138151 0.259745108787
absolute error = 5.593e-05
relative error = 0.0123 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
NO REAL POLE (three term test) for Equation 1
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.6537 2.429
h = 0.003 0.006
y[1] (numeric) = -0.375046639048 0.259542200258
y[1] (closed_form) = -0.375079757386 0.259586584534
absolute error = 5.538e-05
relative error = 0.01214 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
NO REAL POLE (three term test) for Equation 1
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.6567 2.435
h = 0.0001 0.005
y[1] (numeric) = -0.377712341656 0.260493714582
y[1] (closed_form) = -0.377748021083 0.260539794619
absolute error = 5.828e-05
relative error = 0.0127 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
NO REAL POLE (three term test) for Equation 1
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.6568 2.44
h = 0.0001 0.003
y[1] (numeric) = -0.379822162972 0.260278604324
y[1] (closed_form) = -0.379856011701 0.260323883691
absolute error = 5.653e-05
relative error = 0.01228 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
NO REAL POLE (three term test) for Equation 1
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.6569 2.443
h = 0.001 0.001
y[1] (numeric) = -0.381091763678 0.260163092405
y[1] (closed_form) = -0.381125075217 0.260208940756
absolute error = 5.667e-05
relative error = 0.01228 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
NO REAL POLE (three term test) for Equation 1
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.6579 2.444
h = 0.0001 0.004
y[1] (numeric) = -0.38156650273 0.260531979641
y[1] (closed_form) = -0.381599456475 0.260578016615
absolute error = 5.662e-05
relative error = 0.01225 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
NO REAL POLE (three term test) for Equation 1
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.658 2.448
h = 0.003 0.006
y[1] (numeric) = -0.383260157131 0.260363486961
y[1] (closed_form) = -0.383293831787 0.26040805632
absolute error = 5.586e-05
relative error = 0.01205 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
NO REAL POLE (three term test) for Equation 1
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.661 2.454
h = 0.0001 0.005
y[1] (numeric) = -0.385959462531 0.261309543202
y[1] (closed_form) = -0.385995716627 0.26135580984
absolute error = 5.878e-05
relative error = 0.01261 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
NO REAL POLE (three term test) for Equation 1
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.6611 2.459
h = 0.0001 0.003
y[1] (numeric) = -0.388090209911 0.261079960314
y[1] (closed_form) = -0.388124621402 0.261125427349
absolute error = 5.702e-05
relative error = 0.01219 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
NO REAL POLE (three term test) for Equation 1
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.6612 2.462
h = 0.001 0.001
y[1] (numeric) = -0.389372484555 0.260955907879
y[1] (closed_form) = -0.389406357673 0.261001948425
absolute error = 5.716e-05
relative error = 0.01219 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
NO REAL POLE (three term test) for Equation 1
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.6622 2.463
h = 0.001 0.003
y[1] (numeric) = -0.389854336964 0.261325933774
y[1] (closed_form) = -0.389887850954 0.261372164957
absolute error = 5.710e-05
relative error = 0.01216 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
NO REAL POLE (three term test) for Equation 1
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.6632 2.466
h = 0.0001 0.004
y[1] (numeric) = -0.391188674171 0.261585171381
y[1] (closed_form) = -0.391222904395 0.261630984154
absolute error = 5.719e-05
relative error = 0.01215 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
NO REAL POLE (three term test) for Equation 1
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.6633 2.47
h = 0.003 0.006
y[1] (numeric) = -0.392902759608 0.261402769345
y[1] (closed_form) = -0.392936998225 0.261447875399
absolute error = 5.663e-05
relative error = 0.012 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
NO REAL POLE (three term test) for Equation 1
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.6663 2.476
h = 0.0001 0.005
y[1] (numeric) = -0.395641388453 0.262342873134
y[1] (closed_form) = -0.395678227802 0.262389678524
absolute error = 5.956e-05
relative error = 0.01255 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
NO REAL POLE (three term test) for Equation 1
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.6664 2.481
h = 0.0001 0.003
y[1] (numeric) = -0.397796763878 0.262096647674
y[1] (closed_form) = -0.397831746777 0.26214265451
absolute error = 5.780e-05
relative error = 0.01213 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
NO REAL POLE (three term test) for Equation 1
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.6665 2.484
h = 0.001 0.001
y[1] (numeric) = -0.399093951821 0.261962778455
y[1] (closed_form) = -0.399128394898 0.26200936404
absolute error = 5.794e-05
relative error = 0.01213 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
NO REAL POLE (three term test) for Equation 1
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.6675 2.485
h = 0.001 0.003
y[1] (numeric) = -0.399584099509 0.262334224375
y[1] (closed_form) = -0.399618181875 0.262381002917
absolute error = 5.788e-05
relative error = 0.01211 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
NO REAL POLE (three term test) for Equation 1
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.6685 2.488
h = 0.0001 0.004
y[1] (numeric) = -0.400936454339 0.262588011152
y[1] (closed_form) = -0.400971255972 0.262634366427
absolute error = 5.797e-05
relative error = 0.01209 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
NO REAL POLE (three term test) for Equation 1
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.6686 2.492
h = 0.003 0.006
y[1] (numeric) = -0.402670338779 0.262392320971
y[1] (closed_form) = -0.402705146591 0.262437965186
absolute error = 5.740e-05
relative error = 0.01194 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
NO REAL POLE (three term test) for Equation 1
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.6716 2.498
h = 0.0001 0.005
y[1] (numeric) = -0.405448512424 0.263326309441
y[1] (closed_form) = -0.40548594226 0.263373655049
absolute error = 6.035e-05
relative error = 0.01248 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
NO REAL POLE (three term test) for Equation 1
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.6717 2.503
h = 0.0001 0.003
y[1] (numeric) = -0.407628612823 0.26306326091
y[1] (closed_form) = -0.407664172361 0.263109809013
absolute error = 5.858e-05
relative error = 0.01207 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
NO REAL POLE (three term test) for Equation 1
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.6718 2.506
h = 0.001 0.001
y[1] (numeric) = -0.40894077368 0.262919467355
y[1] (closed_form) = -0.408975791949 0.262966599444
absolute error = 5.872e-05
relative error = 0.01208 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
NO REAL POLE (three term test) for Equation 1
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.6728 2.507
h = 0.001 0.003
y[1] (numeric) = -0.409439271775 0.263292315484
y[1] (closed_form) = -0.40947392775 0.263339642849
absolute error = 5.866e-05
relative error = 0.01205 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
NO REAL POLE (three term test) for Equation 1
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.6738 2.51
h = 0.0001 0.004
y[1] (numeric) = -0.410809736669 0.263540560667
y[1] (closed_form) = -0.410845114943 0.263587459909
absolute error = 5.875e-05
relative error = 0.01203 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
NO REAL POLE (three term test) for Equation 1
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.6739 2.514
h = 0.003 0.006
y[1] (numeric) = -0.412563498383 0.263331438317
y[1] (closed_form) = -0.412598880624 0.263377622158
absolute error = 5.818e-05
relative error = 0.01189 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
NO REAL POLE (three term test) for Equation 1
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.6769 2.52
h = 0.0001 0.005
y[1] (numeric) = -0.415381438183 0.264259148597
y[1] (closed_form) = -0.415419463739 0.264307035888
absolute error = 6.115e-05
relative error = 0.01242 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
NO REAL POLE (three term test) for Equation 1
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.677 2.525
h = 0.0001 0.003
y[1] (numeric) = -0.417586360481 0.263979096497
y[1] (closed_form) = -0.417622501893 0.264026187333
absolute error = 5.936e-05
relative error = 0.01201 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
NO REAL POLE (three term test) for Equation 1
NO COMPLEX POLE (six term test) for Equation 1
memory used=640.9MB, alloc=44.3MB, time=8.83
x[1] = 0.6771 2.528
h = 0.001 0.001
y[1] (numeric) = -0.418913553868 0.263825271053
y[1] (closed_form) = -0.418949152563 0.263872951113
absolute error = 5.950e-05
relative error = 0.01202 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
NO REAL POLE (three term test) for Equation 1
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.6781 2.529
h = 0.001 0.003
y[1] (numeric) = -0.419420457499 0.264199503574
y[1] (closed_form) = -0.419455692317 0.264247381228
absolute error = 5.945e-05
relative error = 0.01199 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
NO REAL POLE (three term test) for Equation 1
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.6791 2.532
h = 0.0001 0.004
y[1] (numeric) = -0.420809124898 0.264442116401
y[1] (closed_form) = -0.420845085047 0.264489561077
absolute error = 5.953e-05
relative error = 0.01198 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
NO REAL POLE (three term test) for Equation 1
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.6792 2.536
h = 0.003 0.006
y[1] (numeric) = -0.422582842157 0.264219417855
y[1] (closed_form) = -0.42261880406 0.264266142788
absolute error = 5.896e-05
relative error = 0.01183 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
NO REAL POLE (three term test) for Equation 1
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.6822 2.542
h = 0.0001 0.005
y[1] (numeric) = -0.425440769466 0.265140687078
y[1] (closed_form) = -0.425479395975 0.265189117518
absolute error = 6.195e-05
relative error = 0.01236 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
NO REAL POLE (three term test) for Equation 1
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.6823 2.547
h = 0.0001 0.003
y[1] (numeric) = -0.427670610592 0.26484345091
y[1] (closed_form) = -0.427707339111 0.264891085945
absolute error = 6.015e-05
relative error = 0.01196 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
NO REAL POLE (three term test) for Equation 1
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.6824 2.55
h = 0.001 0.001
y[1] (numeric) = -0.429012896123 0.264679486024
y[1] (closed_form) = -0.429049080477 0.26472771552
absolute error = 6.029e-05
relative error = 0.01196 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
NO REAL POLE (three term test) for Equation 1
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.6834 2.551
h = 0.0001 0.004
y[1] (numeric) = -0.429528260419 0.26505508512
y[1] (closed_form) = -0.429564079313 0.265103514529
absolute error = 6.024e-05
relative error = 0.01193 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
NO REAL POLE (three term test) for Equation 1
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.6835 2.555
h = 0.003 0.006
y[1] (numeric) = -0.43131833405 0.264821145601
y[1] (closed_form) = -0.431354872062 0.264868052283
absolute error = 5.946e-05
relative error = 0.01175 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
NO REAL POLE (three term test) for Equation 1
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.6865 2.561
h = 0.0001 0.005
y[1] (numeric) = -0.434210779162 0.265736260238
y[1] (closed_form) = -0.434250000132 0.265784873943
absolute error = 6.246e-05
relative error = 0.01227 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
NO REAL POLE (three term test) for Equation 1
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.6866 2.566
h = 0.0001 0.003
y[1] (numeric) = -0.436461939579 0.265423789656
y[1] (closed_form) = -0.436499250652 0.265471609025
absolute error = 6.065e-05
relative error = 0.01187 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
NO REAL POLE (three term test) for Equation 1
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.6867 2.569
h = 0.001 0.001
y[1] (numeric) = -0.437817141139 0.265250830207
y[1] (closed_form) = -0.437853906863 0.265299248563
absolute error = 6.080e-05
relative error = 0.01188 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
NO REAL POLE (three term test) for Equation 1
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.6877 2.57
h = 0.001 0.003
y[1] (numeric) = -0.438339848229 0.265627489662
y[1] (closed_form) = -0.438376247158 0.265676109945
absolute error = 6.074e-05
relative error = 0.01185 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
NO REAL POLE (three term test) for Equation 1
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.6887 2.573
h = 0.0001 0.004
y[1] (numeric) = -0.439762562633 0.265859160995
y[1] (closed_form) = -0.439799692477 0.265907339228
absolute error = 6.083e-05
relative error = 0.01184 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
NO REAL POLE (three term test) for Equation 1
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.6888 2.577
h = 0.003 0.006
y[1] (numeric) = -0.441573455058 0.265610577076
y[1] (closed_form) = -0.441610582487 0.265658027515
absolute error = 6.025e-05
relative error = 0.01169 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
NO REAL POLE (three term test) for Equation 1
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.6918 2.583
h = 0.0001 0.005
y[1] (numeric) = -0.444506297627 0.266518944958
y[1] (closed_form) = -0.444546129306 0.266568104477
absolute error = 6.327e-05
relative error = 0.01221 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
NO REAL POLE (three term test) for Equation 1
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.6919 2.588
h = 0.0001 0.003
y[1] (numeric) = -0.446782555081 0.266188953288
y[1] (closed_form) = -0.446820463017 0.266237319521
absolute error = 6.145e-05
relative error = 0.01181 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
NO REAL POLE (three term test) for Equation 1
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.692 2.591
h = 0.001 0.001
y[1] (numeric) = -0.448152958435 0.266005653557
y[1] (closed_form) = -0.448190319573 0.266054624013
absolute error = 6.160e-05
relative error = 0.01182 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
NO REAL POLE (three term test) for Equation 1
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.693 2.592
h = 0.001 0.003
y[1] (numeric) = -0.448684228559 0.266383645777
y[1] (closed_form) = -0.44872122132 0.26643282048
absolute error = 6.154e-05
relative error = 0.01179 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
NO REAL POLE (three term test) for Equation 1
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.694 2.595
h = 0.0001 0.004
y[1] (numeric) = -0.450125408839 0.266609424004
y[1] (closed_form) = -0.450163135547 0.2666581518
absolute error = 6.163e-05
relative error = 0.01178 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
NO REAL POLE (three term test) for Equation 1
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.6941 2.599
h = 0.003 0.006
y[1] (numeric) = -0.451956479009 0.266346850933
y[1] (closed_form) = -0.451994201089 0.266394846594
absolute error = 6.105e-05
relative error = 0.01164 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
NO REAL POLE (three term test) for Equation 1
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.6971 2.605
h = 0.0001 0.005
y[1] (numeric) = -0.454929940391 0.267248309191
y[1] (closed_form) = -0.454970388012 0.267298015989
absolute error = 6.408e-05
relative error = 0.01214 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
NO REAL POLE (three term test) for Equation 1
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.6972 2.61
h = 0.0001 0.003
y[1] (numeric) = -0.457231391808 0.266900615935
y[1] (closed_form) = -0.457269901839 0.266949530496
absolute error = 6.225e-05
relative error = 0.01176 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
NO REAL POLE (three term test) for Equation 1
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.6973 2.613
h = 0.001 0.001
y[1] (numeric) = -0.458617056571 0.266706868368
y[1] (closed_form) = -0.458655018357 0.266756392391
absolute error = 6.240e-05
relative error = 0.01176 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
NO REAL POLE (three term test) for Equation 1
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.6983 2.614
h = 0.001 0.003
y[1] (numeric) = -0.459156944858 0.267086175537
y[1] (closed_form) = -0.459194536684 0.267135906125
absolute error = 6.234e-05
relative error = 0.01173 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
NO REAL POLE (three term test) for Equation 1
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.6993 2.617
h = 0.0001 0.004
y[1] (numeric) = -0.460616683454 0.267305969894
y[1] (closed_form) = -0.460655012259 0.26735524872
absolute error = 6.243e-05
relative error = 0.01172 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
NO REAL POLE (three term test) for Equation 1
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.6994 2.621
h = 0.003 0.006
y[1] (numeric) = -0.462468009642 0.267029263647
y[1] (closed_form) = -0.462506331606 0.267077805996
absolute error = 6.185e-05
relative error = 0.01158 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
NO REAL POLE (three term test) for Equation 1
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.7024 2.627
h = 0.0001 0.005
y[1] (numeric) = -0.465482311189 0.267923649411
y[1] (closed_form) = -0.465523379986 0.267973904954
absolute error = 6.490e-05
relative error = 0.01208 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
NO REAL POLE (three term test) for Equation 1
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.7025 2.632
h = 0.0001 0.003
y[1] (numeric) = -0.467809053498 0.267558074071
y[1] (closed_form) = -0.467848170858 0.267607538427
absolute error = 6.306e-05
relative error = 0.0117 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
NO REAL POLE (three term test) for Equation 1
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.7026 2.635
h = 0.001 0.001
y[1] (numeric) = -0.469210039285 0.267353771116
y[1] (closed_form) = -0.469248606952 0.267403850171
absolute error = 6.321e-05
relative error = 0.0117 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
NO REAL POLE (three term test) for Equation 1
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.7036 2.636
h = 0.001 0.003
y[1] (numeric) = -0.469758600864 0.267734375417
y[1] (closed_form) = -0.469796796989 0.267784663356
absolute error = 6.315e-05
relative error = 0.01168 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
NO REAL POLE (three term test) for Equation 1
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.7046 2.639
h = 0.0001 0.004
y[1] (numeric) = -0.471236990218 0.267948095143
y[1] (closed_form) = -0.471275926353 0.267997926463
absolute error = 6.324e-05
relative error = 0.01166 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
NO REAL POLE (three term test) for Equation 1
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.7047 2.643
h = 0.003 0.006
y[1] (numeric) = -0.473108650693 0.267657111692
y[1] (closed_form) = -0.473147577774 0.267706202195
absolute error = 6.265e-05
relative error = 0.01152 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
NO REAL POLE (three term test) for Equation 1
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.7077 2.649
h = 0.0001 0.005
y[1] (numeric) = -0.476164013762 0.268544262095
y[1] (closed_form) = -0.476205708968 0.268595067848
absolute error = 6.572e-05
relative error = 0.01202 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
NO REAL POLE (three term test) for Equation 1
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.7078 2.654
h = 0.0001 0.003
y[1] (numeric) = -0.478516143888 0.268160624172
y[1] (closed_form) = -0.478555873811 0.268210639788
absolute error = 6.388e-05
relative error = 0.01164 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
NO REAL POLE (three term test) for Equation 1
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.7079 2.657
h = 0.001 0.001
y[1] (numeric) = -0.479932510315 0.267945658276
y[1] (closed_form) = -0.479971689097 0.267996293828
absolute error = 6.402e-05
relative error = 0.01165 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
NO REAL POLE (three term test) for Equation 1
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.7089 2.658
h = 0.0001 0.004
y[1] (numeric) = -0.480489800315 0.268327541892
y[1] (closed_form) = -0.480528605971 0.268378388647
absolute error = 6.396e-05
relative error = 0.01162 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
NO REAL POLE (three term test) for Equation 1
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.709 2.662
h = 0.003 0.006
y[1] (numeric) = -0.482378125805 0.268024743589
y[1] (closed_form) = -0.482417648787 0.268074012507
absolute error = 6.316e-05
relative error = 0.01144 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
NO REAL POLE (three term test) for Equation 1
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.712 2.668
h = 0.0001 0.005
y[1] (numeric) = -0.485468921689 0.268905042902
y[1] (closed_form) = -0.485511231147 0.268956028587
absolute error = 6.625e-05
relative error = 0.01194 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
NO REAL POLE (three term test) for Equation 1
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.7121 2.673
h = 0.0001 0.003
y[1] (numeric) = -0.487842764333 0.268505408782
y[1] (closed_form) = -0.487883096602 0.268555605397
absolute error = 6.439e-05
relative error = 0.01156 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
NO REAL POLE (three term test) for Equation 1
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.7122 2.676
h = 0.001 0.001
y[1] (numeric) = -0.489272288879 0.268280994276
y[1] (closed_form) = -0.489312068823 0.268331815354
absolute error = 6.454e-05
relative error = 0.01156 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
NO REAL POLE (three term test) for Equation 1
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.7132 2.677
h = 0.001 0.003
y[1] (numeric) = -0.489837151109 0.26866385995
y[1] (closed_form) = -0.489876556592 0.268714894246
absolute error = 6.448e-05
relative error = 0.01154 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
NO REAL POLE (three term test) for Equation 1
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.7142 2.68
h = 0.0001 0.004
y[1] (numeric) = -0.491350416291 0.26886580987
y[1] (closed_form) = -0.491390567369 0.268916378475
absolute error = 6.457e-05
relative error = 0.01153 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
NO REAL POLE (three term test) for Equation 1
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.7143 2.684
h = 0.003 0.006
y[1] (numeric) = -0.493259948335 0.268547632124
y[1] (closed_form) = -0.493300086189 0.26859745186
absolute error = 6.398e-05
relative error = 0.01139 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
NO REAL POLE (three term test) for Equation 1
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.7173 2.69
h = 0.0001 0.005
y[1] (numeric) = -0.496392215688 0.269420390378
y[1] (closed_form) = -0.49643516131 0.269471928937
absolute error = 6.709e-05
relative error = 0.01188 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
NO REAL POLE (three term test) for Equation 1
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.7174 2.695
h = 0.0001 0.003
y[1] (numeric) = -0.498791624359 0.269002356655
y[1] (closed_form) = -0.498832578946 0.269053107195
absolute error = 6.521e-05
relative error = 0.01151 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
NO REAL POLE (three term test) for Equation 1
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.7175 2.698
h = 0.001 0.001
y[1] (numeric) = -0.500236639194 0.268767078367
y[1] (closed_form) = -0.500277040008 0.268818458607
absolute error = 6.536e-05
relative error = 0.01151 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
NO REAL POLE (three term test) for Equation 1
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.7185 2.699
h = 0.001 0.003
y[1] (numeric) = -0.500810332214 0.269151189547
y[1] (closed_form) = -0.500850356985 0.269202785323
absolute error = 6.530e-05
relative error = 0.01148 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
NO REAL POLE (three term test) for Equation 1
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.7195 2.702
h = 0.0001 0.004
y[1] (numeric) = -0.502342511524 0.269346804083
y[1] (closed_form) = -0.502383284922 0.269397929313
absolute error = 6.539e-05
relative error = 0.01147 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
NO REAL POLE (three term test) for Equation 1
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.7196 2.706
h = 0.003 0.006
y[1] (numeric) = -0.504272600056 0.269013936179
y[1] (closed_form) = -0.504313358017 0.269064308198
absolute error = 6.480e-05
relative error = 0.01134 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
NO REAL POLE (three term test) for Equation 1
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.7226 2.712
h = 0.0001 0.005
y[1] (numeric) = -0.507446560233 0.269878990504
y[1] (closed_form) = -0.507490147254 0.269931083405
absolute error = 6.792e-05
relative error = 0.01182 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
NO REAL POLE (three term test) for Equation 1
NO COMPLEX POLE (six term test) for Equation 1
memory used=689.8MB, alloc=44.3MB, time=9.50
x[1] = 0.7227 2.717
h = 0.0001 0.003
y[1] (numeric) = -0.509871631859 0.26944237668
y[1] (closed_form) = -0.509913213998 0.269493682611
absolute error = 6.604e-05
relative error = 0.01145 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
NO REAL POLE (three term test) for Equation 1
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.7228 2.72
h = 0.001 0.001
y[1] (numeric) = -0.511332196598 0.269196127057
y[1] (closed_form) = -0.511373223515 0.269248067925
absolute error = 6.619e-05
relative error = 0.01145 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
NO REAL POLE (three term test) for Equation 1
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.7238 2.721
h = 0.001 0.003
y[1] (numeric) = -0.511914775537 0.269581465926
y[1] (closed_form) = -0.511955424828 0.26963362465
absolute error = 6.613e-05
relative error = 0.01143 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
NO REAL POLE (three term test) for Equation 1
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.7248 2.724
h = 0.0001 0.004
y[1] (numeric) = -0.513465961415 0.269770654318
y[1] (closed_form) = -0.513507362365 0.269822337638
absolute error = 6.622e-05
relative error = 0.01142 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
NO REAL POLE (three term test) for Equation 1
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.7249 2.728
h = 0.003 0.006
y[1] (numeric) = -0.515416684707 0.269422952229
y[1] (closed_form) = -0.515458068007 0.269473877998
absolute error = 6.562e-05
relative error = 0.01128 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
NO REAL POLE (three term test) for Equation 1
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.7279 2.734
h = 0.0001 0.005
y[1] (numeric) = -0.518632559062 0.270280139757
y[1] (closed_form) = -0.518676792714 0.270332788464
absolute error = 6.876e-05
relative error = 0.01176 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
NO REAL POLE (three term test) for Equation 1
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.728 2.739
h = 0.0001 0.003
y[1] (numeric) = -0.52108339057 0.269824765334
y[1] (closed_form) = -0.521125605493 0.26987662812
absolute error = 6.687e-05
relative error = 0.01139 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
NO REAL POLE (three term test) for Equation 1
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.7281 2.742
h = 0.001 0.001
y[1] (numeric) = -0.522559564828 0.269567436823
y[1] (closed_form) = -0.522601223082 0.269619939785
absolute error = 6.702e-05
relative error = 0.0114 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
NO REAL POLE (three term test) for Equation 1
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.7291 2.743
h = 0.001 0.003
y[1] (numeric) = -0.523151084815 0.269953985564
y[1] (closed_form) = -0.52319236386 0.2700067087
absolute error = 6.696e-05
relative error = 0.01137 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
NO REAL POLE (three term test) for Equation 1
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.7301 2.746
h = 0.0001 0.004
y[1] (numeric) = -0.524721369703 0.270136657048
y[1] (closed_form) = -0.524763403439 0.270188899925
absolute error = 6.705e-05
relative error = 0.01136 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
NO REAL POLE (three term test) for Equation 1
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.7302 2.75
h = 0.003 0.006
y[1] (numeric) = -0.526692806025 0.269773976749
y[1] (closed_form) = -0.526734819899 0.269825457733
absolute error = 6.645e-05
relative error = 0.01123 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
NO REAL POLE (three term test) for Equation 1
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.7332 2.756
h = 0.0001 0.005
y[1] (numeric) = -0.529950815913 0.270623134612
y[1] (closed_form) = -0.52999570143 0.270676340591
absolute error = 6.961e-05
relative error = 0.0117 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
NO REAL POLE (three term test) for Equation 1
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.7333 2.761
h = 0.0001 0.003
y[1] (numeric) = -0.53242750423 0.27014881909
y[1] (closed_form) = -0.532470357172 0.270201240198
absolute error = 6.771e-05
relative error = 0.01134 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
NO REAL POLE (three term test) for Equation 1
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.7334 2.764
h = 0.001 0.001
y[1] (numeric) = -0.533919347622 0.269880304139
y[1] (closed_form) = -0.533961642447 0.26993337066
absolute error = 6.786e-05
relative error = 0.01134 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
NO REAL POLE (three term test) for Equation 1
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.7344 2.765
h = 0.0001 0.004
y[1] (numeric) = -0.534519863786 0.270268044935
y[1] (closed_form) = -0.534561777819 0.270321333949
absolute error = 6.780e-05
relative error = 0.01132 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
NO REAL POLE (three term test) for Equation 1
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.7345 2.769
h = 0.003 0.006
y[1] (numeric) = -0.536508273766 0.269892975905
y[1] (closed_form) = -0.536550903332 0.26994463197
absolute error = 6.697e-05
relative error = 0.01115 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
NO REAL POLE (three term test) for Equation 1
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.7375 2.775
h = 0.0001 0.005
y[1] (numeric) = -0.539802631481 0.270734586174
y[1] (closed_form) = -0.539848151042 0.27078796875
absolute error = 7.016e-05
relative error = 0.01162 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
NO REAL POLE (three term test) for Equation 1
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.7376 2.78
h = 0.0001 0.003
y[1] (numeric) = -0.542301425542 0.270243512672
y[1] (closed_form) = -0.542344900622 0.270296111445
absolute error = 6.824e-05
relative error = 0.01126 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
NO REAL POLE (three term test) for Equation 1
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.7377 2.783
h = 0.001 0.001
y[1] (numeric) = -0.543806669146 0.269965095064
y[1] (closed_form) = -0.543849584924 0.270018343776
absolute error = 6.839e-05
relative error = 0.01126 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
NO REAL POLE (three term test) for Equation 1
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.7387 2.784
h = 0.001 0.003
y[1] (numeric) = -0.544414986975 0.270353739619
y[1] (closed_form) = -0.544457520627 0.270407212838
absolute error = 6.833e-05
relative error = 0.01124 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
NO REAL POLE (three term test) for Equation 1
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.7397 2.787
h = 0.0001 0.004
y[1] (numeric) = -0.546020976515 0.270523812984
y[1] (closed_form) = -0.546064270442 0.270576796873
absolute error = 6.842e-05
relative error = 0.01123 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
NO REAL POLE (three term test) for Equation 1
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.7398 2.791
h = 0.003 0.006
y[1] (numeric) = -0.548030980807 0.270132629468
y[1] (closed_form) = -0.548074250701 0.270184843412
absolute error = 6.781e-05
relative error = 0.0111 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
NO REAL POLE (three term test) for Equation 1
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.7428 2.797
h = 0.0001 0.005
y[1] (numeric) = -0.551367884004 0.270965904373
y[1] (closed_form) = -0.551414065185 0.271019846886
absolute error = 7.101e-05
relative error = 0.01156 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
NO REAL POLE (three term test) for Equation 1
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.7429 2.802
h = 0.0001 0.003
y[1] (numeric) = -0.553892713083 0.270455552753
y[1] (closed_form) = -0.553936835936 0.270508712513
absolute error = 6.909e-05
relative error = 0.01121 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
NO REAL POLE (three term test) for Equation 1
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.743 2.805
h = 0.001 0.001
y[1] (numeric) = -0.55541373547 0.270165747864
y[1] (closed_form) = -0.555457297573 0.2702195628
absolute error = 6.924e-05
relative error = 0.01121 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
NO REAL POLE (three term test) for Equation 1
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.744 2.806
h = 0.001 0.003
y[1] (numeric) = -0.556031151846 0.270555550664
y[1] (closed_form) = -0.55607433024 0.270609592427
absolute error = 6.917e-05
relative error = 0.01119 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
NO REAL POLE (three term test) for Equation 1
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.745 2.809
h = 0.0001 0.004
y[1] (numeric) = -0.557656503766 0.270718846371
y[1] (closed_form) = -0.557700445467 0.270772393947
absolute error = 6.927e-05
relative error = 0.01117 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
NO REAL POLE (three term test) for Equation 1
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.7451 2.813
h = 0.003 0.006
y[1] (numeric) = -0.559687443288 0.270312271688
y[1] (closed_form) = -0.559731358745 0.270365044979
absolute error = 6.866e-05
relative error = 0.01104 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
NO REAL POLE (three term test) for Equation 1
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.7481 2.819
h = 0.0001 0.005
y[1] (numeric) = -0.563067113321 0.271137048362
y[1] (closed_form) = -0.563113961355 0.271191552277
absolute error = 7.187e-05
relative error = 0.0115 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
NO REAL POLE (three term test) for Equation 1
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.7482 2.824
h = 0.0001 0.003
y[1] (numeric) = -0.565618074346 0.270607238125
y[1] (closed_form) = -0.565662850206 0.270660960337
absolute error = 6.994e-05
relative error = 0.01115 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
NO REAL POLE (three term test) for Equation 1
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.7483 2.827
h = 0.001 0.001
y[1] (numeric) = -0.567154935131 0.270305938402
y[1] (closed_form) = -0.567199148794 0.270360321028
absolute error = 7.009e-05
relative error = 0.01115 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
NO REAL POLE (three term test) for Equation 1
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.7493 2.828
h = 0.001 0.003
y[1] (numeric) = -0.567781505182 0.270696881631
y[1] (closed_form) = -0.567825333553 0.270751493402
absolute error = 7.002e-05
relative error = 0.01113 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
NO REAL POLE (three term test) for Equation 1
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.7503 2.831
h = 0.0001 0.004
y[1] (numeric) = -0.569426311922 0.270853308917
y[1] (closed_form) = -0.569470906632 0.270907421645
absolute error = 7.012e-05
relative error = 0.01112 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
NO REAL POLE (three term test) for Equation 1
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.7504 2.835
h = 0.003 0.006
y[1] (numeric) = -0.571478264948 0.270431199043
y[1] (closed_form) = -0.571522831199 0.270484533144
absolute error = 6.950e-05
relative error = 0.01099 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
NO REAL POLE (three term test) for Equation 1
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.7534 2.841
h = 0.0001 0.005
y[1] (numeric) = -0.574900923171 0.271247314615
y[1] (closed_form) = -0.574948443292 0.271302381398
absolute error = 7.274e-05
relative error = 0.01144 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
NO REAL POLE (three term test) for Equation 1
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.7535 2.846
h = 0.0001 0.003
y[1] (numeric) = -0.577478113068 0.270697865264
y[1] (closed_form) = -0.577523547168 0.270752151393
absolute error = 7.079e-05
relative error = 0.0111 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
NO REAL POLE (three term test) for Equation 1
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.7536 2.849
h = 0.001 0.001
y[1] (numeric) = -0.579030871867 0.270384963154
y[1] (closed_form) = -0.579075742322 0.270439914935
absolute error = 7.094e-05
relative error = 0.0111 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
NO REAL POLE (three term test) for Equation 1
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.7546 2.85
h = 0.001 0.003
y[1] (numeric) = -0.579666650722 0.270777028995
y[1] (closed_form) = -0.579711134302 0.27083221224
absolute error = 7.088e-05
relative error = 0.01108 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
NO REAL POLE (three term test) for Equation 1
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.7556 2.853
h = 0.0001 0.004
y[1] (numeric) = -0.581331004724 0.270926497097
y[1] (closed_form) = -0.581376257674 0.270981176443
absolute error = 7.098e-05
relative error = 0.01107 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
NO REAL POLE (three term test) for Equation 1
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.7557 2.857
h = 0.003 0.006
y[1] (numeric) = -0.583404049522 0.270488708006
y[1] (closed_form) = -0.583449271803 0.270542604384
absolute error = 7.036e-05
relative error = 0.01094 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
NO REAL POLE (three term test) for Equation 1
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.7587 2.863
h = 0.0001 0.005
y[1] (numeric) = -0.586869917291 0.271295999609
y[1] (closed_form) = -0.586918114732 0.271351630725
absolute error = 7.361e-05
relative error = 0.01138 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
NO REAL POLE (three term test) for Equation 1
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.7588 2.868
h = 0.0001 0.003
y[1] (numeric) = -0.589473432988 0.270726730644
y[1] (closed_form) = -0.589519530562 0.270781582157
absolute error = 7.165e-05
relative error = 0.01104 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
NO REAL POLE (three term test) for Equation 1
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.7589 2.871
h = 0.001 0.001
y[1] (numeric) = -0.591042149416 0.270402118595
y[1] (closed_form) = -0.591087681896 0.270457640996
absolute error = 7.180e-05
relative error = 0.01105 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
NO REAL POLE (three term test) for Equation 1
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.7599 2.872
h = 0.001 0.003
y[1] (numeric) = -0.591687192204 0.270795289231
y[1] (closed_form) = -0.591732336227 0.270851045415
absolute error = 7.174e-05
relative error = 0.01102 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
NO REAL POLE (three term test) for Equation 1
NO COMPLEX POLE (six term test) for Equation 1
Finished!
diff ( y , x , 1 ) = expt ( ( 0.2 * x + 0.3 ) , 2.0 ) ;
Iterations = 754
Total Elapsed Time = 9 Seconds
Expected Time Remaining = 0 Seconds
Optimized Time Remaining = 0 Seconds
Expected Total Time = 9 Seconds
> quit
memory used=733.4MB, alloc=44.3MB, time=10.08