|\^/| 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(0.2) * sin(c(x)) - c(0.2) * cos(c(x)) * c(x) - c(0.3) * cos(c(x)));
> end;
exact_soln_y := proc(x)
return c(0.2)*sin(c(x)) - c(0.2)*cos(c(x))*c(x) - c(0.3)*cos(c(x))
end proc
> next_delta := proc()
> global glob_nxt, x_delta;
> x_delta := [ 0.001 + 0.00004 * I,
> 0.0001 + 0.004 * I,
> 0.003 + 0.006 * I,
> 0.0001 + 0.005 * I,
> 0.0001 + 0.003 * I,
> 0.001 + 0.001 * I,
> 0.001 + 0.003 * I,
> 0.0001 + 0.004 * I,
> 0.003 + 0.006 * I,
> 0.0001 + 0.005 * I,
> 0.0001 + 0.003 * I,
> 0.001 + 0.001 * I,
> 0.001 + 0.003 * I,
> 0.0001 + 0.004 * I,
> 0.003 + 0.006 * I,
> 0.0001 + 0.005 * I,
> 0.0001 + 0.003 * I,
> 0.001 + 0.001 * I,
> 0.001 + 0.003 * I,
> 0.0001 + 0.004 * I,
> 0.003 + 0.006 * I,
> 0.0001 + 0.005 * I,
> 0.0001 + 0.003 * I,
> 0.001 + 0.001 * I,
> 0.001 + 0.003 * I,
> 0.0001 + 0.004 * I,
> 0.003 + 0.006 * I,
> 0.0001 + 0.005 * I,
> 0.0001 + 0.003 * I,
> 0.001 + 0.001 * I,
> 0.0001 + 0.004 * I,
> 0.003 + 0.006 * I,
> 0.0001 + 0.005 * I,
> 0.0001 + 0.003 * I,
> 0.001 + 0.001 * I,
> 0.001 + 0.003 * I,
> 0.0001 + 0.004 * I,
> 0.003 + 0.006 * I,
> 0.0001 + 0.005 * I,
> 0.0001 + 0.003 * I,
> 0.001 + 0.001 * I,
> 0.001 + 0.003 * I,
> 0.0001 + 0.004 * I,
> 0.003 + 0.006 * I,
> 0.0001 + 0.005 * I,
> 0.0001 + 0.003 * I,
> 0.001 + 0.001 * I,
> 0.001 + 0.003 * I,
> 0.0001 + 0.004 * I,
> 0.003 + 0.006 * I,
> 0.0001 + 0.005 * I,
> 0.0001 + 0.003 * I,
> 0.001 + 0.001 * I,
> 0.001 + 0.003 * I,
> 0.0001 + 0.004 * I,
> 0.003 + 0.006 * I,
> 0.0001 + 0.005 * I,
> 0.0001 + 0.003 * I,
> 0.001 + 0.001 * I,
> 0.0001 + 0.004 * I,
> 0.003 + 0.006 * I,
> 0.0001 + 0.005 * I,
> 0.0001 + 0.003 * I,
> 0.001 + 0.001 * I,
> 0.001 + 0.003 * I,
> 0.0001 + 0.004 * I,
> 0.003 + 0.006 * I,
> 0.0001 + 0.005 * I,
> 0.0001 + 0.003 * I,
> 0.001 + 0.001 * I,
> 0.001 + 0.003 * I,
> 0.0001 + 0.004 * I,
> 0.003 + 0.006 * I,
> 0.0001 + 0.005 * I,
> 0.0001 + 0.003 * I,
> 0.001 + 0.001 * I,
> 0.001 + 0.003 * I,
> 0.0001 + 0.004 * I,
> 0.003 + 0.006 * I,
> 0.0001 + 0.005 * I,
> 0.0001 + 0.003 * I,
> 0.001 + 0.001 * I,
> 0.001 + 0.003 * I,
> 0.0001 + 0.004 * I,
> 0.003 + 0.006 * I,
> 0.0001 + 0.005 * I,
> 0.0001 + 0.003 * I,
> 0.001 + 0.001 * I,
> 0.0001 + 0.004 * I,
> 0.003 + 0.006 * I,
> 0.0001 + 0.005 * I,
> 0.0001 + 0.003 * I,
> 0.001 + 0.001 * I,
> 0.001 + 0.003 * I,
> 0.0001 + 0.004 * I,
> 0.003 + 0.006 * I,
> 0.0001 + 0.005 * I,
> 0.0001 + 0.003 * I,
> 0.001 + 0.001 * I,
> 0.001 + 0.003 * I,
> 0.0001 + 0.004 * I,
> 0.003 + 0.006 * I,
> 0.0001 + 0.005 * I,
> 0.0001 + 0.003 * I,
> 0.001 + 0.001 * I,
> 0.001 + 0.003 * I,
> 0.0001 + 0.004 * I,
> 0.003 + 0.006 * I,
> 0.0001 + 0.005 * I,
> 0.0001 + 0.003 * I,
> 0.001 + 0.001 * I,
> 0.001 + 0.003 * I,
> 0.0001 + 0.004 * I,
> 0.003 + 0.006 * I,
> 0.0001 + 0.005 * I,
> 0.0001 + 0.003 * I,
> 0.001 + 0.001 * I,
> 0.0001 + 0.004 * I,
> 0.003 + 0.006 * I,
> 0.0001 + 0.005 * I,
> 0.0001 + 0.003 * I,
> 0.001 + 0.001 * I,
> 0.001 + 0.003 * I,
> 0.0001 + 0.004 * I,
> 0.003 + 0.006 * I,
> 0.0001 + 0.005 * I,
> 0.0001 + 0.003 * I,
> 0.001 + 0.001 * I,
> 0.001 + 0.003 * I,
> 0.0001 + 0.004 * I,
> 0.003 + 0.006 * I,
> 0.0001 + 0.005 * I,
> 0.0001 + 0.003 * I,
> 0.001 + 0.001 * I,
> 0.001 + 0.003 * I,
> 0.0001 + 0.004 * I,
> 0.003 + 0.006 * I,
> 0.0001 + 0.005 * I,
> 0.0001 + 0.003 * I,
> 0.001 + 0.001 * I,
> 0.001 + 0.003 * I,
> 0.0001 + 0.004 * I,
> 0.003 + 0.006 * I,
> 0.0001 + 0.005 * I,
> 0.0001 + 0.003 * I,
> 0.001 + 0.001 * I,
> 0.0001 + 0.004 * I,
> 0.003 + 0.006 * I,
> 0.0001 + 0.005 * I,
> 0.0001 + 0.003 * I,
> 0.001 + 0.001 * I,
> 0.001 + 0.003 * I,
> 0.0001 + 0.004 * I,
> 0.003 + 0.006 * I,
> 0.0001 + 0.005 * I,
> 0.0001 + 0.003 * I,
> 0.001 + 0.001 * I,
> 0.001 + 0.003 * I,
> 0.0001 + 0.004 * I,
> 0.003 + 0.006 * I,
> 0.0001 + 0.005 * I,
> 0.0001 + 0.003 * I,
> 0.001 + 0.001 * I,
> 0.001 + 0.003 * I,
> 0.0001 + 0.004 * I,
> 0.003 + 0.006 * I,
> 0.0001 + 0.005 * I,
> 0.0001 + 0.003 * I,
> 0.001 + 0.001 * I,
> 0.001 + 0.003 * I,
> 0.0001 + 0.004 * I,
> 0.003 + 0.006 * I,
> 0.0001 + 0.005 * I,
> 0.0001 + 0.003 * I,
> 0.001 + 0.001 * I,
> 0.0001 + 0.004 * I,
> 0.003 + 0.006 * I,
> 0.0001 + 0.005 * I,
> 0.0001 + 0.003 * I,
> 0.001 + 0.001 * I,
> 0.001 + 0.003 * I,
> 0.0001 + 0.004 * I,
> 0.0001 + 0.004 * I,
> 0.003 + 0.006 * I,
> 0.0001 + 0.005 * I,
> 0.0001 + 0.003 * I,
> 0.001 + 0.001 * I,
> 0.001 + 0.003 * I,
> 0.0001 + 0.004 * I,
> 0.003 + 0.006 * I,
> 0.0001 + 0.005 * I,
> 0.0001 + 0.003 * I,
> 0.001 + 0.001 * I,
> 0.001 + 0.003 * I,
> 0.0001 + 0.004 * I,
> 0.003 + 0.006 * I,
> 0.0001 + 0.005 * I,
> 0.0001 + 0.003 * I,
> 0.001 + 0.001 * I,
> 0.001 + 0.003 * I,
> 0.0001 + 0.004 * I,
> 0.003 + 0.006 * I,
> 0.0001 + 0.005 * I,
> 0.0001 + 0.003 * I,
> 0.001 + 0.001 * I,
> 0.001 + 0.003 * I,
> 0.0001 + 0.004 * I,
> 0.003 + 0.006 * I,
> 0.0001 + 0.005 * I,
> 0.0001 + 0.003 * I,
> 0.001 + 0.001 * I,
> 0.0001 + 0.004 * I,
> 0.003 + 0.006 * I,
> 0.0001 + 0.005 * I,
> 0.0001 + 0.003 * I,
> 0.001 + 0.001 * I,
> 0.001 + 0.003 * I,
> 0.0001 + 0.004 * I,
> 0.003 + 0.006 * I,
> 0.0001 + 0.005 * I,
> 0.0001 + 0.003 * I,
> 0.001 + 0.001 * I,
> 0.001 + 0.003 * I,
> 0.0001 + 0.004 * I,
> 0.003 + 0.006 * I,
> 0.0001 + 0.005 * I,
> 0.0001 + 0.003 * I,
> 0.001 + 0.001 * I,
> 0.001 + 0.003 * I,
> 0.0001 + 0.004 * I,
> 0.003 + 0.006 * I,
> 0.0001 + 0.005 * I,
> 0.0001 + 0.003 * I,
> 0.001 + 0.001 * I,
> 0.001 + 0.003 * I,
> 0.0001 + 0.004 * I,
> 0.003 + 0.006 * I,
> 0.0001 + 0.005 * I,
> 0.0001 + 0.003 * I,
> 0.001 + 0.001 * I,
> 0.0001 + 0.004 * I,
> 0.003 + 0.006 * I,
> 0.0001 + 0.005 * I,
> 0.0001 + 0.003 * I,
> 0.001 + 0.001 * I,
> 0.001 + 0.003 * I,
> 0.0001 + 0.004 * I,
> 0.003 + 0.006 * I,
> 0.0001 + 0.005 * I,
> 0.0001 + 0.003 * I,
> 0.001 + 0.001 * I,
> 0.001 + 0.003 * I,
> 0.0001 + 0.004 * I,
> 0.003 + 0.006 * I,
> 0.0001 + 0.005 * I,
> 0.0001 + 0.003 * I,
> 0.001 + 0.001 * I,
> 0.001 + 0.003 * I,
> 0.0001 + 0.004 * I,
> 0.003 + 0.006 * I,
> 0.0001 + 0.005 * I,
> 0.0001 + 0.003 * I,
> 0.001 + 0.001 * I,
> 0.001 + 0.003 * I,
> 0.0001 + 0.004 * I,
> 0.003 + 0.006 * I,
> 0.0001 + 0.005 * I,
> 0.0001 + 0.003 * I,
> 0.001 + 0.001 * I,
> 0.0001 + 0.004 * I,
> 0.003 + 0.006 * I,
> 0.0001 + 0.005 * I,
> 0.0001 + 0.003 * I,
> 0.001 + 0.001 * I,
> 0.001 + 0.003 * I,
> 0.0001 + 0.004 * I,
> 0.003 + 0.006 * I,
> 0.0001 + 0.005 * I,
> 0.0001 + 0.003 * I,
> 0.001 + 0.001 * I,
> 0.001 + 0.003 * I,
> 0.0001 + 0.004 * I,
> 0.003 + 0.006 * I,
> 0.0001 + 0.005 * I,
> 0.0001 + 0.003 * I,
> 0.001 + 0.001 * I,
> 0.001 + 0.003 * I,
> 0.0001 + 0.004 * I,
> 0.003 + 0.006 * I,
> 0.0001 + 0.005 * I,
> 0.0001 + 0.003 * I,
> 0.001 + 0.001 * I,
> 0.001 + 0.003 * I,
> 0.0001 + 0.004 * I,
> 0.003 + 0.006 * I,
> 0.0001 + 0.005 * I,
> 0.0001 + 0.003 * I,
> 0.001 + 0.001 * I,
> 0.0001 + 0.004 * I,
> 0.003 + 0.006 * I,
> 0.0001 + 0.005 * I,
> 0.0001 + 0.003 * I,
> 0.001 + 0.001 * I,
> 0.001 + 0.003 * I,
> 0.0001 + 0.004 * I,
> 0.003 + 0.006 * I,
> 0.0001 + 0.005 * I,
> 0.0001 + 0.003 * I,
> 0.001 + 0.001 * I,
> 0.001 + 0.003 * I,
> 0.0001 + 0.004 * I,
> 0.003 + 0.006 * I,
> 0.0001 + 0.005 * I,
> 0.0001 + 0.003 * I,
> 0.001 + 0.001 * I,
> 0.001 + 0.003 * I,
> 0.0001 + 0.004 * I,
> 0.003 + 0.006 * I,
> 0.0001 + 0.005 * I,
> 0.0001 + 0.003 * I,
> 0.001 + 0.001 * I,
> 0.001 + 0.003 * I,
> 0.0001 + 0.004 * I,
> 0.003 + 0.006 * I,
> 0.0001 + 0.005 * I,
> 0.0001 + 0.003 * I,
> 0.001 + 0.001 * I,
> 0.0001 + 0.004 * I,
> 0.003 + 0.006 * I,
> 0.0001 + 0.005 * I,
> 0.0001 + 0.003 * I,
> 0.001 + 0.001 * I,
> 0.001 + 0.003 * I,
> 0.0001 + 0.004 * I,
> 0.003 + 0.006 * I,
> 0.0001 + 0.005 * I,
> 0.0001 + 0.003 * I,
> 0.001 + 0.001 * I,
> 0.001 + 0.003 * I,
> 0.0001 + 0.004 * I,
> 0.003 + 0.006 * I,
> 0.0001 + 0.005 * I,
> 0.0001 + 0.003 * I,
> 0.001 + 0.001 * I,
> 0.001 + 0.003 * I,
> 0.0001 + 0.004 * I,
> 0.003 + 0.006 * I,
> 0.0001 + 0.005 * I,
> 0.0001 + 0.003 * I,
> 0.001 + 0.001 * I,
> 0.001 + 0.003 * I,
> 0.0001 + 0.004 * I,
> 0.003 + 0.006 * I,
> 0.0001 + 0.005 * I,
> 0.0001 + 0.003 * I,
> 0.001 + 0.001 * I,
> 0.003 + 0.006 * I,
> 0.0001 + 0.005 * I,
> 0.0001 + 0.003 * I,
> 0.001 + 0.001 * I,
> 0.001 + 0.003 * I,
> 0.0001 + 0.004 * I,
> 0.003 + 0.006 * I,
> 0.0001 + 0.005 * I,
> 0.0001 + 0.003 * I,
> 0.001 + 0.001 * I,
> 0.001 + 0.003 * I,
> 0.0001 + 0.004 * I,
> 0.003 + 0.006 * I,
> 0.0001 + 0.005 * I,
> 0.0001 + 0.003 * I,
> 0.001 + 0.001 * I,
> 0.001 + 0.003 * I,
> 0.0001 + 0.004 * I,
> 0.003 + 0.006 * I,
> 0.0001 + 0.005 * I,
> 0.0001 + 0.003 * I,
> 0.001 + 0.001 * I,
> 0.0001 + 0.004 * I,
> 0.003 + 0.006 * I,
> 0.0001 + 0.005 * I,
> 0.0001 + 0.003 * I,
> 0.001 + 0.001 * I,
> 0.001 + 0.003 * I,
> 0.0001 + 0.004 * I,
> 0.003 + 0.006 * I,
> 0.0001 + 0.005 * I,
> 0.0001 + 0.003 * I,
> 0.001 + 0.001 * I,
> 0.001 + 0.003 * I,
> 0.0001 + 0.004 * I,
> 0.003 + 0.006 * I,
> 0.0001 + 0.005 * I,
> 0.0001 + 0.003 * I,
> 0.001 + 0.001 * I,
> 0.001 + 0.003 * I,
> 0.0001 + 0.004 * I,
> 0.003 + 0.006 * I,
> 0.0001 + 0.005 * I,
> 0.0001 + 0.003 * I,
> 0.001 + 0.001 * I,
> 0.001 + 0.003 * I,
> 0.0001 + 0.004 * I,
> 0.003 + 0.006 * I,
> 0.0001 + 0.005 * I,
> 0.0001 + 0.003 * I,
> 0.001 + 0.001 * I,
> 0.0001 + 0.004 * I,
> 0.003 + 0.006 * I,
> 0.0001 + 0.005 * I,
> 0.0001 + 0.003 * I,
> 0.001 + 0.001 * I,
> 0.001 + 0.003 * I,
> 0.0001 + 0.004 * I,
> 0.003 + 0.006 * I,
> 0.0001 + 0.005 * I,
> 0.0001 + 0.003 * I,
> 0.001 + 0.001 * I,
> 0.001 + 0.003 * I,
> 0.0001 + 0.004 * I,
> 0.003 + 0.006 * I,
> 0.0001 + 0.005 * I,
> 0.0001 + 0.003 * I,
> 0.001 + 0.001 * I,
> 0.001 + 0.003 * I,
> 0.0001 + 0.004 * I,
> 0.003 + 0.006 * I,
> 0.0001 + 0.005 * I,
> 0.0001 + 0.003 * I,
> 0.001 + 0.001 * I,
> 0.001 + 0.003 * I,
> 0.0001 + 0.004 * I,
> 0.003 + 0.006 * I,
> 0.0001 + 0.005 * I,
> 0.0001 + 0.003 * I,
> 0.001 + 0.001 * I,
> 0.0001 + 0.004 * I,
> 0.003 + 0.006 * I,
> 0.0001 + 0.005 * I,
> 0.0001 + 0.003 * I,
> 0.001 + 0.001 * I,
> 0.001 + 0.003 * I,
> 0.0001 + 0.004 * I,
> 0.003 + 0.006 * I,
> 0.0001 + 0.005 * I,
> 0.0001 + 0.003 * I,
> 0.001 + 0.001 * I,
> 0.001 + 0.003 * I,
> 0.0001 + 0.004 * I,
> 0.003 + 0.006 * I,
> 0.0001 + 0.005 * I,
> 0.0001 + 0.003 * I,
> 0.001 + 0.001 * I,
> 0.001 + 0.003 * I,
> 0.0001 + 0.004 * I,
> 0.003 + 0.006 * I,
> 0.0001 + 0.005 * I,
> 0.0001 + 0.003 * I,
> 0.001 + 0.001 * I,
> 0.001 + 0.003 * I,
> 0.0001 + 0.004 * I,
> 0.003 + 0.006 * I,
> 0.0001 + 0.005 * I,
> 0.0001 + 0.003 * I,
> 0.001 + 0.001 * I,
> 0.0001 + 0.004 * I,
> 0.003 + 0.006 * I,
> 0.0001 + 0.005 * I,
> 0.0001 + 0.003 * I,
> 0.001 + 0.001 * I,
> 0.001 + 0.003 * I,
> 0.0001 + 0.004 * I,
> 0.003 + 0.006 * I,
> 0.0001 + 0.005 * I,
> 0.0001 + 0.003 * I,
> 0.001 + 0.001 * I,
> 0.001 + 0.003 * I,
> 0.0001 + 0.004 * I,
> 0.003 + 0.006 * I,
> 0.0001 + 0.005 * I,
> 0.0001 + 0.003 * I,
> 0.001 + 0.001 * I,
> 0.001 + 0.003 * I,
> 0.0001 + 0.004 * I,
> 0.003 + 0.006 * I,
> 0.0001 + 0.005 * I,
> 0.0001 + 0.003 * I,
> 0.001 + 0.001 * I,
> 0.001 + 0.003 * I,
> 0.0001 + 0.004 * I,
> 0.003 + 0.006 * I,
> 0.0001 + 0.005 * I,
> 0.0001 + 0.003 * I,
> 0.001 + 0.001 * I,
> 0.0001 + 0.004 * I,
> 0.003 + 0.006 * I,
> 0.0001 + 0.005 * I,
> 0.0001 + 0.003 * I,
> 0.001 + 0.001 * I,
> 0.001 + 0.003 * I,
> 0.0001 + 0.004 * I,
> 0.003 + 0.006 * I,
> 0.0001 + 0.005 * I,
> 0.0001 + 0.003 * I,
> 0.001 + 0.001 * I,
> 0.001 + 0.003 * I,
> 0.0001 + 0.004 * I,
> 0.003 + 0.006 * I,
> 0.0001 + 0.005 * I,
> 0.0001 + 0.003 * I,
> 0.001 + 0.001 * I,
> 0.001 + 0.003 * I,
> 0.0001 + 0.004 * I,
> 0.003 + 0.006 * I,
> 0.0001 + 0.005 * I,
> 0.0001 + 0.003 * I,
> 0.001 + 0.001 * I,
> 0.001 + 0.003 * I,
> 0.0001 + 0.004 * I,
> 0.003 + 0.006 * I,
> 0.0001 + 0.005 * I,
> 0.0001 + 0.003 * I,
> 0.001 + 0.001 * I,
> 0.0001 + 0.004 * I,
> 0.003 + 0.006 * I,
> 0.0001 + 0.005 * I,
> 0.0001 + 0.003 * I,
> 0.001 + 0.001 * I,
> 0.001 + 0.003 * I,
> 0.0001 + 0.004 * I,
> 0.003 + 0.006 * I,
> 0.0001 + 0.005 * I,
> 0.0001 + 0.003 * I,
> 0.001 + 0.001 * I,
> 0.001 + 0.003 * I,
> 0.0001 + 0.004 * I,
> 0.003 + 0.006 * I,
> 0.0001 + 0.005 * I,
> 0.0001 + 0.003 * I,
> 0.001 + 0.001 * I,
> 0.001 + 0.003 * I,
> 0.0001 + 0.004 * I,
> 0.003 + 0.006 * I,
> 0.0001 + 0.005 * I,
> 0.0001 + 0.003 * I,
> 0.001 + 0.001 * I,
> 0.001 + 0.003 * I,
> 0.0001 + 0.004 * I,
> 0.003 + 0.006 * I,
> 0.0001 + 0.005 * I,
> 0.0001 + 0.003 * I,
> 0.001 + 0.001 * I,
> 0.0001 + 0.004 * I,
> 0.003 + 0.006 * I,
> 0.0001 + 0.005 * I,
> 0.0001 + 0.003 * I,
> 0.001 + 0.001 * I,
> 0.001 + 0.003 * I,
> 0.0001 + 0.004 * I,
> 0.003 + 0.006 * I,
> 0.0001 + 0.005 * I,
> 0.0001 + 0.003 * I,
> 0.001 + 0.001 * I,
> 0.001 + 0.003 * I,
> 0.0001 + 0.004 * I,
> 0.003 + 0.006 * I,
> 0.0001 + 0.005 * I,
> 0.0001 + 0.003 * I,
> 0.001 + 0.001 * I,
> 0.001 + 0.003 * I,
> 0.0001 + 0.004 * I,
> 0.003 + 0.006 * I,
> 0.0001 + 0.005 * I,
> 0.0001 + 0.003 * I,
> 0.001 + 0.001 * I,
> 0.001 + 0.003 * I,
> 0.0001 + 0.004 * I,
> 0.003 + 0.006 * I,
> 0.0001 + 0.005 * I,
> 0.0001 + 0.003 * I,
> 0.001 + 0.001 * I,
> 0.0001 + 0.004 * I,
> 0.003 + 0.006 * I,
> 0.0001 + 0.005 * I,
> 0.0001 + 0.003 * I,
> 0.001 + 0.001 * I,
> 0.001 + 0.003 * I,
> 0.0001 + 0.004 * I,
> 0.003 + 0.006 * I,
> 0.0001 + 0.005 * I,
> 0.0001 + 0.003 * I,
> 0.001 + 0.001 * I,
> 0.001 + 0.003 * I,
> 0.0001 + 0.004 * I,
> 0.003 + 0.006 * I,
> 0.0001 + 0.005 * I,
> 0.0001 + 0.003 * I,
> 0.001 + 0.001 * I,
> 0.001 + 0.003 * I,
> 0.0001 + 0.004 * I,
> 0.003 + 0.006 * I,
> 0.0001 + 0.005 * I,
> 0.0001 + 0.003 * I,
> 0.001 + 0.001 * I,
> 0.001 + 0.003 * I,
> 0.0001 + 0.004 * I,
> 0.003 + 0.006 * I,
> 0.0001 + 0.005 * I,
> 0.0001 + 0.003 * I,
> 0.001 + 0.001 * I,
> 0.0001 + 0.004 * I,
> 0.003 + 0.006 * I,
> 0.0001 + 0.005 * I,
> 0.0001 + 0.003 * I,
> 0.001 + 0.001 * I,
> 0.001 + 0.003 * I,
> 0.0001 + 0.004 * I,
> 0.003 + 0.006 * I,
> 0.0001 + 0.005 * I,
> 0.0001 + 0.003 * I,
> 0.001 + 0.001 * I,
> 0.001 + 0.003 * I,
> 0.0001 + 0.004 * I,
> 0.003 + 0.006 * I,
> 0.0001 + 0.005 * I,
> 0.0001 + 0.003 * I,
> 0.001 + 0.001 * I,
> 0.001 + 0.003 * I,
> 0.0001 + 0.004 * I,
> 0.003 + 0.006 * I,
> 0.0001 + 0.005 * I,
> 0.0001 + 0.003 * I,
> 0.001 + 0.001 * I,
> 0.001 + 0.003 * I,
> 0.0001 + 0.004 * I,
> 0.003 + 0.006 * I,
> 0.0001 + 0.005 * I,
> 0.0001 + 0.003 * I,
> 0.001 + 0.001 * I,
> 0.0001 + 0.004 * I,
> 0.003 + 0.006 * I,
> 0.0001 + 0.005 * I,
> 0.0001 + 0.003 * I,
> 0.001 + 0.001 * I,
> 0.001 + 0.003 * I,
> 0.0001 + 0.004 * I,
> 0.003 + 0.006 * I,
> 0.0001 + 0.005 * I,
> 0.0001 + 0.003 * I,
> 0.001 + 0.001 * I,
> 0.001 + 0.003 * I,
> 0.0001 + 0.004 * I,
> 0.003 + 0.006 * I,
> 0.0001 + 0.005 * I,
> 0.0001 + 0.003 * I,
> 0.001 + 0.001 * I,
> 0.001 + 0.003 * I,
> 0.0001 + 0.004 * I,
> 0.003 + 0.006 * I,
> 0.0001 + 0.005 * I,
> 0.0001 + 0.003 * I,
> 0.001 + 0.001 * I,
> 0.001 + 0.003 * I,
> 0.0001 + 0.004 * I,
> 0.003 + 0.006 * I,
> 0.0001 + 0.005 * I,
> 0.0001 + 0.003 * I,
> 0.001 + 0.001 * I,
> 0.0001 + 0.004 * I,
> 0.003 + 0.006 * I,
> 0.0001 + 0.005 * I,
> 0.0001 + 0.003 * I,
> 0.001 + 0.001 * I,
> 0.001 + 0.003 * I,
> 0.0001 + 0.004 * I,
> 0.003 + 0.006 * I,
> 0.0001 + 0.005 * I,
> 0.0001 + 0.003 * I,
> 0.001 + 0.001 * I,
> 0.001 + 0.003 * I,
> 0.0001 + 0.004 * I,
> 0.003 + 0.006 * I,
> 0.0001 + 0.005 * I,
> 0.0001 + 0.003 * I,
> 0.001 + 0.001 * I,
> 0.001 + 0.003 * I,
> 0.0001 + 0.004 * I,
> 0.003 + 0.006 * I,
> 0.0001 + 0.005 * I,
> 0.0001 + 0.003 * I,
> 0.001 + 0.001 * I,
> 0.001 + 0.003 * I,
> 0.0001 + 0.004 * I,
> 0.003 + 0.006 * I,
> 0.0001 + 0.005 * I,
> 0.0001 + 0.003 * I,
> 0.001 + 0.001 * I,
> 0.0001 + 0.004 * I,
> 0.003 + 0.006 * I,
> 0.0001 + 0.005 * I,
> 0.0001 + 0.003 * I,
> 0.001 + 0.001 * I,
> 0.001 + 0.003 * I,
> 0.0001 + 0.004 * I,
> 0.003 + 0.006 * I,
> 0.0001 + 0.005 * I,
> 0.0001 + 0.003 * I,
> 0.001 + 0.001 * I,
> 0.001 + 0.003 * I,
> 0.0001 + 0.004 * I,
> 0.003 + 0.006 * I,
> 0.0001 + 0.005 * I,
> 0.0001 + 0.003 * I,
> 0.001 + 0.001 * I,
> 0.001 + 0.003 * I,
> 0.0001 + 0.004 * I,
> 0.003 + 0.006 * I,
> 0.0001 + 0.005 * I,
> 0.0001 + 0.003 * I,
> 0.001 + 0.001 * I,
> 0.001 + 0.003 * I,
> 0.0001 + 0.004 * I,
> 0.003 + 0.006 * I,
> 0.0001 + 0.005 * I,
> 0.0001 + 0.003 * I,
> 0.001 + 0.001 * I,
> 0.0001 + 0.004 * I,
> 0.003 + 0.006 * I,
> 0.0001 + 0.005 * I,
> 0.0001 + 0.003 * I,
> 0.001 + 0.001 * I,
> 0.001 + 0.003 * I,
> 0.0001 + 0.004 * I,
> 0.003 + 0.006 * I,
> 0.0001 + 0.005 * I,
> 0.0001 + 0.003 * I,
> 0.001 + 0.001 * I,
> 0.001 + 0.003 * I,
> 0.0001 + 0.004 * I,
> 0.003 + 0.006 * I,
> 0.0001 + 0.005 * I,
> 0.0001 + 0.003 * I,
> 0.001 + 0.001 * I,
> 0.001 + 0.003 * I,
> 0.0001 + 0.004 * I,
> 0.003 + 0.006 * I,
> 0.0001 + 0.005 * I,
> 0.0001 + 0.003 * I,
> 0.001 + 0.001 * I,
> 0.001 + 0.003 * I,
> 0.0001 + 0.004 * I,
> 0.003 + 0.006 * I,
> 0.0001 + 0.005 * I,
> 0.0001 + 0.003 * I,
> 0.001 + 0.001 * I,
> 0.001 + 0.003 * I,
> 0.000 + 0.000 * I ];
> glob_nxt := glob_nxt + 1;
> it := x_delta[glob_nxt];
> return it;
> end;
Warning, `it` is implicitly declared local to procedure `next_delta`
next_delta := proc()
local it;
global glob_nxt, x_delta;
x_delta := [0.001 + 0.00004*I, 0.0001 + 0.004*I, 0.003 + 0.006*I,
0.0001 + 0.005*I, 0.0001 + 0.003*I, 0.001 + 0.001*I,
0.001 + 0.003*I, 0.0001 + 0.004*I, 0.003 + 0.006*I,
0.0001 + 0.005*I, 0.0001 + 0.003*I, 0.001 + 0.001*I,
0.001 + 0.003*I, 0.0001 + 0.004*I, 0.003 + 0.006*I,
0.0001 + 0.005*I, 0.0001 + 0.003*I, 0.001 + 0.001*I,
0.001 + 0.003*I, 0.0001 + 0.004*I, 0.003 + 0.006*I,
0.0001 + 0.005*I, 0.0001 + 0.003*I, 0.001 + 0.001*I,
0.001 + 0.003*I, 0.0001 + 0.004*I, 0.003 + 0.006*I,
0.0001 + 0.005*I, 0.0001 + 0.003*I, 0.001 + 0.001*I,
0.0001 + 0.004*I, 0.003 + 0.006*I, 0.0001 + 0.005*I,
0.0001 + 0.003*I, 0.001 + 0.001*I, 0.001 + 0.003*I,
0.0001 + 0.004*I, 0.003 + 0.006*I, 0.0001 + 0.005*I,
0.0001 + 0.003*I, 0.001 + 0.001*I, 0.001 + 0.003*I,
0.0001 + 0.004*I, 0.003 + 0.006*I, 0.0001 + 0.005*I,
0.0001 + 0.003*I, 0.001 + 0.001*I, 0.001 + 0.003*I,
0.0001 + 0.004*I, 0.003 + 0.006*I, 0.0001 + 0.005*I,
0.0001 + 0.003*I, 0.001 + 0.001*I, 0.001 + 0.003*I,
0.0001 + 0.004*I, 0.003 + 0.006*I, 0.0001 + 0.005*I,
0.0001 + 0.003*I, 0.001 + 0.001*I, 0.0001 + 0.004*I,
0.003 + 0.006*I, 0.0001 + 0.005*I, 0.0001 + 0.003*I,
0.001 + 0.001*I, 0.001 + 0.003*I, 0.0001 + 0.004*I, 0.003 + 0.006*I,
0.0001 + 0.005*I, 0.0001 + 0.003*I, 0.001 + 0.001*I,
0.001 + 0.003*I, 0.0001 + 0.004*I, 0.003 + 0.006*I,
0.0001 + 0.005*I, 0.0001 + 0.003*I, 0.001 + 0.001*I,
0.001 + 0.003*I, 0.0001 + 0.004*I, 0.003 + 0.006*I,
0.0001 + 0.005*I, 0.0001 + 0.003*I, 0.001 + 0.001*I,
0.001 + 0.003*I, 0.0001 + 0.004*I, 0.003 + 0.006*I,
0.0001 + 0.005*I, 0.0001 + 0.003*I, 0.001 + 0.001*I,
0.0001 + 0.004*I, 0.003 + 0.006*I, 0.0001 + 0.005*I,
0.0001 + 0.003*I, 0.001 + 0.001*I, 0.001 + 0.003*I,
0.0001 + 0.004*I, 0.003 + 0.006*I, 0.0001 + 0.005*I,
0.0001 + 0.003*I, 0.001 + 0.001*I, 0.001 + 0.003*I,
0.0001 + 0.004*I, 0.003 + 0.006*I, 0.0001 + 0.005*I,
0.0001 + 0.003*I, 0.001 + 0.001*I, 0.001 + 0.003*I,
0.0001 + 0.004*I, 0.003 + 0.006*I, 0.0001 + 0.005*I,
0.0001 + 0.003*I, 0.001 + 0.001*I, 0.001 + 0.003*I,
0.0001 + 0.004*I, 0.003 + 0.006*I, 0.0001 + 0.005*I,
0.0001 + 0.003*I, 0.001 + 0.001*I, 0.0001 + 0.004*I,
0.003 + 0.006*I, 0.0001 + 0.005*I, 0.0001 + 0.003*I,
0.001 + 0.001*I, 0.001 + 0.003*I, 0.0001 + 0.004*I, 0.003 + 0.006*I,
0.0001 + 0.005*I, 0.0001 + 0.003*I, 0.001 + 0.001*I,
0.001 + 0.003*I, 0.0001 + 0.004*I, 0.003 + 0.006*I,
0.0001 + 0.005*I, 0.0001 + 0.003*I, 0.001 + 0.001*I,
0.001 + 0.003*I, 0.0001 + 0.004*I, 0.003 + 0.006*I,
0.0001 + 0.005*I, 0.0001 + 0.003*I, 0.001 + 0.001*I,
0.001 + 0.003*I, 0.0001 + 0.004*I, 0.003 + 0.006*I,
0.0001 + 0.005*I, 0.0001 + 0.003*I, 0.001 + 0.001*I,
0.0001 + 0.004*I, 0.003 + 0.006*I, 0.0001 + 0.005*I,
0.0001 + 0.003*I, 0.001 + 0.001*I, 0.001 + 0.003*I,
0.0001 + 0.004*I, 0.003 + 0.006*I, 0.0001 + 0.005*I,
0.0001 + 0.003*I, 0.001 + 0.001*I, 0.001 + 0.003*I,
0.0001 + 0.004*I, 0.003 + 0.006*I, 0.0001 + 0.005*I,
0.0001 + 0.003*I, 0.001 + 0.001*I, 0.001 + 0.003*I,
0.0001 + 0.004*I, 0.003 + 0.006*I, 0.0001 + 0.005*I,
0.0001 + 0.003*I, 0.001 + 0.001*I, 0.001 + 0.003*I,
0.0001 + 0.004*I, 0.003 + 0.006*I, 0.0001 + 0.005*I,
0.0001 + 0.003*I, 0.001 + 0.001*I, 0.0001 + 0.004*I,
0.003 + 0.006*I, 0.0001 + 0.005*I, 0.0001 + 0.003*I,
0.001 + 0.001*I, 0.001 + 0.003*I, 0.0001 + 0.004*I,
0.0001 + 0.004*I, 0.003 + 0.006*I, 0.0001 + 0.005*I,
0.0001 + 0.003*I, 0.001 + 0.001*I, 0.001 + 0.003*I,
0.0001 + 0.004*I, 0.003 + 0.006*I, 0.0001 + 0.005*I,
0.0001 + 0.003*I, 0.001 + 0.001*I, 0.001 + 0.003*I,
0.0001 + 0.004*I, 0.003 + 0.006*I, 0.0001 + 0.005*I,
0.0001 + 0.003*I, 0.001 + 0.001*I, 0.001 + 0.003*I,
0.0001 + 0.004*I, 0.003 + 0.006*I, 0.0001 + 0.005*I,
0.0001 + 0.003*I, 0.001 + 0.001*I, 0.001 + 0.003*I,
0.0001 + 0.004*I, 0.003 + 0.006*I, 0.0001 + 0.005*I,
0.0001 + 0.003*I, 0.001 + 0.001*I, 0.0001 + 0.004*I,
0.003 + 0.006*I, 0.0001 + 0.005*I, 0.0001 + 0.003*I,
0.001 + 0.001*I, 0.001 + 0.003*I, 0.0001 + 0.004*I, 0.003 + 0.006*I,
0.0001 + 0.005*I, 0.0001 + 0.003*I, 0.001 + 0.001*I,
0.001 + 0.003*I, 0.0001 + 0.004*I, 0.003 + 0.006*I,
0.0001 + 0.005*I, 0.0001 + 0.003*I, 0.001 + 0.001*I,
0.001 + 0.003*I, 0.0001 + 0.004*I, 0.003 + 0.006*I,
0.0001 + 0.005*I, 0.0001 + 0.003*I, 0.001 + 0.001*I,
0.001 + 0.003*I, 0.0001 + 0.004*I, 0.003 + 0.006*I,
0.0001 + 0.005*I, 0.0001 + 0.003*I, 0.001 + 0.001*I,
0.0001 + 0.004*I, 0.003 + 0.006*I, 0.0001 + 0.005*I,
0.0001 + 0.003*I, 0.001 + 0.001*I, 0.001 + 0.003*I,
0.0001 + 0.004*I, 0.003 + 0.006*I, 0.0001 + 0.005*I,
0.0001 + 0.003*I, 0.001 + 0.001*I, 0.001 + 0.003*I,
0.0001 + 0.004*I, 0.003 + 0.006*I, 0.0001 + 0.005*I,
0.0001 + 0.003*I, 0.001 + 0.001*I, 0.001 + 0.003*I,
0.0001 + 0.004*I, 0.003 + 0.006*I, 0.0001 + 0.005*I,
0.0001 + 0.003*I, 0.001 + 0.001*I, 0.001 + 0.003*I,
0.0001 + 0.004*I, 0.003 + 0.006*I, 0.0001 + 0.005*I,
0.0001 + 0.003*I, 0.001 + 0.001*I, 0.0001 + 0.004*I,
0.003 + 0.006*I, 0.0001 + 0.005*I, 0.0001 + 0.003*I,
0.001 + 0.001*I, 0.001 + 0.003*I, 0.0001 + 0.004*I, 0.003 + 0.006*I,
0.0001 + 0.005*I, 0.0001 + 0.003*I, 0.001 + 0.001*I,
0.001 + 0.003*I, 0.0001 + 0.004*I, 0.003 + 0.006*I,
0.0001 + 0.005*I, 0.0001 + 0.003*I, 0.001 + 0.001*I,
0.001 + 0.003*I, 0.0001 + 0.004*I, 0.003 + 0.006*I,
0.0001 + 0.005*I, 0.0001 + 0.003*I, 0.001 + 0.001*I,
0.001 + 0.003*I, 0.0001 + 0.004*I, 0.003 + 0.006*I,
0.0001 + 0.005*I, 0.0001 + 0.003*I, 0.001 + 0.001*I,
0.0001 + 0.004*I, 0.003 + 0.006*I, 0.0001 + 0.005*I,
0.0001 + 0.003*I, 0.001 + 0.001*I, 0.001 + 0.003*I,
0.0001 + 0.004*I, 0.003 + 0.006*I, 0.0001 + 0.005*I,
0.0001 + 0.003*I, 0.001 + 0.001*I, 0.001 + 0.003*I,
0.0001 + 0.004*I, 0.003 + 0.006*I, 0.0001 + 0.005*I,
0.0001 + 0.003*I, 0.001 + 0.001*I, 0.001 + 0.003*I,
0.0001 + 0.004*I, 0.003 + 0.006*I, 0.0001 + 0.005*I,
0.0001 + 0.003*I, 0.001 + 0.001*I, 0.001 + 0.003*I,
0.0001 + 0.004*I, 0.003 + 0.006*I, 0.0001 + 0.005*I,
0.0001 + 0.003*I, 0.001 + 0.001*I, 0.0001 + 0.004*I,
0.003 + 0.006*I, 0.0001 + 0.005*I, 0.0001 + 0.003*I,
0.001 + 0.001*I, 0.001 + 0.003*I, 0.0001 + 0.004*I, 0.003 + 0.006*I,
0.0001 + 0.005*I, 0.0001 + 0.003*I, 0.001 + 0.001*I,
0.001 + 0.003*I, 0.0001 + 0.004*I, 0.003 + 0.006*I,
0.0001 + 0.005*I, 0.0001 + 0.003*I, 0.001 + 0.001*I,
0.001 + 0.003*I, 0.0001 + 0.004*I, 0.003 + 0.006*I,
0.0001 + 0.005*I, 0.0001 + 0.003*I, 0.001 + 0.001*I,
0.001 + 0.003*I, 0.0001 + 0.004*I, 0.003 + 0.006*I,
0.0001 + 0.005*I, 0.0001 + 0.003*I, 0.001 + 0.001*I,
0.003 + 0.006*I, 0.0001 + 0.005*I, 0.0001 + 0.003*I,
0.001 + 0.001*I, 0.001 + 0.003*I, 0.0001 + 0.004*I, 0.003 + 0.006*I,
0.0001 + 0.005*I, 0.0001 + 0.003*I, 0.001 + 0.001*I,
0.001 + 0.003*I, 0.0001 + 0.004*I, 0.003 + 0.006*I,
0.0001 + 0.005*I, 0.0001 + 0.003*I, 0.001 + 0.001*I,
0.001 + 0.003*I, 0.0001 + 0.004*I, 0.003 + 0.006*I,
0.0001 + 0.005*I, 0.0001 + 0.003*I, 0.001 + 0.001*I,
0.0001 + 0.004*I, 0.003 + 0.006*I, 0.0001 + 0.005*I,
0.0001 + 0.003*I, 0.001 + 0.001*I, 0.001 + 0.003*I,
0.0001 + 0.004*I, 0.003 + 0.006*I, 0.0001 + 0.005*I,
0.0001 + 0.003*I, 0.001 + 0.001*I, 0.001 + 0.003*I,
0.0001 + 0.004*I, 0.003 + 0.006*I, 0.0001 + 0.005*I,
0.0001 + 0.003*I, 0.001 + 0.001*I, 0.001 + 0.003*I,
0.0001 + 0.004*I, 0.003 + 0.006*I, 0.0001 + 0.005*I,
0.0001 + 0.003*I, 0.001 + 0.001*I, 0.001 + 0.003*I,
0.0001 + 0.004*I, 0.003 + 0.006*I, 0.0001 + 0.005*I,
0.0001 + 0.003*I, 0.001 + 0.001*I, 0.0001 + 0.004*I,
0.003 + 0.006*I, 0.0001 + 0.005*I, 0.0001 + 0.003*I,
0.001 + 0.001*I, 0.001 + 0.003*I, 0.0001 + 0.004*I, 0.003 + 0.006*I,
0.0001 + 0.005*I, 0.0001 + 0.003*I, 0.001 + 0.001*I,
0.001 + 0.003*I, 0.0001 + 0.004*I, 0.003 + 0.006*I,
0.0001 + 0.005*I, 0.0001 + 0.003*I, 0.001 + 0.001*I,
0.001 + 0.003*I, 0.0001 + 0.004*I, 0.003 + 0.006*I,
0.0001 + 0.005*I, 0.0001 + 0.003*I, 0.001 + 0.001*I,
0.001 + 0.003*I, 0.0001 + 0.004*I, 0.003 + 0.006*I,
0.0001 + 0.005*I, 0.0001 + 0.003*I, 0.001 + 0.001*I,
0.0001 + 0.004*I, 0.003 + 0.006*I, 0.0001 + 0.005*I,
0.0001 + 0.003*I, 0.001 + 0.001*I, 0.001 + 0.003*I,
0.0001 + 0.004*I, 0.003 + 0.006*I, 0.0001 + 0.005*I,
0.0001 + 0.003*I, 0.001 + 0.001*I, 0.001 + 0.003*I,
0.0001 + 0.004*I, 0.003 + 0.006*I, 0.0001 + 0.005*I,
0.0001 + 0.003*I, 0.001 + 0.001*I, 0.001 + 0.003*I,
0.0001 + 0.004*I, 0.003 + 0.006*I, 0.0001 + 0.005*I,
0.0001 + 0.003*I, 0.001 + 0.001*I, 0.001 + 0.003*I,
0.0001 + 0.004*I, 0.003 + 0.006*I, 0.0001 + 0.005*I,
0.0001 + 0.003*I, 0.001 + 0.001*I, 0.0001 + 0.004*I,
0.003 + 0.006*I, 0.0001 + 0.005*I, 0.0001 + 0.003*I,
0.001 + 0.001*I, 0.001 + 0.003*I, 0.0001 + 0.004*I, 0.003 + 0.006*I,
0.0001 + 0.005*I, 0.0001 + 0.003*I, 0.001 + 0.001*I,
0.001 + 0.003*I, 0.0001 + 0.004*I, 0.003 + 0.006*I,
0.0001 + 0.005*I, 0.0001 + 0.003*I, 0.001 + 0.001*I,
0.001 + 0.003*I, 0.0001 + 0.004*I, 0.003 + 0.006*I,
0.0001 + 0.005*I, 0.0001 + 0.003*I, 0.001 + 0.001*I,
0.001 + 0.003*I, 0.0001 + 0.004*I, 0.003 + 0.006*I,
0.0001 + 0.005*I, 0.0001 + 0.003*I, 0.001 + 0.001*I,
0.0001 + 0.004*I, 0.003 + 0.006*I, 0.0001 + 0.005*I,
0.0001 + 0.003*I, 0.001 + 0.001*I, 0.001 + 0.003*I,
0.0001 + 0.004*I, 0.003 + 0.006*I, 0.0001 + 0.005*I,
0.0001 + 0.003*I, 0.001 + 0.001*I, 0.001 + 0.003*I,
0.0001 + 0.004*I, 0.003 + 0.006*I, 0.0001 + 0.005*I,
0.0001 + 0.003*I, 0.001 + 0.001*I, 0.001 + 0.003*I,
0.0001 + 0.004*I, 0.003 + 0.006*I, 0.0001 + 0.005*I,
0.0001 + 0.003*I, 0.001 + 0.001*I, 0.001 + 0.003*I,
0.0001 + 0.004*I, 0.003 + 0.006*I, 0.0001 + 0.005*I,
0.0001 + 0.003*I, 0.001 + 0.001*I, 0.0001 + 0.004*I,
0.003 + 0.006*I, 0.0001 + 0.005*I, 0.0001 + 0.003*I,
0.001 + 0.001*I, 0.001 + 0.003*I, 0.0001 + 0.004*I, 0.003 + 0.006*I,
0.0001 + 0.005*I, 0.0001 + 0.003*I, 0.001 + 0.001*I,
0.001 + 0.003*I, 0.0001 + 0.004*I, 0.003 + 0.006*I,
0.0001 + 0.005*I, 0.0001 + 0.003*I, 0.001 + 0.001*I,
0.001 + 0.003*I, 0.0001 + 0.004*I, 0.003 + 0.006*I,
0.0001 + 0.005*I, 0.0001 + 0.003*I, 0.001 + 0.001*I,
0.001 + 0.003*I, 0.0001 + 0.004*I, 0.003 + 0.006*I,
0.0001 + 0.005*I, 0.0001 + 0.003*I, 0.001 + 0.001*I,
0.0001 + 0.004*I, 0.003 + 0.006*I, 0.0001 + 0.005*I,
0.0001 + 0.003*I, 0.001 + 0.001*I, 0.001 + 0.003*I,
0.0001 + 0.004*I, 0.003 + 0.006*I, 0.0001 + 0.005*I,
0.0001 + 0.003*I, 0.001 + 0.001*I, 0.001 + 0.003*I,
0.0001 + 0.004*I, 0.003 + 0.006*I, 0.0001 + 0.005*I,
0.0001 + 0.003*I, 0.001 + 0.001*I, 0.001 + 0.003*I,
0.0001 + 0.004*I, 0.003 + 0.006*I, 0.0001 + 0.005*I,
0.0001 + 0.003*I, 0.001 + 0.001*I, 0.001 + 0.003*I,
0.0001 + 0.004*I, 0.003 + 0.006*I, 0.0001 + 0.005*I,
0.0001 + 0.003*I, 0.001 + 0.001*I, 0.0001 + 0.004*I,
0.003 + 0.006*I, 0.0001 + 0.005*I, 0.0001 + 0.003*I,
0.001 + 0.001*I, 0.001 + 0.003*I, 0.0001 + 0.004*I, 0.003 + 0.006*I,
0.0001 + 0.005*I, 0.0001 + 0.003*I, 0.001 + 0.001*I,
0.001 + 0.003*I, 0.0001 + 0.004*I, 0.003 + 0.006*I,
0.0001 + 0.005*I, 0.0001 + 0.003*I, 0.001 + 0.001*I,
0.001 + 0.003*I, 0.0001 + 0.004*I, 0.003 + 0.006*I,
0.0001 + 0.005*I, 0.0001 + 0.003*I, 0.001 + 0.001*I,
0.001 + 0.003*I, 0.0001 + 0.004*I, 0.003 + 0.006*I,
0.0001 + 0.005*I, 0.0001 + 0.003*I, 0.001 + 0.001*I,
0.0001 + 0.004*I, 0.003 + 0.006*I, 0.0001 + 0.005*I,
0.0001 + 0.003*I, 0.001 + 0.001*I, 0.001 + 0.003*I,
0.0001 + 0.004*I, 0.003 + 0.006*I, 0.0001 + 0.005*I,
0.0001 + 0.003*I, 0.001 + 0.001*I, 0.001 + 0.003*I,
0.0001 + 0.004*I, 0.003 + 0.006*I, 0.0001 + 0.005*I,
0.0001 + 0.003*I, 0.001 + 0.001*I, 0.001 + 0.003*I,
0.0001 + 0.004*I, 0.003 + 0.006*I, 0.0001 + 0.005*I,
0.0001 + 0.003*I, 0.001 + 0.001*I, 0.001 + 0.003*I,
0.0001 + 0.004*I, 0.003 + 0.006*I, 0.0001 + 0.005*I,
0.0001 + 0.003*I, 0.001 + 0.001*I, 0.0001 + 0.004*I,
0.003 + 0.006*I, 0.0001 + 0.005*I, 0.0001 + 0.003*I,
0.001 + 0.001*I, 0.001 + 0.003*I, 0.0001 + 0.004*I, 0.003 + 0.006*I,
0.0001 + 0.005*I, 0.0001 + 0.003*I, 0.001 + 0.001*I,
0.001 + 0.003*I, 0.0001 + 0.004*I, 0.003 + 0.006*I,
0.0001 + 0.005*I, 0.0001 + 0.003*I, 0.001 + 0.001*I,
0.001 + 0.003*I, 0.0001 + 0.004*I, 0.003 + 0.006*I,
0.0001 + 0.005*I, 0.0001 + 0.003*I, 0.001 + 0.001*I,
0.001 + 0.003*I, 0.0001 + 0.004*I, 0.003 + 0.006*I,
0.0001 + 0.005*I, 0.0001 + 0.003*I, 0.001 + 0.001*I,
0.0001 + 0.004*I, 0.003 + 0.006*I, 0.0001 + 0.005*I,
0.0001 + 0.003*I, 0.001 + 0.001*I, 0.001 + 0.003*I,
0.0001 + 0.004*I, 0.003 + 0.006*I, 0.0001 + 0.005*I,
0.0001 + 0.003*I, 0.001 + 0.001*I, 0.001 + 0.003*I,
0.0001 + 0.004*I, 0.003 + 0.006*I, 0.0001 + 0.005*I,
0.0001 + 0.003*I, 0.001 + 0.001*I, 0.001 + 0.003*I,
0.0001 + 0.004*I, 0.003 + 0.006*I, 0.0001 + 0.005*I,
0.0001 + 0.003*I, 0.001 + 0.001*I, 0.001 + 0.003*I,
0.0001 + 0.004*I, 0.003 + 0.006*I, 0.0001 + 0.005*I,
0.0001 + 0.003*I, 0.001 + 0.001*I, 0.0001 + 0.004*I,
0.003 + 0.006*I, 0.0001 + 0.005*I, 0.0001 + 0.003*I,
0.001 + 0.001*I, 0.001 + 0.003*I, 0.0001 + 0.004*I, 0.003 + 0.006*I,
0.0001 + 0.005*I, 0.0001 + 0.003*I, 0.001 + 0.001*I,
0.001 + 0.003*I, 0.0001 + 0.004*I, 0.003 + 0.006*I,
0.0001 + 0.005*I, 0.0001 + 0.003*I, 0.001 + 0.001*I,
0.001 + 0.003*I, 0.0001 + 0.004*I, 0.003 + 0.006*I,
0.0001 + 0.005*I, 0.0001 + 0.003*I, 0.001 + 0.001*I,
0.001 + 0.003*I, 0.0001 + 0.004*I, 0.003 + 0.006*I,
0.0001 + 0.005*I, 0.0001 + 0.003*I, 0.001 + 0.001*I,
0.0001 + 0.004*I, 0.003 + 0.006*I, 0.0001 + 0.005*I,
0.0001 + 0.003*I, 0.001 + 0.001*I, 0.001 + 0.003*I,
0.0001 + 0.004*I, 0.003 + 0.006*I, 0.0001 + 0.005*I,
0.0001 + 0.003*I, 0.001 + 0.001*I, 0.001 + 0.003*I,
0.0001 + 0.004*I, 0.003 + 0.006*I, 0.0001 + 0.005*I,
0.0001 + 0.003*I, 0.001 + 0.001*I, 0.001 + 0.003*I,
0.0001 + 0.004*I, 0.003 + 0.006*I, 0.0001 + 0.005*I,
0.0001 + 0.003*I, 0.001 + 0.001*I, 0.001 + 0.003*I,
0.0001 + 0.004*I, 0.003 + 0.006*I, 0.0001 + 0.005*I,
0.0001 + 0.003*I, 0.001 + 0.001*I, 0.001 + 0.003*I, 0. + 0.*I];
glob_nxt := glob_nxt + 1;
it := x_delta[glob_nxt];
return it
end proc
#END USER DEF BLOCK
#END BLOCK 3
#END USER FUNCTION BLOCK
# before write_aux functions
# Begin Function number 2
> display_poles := proc()
> local rad_given;
> global ALWAYS,glob_display_flag,glob_larger_float, glob_large_float, glob_diff_ord_fm, glob_diff_ord_fmm1, glob_diff_ord_fmm2, glob_diff_rc_fm, glob_diff_rc_fmm1, glob_diff_rc_fmm2, glob_guess_error_ord, glob_guess_error_rc, glob_type_given_pole,array_given_rad_poles,array_given_ord_poles,array_rad_test_poles,array_ord_test_poles,glob_least_3_sing,glob_least_6_sing,glob_least_given_sing,glob_least_ratio_sing,array_x ;
> if ((glob_type_given_pole = 1) or (glob_type_given_pole = 2)) then # if number 1
> rad_given := float_abs(array_x[1] - (array_given_rad_poles[1,1] + array_given_rad_poles[1,2] * I ));
> omniout_float(ALWAYS,"Radius of convergence (given) for eq 1 ",4,rad_given,4," ");
> omniout_complex(ALWAYS,"Order of pole (given) ",4,array_given_ord_poles[1,1],4," ");
> if ((float_abs(rad_given) < float_abs(glob_least_given_sing)) and
> (float_abs(rad_given) > 0.0)) then # if number 2
> glob_least_given_sing := rad_given;
> fi;# end if 2;
> elif
> (glob_type_given_pole = 3) then # if number 2
> omniout_str(ALWAYS,"NO POLE (given) for Equation 1");
> elif
> (glob_type_given_pole = 5) then # if number 3
> omniout_str(ALWAYS,"SOME POLE (given) for Equation 1");
> else
> omniout_str(ALWAYS,"NO INFO (given) for Equation 1");
> fi;# end if 3;
> if (array_rad_test_poles[1,1] < glob_large_float) then # if number 3
> omniout_float(ALWAYS,"Radius of convergence (ratio test) for eq 1 ",4,array_rad_test_poles[1,1],4," ");
> if ((float_abs(array_rad_test_poles[1,1]) < glob_least_ratio_sing)) then # if number 4
> glob_least_ratio_sing := array_rad_test_poles[1,1];
> fi;# end if 4;
> omniout_complex(ALWAYS,"Order of pole (ratio test) ",4, array_ord_test_poles[1,1],4," ");
> else
> omniout_str(ALWAYS,"NO POLE (ratio test) for Equation 1");
> fi;# end if 3;
> if ((array_rad_test_poles[1,2] > glob__small) and (array_rad_test_poles[1,2] < glob_large_float)) then # if number 3
> omniout_float(ALWAYS,"Radius of convergence (three term test) for eq 1 ",4,array_rad_test_poles[1,2],4," ");
> if ((float_abs(array_rad_test_poles[1,2]) < glob_least_3_sing)) then # if number 4
> glob_least_3_sing := array_rad_test_poles[1,2];
> fi;# end if 4;
> omniout_complex(ALWAYS,"Order of pole (three term test) ",4, array_ord_test_poles[1,2],4," ");
> else
> omniout_str(ALWAYS,"NO REAL POLE (three term test) for Equation 1");
> fi;# end if 3;
> if ((array_rad_test_poles[1,3] > glob__small) and (array_rad_test_poles[1,3] < glob_large_float)) then # if number 3
> omniout_float(ALWAYS,"Radius of convergence (six term test) for eq 1 ",4,array_rad_test_poles[1,3],4," ");
> if ((float_abs(array_rad_test_poles[1,3]) < glob_least_6_sing)) then # if number 4
> glob_least_6_sing := array_rad_test_poles[1,3];
> fi;# end if 4;
> omniout_complex(ALWAYS,"Order of pole (six term test) ",4, array_ord_test_poles[1,3],4," ");
> else
> omniout_str(ALWAYS,"NO COMPLEX POLE (six term test) for Equation 1");
> fi;# end if 3
> ;
> end;
display_poles := proc()
local rad_given;
global ALWAYS, glob_display_flag, glob_larger_float, glob_large_float,
glob_diff_ord_fm, glob_diff_ord_fmm1, glob_diff_ord_fmm2, glob_diff_rc_fm,
glob_diff_rc_fmm1, glob_diff_rc_fmm2, glob_guess_error_ord,
glob_guess_error_rc, glob_type_given_pole, array_given_rad_poles,
array_given_ord_poles, array_rad_test_poles, array_ord_test_poles,
glob_least_3_sing, glob_least_6_sing, glob_least_given_sing,
glob_least_ratio_sing, array_x;
if glob_type_given_pole = 1 or glob_type_given_pole = 2 then
rad_given := float_abs(array_x[1] - array_given_rad_poles[1, 1]
- array_given_rad_poles[1, 2]*I);
omniout_float(ALWAYS,
"Radius of convergence (given) for eq 1 ", 4,
rad_given, 4, " ");
omniout_complex(ALWAYS,
"Order of pole (given) ", 4,
array_given_ord_poles[1, 1], 4, " ");
if float_abs(rad_given) < float_abs(glob_least_given_sing) and
0. < float_abs(rad_given) then glob_least_given_sing := rad_given
end if
elif glob_type_given_pole = 3 then
omniout_str(ALWAYS, "NO POLE (given) for Equation 1")
elif glob_type_given_pole = 5 then
omniout_str(ALWAYS, "SOME POLE (given) for Equation 1")
else omniout_str(ALWAYS, "NO INFO (given) for Equation 1")
end if;
if array_rad_test_poles[1, 1] < glob_large_float then
omniout_float(ALWAYS,
"Radius of convergence (ratio test) for eq 1 ", 4,
array_rad_test_poles[1, 1], 4, " ");
if float_abs(array_rad_test_poles[1, 1]) < glob_least_ratio_sing
then glob_least_ratio_sing := array_rad_test_poles[1, 1]
end if;
omniout_complex(ALWAYS,
"Order of pole (ratio test) ", 4,
array_ord_test_poles[1, 1], 4, " ")
else omniout_str(ALWAYS, "NO POLE (ratio test) for Equation 1")
end if;
if glob__small < array_rad_test_poles[1, 2] and
array_rad_test_poles[1, 2] < glob_large_float then
omniout_float(ALWAYS,
"Radius of convergence (three term test) for eq 1 ", 4,
array_rad_test_poles[1, 2], 4, " ");
if float_abs(array_rad_test_poles[1, 2]) < glob_least_3_sing then
glob_least_3_sing := array_rad_test_poles[1, 2]
end if;
omniout_complex(ALWAYS,
"Order of pole (three term test) ", 4,
array_ord_test_poles[1, 2], 4, " ")
else omniout_str(ALWAYS,
"NO REAL POLE (three term test) for Equation 1")
end if;
if glob__small < array_rad_test_poles[1, 3] and
array_rad_test_poles[1, 3] < glob_large_float then
omniout_float(ALWAYS,
"Radius of convergence (six term test) for eq 1 ", 4,
array_rad_test_poles[1, 3], 4, " ");
if float_abs(array_rad_test_poles[1, 3]) < glob_least_6_sing then
glob_least_6_sing := array_rad_test_poles[1, 3]
end if;
omniout_complex(ALWAYS,
"Order of pole (six term test) ", 4,
array_ord_test_poles[1, 3], 4, " ")
else omniout_str(ALWAYS,
"NO COMPLEX POLE (six term test) for Equation 1")
end if
end proc
# End Function number 2
# Begin Function number 3
> my_check_sign := proc( x0 ,xf)
> local ret;
> if (xf > x0) then # if number 3
> ret := glob__1;
> else
> ret := glob__m1;
> fi;# end if 3;
> ret;;
> end;
my_check_sign := proc(x0, xf)
local ret;
if x0 < xf then ret := glob__1 else ret := glob__m1 end if; ret
end proc
# End Function number 3
# Begin Function number 4
> est_size_answer := proc()
> global
> ALWAYS,
> INFO,
> DEBUGL,
> DEBUGMASSIVE,
> glob_iolevel,
> glob_yes_pole,
> glob_no_pole,
> glob_not_given,
> glob_no_sing_tests,
> glob_ratio_test,
> glob_three_term_test,
> glob_six_term_test,
> glob_log_10,
#Top Generate Globals Decl
> MAX_UNCHANGED,
> glob__small,
> glob_small_float,
> glob_smallish_float,
> glob_large_float,
> glob_larger_float,
> glob__m2,
> glob__m1,
> glob__0,
> glob__1,
> glob__2,
> glob__3,
> glob__4,
> glob__5,
> glob__8,
> glob__10,
> glob__100,
> glob__pi,
> glob__0_5,
> glob__0_8,
> glob__m0_8,
> glob__0_25,
> glob__0_125,
> glob_h,
> glob_nxt,
> glob_prec,
> glob_check_sign,
> glob_desired_digits_correct,
> glob_max_estimated_step_error,
> glob_ratio_of_radius,
> glob_percent_done,
> glob_total_exp_sec,
> glob_optimal_expect_sec,
> glob_estimated_size_answer,
> glob_almost_1,
> glob_clock_sec,
> glob_clock_start_sec,
> glob_disp_incr,
> glob_diff_rc_fm,
> glob_diff_rc_fmm1,
> glob_diff_rc_fmm2,
> glob_diff_ord_fm,
> glob_diff_ord_fmm1,
> glob_diff_ord_fmm2,
> glob_six_term_ord_save,
> glob_guess_error_rc,
> glob_guess_error_ord,
> glob_least_given_sing,
> glob_least_ratio_sing,
> glob_least_3_sing,
> glob_least_6_sing,
> glob_last_good_h,
> glob_max_h,
> glob_min_h,
> glob_display_interval,
> glob_abserr,
> glob_relerr,
> glob_min_pole_est,
> glob_max_rel_trunc_err,
> glob_max_trunc_err,
> glob_max_hours,
> glob_optimal_clock_start_sec,
> glob_optimal_start,
> glob_upper_ratio_limit,
> glob_lower_ratio_limit,
> glob_max_sec,
> glob_orig_start_sec,
> glob_normmax,
> glob_max_minutes,
> glob_next_display,
> glob_est_digits,
> glob_subiter_method,
> glob_html_log,
> glob_min_good_digits,
> glob_good_digits,
> glob_min_apfp_est_good_digits,
> glob_apfp_est_good_digits,
> glob_max_opt_iter,
> glob_dump,
> glob_djd_debug,
> glob_display_flag,
> glob_djd_debug2,
> glob_h_reason,
> glob_sec_in_minute,
> glob_min_in_hour,
> glob_hours_in_day,
> glob_days_in_year,
> glob_sec_in_hour,
> glob_sec_in_day,
> glob_sec_in_year,
> glob_not_yet_finished,
> glob_initial_pass,
> glob_not_yet_start_msg,
> glob_reached_optimal_h,
> glob_optimal_done,
> glob_type_given_pole,
> glob_optimize,
> glob_look_poles,
> glob_dump_closed_form,
> glob_max_iter,
> glob_no_eqs,
> glob_unchanged_h_cnt,
> glob_warned,
> glob_warned2,
> glob_start,
> glob_iter,
#Bottom Generate Globals Decl
#BEGIN CONST
> array_const_1,
> array_const_0D0,
> array_const_0D2,
> array_const_0D3,
#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_g,
> array_tmp3,
> array_tmp4,
> array_tmp5,
> 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_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_g, array_tmp3, array_tmp4, array_tmp5,
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,
#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_g,
> array_tmp3,
> array_tmp4,
> array_tmp5,
> 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_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_g, array_tmp3, array_tmp4, array_tmp5,
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,
#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_g,
> array_tmp3,
> array_tmp4,
> array_tmp5,
> 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_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_g, array_tmp3, array_tmp4, array_tmp5,
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,
#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_g,
> array_tmp3,
> array_tmp4,
> array_tmp5,
> 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_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_g, array_tmp3, array_tmp4, array_tmp5,
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,
#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_g,
> array_tmp3,
> array_tmp4,
> array_tmp5,
> 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_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_g, array_tmp3, array_tmp4, array_tmp5,
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,
#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_g,
> array_tmp3,
> array_tmp4,
> array_tmp5,
> 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_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_g, array_tmp3, array_tmp4, array_tmp5,
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,
#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_g,
> array_tmp3,
> array_tmp4,
> array_tmp5,
> 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_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_g, array_tmp3, array_tmp4, array_tmp5,
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,
#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_g,
> array_tmp3,
> array_tmp4,
> array_tmp5,
> 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 sin 1 $eq_no = 1
> array_tmp3[1] := sin(array_x[1]);
> array_tmp3_g[1] := cos(array_x[1]);
> #emit pre mult LINEAR - FULL $eq_no = 1 i = 1
> array_tmp4[1] := array_tmp2[1] * array_tmp3[1];
> #emit pre add CONST FULL $eq_no = 1 i = 1
> array_tmp5[1] := array_const_0D0[1] + array_tmp4[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_tmp5[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 sin ID_LINEAR iii = 2 $eq_no = 1
> array_tmp3[2] := array_tmp3_g[1] * array_x[2] / c(1);
> array_tmp3_g[2] := neg(array_tmp3[1]) * array_x[2] / c(1);
> #emit pre mult LINEAR FULL $eq_no = 1 i = 2
> array_tmp4[2] := array_tmp3[1] * array_tmp2[2] + array_tmp3[2] * array_tmp2[1];
> #emit pre add CONST FULL $eq_no = 1 i = 2
> array_tmp5[2] := array_tmp4[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_tmp5[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 sin ID_LINEAR iii = 3 $eq_no = 1
> array_tmp3[3] := array_tmp3_g[2] * array_x[2] / c(2);
> array_tmp3_g[3] := neg(array_tmp3[2]) * array_x[2] / c(2);
> #emit pre mult LINEAR FULL $eq_no = 1 i = 3
> array_tmp4[3] := array_tmp3[2] * array_tmp2[2] + array_tmp3[3] * array_tmp2[1];
> #emit pre add CONST FULL $eq_no = 1 i = 3
> array_tmp5[3] := array_tmp4[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_tmp5[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 sin ID_LINEAR iii = 4 $eq_no = 1
> array_tmp3[4] := array_tmp3_g[3] * array_x[2] / c(3);
> array_tmp3_g[4] := neg(array_tmp3[3]) * array_x[2] / c(3);
> #emit pre mult LINEAR FULL $eq_no = 1 i = 4
> array_tmp4[4] := array_tmp3[3] * array_tmp2[2] + array_tmp3[4] * array_tmp2[1];
> #emit pre add CONST FULL $eq_no = 1 i = 4
> array_tmp5[4] := array_tmp4[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_tmp5[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 sin ID_LINEAR iii = 5 $eq_no = 1
> array_tmp3[5] := array_tmp3_g[4] * array_x[2] / c(4);
> array_tmp3_g[5] := neg(array_tmp3[4]) * array_x[2] / c(4);
> #emit pre mult LINEAR FULL $eq_no = 1 i = 5
> array_tmp4[5] := array_tmp3[4] * array_tmp2[2] + array_tmp3[5] * array_tmp2[1];
> #emit pre add CONST FULL $eq_no = 1 i = 5
> array_tmp5[5] := array_tmp4[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_tmp5[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 sin LINEAR $eq_no = 1
> array_tmp3[kkk] := array_tmp3_g[kkk - 1] * array_x[2] / c(kkk - 1);
> array_tmp3_g[kkk] := neg(array_tmp3[kkk - 1]) * array_x[2] / c(kkk - 1);
> #emit mult LINEAR FULL $eq_no = 1 i = 1
> array_tmp4[kkk] := array_tmp3[kkk-1] * array_tmp2[2] + array_tmp3[kkk] * array_tmp2[1];
> #emit NOT FULL - FULL add $eq_no = 1
> array_tmp5[kkk] := array_tmp4[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_tmp5[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_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_g, array_tmp3, array_tmp4, array_tmp5,
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] := sin(array_x[1]);
array_tmp3_g[1] := cos(array_x[1]);
array_tmp4[1] := array_tmp2[1]*array_tmp3[1];
array_tmp5[1] := array_const_0D0[1] + array_tmp4[1];
if not array_y_set_initial[1, 2] then
if 1 <= ATS_MAX_TERMS then
temporary :=
c(array_tmp5[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_tmp3_g[1]*array_x[2]/c(1);
array_tmp3_g[2] := neg(array_tmp3[1])*array_x[2]/c(1);
array_tmp4[2] :=
array_tmp2[1]*array_tmp3[2] + array_tmp2[2]*array_tmp3[1];
array_tmp5[2] := array_tmp4[2];
if not array_y_set_initial[1, 3] then
if 2 <= ATS_MAX_TERMS then
temporary :=
c(array_tmp5[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_tmp3_g[2]*array_x[2]/c(2);
array_tmp3_g[3] := neg(array_tmp3[2])*array_x[2]/c(2);
array_tmp4[3] :=
array_tmp2[1]*array_tmp3[3] + array_tmp2[2]*array_tmp3[2];
array_tmp5[3] := array_tmp4[3];
if not array_y_set_initial[1, 4] then
if 3 <= ATS_MAX_TERMS then
temporary :=
c(array_tmp5[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_tmp3_g[3]*array_x[2]/c(3);
array_tmp3_g[4] := neg(array_tmp3[3])*array_x[2]/c(3);
array_tmp4[4] :=
array_tmp2[1]*array_tmp3[4] + array_tmp2[2]*array_tmp3[3];
array_tmp5[4] := array_tmp4[4];
if not array_y_set_initial[1, 5] then
if 4 <= ATS_MAX_TERMS then
temporary :=
c(array_tmp5[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_tmp3_g[4]*array_x[2]/c(4);
array_tmp3_g[5] := neg(array_tmp3[4])*array_x[2]/c(4);
array_tmp4[5] :=
array_tmp2[1]*array_tmp3[5] + array_tmp2[2]*array_tmp3[4];
array_tmp5[5] := array_tmp4[5];
if not array_y_set_initial[1, 6] then
if 5 <= ATS_MAX_TERMS then
temporary :=
c(array_tmp5[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_tmp3_g[kkk - 1]*array_x[2]/c(kkk - 1);
array_tmp3_g[kkk] := neg(array_tmp3[kkk - 1])*array_x[2]/c(kkk - 1)
;
array_tmp4[kkk] := array_tmp2[1]*array_tmp3[kkk]
+ array_tmp2[2]*array_tmp3[kkk - 1];
array_tmp5[kkk] := array_tmp4[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_tmp5[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,
> #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_g,
> array_tmp3,
> array_tmp4,
> array_tmp5,
> 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_g:= Array(0..(30),[]);
> array_tmp3:= Array(0..(30),[]);
> array_tmp4:= Array(0..(30),[]);
> array_tmp5:= 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_g[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_tmp5[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_g);
> zero_ats_ar(array_tmp3);
> zero_ats_ar(array_tmp4);
> zero_ats_ar(array_tmp5);
> 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_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/mult_lin_sinpostcpx.cpx#################");
> omniout_str(ALWAYS,"diff ( y , x , 1 ) = ( 0.2 * x + 0.3 ) * sin ( x ) ; ");
> omniout_str(ALWAYS,"!");
> omniout_str(ALWAYS,"#BEGIN FIRST INPUT BLOCK");
> omniout_str(ALWAYS,"Digits:=32;");
> omniout_str(ALWAYS,"max_terms:=30;");
> omniout_str(ALWAYS,"!");
> omniout_str(ALWAYS,"#END FIRST INPUT BLOCK");
> omniout_str(ALWAYS,"#BEGIN SECOND INPUT BLOCK");
> omniout_str(ALWAYS,"x_start := 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,"");
> 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(0.2) * sin(c(x)) - c(0.2) * cos(c(x)) * c(x) - c(0.3) * cos(c(x)));");
> omniout_str(ALWAYS,"end;");
> omniout_str(ALWAYS,"next_delta := proc()");
> omniout_str(ALWAYS,"global glob_nxt, x_delta;");
> omniout_str(ALWAYS,"");
> omniout_str(ALWAYS,"x_delta := [ 0.001 + 0.00004 * I,");
> omniout_str(ALWAYS,"0.0001 + 0.004 * I,");
> omniout_str(ALWAYS,"0.003 + 0.006 * I,");
> omniout_str(ALWAYS,"0.0001 + 0.005 * I,");
> omniout_str(ALWAYS,"0.0001 + 0.003 * I,");
> omniout_str(ALWAYS,"0.001 + 0.001 * I,");
> omniout_str(ALWAYS,"0.001 + 0.003 * I,");
> omniout_str(ALWAYS,"0.0001 + 0.004 * I,");
> omniout_str(ALWAYS,"0.003 + 0.006 * I,");
> omniout_str(ALWAYS,"0.0001 + 0.005 * I,");
> omniout_str(ALWAYS,"0.0001 + 0.003 * I,");
> omniout_str(ALWAYS,"0.001 + 0.001 * I,");
> omniout_str(ALWAYS,"0.001 + 0.003 * I,");
> omniout_str(ALWAYS,"0.0001 + 0.004 * I,");
> omniout_str(ALWAYS,"0.003 + 0.006 * I,");
> omniout_str(ALWAYS,"0.0001 + 0.005 * I,");
> omniout_str(ALWAYS,"0.0001 + 0.003 * I,");
> omniout_str(ALWAYS,"0.001 + 0.001 * I,");
> omniout_str(ALWAYS,"0.001 + 0.003 * I,");
> omniout_str(ALWAYS,"0.0001 + 0.004 * I,");
> omniout_str(ALWAYS,"0.003 + 0.006 * I,");
> omniout_str(ALWAYS,"0.0001 + 0.005 * I,");
> omniout_str(ALWAYS,"0.0001 + 0.003 * I,");
> omniout_str(ALWAYS,"0.001 + 0.001 * I,");
> omniout_str(ALWAYS,"0.001 + 0.003 * I,");
> omniout_str(ALWAYS,"0.0001 + 0.004 * I,");
> omniout_str(ALWAYS,"0.003 + 0.006 * I,");
> omniout_str(ALWAYS,"0.0001 + 0.005 * I,");
> omniout_str(ALWAYS,"0.0001 + 0.003 * I,");
> omniout_str(ALWAYS,"0.001 + 0.001 * I,");
> omniout_str(ALWAYS,"0.0001 + 0.004 * I,");
> omniout_str(ALWAYS,"0.003 + 0.006 * I,");
> omniout_str(ALWAYS,"0.0001 + 0.005 * I,");
> omniout_str(ALWAYS,"0.0001 + 0.003 * I,");
> omniout_str(ALWAYS,"0.001 + 0.001 * I,");
> omniout_str(ALWAYS,"0.001 + 0.003 * I,");
> omniout_str(ALWAYS,"0.0001 + 0.004 * I,");
> omniout_str(ALWAYS,"0.003 + 0.006 * I,");
> omniout_str(ALWAYS,"0.0001 + 0.005 * I,");
> omniout_str(ALWAYS,"0.0001 + 0.003 * I,");
> omniout_str(ALWAYS,"0.001 + 0.001 * I,");
> omniout_str(ALWAYS,"0.001 + 0.003 * I,");
> omniout_str(ALWAYS,"0.0001 + 0.004 * I,");
> omniout_str(ALWAYS,"0.003 + 0.006 * I,");
> omniout_str(ALWAYS,"0.0001 + 0.005 * I,");
> omniout_str(ALWAYS,"0.0001 + 0.003 * I,");
> omniout_str(ALWAYS,"0.001 + 0.001 * I,");
> omniout_str(ALWAYS,"0.001 + 0.003 * I,");
> omniout_str(ALWAYS,"0.0001 + 0.004 * I,");
> omniout_str(ALWAYS,"0.003 + 0.006 * I,");
> omniout_str(ALWAYS,"0.0001 + 0.005 * I,");
> omniout_str(ALWAYS,"0.0001 + 0.003 * I,");
> omniout_str(ALWAYS,"0.001 + 0.001 * I,");
> omniout_str(ALWAYS,"0.001 + 0.003 * I,");
> omniout_str(ALWAYS,"0.0001 + 0.004 * I,");
> omniout_str(ALWAYS,"0.003 + 0.006 * I,");
> omniout_str(ALWAYS,"0.0001 + 0.005 * I,");
> omniout_str(ALWAYS,"0.0001 + 0.003 * I,");
> omniout_str(ALWAYS,"0.001 + 0.001 * I,");
> omniout_str(ALWAYS,"0.0001 + 0.004 * I,");
> omniout_str(ALWAYS,"0.003 + 0.006 * I,");
> omniout_str(ALWAYS,"0.0001 + 0.005 * I,");
> omniout_str(ALWAYS,"0.0001 + 0.003 * I,");
> omniout_str(ALWAYS,"0.001 + 0.001 * I,");
> omniout_str(ALWAYS,"0.001 + 0.003 * I,");
> omniout_str(ALWAYS,"0.0001 + 0.004 * I,");
> omniout_str(ALWAYS,"0.003 + 0.006 * I,");
> omniout_str(ALWAYS,"0.0001 + 0.005 * I,");
> omniout_str(ALWAYS,"0.0001 + 0.003 * I,");
> omniout_str(ALWAYS,"0.001 + 0.001 * I,");
> omniout_str(ALWAYS,"0.001 + 0.003 * I,");
> omniout_str(ALWAYS,"0.0001 + 0.004 * I,");
> omniout_str(ALWAYS,"0.003 + 0.006 * I,");
> omniout_str(ALWAYS,"0.0001 + 0.005 * I,");
> omniout_str(ALWAYS,"0.0001 + 0.003 * I,");
> omniout_str(ALWAYS,"0.001 + 0.001 * I,");
> omniout_str(ALWAYS,"0.001 + 0.003 * I,");
> omniout_str(ALWAYS,"0.0001 + 0.004 * I,");
> omniout_str(ALWAYS,"0.003 + 0.006 * I,");
> omniout_str(ALWAYS,"0.0001 + 0.005 * I,");
> omniout_str(ALWAYS,"0.0001 + 0.003 * I,");
> omniout_str(ALWAYS,"0.001 + 0.001 * I,");
> omniout_str(ALWAYS,"0.001 + 0.003 * I,");
> omniout_str(ALWAYS,"0.0001 + 0.004 * I,");
> omniout_str(ALWAYS,"0.003 + 0.006 * I,");
> omniout_str(ALWAYS,"0.0001 + 0.005 * I,");
> omniout_str(ALWAYS,"0.0001 + 0.003 * I,");
> omniout_str(ALWAYS,"0.001 + 0.001 * I,");
> omniout_str(ALWAYS,"0.0001 + 0.004 * I,");
> omniout_str(ALWAYS,"0.003 + 0.006 * I,");
> omniout_str(ALWAYS,"0.0001 + 0.005 * I,");
> omniout_str(ALWAYS,"0.0001 + 0.003 * I,");
> omniout_str(ALWAYS,"0.001 + 0.001 * I,");
> omniout_str(ALWAYS,"0.001 + 0.003 * I,");
> omniout_str(ALWAYS,"0.0001 + 0.004 * I,");
> omniout_str(ALWAYS,"0.003 + 0.006 * I,");
> omniout_str(ALWAYS,"0.0001 + 0.005 * I,");
> omniout_str(ALWAYS,"0.0001 + 0.003 * I,");
> omniout_str(ALWAYS,"0.001 + 0.001 * I,");
> omniout_str(ALWAYS,"0.001 + 0.003 * I,");
> omniout_str(ALWAYS,"0.0001 + 0.004 * I,");
> omniout_str(ALWAYS,"0.003 + 0.006 * I,");
> omniout_str(ALWAYS,"0.0001 + 0.005 * I,");
> omniout_str(ALWAYS,"0.0001 + 0.003 * I,");
> omniout_str(ALWAYS,"0.001 + 0.001 * I,");
> omniout_str(ALWAYS,"0.001 + 0.003 * I,");
> omniout_str(ALWAYS,"0.0001 + 0.004 * I,");
> omniout_str(ALWAYS,"0.003 + 0.006 * I,");
> omniout_str(ALWAYS,"0.0001 + 0.005 * I,");
> omniout_str(ALWAYS,"0.0001 + 0.003 * I,");
> omniout_str(ALWAYS,"0.001 + 0.001 * I,");
> omniout_str(ALWAYS,"0.001 + 0.003 * I,");
> omniout_str(ALWAYS,"0.0001 + 0.004 * I,");
> omniout_str(ALWAYS,"0.003 + 0.006 * I,");
> omniout_str(ALWAYS,"0.0001 + 0.005 * I,");
> omniout_str(ALWAYS,"0.0001 + 0.003 * I,");
> omniout_str(ALWAYS,"0.001 + 0.001 * I,");
> omniout_str(ALWAYS,"0.0001 + 0.004 * I,");
> omniout_str(ALWAYS,"0.003 + 0.006 * I,");
> omniout_str(ALWAYS,"0.0001 + 0.005 * I,");
> omniout_str(ALWAYS,"0.0001 + 0.003 * I,");
> omniout_str(ALWAYS,"0.001 + 0.001 * I,");
> omniout_str(ALWAYS,"0.001 + 0.003 * I,");
> omniout_str(ALWAYS,"0.0001 + 0.004 * I,");
> omniout_str(ALWAYS,"0.003 + 0.006 * I,");
> omniout_str(ALWAYS,"0.0001 + 0.005 * I,");
> omniout_str(ALWAYS,"0.0001 + 0.003 * I,");
> omniout_str(ALWAYS,"0.001 + 0.001 * I,");
> omniout_str(ALWAYS,"0.001 + 0.003 * I,");
> omniout_str(ALWAYS,"0.0001 + 0.004 * I,");
> omniout_str(ALWAYS,"0.003 + 0.006 * I,");
> omniout_str(ALWAYS,"0.0001 + 0.005 * I,");
> omniout_str(ALWAYS,"0.0001 + 0.003 * I,");
> omniout_str(ALWAYS,"0.001 + 0.001 * I,");
> omniout_str(ALWAYS,"0.001 + 0.003 * I,");
> omniout_str(ALWAYS,"0.0001 + 0.004 * I,");
> omniout_str(ALWAYS,"0.003 + 0.006 * I,");
> omniout_str(ALWAYS,"0.0001 + 0.005 * I,");
> omniout_str(ALWAYS,"0.0001 + 0.003 * I,");
> omniout_str(ALWAYS,"0.001 + 0.001 * I,");
> omniout_str(ALWAYS,"0.001 + 0.003 * I,");
> omniout_str(ALWAYS,"0.0001 + 0.004 * I,");
> omniout_str(ALWAYS,"0.003 + 0.006 * I,");
> omniout_str(ALWAYS,"0.0001 + 0.005 * I,");
> omniout_str(ALWAYS,"0.0001 + 0.003 * I,");
> omniout_str(ALWAYS,"0.001 + 0.001 * I,");
> omniout_str(ALWAYS,"0.0001 + 0.004 * I,");
> omniout_str(ALWAYS,"0.003 + 0.006 * I,");
> omniout_str(ALWAYS,"0.0001 + 0.005 * I,");
> omniout_str(ALWAYS,"0.0001 + 0.003 * I,");
> omniout_str(ALWAYS,"0.001 + 0.001 * I,");
> omniout_str(ALWAYS,"0.001 + 0.003 * I,");
> omniout_str(ALWAYS,"0.0001 + 0.004 * I,");
> omniout_str(ALWAYS,"0.003 + 0.006 * I,");
> omniout_str(ALWAYS,"0.0001 + 0.005 * I,");
> omniout_str(ALWAYS,"0.0001 + 0.003 * I,");
> omniout_str(ALWAYS,"0.001 + 0.001 * I,");
> omniout_str(ALWAYS,"0.001 + 0.003 * I,");
> omniout_str(ALWAYS,"0.0001 + 0.004 * I,");
> omniout_str(ALWAYS,"0.003 + 0.006 * I,");
> omniout_str(ALWAYS,"0.0001 + 0.005 * I,");
> omniout_str(ALWAYS,"0.0001 + 0.003 * I,");
> omniout_str(ALWAYS,"0.001 + 0.001 * I,");
> omniout_str(ALWAYS,"0.001 + 0.003 * I,");
> omniout_str(ALWAYS,"0.0001 + 0.004 * I,");
> omniout_str(ALWAYS,"0.003 + 0.006 * I,");
> omniout_str(ALWAYS,"0.0001 + 0.005 * I,");
> omniout_str(ALWAYS,"0.0001 + 0.003 * I,");
> omniout_str(ALWAYS,"0.001 + 0.001 * I,");
> omniout_str(ALWAYS,"0.001 + 0.003 * I,");
> omniout_str(ALWAYS,"0.0001 + 0.004 * I,");
> omniout_str(ALWAYS,"0.003 + 0.006 * I,");
> omniout_str(ALWAYS,"0.0001 + 0.005 * I,");
> omniout_str(ALWAYS,"0.0001 + 0.003 * I,");
> omniout_str(ALWAYS,"0.001 + 0.001 * I,");
> omniout_str(ALWAYS,"0.0001 + 0.004 * I,");
> omniout_str(ALWAYS,"0.003 + 0.006 * I,");
> omniout_str(ALWAYS,"0.0001 + 0.005 * I,");
> omniout_str(ALWAYS,"0.0001 + 0.003 * I,");
> omniout_str(ALWAYS,"0.001 + 0.001 * I,");
> omniout_str(ALWAYS,"0.001 + 0.003 * I,");
> omniout_str(ALWAYS,"0.0001 + 0.004 * I,");
> omniout_str(ALWAYS,"0.0001 + 0.004 * I,");
> omniout_str(ALWAYS,"0.003 + 0.006 * I,");
> omniout_str(ALWAYS,"0.0001 + 0.005 * I,");
> omniout_str(ALWAYS,"0.0001 + 0.003 * I,");
> omniout_str(ALWAYS,"0.001 + 0.001 * I,");
> omniout_str(ALWAYS,"0.001 + 0.003 * I,");
> omniout_str(ALWAYS,"0.0001 + 0.004 * I,");
> omniout_str(ALWAYS,"0.003 + 0.006 * I,");
> omniout_str(ALWAYS,"0.0001 + 0.005 * I,");
> omniout_str(ALWAYS,"0.0001 + 0.003 * I,");
> omniout_str(ALWAYS,"0.001 + 0.001 * I,");
> omniout_str(ALWAYS,"0.001 + 0.003 * I,");
> omniout_str(ALWAYS,"0.0001 + 0.004 * I,");
> omniout_str(ALWAYS,"0.003 + 0.006 * I,");
> omniout_str(ALWAYS,"0.0001 + 0.005 * I,");
> omniout_str(ALWAYS,"0.0001 + 0.003 * I,");
> omniout_str(ALWAYS,"0.001 + 0.001 * I,");
> omniout_str(ALWAYS,"0.001 + 0.003 * I,");
> omniout_str(ALWAYS,"0.0001 + 0.004 * I,");
> omniout_str(ALWAYS,"0.003 + 0.006 * I,");
> omniout_str(ALWAYS,"0.0001 + 0.005 * I,");
> omniout_str(ALWAYS,"0.0001 + 0.003 * I,");
> omniout_str(ALWAYS,"0.001 + 0.001 * I,");
> omniout_str(ALWAYS,"0.001 + 0.003 * I,");
> omniout_str(ALWAYS,"0.0001 + 0.004 * I,");
> omniout_str(ALWAYS,"0.003 + 0.006 * I,");
> omniout_str(ALWAYS,"0.0001 + 0.005 * I,");
> omniout_str(ALWAYS,"0.0001 + 0.003 * I,");
> omniout_str(ALWAYS,"0.001 + 0.001 * I,");
> omniout_str(ALWAYS,"0.0001 + 0.004 * I,");
> omniout_str(ALWAYS,"0.003 + 0.006 * I,");
> omniout_str(ALWAYS,"0.0001 + 0.005 * I,");
> omniout_str(ALWAYS,"0.0001 + 0.003 * I,");
> omniout_str(ALWAYS,"0.001 + 0.001 * I,");
> omniout_str(ALWAYS,"0.001 + 0.003 * I,");
> omniout_str(ALWAYS,"0.0001 + 0.004 * I,");
> omniout_str(ALWAYS,"0.003 + 0.006 * I,");
> omniout_str(ALWAYS,"0.0001 + 0.005 * I,");
> omniout_str(ALWAYS,"0.0001 + 0.003 * I,");
> omniout_str(ALWAYS,"0.001 + 0.001 * I,");
> omniout_str(ALWAYS,"0.001 + 0.003 * I,");
> omniout_str(ALWAYS,"0.0001 + 0.004 * I,");
> omniout_str(ALWAYS,"0.003 + 0.006 * I,");
> omniout_str(ALWAYS,"0.0001 + 0.005 * I,");
> omniout_str(ALWAYS,"0.0001 + 0.003 * I,");
> omniout_str(ALWAYS,"0.001 + 0.001 * I,");
> omniout_str(ALWAYS,"0.001 + 0.003 * I,");
> omniout_str(ALWAYS,"0.0001 + 0.004 * I,");
> omniout_str(ALWAYS,"0.003 + 0.006 * I,");
> omniout_str(ALWAYS,"0.0001 + 0.005 * I,");
> omniout_str(ALWAYS,"0.0001 + 0.003 * I,");
> omniout_str(ALWAYS,"0.001 + 0.001 * I,");
> omniout_str(ALWAYS,"0.001 + 0.003 * I,");
> omniout_str(ALWAYS,"0.0001 + 0.004 * I,");
> omniout_str(ALWAYS,"0.003 + 0.006 * I,");
> omniout_str(ALWAYS,"0.0001 + 0.005 * I,");
> omniout_str(ALWAYS,"0.0001 + 0.003 * I,");
> omniout_str(ALWAYS,"0.001 + 0.001 * I,");
> omniout_str(ALWAYS,"0.0001 + 0.004 * I,");
> omniout_str(ALWAYS,"0.003 + 0.006 * I,");
> omniout_str(ALWAYS,"0.0001 + 0.005 * I,");
> omniout_str(ALWAYS,"0.0001 + 0.003 * I,");
> omniout_str(ALWAYS,"0.001 + 0.001 * I,");
> omniout_str(ALWAYS,"0.001 + 0.003 * I,");
> omniout_str(ALWAYS,"0.0001 + 0.004 * I,");
> omniout_str(ALWAYS,"0.003 + 0.006 * I,");
> omniout_str(ALWAYS,"0.0001 + 0.005 * I,");
> omniout_str(ALWAYS,"0.0001 + 0.003 * I,");
> omniout_str(ALWAYS,"0.001 + 0.001 * I,");
> omniout_str(ALWAYS,"0.001 + 0.003 * I,");
> omniout_str(ALWAYS,"0.0001 + 0.004 * I,");
> omniout_str(ALWAYS,"0.003 + 0.006 * I,");
> omniout_str(ALWAYS,"0.0001 + 0.005 * I,");
> omniout_str(ALWAYS,"0.0001 + 0.003 * I,");
> omniout_str(ALWAYS,"0.001 + 0.001 * I,");
> omniout_str(ALWAYS,"0.001 + 0.003 * I,");
> omniout_str(ALWAYS,"0.0001 + 0.004 * I,");
> omniout_str(ALWAYS,"0.003 + 0.006 * I,");
> omniout_str(ALWAYS,"0.0001 + 0.005 * I,");
> omniout_str(ALWAYS,"0.0001 + 0.003 * I,");
> omniout_str(ALWAYS,"0.001 + 0.001 * I,");
> omniout_str(ALWAYS,"0.001 + 0.003 * I,");
> omniout_str(ALWAYS,"0.0001 + 0.004 * I,");
> omniout_str(ALWAYS,"0.003 + 0.006 * I,");
> omniout_str(ALWAYS,"0.0001 + 0.005 * I,");
> omniout_str(ALWAYS,"0.0001 + 0.003 * I,");
> omniout_str(ALWAYS,"0.001 + 0.001 * I,");
> omniout_str(ALWAYS,"0.0001 + 0.004 * I,");
> omniout_str(ALWAYS,"0.003 + 0.006 * I,");
> omniout_str(ALWAYS,"0.0001 + 0.005 * I,");
> omniout_str(ALWAYS,"0.0001 + 0.003 * I,");
> omniout_str(ALWAYS,"0.001 + 0.001 * I,");
> omniout_str(ALWAYS,"0.001 + 0.003 * I,");
> omniout_str(ALWAYS,"0.0001 + 0.004 * I,");
> omniout_str(ALWAYS,"0.003 + 0.006 * I,");
> omniout_str(ALWAYS,"0.0001 + 0.005 * I,");
> omniout_str(ALWAYS,"0.0001 + 0.003 * I,");
> omniout_str(ALWAYS,"0.001 + 0.001 * I,");
> omniout_str(ALWAYS,"0.001 + 0.003 * I,");
> omniout_str(ALWAYS,"0.0001 + 0.004 * I,");
> omniout_str(ALWAYS,"0.003 + 0.006 * I,");
> omniout_str(ALWAYS,"0.0001 + 0.005 * I,");
> omniout_str(ALWAYS,"0.0001 + 0.003 * I,");
> omniout_str(ALWAYS,"0.001 + 0.001 * I,");
> omniout_str(ALWAYS,"0.001 + 0.003 * I,");
> omniout_str(ALWAYS,"0.0001 + 0.004 * I,");
> omniout_str(ALWAYS,"0.003 + 0.006 * I,");
> omniout_str(ALWAYS,"0.0001 + 0.005 * I,");
> omniout_str(ALWAYS,"0.0001 + 0.003 * I,");
> omniout_str(ALWAYS,"0.001 + 0.001 * I,");
> omniout_str(ALWAYS,"0.001 + 0.003 * I,");
> omniout_str(ALWAYS,"0.0001 + 0.004 * I,");
> omniout_str(ALWAYS,"0.003 + 0.006 * I,");
> omniout_str(ALWAYS,"0.0001 + 0.005 * I,");
> omniout_str(ALWAYS,"0.0001 + 0.003 * I,");
> omniout_str(ALWAYS,"0.001 + 0.001 * I,");
> omniout_str(ALWAYS,"0.0001 + 0.004 * I,");
> omniout_str(ALWAYS,"0.003 + 0.006 * I,");
> omniout_str(ALWAYS,"0.0001 + 0.005 * I,");
> omniout_str(ALWAYS,"0.0001 + 0.003 * I,");
> omniout_str(ALWAYS,"0.001 + 0.001 * I,");
> omniout_str(ALWAYS,"0.001 + 0.003 * I,");
> omniout_str(ALWAYS,"0.0001 + 0.004 * I,");
> omniout_str(ALWAYS,"0.003 + 0.006 * I,");
> omniout_str(ALWAYS,"0.0001 + 0.005 * I,");
> omniout_str(ALWAYS,"0.0001 + 0.003 * I,");
> omniout_str(ALWAYS,"0.001 + 0.001 * I,");
> omniout_str(ALWAYS,"0.001 + 0.003 * I,");
> omniout_str(ALWAYS,"0.0001 + 0.004 * I,");
> omniout_str(ALWAYS,"0.003 + 0.006 * I,");
> omniout_str(ALWAYS,"0.0001 + 0.005 * I,");
> omniout_str(ALWAYS,"0.0001 + 0.003 * I,");
> omniout_str(ALWAYS,"0.001 + 0.001 * I,");
> omniout_str(ALWAYS,"0.001 + 0.003 * I,");
> omniout_str(ALWAYS,"0.0001 + 0.004 * I,");
> omniout_str(ALWAYS,"0.003 + 0.006 * I,");
> omniout_str(ALWAYS,"0.0001 + 0.005 * I,");
> omniout_str(ALWAYS,"0.0001 + 0.003 * I,");
> omniout_str(ALWAYS,"0.001 + 0.001 * I,");
> omniout_str(ALWAYS,"0.001 + 0.003 * I,");
> omniout_str(ALWAYS,"0.0001 + 0.004 * I,");
> omniout_str(ALWAYS,"0.003 + 0.006 * I,");
> omniout_str(ALWAYS,"0.0001 + 0.005 * I,");
> omniout_str(ALWAYS,"0.0001 + 0.003 * I,");
> omniout_str(ALWAYS,"0.001 + 0.001 * I,");
> omniout_str(ALWAYS,"0.0001 + 0.004 * I,");
> omniout_str(ALWAYS,"0.003 + 0.006 * I,");
> omniout_str(ALWAYS,"0.0001 + 0.005 * I,");
> omniout_str(ALWAYS,"0.0001 + 0.003 * I,");
> omniout_str(ALWAYS,"0.001 + 0.001 * I,");
> omniout_str(ALWAYS,"0.001 + 0.003 * I,");
> omniout_str(ALWAYS,"0.0001 + 0.004 * I,");
> omniout_str(ALWAYS,"0.003 + 0.006 * I,");
> omniout_str(ALWAYS,"0.0001 + 0.005 * I,");
> omniout_str(ALWAYS,"0.0001 + 0.003 * I,");
> omniout_str(ALWAYS,"0.001 + 0.001 * I,");
> omniout_str(ALWAYS,"0.001 + 0.003 * I,");
> omniout_str(ALWAYS,"0.0001 + 0.004 * I,");
> omniout_str(ALWAYS,"0.003 + 0.006 * I,");
> omniout_str(ALWAYS,"0.0001 + 0.005 * I,");
> omniout_str(ALWAYS,"0.0001 + 0.003 * I,");
> omniout_str(ALWAYS,"0.001 + 0.001 * I,");
> omniout_str(ALWAYS,"0.001 + 0.003 * I,");
> omniout_str(ALWAYS,"0.0001 + 0.004 * I,");
> omniout_str(ALWAYS,"0.003 + 0.006 * I,");
> omniout_str(ALWAYS,"0.0001 + 0.005 * I,");
> omniout_str(ALWAYS,"0.0001 + 0.003 * I,");
> omniout_str(ALWAYS,"0.001 + 0.001 * I,");
> omniout_str(ALWAYS,"0.001 + 0.003 * I,");
> omniout_str(ALWAYS,"0.0001 + 0.004 * I,");
> omniout_str(ALWAYS,"0.003 + 0.006 * I,");
> omniout_str(ALWAYS,"0.0001 + 0.005 * I,");
> omniout_str(ALWAYS,"0.0001 + 0.003 * I,");
> omniout_str(ALWAYS,"0.001 + 0.001 * I,");
> omniout_str(ALWAYS,"0.003 + 0.006 * I,");
> omniout_str(ALWAYS,"0.0001 + 0.005 * I,");
> omniout_str(ALWAYS,"0.0001 + 0.003 * I,");
> omniout_str(ALWAYS,"0.001 + 0.001 * I,");
> omniout_str(ALWAYS,"0.001 + 0.003 * I,");
> omniout_str(ALWAYS,"0.0001 + 0.004 * I,");
> omniout_str(ALWAYS,"0.003 + 0.006 * I,");
> omniout_str(ALWAYS,"0.0001 + 0.005 * I,");
> omniout_str(ALWAYS,"0.0001 + 0.003 * I,");
> omniout_str(ALWAYS,"0.001 + 0.001 * I,");
> omniout_str(ALWAYS,"0.001 + 0.003 * I,");
> omniout_str(ALWAYS,"0.0001 + 0.004 * I,");
> omniout_str(ALWAYS,"0.003 + 0.006 * I,");
> omniout_str(ALWAYS,"0.0001 + 0.005 * I,");
> omniout_str(ALWAYS,"0.0001 + 0.003 * I,");
> omniout_str(ALWAYS,"0.001 + 0.001 * I,");
> omniout_str(ALWAYS,"0.001 + 0.003 * I,");
> omniout_str(ALWAYS,"0.0001 + 0.004 * I,");
> omniout_str(ALWAYS,"0.003 + 0.006 * I,");
> omniout_str(ALWAYS,"0.0001 + 0.005 * I,");
> omniout_str(ALWAYS,"0.0001 + 0.003 * I,");
> omniout_str(ALWAYS,"0.001 + 0.001 * I,");
> omniout_str(ALWAYS,"0.0001 + 0.004 * I,");
> omniout_str(ALWAYS,"0.003 + 0.006 * I,");
> omniout_str(ALWAYS,"0.0001 + 0.005 * I,");
> omniout_str(ALWAYS,"0.0001 + 0.003 * I,");
> omniout_str(ALWAYS,"0.001 + 0.001 * I,");
> omniout_str(ALWAYS,"0.001 + 0.003 * I,");
> omniout_str(ALWAYS,"0.0001 + 0.004 * I,");
> omniout_str(ALWAYS,"0.003 + 0.006 * I,");
> omniout_str(ALWAYS,"0.0001 + 0.005 * I,");
> omniout_str(ALWAYS,"0.0001 + 0.003 * I,");
> omniout_str(ALWAYS,"0.001 + 0.001 * I,");
> omniout_str(ALWAYS,"0.001 + 0.003 * I,");
> omniout_str(ALWAYS,"0.0001 + 0.004 * I,");
> omniout_str(ALWAYS,"0.003 + 0.006 * I,");
> omniout_str(ALWAYS,"0.0001 + 0.005 * I,");
> omniout_str(ALWAYS,"0.0001 + 0.003 * I,");
> omniout_str(ALWAYS,"0.001 + 0.001 * I,");
> omniout_str(ALWAYS,"0.001 + 0.003 * I,");
> omniout_str(ALWAYS,"0.0001 + 0.004 * I,");
> omniout_str(ALWAYS,"0.003 + 0.006 * I,");
> omniout_str(ALWAYS,"0.0001 + 0.005 * I,");
> omniout_str(ALWAYS,"0.0001 + 0.003 * I,");
> omniout_str(ALWAYS,"0.001 + 0.001 * I,");
> omniout_str(ALWAYS,"0.001 + 0.003 * I,");
> omniout_str(ALWAYS,"0.0001 + 0.004 * I,");
> omniout_str(ALWAYS,"0.003 + 0.006 * I,");
> omniout_str(ALWAYS,"0.0001 + 0.005 * I,");
> omniout_str(ALWAYS,"0.0001 + 0.003 * I,");
> omniout_str(ALWAYS,"0.001 + 0.001 * I,");
> omniout_str(ALWAYS,"0.0001 + 0.004 * I,");
> omniout_str(ALWAYS,"0.003 + 0.006 * I,");
> omniout_str(ALWAYS,"0.0001 + 0.005 * I,");
> omniout_str(ALWAYS,"0.0001 + 0.003 * I,");
> omniout_str(ALWAYS,"0.001 + 0.001 * I,");
> omniout_str(ALWAYS,"0.001 + 0.003 * I,");
> omniout_str(ALWAYS,"0.0001 + 0.004 * I,");
> omniout_str(ALWAYS,"0.003 + 0.006 * I,");
> omniout_str(ALWAYS,"0.0001 + 0.005 * I,");
> omniout_str(ALWAYS,"0.0001 + 0.003 * I,");
> omniout_str(ALWAYS,"0.001 + 0.001 * I,");
> omniout_str(ALWAYS,"0.001 + 0.003 * I,");
> omniout_str(ALWAYS,"0.0001 + 0.004 * I,");
> omniout_str(ALWAYS,"0.003 + 0.006 * I,");
> omniout_str(ALWAYS,"0.0001 + 0.005 * I,");
> omniout_str(ALWAYS,"0.0001 + 0.003 * I,");
> omniout_str(ALWAYS,"0.001 + 0.001 * I,");
> omniout_str(ALWAYS,"0.001 + 0.003 * I,");
> omniout_str(ALWAYS,"0.0001 + 0.004 * I,");
> omniout_str(ALWAYS,"0.003 + 0.006 * I,");
> omniout_str(ALWAYS,"0.0001 + 0.005 * I,");
> omniout_str(ALWAYS,"0.0001 + 0.003 * I,");
> omniout_str(ALWAYS,"0.001 + 0.001 * I,");
> omniout_str(ALWAYS,"0.001 + 0.003 * I,");
> omniout_str(ALWAYS,"0.0001 + 0.004 * I,");
> omniout_str(ALWAYS,"0.003 + 0.006 * I,");
> omniout_str(ALWAYS,"0.0001 + 0.005 * I,");
> omniout_str(ALWAYS,"0.0001 + 0.003 * I,");
> omniout_str(ALWAYS,"0.001 + 0.001 * I,");
> omniout_str(ALWAYS,"0.0001 + 0.004 * I,");
> omniout_str(ALWAYS,"0.003 + 0.006 * I,");
> omniout_str(ALWAYS,"0.0001 + 0.005 * I,");
> omniout_str(ALWAYS,"0.0001 + 0.003 * I,");
> omniout_str(ALWAYS,"0.001 + 0.001 * I,");
> omniout_str(ALWAYS,"0.001 + 0.003 * I,");
> omniout_str(ALWAYS,"0.0001 + 0.004 * I,");
> omniout_str(ALWAYS,"0.003 + 0.006 * I,");
> omniout_str(ALWAYS,"0.0001 + 0.005 * I,");
> omniout_str(ALWAYS,"0.0001 + 0.003 * I,");
> omniout_str(ALWAYS,"0.001 + 0.001 * I,");
> omniout_str(ALWAYS,"0.001 + 0.003 * I,");
> omniout_str(ALWAYS,"0.0001 + 0.004 * I,");
> omniout_str(ALWAYS,"0.003 + 0.006 * I,");
> omniout_str(ALWAYS,"0.0001 + 0.005 * I,");
> omniout_str(ALWAYS,"0.0001 + 0.003 * I,");
> omniout_str(ALWAYS,"0.001 + 0.001 * I,");
> omniout_str(ALWAYS,"0.001 + 0.003 * I,");
> omniout_str(ALWAYS,"0.0001 + 0.004 * I,");
> omniout_str(ALWAYS,"0.003 + 0.006 * I,");
> omniout_str(ALWAYS,"0.0001 + 0.005 * I,");
> omniout_str(ALWAYS,"0.0001 + 0.003 * I,");
> omniout_str(ALWAYS,"0.001 + 0.001 * I,");
> omniout_str(ALWAYS,"0.001 + 0.003 * I,");
> omniout_str(ALWAYS,"0.0001 + 0.004 * I,");
> omniout_str(ALWAYS,"0.003 + 0.006 * I,");
> omniout_str(ALWAYS,"0.0001 + 0.005 * I,");
> omniout_str(ALWAYS,"0.0001 + 0.003 * I,");
> omniout_str(ALWAYS,"0.001 + 0.001 * I,");
> omniout_str(ALWAYS,"0.0001 + 0.004 * I,");
> omniout_str(ALWAYS,"0.003 + 0.006 * I,");
> omniout_str(ALWAYS,"0.0001 + 0.005 * I,");
> omniout_str(ALWAYS,"0.0001 + 0.003 * I,");
> omniout_str(ALWAYS,"0.001 + 0.001 * I,");
> omniout_str(ALWAYS,"0.001 + 0.003 * I,");
> omniout_str(ALWAYS,"0.0001 + 0.004 * I,");
> omniout_str(ALWAYS,"0.003 + 0.006 * I,");
> omniout_str(ALWAYS,"0.0001 + 0.005 * I,");
> omniout_str(ALWAYS,"0.0001 + 0.003 * I,");
> omniout_str(ALWAYS,"0.001 + 0.001 * I,");
> omniout_str(ALWAYS,"0.001 + 0.003 * I,");
> omniout_str(ALWAYS,"0.0001 + 0.004 * I,");
> omniout_str(ALWAYS,"0.003 + 0.006 * I,");
> omniout_str(ALWAYS,"0.0001 + 0.005 * I,");
> omniout_str(ALWAYS,"0.0001 + 0.003 * I,");
> omniout_str(ALWAYS,"0.001 + 0.001 * I,");
> omniout_str(ALWAYS,"0.001 + 0.003 * I,");
> omniout_str(ALWAYS,"0.0001 + 0.004 * I,");
> omniout_str(ALWAYS,"0.003 + 0.006 * I,");
> omniout_str(ALWAYS,"0.0001 + 0.005 * I,");
> omniout_str(ALWAYS,"0.0001 + 0.003 * I,");
> omniout_str(ALWAYS,"0.001 + 0.001 * I,");
> omniout_str(ALWAYS,"0.001 + 0.003 * I,");
> omniout_str(ALWAYS,"0.0001 + 0.004 * I,");
> omniout_str(ALWAYS,"0.003 + 0.006 * I,");
> omniout_str(ALWAYS,"0.0001 + 0.005 * I,");
> omniout_str(ALWAYS,"0.0001 + 0.003 * I,");
> omniout_str(ALWAYS,"0.001 + 0.001 * I,");
> omniout_str(ALWAYS,"0.0001 + 0.004 * I,");
> omniout_str(ALWAYS,"0.003 + 0.006 * I,");
> omniout_str(ALWAYS,"0.0001 + 0.005 * I,");
> omniout_str(ALWAYS,"0.0001 + 0.003 * I,");
> omniout_str(ALWAYS,"0.001 + 0.001 * I,");
> omniout_str(ALWAYS,"0.001 + 0.003 * I,");
> omniout_str(ALWAYS,"0.0001 + 0.004 * I,");
> omniout_str(ALWAYS,"0.003 + 0.006 * I,");
> omniout_str(ALWAYS,"0.0001 + 0.005 * I,");
> omniout_str(ALWAYS,"0.0001 + 0.003 * I,");
> omniout_str(ALWAYS,"0.001 + 0.001 * I,");
> omniout_str(ALWAYS,"0.001 + 0.003 * I,");
> omniout_str(ALWAYS,"0.0001 + 0.004 * I,");
> omniout_str(ALWAYS,"0.003 + 0.006 * I,");
> omniout_str(ALWAYS,"0.0001 + 0.005 * I,");
> omniout_str(ALWAYS,"0.0001 + 0.003 * I,");
> omniout_str(ALWAYS,"0.001 + 0.001 * I,");
> omniout_str(ALWAYS,"0.001 + 0.003 * I,");
> omniout_str(ALWAYS,"0.0001 + 0.004 * I,");
> omniout_str(ALWAYS,"0.003 + 0.006 * I,");
> omniout_str(ALWAYS,"0.0001 + 0.005 * I,");
> omniout_str(ALWAYS,"0.0001 + 0.003 * I,");
> omniout_str(ALWAYS,"0.001 + 0.001 * I,");
> omniout_str(ALWAYS,"0.001 + 0.003 * I,");
> omniout_str(ALWAYS,"0.0001 + 0.004 * I,");
> omniout_str(ALWAYS,"0.003 + 0.006 * I,");
> omniout_str(ALWAYS,"0.0001 + 0.005 * I,");
> omniout_str(ALWAYS,"0.0001 + 0.003 * I,");
> omniout_str(ALWAYS,"0.001 + 0.001 * I,");
> omniout_str(ALWAYS,"0.0001 + 0.004 * I,");
> omniout_str(ALWAYS,"0.003 + 0.006 * I,");
> omniout_str(ALWAYS,"0.0001 + 0.005 * I,");
> omniout_str(ALWAYS,"0.0001 + 0.003 * I,");
> omniout_str(ALWAYS,"0.001 + 0.001 * I,");
> omniout_str(ALWAYS,"0.001 + 0.003 * I,");
> omniout_str(ALWAYS,"0.0001 + 0.004 * I,");
> omniout_str(ALWAYS,"0.003 + 0.006 * I,");
> omniout_str(ALWAYS,"0.0001 + 0.005 * I,");
> omniout_str(ALWAYS,"0.0001 + 0.003 * I,");
> omniout_str(ALWAYS,"0.001 + 0.001 * I,");
> omniout_str(ALWAYS,"0.001 + 0.003 * I,");
> omniout_str(ALWAYS,"0.0001 + 0.004 * I,");
> omniout_str(ALWAYS,"0.003 + 0.006 * I,");
> omniout_str(ALWAYS,"0.0001 + 0.005 * I,");
> omniout_str(ALWAYS,"0.0001 + 0.003 * I,");
> omniout_str(ALWAYS,"0.001 + 0.001 * I,");
> omniout_str(ALWAYS,"0.001 + 0.003 * I,");
> omniout_str(ALWAYS,"0.0001 + 0.004 * I,");
> omniout_str(ALWAYS,"0.003 + 0.006 * I,");
> omniout_str(ALWAYS,"0.0001 + 0.005 * I,");
> omniout_str(ALWAYS,"0.0001 + 0.003 * I,");
> omniout_str(ALWAYS,"0.001 + 0.001 * I,");
> omniout_str(ALWAYS,"0.001 + 0.003 * I,");
> omniout_str(ALWAYS,"0.0001 + 0.004 * I,");
> omniout_str(ALWAYS,"0.003 + 0.006 * I,");
> omniout_str(ALWAYS,"0.0001 + 0.005 * I,");
> omniout_str(ALWAYS,"0.0001 + 0.003 * I,");
> omniout_str(ALWAYS,"0.001 + 0.001 * I,");
> omniout_str(ALWAYS,"0.0001 + 0.004 * I,");
> omniout_str(ALWAYS,"0.003 + 0.006 * I,");
> omniout_str(ALWAYS,"0.0001 + 0.005 * I,");
> omniout_str(ALWAYS,"0.0001 + 0.003 * I,");
> omniout_str(ALWAYS,"0.001 + 0.001 * I,");
> omniout_str(ALWAYS,"0.001 + 0.003 * I,");
> omniout_str(ALWAYS,"0.0001 + 0.004 * I,");
> omniout_str(ALWAYS,"0.003 + 0.006 * I,");
> omniout_str(ALWAYS,"0.0001 + 0.005 * I,");
> omniout_str(ALWAYS,"0.0001 + 0.003 * I,");
> omniout_str(ALWAYS,"0.001 + 0.001 * I,");
> omniout_str(ALWAYS,"0.001 + 0.003 * I,");
> omniout_str(ALWAYS,"0.0001 + 0.004 * I,");
> omniout_str(ALWAYS,"0.003 + 0.006 * I,");
> omniout_str(ALWAYS,"0.0001 + 0.005 * I,");
> omniout_str(ALWAYS,"0.0001 + 0.003 * I,");
> omniout_str(ALWAYS,"0.001 + 0.001 * I,");
> omniout_str(ALWAYS,"0.001 + 0.003 * I,");
> omniout_str(ALWAYS,"0.0001 + 0.004 * I,");
> omniout_str(ALWAYS,"0.003 + 0.006 * I,");
> omniout_str(ALWAYS,"0.0001 + 0.005 * I,");
> omniout_str(ALWAYS,"0.0001 + 0.003 * I,");
> omniout_str(ALWAYS,"0.001 + 0.001 * I,");
> omniout_str(ALWAYS,"0.001 + 0.003 * I,");
> omniout_str(ALWAYS,"0.0001 + 0.004 * I,");
> omniout_str(ALWAYS,"0.003 + 0.006 * I,");
> omniout_str(ALWAYS,"0.0001 + 0.005 * I,");
> omniout_str(ALWAYS,"0.0001 + 0.003 * I,");
> omniout_str(ALWAYS,"0.001 + 0.001 * I,");
> omniout_str(ALWAYS,"0.0001 + 0.004 * I,");
> omniout_str(ALWAYS,"0.003 + 0.006 * I,");
> omniout_str(ALWAYS,"0.0001 + 0.005 * I,");
> omniout_str(ALWAYS,"0.0001 + 0.003 * I,");
> omniout_str(ALWAYS,"0.001 + 0.001 * I,");
> omniout_str(ALWAYS,"0.001 + 0.003 * I,");
> omniout_str(ALWAYS,"0.0001 + 0.004 * I,");
> omniout_str(ALWAYS,"0.003 + 0.006 * I,");
> omniout_str(ALWAYS,"0.0001 + 0.005 * I,");
> omniout_str(ALWAYS,"0.0001 + 0.003 * I,");
> omniout_str(ALWAYS,"0.001 + 0.001 * I,");
> omniout_str(ALWAYS,"0.001 + 0.003 * I,");
> omniout_str(ALWAYS,"0.0001 + 0.004 * I,");
> omniout_str(ALWAYS,"0.003 + 0.006 * I,");
> omniout_str(ALWAYS,"0.0001 + 0.005 * I,");
> omniout_str(ALWAYS,"0.0001 + 0.003 * I,");
> omniout_str(ALWAYS,"0.001 + 0.001 * I,");
> omniout_str(ALWAYS,"0.001 + 0.003 * I,");
> omniout_str(ALWAYS,"0.0001 + 0.004 * I,");
> omniout_str(ALWAYS,"0.003 + 0.006 * I,");
> omniout_str(ALWAYS,"0.0001 + 0.005 * I,");
> omniout_str(ALWAYS,"0.0001 + 0.003 * I,");
> omniout_str(ALWAYS,"0.001 + 0.001 * I,");
> omniout_str(ALWAYS,"0.001 + 0.003 * I,");
> omniout_str(ALWAYS,"0.0001 + 0.004 * I,");
> omniout_str(ALWAYS,"0.003 + 0.006 * I,");
> omniout_str(ALWAYS,"0.0001 + 0.005 * I,");
> omniout_str(ALWAYS,"0.0001 + 0.003 * I,");
> omniout_str(ALWAYS,"0.001 + 0.001 * I,");
> omniout_str(ALWAYS,"0.0001 + 0.004 * I,");
> omniout_str(ALWAYS,"0.003 + 0.006 * I,");
> omniout_str(ALWAYS,"0.0001 + 0.005 * I,");
> omniout_str(ALWAYS,"0.0001 + 0.003 * I,");
> omniout_str(ALWAYS,"0.001 + 0.001 * I,");
> omniout_str(ALWAYS,"0.001 + 0.003 * I,");
> omniout_str(ALWAYS,"0.0001 + 0.004 * I,");
> omniout_str(ALWAYS,"0.003 + 0.006 * I,");
> omniout_str(ALWAYS,"0.0001 + 0.005 * I,");
> omniout_str(ALWAYS,"0.0001 + 0.003 * I,");
> omniout_str(ALWAYS,"0.001 + 0.001 * I,");
> omniout_str(ALWAYS,"0.001 + 0.003 * I,");
> omniout_str(ALWAYS,"0.0001 + 0.004 * I,");
> omniout_str(ALWAYS,"0.003 + 0.006 * I,");
> omniout_str(ALWAYS,"0.0001 + 0.005 * I,");
> omniout_str(ALWAYS,"0.0001 + 0.003 * I,");
> omniout_str(ALWAYS,"0.001 + 0.001 * I,");
> omniout_str(ALWAYS,"0.001 + 0.003 * I,");
> omniout_str(ALWAYS,"0.0001 + 0.004 * I,");
> omniout_str(ALWAYS,"0.003 + 0.006 * I,");
> omniout_str(ALWAYS,"0.0001 + 0.005 * I,");
> omniout_str(ALWAYS,"0.0001 + 0.003 * I,");
> omniout_str(ALWAYS,"0.001 + 0.001 * I,");
> omniout_str(ALWAYS,"0.001 + 0.003 * I,");
> omniout_str(ALWAYS,"0.0001 + 0.004 * I,");
> omniout_str(ALWAYS,"0.003 + 0.006 * I,");
> omniout_str(ALWAYS,"0.0001 + 0.005 * I,");
> omniout_str(ALWAYS,"0.0001 + 0.003 * I,");
> omniout_str(ALWAYS,"0.001 + 0.001 * I,");
> omniout_str(ALWAYS,"0.0001 + 0.004 * I,");
> omniout_str(ALWAYS,"0.003 + 0.006 * I,");
> omniout_str(ALWAYS,"0.0001 + 0.005 * I,");
> omniout_str(ALWAYS,"0.0001 + 0.003 * I,");
> omniout_str(ALWAYS,"0.001 + 0.001 * I,");
> omniout_str(ALWAYS,"0.001 + 0.003 * I,");
> omniout_str(ALWAYS,"0.0001 + 0.004 * I,");
> omniout_str(ALWAYS,"0.003 + 0.006 * I,");
> omniout_str(ALWAYS,"0.0001 + 0.005 * I,");
> omniout_str(ALWAYS,"0.0001 + 0.003 * I,");
> omniout_str(ALWAYS,"0.001 + 0.001 * I,");
> omniout_str(ALWAYS,"0.001 + 0.003 * I,");
> omniout_str(ALWAYS,"0.0001 + 0.004 * I,");
> omniout_str(ALWAYS,"0.003 + 0.006 * I,");
> omniout_str(ALWAYS,"0.0001 + 0.005 * I,");
> omniout_str(ALWAYS,"0.0001 + 0.003 * I,");
> omniout_str(ALWAYS,"0.001 + 0.001 * I,");
> omniout_str(ALWAYS,"0.001 + 0.003 * I,");
> omniout_str(ALWAYS,"0.0001 + 0.004 * I,");
> omniout_str(ALWAYS,"0.003 + 0.006 * I,");
> omniout_str(ALWAYS,"0.0001 + 0.005 * I,");
> omniout_str(ALWAYS,"0.0001 + 0.003 * I,");
> omniout_str(ALWAYS,"0.001 + 0.001 * I,");
> omniout_str(ALWAYS,"0.001 + 0.003 * I,");
> omniout_str(ALWAYS,"0.0001 + 0.004 * I,");
> omniout_str(ALWAYS,"0.003 + 0.006 * I,");
> omniout_str(ALWAYS,"0.0001 + 0.005 * I,");
> omniout_str(ALWAYS,"0.0001 + 0.003 * I,");
> omniout_str(ALWAYS,"0.001 + 0.001 * I,");
> omniout_str(ALWAYS,"0.0001 + 0.004 * I,");
> omniout_str(ALWAYS,"0.003 + 0.006 * I,");
> omniout_str(ALWAYS,"0.0001 + 0.005 * I,");
> omniout_str(ALWAYS,"0.0001 + 0.003 * I,");
> omniout_str(ALWAYS,"0.001 + 0.001 * I,");
> omniout_str(ALWAYS,"0.001 + 0.003 * I,");
> omniout_str(ALWAYS,"0.0001 + 0.004 * I,");
> omniout_str(ALWAYS,"0.003 + 0.006 * I,");
> omniout_str(ALWAYS,"0.0001 + 0.005 * I,");
> omniout_str(ALWAYS,"0.0001 + 0.003 * I,");
> omniout_str(ALWAYS,"0.001 + 0.001 * I,");
> omniout_str(ALWAYS,"0.001 + 0.003 * I,");
> omniout_str(ALWAYS,"0.0001 + 0.004 * I,");
> omniout_str(ALWAYS,"0.003 + 0.006 * I,");
> omniout_str(ALWAYS,"0.0001 + 0.005 * I,");
> omniout_str(ALWAYS,"0.0001 + 0.003 * I,");
> omniout_str(ALWAYS,"0.001 + 0.001 * I,");
> omniout_str(ALWAYS,"0.001 + 0.003 * I,");
> omniout_str(ALWAYS,"0.0001 + 0.004 * I,");
> omniout_str(ALWAYS,"0.003 + 0.006 * I,");
> omniout_str(ALWAYS,"0.0001 + 0.005 * I,");
> omniout_str(ALWAYS,"0.0001 + 0.003 * I,");
> omniout_str(ALWAYS,"0.001 + 0.001 * I,");
> omniout_str(ALWAYS,"0.001 + 0.003 * I,");
> omniout_str(ALWAYS,"0.0001 + 0.004 * I,");
> omniout_str(ALWAYS,"0.003 + 0.006 * I,");
> omniout_str(ALWAYS,"0.0001 + 0.005 * I,");
> omniout_str(ALWAYS,"0.0001 + 0.003 * I,");
> omniout_str(ALWAYS,"0.001 + 0.001 * I,");
> omniout_str(ALWAYS,"0.0001 + 0.004 * I,");
> omniout_str(ALWAYS,"0.003 + 0.006 * I,");
> omniout_str(ALWAYS,"0.0001 + 0.005 * I,");
> omniout_str(ALWAYS,"0.0001 + 0.003 * I,");
> omniout_str(ALWAYS,"0.001 + 0.001 * I,");
> omniout_str(ALWAYS,"0.001 + 0.003 * I,");
> omniout_str(ALWAYS,"0.0001 + 0.004 * I,");
> omniout_str(ALWAYS,"0.003 + 0.006 * I,");
> omniout_str(ALWAYS,"0.0001 + 0.005 * I,");
> omniout_str(ALWAYS,"0.0001 + 0.003 * I,");
> omniout_str(ALWAYS,"0.001 + 0.001 * I,");
> omniout_str(ALWAYS,"0.001 + 0.003 * I,");
> omniout_str(ALWAYS,"0.0001 + 0.004 * I,");
> omniout_str(ALWAYS,"0.003 + 0.006 * I,");
> omniout_str(ALWAYS,"0.0001 + 0.005 * I,");
> omniout_str(ALWAYS,"0.0001 + 0.003 * I,");
> omniout_str(ALWAYS,"0.001 + 0.001 * I,");
> omniout_str(ALWAYS,"0.001 + 0.003 * I,");
> omniout_str(ALWAYS,"0.0001 + 0.004 * I,");
> omniout_str(ALWAYS,"0.003 + 0.006 * I,");
> omniout_str(ALWAYS,"0.0001 + 0.005 * I,");
> omniout_str(ALWAYS,"0.0001 + 0.003 * I,");
> omniout_str(ALWAYS,"0.001 + 0.001 * I,");
> omniout_str(ALWAYS,"0.001 + 0.003 * I,");
> omniout_str(ALWAYS,"0.0001 + 0.004 * I,");
> omniout_str(ALWAYS,"0.003 + 0.006 * I,");
> omniout_str(ALWAYS,"0.0001 + 0.005 * I,");
> omniout_str(ALWAYS,"0.0001 + 0.003 * I,");
> omniout_str(ALWAYS,"0.001 + 0.001 * I,");
> omniout_str(ALWAYS,"0.0001 + 0.004 * I,");
> omniout_str(ALWAYS,"0.003 + 0.006 * I,");
> omniout_str(ALWAYS,"0.0001 + 0.005 * I,");
> omniout_str(ALWAYS,"0.0001 + 0.003 * I,");
> omniout_str(ALWAYS,"0.001 + 0.001 * I,");
> omniout_str(ALWAYS,"0.001 + 0.003 * I,");
> omniout_str(ALWAYS,"0.0001 + 0.004 * I,");
> omniout_str(ALWAYS,"0.003 + 0.006 * I,");
> omniout_str(ALWAYS,"0.0001 + 0.005 * I,");
> omniout_str(ALWAYS,"0.0001 + 0.003 * I,");
> omniout_str(ALWAYS,"0.001 + 0.001 * I,");
> omniout_str(ALWAYS,"0.001 + 0.003 * I,");
> omniout_str(ALWAYS,"0.0001 + 0.004 * I,");
> omniout_str(ALWAYS,"0.003 + 0.006 * I,");
> omniout_str(ALWAYS,"0.0001 + 0.005 * I,");
> omniout_str(ALWAYS,"0.0001 + 0.003 * I,");
> omniout_str(ALWAYS,"0.001 + 0.001 * I,");
> omniout_str(ALWAYS,"0.001 + 0.003 * I,");
> omniout_str(ALWAYS,"0.0001 + 0.004 * I,");
> omniout_str(ALWAYS,"0.003 + 0.006 * I,");
> omniout_str(ALWAYS,"0.0001 + 0.005 * I,");
> omniout_str(ALWAYS,"0.0001 + 0.003 * I,");
> omniout_str(ALWAYS,"0.001 + 0.001 * I,");
> omniout_str(ALWAYS,"0.001 + 0.003 * I,");
> omniout_str(ALWAYS,"0.0001 + 0.004 * I,");
> omniout_str(ALWAYS,"0.003 + 0.006 * I,");
> omniout_str(ALWAYS,"0.0001 + 0.005 * I,");
> omniout_str(ALWAYS,"0.0001 + 0.003 * I,");
> omniout_str(ALWAYS,"0.001 + 0.001 * I,");
> omniout_str(ALWAYS,"0.001 + 0.003 * I,");
> omniout_str(ALWAYS,"0.000 + 0.000 * I ];");
> omniout_str(ALWAYS,"");
> omniout_str(ALWAYS,"glob_nxt := glob_nxt + 1;");
> omniout_str(ALWAYS,"it := x_delta[glob_nxt];");
> omniout_str(ALWAYS,"return it;");
> omniout_str(ALWAYS,"end;");
> omniout_str(ALWAYS,"#END USER DEF BLOCK");
> omniout_str(ALWAYS,"#######END OF ECHO OF PROBLEM#################");
> glob_unchanged_h_cnt := 0;
> glob_warned := false;
> glob_warned2 := false;
> glob_small_float := glob__0;
> glob_smallish_float := glob__0;
> glob_large_float := c(1.0e100);
> glob_larger_float := c( 1.1e100);
> glob_almost_1 := c( 0.99);
> # before second block
> #TOP SECOND INPUT BLOCK
> #BEGIN SECOND INPUT BLOCK
> #BEGIN BLOCK 2
> #END FIRST INPUT BLOCK
> #BEGIN SECOND INPUT BLOCK
> x_start := 0.1 + 0.1 * I;
> x_end := 99.0 + 99.0 * I;
> array_y_init[0 + 1] := exact_soln_y(x_start);
> glob_look_poles := 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 ) = ( 0.2 * x + 0.3 ) * sin ( x ) ; ");
> omniout_int(INFO,"Iterations ",32,glob_iter,4," ")
> ;
> prog_report(x_start,x_end);
> if (glob_html_log) then # if number 10
> logstart(html_log_file);
> logitem_str(html_log_file,"2017-11-26T16:19:53-06:00")
> ;
> logitem_str(html_log_file,"Maple")
> ;
> logitem_str(html_log_file,"mult_lin_sin")
> ;
> logitem_str(html_log_file,"diff ( y , x , 1 ) = ( 0.2 * x + 0.3 ) * sin ( x ) ; ")
> ;
> logitem_complex(html_log_file,x_start)
> ;
> logitem_complex(html_log_file,x_end)
> ;
> logitem_complex(html_log_file,array_x[1])
> ;
> logitem_complex(html_log_file,glob_h)
> ;
> logitem_h_reason(html_log_file)
> ;
> logitem_integer(html_log_file,Digits)
> ;
> ;
> glob_desired_digits_correct := 0.0;
> logitem_float(html_log_file,glob_desired_digits_correct)
> ;
> if (array_est_digits[1] <> -16) then # if number 11
> logitem_integer(html_log_file,array_est_digits[1])
> ;
> else
> logitem_str(html_log_file,"Unknown")
> ;
> fi;# end if 11;
> if (glob_min_good_digits <> -16) then # if number 11
> logitem_integer(html_log_file,glob_min_good_digits)
> ;
> else
> logitem_str(html_log_file,"Unknown")
> ;
> fi;# end if 11;
> if (glob_good_digits <> -16) then # if number 11
> logitem_integer(html_log_file,glob_good_digits)
> ;
> else
> logitem_str(html_log_file,"Unknown")
> ;
> fi;# end if 11;
> logitem_str(html_log_file,"NA")
> ;
> logitem_str(html_log_file,"NA")
> ;
> logitem_integer(html_log_file,ATS_MAX_TERMS)
> ;
> if (glob_type_given_pole = 0) then # if number 11
> logitem_str(html_log_file,"Not Given")
> ;
> logitem_str(html_log_file,"NA")
> ;
> elif
> (glob_type_given_pole = 4) then # if number 12
> logitem_str(html_log_file,"No Solution")
> ;
> logitem_str(html_log_file,"NA")
> ;
> elif
> (glob_type_given_pole = 5) then # if number 13
> logitem_str(html_log_file,"Some Pole")
> ;
> logitem_str(html_log_file,"????")
> ;
> elif
> (glob_type_given_pole = 3) then # if number 14
> logitem_str(html_log_file,"No Pole")
> ;
> logitem_str(html_log_file,"NA")
> ;
> elif
> (glob_type_given_pole = 1) then # if number 15
> logitem_str(html_log_file,"Real Sing")
> ;
> logitem_float(html_log_file,glob_least_given_sing)
> ;
> elif
> (glob_type_given_pole = 2) then # if number 16
> logitem_str(html_log_file,"Complex Sing")
> ;
> logitem_float(html_log_file,glob_least_given_sing)
> ;
> fi;# end if 16;
> if (glob_least_ratio_sing < glob_large_float) then # if number 16
> glob_least_ratio_sing := 0;
> logitem_float(html_log_file,glob_least_ratio_sing)
> ;
> else
> logitem_str(html_log_file,"NONE")
> ;
> fi;# end if 16;
> if (glob_least_3_sing < glob_large_float) then # if number 16
> logitem_float(html_log_file,glob_least_3_sing)
> ;
> else
> logitem_str(html_log_file,"NONE")
> ;
> fi;# end if 16;
> if (glob_least_6_sing < glob_large_float) then # if number 16
> glob_least_6_sing := 0.0;
> logitem_float(html_log_file,glob_least_6_sing)
> ;
> else
> logitem_str(html_log_file,"NONE")
> ;
> fi;# end if 16;
> logitem_integer(html_log_file,glob_iter)
> ;
> logitem_time(html_log_file,(glob_clock_sec))
> ;
> if (c(glob_percent_done) < glob__100) then # if number 16
> logitem_time(html_log_file,(glob_total_exp_sec))
> ;
> 0;
> else
> logitem_str(html_log_file,"Done")
> ;
> 0;
> fi;# end if 16;
> log_revs(html_log_file," 309 | ")
> ;
> logitem_str(html_log_file,"mult_lin_sin diffeq.mxt")
> ;
> logitem_str(html_log_file,"mult_lin_sin 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_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_g, array_tmp3, array_tmp4, array_tmp5,
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_g := Array(0 .. 30, []);
array_tmp3 := Array(0 .. 30, []);
array_tmp4 := Array(0 .. 30, []);
array_tmp5 := 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_g[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_tmp5[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_g);
zero_ats_ar(array_tmp3);
zero_ats_ar(array_tmp4);
zero_ats_ar(array_tmp5);
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_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/mult_lin_sinpostcpx.cpx#################");
omniout_str(ALWAYS, "diff ( y , x , 1 ) = ( 0.2 * x +\
0.3 ) * sin ( x ) ; ");
omniout_str(ALWAYS, "!");
omniout_str(ALWAYS, "#BEGIN FIRST INPUT BLOCK");
omniout_str(ALWAYS, "Digits:=32;");
omniout_str(ALWAYS, "max_terms:=30;");
omniout_str(ALWAYS, "!");
omniout_str(ALWAYS, "#END FIRST INPUT BLOCK");
omniout_str(ALWAYS, "#BEGIN SECOND INPUT BLOCK");
omniout_str(ALWAYS, "x_start := 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, "");
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(0.2) * sin(c(x)) - c(0.2) * cos(c(x)) *\
c(x) - c(0.3) * cos(c(x)));");
omniout_str(ALWAYS, "end;");
omniout_str(ALWAYS, "next_delta := proc()");
omniout_str(ALWAYS, "global glob_nxt, x_delta;");
omniout_str(ALWAYS, "");
omniout_str(ALWAYS, "x_delta := [ 0.001 + 0.00004 * I,");
omniout_str(ALWAYS, "0.0001 + 0.004 * I,");
omniout_str(ALWAYS, "0.003 + 0.006 * I,");
omniout_str(ALWAYS, "0.0001 + 0.005 * I,");
omniout_str(ALWAYS, "0.0001 + 0.003 * I,");
omniout_str(ALWAYS, "0.001 + 0.001 * I,");
omniout_str(ALWAYS, "0.001 + 0.003 * I,");
omniout_str(ALWAYS, "0.0001 + 0.004 * I,");
omniout_str(ALWAYS, "0.003 + 0.006 * I,");
omniout_str(ALWAYS, "0.0001 + 0.005 * I,");
omniout_str(ALWAYS, "0.0001 + 0.003 * I,");
omniout_str(ALWAYS, "0.001 + 0.001 * I,");
omniout_str(ALWAYS, "0.001 + 0.003 * I,");
omniout_str(ALWAYS, "0.0001 + 0.004 * I,");
omniout_str(ALWAYS, "0.003 + 0.006 * I,");
omniout_str(ALWAYS, "0.0001 + 0.005 * I,");
omniout_str(ALWAYS, "0.0001 + 0.003 * I,");
omniout_str(ALWAYS, "0.001 + 0.001 * I,");
omniout_str(ALWAYS, "0.001 + 0.003 * I,");
omniout_str(ALWAYS, "0.0001 + 0.004 * I,");
omniout_str(ALWAYS, "0.003 + 0.006 * I,");
omniout_str(ALWAYS, "0.0001 + 0.005 * I,");
omniout_str(ALWAYS, "0.0001 + 0.003 * I,");
omniout_str(ALWAYS, "0.001 + 0.001 * I,");
omniout_str(ALWAYS, "0.001 + 0.003 * I,");
omniout_str(ALWAYS, "0.0001 + 0.004 * I,");
omniout_str(ALWAYS, "0.003 + 0.006 * I,");
omniout_str(ALWAYS, "0.0001 + 0.005 * I,");
omniout_str(ALWAYS, "0.0001 + 0.003 * I,");
omniout_str(ALWAYS, "0.001 + 0.001 * I,");
omniout_str(ALWAYS, "0.0001 + 0.004 * I,");
omniout_str(ALWAYS, "0.003 + 0.006 * I,");
omniout_str(ALWAYS, "0.0001 + 0.005 * I,");
omniout_str(ALWAYS, "0.0001 + 0.003 * I,");
omniout_str(ALWAYS, "0.001 + 0.001 * I,");
omniout_str(ALWAYS, "0.001 + 0.003 * I,");
omniout_str(ALWAYS, "0.0001 + 0.004 * I,");
omniout_str(ALWAYS, "0.003 + 0.006 * I,");
omniout_str(ALWAYS, "0.0001 + 0.005 * I,");
omniout_str(ALWAYS, "0.0001 + 0.003 * I,");
omniout_str(ALWAYS, "0.001 + 0.001 * I,");
omniout_str(ALWAYS, "0.001 + 0.003 * I,");
omniout_str(ALWAYS, "0.0001 + 0.004 * I,");
omniout_str(ALWAYS, "0.003 + 0.006 * I,");
omniout_str(ALWAYS, "0.0001 + 0.005 * I,");
omniout_str(ALWAYS, "0.0001 + 0.003 * I,");
omniout_str(ALWAYS, "0.001 + 0.001 * I,");
omniout_str(ALWAYS, "0.001 + 0.003 * I,");
omniout_str(ALWAYS, "0.0001 + 0.004 * I,");
omniout_str(ALWAYS, "0.003 + 0.006 * I,");
omniout_str(ALWAYS, "0.0001 + 0.005 * I,");
omniout_str(ALWAYS, "0.0001 + 0.003 * I,");
omniout_str(ALWAYS, "0.001 + 0.001 * I,");
omniout_str(ALWAYS, "0.001 + 0.003 * I,");
omniout_str(ALWAYS, "0.0001 + 0.004 * I,");
omniout_str(ALWAYS, "0.003 + 0.006 * I,");
omniout_str(ALWAYS, "0.0001 + 0.005 * I,");
omniout_str(ALWAYS, "0.0001 + 0.003 * I,");
omniout_str(ALWAYS, "0.001 + 0.001 * I,");
omniout_str(ALWAYS, "0.0001 + 0.004 * I,");
omniout_str(ALWAYS, "0.003 + 0.006 * I,");
omniout_str(ALWAYS, "0.0001 + 0.005 * I,");
omniout_str(ALWAYS, "0.0001 + 0.003 * I,");
omniout_str(ALWAYS, "0.001 + 0.001 * I,");
omniout_str(ALWAYS, "0.001 + 0.003 * I,");
omniout_str(ALWAYS, "0.0001 + 0.004 * I,");
omniout_str(ALWAYS, "0.003 + 0.006 * I,");
omniout_str(ALWAYS, "0.0001 + 0.005 * I,");
omniout_str(ALWAYS, "0.0001 + 0.003 * I,");
omniout_str(ALWAYS, "0.001 + 0.001 * I,");
omniout_str(ALWAYS, "0.001 + 0.003 * I,");
omniout_str(ALWAYS, "0.0001 + 0.004 * I,");
omniout_str(ALWAYS, "0.003 + 0.006 * I,");
omniout_str(ALWAYS, "0.0001 + 0.005 * I,");
omniout_str(ALWAYS, "0.0001 + 0.003 * I,");
omniout_str(ALWAYS, "0.001 + 0.001 * I,");
omniout_str(ALWAYS, "0.001 + 0.003 * I,");
omniout_str(ALWAYS, "0.0001 + 0.004 * I,");
omniout_str(ALWAYS, "0.003 + 0.006 * I,");
omniout_str(ALWAYS, "0.0001 + 0.005 * I,");
omniout_str(ALWAYS, "0.0001 + 0.003 * I,");
omniout_str(ALWAYS, "0.001 + 0.001 * I,");
omniout_str(ALWAYS, "0.001 + 0.003 * I,");
omniout_str(ALWAYS, "0.0001 + 0.004 * I,");
omniout_str(ALWAYS, "0.003 + 0.006 * I,");
omniout_str(ALWAYS, "0.0001 + 0.005 * I,");
omniout_str(ALWAYS, "0.0001 + 0.003 * I,");
omniout_str(ALWAYS, "0.001 + 0.001 * I,");
omniout_str(ALWAYS, "0.0001 + 0.004 * I,");
omniout_str(ALWAYS, "0.003 + 0.006 * I,");
omniout_str(ALWAYS, "0.0001 + 0.005 * I,");
omniout_str(ALWAYS, "0.0001 + 0.003 * I,");
omniout_str(ALWAYS, "0.001 + 0.001 * I,");
omniout_str(ALWAYS, "0.001 + 0.003 * I,");
omniout_str(ALWAYS, "0.0001 + 0.004 * I,");
omniout_str(ALWAYS, "0.003 + 0.006 * I,");
omniout_str(ALWAYS, "0.0001 + 0.005 * I,");
omniout_str(ALWAYS, "0.0001 + 0.003 * I,");
omniout_str(ALWAYS, "0.001 + 0.001 * I,");
omniout_str(ALWAYS, "0.001 + 0.003 * I,");
omniout_str(ALWAYS, "0.0001 + 0.004 * I,");
omniout_str(ALWAYS, "0.003 + 0.006 * I,");
omniout_str(ALWAYS, "0.0001 + 0.005 * I,");
omniout_str(ALWAYS, "0.0001 + 0.003 * I,");
omniout_str(ALWAYS, "0.001 + 0.001 * I,");
omniout_str(ALWAYS, "0.001 + 0.003 * I,");
omniout_str(ALWAYS, "0.0001 + 0.004 * I,");
omniout_str(ALWAYS, "0.003 + 0.006 * I,");
omniout_str(ALWAYS, "0.0001 + 0.005 * I,");
omniout_str(ALWAYS, "0.0001 + 0.003 * I,");
omniout_str(ALWAYS, "0.001 + 0.001 * I,");
omniout_str(ALWAYS, "0.001 + 0.003 * I,");
omniout_str(ALWAYS, "0.0001 + 0.004 * I,");
omniout_str(ALWAYS, "0.003 + 0.006 * I,");
omniout_str(ALWAYS, "0.0001 + 0.005 * I,");
omniout_str(ALWAYS, "0.0001 + 0.003 * I,");
omniout_str(ALWAYS, "0.001 + 0.001 * I,");
omniout_str(ALWAYS, "0.0001 + 0.004 * I,");
omniout_str(ALWAYS, "0.003 + 0.006 * I,");
omniout_str(ALWAYS, "0.0001 + 0.005 * I,");
omniout_str(ALWAYS, "0.0001 + 0.003 * I,");
omniout_str(ALWAYS, "0.001 + 0.001 * I,");
omniout_str(ALWAYS, "0.001 + 0.003 * I,");
omniout_str(ALWAYS, "0.0001 + 0.004 * I,");
omniout_str(ALWAYS, "0.003 + 0.006 * I,");
omniout_str(ALWAYS, "0.0001 + 0.005 * I,");
omniout_str(ALWAYS, "0.0001 + 0.003 * I,");
omniout_str(ALWAYS, "0.001 + 0.001 * I,");
omniout_str(ALWAYS, "0.001 + 0.003 * I,");
omniout_str(ALWAYS, "0.0001 + 0.004 * I,");
omniout_str(ALWAYS, "0.003 + 0.006 * I,");
omniout_str(ALWAYS, "0.0001 + 0.005 * I,");
omniout_str(ALWAYS, "0.0001 + 0.003 * I,");
omniout_str(ALWAYS, "0.001 + 0.001 * I,");
omniout_str(ALWAYS, "0.001 + 0.003 * I,");
omniout_str(ALWAYS, "0.0001 + 0.004 * I,");
omniout_str(ALWAYS, "0.003 + 0.006 * I,");
omniout_str(ALWAYS, "0.0001 + 0.005 * I,");
omniout_str(ALWAYS, "0.0001 + 0.003 * I,");
omniout_str(ALWAYS, "0.001 + 0.001 * I,");
omniout_str(ALWAYS, "0.001 + 0.003 * I,");
omniout_str(ALWAYS, "0.0001 + 0.004 * I,");
omniout_str(ALWAYS, "0.003 + 0.006 * I,");
omniout_str(ALWAYS, "0.0001 + 0.005 * I,");
omniout_str(ALWAYS, "0.0001 + 0.003 * I,");
omniout_str(ALWAYS, "0.001 + 0.001 * I,");
omniout_str(ALWAYS, "0.0001 + 0.004 * I,");
omniout_str(ALWAYS, "0.003 + 0.006 * I,");
omniout_str(ALWAYS, "0.0001 + 0.005 * I,");
omniout_str(ALWAYS, "0.0001 + 0.003 * I,");
omniout_str(ALWAYS, "0.001 + 0.001 * I,");
omniout_str(ALWAYS, "0.001 + 0.003 * I,");
omniout_str(ALWAYS, "0.0001 + 0.004 * I,");
omniout_str(ALWAYS, "0.003 + 0.006 * I,");
omniout_str(ALWAYS, "0.0001 + 0.005 * I,");
omniout_str(ALWAYS, "0.0001 + 0.003 * I,");
omniout_str(ALWAYS, "0.001 + 0.001 * I,");
omniout_str(ALWAYS, "0.001 + 0.003 * I,");
omniout_str(ALWAYS, "0.0001 + 0.004 * I,");
omniout_str(ALWAYS, "0.003 + 0.006 * I,");
omniout_str(ALWAYS, "0.0001 + 0.005 * I,");
omniout_str(ALWAYS, "0.0001 + 0.003 * I,");
omniout_str(ALWAYS, "0.001 + 0.001 * I,");
omniout_str(ALWAYS, "0.001 + 0.003 * I,");
omniout_str(ALWAYS, "0.0001 + 0.004 * I,");
omniout_str(ALWAYS, "0.003 + 0.006 * I,");
omniout_str(ALWAYS, "0.0001 + 0.005 * I,");
omniout_str(ALWAYS, "0.0001 + 0.003 * I,");
omniout_str(ALWAYS, "0.001 + 0.001 * I,");
omniout_str(ALWAYS, "0.001 + 0.003 * I,");
omniout_str(ALWAYS, "0.0001 + 0.004 * I,");
omniout_str(ALWAYS, "0.003 + 0.006 * I,");
omniout_str(ALWAYS, "0.0001 + 0.005 * I,");
omniout_str(ALWAYS, "0.0001 + 0.003 * I,");
omniout_str(ALWAYS, "0.001 + 0.001 * I,");
omniout_str(ALWAYS, "0.0001 + 0.004 * I,");
omniout_str(ALWAYS, "0.003 + 0.006 * I,");
omniout_str(ALWAYS, "0.0001 + 0.005 * I,");
omniout_str(ALWAYS, "0.0001 + 0.003 * I,");
omniout_str(ALWAYS, "0.001 + 0.001 * I,");
omniout_str(ALWAYS, "0.001 + 0.003 * I,");
omniout_str(ALWAYS, "0.0001 + 0.004 * I,");
omniout_str(ALWAYS, "0.0001 + 0.004 * I,");
omniout_str(ALWAYS, "0.003 + 0.006 * I,");
omniout_str(ALWAYS, "0.0001 + 0.005 * I,");
omniout_str(ALWAYS, "0.0001 + 0.003 * I,");
omniout_str(ALWAYS, "0.001 + 0.001 * I,");
omniout_str(ALWAYS, "0.001 + 0.003 * I,");
omniout_str(ALWAYS, "0.0001 + 0.004 * I,");
omniout_str(ALWAYS, "0.003 + 0.006 * I,");
omniout_str(ALWAYS, "0.0001 + 0.005 * I,");
omniout_str(ALWAYS, "0.0001 + 0.003 * I,");
omniout_str(ALWAYS, "0.001 + 0.001 * I,");
omniout_str(ALWAYS, "0.001 + 0.003 * I,");
omniout_str(ALWAYS, "0.0001 + 0.004 * I,");
omniout_str(ALWAYS, "0.003 + 0.006 * I,");
omniout_str(ALWAYS, "0.0001 + 0.005 * I,");
omniout_str(ALWAYS, "0.0001 + 0.003 * I,");
omniout_str(ALWAYS, "0.001 + 0.001 * I,");
omniout_str(ALWAYS, "0.001 + 0.003 * I,");
omniout_str(ALWAYS, "0.0001 + 0.004 * I,");
omniout_str(ALWAYS, "0.003 + 0.006 * I,");
omniout_str(ALWAYS, "0.0001 + 0.005 * I,");
omniout_str(ALWAYS, "0.0001 + 0.003 * I,");
omniout_str(ALWAYS, "0.001 + 0.001 * I,");
omniout_str(ALWAYS, "0.001 + 0.003 * I,");
omniout_str(ALWAYS, "0.0001 + 0.004 * I,");
omniout_str(ALWAYS, "0.003 + 0.006 * I,");
omniout_str(ALWAYS, "0.0001 + 0.005 * I,");
omniout_str(ALWAYS, "0.0001 + 0.003 * I,");
omniout_str(ALWAYS, "0.001 + 0.001 * I,");
omniout_str(ALWAYS, "0.0001 + 0.004 * I,");
omniout_str(ALWAYS, "0.003 + 0.006 * I,");
omniout_str(ALWAYS, "0.0001 + 0.005 * I,");
omniout_str(ALWAYS, "0.0001 + 0.003 * I,");
omniout_str(ALWAYS, "0.001 + 0.001 * I,");
omniout_str(ALWAYS, "0.001 + 0.003 * I,");
omniout_str(ALWAYS, "0.0001 + 0.004 * I,");
omniout_str(ALWAYS, "0.003 + 0.006 * I,");
omniout_str(ALWAYS, "0.0001 + 0.005 * I,");
omniout_str(ALWAYS, "0.0001 + 0.003 * I,");
omniout_str(ALWAYS, "0.001 + 0.001 * I,");
omniout_str(ALWAYS, "0.001 + 0.003 * I,");
omniout_str(ALWAYS, "0.0001 + 0.004 * I,");
omniout_str(ALWAYS, "0.003 + 0.006 * I,");
omniout_str(ALWAYS, "0.0001 + 0.005 * I,");
omniout_str(ALWAYS, "0.0001 + 0.003 * I,");
omniout_str(ALWAYS, "0.001 + 0.001 * I,");
omniout_str(ALWAYS, "0.001 + 0.003 * I,");
omniout_str(ALWAYS, "0.0001 + 0.004 * I,");
omniout_str(ALWAYS, "0.003 + 0.006 * I,");
omniout_str(ALWAYS, "0.0001 + 0.005 * I,");
omniout_str(ALWAYS, "0.0001 + 0.003 * I,");
omniout_str(ALWAYS, "0.001 + 0.001 * I,");
omniout_str(ALWAYS, "0.001 + 0.003 * I,");
omniout_str(ALWAYS, "0.0001 + 0.004 * I,");
omniout_str(ALWAYS, "0.003 + 0.006 * I,");
omniout_str(ALWAYS, "0.0001 + 0.005 * I,");
omniout_str(ALWAYS, "0.0001 + 0.003 * I,");
omniout_str(ALWAYS, "0.001 + 0.001 * I,");
omniout_str(ALWAYS, "0.0001 + 0.004 * I,");
omniout_str(ALWAYS, "0.003 + 0.006 * I,");
omniout_str(ALWAYS, "0.0001 + 0.005 * I,");
omniout_str(ALWAYS, "0.0001 + 0.003 * I,");
omniout_str(ALWAYS, "0.001 + 0.001 * I,");
omniout_str(ALWAYS, "0.001 + 0.003 * I,");
omniout_str(ALWAYS, "0.0001 + 0.004 * I,");
omniout_str(ALWAYS, "0.003 + 0.006 * I,");
omniout_str(ALWAYS, "0.0001 + 0.005 * I,");
omniout_str(ALWAYS, "0.0001 + 0.003 * I,");
omniout_str(ALWAYS, "0.001 + 0.001 * I,");
omniout_str(ALWAYS, "0.001 + 0.003 * I,");
omniout_str(ALWAYS, "0.0001 + 0.004 * I,");
omniout_str(ALWAYS, "0.003 + 0.006 * I,");
omniout_str(ALWAYS, "0.0001 + 0.005 * I,");
omniout_str(ALWAYS, "0.0001 + 0.003 * I,");
omniout_str(ALWAYS, "0.001 + 0.001 * I,");
omniout_str(ALWAYS, "0.001 + 0.003 * I,");
omniout_str(ALWAYS, "0.0001 + 0.004 * I,");
omniout_str(ALWAYS, "0.003 + 0.006 * I,");
omniout_str(ALWAYS, "0.0001 + 0.005 * I,");
omniout_str(ALWAYS, "0.0001 + 0.003 * I,");
omniout_str(ALWAYS, "0.001 + 0.001 * I,");
omniout_str(ALWAYS, "0.001 + 0.003 * I,");
omniout_str(ALWAYS, "0.0001 + 0.004 * I,");
omniout_str(ALWAYS, "0.003 + 0.006 * I,");
omniout_str(ALWAYS, "0.0001 + 0.005 * I,");
omniout_str(ALWAYS, "0.0001 + 0.003 * I,");
omniout_str(ALWAYS, "0.001 + 0.001 * I,");
omniout_str(ALWAYS, "0.0001 + 0.004 * I,");
omniout_str(ALWAYS, "0.003 + 0.006 * I,");
omniout_str(ALWAYS, "0.0001 + 0.005 * I,");
omniout_str(ALWAYS, "0.0001 + 0.003 * I,");
omniout_str(ALWAYS, "0.001 + 0.001 * I,");
omniout_str(ALWAYS, "0.001 + 0.003 * I,");
omniout_str(ALWAYS, "0.0001 + 0.004 * I,");
omniout_str(ALWAYS, "0.003 + 0.006 * I,");
omniout_str(ALWAYS, "0.0001 + 0.005 * I,");
omniout_str(ALWAYS, "0.0001 + 0.003 * I,");
omniout_str(ALWAYS, "0.001 + 0.001 * I,");
omniout_str(ALWAYS, "0.001 + 0.003 * I,");
omniout_str(ALWAYS, "0.0001 + 0.004 * I,");
omniout_str(ALWAYS, "0.003 + 0.006 * I,");
omniout_str(ALWAYS, "0.0001 + 0.005 * I,");
omniout_str(ALWAYS, "0.0001 + 0.003 * I,");
omniout_str(ALWAYS, "0.001 + 0.001 * I,");
omniout_str(ALWAYS, "0.001 + 0.003 * I,");
omniout_str(ALWAYS, "0.0001 + 0.004 * I,");
omniout_str(ALWAYS, "0.003 + 0.006 * I,");
omniout_str(ALWAYS, "0.0001 + 0.005 * I,");
omniout_str(ALWAYS, "0.0001 + 0.003 * I,");
omniout_str(ALWAYS, "0.001 + 0.001 * I,");
omniout_str(ALWAYS, "0.001 + 0.003 * I,");
omniout_str(ALWAYS, "0.0001 + 0.004 * I,");
omniout_str(ALWAYS, "0.003 + 0.006 * I,");
omniout_str(ALWAYS, "0.0001 + 0.005 * I,");
omniout_str(ALWAYS, "0.0001 + 0.003 * I,");
omniout_str(ALWAYS, "0.001 + 0.001 * I,");
omniout_str(ALWAYS, "0.0001 + 0.004 * I,");
omniout_str(ALWAYS, "0.003 + 0.006 * I,");
omniout_str(ALWAYS, "0.0001 + 0.005 * I,");
omniout_str(ALWAYS, "0.0001 + 0.003 * I,");
omniout_str(ALWAYS, "0.001 + 0.001 * I,");
omniout_str(ALWAYS, "0.001 + 0.003 * I,");
omniout_str(ALWAYS, "0.0001 + 0.004 * I,");
omniout_str(ALWAYS, "0.003 + 0.006 * I,");
omniout_str(ALWAYS, "0.0001 + 0.005 * I,");
omniout_str(ALWAYS, "0.0001 + 0.003 * I,");
omniout_str(ALWAYS, "0.001 + 0.001 * I,");
omniout_str(ALWAYS, "0.001 + 0.003 * I,");
omniout_str(ALWAYS, "0.0001 + 0.004 * I,");
omniout_str(ALWAYS, "0.003 + 0.006 * I,");
omniout_str(ALWAYS, "0.0001 + 0.005 * I,");
omniout_str(ALWAYS, "0.0001 + 0.003 * I,");
omniout_str(ALWAYS, "0.001 + 0.001 * I,");
omniout_str(ALWAYS, "0.001 + 0.003 * I,");
omniout_str(ALWAYS, "0.0001 + 0.004 * I,");
omniout_str(ALWAYS, "0.003 + 0.006 * I,");
omniout_str(ALWAYS, "0.0001 + 0.005 * I,");
omniout_str(ALWAYS, "0.0001 + 0.003 * I,");
omniout_str(ALWAYS, "0.001 + 0.001 * I,");
omniout_str(ALWAYS, "0.001 + 0.003 * I,");
omniout_str(ALWAYS, "0.0001 + 0.004 * I,");
omniout_str(ALWAYS, "0.003 + 0.006 * I,");
omniout_str(ALWAYS, "0.0001 + 0.005 * I,");
omniout_str(ALWAYS, "0.0001 + 0.003 * I,");
omniout_str(ALWAYS, "0.001 + 0.001 * I,");
omniout_str(ALWAYS, "0.0001 + 0.004 * I,");
omniout_str(ALWAYS, "0.003 + 0.006 * I,");
omniout_str(ALWAYS, "0.0001 + 0.005 * I,");
omniout_str(ALWAYS, "0.0001 + 0.003 * I,");
omniout_str(ALWAYS, "0.001 + 0.001 * I,");
omniout_str(ALWAYS, "0.001 + 0.003 * I,");
omniout_str(ALWAYS, "0.0001 + 0.004 * I,");
omniout_str(ALWAYS, "0.003 + 0.006 * I,");
omniout_str(ALWAYS, "0.0001 + 0.005 * I,");
omniout_str(ALWAYS, "0.0001 + 0.003 * I,");
omniout_str(ALWAYS, "0.001 + 0.001 * I,");
omniout_str(ALWAYS, "0.001 + 0.003 * I,");
omniout_str(ALWAYS, "0.0001 + 0.004 * I,");
omniout_str(ALWAYS, "0.003 + 0.006 * I,");
omniout_str(ALWAYS, "0.0001 + 0.005 * I,");
omniout_str(ALWAYS, "0.0001 + 0.003 * I,");
omniout_str(ALWAYS, "0.001 + 0.001 * I,");
omniout_str(ALWAYS, "0.001 + 0.003 * I,");
omniout_str(ALWAYS, "0.0001 + 0.004 * I,");
omniout_str(ALWAYS, "0.003 + 0.006 * I,");
omniout_str(ALWAYS, "0.0001 + 0.005 * I,");
omniout_str(ALWAYS, "0.0001 + 0.003 * I,");
omniout_str(ALWAYS, "0.001 + 0.001 * I,");
omniout_str(ALWAYS, "0.001 + 0.003 * I,");
omniout_str(ALWAYS, "0.0001 + 0.004 * I,");
omniout_str(ALWAYS, "0.003 + 0.006 * I,");
omniout_str(ALWAYS, "0.0001 + 0.005 * I,");
omniout_str(ALWAYS, "0.0001 + 0.003 * I,");
omniout_str(ALWAYS, "0.001 + 0.001 * I,");
omniout_str(ALWAYS, "0.003 + 0.006 * I,");
omniout_str(ALWAYS, "0.0001 + 0.005 * I,");
omniout_str(ALWAYS, "0.0001 + 0.003 * I,");
omniout_str(ALWAYS, "0.001 + 0.001 * I,");
omniout_str(ALWAYS, "0.001 + 0.003 * I,");
omniout_str(ALWAYS, "0.0001 + 0.004 * I,");
omniout_str(ALWAYS, "0.003 + 0.006 * I,");
omniout_str(ALWAYS, "0.0001 + 0.005 * I,");
omniout_str(ALWAYS, "0.0001 + 0.003 * I,");
omniout_str(ALWAYS, "0.001 + 0.001 * I,");
omniout_str(ALWAYS, "0.001 + 0.003 * I,");
omniout_str(ALWAYS, "0.0001 + 0.004 * I,");
omniout_str(ALWAYS, "0.003 + 0.006 * I,");
omniout_str(ALWAYS, "0.0001 + 0.005 * I,");
omniout_str(ALWAYS, "0.0001 + 0.003 * I,");
omniout_str(ALWAYS, "0.001 + 0.001 * I,");
omniout_str(ALWAYS, "0.001 + 0.003 * I,");
omniout_str(ALWAYS, "0.0001 + 0.004 * I,");
omniout_str(ALWAYS, "0.003 + 0.006 * I,");
omniout_str(ALWAYS, "0.0001 + 0.005 * I,");
omniout_str(ALWAYS, "0.0001 + 0.003 * I,");
omniout_str(ALWAYS, "0.001 + 0.001 * I,");
omniout_str(ALWAYS, "0.0001 + 0.004 * I,");
omniout_str(ALWAYS, "0.003 + 0.006 * I,");
omniout_str(ALWAYS, "0.0001 + 0.005 * I,");
omniout_str(ALWAYS, "0.0001 + 0.003 * I,");
omniout_str(ALWAYS, "0.001 + 0.001 * I,");
omniout_str(ALWAYS, "0.001 + 0.003 * I,");
omniout_str(ALWAYS, "0.0001 + 0.004 * I,");
omniout_str(ALWAYS, "0.003 + 0.006 * I,");
omniout_str(ALWAYS, "0.0001 + 0.005 * I,");
omniout_str(ALWAYS, "0.0001 + 0.003 * I,");
omniout_str(ALWAYS, "0.001 + 0.001 * I,");
omniout_str(ALWAYS, "0.001 + 0.003 * I,");
omniout_str(ALWAYS, "0.0001 + 0.004 * I,");
omniout_str(ALWAYS, "0.003 + 0.006 * I,");
omniout_str(ALWAYS, "0.0001 + 0.005 * I,");
omniout_str(ALWAYS, "0.0001 + 0.003 * I,");
omniout_str(ALWAYS, "0.001 + 0.001 * I,");
omniout_str(ALWAYS, "0.001 + 0.003 * I,");
omniout_str(ALWAYS, "0.0001 + 0.004 * I,");
omniout_str(ALWAYS, "0.003 + 0.006 * I,");
omniout_str(ALWAYS, "0.0001 + 0.005 * I,");
omniout_str(ALWAYS, "0.0001 + 0.003 * I,");
omniout_str(ALWAYS, "0.001 + 0.001 * I,");
omniout_str(ALWAYS, "0.001 + 0.003 * I,");
omniout_str(ALWAYS, "0.0001 + 0.004 * I,");
omniout_str(ALWAYS, "0.003 + 0.006 * I,");
omniout_str(ALWAYS, "0.0001 + 0.005 * I,");
omniout_str(ALWAYS, "0.0001 + 0.003 * I,");
omniout_str(ALWAYS, "0.001 + 0.001 * I,");
omniout_str(ALWAYS, "0.0001 + 0.004 * I,");
omniout_str(ALWAYS, "0.003 + 0.006 * I,");
omniout_str(ALWAYS, "0.0001 + 0.005 * I,");
omniout_str(ALWAYS, "0.0001 + 0.003 * I,");
omniout_str(ALWAYS, "0.001 + 0.001 * I,");
omniout_str(ALWAYS, "0.001 + 0.003 * I,");
omniout_str(ALWAYS, "0.0001 + 0.004 * I,");
omniout_str(ALWAYS, "0.003 + 0.006 * I,");
omniout_str(ALWAYS, "0.0001 + 0.005 * I,");
omniout_str(ALWAYS, "0.0001 + 0.003 * I,");
omniout_str(ALWAYS, "0.001 + 0.001 * I,");
omniout_str(ALWAYS, "0.001 + 0.003 * I,");
omniout_str(ALWAYS, "0.0001 + 0.004 * I,");
omniout_str(ALWAYS, "0.003 + 0.006 * I,");
omniout_str(ALWAYS, "0.0001 + 0.005 * I,");
omniout_str(ALWAYS, "0.0001 + 0.003 * I,");
omniout_str(ALWAYS, "0.001 + 0.001 * I,");
omniout_str(ALWAYS, "0.001 + 0.003 * I,");
omniout_str(ALWAYS, "0.0001 + 0.004 * I,");
omniout_str(ALWAYS, "0.003 + 0.006 * I,");
omniout_str(ALWAYS, "0.0001 + 0.005 * I,");
omniout_str(ALWAYS, "0.0001 + 0.003 * I,");
omniout_str(ALWAYS, "0.001 + 0.001 * I,");
omniout_str(ALWAYS, "0.001 + 0.003 * I,");
omniout_str(ALWAYS, "0.0001 + 0.004 * I,");
omniout_str(ALWAYS, "0.003 + 0.006 * I,");
omniout_str(ALWAYS, "0.0001 + 0.005 * I,");
omniout_str(ALWAYS, "0.0001 + 0.003 * I,");
omniout_str(ALWAYS, "0.001 + 0.001 * I,");
omniout_str(ALWAYS, "0.0001 + 0.004 * I,");
omniout_str(ALWAYS, "0.003 + 0.006 * I,");
omniout_str(ALWAYS, "0.0001 + 0.005 * I,");
omniout_str(ALWAYS, "0.0001 + 0.003 * I,");
omniout_str(ALWAYS, "0.001 + 0.001 * I,");
omniout_str(ALWAYS, "0.001 + 0.003 * I,");
omniout_str(ALWAYS, "0.0001 + 0.004 * I,");
omniout_str(ALWAYS, "0.003 + 0.006 * I,");
omniout_str(ALWAYS, "0.0001 + 0.005 * I,");
omniout_str(ALWAYS, "0.0001 + 0.003 * I,");
omniout_str(ALWAYS, "0.001 + 0.001 * I,");
omniout_str(ALWAYS, "0.001 + 0.003 * I,");
omniout_str(ALWAYS, "0.0001 + 0.004 * I,");
omniout_str(ALWAYS, "0.003 + 0.006 * I,");
omniout_str(ALWAYS, "0.0001 + 0.005 * I,");
omniout_str(ALWAYS, "0.0001 + 0.003 * I,");
omniout_str(ALWAYS, "0.001 + 0.001 * I,");
omniout_str(ALWAYS, "0.001 + 0.003 * I,");
omniout_str(ALWAYS, "0.0001 + 0.004 * I,");
omniout_str(ALWAYS, "0.003 + 0.006 * I,");
omniout_str(ALWAYS, "0.0001 + 0.005 * I,");
omniout_str(ALWAYS, "0.0001 + 0.003 * I,");
omniout_str(ALWAYS, "0.001 + 0.001 * I,");
omniout_str(ALWAYS, "0.001 + 0.003 * I,");
omniout_str(ALWAYS, "0.0001 + 0.004 * I,");
omniout_str(ALWAYS, "0.003 + 0.006 * I,");
omniout_str(ALWAYS, "0.0001 + 0.005 * I,");
omniout_str(ALWAYS, "0.0001 + 0.003 * I,");
omniout_str(ALWAYS, "0.001 + 0.001 * I,");
omniout_str(ALWAYS, "0.0001 + 0.004 * I,");
omniout_str(ALWAYS, "0.003 + 0.006 * I,");
omniout_str(ALWAYS, "0.0001 + 0.005 * I,");
omniout_str(ALWAYS, "0.0001 + 0.003 * I,");
omniout_str(ALWAYS, "0.001 + 0.001 * I,");
omniout_str(ALWAYS, "0.001 + 0.003 * I,");
omniout_str(ALWAYS, "0.0001 + 0.004 * I,");
omniout_str(ALWAYS, "0.003 + 0.006 * I,");
omniout_str(ALWAYS, "0.0001 + 0.005 * I,");
omniout_str(ALWAYS, "0.0001 + 0.003 * I,");
omniout_str(ALWAYS, "0.001 + 0.001 * I,");
omniout_str(ALWAYS, "0.001 + 0.003 * I,");
omniout_str(ALWAYS, "0.0001 + 0.004 * I,");
omniout_str(ALWAYS, "0.003 + 0.006 * I,");
omniout_str(ALWAYS, "0.0001 + 0.005 * I,");
omniout_str(ALWAYS, "0.0001 + 0.003 * I,");
omniout_str(ALWAYS, "0.001 + 0.001 * I,");
omniout_str(ALWAYS, "0.001 + 0.003 * I,");
omniout_str(ALWAYS, "0.0001 + 0.004 * I,");
omniout_str(ALWAYS, "0.003 + 0.006 * I,");
omniout_str(ALWAYS, "0.0001 + 0.005 * I,");
omniout_str(ALWAYS, "0.0001 + 0.003 * I,");
omniout_str(ALWAYS, "0.001 + 0.001 * I,");
omniout_str(ALWAYS, "0.001 + 0.003 * I,");
omniout_str(ALWAYS, "0.0001 + 0.004 * I,");
omniout_str(ALWAYS, "0.003 + 0.006 * I,");
omniout_str(ALWAYS, "0.0001 + 0.005 * I,");
omniout_str(ALWAYS, "0.0001 + 0.003 * I,");
omniout_str(ALWAYS, "0.001 + 0.001 * I,");
omniout_str(ALWAYS, "0.0001 + 0.004 * I,");
omniout_str(ALWAYS, "0.003 + 0.006 * I,");
omniout_str(ALWAYS, "0.0001 + 0.005 * I,");
omniout_str(ALWAYS, "0.0001 + 0.003 * I,");
omniout_str(ALWAYS, "0.001 + 0.001 * I,");
omniout_str(ALWAYS, "0.001 + 0.003 * I,");
omniout_str(ALWAYS, "0.0001 + 0.004 * I,");
omniout_str(ALWAYS, "0.003 + 0.006 * I,");
omniout_str(ALWAYS, "0.0001 + 0.005 * I,");
omniout_str(ALWAYS, "0.0001 + 0.003 * I,");
omniout_str(ALWAYS, "0.001 + 0.001 * I,");
omniout_str(ALWAYS, "0.001 + 0.003 * I,");
omniout_str(ALWAYS, "0.0001 + 0.004 * I,");
omniout_str(ALWAYS, "0.003 + 0.006 * I,");
omniout_str(ALWAYS, "0.0001 + 0.005 * I,");
omniout_str(ALWAYS, "0.0001 + 0.003 * I,");
omniout_str(ALWAYS, "0.001 + 0.001 * I,");
omniout_str(ALWAYS, "0.001 + 0.003 * I,");
omniout_str(ALWAYS, "0.0001 + 0.004 * I,");
omniout_str(ALWAYS, "0.003 + 0.006 * I,");
omniout_str(ALWAYS, "0.0001 + 0.005 * I,");
omniout_str(ALWAYS, "0.0001 + 0.003 * I,");
omniout_str(ALWAYS, "0.001 + 0.001 * I,");
omniout_str(ALWAYS, "0.001 + 0.003 * I,");
omniout_str(ALWAYS, "0.0001 + 0.004 * I,");
omniout_str(ALWAYS, "0.003 + 0.006 * I,");
omniout_str(ALWAYS, "0.0001 + 0.005 * I,");
omniout_str(ALWAYS, "0.0001 + 0.003 * I,");
omniout_str(ALWAYS, "0.001 + 0.001 * I,");
omniout_str(ALWAYS, "0.0001 + 0.004 * I,");
omniout_str(ALWAYS, "0.003 + 0.006 * I,");
omniout_str(ALWAYS, "0.0001 + 0.005 * I,");
omniout_str(ALWAYS, "0.0001 + 0.003 * I,");
omniout_str(ALWAYS, "0.001 + 0.001 * I,");
omniout_str(ALWAYS, "0.001 + 0.003 * I,");
omniout_str(ALWAYS, "0.0001 + 0.004 * I,");
omniout_str(ALWAYS, "0.003 + 0.006 * I,");
omniout_str(ALWAYS, "0.0001 + 0.005 * I,");
omniout_str(ALWAYS, "0.0001 + 0.003 * I,");
omniout_str(ALWAYS, "0.001 + 0.001 * I,");
omniout_str(ALWAYS, "0.001 + 0.003 * I,");
omniout_str(ALWAYS, "0.0001 + 0.004 * I,");
omniout_str(ALWAYS, "0.003 + 0.006 * I,");
omniout_str(ALWAYS, "0.0001 + 0.005 * I,");
omniout_str(ALWAYS, "0.0001 + 0.003 * I,");
omniout_str(ALWAYS, "0.001 + 0.001 * I,");
omniout_str(ALWAYS, "0.001 + 0.003 * I,");
omniout_str(ALWAYS, "0.0001 + 0.004 * I,");
omniout_str(ALWAYS, "0.003 + 0.006 * I,");
omniout_str(ALWAYS, "0.0001 + 0.005 * I,");
omniout_str(ALWAYS, "0.0001 + 0.003 * I,");
omniout_str(ALWAYS, "0.001 + 0.001 * I,");
omniout_str(ALWAYS, "0.001 + 0.003 * I,");
omniout_str(ALWAYS, "0.0001 + 0.004 * I,");
omniout_str(ALWAYS, "0.003 + 0.006 * I,");
omniout_str(ALWAYS, "0.0001 + 0.005 * I,");
omniout_str(ALWAYS, "0.0001 + 0.003 * I,");
omniout_str(ALWAYS, "0.001 + 0.001 * I,");
omniout_str(ALWAYS, "0.0001 + 0.004 * I,");
omniout_str(ALWAYS, "0.003 + 0.006 * I,");
omniout_str(ALWAYS, "0.0001 + 0.005 * I,");
omniout_str(ALWAYS, "0.0001 + 0.003 * I,");
omniout_str(ALWAYS, "0.001 + 0.001 * I,");
omniout_str(ALWAYS, "0.001 + 0.003 * I,");
omniout_str(ALWAYS, "0.0001 + 0.004 * I,");
omniout_str(ALWAYS, "0.003 + 0.006 * I,");
omniout_str(ALWAYS, "0.0001 + 0.005 * I,");
omniout_str(ALWAYS, "0.0001 + 0.003 * I,");
omniout_str(ALWAYS, "0.001 + 0.001 * I,");
omniout_str(ALWAYS, "0.001 + 0.003 * I,");
omniout_str(ALWAYS, "0.0001 + 0.004 * I,");
omniout_str(ALWAYS, "0.003 + 0.006 * I,");
omniout_str(ALWAYS, "0.0001 + 0.005 * I,");
omniout_str(ALWAYS, "0.0001 + 0.003 * I,");
omniout_str(ALWAYS, "0.001 + 0.001 * I,");
omniout_str(ALWAYS, "0.001 + 0.003 * I,");
omniout_str(ALWAYS, "0.0001 + 0.004 * I,");
omniout_str(ALWAYS, "0.003 + 0.006 * I,");
omniout_str(ALWAYS, "0.0001 + 0.005 * I,");
omniout_str(ALWAYS, "0.0001 + 0.003 * I,");
omniout_str(ALWAYS, "0.001 + 0.001 * I,");
omniout_str(ALWAYS, "0.001 + 0.003 * I,");
omniout_str(ALWAYS, "0.0001 + 0.004 * I,");
omniout_str(ALWAYS, "0.003 + 0.006 * I,");
omniout_str(ALWAYS, "0.0001 + 0.005 * I,");
omniout_str(ALWAYS, "0.0001 + 0.003 * I,");
omniout_str(ALWAYS, "0.001 + 0.001 * I,");
omniout_str(ALWAYS, "0.0001 + 0.004 * I,");
omniout_str(ALWAYS, "0.003 + 0.006 * I,");
omniout_str(ALWAYS, "0.0001 + 0.005 * I,");
omniout_str(ALWAYS, "0.0001 + 0.003 * I,");
omniout_str(ALWAYS, "0.001 + 0.001 * I,");
omniout_str(ALWAYS, "0.001 + 0.003 * I,");
omniout_str(ALWAYS, "0.0001 + 0.004 * I,");
omniout_str(ALWAYS, "0.003 + 0.006 * I,");
omniout_str(ALWAYS, "0.0001 + 0.005 * I,");
omniout_str(ALWAYS, "0.0001 + 0.003 * I,");
omniout_str(ALWAYS, "0.001 + 0.001 * I,");
omniout_str(ALWAYS, "0.001 + 0.003 * I,");
omniout_str(ALWAYS, "0.0001 + 0.004 * I,");
omniout_str(ALWAYS, "0.003 + 0.006 * I,");
omniout_str(ALWAYS, "0.0001 + 0.005 * I,");
omniout_str(ALWAYS, "0.0001 + 0.003 * I,");
omniout_str(ALWAYS, "0.001 + 0.001 * I,");
omniout_str(ALWAYS, "0.001 + 0.003 * I,");
omniout_str(ALWAYS, "0.0001 + 0.004 * I,");
omniout_str(ALWAYS, "0.003 + 0.006 * I,");
omniout_str(ALWAYS, "0.0001 + 0.005 * I,");
omniout_str(ALWAYS, "0.0001 + 0.003 * I,");
omniout_str(ALWAYS, "0.001 + 0.001 * I,");
omniout_str(ALWAYS, "0.001 + 0.003 * I,");
omniout_str(ALWAYS, "0.0001 + 0.004 * I,");
omniout_str(ALWAYS, "0.003 + 0.006 * I,");
omniout_str(ALWAYS, "0.0001 + 0.005 * I,");
omniout_str(ALWAYS, "0.0001 + 0.003 * I,");
omniout_str(ALWAYS, "0.001 + 0.001 * I,");
omniout_str(ALWAYS, "0.0001 + 0.004 * I,");
omniout_str(ALWAYS, "0.003 + 0.006 * I,");
omniout_str(ALWAYS, "0.0001 + 0.005 * I,");
omniout_str(ALWAYS, "0.0001 + 0.003 * I,");
omniout_str(ALWAYS, "0.001 + 0.001 * I,");
omniout_str(ALWAYS, "0.001 + 0.003 * I,");
omniout_str(ALWAYS, "0.0001 + 0.004 * I,");
omniout_str(ALWAYS, "0.003 + 0.006 * I,");
omniout_str(ALWAYS, "0.0001 + 0.005 * I,");
omniout_str(ALWAYS, "0.0001 + 0.003 * I,");
omniout_str(ALWAYS, "0.001 + 0.001 * I,");
omniout_str(ALWAYS, "0.001 + 0.003 * I,");
omniout_str(ALWAYS, "0.0001 + 0.004 * I,");
omniout_str(ALWAYS, "0.003 + 0.006 * I,");
omniout_str(ALWAYS, "0.0001 + 0.005 * I,");
omniout_str(ALWAYS, "0.0001 + 0.003 * I,");
omniout_str(ALWAYS, "0.001 + 0.001 * I,");
omniout_str(ALWAYS, "0.001 + 0.003 * I,");
omniout_str(ALWAYS, "0.0001 + 0.004 * I,");
omniout_str(ALWAYS, "0.003 + 0.006 * I,");
omniout_str(ALWAYS, "0.0001 + 0.005 * I,");
omniout_str(ALWAYS, "0.0001 + 0.003 * I,");
omniout_str(ALWAYS, "0.001 + 0.001 * I,");
omniout_str(ALWAYS, "0.001 + 0.003 * I,");
omniout_str(ALWAYS, "0.0001 + 0.004 * I,");
omniout_str(ALWAYS, "0.003 + 0.006 * I,");
omniout_str(ALWAYS, "0.0001 + 0.005 * I,");
omniout_str(ALWAYS, "0.0001 + 0.003 * I,");
omniout_str(ALWAYS, "0.001 + 0.001 * I,");
omniout_str(ALWAYS, "0.0001 + 0.004 * I,");
omniout_str(ALWAYS, "0.003 + 0.006 * I,");
omniout_str(ALWAYS, "0.0001 + 0.005 * I,");
omniout_str(ALWAYS, "0.0001 + 0.003 * I,");
omniout_str(ALWAYS, "0.001 + 0.001 * I,");
omniout_str(ALWAYS, "0.001 + 0.003 * I,");
omniout_str(ALWAYS, "0.0001 + 0.004 * I,");
omniout_str(ALWAYS, "0.003 + 0.006 * I,");
omniout_str(ALWAYS, "0.0001 + 0.005 * I,");
omniout_str(ALWAYS, "0.0001 + 0.003 * I,");
omniout_str(ALWAYS, "0.001 + 0.001 * I,");
omniout_str(ALWAYS, "0.001 + 0.003 * I,");
omniout_str(ALWAYS, "0.0001 + 0.004 * I,");
omniout_str(ALWAYS, "0.003 + 0.006 * I,");
omniout_str(ALWAYS, "0.0001 + 0.005 * I,");
omniout_str(ALWAYS, "0.0001 + 0.003 * I,");
omniout_str(ALWAYS, "0.001 + 0.001 * I,");
omniout_str(ALWAYS, "0.001 + 0.003 * I,");
omniout_str(ALWAYS, "0.0001 + 0.004 * I,");
omniout_str(ALWAYS, "0.003 + 0.006 * I,");
omniout_str(ALWAYS, "0.0001 + 0.005 * I,");
omniout_str(ALWAYS, "0.0001 + 0.003 * I,");
omniout_str(ALWAYS, "0.001 + 0.001 * I,");
omniout_str(ALWAYS, "0.001 + 0.003 * I,");
omniout_str(ALWAYS, "0.0001 + 0.004 * I,");
omniout_str(ALWAYS, "0.003 + 0.006 * I,");
omniout_str(ALWAYS, "0.0001 + 0.005 * I,");
omniout_str(ALWAYS, "0.0001 + 0.003 * I,");
omniout_str(ALWAYS, "0.001 + 0.001 * I,");
omniout_str(ALWAYS, "0.0001 + 0.004 * I,");
omniout_str(ALWAYS, "0.003 + 0.006 * I,");
omniout_str(ALWAYS, "0.0001 + 0.005 * I,");
omniout_str(ALWAYS, "0.0001 + 0.003 * I,");
omniout_str(ALWAYS, "0.001 + 0.001 * I,");
omniout_str(ALWAYS, "0.001 + 0.003 * I,");
omniout_str(ALWAYS, "0.0001 + 0.004 * I,");
omniout_str(ALWAYS, "0.003 + 0.006 * I,");
omniout_str(ALWAYS, "0.0001 + 0.005 * I,");
omniout_str(ALWAYS, "0.0001 + 0.003 * I,");
omniout_str(ALWAYS, "0.001 + 0.001 * I,");
omniout_str(ALWAYS, "0.001 + 0.003 * I,");
omniout_str(ALWAYS, "0.0001 + 0.004 * I,");
omniout_str(ALWAYS, "0.003 + 0.006 * I,");
omniout_str(ALWAYS, "0.0001 + 0.005 * I,");
omniout_str(ALWAYS, "0.0001 + 0.003 * I,");
omniout_str(ALWAYS, "0.001 + 0.001 * I,");
omniout_str(ALWAYS, "0.001 + 0.003 * I,");
omniout_str(ALWAYS, "0.0001 + 0.004 * I,");
omniout_str(ALWAYS, "0.003 + 0.006 * I,");
omniout_str(ALWAYS, "0.0001 + 0.005 * I,");
omniout_str(ALWAYS, "0.0001 + 0.003 * I,");
omniout_str(ALWAYS, "0.001 + 0.001 * I,");
omniout_str(ALWAYS, "0.001 + 0.003 * I,");
omniout_str(ALWAYS, "0.0001 + 0.004 * I,");
omniout_str(ALWAYS, "0.003 + 0.006 * I,");
omniout_str(ALWAYS, "0.0001 + 0.005 * I,");
omniout_str(ALWAYS, "0.0001 + 0.003 * I,");
omniout_str(ALWAYS, "0.001 + 0.001 * I,");
omniout_str(ALWAYS, "0.0001 + 0.004 * I,");
omniout_str(ALWAYS, "0.003 + 0.006 * I,");
omniout_str(ALWAYS, "0.0001 + 0.005 * I,");
omniout_str(ALWAYS, "0.0001 + 0.003 * I,");
omniout_str(ALWAYS, "0.001 + 0.001 * I,");
omniout_str(ALWAYS, "0.001 + 0.003 * I,");
omniout_str(ALWAYS, "0.0001 + 0.004 * I,");
omniout_str(ALWAYS, "0.003 + 0.006 * I,");
omniout_str(ALWAYS, "0.0001 + 0.005 * I,");
omniout_str(ALWAYS, "0.0001 + 0.003 * I,");
omniout_str(ALWAYS, "0.001 + 0.001 * I,");
omniout_str(ALWAYS, "0.001 + 0.003 * I,");
omniout_str(ALWAYS, "0.0001 + 0.004 * I,");
omniout_str(ALWAYS, "0.003 + 0.006 * I,");
omniout_str(ALWAYS, "0.0001 + 0.005 * I,");
omniout_str(ALWAYS, "0.0001 + 0.003 * I,");
omniout_str(ALWAYS, "0.001 + 0.001 * I,");
omniout_str(ALWAYS, "0.001 + 0.003 * I,");
omniout_str(ALWAYS, "0.0001 + 0.004 * I,");
omniout_str(ALWAYS, "0.003 + 0.006 * I,");
omniout_str(ALWAYS, "0.0001 + 0.005 * I,");
omniout_str(ALWAYS, "0.0001 + 0.003 * I,");
omniout_str(ALWAYS, "0.001 + 0.001 * I,");
omniout_str(ALWAYS, "0.001 + 0.003 * I,");
omniout_str(ALWAYS, "0.0001 + 0.004 * I,");
omniout_str(ALWAYS, "0.003 + 0.006 * I,");
omniout_str(ALWAYS, "0.0001 + 0.005 * I,");
omniout_str(ALWAYS, "0.0001 + 0.003 * I,");
omniout_str(ALWAYS, "0.001 + 0.001 * I,");
omniout_str(ALWAYS, "0.0001 + 0.004 * I,");
omniout_str(ALWAYS, "0.003 + 0.006 * I,");
omniout_str(ALWAYS, "0.0001 + 0.005 * I,");
omniout_str(ALWAYS, "0.0001 + 0.003 * I,");
omniout_str(ALWAYS, "0.001 + 0.001 * I,");
omniout_str(ALWAYS, "0.001 + 0.003 * I,");
omniout_str(ALWAYS, "0.0001 + 0.004 * I,");
omniout_str(ALWAYS, "0.003 + 0.006 * I,");
omniout_str(ALWAYS, "0.0001 + 0.005 * I,");
omniout_str(ALWAYS, "0.0001 + 0.003 * I,");
omniout_str(ALWAYS, "0.001 + 0.001 * I,");
omniout_str(ALWAYS, "0.001 + 0.003 * I,");
omniout_str(ALWAYS, "0.0001 + 0.004 * I,");
omniout_str(ALWAYS, "0.003 + 0.006 * I,");
omniout_str(ALWAYS, "0.0001 + 0.005 * I,");
omniout_str(ALWAYS, "0.0001 + 0.003 * I,");
omniout_str(ALWAYS, "0.001 + 0.001 * I,");
omniout_str(ALWAYS, "0.001 + 0.003 * I,");
omniout_str(ALWAYS, "0.0001 + 0.004 * I,");
omniout_str(ALWAYS, "0.003 + 0.006 * I,");
omniout_str(ALWAYS, "0.0001 + 0.005 * I,");
omniout_str(ALWAYS, "0.0001 + 0.003 * I,");
omniout_str(ALWAYS, "0.001 + 0.001 * I,");
omniout_str(ALWAYS, "0.001 + 0.003 * I,");
omniout_str(ALWAYS, "0.0001 + 0.004 * I,");
omniout_str(ALWAYS, "0.003 + 0.006 * I,");
omniout_str(ALWAYS, "0.0001 + 0.005 * I,");
omniout_str(ALWAYS, "0.0001 + 0.003 * I,");
omniout_str(ALWAYS, "0.001 + 0.001 * I,");
omniout_str(ALWAYS, "0.001 + 0.003 * I,");
omniout_str(ALWAYS, "0.000 + 0.000 * I ];");
omniout_str(ALWAYS, "");
omniout_str(ALWAYS, "glob_nxt := glob_nxt + 1;");
omniout_str(ALWAYS, "it := x_delta[glob_nxt];");
omniout_str(ALWAYS, "return it;");
omniout_str(ALWAYS, "end;");
omniout_str(ALWAYS, "#END USER DEF BLOCK");
omniout_str(ALWAYS, "#######END OF ECHO OF PROBLEM#################");
glob_unchanged_h_cnt := 0;
glob_warned := false;
glob_warned2 := false;
glob_small_float := glob__0;
glob_smallish_float := glob__0;
glob_large_float := c(0.10*10^101);
glob_larger_float := c(0.11*10^101);
glob_almost_1 := c(0.99);
x_start := 0.1 + 0.1*I;
x_end := 99.0 + 99.0*I;
array_y_init[1] := exact_soln_y(x_start);
glob_look_poles := 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 ) = ( 0.2 * x \
+ 0.3 ) * sin ( x ) ; ");
omniout_int(INFO, "Iterations ", 32, glob_iter,
4, " ");
prog_report(x_start, x_end);
if glob_html_log then
logstart(html_log_file);
logitem_str(html_log_file, "2017-11-26T16:19:53-06:00");
logitem_str(html_log_file, "Maple");
logitem_str(html_log_file,
"mult_lin_sin");
logitem_str(html_log_file, "diff ( y , x , 1 ) = \
( 0.2 * x + 0.3 ) * sin ( x ) ; ");
logitem_complex(html_log_file, x_start);
logitem_complex(html_log_file, x_end);
logitem_complex(html_log_file, array_x[1]);
logitem_complex(html_log_file, glob_h);
logitem_h_reason(html_log_file);
logitem_integer(html_log_file, Digits);
glob_desired_digits_correct := 0.;
logitem_float(html_log_file, glob_desired_digits_correct);
if array_est_digits[1] <> -16 then
logitem_integer(html_log_file, array_est_digits[1])
else logitem_str(html_log_file, "Unknown")
end if;
if glob_min_good_digits <> -16 then
logitem_integer(html_log_file, glob_min_good_digits)
else logitem_str(html_log_file, "Unknown")
end if;
if glob_good_digits <> -16 then
logitem_integer(html_log_file, glob_good_digits)
else logitem_str(html_log_file, "Unknown")
end if;
logitem_str(html_log_file, "NA");
logitem_str(html_log_file, "NA");
logitem_integer(html_log_file, ATS_MAX_TERMS);
if glob_type_given_pole = 0 then
logitem_str(html_log_file, "Not Given");
logitem_str(html_log_file, "NA")
elif glob_type_given_pole = 4 then
logitem_str(html_log_file, "No Solution");
logitem_str(html_log_file, "NA")
elif glob_type_given_pole = 5 then
logitem_str(html_log_file, "Some Pole");
logitem_str(html_log_file, "????")
elif glob_type_given_pole = 3 then
logitem_str(html_log_file, "No Pole");
logitem_str(html_log_file, "NA")
elif glob_type_given_pole = 1 then
logitem_str(html_log_file, "Real Sing");
logitem_float(html_log_file, glob_least_given_sing)
elif glob_type_given_pole = 2 then
logitem_str(html_log_file, "Complex Sing");
logitem_float(html_log_file, glob_least_given_sing)
end if;
if glob_least_ratio_sing < glob_large_float then
glob_least_ratio_sing := 0;
logitem_float(html_log_file, glob_least_ratio_sing)
else logitem_str(html_log_file, "NONE")
end if;
if glob_least_3_sing < glob_large_float then
logitem_float(html_log_file, glob_least_3_sing)
else logitem_str(html_log_file, "NONE")
end if;
if glob_least_6_sing < glob_large_float then
glob_least_6_sing := 0.;
logitem_float(html_log_file, glob_least_6_sing)
else logitem_str(html_log_file, "NONE")
end if;
logitem_integer(html_log_file, glob_iter);
logitem_time(html_log_file, glob_clock_sec);
if c(glob_percent_done) < glob__100 then
logitem_time(html_log_file, glob_total_exp_sec); 0
else logitem_str(html_log_file, "Done"); 0
end if;
log_revs(html_log_file, " 309 | ");
logitem_str(html_log_file, "mult_lin_sin diffeq.mxt");
logitem_str(html_log_file, "mult_lin_sin 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/mult_lin_sinpostcpx.cpx#################
diff ( y , x , 1 ) = ( 0.2 * x + 0.3 ) * sin ( x ) ;
!
#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(0.2) * sin(c(x)) - c(0.2) * cos(c(x)) * c(x) - c(0.3) * cos(c(x)));
end;
next_delta := proc()
global glob_nxt, x_delta;
x_delta := [ 0.001 + 0.00004 * I,
0.0001 + 0.004 * I,
0.003 + 0.006 * I,
0.0001 + 0.005 * I,
0.0001 + 0.003 * I,
0.001 + 0.001 * I,
0.001 + 0.003 * I,
0.0001 + 0.004 * I,
0.003 + 0.006 * I,
0.0001 + 0.005 * I,
0.0001 + 0.003 * I,
0.001 + 0.001 * I,
0.001 + 0.003 * I,
0.0001 + 0.004 * I,
0.003 + 0.006 * I,
0.0001 + 0.005 * I,
0.0001 + 0.003 * I,
0.001 + 0.001 * I,
0.001 + 0.003 * I,
0.0001 + 0.004 * I,
0.003 + 0.006 * I,
0.0001 + 0.005 * I,
0.0001 + 0.003 * I,
0.001 + 0.001 * I,
0.001 + 0.003 * I,
0.0001 + 0.004 * I,
0.003 + 0.006 * I,
0.0001 + 0.005 * I,
0.0001 + 0.003 * I,
0.001 + 0.001 * I,
0.0001 + 0.004 * I,
0.003 + 0.006 * I,
0.0001 + 0.005 * I,
0.0001 + 0.003 * I,
0.001 + 0.001 * I,
0.001 + 0.003 * I,
0.0001 + 0.004 * I,
0.003 + 0.006 * I,
0.0001 + 0.005 * I,
0.0001 + 0.003 * I,
0.001 + 0.001 * I,
0.001 + 0.003 * I,
0.0001 + 0.004 * I,
0.003 + 0.006 * I,
0.0001 + 0.005 * I,
0.0001 + 0.003 * I,
0.001 + 0.001 * I,
0.001 + 0.003 * I,
0.0001 + 0.004 * I,
0.003 + 0.006 * I,
0.0001 + 0.005 * I,
0.0001 + 0.003 * I,
0.001 + 0.001 * I,
0.001 + 0.003 * I,
0.0001 + 0.004 * I,
0.003 + 0.006 * I,
0.0001 + 0.005 * I,
0.0001 + 0.003 * I,
0.001 + 0.001 * I,
0.0001 + 0.004 * I,
0.003 + 0.006 * I,
0.0001 + 0.005 * I,
0.0001 + 0.003 * I,
0.001 + 0.001 * I,
0.001 + 0.003 * I,
0.0001 + 0.004 * I,
0.003 + 0.006 * I,
0.0001 + 0.005 * I,
0.0001 + 0.003 * I,
0.001 + 0.001 * I,
0.001 + 0.003 * I,
0.0001 + 0.004 * I,
0.003 + 0.006 * I,
0.0001 + 0.005 * I,
0.0001 + 0.003 * I,
0.001 + 0.001 * I,
0.001 + 0.003 * I,
0.0001 + 0.004 * I,
0.003 + 0.006 * I,
0.0001 + 0.005 * I,
0.0001 + 0.003 * I,
0.001 + 0.001 * I,
0.001 + 0.003 * I,
0.0001 + 0.004 * I,
0.003 + 0.006 * I,
0.0001 + 0.005 * I,
0.0001 + 0.003 * I,
0.001 + 0.001 * I,
0.0001 + 0.004 * I,
0.003 + 0.006 * I,
0.0001 + 0.005 * I,
0.0001 + 0.003 * I,
0.001 + 0.001 * I,
0.001 + 0.003 * I,
0.0001 + 0.004 * I,
0.003 + 0.006 * I,
0.0001 + 0.005 * I,
0.0001 + 0.003 * I,
0.001 + 0.001 * I,
0.001 + 0.003 * I,
0.0001 + 0.004 * I,
0.003 + 0.006 * I,
0.0001 + 0.005 * I,
0.0001 + 0.003 * I,
0.001 + 0.001 * I,
0.001 + 0.003 * I,
0.0001 + 0.004 * I,
0.003 + 0.006 * I,
0.0001 + 0.005 * I,
0.0001 + 0.003 * I,
0.001 + 0.001 * I,
0.001 + 0.003 * I,
0.0001 + 0.004 * I,
0.003 + 0.006 * I,
0.0001 + 0.005 * I,
0.0001 + 0.003 * I,
0.001 + 0.001 * I,
0.0001 + 0.004 * I,
0.003 + 0.006 * I,
0.0001 + 0.005 * I,
0.0001 + 0.003 * I,
0.001 + 0.001 * I,
0.001 + 0.003 * I,
0.0001 + 0.004 * I,
0.003 + 0.006 * I,
0.0001 + 0.005 * I,
0.0001 + 0.003 * I,
0.001 + 0.001 * I,
0.001 + 0.003 * I,
0.0001 + 0.004 * I,
0.003 + 0.006 * I,
0.0001 + 0.005 * I,
0.0001 + 0.003 * I,
0.001 + 0.001 * I,
0.001 + 0.003 * I,
0.0001 + 0.004 * I,
0.003 + 0.006 * I,
0.0001 + 0.005 * I,
0.0001 + 0.003 * I,
0.001 + 0.001 * I,
0.001 + 0.003 * I,
0.0001 + 0.004 * I,
0.003 + 0.006 * I,
0.0001 + 0.005 * I,
0.0001 + 0.003 * I,
0.001 + 0.001 * I,
0.0001 + 0.004 * I,
0.003 + 0.006 * I,
0.0001 + 0.005 * I,
0.0001 + 0.003 * I,
0.001 + 0.001 * I,
0.001 + 0.003 * I,
0.0001 + 0.004 * I,
0.003 + 0.006 * I,
0.0001 + 0.005 * I,
0.0001 + 0.003 * I,
0.001 + 0.001 * I,
0.001 + 0.003 * I,
0.0001 + 0.004 * I,
0.003 + 0.006 * I,
0.0001 + 0.005 * I,
0.0001 + 0.003 * I,
0.001 + 0.001 * I,
0.001 + 0.003 * I,
0.0001 + 0.004 * I,
0.003 + 0.006 * I,
0.0001 + 0.005 * I,
0.0001 + 0.003 * I,
0.001 + 0.001 * I,
0.001 + 0.003 * I,
0.0001 + 0.004 * I,
0.003 + 0.006 * I,
0.0001 + 0.005 * I,
0.0001 + 0.003 * I,
0.001 + 0.001 * I,
0.0001 + 0.004 * I,
0.003 + 0.006 * I,
0.0001 + 0.005 * I,
0.0001 + 0.003 * I,
0.001 + 0.001 * I,
0.001 + 0.003 * I,
0.0001 + 0.004 * I,
0.0001 + 0.004 * I,
0.003 + 0.006 * I,
0.0001 + 0.005 * I,
0.0001 + 0.003 * I,
0.001 + 0.001 * I,
0.001 + 0.003 * I,
0.0001 + 0.004 * I,
0.003 + 0.006 * I,
0.0001 + 0.005 * I,
0.0001 + 0.003 * I,
0.001 + 0.001 * I,
0.001 + 0.003 * I,
0.0001 + 0.004 * I,
0.003 + 0.006 * I,
0.0001 + 0.005 * I,
0.0001 + 0.003 * I,
0.001 + 0.001 * I,
0.001 + 0.003 * I,
0.0001 + 0.004 * I,
0.003 + 0.006 * I,
0.0001 + 0.005 * I,
0.0001 + 0.003 * I,
0.001 + 0.001 * I,
0.001 + 0.003 * I,
0.0001 + 0.004 * I,
0.003 + 0.006 * I,
0.0001 + 0.005 * I,
0.0001 + 0.003 * I,
0.001 + 0.001 * I,
0.0001 + 0.004 * I,
0.003 + 0.006 * I,
0.0001 + 0.005 * I,
0.0001 + 0.003 * I,
0.001 + 0.001 * I,
0.001 + 0.003 * I,
0.0001 + 0.004 * I,
0.003 + 0.006 * I,
0.0001 + 0.005 * I,
0.0001 + 0.003 * I,
0.001 + 0.001 * I,
0.001 + 0.003 * I,
0.0001 + 0.004 * I,
0.003 + 0.006 * I,
0.0001 + 0.005 * I,
0.0001 + 0.003 * I,
0.001 + 0.001 * I,
0.001 + 0.003 * I,
0.0001 + 0.004 * I,
0.003 + 0.006 * I,
0.0001 + 0.005 * I,
0.0001 + 0.003 * I,
0.001 + 0.001 * I,
0.001 + 0.003 * I,
0.0001 + 0.004 * I,
0.003 + 0.006 * I,
0.0001 + 0.005 * I,
0.0001 + 0.003 * I,
0.001 + 0.001 * I,
0.0001 + 0.004 * I,
0.003 + 0.006 * I,
0.0001 + 0.005 * I,
0.0001 + 0.003 * I,
0.001 + 0.001 * I,
0.001 + 0.003 * I,
0.0001 + 0.004 * I,
0.003 + 0.006 * I,
0.0001 + 0.005 * I,
0.0001 + 0.003 * I,
0.001 + 0.001 * I,
0.001 + 0.003 * I,
0.0001 + 0.004 * I,
0.003 + 0.006 * I,
0.0001 + 0.005 * I,
0.0001 + 0.003 * I,
0.001 + 0.001 * I,
0.001 + 0.003 * I,
0.0001 + 0.004 * I,
0.003 + 0.006 * I,
0.0001 + 0.005 * I,
0.0001 + 0.003 * I,
0.001 + 0.001 * I,
0.001 + 0.003 * I,
0.0001 + 0.004 * I,
0.003 + 0.006 * I,
0.0001 + 0.005 * I,
0.0001 + 0.003 * I,
0.001 + 0.001 * I,
0.0001 + 0.004 * I,
0.003 + 0.006 * I,
0.0001 + 0.005 * I,
0.0001 + 0.003 * I,
0.001 + 0.001 * I,
0.001 + 0.003 * I,
0.0001 + 0.004 * I,
0.003 + 0.006 * I,
0.0001 + 0.005 * I,
0.0001 + 0.003 * I,
0.001 + 0.001 * I,
0.001 + 0.003 * I,
0.0001 + 0.004 * I,
0.003 + 0.006 * I,
0.0001 + 0.005 * I,
0.0001 + 0.003 * I,
0.001 + 0.001 * I,
0.001 + 0.003 * I,
0.0001 + 0.004 * I,
0.003 + 0.006 * I,
0.0001 + 0.005 * I,
0.0001 + 0.003 * I,
0.001 + 0.001 * I,
0.001 + 0.003 * I,
0.0001 + 0.004 * I,
0.003 + 0.006 * I,
0.0001 + 0.005 * I,
0.0001 + 0.003 * I,
0.001 + 0.001 * I,
0.0001 + 0.004 * I,
0.003 + 0.006 * I,
0.0001 + 0.005 * I,
0.0001 + 0.003 * I,
0.001 + 0.001 * I,
0.001 + 0.003 * I,
0.0001 + 0.004 * I,
0.003 + 0.006 * I,
0.0001 + 0.005 * I,
0.0001 + 0.003 * I,
0.001 + 0.001 * I,
0.001 + 0.003 * I,
0.0001 + 0.004 * I,
0.003 + 0.006 * I,
0.0001 + 0.005 * I,
0.0001 + 0.003 * I,
0.001 + 0.001 * I,
0.001 + 0.003 * I,
0.0001 + 0.004 * I,
0.003 + 0.006 * I,
0.0001 + 0.005 * I,
0.0001 + 0.003 * I,
0.001 + 0.001 * I,
0.001 + 0.003 * I,
0.0001 + 0.004 * I,
0.003 + 0.006 * I,
0.0001 + 0.005 * I,
0.0001 + 0.003 * I,
0.001 + 0.001 * I,
0.0001 + 0.004 * I,
0.003 + 0.006 * I,
0.0001 + 0.005 * I,
0.0001 + 0.003 * I,
0.001 + 0.001 * I,
0.001 + 0.003 * I,
0.0001 + 0.004 * I,
0.003 + 0.006 * I,
0.0001 + 0.005 * I,
0.0001 + 0.003 * I,
0.001 + 0.001 * I,
0.001 + 0.003 * I,
0.0001 + 0.004 * I,
0.003 + 0.006 * I,
0.0001 + 0.005 * I,
0.0001 + 0.003 * I,
0.001 + 0.001 * I,
0.001 + 0.003 * I,
0.0001 + 0.004 * I,
0.003 + 0.006 * I,
0.0001 + 0.005 * I,
0.0001 + 0.003 * I,
0.001 + 0.001 * I,
0.001 + 0.003 * I,
0.0001 + 0.004 * I,
0.003 + 0.006 * I,
0.0001 + 0.005 * I,
0.0001 + 0.003 * I,
0.001 + 0.001 * I,
0.003 + 0.006 * I,
0.0001 + 0.005 * I,
0.0001 + 0.003 * I,
0.001 + 0.001 * I,
0.001 + 0.003 * I,
0.0001 + 0.004 * I,
0.003 + 0.006 * I,
0.0001 + 0.005 * I,
0.0001 + 0.003 * I,
0.001 + 0.001 * I,
0.001 + 0.003 * I,
0.0001 + 0.004 * I,
0.003 + 0.006 * I,
0.0001 + 0.005 * I,
0.0001 + 0.003 * I,
0.001 + 0.001 * I,
0.001 + 0.003 * I,
0.0001 + 0.004 * I,
0.003 + 0.006 * I,
0.0001 + 0.005 * I,
0.0001 + 0.003 * I,
0.001 + 0.001 * I,
0.0001 + 0.004 * I,
0.003 + 0.006 * I,
0.0001 + 0.005 * I,
0.0001 + 0.003 * I,
0.001 + 0.001 * I,
0.001 + 0.003 * I,
0.0001 + 0.004 * I,
0.003 + 0.006 * I,
0.0001 + 0.005 * I,
0.0001 + 0.003 * I,
0.001 + 0.001 * I,
0.001 + 0.003 * I,
0.0001 + 0.004 * I,
0.003 + 0.006 * I,
0.0001 + 0.005 * I,
0.0001 + 0.003 * I,
0.001 + 0.001 * I,
0.001 + 0.003 * I,
0.0001 + 0.004 * I,
0.003 + 0.006 * I,
0.0001 + 0.005 * I,
0.0001 + 0.003 * I,
0.001 + 0.001 * I,
0.001 + 0.003 * I,
0.0001 + 0.004 * I,
0.003 + 0.006 * I,
0.0001 + 0.005 * I,
0.0001 + 0.003 * I,
0.001 + 0.001 * I,
0.0001 + 0.004 * I,
0.003 + 0.006 * I,
0.0001 + 0.005 * I,
0.0001 + 0.003 * I,
0.001 + 0.001 * I,
0.001 + 0.003 * I,
0.0001 + 0.004 * I,
0.003 + 0.006 * I,
0.0001 + 0.005 * I,
0.0001 + 0.003 * I,
0.001 + 0.001 * I,
0.001 + 0.003 * I,
0.0001 + 0.004 * I,
0.003 + 0.006 * I,
0.0001 + 0.005 * I,
0.0001 + 0.003 * I,
0.001 + 0.001 * I,
0.001 + 0.003 * I,
0.0001 + 0.004 * I,
0.003 + 0.006 * I,
0.0001 + 0.005 * I,
0.0001 + 0.003 * I,
0.001 + 0.001 * I,
0.001 + 0.003 * I,
0.0001 + 0.004 * I,
0.003 + 0.006 * I,
0.0001 + 0.005 * I,
0.0001 + 0.003 * I,
0.001 + 0.001 * I,
0.0001 + 0.004 * I,
0.003 + 0.006 * I,
0.0001 + 0.005 * I,
0.0001 + 0.003 * I,
0.001 + 0.001 * I,
0.001 + 0.003 * I,
0.0001 + 0.004 * I,
0.003 + 0.006 * I,
0.0001 + 0.005 * I,
0.0001 + 0.003 * I,
0.001 + 0.001 * I,
0.001 + 0.003 * I,
0.0001 + 0.004 * I,
0.003 + 0.006 * I,
0.0001 + 0.005 * I,
0.0001 + 0.003 * I,
0.001 + 0.001 * I,
0.001 + 0.003 * I,
0.0001 + 0.004 * I,
0.003 + 0.006 * I,
0.0001 + 0.005 * I,
0.0001 + 0.003 * I,
0.001 + 0.001 * I,
0.001 + 0.003 * I,
0.0001 + 0.004 * I,
0.003 + 0.006 * I,
0.0001 + 0.005 * I,
0.0001 + 0.003 * I,
0.001 + 0.001 * I,
0.0001 + 0.004 * I,
0.003 + 0.006 * I,
0.0001 + 0.005 * I,
0.0001 + 0.003 * I,
0.001 + 0.001 * I,
0.001 + 0.003 * I,
0.0001 + 0.004 * I,
0.003 + 0.006 * I,
0.0001 + 0.005 * I,
0.0001 + 0.003 * I,
0.001 + 0.001 * I,
0.001 + 0.003 * I,
0.0001 + 0.004 * I,
0.003 + 0.006 * I,
0.0001 + 0.005 * I,
0.0001 + 0.003 * I,
0.001 + 0.001 * I,
0.001 + 0.003 * I,
0.0001 + 0.004 * I,
0.003 + 0.006 * I,
0.0001 + 0.005 * I,
0.0001 + 0.003 * I,
0.001 + 0.001 * I,
0.001 + 0.003 * I,
0.0001 + 0.004 * I,
0.003 + 0.006 * I,
0.0001 + 0.005 * I,
0.0001 + 0.003 * I,
0.001 + 0.001 * I,
0.0001 + 0.004 * I,
0.003 + 0.006 * I,
0.0001 + 0.005 * I,
0.0001 + 0.003 * I,
0.001 + 0.001 * I,
0.001 + 0.003 * I,
0.0001 + 0.004 * I,
0.003 + 0.006 * I,
0.0001 + 0.005 * I,
0.0001 + 0.003 * I,
0.001 + 0.001 * I,
0.001 + 0.003 * I,
0.0001 + 0.004 * I,
0.003 + 0.006 * I,
0.0001 + 0.005 * I,
0.0001 + 0.003 * I,
0.001 + 0.001 * I,
0.001 + 0.003 * I,
0.0001 + 0.004 * I,
0.003 + 0.006 * I,
0.0001 + 0.005 * I,
0.0001 + 0.003 * I,
0.001 + 0.001 * I,
0.001 + 0.003 * I,
0.0001 + 0.004 * I,
0.003 + 0.006 * I,
0.0001 + 0.005 * I,
0.0001 + 0.003 * I,
0.001 + 0.001 * I,
0.0001 + 0.004 * I,
0.003 + 0.006 * I,
0.0001 + 0.005 * I,
0.0001 + 0.003 * I,
0.001 + 0.001 * I,
0.001 + 0.003 * I,
0.0001 + 0.004 * I,
0.003 + 0.006 * I,
0.0001 + 0.005 * I,
0.0001 + 0.003 * I,
0.001 + 0.001 * I,
0.001 + 0.003 * I,
0.0001 + 0.004 * I,
0.003 + 0.006 * I,
0.0001 + 0.005 * I,
0.0001 + 0.003 * I,
0.001 + 0.001 * I,
0.001 + 0.003 * I,
0.0001 + 0.004 * I,
0.003 + 0.006 * I,
0.0001 + 0.005 * I,
0.0001 + 0.003 * I,
0.001 + 0.001 * I,
0.001 + 0.003 * I,
0.0001 + 0.004 * I,
0.003 + 0.006 * I,
0.0001 + 0.005 * I,
0.0001 + 0.003 * I,
0.001 + 0.001 * I,
0.0001 + 0.004 * I,
0.003 + 0.006 * I,
0.0001 + 0.005 * I,
0.0001 + 0.003 * I,
0.001 + 0.001 * I,
0.001 + 0.003 * I,
0.0001 + 0.004 * I,
0.003 + 0.006 * I,
0.0001 + 0.005 * I,
0.0001 + 0.003 * I,
0.001 + 0.001 * I,
0.001 + 0.003 * I,
0.0001 + 0.004 * I,
0.003 + 0.006 * I,
0.0001 + 0.005 * I,
0.0001 + 0.003 * I,
0.001 + 0.001 * I,
0.001 + 0.003 * I,
0.0001 + 0.004 * I,
0.003 + 0.006 * I,
0.0001 + 0.005 * I,
0.0001 + 0.003 * I,
0.001 + 0.001 * I,
0.001 + 0.003 * I,
0.0001 + 0.004 * I,
0.003 + 0.006 * I,
0.0001 + 0.005 * I,
0.0001 + 0.003 * I,
0.001 + 0.001 * I,
0.0001 + 0.004 * I,
0.003 + 0.006 * I,
0.0001 + 0.005 * I,
0.0001 + 0.003 * I,
0.001 + 0.001 * I,
0.001 + 0.003 * I,
0.0001 + 0.004 * I,
0.003 + 0.006 * I,
0.0001 + 0.005 * I,
0.0001 + 0.003 * I,
0.001 + 0.001 * I,
0.001 + 0.003 * I,
0.0001 + 0.004 * I,
0.003 + 0.006 * I,
0.0001 + 0.005 * I,
0.0001 + 0.003 * I,
0.001 + 0.001 * I,
0.001 + 0.003 * I,
0.0001 + 0.004 * I,
0.003 + 0.006 * I,
0.0001 + 0.005 * I,
0.0001 + 0.003 * I,
0.001 + 0.001 * I,
0.001 + 0.003 * I,
0.0001 + 0.004 * I,
0.003 + 0.006 * I,
0.0001 + 0.005 * I,
0.0001 + 0.003 * I,
0.001 + 0.001 * I,
0.0001 + 0.004 * I,
0.003 + 0.006 * I,
0.0001 + 0.005 * I,
0.0001 + 0.003 * I,
0.001 + 0.001 * I,
0.001 + 0.003 * I,
0.0001 + 0.004 * I,
0.003 + 0.006 * I,
0.0001 + 0.005 * I,
0.0001 + 0.003 * I,
0.001 + 0.001 * I,
0.001 + 0.003 * I,
0.0001 + 0.004 * I,
0.003 + 0.006 * I,
0.0001 + 0.005 * I,
0.0001 + 0.003 * I,
0.001 + 0.001 * I,
0.001 + 0.003 * I,
0.0001 + 0.004 * I,
0.003 + 0.006 * I,
0.0001 + 0.005 * I,
0.0001 + 0.003 * I,
0.001 + 0.001 * I,
0.001 + 0.003 * I,
0.0001 + 0.004 * I,
0.003 + 0.006 * I,
0.0001 + 0.005 * I,
0.0001 + 0.003 * I,
0.001 + 0.001 * I,
0.0001 + 0.004 * I,
0.003 + 0.006 * I,
0.0001 + 0.005 * I,
0.0001 + 0.003 * I,
0.001 + 0.001 * I,
0.001 + 0.003 * I,
0.0001 + 0.004 * I,
0.003 + 0.006 * I,
0.0001 + 0.005 * I,
0.0001 + 0.003 * I,
0.001 + 0.001 * I,
0.001 + 0.003 * I,
0.0001 + 0.004 * I,
0.003 + 0.006 * I,
0.0001 + 0.005 * I,
0.0001 + 0.003 * I,
0.001 + 0.001 * I,
0.001 + 0.003 * I,
0.0001 + 0.004 * I,
0.003 + 0.006 * I,
0.0001 + 0.005 * I,
0.0001 + 0.003 * I,
0.001 + 0.001 * I,
0.001 + 0.003 * I,
0.0001 + 0.004 * I,
0.003 + 0.006 * I,
0.0001 + 0.005 * I,
0.0001 + 0.003 * I,
0.001 + 0.001 * I,
0.0001 + 0.004 * I,
0.003 + 0.006 * I,
0.0001 + 0.005 * I,
0.0001 + 0.003 * I,
0.001 + 0.001 * I,
0.001 + 0.003 * I,
0.0001 + 0.004 * I,
0.003 + 0.006 * I,
0.0001 + 0.005 * I,
0.0001 + 0.003 * I,
0.001 + 0.001 * I,
0.001 + 0.003 * I,
0.0001 + 0.004 * I,
0.003 + 0.006 * I,
0.0001 + 0.005 * I,
0.0001 + 0.003 * I,
0.001 + 0.001 * I,
0.001 + 0.003 * I,
0.0001 + 0.004 * I,
0.003 + 0.006 * I,
0.0001 + 0.005 * I,
0.0001 + 0.003 * I,
0.001 + 0.001 * I,
0.001 + 0.003 * I,
0.0001 + 0.004 * I,
0.003 + 0.006 * I,
0.0001 + 0.005 * I,
0.0001 + 0.003 * I,
0.001 + 0.001 * I,
0.0001 + 0.004 * I,
0.003 + 0.006 * I,
0.0001 + 0.005 * I,
0.0001 + 0.003 * I,
0.001 + 0.001 * I,
0.001 + 0.003 * I,
0.0001 + 0.004 * I,
0.003 + 0.006 * I,
0.0001 + 0.005 * I,
0.0001 + 0.003 * I,
0.001 + 0.001 * I,
0.001 + 0.003 * I,
0.0001 + 0.004 * I,
0.003 + 0.006 * I,
0.0001 + 0.005 * I,
0.0001 + 0.003 * I,
0.001 + 0.001 * I,
0.001 + 0.003 * I,
0.0001 + 0.004 * I,
0.003 + 0.006 * I,
0.0001 + 0.005 * I,
0.0001 + 0.003 * I,
0.001 + 0.001 * I,
0.001 + 0.003 * I,
0.0001 + 0.004 * I,
0.003 + 0.006 * I,
0.0001 + 0.005 * I,
0.0001 + 0.003 * I,
0.001 + 0.001 * I,
0.0001 + 0.004 * I,
0.003 + 0.006 * I,
0.0001 + 0.005 * I,
0.0001 + 0.003 * I,
0.001 + 0.001 * I,
0.001 + 0.003 * I,
0.0001 + 0.004 * I,
0.003 + 0.006 * I,
0.0001 + 0.005 * I,
0.0001 + 0.003 * I,
0.001 + 0.001 * I,
0.001 + 0.003 * I,
0.0001 + 0.004 * I,
0.003 + 0.006 * I,
0.0001 + 0.005 * I,
0.0001 + 0.003 * I,
0.001 + 0.001 * I,
0.001 + 0.003 * I,
0.0001 + 0.004 * I,
0.003 + 0.006 * I,
0.0001 + 0.005 * I,
0.0001 + 0.003 * I,
0.001 + 0.001 * I,
0.001 + 0.003 * I,
0.0001 + 0.004 * I,
0.003 + 0.006 * I,
0.0001 + 0.005 * I,
0.0001 + 0.003 * I,
0.001 + 0.001 * I,
0.001 + 0.003 * I,
0.000 + 0.000 * I ];
glob_nxt := glob_nxt + 1;
it := x_delta[glob_nxt];
return it;
end;
#END USER DEF BLOCK
#######END OF ECHO OF PROBLEM#################
START of Soultion
x[1] = 0.1 0.1
h = 0.0001 0.005
y[1] (numeric) = -0.300128066477 0.00313359647612
y[1] (closed_form) = -0.300128066477 0.00313359647612
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.300297972884 0.00328733371416
y[1] (closed_form) = -0.30029882578 0.00328725613334
absolute error = 8.564e-07
relative error = 0.0002852 %
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.1002 0.108
h = 0.001 0.001
y[1] (numeric) = -0.300404361849 0.00338061370089
y[1] (closed_form) = -0.300404188913 0.00338062075025
absolute error = 1.731e-07
relative error = 5.761e-05 %
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.300411673466 0.00344759052212
y[1] (closed_form) = -0.30041098422 0.00344746834801
absolute error = 7.000e-07
relative error = 0.000233 %
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.1022 0.112
h = 0.0001 0.004
y[1] (numeric) = -0.300492953863 0.00357577462936
y[1] (closed_form) = -0.300493329191 0.00357587237687
absolute error = 3.878e-07
relative error = 0.0001291 %
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.300644341977 0.00370165567407
y[1] (closed_form) = -0.300645342896 0.00370106953122
absolute error = 1.160e-06
relative error = 0.0003858 %
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.300794557529 0.00400321982545
y[1] (closed_form) = -0.300796635093 0.00400656642821
absolute error = 3.939e-06
relative error = 0.001309 %
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.301005074692 0.00416453487019
y[1] (closed_form) = -0.301006007388 0.00416548061138
absolute error = 1.328e-06
relative error = 0.0004412 %
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.301134645936 0.00426116098229
y[1] (closed_form) = -0.301134543133 0.00426221478312
absolute error = 1.059e-06
relative error = 0.0003516 %
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.301148878937 0.00433674183155
y[1] (closed_form) = -0.301148251163 0.00433767623529
absolute error = 1.126e-06
relative error = 0.0003738 %
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.301252636174 0.00447523700945
y[1] (closed_form) = -0.301253089816 0.00447637063801
absolute error = 1.221e-06
relative error = 0.0004053 %
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.301435118683 0.00460516574085
y[1] (closed_form) = -0.301436190287 0.00460559406718
absolute error = 1.154e-06
relative error = 0.0003828 %
Correct digits = 5
memory used=28.3MB, alloc=40.3MB, time=0.36
NO POLE (given) for Equation 1
NO POLE (ratio test) 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.30162982215 0.00493482770486
y[1] (closed_form) = -0.301632067658 0.00493921162142
absolute error = 4.926e-06
relative error = 0.001633 %
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.1107 0.149
h = 0.0001 0.003
y[1] (numeric) = -0.301879573002 0.00510062470821
y[1] (closed_form) = -0.301880608951 0.00510260347078
absolute error = 2.234e-06
relative error = 0.0007398 %
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.30203266937 0.00520013599571
y[1] (closed_form) = -0.302032659559 0.00520224609304
absolute error = 2.110e-06
relative error = 0.0006985 %
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.302054090362 0.00528427313021
y[1] (closed_form) = -0.302053546655 0.00528627348278
absolute error = 2.073e-06
relative error = 0.0006862 %
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.302180809429 0.00543271809035
y[1] (closed_form) = -0.302181364536 0.00543489730396
absolute error = 2.249e-06
relative error = 0.0007441 %
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.302394842491 0.00556607948393
y[1] (closed_form) = -0.302396008419 0.00556753171913
absolute error = 1.862e-06
relative error = 0.0006158 %
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.302635169334 0.0059232340766
y[1] (closed_form) = -0.302637606274 0.00592866718585
absolute error = 5.955e-06
relative error = 0.001967 %
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.116 0.171
h = 0.0001 0.003
y[1] (numeric) = -0.302924730851 0.00609274829007
y[1] (closed_form) = -0.30292589335 0.00609577036251
absolute error = 3.238e-06
relative error = 0.001069 %
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.303101707675 0.00619469019341
y[1] (closed_form) = -0.30310181354 0.00619786673976
absolute error = 3.178e-06
relative error = 0.001048 %
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.303130585532 0.00628734208996
y[1] (closed_form) = -0.303130148298 0.00629041837549
absolute error = 3.107e-06
relative error = 0.001025 %
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.303280762187 0.00644538575466
y[1] (closed_form) = -0.303281441749 0.0064486208579
absolute error = 3.306e-06
relative error = 0.00109 %
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.303526818898 0.00658157308418
y[1] (closed_form) = -0.303528102627 0.00658405924444
absolute error = 2.798e-06
relative error = 0.0009216 %
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.303813924626 0.00696563967271
y[1] (closed_form) = -0.303816576408 0.00697213449467
absolute error = 7.015e-06
relative error = 0.002308 %
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.1213 0.193
h = 0.0001 0.003
y[1] (numeric) = -0.304143895508 0.00713811639323
y[1] (closed_form) = -0.304145207716 0.00714219267293
absolute error = 4.282e-06
relative error = 0.001408 %
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.304345121142 0.00724204044673
y[1] (closed_form) = -0.30434536521 0.0072462942217
absolute error = 4.261e-06
relative error = 0.0014 %
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.304381727281 0.00734317187181
y[1] (closed_form) = -0.304381418757 0.00734733470703
absolute error = 4.174e-06
relative error = 0.001371 %
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.304654339879 0.00748117420411
y[1] (closed_form) = -0.304656055196 0.00748431721004
absolute error = 3.581e-06
relative error = 0.001175 %
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.304982964543 0.00788738310143
y[1] (closed_form) = -0.304986131825 0.00789455958668
absolute error = 7.844e-06
relative error = 0.002571 %
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.1256 0.212
h = 0.0001 0.003
y[1] (numeric) = -0.305348238356 0.00806132132568
y[1] (closed_form) = -0.305350009635 0.00806607226464
absolute error = 5.070e-06
relative error = 0.00166 %
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.1257 0.215
h = 0.001 0.001
y[1] (numeric) = -0.305570658315 0.00816630179249
y[1] (closed_form) = -0.305571351301 0.0081712501098
absolute error = 4.997e-06
relative error = 0.001635 %
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.30561423675 0.00827461224433
y[1] (closed_form) = -0.305614368838 0.00827947763687
absolute error = 4.867e-06
relative error = 0.001592 %
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.30580952642 0.00844932293997
y[1] (closed_form) = -0.305810810167 0.00845431043347
absolute error = 5.150e-06
relative error = 0.001683 %
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.1278 0.223
h = 0.003 0.006
y[1] (numeric) = -0.306116508765 0.00858878501236
y[1] (closed_form) = -0.306118385338 0.00859298190706
absolute error = 4.597e-06
relative error = 0.001501 %
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.306494114253 0.0090208761184
y[1] (closed_form) = -0.306497539963 0.00902913911433
absolute error = 8.945e-06
relative error = 0.002917 %
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.1309 0.234
h = 0.0001 0.003
y[1] (numeric) = -0.306900963611 0.00919638978231
y[1] (closed_form) = -0.306902927533 0.00920221662275
absolute error = 6.149e-06
relative error = 0.002003 %
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.131 0.237
h = 0.001 0.001
y[1] (numeric) = -0.30714834913 0.00930252835885
y[1] (closed_form) = -0.30714922202 0.00930857543553
absolute error = 6.110e-06
relative error = 0.001988 %
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
memory used=72.0MB, alloc=52.3MB, time=0.89
x[1] = 0.132 0.238
h = 0.001 0.003
y[1] (numeric) = -0.307200168381 0.00941926645722
y[1] (closed_form) = -0.307200470303 0.00942523964517
absolute error = 5.981e-06
relative error = 0.001946 %
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.133 0.241
h = 0.0001 0.004
y[1] (numeric) = -0.307420395208 0.00960262029489
y[1] (closed_form) = -0.30742186858 0.00960869638232
absolute error = 6.252e-06
relative error = 0.002033 %
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.1331 0.245
h = 0.003 0.006
y[1] (numeric) = -0.307760847606 0.00974320851892
y[1] (closed_form) = -0.307762908561 0.00974847107852
absolute error = 5.652e-06
relative error = 0.001835 %
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.1361 0.251
h = 0.0001 0.005
y[1] (numeric) = -0.308188654629 0.0102006706726
y[1] (closed_form) = -0.308192362061 0.0102100346509
absolute error = 1.007e-05
relative error = 0.003266 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) 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.308637745422 0.0103770308089
y[1] (closed_form) = -0.308639924859 0.010383946303
absolute error = 7.251e-06
relative error = 0.002348 %
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.1363 0.259
h = 0.001 0.001
y[1] (numeric) = -0.308910505171 0.010483894703
y[1] (closed_form) = -0.308911580145 0.0104910532245
absolute error = 7.239e-06
relative error = 0.002342 %
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.1373 0.26
h = 0.001 0.003
y[1] (numeric) = -0.308970845557 0.0106090435898
y[1] (closed_form) = -0.308971339165 0.0106161371109
absolute error = 7.111e-06
relative error = 0.0023 %
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.1383 0.263
h = 0.0001 0.004
y[1] (numeric) = -0.30921655292 0.0108007275236
y[1] (closed_form) = -0.309218238452 0.010807905017
absolute error = 7.373e-06
relative error = 0.002383 %
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.1384 0.267
h = 0.003 0.006
y[1] (numeric) = -0.309591020671 0.0109418633049
y[1] (closed_form) = -0.309593289041 0.0109482039593
absolute error = 6.734e-06
relative error = 0.002174 %
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.1414 0.273
h = 0.0001 0.005
y[1] (numeric) = -0.310070275291 0.0114242096095
y[1] (closed_form) = -0.310074287734 0.0114346897661
absolute error = 1.122e-05
relative error = 0.003617 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
NO REAL POLE (three term test) for Equation 1
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.1415 0.278
h = 0.0001 0.003
y[1] (numeric) = -0.310562298625 0.0116006954247
y[1] (closed_form) = -0.310564716378 0.0116087130125
absolute error = 8.374e-06
relative error = 0.002695 %
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.1416 0.281
h = 0.001 0.001
y[1] (numeric) = -0.310860856414 0.0117078568441
y[1] (closed_form) = -0.310862155561 0.0117161402012
absolute error = 8.385e-06
relative error = 0.002695 %
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.1426 0.282
h = 0.001 0.003
y[1] (numeric) = -0.310930001876 0.0118414062573
y[1] (closed_form) = -0.310930708917 0.0118496333594
absolute error = 8.257e-06
relative error = 0.002654 %
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.1436 0.285
h = 0.0001 0.004
y[1] (numeric) = -0.311201747018 0.012041116847
y[1] (closed_form) = -0.311203667166 0.0120494092575
absolute error = 8.512e-06
relative error = 0.002733 %
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.1437 0.289
h = 0.003 0.006
y[1] (numeric) = -0.311610795887 0.0121822280197
y[1] (closed_form) = -0.311613294633 0.0121896598736
absolute error = 7.841e-06
relative error = 0.002514 %
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.1467 0.295
h = 0.0001 0.005
y[1] (numeric) = -0.312142770914 0.0126889958189
y[1] (closed_form) = -0.312147111665 0.0127006080964
absolute error = 1.240e-05
relative error = 0.003968 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) 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.312678444042 0.0128648942358
y[1] (closed_form) = -0.312681122862 0.0128740280667
absolute error = 9.519e-06
relative error = 0.003042 %
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.1469 0.303
h = 0.001 0.001
y[1] (numeric) = -0.313003239385 0.0129719301213
y[1] (closed_form) = -0.313004784721 0.0129813524315
absolute error = 9.548e-06
relative error = 0.003048 %
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.1479 0.304
h = 0.0001 0.004
y[1] (numeric) = -0.313081477773 0.0131138764859
y[1] (closed_form) = -0.313082419909 0.0131232511485
absolute error = 9.422e-06
relative error = 0.003007 %
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.148 0.308
h = 0.003 0.006
y[1] (numeric) = -0.313519240959 0.0132544916638
y[1] (closed_form) = -0.313522269893 0.0132625848377
absolute error = 8.641e-06
relative error = 0.002754 %
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.151 0.314
h = 0.0001 0.005
y[1] (numeric) = -0.314097920506 0.0137812795321
y[1] (closed_form) = -0.314102876607 0.0137935895084
absolute error = 1.327e-05
relative error = 0.004221 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) 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.314671742518 0.0139555747977
y[1] (closed_form) = -0.314674978108 0.0139653920063
absolute error = 1.034e-05
relative error = 0.003282 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) 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.31501947837 0.0140618473061
y[1] (closed_form) = -0.315021567335 0.0140719727187
absolute error = 1.034e-05
relative error = 0.003279 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) 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.315105877431 0.0142109107411
y[1] (closed_form) = -0.315107353451 0.0142209959463
absolute error = 1.019e-05
relative error = 0.003231 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) 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.315427693648 0.0144244554201
y[1] (closed_form) = -0.315430423958 0.0144345715946
absolute error = 1.048e-05
relative error = 0.003318 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) 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.315902652856 0.0145635896431
y[1] (closed_form) = -0.315905954931 0.0145727999978
absolute error = 9.784e-06
relative error = 0.003094 %
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.1563 0.336
h = 0.0001 0.005
y[1] (numeric) = -0.3165364924 0.0151139866484
y[1] (closed_form) = -0.316541820451 0.015127460199
absolute error = 1.449e-05
relative error = 0.004572 %
Correct digits = 4
NO POLE (given) for Equation 1
NO 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=115.8MB, alloc=52.3MB, time=1.39
x[1] = 0.1564 0.341
h = 0.0001 0.003
y[1] (numeric) = -0.317155363399 0.0152863773335
y[1] (closed_form) = -0.317158902501 0.015297338807
absolute error = 1.152e-05
relative error = 0.003628 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) 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.317530193499 0.0153917430984
y[1] (closed_form) = -0.317532569671 0.015403035481
absolute error = 1.154e-05
relative error = 0.00363 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) 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.317626232619 0.0155492114103
y[1] (closed_form) = -0.317627984052 0.0155604719527
absolute error = 1.140e-05
relative error = 0.003584 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) 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.317975759937 0.015769959625
y[1] (closed_form) = -0.317978789028 0.0157812331575
absolute error = 1.167e-05
relative error = 0.003667 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) 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.318487032015 0.0159074571029
y[1] (closed_form) = -0.318490630089 0.0159177997921
absolute error = 1.095e-05
relative error = 0.003434 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) 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.31917738898 0.0164810696066
y[1] (closed_form) = -0.319183112406 0.016495724938
absolute error = 1.573e-05
relative error = 0.004923 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) 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.319842106382 0.016650861922
y[1] (closed_form) = -0.319845971703 0.0166629839614
absolute error = 1.272e-05
relative error = 0.003973 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) 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.320244518428 0.0167549097955
y[1] (closed_form) = -0.320247203714 0.0167673854655
absolute error = 1.276e-05
relative error = 0.003979 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) 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.320350498276 0.0169207990274
y[1] (closed_form) = -0.320352546635 0.0169332510995
absolute error = 1.262e-05
relative error = 0.003934 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) 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.320728353752 0.017148483378
y[1] (closed_form) = -0.320731703952 0.0171609306837
absolute error = 1.289e-05
relative error = 0.004013 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) 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.321276590725 0.017283793183
y[1] (closed_form) = -0.321280507648 0.0172952841195
absolute error = 1.214e-05
relative error = 0.003773 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) 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.322024854774 0.0178802518673
y[1] (closed_form) = -0.322030997076 0.0178961080242
absolute error = 1.700e-05
relative error = 0.005272 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) 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.322736245887 0.0180467580565
y[1] (closed_form) = -0.322740460147 0.0180600577585
absolute error = 1.395e-05
relative error = 0.004316 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) 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.323166745548 0.0181490806439
y[1] (closed_form) = -0.323169761846 0.0181627567312
absolute error = 1.400e-05
relative error = 0.004327 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) 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.323282971794 0.0183234139203
y[1] (closed_form) = -0.323285338569 0.0183370745311
absolute error = 1.386e-05
relative error = 0.004282 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) 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.323689789585 0.0185577762087
y[1] (closed_form) = -0.32369348323 0.0185714145098
absolute error = 1.413e-05
relative error = 0.004358 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) 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.324275667721 0.0186903521623
y[1] (closed_form) = -0.324279926355 0.0187030080403
absolute error = 1.335e-05
relative error = 0.004111 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) 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.325083262218 0.0193093121067
y[1] (closed_form) = -0.325089846986 0.0193263889967
absolute error = 1.830e-05
relative error = 0.00562 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) 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.325842185243 0.0194718500374
y[1] (closed_form) = -0.325846771195 0.0194863453183
absolute error = 1.520e-05
relative error = 0.004657 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) 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.326301296774 0.0195720434598
y[1] (closed_form) = -0.32630466599 0.0195869379304
absolute error = 1.527e-05
relative error = 0.004672 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) 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.326428080379 0.0197548511021
y[1] (closed_form) = -0.326430787051 0.0197697381006
absolute error = 1.513e-05
relative error = 0.004627 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) 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.327045255898 0.0198847285645
y[1] (closed_form) = -0.327050148359 0.0198980617817
absolute error = 1.420e-05
relative error = 0.004335 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) 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.327905349568 0.0205220688695
y[1] (closed_form) = -0.327912656254 0.0205398725451
absolute error = 1.924e-05
relative error = 0.005857 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) 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.328705839821 0.020680068117
y[1] (closed_form) = -0.32871108572 0.0206952677607
absolute error = 1.608e-05
relative error = 0.004882 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) 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.329189982104 0.0207777582441
y[1] (closed_form) = -0.329193994682 0.0207933769968
absolute error = 1.613e-05
relative error = 0.004889 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) 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.329326207965 0.0209677592991
y[1] (closed_form) = -0.329329546535 0.0209833775412
absolute error = 1.597e-05
relative error = 0.00484 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) 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.329788739858 0.0212135280851
y[1] (closed_form) = -0.329793454018 0.0212290915857
absolute error = 1.626e-05
relative error = 0.004921 %
Correct digits = 4
NO POLE (given) for Equation 1
NO 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=159.6MB, alloc=52.3MB, time=1.90
x[1] = 0.1788 0.437
h = 0.003 0.006
y[1] (numeric) = -0.330446498045 0.0213391096578
y[1] (closed_form) = -0.330451775065 0.0213536407684
absolute error = 1.546e-05
relative error = 0.004669 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) 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.331368662028 0.0219983567241
y[1] (closed_form) = -0.331376455639 0.0220174202761
absolute error = 2.060e-05
relative error = 0.006201 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) 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.332218358888 0.0221511208947
y[1] (closed_form) = -0.332224019191 0.0221675514465
absolute error = 1.738e-05
relative error = 0.005219 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) 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.332732135434 0.0222459321073
y[1] (closed_form) = -0.332736542 0.022262804719
absolute error = 1.744e-05
relative error = 0.005229 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) 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.332879512916 0.022444479657
y[1] (closed_form) = -0.332883231624 0.0224613595603
absolute error = 1.728e-05
relative error = 0.005181 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) 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.333372919223 0.0226962298004
y[1] (closed_form) = -0.333378041135 0.022713037967
absolute error = 1.757e-05
relative error = 0.005258 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) 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.334070388115 0.0228175293321
y[1] (closed_form) = -0.334076072689 0.0228332773967
absolute error = 1.674e-05
relative error = 0.005 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
NO REAL POLE (three term test) for Equation 1
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.1871 0.465
h = 0.0001 0.005
y[1] (numeric) = -0.335056150649 0.0234984081965
y[1] (closed_form) = -0.335064455137 0.0235187541421
absolute error = 2.198e-05
relative error = 0.006542 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) 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.335956006495 0.0236452686708
y[1] (closed_form) = -0.335962104142 0.0236629505252
absolute error = 1.870e-05
relative error = 0.005553 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) 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.336499998231 0.0237368056476
y[1] (closed_form) = -0.336504820807 0.0237549526087
absolute error = 1.878e-05
relative error = 0.005566 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) 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.336658855115 0.0239439512163
y[1] (closed_form) = -0.336662975519 0.0239621131654
absolute error = 1.862e-05
relative error = 0.005518 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) 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.33718384267 0.0242014593746
y[1] (closed_form) = -0.337189394851 0.0242195327702
absolute error = 1.891e-05
relative error = 0.005593 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) 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.337921799963 0.0243179457608
y[1] (closed_form) = -0.33792791516 0.0243349307147
absolute error = 1.805e-05
relative error = 0.005328 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) 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.338972728756 0.0250202063477
y[1] (closed_form) = -0.338981568229 0.0250418581684
absolute error = 2.339e-05
relative error = 0.00688 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) 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.339923730931 0.0251604986349
y[1] (closed_form) = -0.339930288957 0.0251794531016
absolute error = 2.006e-05
relative error = 0.005884 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) 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.340498539829 0.025248368705
y[1] (closed_form) = -0.340503800506 0.0252678114373
absolute error = 2.014e-05
relative error = 0.005899 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) 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.340669210317 0.0254641715109
y[1] (closed_form) = -0.340673754022 0.0254836368246
absolute error = 1.999e-05
relative error = 0.005851 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) 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.341226506489 0.0257272233579
y[1] (closed_form) = -0.341232511539 0.0257465834719
absolute error = 2.027e-05
relative error = 0.005923 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) 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.342005758227 0.0258383687545
y[1] (closed_form) = -0.342012327208 0.0258566114327
absolute error = 1.939e-05
relative error = 0.005653 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) 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.343123461999 0.0265617860644
y[1] (closed_form) = -0.343132860736 0.0265847682343
absolute error = 2.483e-05
relative error = 0.007215 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) 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.344126633912 0.0266948494431
y[1] (closed_form) = -0.34413367546 0.0267150987733
absolute error = 2.144e-05
relative error = 0.006211 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) 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.34473288366 0.0267786623796
y[1] (closed_form) = -0.344738604609 0.0267994232621
absolute error = 2.153e-05
relative error = 0.006228 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) 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.344915708663 0.0270031894786
y[1] (closed_form) = -0.344920697345 0.0270239804363
absolute error = 2.138e-05
relative error = 0.00618 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) 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.3457293407 0.0271095108724
y[1] (closed_form) = -0.34573665442 0.0271284596196
absolute error = 2.031e-05
relative error = 0.005857 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) 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.346906091672 0.0278501560214
y[1] (closed_form) = -0.346916327821 0.0278739084833
absolute error = 2.586e-05
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.2021 0.533
h = 0.0001 0.003
y[1] (numeric) = -0.347954920682 0.027975831802
y[1] (closed_form) = -0.347962733034 0.0279968199814
absolute error = 2.240e-05
relative error = 0.006415 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) 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.348588695568 0.0280554566774
y[1] (closed_form) = -0.348595166787 0.028076976861
absolute error = 2.247e-05
relative error = 0.006426 %
Correct digits = 4
NO POLE (given) for Equation 1
NO 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=203.6MB, alloc=52.3MB, time=2.40
x[1] = 0.2032 0.537
h = 0.001 0.003
y[1] (numeric) = -0.348782366271 0.0282874027079
y[1] (closed_form) = -0.348788091734 0.0283089595301
absolute error = 2.230e-05
relative error = 0.006374 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) 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.349401851016 0.0285598241638
y[1] (closed_form) = -0.349409095399 0.0285812448569
absolute error = 2.261e-05
relative error = 0.00645 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) 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.350260109889 0.0286591204028
y[1] (closed_form) = -0.350267921063 0.0286793678492
absolute error = 2.170e-05
relative error = 0.006175 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) 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.35150674184 0.0294205507073
y[1] (closed_form) = -0.351517583257 0.0294456815031
absolute error = 2.737e-05
relative error = 0.007759 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) 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.352609736995 0.0295377637179
y[1] (closed_form) = -0.352618076573 0.029560090484
absolute error = 2.383e-05
relative error = 0.006735 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) 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.353276168818 0.0296126030873
y[1] (closed_form) = -0.353283142132 0.029635485436
absolute error = 2.392e-05
relative error = 0.006747 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) 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.353482648315 0.0298534153049
y[1] (closed_form) = -0.353488859609 0.0298763416148
absolute error = 2.375e-05
relative error = 0.006696 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) 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.354136640384 0.0301308075304
y[1] (closed_form) = -0.354144403184 0.0301535814975
absolute error = 2.406e-05
relative error = 0.00677 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) 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.355038658034 0.0302232574579
y[1] (closed_form) = -0.355046990182 0.0302448271571
absolute error = 2.312e-05
relative error = 0.006489 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) 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.356356906003 0.0310053203736
y[1] (closed_form) = -0.356368377555 0.0310318569732
absolute error = 2.891e-05
relative error = 0.008082 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) 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.357515200213 0.0311134183094
y[1] (closed_form) = -0.357524090574 0.0311371087558
absolute error = 2.530e-05
relative error = 0.007051 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) 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.358214978613 0.0311830875641
y[1] (closed_form) = -0.358222476527 0.0312073573436
absolute error = 2.540e-05
relative error = 0.007064 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) 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.358434628782 0.0314328562105
y[1] (closed_form) = -0.358441347865 0.0314571771826
absolute error = 2.523e-05
relative error = 0.007012 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) 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.359123941969 0.0317150394309
y[1] (closed_form) = -0.359132246264 0.0317391919885
absolute error = 2.554e-05
relative error = 0.007084 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) 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.360070642448 0.031800124851
y[1] (closed_form) = -0.360079519246 0.0318230413601
absolute error = 2.458e-05
relative error = 0.006799 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) 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.361462288635 0.0326026938593
y[1] (closed_form) = -0.361474415419 0.0326306648388
absolute error = 3.049e-05
relative error = 0.0084 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) 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.362677055345 0.0327010268818
y[1] (closed_form) = -0.362686520215 0.0327261071507
absolute error = 2.681e-05
relative error = 0.007361 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) 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.363410894381 0.0327651431089
y[1] (closed_form) = -0.363418939538 0.0327908266492
absolute error = 2.691e-05
relative error = 0.007376 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) 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.363644084987 0.0330239668794
y[1] (closed_form) = -0.363651333942 0.0330497087548
absolute error = 2.674e-05
relative error = 0.007324 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) 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.36436955732 0.0333107703915
y[1] (closed_form) = -0.364378426346 0.0333363279159
absolute error = 2.705e-05
relative error = 0.007393 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) 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.365361897539 0.0333879750745
y[1] (closed_form) = -0.365371342828 0.0334122639826
absolute error = 2.606e-05
relative error = 0.007103 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) 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.366828772947 0.0342109499979
y[1] (closed_form) = -0.366841580309 0.034240385071
absolute error = 3.210e-05
relative error = 0.008713 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) 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.368101227359 0.0342988704268
y[1] (closed_form) = -0.368111290648 0.0343253677386
absolute error = 2.834e-05
relative error = 0.007667 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) 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.368869866247 0.0343570522342
y[1] (closed_form) = -0.368878481447 0.0343841769583
absolute error = 2.846e-05
relative error = 0.007682 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) 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.369116975251 0.034625038455
y[1] (closed_form) = -0.369124776298 0.0346522285703
absolute error = 2.829e-05
relative error = 0.00763 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) 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.370147360664 0.0346953427579
y[1] (closed_form) = -0.370157671149 0.0347203805615
absolute error = 2.708e-05
relative error = 0.007283 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) 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.371680737542 0.0355348958078
y[1] (closed_form) = -0.371694509004 0.0355651607286
absolute error = 3.325e-05
relative error = 0.008905 %
Correct digits = 4
memory used=247.4MB, alloc=52.3MB, time=2.91
NO POLE (given) for Equation 1
NO POLE (ratio test) 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.373003719001 0.0356126285324
y[1] (closed_form) = -0.373014673872 0.0356399141519
absolute error = 2.940e-05
relative error = 0.007847 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) 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.373802847301 0.035664970816
y[1] (closed_form) = -0.373812329035 0.0356929051581
absolute error = 2.950e-05
relative error = 0.007856 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
NO REAL POLE (three term test) for Equation 1
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.2287 0.644
h = 0.001 0.003
y[1] (numeric) = -0.374062356995 0.0359407643573
y[1] (closed_form) = -0.37407100873 0.0359687703204
absolute error = 2.931e-05
relative error = 0.0078 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) 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.374857480505 0.0362352866069
y[1] (closed_form) = -0.374867820181 0.0362630784552
absolute error = 2.965e-05
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.2298 0.651
h = 0.003 0.006
y[1] (numeric) = -0.375937300832 0.0362958866877
y[1] (closed_form) = -0.375948225009 0.0363223470632
absolute error = 2.863e-05
relative error = 0.007579 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) 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.377549449219 0.0371557072904
y[1] (closed_form) = -0.377563949518 0.0371874944234
absolute error = 3.494e-05
relative error = 0.009209 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) 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.378932487327 0.037221811265
y[1] (closed_form) = -0.37894408601 0.0372505672612
absolute error = 3.101e-05
relative error = 0.008143 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) 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.37976785603 0.0372675033719
y[1] (closed_form) = -0.379777951049 0.0372969326626
absolute error = 3.111e-05
relative error = 0.008153 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) 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.38004201184 0.0375526779353
y[1] (closed_form) = -0.380051257785 0.0375821857553
absolute error = 3.092e-05
relative error = 0.008097 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) 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.380875831262 0.0378513716587
y[1] (closed_form) = -0.380886803505 0.0378806497671
absolute error = 3.127e-05
relative error = 0.008169 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) 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.382004213102 0.0379026101485
y[1] (closed_form) = -0.382015775393 0.0379305217979
absolute error = 3.021e-05
relative error = 0.00787 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) 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.383697113287 0.0387826748295
y[1] (closed_form) = -0.383712368575 0.0388160173195
absolute error = 3.667e-05
relative error = 0.009507 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) 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.385141549677 0.0388365063961
y[1] (closed_form) = -0.385153816707 0.0388667632404
absolute error = 3.265e-05
relative error = 0.008434 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) 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.386013974193 0.038875170044
y[1] (closed_form) = -0.386024705831 0.0389061250006
absolute error = 3.276e-05
relative error = 0.008444 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) 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.386303179383 0.0391698585836
y[1] (closed_form) = -0.386313042242 0.0392008988971
absolute error = 3.257e-05
relative error = 0.008388 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) 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.387176634037 0.0394725882981
y[1] (closed_form) = -0.387188262844 0.0395033834163
absolute error = 3.292e-05
relative error = 0.008458 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) 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.388354670618 0.0395139539538
y[1] (closed_form) = -0.388366895672 0.0395433467278
absolute error = 3.183e-05
relative error = 0.008155 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) 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.39013035831 0.040414267047
y[1] (closed_form) = -0.390146395047 0.0404491993045
absolute error = 3.844e-05
relative error = 0.0098 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) 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.391637581322 0.0404551836039
y[1] (closed_form) = -0.39165054148 0.0404869729667
absolute error = 3.433e-05
relative error = 0.008719 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) 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.392547905219 0.0404864414075
y[1] (closed_form) = -0.39255929702 0.0405189539608
absolute error = 3.445e-05
relative error = 0.00873 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) 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.392852572484 0.0407907862612
y[1] (closed_form) = -0.392863075151 0.0408233909199
absolute error = 3.425e-05
relative error = 0.008672 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) 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.393766629939 0.0410974258762
y[1] (closed_form) = -0.393778939536 0.0411297699646
absolute error = 3.461e-05
relative error = 0.008741 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) 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.394995452343 0.0411284083322
y[1] (closed_form) = -0.395008365052 0.0411593132618
absolute error = 3.349e-05
relative error = 0.008434 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) 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.396856020457 0.0420490024378
y[1] (closed_form) = -0.396872865424 0.0420855601751
absolute error = 4.025e-05
relative error = 0.01009 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) 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.398427466498 0.0420763621861
y[1] (closed_form) = -0.398441144821 0.0421097169701
absolute error = 3.605e-05
relative error = 0.008998 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) 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.399376562317 0.0420998375151
y[1] (closed_form) = -0.399388638049 0.0421339408426
absolute error = 3.618e-05
relative error = 0.009008 %
Correct digits = 4
NO POLE (given) for Equation 1
NO 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=291.0MB, alloc=52.3MB, time=3.41
x[1] = 0.2499 0.732
h = 0.0001 0.004
y[1] (numeric) = -0.39969711411 0.0424139906198
y[1] (closed_form) = -0.399708279684 0.0424481927236
absolute error = 3.598e-05
relative error = 0.008951 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) 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.400968319197 0.0424360213844
y[1] (closed_form) = -0.40098222945 0.0424677337783
absolute error = 3.463e-05
relative error = 0.008588 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) 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.402903913159 0.0433730746371
y[1] (closed_form) = -0.402921862458 0.0434105397595
absolute error = 4.154e-05
relative error = 0.01025 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) 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.404531656316 0.0433874624064
y[1] (closed_form) = -0.40454635924 0.0434216716771
absolute error = 3.724e-05
relative error = 0.009152 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) 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.405514748362 0.043403461172
y[1] (closed_form) = -0.405527818491 0.0434384414693
absolute error = 3.734e-05
relative error = 0.009156 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) 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.405849438492 0.0437259898013
y[1] (closed_form) = -0.405861579895 0.0437610748174
absolute error = 3.713e-05
relative error = 0.009095 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) 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.406841767384 0.0440390895985
y[1] (closed_form) = -0.406855795473 0.0440738851818
absolute error = 3.752e-05
relative error = 0.009168 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) 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.408168097019 0.0440487565752
y[1] (closed_form) = -0.408182742343 0.0440820418174
absolute error = 3.636e-05
relative error = 0.008857 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) 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.409503895198 0.0440528964515
y[1] (closed_form) = -0.409518540523 0.0440861816937
absolute error = 3.636e-05
relative error = 0.008829 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) 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.411544784484 0.0450105218748
y[1] (closed_form) = -0.411563619592 0.0450496991782
absolute error = 4.347e-05
relative error = 0.0105 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) 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.413250728941 0.0450049978079
y[1] (closed_form) = -0.413266205293 0.0450408457034
absolute error = 3.905e-05
relative error = 0.009393 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) 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.414281059953 0.0450094721072
y[1] (closed_form) = -0.414294861312 0.0450461228557
absolute error = 3.916e-05
relative error = 0.009398 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) 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.414635761834 0.0453432479076
y[1] (closed_form) = -0.414648608457 0.0453800118816
absolute error = 3.894e-05
relative error = 0.009336 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) 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.415679389602 0.0456589061493
y[1] (closed_form) = -0.415694175292 0.0456953612772
absolute error = 3.934e-05
relative error = 0.009407 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) 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.417069005689 0.0456525729831
y[1] (closed_form) = -0.417084417551 0.0456874708136
absolute error = 3.815e-05
relative error = 0.009092 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) 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.419201499931 0.0466306432162
y[1] (closed_form) = -0.419221228623 0.0466715613034
absolute error = 4.543e-05
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.2638 0.795
h = 0.0001 0.003
y[1] (numeric) = -0.420976301978 0.046609538557
y[1] (closed_form) = -0.420992576012 0.0466470583043
absolute error = 4.090e-05
relative error = 0.009655 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) 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.422048219457 0.0466050429713
y[1] (closed_form) = -0.422062780208 0.0466433919146
absolute error = 4.102e-05
relative error = 0.00966 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) 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.422420159764 0.0469491264834
y[1] (closed_form) = -0.422433742602 0.04698759513
absolute error = 4.080e-05
relative error = 0.009598 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) 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.423508593964 0.0472682294416
y[1] (closed_form) = -0.423524162632 0.0473063741906
absolute error = 4.120e-05
relative error = 0.009668 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) 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.424953940401 0.047249394979
y[1] (closed_form) = -0.424970144886 0.0472859415181
absolute error = 3.998e-05
relative error = 0.00935 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) 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.427180383485 0.048248058734
y[1] (closed_form) = -0.427201034062 0.0482907589273
absolute error = 4.743e-05
relative error = 0.01103 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) 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.429025687807 0.048210729912
y[1] (closed_form) = -0.429042785813 0.0482499597243
absolute error = 4.279e-05
relative error = 0.009912 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) 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.430140189888 0.0481968879498
y[1] (closed_form) = -0.430155534905 0.0482369736351
absolute error = 4.292e-05
relative error = 0.009916 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) 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.430529834375 0.0485514716429
y[1] (closed_form) = -0.430544177554 0.0485916834361
absolute error = 4.269e-05
relative error = 0.009854 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) 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.431664198862 0.0488739407254
y[1] (closed_form) = -0.431680576169 0.0489138136582
absolute error = 4.311e-05
relative error = 0.009922 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) 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.433166614477 0.04884209409
y[1] (closed_form) = -0.433183637985 0.0488803268122
absolute error = 4.185e-05
relative error = 0.0096 %
Correct digits = 4
NO POLE (given) for Equation 1
NO 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=334.9MB, alloc=52.3MB, time=3.92
x[1] = 0.2743 0.834
h = 0.0001 0.005
y[1] (numeric) = -0.435489416974 0.0498615310562
y[1] (closed_form) = -0.435511018137 0.0499060561719
absolute error = 4.949e-05
relative error = 0.01129 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) 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.437406923632 0.0498073341341
y[1] (closed_form) = -0.43742487223 0.0498483136374
absolute error = 4.474e-05
relative error = 0.01016 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) 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.438565041839 0.0497837694112
y[1] (closed_form) = -0.438581196287 0.0498256318126
absolute error = 4.487e-05
relative error = 0.01017 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) 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.438972867752 0.0501490565562
y[1] (closed_form) = -0.438987995665 0.0501910513973
absolute error = 4.464e-05
relative error = 0.0101 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) 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.440154320164 0.0504748233486
y[1] (closed_form) = -0.440171532083 0.0505164644526
absolute error = 4.506e-05
relative error = 0.01017 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) 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.441715188652 0.050429453455
y[1] (closed_form) = -0.441733057917 0.0504694112268
absolute error = 4.377e-05
relative error = 0.009845 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) 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.444136829812 0.0514698749603
y[1] (closed_form) = -0.444159410673 0.0515162693503
absolute error = 5.160e-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.2797 0.861
h = 0.0001 0.003
y[1] (numeric) = -0.446128295795 0.0513981654532
y[1] (closed_form) = -0.446147121953 0.0514409357252
absolute error = 4.673e-05
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.2798 0.864
h = 0.001 0.001
y[1] (numeric) = -0.447331095988 0.0513645015961
y[1] (closed_form) = -0.447348085339 0.0514081821531
absolute error = 4.687e-05
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.2808 0.865
h = 0.0001 0.004
y[1] (numeric) = -0.447757592418 0.0517407065363
y[1] (closed_form) = -0.447773529742 0.0517845257919
absolute error = 4.663e-05
relative error = 0.01034 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) 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.449367301418 0.05168380323
y[1] (closed_form) = -0.44938635338 0.051724664908
absolute error = 4.508e-05
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.2839 0.875
h = 0.0001 0.005
y[1] (numeric) = -0.451876312838 0.0527412625531
y[1] (closed_form) = -0.451900195466 0.052788687863
absolute error = 5.310e-05
relative error = 0.01167 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) 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.453932673067 0.0526530515948
y[1] (closed_form) = -0.453952710313 0.0526967837765
absolute error = 4.810e-05
relative error = 0.01053 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) 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.455174688056 0.0526098431056
y[1] (closed_form) = -0.455192850881 0.0526545099799
absolute error = 4.822e-05
relative error = 0.01052 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) 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.455617790142 0.0529953954625
y[1] (closed_form) = -0.455634878421 0.0530402066811
absolute error = 4.796e-05
relative error = 0.01046 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) 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.456890100949 0.0533265569723
y[1] (closed_form) = -0.456909370231 0.0533709863551
absolute error = 4.843e-05
relative error = 0.01053 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) 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.458563402845 0.0532539245232
y[1] (closed_form) = -0.458583351745 0.0532965870802
absolute error = 4.710e-05
relative error = 0.0102 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) 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.461176059405 0.0543328166871
y[1] (closed_form) = -0.461200977624 0.0543821976742
absolute error = 5.531e-05
relative error = 0.01191 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) 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.463309797633 0.0542258692802
y[1] (closed_form) = -0.463330764114 0.0542714723362
absolute error = 5.019e-05
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.2894 0.905
h = 0.001 0.001
y[1] (numeric) = -0.464598568136 0.054171847336
y[1] (closed_form) = -0.46461761465 0.0542184132005
absolute error = 5.031e-05
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.2904 0.906
h = 0.001 0.003
y[1] (numeric) = -0.465061286466 0.0545687405937
y[1] (closed_form) = -0.465079231407 0.0546154569354
absolute error = 5.004e-05
relative error = 0.01069 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) 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.46638419197 0.0549030468047
y[1] (closed_form) = -0.466404372565 0.0549493666513
absolute error = 5.053e-05
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.2915 0.913
h = 0.003 0.006
y[1] (numeric) = -0.468120158284 0.0548154082928
y[1] (closed_form) = -0.4681410319 0.0548599147877
absolute error = 4.916e-05
relative error = 0.01043 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) 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.470839147403 0.0559160382254
y[1] (closed_form) = -0.470865131605 0.0559674238681
absolute error = 5.758e-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.2946 0.924
h = 0.0001 0.003
y[1] (numeric) = -0.473052192427 0.0557897066955
y[1] (closed_form) = -0.47307411619 0.055837226076
absolute error = 5.233e-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.2947 0.927
h = 0.001 0.001
y[1] (numeric) = -0.474388887927 0.055724494043
y[1] (closed_form) = -0.474408844563 0.0557730047495
absolute error = 5.246e-05
relative error = 0.01098 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) 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.474871747634 0.056132975651
y[1] (closed_form) = -0.47489057481 0.0561816428938
absolute error = 5.218e-05
relative error = 0.01091 %
Correct digits = 4
NO POLE (given) for Equation 1
NO 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=378.7MB, alloc=52.3MB, time=4.43
x[1] = 0.2967 0.931
h = 0.0001 0.004
y[1] (numeric) = -0.476246545433 0.0564703988769
y[1] (closed_form) = -0.476267664673 0.0565186550462
absolute error = 5.268e-05
relative error = 0.01098 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) 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.478046745213 0.0563672406366
y[1] (closed_form) = -0.47806857171 0.0564136356742
absolute error = 5.127e-05
relative error = 0.01065 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) 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.480874831018 0.0574899477912
y[1] (closed_form) = -0.480901912065 0.0575433887741
absolute error = 5.991e-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.2999 0.946
h = 0.0001 0.003
y[1] (numeric) = -0.48316917495 0.0573435833247
y[1] (closed_form) = -0.483192084443 0.0573930660917
absolute error = 5.453e-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.3 0.949
h = 0.001 0.001
y[1] (numeric) = -0.484555003118 0.0572668024137
y[1] (closed_form) = -0.484575896663 0.057317305439
absolute error = 5.465e-05
relative error = 0.0112 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) 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.485058542606 0.0576871320317
y[1] (closed_form) = -0.485078277922 0.0577377975778
absolute error = 5.437e-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.302 0.953
h = 0.0001 0.004
y[1] (numeric) = -0.486486569055 0.0580276558049
y[1] (closed_form) = -0.486508654651 0.0580778957799
absolute error = 5.488e-05
relative error = 0.0112 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) 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.488352622649 0.057908463392
y[1] (closed_form) = -0.488375430595 0.0579567931656
absolute error = 5.344e-05
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.3051 0.963
h = 0.0001 0.005
y[1] (numeric) = -0.49129264816 0.0590536225988
y[1] (closed_form) = -0.491320857395 0.0591091713599
absolute error = 6.230e-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.3052 0.968
h = 0.0001 0.003
y[1] (numeric) = -0.493670348175 0.0588865751294
y[1] (closed_form) = -0.493694272255 0.0589380700008
absolute error = 5.678e-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.3053 0.971
h = 0.001 0.001
y[1] (numeric) = -0.495106555927 0.0587978480572
y[1] (closed_form) = -0.495128413533 0.0588503925474
absolute error = 5.691e-05
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.3063 0.972
h = 0.0001 0.004
y[1] (numeric) = -0.495631327258 0.0592302978779
y[1] (closed_form) = -0.495651996958 0.0592830107976
absolute error = 5.662e-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.3064 0.976
h = 0.003 0.006
y[1] (numeric) = -0.497552450279 0.059097503695
y[1] (closed_form) = -0.497576609149 0.0591468387048
absolute error = 5.493e-05
relative error = 0.01096 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) 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.500591442438 0.0602609356817
y[1] (closed_form) = -0.500621133359 0.0603176419642
absolute error = 6.401e-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.3095 0.987
h = 0.0001 0.003
y[1] (numeric) = -0.503042333985 0.0600745358588
y[1] (closed_form) = -0.50306763872 0.0601271042378
absolute error = 5.834e-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.3096 0.99
h = 0.001 0.001
y[1] (numeric) = -0.50452278763 0.0599746019274
y[1] (closed_form) = -0.504545981355 0.0600282461807
absolute error = 5.844e-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.3106 0.991
h = 0.001 0.003
y[1] (numeric) = -0.505066436436 0.06041745007
y[1] (closed_form) = -0.505088416035 0.060471268146
absolute error = 5.813e-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.3116 0.994
h = 0.0001 0.004
y[1] (numeric) = -0.506597240036 0.0607630654225
y[1] (closed_form) = -0.506621683055 0.0608164304206
absolute error = 5.870e-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.3117 0.998
h = 0.003 0.006
y[1] (numeric) = -0.508590120971 0.0606118324401
y[1] (closed_form) = -0.508615316152 0.0606631921661
absolute error = 5.721e-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.3147 1.004
h = 0.0001 0.005
y[1] (numeric) = -0.511746566139 0.0617984750126
y[1] (closed_form) = -0.511777445579 0.0618573910951
absolute error = 6.652e-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.3148 1.009
h = 0.0001 0.003
y[1] (numeric) = -0.51428481327 0.0615901524845
y[1] (closed_form) = -0.51431118806 0.0616448278289
absolute error = 6.070e-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.3149 1.012
h = 0.001 0.001
y[1] (numeric) = -0.515818070396 0.0614775521075
y[1] (closed_form) = -0.515842280355 0.0615333335396
absolute error = 6.081e-05
relative error = 0.01171 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) 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.51638401959 0.0619330544711
y[1] (closed_form) = -0.51640698399 0.0619890155015
absolute error = 6.049e-05
relative error = 0.01163 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) 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.51797209896 0.0622817700841
y[1] (closed_form) = -0.51799759045 0.0623372637501
absolute error = 6.107e-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.317 1.02
h = 0.003 0.006
y[1] (numeric) = -0.520035759129 0.0621130047757
y[1] (closed_form) = -0.52006202043 0.0621664401949
absolute error = 5.954e-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.32 1.026
h = 0.0001 0.005
y[1] (numeric) = -0.523312738894 0.0633233380262
y[1] (closed_form) = -0.523344839676 0.0633845216292
absolute error = 6.909e-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.3201 1.031
h = 0.0001 0.003
y[1] (numeric) = -0.525940594972 0.063092437802
y[1] (closed_form) = -0.525968069947 0.0631492738168
absolute error = 6.313e-05
relative error = 0.01192 %
Correct digits = 4
NO POLE (given) for Equation 1
NO 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=422.5MB, alloc=52.3MB, time=4.94
x[1] = 0.3202 1.034
h = 0.001 0.001
y[1] (numeric) = -0.527528020844 0.0629667913362
y[1] (closed_form) = -0.527553275326 0.0630247641181
absolute error = 6.323e-05
relative error = 0.0119 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) 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.528116863881 0.0634352576745
y[1] (closed_form) = -0.52814084039 0.0634934157501
absolute error = 6.291e-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.3222 1.038
h = 0.0001 0.004
y[1] (numeric) = -0.529763715565 0.0637871025085
y[1] (closed_form) = -0.52979028484 0.0638447790176
absolute error = 6.350e-05
relative error = 0.0119 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) 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.531899986998 0.0636002860929
y[1] (closed_form) = -0.531927344679 0.0636558499457
absolute error = 6.193e-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.3253 1.048
h = 0.0001 0.005
y[1] (numeric) = -0.535300670678 0.0648348291597
y[1] (closed_form) = -0.535334026163 0.0648983399519
absolute error = 7.174e-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.3254 1.053
h = 0.0001 0.003
y[1] (numeric) = -0.538020461318 0.064580694678
y[1] (closed_form) = -0.538049067069 0.0646397469067
absolute error = 6.562e-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.3255 1.056
h = 0.001 0.001
y[1] (numeric) = -0.539663464782 0.0644416219904
y[1] (closed_form) = -0.539689792484 0.0645018421441
absolute error = 6.572e-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.3265 1.057
h = 0.001 0.003
y[1] (numeric) = -0.54027581031 0.0649233759421
y[1] (closed_form) = -0.54030082662 0.0649837870024
absolute error = 6.539e-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.3275 1.06
h = 0.0001 0.004
y[1] (numeric) = -0.541982975121 0.0652783916123
y[1] (closed_form) = -0.542010651936 0.0653383069908
absolute error = 6.600e-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.3276 1.064
h = 0.003 0.006
y[1] (numeric) = -0.544193748387 0.0650730042387
y[1] (closed_form) = -0.544222233173 0.0651307510775
absolute error = 6.439e-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.3306 1.07
h = 0.0001 0.005
y[1] (numeric) = -0.547721395434 0.0663323163751
y[1] (closed_form) = -0.54775603953 0.0663982160266
absolute error = 7.445e-05
relative error = 0.01349 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) 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.55053552047 0.0660542894667
y[1] (closed_form) = -0.550565288065 0.0661156153411
absolute error = 6.817e-05
relative error = 0.01229 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) 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.552235555146 0.0659014099268
y[1] (closed_form) = -0.552262985192 0.0659639353753
absolute error = 6.828e-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.3318 1.079
h = 0.0001 0.004
y[1] (numeric) = -0.552872027422 0.0663967893972
y[1] (closed_form) = -0.55289811162 0.0664595112803
absolute error = 6.793e-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.3319 1.083
h = 0.003 0.006
y[1] (numeric) = -0.555145144357 0.0661757073988
y[1] (closed_form) = -0.555175168623 0.066234584199
absolute error = 6.609e-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.3349 1.089
h = 0.0001 0.005
y[1] (numeric) = -0.558785062827 0.067455252264
y[1] (closed_form) = -0.558821390607 0.0675224629574
absolute error = 7.640e-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.335 1.094
h = 0.0001 0.003
y[1] (numeric) = -0.561682072343 0.0671549672324
y[1] (closed_form) = -0.561713410729 0.0672175030513
absolute error = 6.995e-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.3351 1.097
h = 0.001 0.001
y[1] (numeric) = -0.563432226043 0.0669891942624
y[1] (closed_form) = -0.563461174451 0.067052958042
absolute error = 7.003e-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.3361 1.098
h = 0.001 0.003
y[1] (numeric) = -0.564090145993 0.0674962860789
y[1] (closed_form) = -0.564117718108 0.0675602514093
absolute error = 6.965e-05
relative error = 0.01226 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) 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.565913836624 0.0678565935919
y[1] (closed_form) = -0.565944200809 0.0679200363488
absolute error = 7.033e-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.3372 1.105
h = 0.003 0.006
y[1] (numeric) = -0.568268243523 0.0676143191939
y[1] (closed_form) = -0.568299454057 0.0676754851034
absolute error = 6.867e-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.3402 1.111
h = 0.0001 0.005
y[1] (numeric) = -0.572041446615 0.0689197429239
y[1] (closed_form) = -0.572079128407 0.0689894623283
absolute error = 7.925e-05
relative error = 0.01375 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) 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.575037452687 0.0685943056618
y[1] (closed_form) = -0.575070012773 0.0686592268142
absolute error = 7.263e-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.3404 1.119
h = 0.001 0.001
y[1] (numeric) = -0.576847461271 0.0684139976361
y[1] (closed_form) = -0.576877568123 0.0684801793701
absolute error = 7.271e-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.3414 1.12
h = 0.001 0.003
y[1] (numeric) = -0.577530716995 0.0689353751742
y[1] (closed_form) = -0.577559411096 0.0690017638343
absolute error = 7.232e-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.3424 1.123
h = 0.0001 0.004
y[1] (numeric) = -0.579419385084 0.0692990254621
y[1] (closed_form) = -0.579450945212 0.069364877673
absolute error = 7.302e-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.3425 1.127
h = 0.003 0.006
y[1] (numeric) = -0.581854033779 0.0690366619212
y[1] (closed_form) = -0.581886462735 0.0691001769491
absolute error = 7.131e-05
relative error = 0.01217 %
Correct digits = 4
NO POLE (given) for Equation 1
NO 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=466.3MB, alloc=52.3MB, time=5.44
x[1] = 0.3455 1.133
h = 0.0001 0.005
y[1] (numeric) = -0.58576405304 0.0703686436985
y[1] (closed_form) = -0.585803124425 0.0704409395137
absolute error = 8.218e-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.3456 1.138
h = 0.0001 0.003
y[1] (numeric) = -0.588861679166 0.0700173904196
y[1] (closed_form) = -0.588895493471 0.0700847600244
absolute error = 7.538e-05
relative error = 0.01271 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) 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.590733131184 0.0698221647544
y[1] (closed_form) = -0.5907644269 0.0698908280885
absolute error = 7.546e-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.3467 1.142
h = 0.001 0.003
y[1] (numeric) = -0.591442394119 0.0703582087589
y[1] (closed_form) = -0.591472239508 0.0704270843011
absolute error = 7.506e-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.3477 1.145
h = 0.0001 0.004
y[1] (numeric) = -0.59339776314 0.0707252951883
y[1] (closed_form) = -0.5934305508 0.0707936205061
absolute error = 7.579e-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.3478 1.149
h = 0.003 0.006
y[1] (numeric) = -0.595914785543 0.0704423177002
y[1] (closed_form) = -0.595948465592 0.0705082438671
absolute error = 7.403e-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.3508 1.155
h = 0.0001 0.005
y[1] (numeric) = -0.599965252421 0.071801581387
y[1] (closed_form) = -0.600005749584 0.0718765235357
absolute error = 8.518e-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.3509 1.16
h = 0.0001 0.003
y[1] (numeric) = -0.603167204421 0.0714238466927
y[1] (closed_form) = -0.603202305989 0.0714937299646
absolute error = 7.820e-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.351 1.163
h = 0.001 0.001
y[1] (numeric) = -0.605101738084 0.0712133203636
y[1] (closed_form) = -0.605134253548 0.0712845310517
absolute error = 7.828e-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.352 1.164
h = 0.001 0.003
y[1] (numeric) = -0.605837696941 0.071764427443
y[1] (closed_form) = -0.605868723356 0.0718358555239
absolute error = 7.788e-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.353 1.167
h = 0.0001 0.004
y[1] (numeric) = -0.607861540772 0.0721350579231
y[1] (closed_form) = -0.607895588051 0.0722059221101
absolute error = 7.862e-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.3531 1.171
h = 0.003 0.006
y[1] (numeric) = -0.61046313549 0.0718309406419
y[1] (closed_form) = -0.610498099831 0.0718993420346
absolute error = 7.682e-05
relative error = 0.0125 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) 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.614657783992 0.0732182560976
y[1] (closed_form) = -0.61469974373 0.0732959167872
absolute error = 8.827e-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.3562 1.182
h = 0.0001 0.003
y[1] (numeric) = -0.617966852232 0.0728133730276
y[1] (closed_form) = -0.618003274642 0.0728858373347
absolute error = 8.110e-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.3563 1.185
h = 0.001 0.001
y[1] (numeric) = -0.619966156755 0.072587162617
y[1] (closed_form) = -0.619999923329 0.0726609885779
absolute error = 8.118e-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.3573 1.186
h = 0.0001 0.004
y[1] (numeric) = -0.620729517965 0.0731537456928
y[1] (closed_form) = -0.620761755589 0.0732277941299
absolute error = 8.076e-05
relative error = 0.01292 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) 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.623401922582 0.0728318122113
y[1] (closed_form) = -0.62343863824 0.0729014949767
absolute error = 7.876e-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.3604 1.196
h = 0.0001 0.005
y[1] (numeric) = -0.627724095729 0.074242146329
y[1] (closed_form) = -0.627767966225 0.0743213023186
absolute error = 9.050e-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.3605 1.201
h = 0.0001 0.003
y[1] (numeric) = -0.631127332516 0.0738120368006
y[1] (closed_form) = -0.631165539327 0.0738858758113
absolute error = 8.314e-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.3606 1.204
h = 0.001 0.001
y[1] (numeric) = -0.63318358922 0.07357121886
y[1] (closed_form) = -0.633219078767 0.0736464503129
absolute error = 8.318e-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.3616 1.205
h = 0.001 0.003
y[1] (numeric) = -0.633971308377 0.0741511284056
y[1] (closed_form) = -0.63400523372 0.0742265871206
absolute error = 8.273e-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.3626 1.208
h = 0.0001 0.004
y[1] (numeric) = -0.636127513316 0.0745278244543
y[1] (closed_form) = -0.636164612076 0.0746026931374
absolute error = 8.356e-05
relative error = 0.01304 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) 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.638892298369 0.0741818955703
y[1] (closed_form) = -0.638930362369 0.0742541780968
absolute error = 8.169e-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.3657 1.218
h = 0.0001 0.005
y[1] (numeric) = -0.643365894086 0.0756217936654
y[1] (closed_form) = -0.643411298234 0.0757038083973
absolute error = 9.374e-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.3658 1.223
h = 0.0001 0.003
y[1] (numeric) = -0.646881664244 0.0751632550793
y[1] (closed_form) = -0.646921256708 0.0752398059999
absolute error = 8.618e-05
relative error = 0.01323 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) 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.649005970959 0.0749060171496
y[1] (closed_form) = -0.649042772147 0.0749839958339
absolute error = 8.623e-05
relative error = 0.0132 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) 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.64982246111 0.07550220713
y[1] (closed_form) = -0.649857655914 0.0755804179739
absolute error = 8.576e-05
relative error = 0.01311 %
Correct digits = 4
memory used=510.3MB, alloc=52.3MB, time=5.95
NO POLE (given) for Equation 1
NO POLE (ratio test) 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.652052507925 0.0758828171282
y[1] (closed_form) = -0.652090961816 0.0759604245781
absolute error = 8.661e-05
relative error = 0.01319 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) 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.654908533315 0.07551420991
y[1] (closed_form) = -0.654947980463 0.0755891625077
absolute error = 8.470e-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.371 1.24
h = 0.0001 0.005
y[1] (numeric) = -0.659537594792 0.0769845798803
y[1] (closed_form) = -0.659584571247 0.0770695324421
absolute error = 9.708e-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.3711 1.245
h = 0.0001 0.003
y[1] (numeric) = -0.663168943357 0.0764969401667
y[1] (closed_form) = -0.663209956678 0.0765762768493
absolute error = 8.931e-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.3712 1.248
h = 0.001 0.001
y[1] (numeric) = -0.665363142933 0.0762228974111
y[1] (closed_form) = -0.66540128857 0.0763036977632
absolute error = 8.935e-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.3722 1.249
h = 0.001 0.003
y[1] (numeric) = -0.666209163967 0.0768358298078
y[1] (closed_form) = -0.666245659768 0.0769168671022
absolute error = 8.888e-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.3732 1.252
h = 0.0001 0.004
y[1] (numeric) = -0.668515034227 0.0772205216
y[1] (closed_form) = -0.668554877388 0.0773009422703
absolute error = 8.975e-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.3733 1.256
h = 0.003 0.006
y[1] (numeric) = -0.671464773372 0.0768287059443
y[1] (closed_form) = -0.67150563905 0.0769064012171
absolute error = 8.779e-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.3763 1.262
h = 0.0001 0.005
y[1] (numeric) = -0.676253457177 0.0783305072761
y[1] (closed_form) = -0.676302045256 0.0784184792924
absolute error = 0.0001005
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.3764 1.267
h = 0.0001 0.003
y[1] (numeric) = -0.680003522876 0.0778130931617
y[1] (closed_form) = -0.680045992835 0.0778952918481
absolute error = 9.252e-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
x[1] = 0.3765 1.27
h = 0.001 0.001
y[1] (numeric) = -0.682269514678 0.0775218606324
y[1] (closed_form) = -0.682309038086 0.0776055594894
absolute error = 9.256e-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.3775 1.271
h = 0.001 0.003
y[1] (numeric) = -0.683145846015 0.078152015617
y[1] (closed_form) = -0.683183674832 0.0782359560787
absolute error = 9.207e-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.3785 1.274
h = 0.0001 0.004
y[1] (numeric) = -0.685529578531 0.0785409739969
y[1] (closed_form) = -0.685570845652 0.0786242847444
absolute error = 9.297e-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.3786 1.278
h = 0.003 0.006
y[1] (numeric) = -0.688575580747 0.078125419156
y[1] (closed_form) = -0.688617900926 0.0782059320641
absolute error = 9.096e-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.3816 1.284
h = 0.0001 0.005
y[1] (numeric) = -0.69352815977 0.0796596645277
y[1] (closed_form) = -0.693578399465 0.0797507402292
absolute error = 0.000104
relative error = 0.0149 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) 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.697400177533 0.0791118016879
y[1] (closed_form) = -0.697444140505 0.0791969410745
absolute error = 9.582e-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.3818 1.292
h = 0.001 0.001
y[1] (numeric) = -0.699739918965 0.0788029944365
y[1] (closed_form) = -0.69978085399 0.0788896711012
absolute error = 9.586e-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.3828 1.293
h = 0.0001 0.004
y[1] (numeric) = -0.700647360043 0.0794508708981
y[1] (closed_form) = -0.700686554382 0.0795377937036
absolute error = 9.535e-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
x[1] = 0.3829 1.297
h = 0.003 0.006
y[1] (numeric) = -0.703773995851 0.0790153517469
y[1] (closed_form) = -0.703818305624 0.0790973279674
absolute error = 9.319e-05
relative error = 0.01316 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) 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.708871566966 0.0805763528286
y[1] (closed_form) = -0.708923972777 0.0806691432694
absolute error = 0.0001066
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.386 1.308
h = 0.0001 0.003
y[1] (numeric) = -0.71285084915 0.0800002331168
y[1] (closed_form) = -0.712896836721 0.0800869443494
absolute error = 9.815e-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.3861 1.311
h = 0.001 0.001
y[1] (numeric) = -0.715255469105 0.0796750786213
y[1] (closed_form) = -0.715298357043 0.0797633605781
absolute error = 9.815e-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.3871 1.312
h = 0.001 0.003
y[1] (numeric) = -0.716190563775 0.0803382394084
y[1] (closed_form) = -0.716231670301 0.0804267718762
absolute error = 9.761e-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.3881 1.315
h = 0.0001 0.004
y[1] (numeric) = -0.718724865334 0.0807347015867
y[1] (closed_form) = -0.718769586597 0.0808225792272
absolute error = 9.860e-05
relative error = 0.01363 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) 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.721956746508 0.0802723373768
y[1] (closed_form) = -0.722002580279 0.080357276765
absolute error = 9.652e-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.3912 1.325
h = 0.0001 0.005
y[1] (numeric) = -0.727226497272 0.0818677598781
y[1] (closed_form) = -0.727280632032 0.0819638174259
absolute error = 0.0001103
relative error = 0.01507 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) 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.731334007856 0.0812598931415
y[1] (closed_form) = -0.731381558744 0.0813496978245
absolute error = 0.0001016
relative error = 0.01381 %
Correct digits = 4
memory used=554.1MB, alloc=52.3MB, time=6.46
NO POLE (given) for Equation 1
NO POLE (ratio test) 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.733816174942 0.0809164230399
y[1] (closed_form) = -0.73386053992 0.0810078367427
absolute error = 0.0001016
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.3924 1.334
h = 0.001 0.003
y[1] (numeric) = -0.734783928404 0.0815982752068
y[1] (closed_form) = -0.734826463285 0.0816899437214
absolute error = 0.0001011
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.3934 1.337
h = 0.0001 0.004
y[1] (numeric) = -0.737402257387 0.0819996047224
y[1] (closed_form) = -0.737448505997 0.0820906057408
absolute error = 0.0001021
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.3935 1.341
h = 0.003 0.006
y[1] (numeric) = -0.740738125861 0.0815119471511
y[1] (closed_form) = -0.740785521373 0.0815999317634
absolute error = 9.994e-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.3965 1.347
h = 0.0001 0.005
y[1] (numeric) = -0.746184679469 0.0831429638475
y[1] (closed_form) = -0.7462405852 0.0832423805829
absolute error = 0.0001141
relative error = 0.01519 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) 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.750423943068 0.0825026725566
y[1] (closed_form) = -0.750473095429 0.0825956567785
absolute error = 0.0001052
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.3967 1.355
h = 0.001 0.001
y[1] (numeric) = -0.752985789435 0.0821405018845
y[1] (closed_form) = -0.75303166688 0.0822351340585
absolute error = 0.0001052
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.3977 1.356
h = 0.001 0.003
y[1] (numeric) = -0.753987061411 0.0828416006771
y[1] (closed_form) = -0.75403105863 0.0829364918187
absolute error = 0.0001046
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.3987 1.359
h = 0.0001 0.004
y[1] (numeric) = -0.756691692251 0.0832480525839
y[1] (closed_form) = -0.756739505148 0.0833422637403
absolute error = 0.0001056
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.3988 1.363
h = 0.003 0.006
y[1] (numeric) = -0.760134409938 0.0827345688688
y[1] (closed_form) = -0.760183405567 0.082825683377
absolute error = 0.0001035
relative error = 0.01353 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) 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.765762517909 0.0844024124976
y[1] (closed_form) = -0.765820237354 0.084505283395
absolute error = 0.000118
relative error = 0.01531 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) 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.770137165668 0.0837290188533
y[1] (closed_form) = -0.770187958292 0.0838252714264
absolute error = 0.0001088
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.402 1.377
h = 0.001 0.001
y[1] (numeric) = -0.772780887724 0.0833477631914
y[1] (closed_form) = -0.772828313621 0.0834457032958
absolute error = 0.0001088
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.403 1.378
h = 0.001 0.003
y[1] (numeric) = -0.773816559925 0.08406868477
y[1] (closed_form) = -0.773862053986 0.0841668878447
absolute error = 0.0001082
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.404 1.381
h = 0.0001 0.004
y[1] (numeric) = -0.776609831929 0.0844805340747
y[1] (closed_form) = -0.776659246651 0.0845780448677
absolute error = 0.0001093
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.4041 1.385
h = 0.003 0.006
y[1] (numeric) = -0.780162347036 0.0839406916172
y[1] (closed_form) = -0.7802129818 0.0840350233798
absolute error = 0.0001071
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.4071 1.391
h = 0.0001 0.005
y[1] (numeric) = -0.785976892477 0.0856466568097
y[1] (closed_form) = -0.786036469109 0.0857530798165
absolute error = 0.000122
relative error = 0.01542 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) 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.790490664914 0.0849394830156
y[1] (closed_form) = -0.790543137231 0.0850390955504
absolute error = 0.0001126
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.4073 1.399
h = 0.001 0.001
y[1] (numeric) = -0.793218525037 0.0845387586747
y[1] (closed_form) = -0.793267535938 0.0846400989761
absolute error = 0.0001126
relative error = 0.01411 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) 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.794289501695 0.0852801007296
y[1] (closed_form) = -0.794336527628 0.0853817078434
absolute error = 0.000112
relative error = 0.01401 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) 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.800221308935 0.0870222354074
y[1] (closed_form) = -0.800290308864 0.0871318610859
absolute error = 0.0001295
relative error = 0.01609 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) 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.804833883185 0.0862950517278
y[1] (closed_form) = -0.804895659347 0.0863977263935
absolute error = 0.0001198
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.4115 1.414
h = 0.001 0.001
y[1] (numeric) = -0.807621470462 0.0858829023476
y[1] (closed_form) = -0.807679717326 0.085987330369
absolute error = 0.0001196
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.4125 1.415
h = 0.001 0.003
y[1] (numeric) = -0.808716736208 0.0866395668036
y[1] (closed_form) = -0.808772960561 0.0867442627972
absolute error = 0.0001188
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.4135 1.418
h = 0.0001 0.004
y[1] (numeric) = -0.811664963672 0.0870635757002
y[1] (closed_form) = -0.811725293296 0.0871675619502
absolute error = 0.0001202
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.4136 1.422
h = 0.003 0.006
y[1] (numeric) = -0.815410432659 0.0864809721203
y[1] (closed_form) = -0.815472050977 0.086581636311
absolute error = 0.000118
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.4166 1.428
h = 0.0001 0.005
y[1] (numeric) = -0.821550079374 0.0882593751685
y[1] (closed_form) = -0.821621008918 0.0883727263879
absolute error = 0.0001337
relative error = 0.01618 %
Correct digits = 4
memory used=598.1MB, alloc=52.3MB, time=6.97
NO POLE (given) for Equation 1
NO POLE (ratio test) 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.826308365138 0.0874973686599
y[1] (closed_form) = -0.826371886565 0.0876035655052
absolute error = 0.0001237
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
x[1] = 0.4168 1.436
h = 0.001 0.001
y[1] (numeric) = -0.829184073271 0.0870651659843
y[1] (closed_form) = -0.82924396565 0.0871731574728
absolute error = 0.0001235
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.4178 1.437
h = 0.001 0.003
y[1] (numeric) = -0.830316206001 0.0878433344328
y[1] (closed_form) = -0.830374020083 0.0879515974034
absolute error = 0.0001227
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.4188 1.44
h = 0.0001 0.004
y[1] (numeric) = -0.833359688391 0.0882736487786
y[1] (closed_form) = -0.833421721287 0.0883811903785
absolute error = 0.0001242
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.4189 1.444
h = 0.003 0.006
y[1] (numeric) = -0.837223338264 0.0876633392941
y[1] (closed_form) = -0.837286701426 0.0877674704755
absolute error = 0.0001219
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.4219 1.45
h = 0.0001 0.005
y[1] (numeric) = -0.843563188029 0.0894838003946
y[1] (closed_form) = -0.843636092597 0.0896009835227
absolute error = 0.000138
relative error = 0.01627 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) 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.848471234414 0.0886862978274
y[1] (closed_form) = -0.848536542234 0.088796116385
absolute error = 0.0001278
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.4221 1.458
h = 0.001 0.001
y[1] (numeric) = -0.851437511889 0.0882336629849
y[1] (closed_form) = -0.851499087815 0.0883453181517
absolute error = 0.0001275
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
x[1] = 0.4231 1.459
h = 0.001 0.003
y[1] (numeric) = -0.852607478473 0.0890339948072
y[1] (closed_form) = -0.852666918686 0.0891459247802
absolute error = 0.0001267
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.4241 1.462
h = 0.0001 0.004
y[1] (numeric) = -0.855748808553 0.0894709713363
y[1] (closed_form) = -0.855812584463 0.0895821685599
absolute error = 0.0001282
relative error = 0.0149 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) 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.859733926053 0.0888324286704
y[1] (closed_form) = -0.859799075456 0.0889401247769
absolute error = 0.0001259
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.4272 1.472
h = 0.0001 0.005
y[1] (numeric) = -0.866279374921 0.0906964923185
y[1] (closed_form) = -0.866354300688 0.0908176170078
absolute error = 0.0001424
relative error = 0.01635 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) 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.871341351506 0.0898628217932
y[1] (closed_form) = -0.87140848752 0.0899763646859
absolute error = 0.0001319
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.4274 1.48
h = 0.001 0.001
y[1] (numeric) = -0.874400719467 0.0893893775226
y[1] (closed_form) = -0.874464017562 0.0895047996779
absolute error = 0.0001316
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.4284 1.481
h = 0.0001 0.004
y[1] (numeric) = -0.875609511318 0.0902125560922
y[1] (closed_form) = -0.875670614609 0.0903282561813
absolute error = 0.0001308
relative error = 0.01486 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) 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.87969642909 0.0895503369755
y[1] (closed_form) = -0.879764059873 0.0896599066194
absolute error = 0.0001288
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.4315 1.491
h = 0.0001 0.005
y[1] (numeric) = -0.886423830371 0.0914506846704
y[1] (closed_form) = -0.886501448339 0.0915740138474
absolute error = 0.0001457
relative error = 0.01635 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) 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.89162129647 0.0905834417436
y[1] (closed_form) = -0.891690952274 0.0906989987328
absolute error = 0.0001349
relative error = 0.01505 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) 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.894762615415 0.090090633589
y[1] (closed_form) = -0.89482833994 0.0902081084279
absolute error = 0.0001346
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.4327 1.5
h = 0.001 0.003
y[1] (numeric) = -0.896005923507 0.0909335649233
y[1] (closed_form) = -0.896069401026 0.091051320955
absolute error = 0.0001338
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.4337 1.503
h = 0.0001 0.004
y[1] (numeric) = -0.899336568137 0.0913827271153
y[1] (closed_form) = -0.899404607919 0.0914997284547
absolute error = 0.0001353
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.4338 1.507
h = 0.003 0.006
y[1] (numeric) = -0.903556441382 0.0906887073415
y[1] (closed_form) = -0.903625938524 0.0908020318084
absolute error = 0.0001329
relative error = 0.01464 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) 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.910499899301 0.0926356566281
y[1] (closed_form) = -0.910579627868 0.0927631398842
absolute error = 0.0001504
relative error = 0.01643 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) 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.915859377904 0.0917309472588
y[1] (closed_form) = -0.915930942824 0.0918504275377
absolute error = 0.0001393
relative error = 0.01513 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) 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.91909867417 0.0912166007425
y[1] (closed_form) = -0.919166195641 0.0913380428647
absolute error = 0.000139
relative error = 0.01504 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) 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.920382728462 0.0920837042133
y[1] (closed_form) = -0.920447940604 0.0922054302836
absolute error = 0.0001381
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.439 1.525
h = 0.0001 0.004
y[1] (numeric) = -0.923819053137 0.0925406483367
y[1] (closed_form) = -0.923888954482 0.0926616091013
absolute error = 0.0001397
relative error = 0.01505 %
Correct digits = 4
memory used=642.2MB, alloc=52.3MB, time=7.48
NO POLE (given) for Equation 1
NO POLE (ratio test) 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.928170338148 0.0918168535904
y[1] (closed_form) = -0.928241745074 0.0919340397508
absolute error = 0.0001372
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.4421 1.535
h = 0.0001 0.005
y[1] (numeric) = -0.935335682482 0.0938121596455
y[1] (closed_form) = -0.935417570111 0.0939439165253
absolute error = 0.0001551
relative error = 0.0165 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) 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.940861705752 0.0928693165517
y[1] (closed_form) = -0.940935223603 0.0929928320478
absolute error = 0.0001437
relative error = 0.0152 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) 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.944201719164 0.0923330596377
y[1] (closed_form) = -0.944271077961 0.0924585816811
absolute error = 0.0001434
relative error = 0.01512 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) 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.945527584807 0.0932250909581
y[1] (closed_form) = -0.945594570151 0.0933508994776
absolute error = 0.0001425
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.4443 1.547
h = 0.0001 0.004
y[1] (numeric) = -0.949072475085 0.0936902686389
y[1] (closed_form) = -0.949144280267 0.0938153015579
absolute error = 0.0001442
relative error = 0.01512 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) 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.95355884985 0.0929361784002
y[1] (closed_form) = -0.953632210694 0.093057336417
absolute error = 0.0001416
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.4474 1.557
h = 0.0001 0.005
y[1] (numeric) = -0.960952069015 0.0949816754591
y[1] (closed_form) = -0.961036164972 0.0951178291527
absolute error = 0.00016
relative error = 0.01657 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) 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.966649302371 0.0940000344149
y[1] (closed_form) = -0.966724817676 0.0941277004832
absolute error = 0.0001483
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.4476 1.565
h = 0.001 0.001
y[1] (numeric) = -0.970092853114 0.0934414978093
y[1] (closed_form) = -0.970164090231 0.0935712158465
absolute error = 0.000148
relative error = 0.01518 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) 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.971461622093 0.09435923956
y[1] (closed_form) = -0.971530419783 0.0944892463619
absolute error = 0.0001471
relative error = 0.01507 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) 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.975118044033 0.0948331294665
y[1] (closed_form) = -0.975191795988 0.0949623507131
absolute error = 0.0001488
relative error = 0.01519 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) 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.979743294459 0.094048226236
y[1] (closed_form) = -0.979818654077 0.0941734696544
absolute error = 0.0001462
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.4527 1.579
h = 0.0001 0.005
y[1] (numeric) = -0.987370539444 0.0961458302287
y[1] (closed_form) = -0.987456893806 0.0962865076704
absolute error = 0.0001651
relative error = 0.01664 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) 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.993243785078 0.0951247306038
y[1] (closed_form) = -0.993321343071 0.0952566661203
absolute error = 0.000153
relative error = 0.01534 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
NO REAL POLE (three term test) for Equation 1
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.4529 1.587
h = 0.001 0.001
y[1] (numeric) = -0.996793775812 0.0945435481061
y[1] (closed_form) = -0.99686693286 0.0946775817373
absolute error = 0.0001527
relative error = 0.01525 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) 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.99820656756 0.0954878105391
y[1] (closed_form) = -0.998277217311 0.0956221349712
absolute error = 0.0001518
relative error = 0.01513 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) 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) = -1.00294823049 0.0946771014191
y[1] (closed_form) = -1.0030264008 0.0948045102406
absolute error = 0.0001495
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.457 1.598
h = 0.0001 0.005
y[1] (numeric) = -1.01078262306 0.09681826541
y[1] (closed_form) = -1.01087202128 0.0969614933958
absolute error = 0.0001688
relative error = 0.01663 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) 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) = -1.01681084608 0.0957604981943
y[1] (closed_form) = -1.01689125513 0.0958947613833
absolute error = 0.0001565
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.4572 1.606
h = 0.001 0.001
y[1] (numeric) = -1.02045457012 0.0951582157196
y[1] (closed_form) = -1.02053047015 0.0952946188514
absolute error = 0.0001561
relative error = 0.01523 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) 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) = -1.02190650261 0.0961254337702
y[1] (closed_form) = -1.02197983539 0.0962621300835
absolute error = 0.0001551
relative error = 0.01511 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) 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) = -1.02577875604 0.0966154900083
y[1] (closed_form) = -1.02585730354 0.0967513815121
absolute error = 0.000157
relative error = 0.01523 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) 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) = -1.03067249812 0.0957701199215
y[1] (closed_form) = -1.03075275406 0.0959018341897
absolute error = 0.0001542
relative error = 0.0149 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) 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) = -1.03875283381 0.0979671047678
y[1] (closed_form) = -1.03884458743 0.098115102396
absolute error = 0.0001741
relative error = 0.01669 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) 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) = -1.04496637356 0.096868600046
y[1] (closed_form) = -1.04504891291 0.0970073630249
absolute error = 0.0001615
relative error = 0.01538 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) 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) = -1.04872216151 0.0962429627958
y[1] (closed_form) = -1.04880006208 0.096383913273
absolute error = 0.000161
relative error = 0.01529 %
Correct digits = 4
memory used=686.1MB, alloc=52.3MB, time=7.99
NO POLE (given) for Equation 1
NO POLE (ratio test) 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) = -1.05022028545 0.0972382715896
y[1] (closed_form) = -1.05029554724 0.0973795168027
absolute error = 0.00016
relative error = 0.01517 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) 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) = -1.05421302559 0.0977385290784
y[1] (closed_form) = -1.05429364792 0.0978789605776
absolute error = 0.0001619
relative error = 0.01529 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) 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) = -1.05925708966 0.0968608367662
y[1] (closed_form) = -1.05933947824 0.0969969802099
absolute error = 0.0001591
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.4676 1.642
h = 0.0001 0.005
y[1] (numeric) = -1.06759000811 0.0991158054146
y[1] (closed_form) = -1.06768416961 0.0992687108959
absolute error = 0.0001796
relative error = 0.01675 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) 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) = -1.07399407833 0.0979759143806
y[1] (closed_form) = -1.07407879533 0.0981193066262
absolute error = 0.0001665
relative error = 0.01544 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) 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) = -1.07786508101 0.0973265660745
y[1] (closed_form) = -1.07794502556 0.0974721941157
absolute error = 0.0001661
relative error = 0.01535 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) 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) = -1.07941059824 0.098350859339
y[1] (closed_form) = -1.07948783043 0.0984967833786
absolute error = 0.0001651
relative error = 0.01523 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) 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) = -1.08352712184 0.0988619097705
y[1] (closed_form) = -1.08360986461 0.0990070116233
absolute error = 0.000167
relative error = 0.01535 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) 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) = -1.08872573789 0.0979513925029
y[1] (closed_form) = -1.08881030685 0.0980920926024
absolute error = 0.0001642
relative error = 0.01502 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) 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) = -1.09731805732 0.100266600628
y[1] (closed_form) = -1.09741468002 0.100424556327
absolute error = 0.0001852
relative error = 0.0168 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) 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) = -1.10391802295 0.099084680465
y[1] (closed_form) = -1.1040049657 0.0992328353585
absolute error = 0.0001718
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.4731 1.672
h = 0.001 0.001
y[1] (numeric) = -1.10790748237 0.0984112694616
y[1] (closed_form) = -1.10798951498 0.0985617091947
absolute error = 0.0001714
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.4741 1.673
h = 0.001 0.003
y[1] (numeric) = -1.10950162467 0.0994654719327
y[1] (closed_form) = -1.10958086924 0.0996162086192
absolute error = 0.0001703
relative error = 0.01529 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) 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) = -1.11374531937 0.0999879392265
y[1] (closed_form) = -1.11383022882 0.100137845712
absolute error = 0.0001723
relative error = 0.01541 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) 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) = -1.11910283979 0.0990440997625
y[1] (closed_form) = -1.11918963764 0.0991894878513
absolute error = 0.0001693
relative error = 0.01507 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) 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) = -1.1279615614 0.101421898885
y[1] (closed_form) = -1.12806069948 0.101585051434
absolute error = 0.0001909
relative error = 0.01686 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) 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) = -1.13476294256 0.100197313495
y[1] (closed_form) = -1.13485215988 0.100350368428
absolute error = 0.0001772
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.4784 1.694
h = 0.001 0.001
y[1] (numeric) = -1.13887419428 0.0994994932604
y[1] (closed_form) = -1.13895835964 0.0996548828278
absolute error = 0.0001767
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.4794 1.695
h = 0.0001 0.004
y[1] (numeric) = -1.14051822403 0.100584561614
y[1] (closed_form) = -1.14059952355 0.100740248767
absolute error = 0.0001756
relative error = 0.01534 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) 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) = -1.14600896372 0.0996128485998
y[1] (closed_form) = -1.14609894216 0.0997607453796
absolute error = 0.0001731
relative error = 0.01505 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) 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) = -1.15510353034 0.102043192198
y[1] (closed_form) = -1.15520610654 0.102209300516
absolute error = 0.0001952
relative error = 0.01683 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) 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) = -1.1620823067 0.100778886624
y[1] (closed_form) = -1.16217474682 0.100934637197
absolute error = 0.0001811
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.4827 1.713
h = 0.001 0.001
y[1] (numeric) = -1.16630084114 0.100058275858
y[1] (closed_form) = -1.16638810445 0.100216406292
absolute error = 0.0001806
relative error = 0.01543 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) 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) = -1.16798923092 0.101170088404
y[1] (closed_form) = -1.16807355964 0.101328517657
absolute error = 0.0001795
relative error = 0.01531 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) 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) = -1.1724790535 0.101713961265
y[1] (closed_form) = -1.17256934598 0.10187154476
absolute error = 0.0001816
relative error = 0.01543 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) 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) = -1.17814386421 0.100704793708
y[1] (closed_form) = -1.1782361655 0.100857632875
absolute error = 0.0001785
relative error = 0.0151 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) 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) = -1.18751839377 0.103202281417
y[1] (closed_form) = -1.18762359029 0.10337387052
absolute error = 0.0002013
relative error = 0.01688 %
Correct digits = 4
memory used=730.1MB, alloc=52.3MB, time=8.50
NO POLE (given) for Equation 1
NO POLE (ratio test) 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) = -1.19470927695 0.101894077235
y[1] (closed_form) = -1.19480408624 0.102054993946
absolute error = 0.0001868
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.488 1.735
h = 0.001 0.001
y[1] (numeric) = -1.19905606384 0.101148385248
y[1] (closed_form) = -1.19914554654 0.101311733074
absolute error = 0.0001863
relative error = 0.01548 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) 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) = -1.20079678629 0.102292916217
y[1] (closed_form) = -1.20088325243 0.102456562874
absolute error = 0.0001851
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.49 1.739
h = 0.0001 0.004
y[1] (numeric) = -1.20542400235 0.10285013549
y[1] (closed_form) = -1.20551659949 0.103012929793
absolute error = 0.0001873
relative error = 0.01548 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) 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) = -1.21126086825 0.10180620214
y[1] (closed_form) = -1.21135554313 0.101964126629
absolute error = 0.0001841
relative error = 0.01515 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) 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) = -1.22092291163 0.104373475519
y[1] (closed_form) = -1.22103078514 0.104550704888
absolute error = 0.0002075
relative error = 0.01693 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) 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) = -1.22833188854 0.103020758257
y[1] (closed_form) = -1.22842911804 0.10318699057
absolute error = 0.0001926
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.4933 1.757
h = 0.001 0.001
y[1] (numeric) = -1.23281054489 0.102249654738
y[1] (closed_form) = -1.23290229356 0.102418370182
absolute error = 0.000192
relative error = 0.01552 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) 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) = -1.23460495423 0.103427957191
y[1] (closed_form) = -1.23469360207 0.103596971105
absolute error = 0.0001909
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.4953 1.761
h = 0.0001 0.004
y[1] (numeric) = -1.23937332446 0.103999281638
y[1] (closed_form) = -1.23946827527 0.104167437179
absolute error = 0.0001931
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.4954 1.765
h = 0.003 0.006
y[1] (numeric) = -1.24538710165 0.102920110868
y[1] (closed_form) = -1.24548420164 0.103083267886
absolute error = 0.0001899
relative error = 0.01519 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) 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) = -1.25534441047 0.105559920353
y[1] (closed_form) = -1.25545501851 0.105742954199
absolute error = 0.0002139
relative error = 0.01697 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
NO REAL POLE (three term test) for Equation 1
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.4985 1.776
h = 0.0001 0.003
y[1] (numeric) = -1.26297763949 0.10416208544
y[1] (closed_form) = -1.26307734099 0.104333787265
absolute error = 0.0001985
relative error = 0.01567 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) 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) = -1.26759188566 0.103365247219
y[1] (closed_form) = -1.2676859475 0.103539484957
absolute error = 0.000198
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.4996 1.78
h = 0.001 0.003
y[1] (numeric) = -1.26944136947 0.104578410022
y[1] (closed_form) = -1.26953224384 0.104752945475
absolute error = 0.0001968
relative error = 0.01545 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) 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) = -1.274354757 0.105164636848
y[1] (closed_form) = -1.27445211118 0.105338308518
absolute error = 0.0001991
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.5007 1.787
h = 0.003 0.006
y[1] (numeric) = -1.28055044037 0.10404976579
y[1] (closed_form) = -1.28065001776 0.104218306934
absolute error = 0.0001958
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.5037 1.793
h = 0.0001 0.005
y[1] (numeric) = -1.29081097189 0.106764974367
y[1] (closed_form) = -1.29092437287 0.106953981763
absolute error = 0.0002204
relative error = 0.01702 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) 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) = -1.29867478733 0.105321428087
y[1] (closed_form) = -1.29877701336 0.105498757901
absolute error = 0.0002047
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.5039 1.801
h = 0.001 0.001
y[1] (numeric) = -1.30342844972 0.104498539746
y[1] (closed_form) = -1.30352487258 0.104678459019
absolute error = 0.0002041
relative error = 0.01561 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) 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) = -1.30533442964 0.105747688644
y[1] (closed_form) = -1.30542757595 0.105927904466
absolute error = 0.0002029
relative error = 0.01549 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) 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) = -1.31168262842 0.104602989856
y[1] (closed_form) = -1.3117858014 0.104774442154
absolute error = 0.0002001
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.508 1.812
h = 0.0001 0.005
y[1] (numeric) = -1.32221164327 0.107381735898
y[1] (closed_form) = -1.32232892371 0.10757417231
absolute error = 0.0002254
relative error = 0.01699 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) 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) = -1.33027859592 0.105895523609
y[1] (closed_form) = -1.3303844613 0.10607597957
absolute error = 0.0002092
relative error = 0.01568 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) 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) = -1.33515509495 0.105048241222
y[1] (closed_form) = -1.33525501321 0.105231335372
absolute error = 0.0002086
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.5092 1.821
h = 0.001 0.003
y[1] (numeric) = -1.33711131745 0.10632859952
y[1] (closed_form) = -1.33720788047 0.106511989971
absolute error = 0.0002073
relative error = 0.01545 %
Correct digits = 4
NO POLE (given) for Equation 1
NO 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=774.0MB, alloc=52.3MB, time=9.00
x[1] = 0.5102 1.824
h = 0.0001 0.004
y[1] (numeric) = -1.3423053935 0.106942974595
y[1] (closed_form) = -1.34240877874 0.107125490695
absolute error = 0.0002098
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.5103 1.828
h = 0.003 0.006
y[1] (numeric) = -1.34885290874 0.105758160976
y[1] (closed_form) = -1.34895866045 0.105935290928
absolute error = 0.0002063
relative error = 0.01525 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) 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) = -1.35970055467 0.108617845324
y[1] (closed_form) = -1.3598207412 0.108816582561
absolute error = 0.0002323
relative error = 0.01703 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) 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) = -1.36801035766 0.107084768655
y[1] (closed_form) = -1.36811884939 0.107271159421
absolute error = 0.0002157
relative error = 0.01572 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) 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) = -1.3730336812 0.106210823367
y[1] (closed_form) = -1.3731360532 0.106399907355
absolute error = 0.000215
relative error = 0.01561 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) 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) = -1.3750491529 0.10752934657
y[1] (closed_form) = -1.37514807592 0.1077187249
absolute error = 0.0002137
relative error = 0.01549 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) 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) = -1.3803998976 0.10816107958
y[1] (closed_form) = -1.38050583429 0.108349580033
absolute error = 0.0002162
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.5156 1.85
h = 0.003 0.006
y[1] (numeric) = -1.38714440255 0.106939231802
y[1] (closed_form) = -1.38725278757 0.107122204215
absolute error = 0.0002127
relative error = 0.01528 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) 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) = -1.39831925427 0.109883058197
y[1] (closed_form) = -1.39844240785 0.110088279963
absolute error = 0.0002393
relative error = 0.01706 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) 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) = -1.40687877104 0.10830255793
y[1] (closed_form) = -1.40698994389 0.108495055724
absolute error = 0.0002223
relative error = 0.01575 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) 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) = -1.41205306444 0.10740165875
y[1] (closed_form) = -1.4121579399 0.107596905564
absolute error = 0.0002216
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.5198 1.865
h = 0.001 0.003
y[1] (numeric) = -1.41412930914 0.108759583922
y[1] (closed_form) = -1.41423063923 0.108955122645
absolute error = 0.0002202
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.5208 1.868
h = 0.0001 0.004
y[1] (numeric) = -1.41964100599 0.109409632998
y[1] (closed_form) = -1.4197495466 0.109604291076
absolute error = 0.0002229
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.5209 1.872
h = 0.003 0.006
y[1] (numeric) = -1.4265880664 0.108150328003
y[1] (closed_form) = -1.42669914013 0.108339312548
absolute error = 0.0002192
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.5239 1.878
h = 0.0001 0.005
y[1] (numeric) = -1.43809892404 0.111181628062
y[1] (closed_form) = -1.43822510652 0.11139352345
absolute error = 0.0002466
relative error = 0.0171 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) 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) = -1.44691521231 0.109553159953
y[1] (closed_form) = -1.44702912181 0.109751942054
absolute error = 0.0002291
relative error = 0.01579 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) 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) = -1.45224473802 0.108625026252
y[1] (closed_form) = -1.45235216727 0.108826613938
absolute error = 0.0002284
relative error = 0.01568 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) 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) = -1.45438331652 0.1100236318
y[1] (closed_form) = -1.45448710133 0.110225508467
absolute error = 0.000227
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.5261 1.89
h = 0.0001 0.004
y[1] (numeric) = -1.4600603644 0.110693000925
y[1] (closed_form) = -1.46017156208 0.110893994977
absolute error = 0.0002297
relative error = 0.01569 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) 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) = -1.46721570334 0.109395828633
y[1] (closed_form) = -1.46732952194 0.109590999979
absolute error = 0.0002259
relative error = 0.01535 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) 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) = -1.4790715978 0.112518066168
y[1] (closed_form) = -1.47920087187 0.112736829805
absolute error = 0.0002541
relative error = 0.01713 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) 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) = -1.48815191458 0.110841102163
y[1] (closed_form) = -1.48826861703 0.111046351049
absolute error = 0.0002361
relative error = 0.01582 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) 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) = -1.49364105517 0.109885464443
y[1] (closed_form) = -1.49375108916 0.110093576243
absolute error = 0.0002354
relative error = 0.01572 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) 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) = -1.49584356611 0.111326071365
y[1] (closed_form) = -1.49594985386 0.111534468696
absolute error = 0.0002339
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.5305 1.913
h = 0.003 0.006
y[1] (numeric) = -1.50317353852 0.109997298698
y[1] (closed_form) = -1.50329141765 0.110195851767
absolute error = 0.0002309
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.5335 1.919
h = 0.0001 0.005
y[1] (numeric) = -1.51533498305 0.113196429253
y[1] (closed_form) = -1.51546862988 0.113419173348
absolute error = 0.0002598
relative error = 0.01709 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) 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) = -1.52464794807 0.111474045499
y[1] (closed_form) = -1.52476875599 0.111682922947
absolute error = 0.0002413
relative error = 0.01578 %
Correct digits = 4
NO POLE (given) for Equation 1
NO 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=817.8MB, alloc=52.3MB, time=9.51
x[1] = 0.5337 1.927
h = 0.001 0.001
y[1] (numeric) = -1.5302777515 0.110492551857
y[1] (closed_form) = -1.53039172525 0.110704344506
absolute error = 0.0002405
relative error = 0.01567 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) 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) = -1.53253712555 0.111969615245
y[1] (closed_form) = -1.53264726312 0.112181691277
absolute error = 0.000239
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.5357 1.931
h = 0.0001 0.004
y[1] (numeric) = -1.5385342285 0.112675671808
y[1] (closed_form) = -1.53865217059 0.112886861265
absolute error = 0.0002419
relative error = 0.01568 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) 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) = -1.54609245112 0.111304345002
y[1] (closed_form) = -1.54621318396 0.111509422954
absolute error = 0.000238
relative error = 0.01535 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) 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) = -1.5586164152 0.114601111261
y[1] (closed_form) = -1.55875327513 0.114831100228
absolute error = 0.0002676
relative error = 0.01712 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) 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) = -1.56820745483 0.112829204249
y[1] (closed_form) = -1.56833116479 0.113044901648
absolute error = 0.0002487
relative error = 0.01581 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) 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) = -1.57400535563 0.11181968181
y[1] (closed_form) = -1.57412203288 0.11203835322
absolute error = 0.0002479
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.54 1.95
h = 0.001 0.003
y[1] (numeric) = -1.57633175731 0.113341302261
y[1] (closed_form) = -1.57644449128 0.113560252598
absolute error = 0.0002463
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.541 1.953
h = 0.0001 0.004
y[1] (numeric) = -1.5825074721 0.114069762386
y[1] (closed_form) = -1.58262822948 0.114287826645
absolute error = 0.0002493
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.5411 1.957
h = 0.003 0.006
y[1] (numeric) = -1.59029124674 0.112659401257
y[1] (closed_form) = -1.59041489177 0.112871193797
absolute error = 0.0002452
relative error = 0.01538 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
NO REAL POLE (three term test) for Equation 1
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.5441 1.963
h = 0.0001 0.005
y[1] (numeric) = -1.603187454 0.116057667351
y[1] (closed_form) = -1.60332759231 0.116295112474
absolute error = 0.0002757
relative error = 0.01715 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) 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) = -1.61306442463 0.114235760035
y[1] (closed_form) = -1.61319109517 0.114458475502
absolute error = 0.0002562
relative error = 0.01584 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) 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) = -1.61903516659 0.113197974181
y[1] (closed_form) = -1.61915460011 0.113423723224
absolute error = 0.0002554
relative error = 0.01573 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) 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) = -1.62143030788 0.11476560125
y[1] (closed_form) = -1.62154568805 0.114991624168
absolute error = 0.0002538
relative error = 0.01561 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) 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) = -1.62778950659 0.115517660867
y[1] (closed_form) = -1.62791313513 0.115742799183
absolute error = 0.0002568
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.5464 1.979
h = 0.003 0.006
y[1] (numeric) = -1.63580520291 0.114067913299
y[1] (closed_form) = -1.63593181939 0.114286615667
absolute error = 0.0002527
relative error = 0.01541 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) 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) = -1.64908362968 0.117571693522
y[1] (closed_form) = -1.64922711252 0.117816812213
absolute error = 0.000284
relative error = 0.01718 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) 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) = -1.65925460772 0.115699330267
y[1] (closed_form) = -1.65938429809 0.115929267676
absolute error = 0.000264
relative error = 0.01587 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) 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) = -1.66540306717 0.114633060809
y[1] (closed_form) = -1.6655253103 0.114866092108
absolute error = 0.0002631
relative error = 0.01576 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) 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) = -1.6678687011 0.116248191786
y[1] (closed_form) = -1.66798677779 0.116481491283
absolute error = 0.0002615
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.5516 1.997
h = 0.0001 0.004
y[1] (numeric) = -1.67441638559 0.117025101462
y[1] (closed_form) = -1.67454294185 0.117257518865
absolute error = 0.0002646
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.5517 2.001
h = 0.003 0.006
y[1] (numeric) = -1.68267055131 0.115535633663
y[1] (closed_form) = -1.6828001993 0.115761446783
absolute error = 0.0002604
relative error = 0.01544 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) 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) = -1.69634143264 0.119149097518
y[1] (closed_form) = -1.69648832703 0.119402113488
absolute error = 0.0002926
relative error = 0.0172 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) 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) = -1.70681472011 0.117225845636
y[1] (closed_form) = -1.70694749034 0.11746321477
absolute error = 0.000272
relative error = 0.0159 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) 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) = -1.71314590938 0.116130887775
y[1] (closed_form) = -1.71327101604 0.116371411856
absolute error = 0.0002711
relative error = 0.01579 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) 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) = -1.7156838309 0.117795069119
y[1] (closed_form) = -1.71580465494 0.118035855066
absolute error = 0.0002694
relative error = 0.01566 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) 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) = -1.72413794483 0.116272497241
y[1] (closed_form) = -1.72427217344 0.116502241029
absolute error = 0.0002661
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
memory used=861.7MB, alloc=52.3MB, time=10.02
x[1] = 0.559 2.026
h = 0.0001 0.005
y[1] (numeric) = -1.73815641303 0.119978988526
y[1] (closed_form) = -1.73830823056 0.120236626264
absolute error = 0.000299
relative error = 0.01716 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) 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) = -1.74889613026 0.118007865626
y[1] (closed_form) = -1.74903352666 0.118249448409
absolute error = 0.0002779
relative error = 0.01585 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) 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) = -1.75538838261 0.116885801717
y[1] (closed_form) = -1.75551792499 0.117130595271
absolute error = 0.000277
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.5602 2.035
h = 0.001 0.003
y[1] (numeric) = -1.7579906072 0.118592589992
y[1] (closed_form) = -1.75811576431 0.118837640849
absolute error = 0.0002752
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.5612 2.038
h = 0.0001 0.004
y[1] (numeric) = -1.76490312401 0.119416871619
y[1] (closed_form) = -1.76503720805 0.119661045049
absolute error = 0.0002786
relative error = 0.01575 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) 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) = -1.77361860016 0.117849640011
y[1] (closed_form) = -1.77375597663 0.118086883339
absolute error = 0.0002741
relative error = 0.01542 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) 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) = -1.78804933171 0.121673875004
y[1] (closed_form) = -1.78820469059 0.121939842808
absolute error = 0.000308
relative error = 0.01719 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) 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) = -1.79910742269 0.119651019435
y[1] (closed_form) = -1.79924801523 0.119900439843
absolute error = 0.0002863
relative error = 0.01588 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) 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) = -1.80579210354 0.118499866793
y[1] (closed_form) = -1.80592461401 0.118752560466
absolute error = 0.0002853
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.5655 2.057
h = 0.001 0.003
y[1] (numeric) = -1.80847009021 0.120258696387
y[1] (closed_form) = -1.80859809323 0.120511639768
absolute error = 0.0002835
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.5665 2.06
h = 0.0001 0.004
y[1] (numeric) = -1.81558616452 0.121111660557
y[1] (closed_form) = -1.81572334437 0.1213637322
absolute error = 0.000287
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.5666 2.064
h = 0.003 0.006
y[1] (numeric) = -1.82455986334 0.119503781063
y[1] (closed_form) = -1.82470045 0.119748741964
absolute error = 0.0002824
relative error = 0.01545 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) 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) = -1.83941386949 0.123450399339
y[1] (closed_form) = -1.83957283926 0.123724939866
absolute error = 0.0003172
relative error = 0.01721 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) 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) = -1.85079931473 0.121375450224
y[1] (closed_form) = -1.85094316559 0.121632935827
absolute error = 0.0002949
relative error = 0.0159 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) 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) = -1.85768184517 0.120195052035
y[1] (closed_form) = -1.85781737936 0.120455874118
absolute error = 0.0002939
relative error = 0.01579 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) 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) = -1.86043751439 0.122007617831
y[1] (closed_form) = -1.8605684156 0.122268681282
absolute error = 0.000292
relative error = 0.01566 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) 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) = -1.86776268019 0.122890743789
y[1] (closed_form) = -1.86790301498 0.123150942445
absolute error = 0.0002956
relative error = 0.01579 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) 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) = -1.87700188126 0.121241963418
y[1] (closed_form) = -1.87714574119 0.121494866217
absolute error = 0.000291
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.5749 2.092
h = 0.0001 0.005
y[1] (numeric) = -1.89229045629 0.125315780768
y[1] (closed_form) = -1.8924531073 0.125599143648
absolute error = 0.0003267
relative error = 0.01723 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) 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) = -1.9040124852 0.123188406701
y[1] (closed_form) = -1.90415965728 0.123454191615
absolute error = 0.0003038
relative error = 0.01592 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) 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) = -1.91109843629 0.121978625645
y[1] (closed_form) = -1.91123705034 0.122247810963
absolute error = 0.0003028
relative error = 0.01581 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) 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) = -1.91393375394 0.123846677622
y[1] (closed_form) = -1.91406760608 0.124116095186
absolute error = 0.0003008
relative error = 0.01568 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) 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) = -1.92147369108 0.124761509629
y[1] (closed_form) = -1.9216172406 0.125030070661
absolute error = 0.0003045
relative error = 0.01581 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) 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) = -1.93098587545 0.123071600381
y[1] (closed_form) = -1.93113307249 0.123332675868
absolute error = 0.0002997
relative error = 0.01549 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) 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) = -1.94672060326 0.12727761471
y[1] (closed_form) = -1.94688700671 0.127570056733
absolute error = 0.0003365
relative error = 0.01725 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) 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) = -1.95878870057 0.125097515655
y[1] (closed_form) = -1.95893925745 0.125371840715
absolute error = 0.0003129
relative error = 0.01594 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) 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) = -1.96608379715 0.123858235093
y[1] (closed_form) = -1.96622554774 0.124136025178
absolute error = 0.0003119
relative error = 0.01583 %
Correct digits = 4
NO POLE (given) for Equation 1
NO 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=905.7MB, alloc=52.3MB, time=10.52
x[1] = 0.5814 2.123
h = 0.0001 0.004
y[1] (numeric) = -1.96900077548 0.125783579977
y[1] (closed_form) = -1.96913763172 0.126061592369
absolute error = 0.0003099
relative error = 0.0157 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) 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) = -1.97874184149 0.124059442166
y[1] (closed_form) = -1.97889420002 0.124325087439
absolute error = 0.0003062
relative error = 0.01544 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) 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) = -1.99487176418 0.128377885097
y[1] (closed_form) = -1.9950437038 0.128675693448
absolute error = 0.0003439
relative error = 0.0172 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) 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) = -2.00724490818 0.126147906299
y[1] (closed_form) = -2.00740067191 0.126427125118
absolute error = 0.0003197
relative error = 0.0159 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) 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) = -2.01472438195 0.124880569774
y[1] (closed_form) = -2.01487112079 0.125163312863
absolute error = 0.0003186
relative error = 0.01578 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) 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) = -2.01771401138 0.126855715592
y[1] (closed_form) = -2.01785573888 0.127138673388
absolute error = 0.0003165
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.5867 2.145
h = 0.0001 0.004
y[1] (numeric) = -2.02566964361 0.127831162731
y[1] (closed_form) = -2.02582157881 0.128113279758
absolute error = 0.0003204
relative error = 0.01579 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
NO REAL POLE (three term test) for Equation 1
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.5868 2.149
h = 0.003 0.006
y[1] (numeric) = -2.03570991384 0.126060735673
y[1] (closed_form) = -2.03586573317 0.126335000099
absolute error = 0.0003154
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.5898 2.155
h = 0.0001 0.005
y[1] (numeric) = -2.05230840329 0.130521034746
y[1] (closed_form) = -2.05248423323 0.130828418907
absolute error = 0.0003541
relative error = 0.01722 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) 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) = -2.06504596392 0.128237742553
y[1] (closed_form) = -2.06520523566 0.128525967377
absolute error = 0.0003293
relative error = 0.01591 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) 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) = -2.07274565786 0.126940676122
y[1] (closed_form) = -2.07289564311 0.127232491185
absolute error = 0.0003281
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.591 2.164
h = 0.001 0.003
y[1] (numeric) = -2.07582084219 0.128976608297
y[1] (closed_form) = -2.07596567689 0.129268626553
absolute error = 0.000326
relative error = 0.01567 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) 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) = -2.084008353 0.129988485994
y[1] (closed_form) = -2.08416368034 0.130279675799
absolute error = 0.00033
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.5921 2.171
h = 0.003 0.006
y[1] (numeric) = -2.09434416575 0.128176332511
y[1] (closed_form) = -2.09450351189 0.128459466329
absolute error = 0.0003249
relative error = 0.01548 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) 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) = -2.1114236746 0.132784037152
y[1] (closed_form) = -2.11160346847 0.133101275455
absolute error = 0.0003646
relative error = 0.01723 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) 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) = -2.12453590404 0.130447229222
y[1] (closed_form) = -2.12469874941 0.130744721104
absolute error = 0.0003391
relative error = 0.01593 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) 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) = -2.13246200527 0.129120380468
y[1] (closed_form) = -2.13261529509 0.129421529216
absolute error = 0.0003379
relative error = 0.01582 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) 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) = -2.13562489546 0.131219077005
y[1] (closed_form) = -2.13577289178 0.131520416506
absolute error = 0.0003357
relative error = 0.01569 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) 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) = -2.14405056251 0.132269201528
y[1] (closed_form) = -2.14420934413 0.132569726483
absolute error = 0.0003399
relative error = 0.01582 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) 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) = -2.15469022657 0.130415202783
y[1] (closed_form) = -2.15485316625 0.130707463391
absolute error = 0.0003346
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.6004 2.199
h = 0.0001 0.005
y[1] (numeric) = -2.17226352405 0.135176069027
y[1] (closed_form) = -2.17244735619 0.135503447731
absolute error = 0.0003755
relative error = 0.01725 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) 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) = -2.18576095591 0.132785582458
y[1] (closed_form) = -2.18592744117 0.133092609887
absolute error = 0.0003493
relative error = 0.01595 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) 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) = -2.19391982107 0.131428924696
y[1] (closed_form) = -2.19407647408 0.131739676256
absolute error = 0.000348
relative error = 0.01583 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) 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) = -2.19717261824 0.133592427159
y[1] (closed_form) = -2.19732383092 0.133903356064
absolute error = 0.0003457
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.6026 2.211
h = 0.0001 0.004
y[1] (numeric) = -2.20584288292 0.134682692019
y[1] (closed_form) = -2.20600518152 0.134992821949
absolute error = 0.00035
relative error = 0.01584 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) 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) = -2.21679493488 0.132786762395
y[1] (closed_form) = -2.21696153551 0.133088414535
absolute error = 0.0003446
relative error = 0.01552 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) 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) = -2.23487511409 0.137706759754
y[1] (closed_form) = -2.23506305963 0.13804457325
absolute error = 0.0003866
relative error = 0.01726 %
Correct digits = 4
NO POLE (given) for Equation 1
NO 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=949.6MB, alloc=52.3MB, time=11.03
x[1] = 0.6058 2.226
h = 0.0001 0.003
y[1] (numeric) = -2.24876857062 0.135262473415
y[1] (closed_form) = -2.24893876266 0.135579312512
absolute error = 0.0003597
relative error = 0.01596 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) 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) = -2.25716673016 0.133876007148
y[1] (closed_form) = -2.25732680539 0.134196638265
absolute error = 0.0003584
relative error = 0.01585 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) 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) = -2.26051168661 0.136106422555
y[1] (closed_form) = -2.26066617075 0.136427216597
absolute error = 0.0003561
relative error = 0.01572 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) 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) = -2.27172564712 0.134175656401
y[1] (closed_form) = -2.27189805684 0.134482621139
absolute error = 0.0003521
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.61 2.24
h = 0.0001 0.005
y[1] (numeric) = -2.29025486708 0.139231320568
y[1] (closed_form) = -2.29044903028 0.139575363512
absolute error = 0.0003951
relative error = 0.01722 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) 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) = -2.30449745837 0.136735763487
y[1] (closed_form) = -2.30467350366 0.137058285622
absolute error = 0.0003674
relative error = 0.01592 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) 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) = -2.31310660538 0.135320701686
y[1] (closed_form) = -2.31327228329 0.13564707828
absolute error = 0.000366
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.6112 2.249
h = 0.001 0.003
y[1] (numeric) = -2.31653356535 0.137609316892
y[1] (closed_form) = -2.31669351897 0.137935845018
absolute error = 0.0003636
relative error = 0.01567 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) 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) = -2.32567722567 0.138776486693
y[1] (closed_form) = -2.32584884665 0.139102245712
absolute error = 0.0003682
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.6123 2.256
h = 0.003 0.006
y[1] (numeric) = -2.33723358319 0.136798455214
y[1] (closed_form) = -2.33740978448 0.13711532351
absolute error = 0.0003626
relative error = 0.01548 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) 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) = -2.35629501328 0.14202478553
y[1] (closed_form) = -2.35649343536 0.142379832544
absolute error = 0.0004067
relative error = 0.01723 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) 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) = -2.37095456021 0.1394751855
y[1] (closed_form) = -2.3711344419 0.139808053301
absolute error = 0.0003784
relative error = 0.01593 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) 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) = -2.37981563194 0.138030310866
y[1] (closed_form) = -2.37998484652 0.138367102216
absolute error = 0.0003769
relative error = 0.01581 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) 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) = -2.38333910896 0.140389912282
y[1] (closed_form) = -2.38350244086 0.140726838791
absolute error = 0.0003744
relative error = 0.01568 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) 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) = -2.39274675995 0.141603007479
y[1] (closed_form) = -2.39292208367 0.141939185568
absolute error = 0.0003791
relative error = 0.01582 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) 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) = -2.40464123726 0.139582889899
y[1] (closed_form) = -2.40482129955 0.139909948596
absolute error = 0.0003733
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.6206 2.284
h = 0.0001 0.005
y[1] (numeric) = -2.42424894178 0.144986502294
y[1] (closed_form) = -2.42445170005 0.145352872247
absolute error = 0.0004187
relative error = 0.01724 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) 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) = -2.43933713405 0.142382867741
y[1] (closed_form) = -2.43952092082 0.142726380297
absolute error = 0.0003896
relative error = 0.01594 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) 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) = -2.44845718334 0.140908264922
y[1] (closed_form) = -2.44862999482 0.141255770676
absolute error = 0.0003881
relative error = 0.01582 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) 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) = -2.45207958271 0.143341157106
y[1] (closed_form) = -2.45224634888 0.143688780506
absolute error = 0.0003856
relative error = 0.0157 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) 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) = -2.46175833667 0.144602394172
y[1] (closed_form) = -2.46193742788 0.144949291828
absolute error = 0.0003904
relative error = 0.01583 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) 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) = -2.4740004059 0.142540248909
y[1] (closed_form) = -2.47418439922 0.142877792981
absolute error = 0.0003844
relative error = 0.01551 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) 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) = -2.49416880281 0.148128001292
y[1] (closed_form) = -2.49437597525 0.148506022055
absolute error = 0.0004311
relative error = 0.01725 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) 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) = -2.50969764811 0.145470392296
y[1] (closed_form) = -2.50988540922 0.14582485714
absolute error = 0.0004011
relative error = 0.01595 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) 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) = -2.51908391928 0.143966179296
y[1] (closed_form) = -2.51926038822 0.144324707523
absolute error = 0.0003996
relative error = 0.01584 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) 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) = -2.5228077016 0.146474740082
y[1] (closed_form) = -2.52297795826 0.146833367248
absolute error = 0.000397
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.6281 2.318
h = 0.0001 0.004
y[1] (numeric) = -2.53276485451 0.147786427081
y[1] (closed_form) = -2.53294777838 0.148144353263
absolute error = 0.000402
relative error = 0.01584 %
Correct digits = 4
NO POLE (given) for Equation 1
NO 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=993.6MB, alloc=52.3MB, time=11.54
x[1] = 0.6282 2.322
h = 0.003 0.006
y[1] (numeric) = -2.54536424507 0.145682355843
y[1] (closed_form) = -2.54555224008 0.146030688605
absolute error = 0.0003958
relative error = 0.01552 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) 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) = -2.56610811412 0.151461356084
y[1] (closed_form) = -2.56631977937 0.151851364764
absolute error = 0.0004437
relative error = 0.01726 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) 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) = -2.58208994622 0.148749887223
y[1] (closed_form) = -2.58228175143 0.149115620553
absolute error = 0.000413
relative error = 0.01597 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) 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) = -2.59174987991 0.147216217174
y[1] (closed_form) = -2.59193006717 0.147586084582
absolute error = 0.0004114
relative error = 0.01585 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
NO REAL POLE (three term test) for Equation 1
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.6324 2.337
h = 0.0001 0.004
y[1] (numeric) = -2.59557756212 0.149802899841
y[1] (closed_form) = -2.59575136567 0.150172846237
absolute error = 0.0004087
relative error = 0.01572 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) 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) = -2.6084765153 0.14766406977
y[1] (closed_form) = -2.60867104012 0.148018577126
absolute error = 0.0004044
relative error = 0.01548 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) 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) = -2.62973024728 0.153606476998
y[1] (closed_form) = -2.62994888637 0.154003714309
absolute error = 0.0004534
relative error = 0.01721 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) 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) = -2.64611148822 0.150843180775
y[1] (closed_form) = -2.64630986491 0.151215511772
absolute error = 0.0004219
relative error = 0.01592 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) 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) = -2.65601274557 0.149280921658
y[1] (closed_form) = -2.65619921742 0.149657452
absolute error = 0.0004202
relative error = 0.01579 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) 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) = -2.6599328925 0.151935593283
y[1] (closed_form) = -2.66011282918 0.152312186519
absolute error = 0.0004174
relative error = 0.01566 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) 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) = -2.67042881717 0.153344095838
y[1] (closed_form) = -2.67062208272 0.153720035705
absolute error = 0.0004227
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.6378 2.363
h = 0.003 0.006
y[1] (numeric) = -2.68371940872 0.151157896466
y[1] (closed_form) = -2.68391807209 0.151523779017
absolute error = 0.0004163
relative error = 0.01549 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) 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) = -2.70557719786 0.157305284664
y[1] (closed_form) = -2.70580048205 0.157715161648
absolute error = 0.0004667
relative error = 0.01722 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) 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) = -2.72243527507 0.154488340592
y[1] (closed_form) = -2.72263783103 0.154872551457
absolute error = 0.0004343
relative error = 0.01593 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) 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) = -2.73262458268 0.152896914854
y[1] (closed_form) = -2.73281489081 0.15328539674
absolute error = 0.0004326
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.642 2.378
h = 0.001 0.003
y[1] (numeric) = -2.73665349827 0.155634450226
y[1] (closed_form) = -2.7368370912 0.156022972652
absolute error = 0.0004297
relative error = 0.01568 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) 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) = -2.74744977923 0.157100446277
y[1] (closed_form) = -2.7476470701 0.157488346487
absolute error = 0.0004352
relative error = 0.01581 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) 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) = -2.76112700871 0.154872745551
y[1] (closed_form) = -2.76132988299 0.155250331712
absolute error = 0.0004286
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.6461 2.391
h = 0.0001 0.005
y[1] (numeric) = -2.7836047192 0.161232979337
y[1] (closed_form) = -2.78383272897 0.161655860895
absolute error = 0.0004804
relative error = 0.01723 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) 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) = -2.80095294618 0.158362670458
y[1] (closed_form) = -2.80115975265 0.158759103461
absolute error = 0.0004471
relative error = 0.01594 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) 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) = -2.81143833455 0.15674233963
y[1] (closed_form) = -2.81163254059 0.157143115753
absolute error = 0.0004454
relative error = 0.01581 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) 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) = -2.8155787042 0.159565419703
y[1] (closed_form) = -2.81576601024 0.159966212611
absolute error = 0.0004424
relative error = 0.01569 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) 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) = -2.82668338963 0.16109160003
y[1] (closed_form) = -2.82688477255 0.161491804349
absolute error = 0.000448
relative error = 0.01582 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) 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) = -2.84075804302 0.158822686229
y[1] (closed_form) = -2.84096520107 0.159212313641
absolute error = 0.0004413
relative error = 0.01551 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) 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) = -2.86387193372 0.165403913286
y[1] (closed_form) = -2.86410475012 0.165840174532
absolute error = 0.0004945
relative error = 0.01724 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) 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) = -2.88172398301 0.162480589152
y[1] (closed_form) = -2.88193511164 0.162889596143
absolute error = 0.0004603
relative error = 0.01595 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) 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) = -2.89251369878 0.160831657369
y[1] (closed_form) = -2.89271186452 0.16124507997
absolute error = 0.0004585
relative error = 0.01582 %
Correct digits = 4
NO POLE (given) for Equation 1
NO 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=1037.6MB, alloc=52.3MB, time=12.06
x[1] = 0.6526 2.422
h = 0.001 0.003
y[1] (numeric) = -2.89676826867 0.163743047513
y[1] (closed_form) = -2.89695934473 0.164156461683
absolute error = 0.0004554
relative error = 0.0157 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) 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) = -2.90818961259 0.16533221129
y[1] (closed_form) = -2.90839515455 0.165745073085
absolute error = 0.0004612
relative error = 0.01583 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) 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) = -2.92267276631 0.163022428215
y[1] (closed_form) = -2.9228842815 0.163424443985
absolute error = 0.0004543
relative error = 0.01552 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) 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) = -2.94643949973 0.169833088542
y[1] (closed_form) = -2.94667720432 0.170283115075
absolute error = 0.0005089
relative error = 0.01724 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) 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) = -2.96480941193 0.166857168663
y[1] (closed_form) = -2.96502493476 0.167279111328
absolute error = 0.0004738
relative error = 0.01595 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) 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) = -2.97591192326 0.165179984809
y[1] (closed_form) = -2.97611411063 0.165606415924
absolute error = 0.0004719
relative error = 0.01583 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) 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) = -2.98028350155 0.168182537296
y[1] (closed_form) = -2.98047840455 0.168608933242
absolute error = 0.0004688
relative error = 0.0157 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) 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) = -2.99510909843 0.165838965382
y[1] (closed_form) = -2.99532794407 0.166248154643
absolute error = 0.000464
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.661 2.454
h = 0.0001 0.005
y[1] (numeric) = -3.01945431031 0.172846048522
y[1] (closed_form) = -3.0196998261 0.173304458917
absolute error = 0.00052
relative error = 0.01719 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) 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) = -3.03828089444 0.169818844561
y[1] (closed_form) = -3.03850378526 0.170248443365
absolute error = 0.000484
relative error = 0.0159 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) 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) = -3.04965927408 0.168113789933
y[1] (closed_form) = -3.04986850133 0.168547944743
absolute error = 0.0004819
relative error = 0.01578 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) 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) = -3.05413500003 0.171195723686
y[1] (closed_form) = -3.05433677085 0.171629821449
absolute error = 0.0004787
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.6632 2.466
h = 0.0001 0.004
y[1] (numeric) = -3.06616909941 0.172905908188
y[1] (closed_form) = -3.06638608826 0.173339523316
absolute error = 0.0004849
relative error = 0.01579 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) 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) = -3.08144240828 0.170516002394
y[1] (closed_form) = -3.08166575312 0.170938251077
absolute error = 0.0004777
relative error = 0.01548 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) 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) = -3.1064726827 0.177768824333
y[1] (closed_form) = -3.10672324458 0.178241745392
absolute error = 0.0005352
relative error = 0.0172 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) 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) = -3.1258442746 0.174689825772
y[1] (closed_form) = -3.12607169913 0.175133059453
absolute error = 0.0004982
relative error = 0.01591 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) 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) = -3.13755182137 0.172957187686
y[1] (closed_form) = -3.13776519024 0.173405050891
absolute error = 0.0004961
relative error = 0.01579 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) 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) = -3.14214998664 0.176135796063
y[1] (closed_form) = -3.14235569471 0.176583572542
absolute error = 0.0004928
relative error = 0.01566 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) 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) = -3.15452557575 0.177917497987
y[1] (closed_form) = -3.1547469212 0.178364835968
absolute error = 0.0004991
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.6686 2.492
h = 0.003 0.006
y[1] (numeric) = -3.17024074867 0.175487894652
y[1] (closed_form) = -3.17046866737 0.175923578349
absolute error = 0.0004917
relative error = 0.01548 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) 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) = -3.19597395763 0.182995780177
y[1] (closed_form) = -3.19622964853 0.183483629033
absolute error = 0.0005508
relative error = 0.0172 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) 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) = -3.21590570362 0.17986562217
y[1] (closed_form) = -3.21613773489 0.180322881988
absolute error = 0.0005128
relative error = 0.01592 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) 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) = -3.22795155123 0.178105887252
y[1] (closed_form) = -3.22816912386 0.178567850345
absolute error = 0.0005106
relative error = 0.01579 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) 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) = -3.23267514905 0.181384284729
y[1] (closed_form) = -3.23288485114 0.181846129711
absolute error = 0.0005072
relative error = 0.01566 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) 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) = -3.24540132444 0.183240755869
y[1] (closed_form) = -3.24562709435 0.183702209543
absolute error = 0.0005137
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.6739 2.514
h = 0.003 0.006
y[1] (numeric) = -3.26157063012 0.180772036896
y[1] (closed_form) = -3.26180319768 0.181221541661
absolute error = 0.0005061
relative error = 0.01549 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) 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) = -3.28802508556 0.188544641489
y[1] (closed_form) = -3.28828598877 0.189047846858
absolute error = 0.0005668
relative error = 0.01721 %
Correct digits = 4
NO POLE (given) for Equation 1
NO 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=1081.5MB, alloc=52.3MB, time=12.57
x[1] = 0.677 2.525
h = 0.0001 0.003
y[1] (numeric) = -3.30853253699 0.18536404366
y[1] (closed_form) = -3.30876924827 0.185835731738
absolute error = 0.0005278
relative error = 0.01592 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
NO REAL POLE (three term test) for Equation 1
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.6771 2.528
h = 0.001 0.001
y[1] (numeric) = -3.32092606289 0.183577752293
y[1] (closed_form) = -3.32114790138 0.18405421759
absolute error = 0.0005256
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.6781 2.529
h = 0.001 0.003
y[1] (numeric) = -3.32577815322 0.186959150521
y[1] (closed_form) = -3.32599190591 0.187435464541
absolute error = 0.0005221
relative error = 0.01567 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) 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) = -3.33886424184 0.1888937707
y[1] (closed_form) = -3.33909450418 0.189369743789
absolute error = 0.0005287
relative error = 0.01581 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) 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) = -3.35550027664 0.186386588274
y[1] (closed_form) = -3.35573756835 0.186850310904
absolute error = 0.0005209
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.6822 2.542
h = 0.0001 0.005
y[1] (numeric) = -3.38269474025 0.194433908833
y[1] (closed_form) = -3.38296093941 0.194952911321
absolute error = 0.0005833
relative error = 0.01721 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) 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) = -3.40379386366 0.191203679426
y[1] (closed_form) = -3.40403532839 0.19169020904
absolute error = 0.0005432
relative error = 0.01593 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) 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) = -3.41654469511 0.189391428331
y[1] (closed_form) = -3.41677086143 0.189882809245
absolute error = 0.0005409
relative error = 0.01581 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) 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) = -3.42152840589 0.192879138982
y[1] (closed_form) = -3.42174626552 0.193370333604
absolute error = 0.0005373
relative error = 0.01568 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) 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) = -3.4385556632 0.19034028071
y[1] (closed_form) = -3.43880117313 0.190812332867
absolute error = 0.0005321
relative error = 0.01545 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) 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) = -3.46640591692 0.198623214016
y[1] (closed_form) = -3.46668085266 0.199151934435
absolute error = 0.0005959
relative error = 0.01716 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) 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) = -3.48802686561 0.195343666728
y[1] (closed_form) = -3.48827657987 0.195839075902
absolute error = 0.0005548
relative error = 0.01588 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) 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) = -3.50109285989 0.193505176137
y[1] (closed_form) = -3.50132690086 0.194005505713
absolute error = 0.0005524
relative error = 0.01575 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) 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) = -3.50619374477 0.197085507545
y[1] (closed_form) = -3.50641928385 0.197585621872
absolute error = 0.0005486
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.6887 2.573
h = 0.0001 0.004
y[1] (numeric) = -3.51997621584 0.199170436774
y[1] (closed_form) = -3.52021911861 0.199670307272
absolute error = 0.0005558
relative error = 0.01576 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) 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) = -3.53751497026 0.196587743902
y[1] (closed_form) = -3.53776535018 0.197074780917
absolute error = 0.0005476
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.6918 2.583
h = 0.0001 0.005
y[1] (numeric) = -3.56614150421 0.205164705243
y[1] (closed_form) = -3.56642189773 0.205710074353
absolute error = 0.0006132
relative error = 0.01717 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) 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) = -3.58838498775 0.201837078732
y[1] (closed_form) = -3.58863959767 0.202348128243
absolute error = 0.000571
relative error = 0.01589 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) 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) = -3.60182689682 0.199973775939
y[1] (closed_form) = -3.60206538571 0.200489820201
absolute error = 0.0005685
relative error = 0.01576 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) 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) = -3.60706545023 0.20366681909
y[1] (closed_form) = -3.60729520546 0.204182609509
absolute error = 0.0005646
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.694 2.595
h = 0.0001 0.004
y[1] (numeric) = -3.6212358835 0.205840192783
y[1] (closed_form) = -3.62148347837 0.206355799499
absolute error = 0.000572
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.6941 2.599
h = 0.003 0.006
y[1] (numeric) = -3.63927929635 0.203221157503
y[1] (closed_form) = -3.6395346223 0.203723608467
absolute error = 0.0005636
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.6971 2.605
h = 0.0001 0.005
y[1] (numeric) = -3.66870221962 0.212103176891
y[1] (closed_form) = -3.66898815531 0.212665671048
absolute error = 0.000631
relative error = 0.01717 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) 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) = -3.69158545145 0.208728551933
y[1] (closed_form) = -3.69184503085 0.209255688579
absolute error = 0.0005876
relative error = 0.01589 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) 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) = -3.70541365289 0.206841206702
y[1] (closed_form) = -3.70565665117 0.207373412436
absolute error = 0.0005851
relative error = 0.01576 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) 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) = -3.7107932057 0.210650574994
y[1] (closed_form) = -3.7110272325 0.211182486218
absolute error = 0.0005811
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.6993 2.617
h = 0.0001 0.004
y[1] (numeric) = -3.72536187087 0.21291630719
y[1] (closed_form) = -3.72561422577 0.213448098581
absolute error = 0.0005886
relative error = 0.01577 %
Correct digits = 4
memory used=1125.4MB, alloc=52.3MB, time=13.08
NO POLE (given) for Equation 1
NO POLE (ratio test) 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) = -3.74392388288 0.210261881871
y[1] (closed_form) = -3.74418423105 0.210780187741
absolute error = 0.00058
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.7024 2.627
h = 0.0001 0.005
y[1] (numeric) = -3.77416379436 0.219460375154
y[1] (closed_form) = -3.7744553567 0.220040483843
absolute error = 0.0006493
relative error = 0.01717 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) 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) = -3.79770444448 0.216039938586
y[1] (closed_form) = -3.79796906715 0.216583621478
absolute error = 0.0006047
relative error = 0.01589 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) 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) = -3.81192959054 0.214129387825
y[1] (closed_form) = -3.81217715935 0.21467821407
absolute error = 0.0006021
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.7036 2.636
h = 0.001 0.003
y[1] (numeric) = -3.81745354668 0.21805880643
y[1] (closed_form) = -3.81769190001 0.21860729534
absolute error = 0.000598
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.7046 2.639
h = 0.0001 0.004
y[1] (numeric) = -3.83243097113 0.220420962084
y[1] (closed_form) = -3.83268815381 0.220969398932
absolute error = 0.0006057
relative error = 0.01578 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) 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) = -3.85152589228 0.217732187111
y[1] (closed_form) = -3.85179133892 0.218266801015
absolute error = 0.0005969
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.7077 2.649
h = 0.0001 0.005
y[1] (numeric) = -3.8826038915 0.227258968366
y[1] (closed_form) = -3.88290116503 0.227857194544
absolute error = 0.000668
relative error = 0.01717 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) 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) = -3.90682009781 0.223794018064
y[1] (closed_form) = -3.90708983747 0.224354718945
absolute error = 0.0006222
relative error = 0.0159 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) 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) = -3.92145312223 0.22186116891
y[1] (closed_form) = -3.9217053223 0.222427087271
absolute error = 0.0006196
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.7089 2.658
h = 0.0001 0.004
y[1] (numeric) = -3.92712496004 0.225914478021
y[1] (closed_form) = -3.92736769428 0.226480013982
absolute error = 0.0006154
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.709 2.662
h = 0.003 0.006
y[1] (numeric) = -3.94666653553 0.223197585559
y[1] (closed_form) = -3.9469411828 0.223741865268
absolute error = 0.0006096
relative error = 0.01542 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) 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) = -3.97848732877 0.233006385166
y[1] (closed_form) = -3.97879435933 0.233615868154
absolute error = 0.0006824
relative error = 0.01712 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) 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) = -4.0032994144 0.22949589665
y[1] (closed_form) = -4.00357837725 0.230066889527
absolute error = 0.0006355
relative error = 0.01585 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) 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) = -4.01829225285 0.227539594914
y[1] (closed_form) = -4.01855324823 0.228115874922
absolute error = 0.0006326
relative error = 0.01572 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) 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) = -4.02409576568 0.231700890896
y[1] (closed_form) = -4.02434707398 0.232276750937
absolute error = 0.0006283
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.7142 2.68
h = 0.0001 0.004
y[1] (numeric) = -4.03986399252 0.234248648066
y[1] (closed_form) = -4.04013509894 0.234824586755
absolute error = 0.0006366
relative error = 0.01573 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) 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) = -4.05998954725 0.231492275693
y[1] (closed_form) = -4.0602694406 0.232053739181
absolute error = 0.0006274
relative error = 0.01543 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) 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) = -4.09268921249 0.241652184511
y[1] (closed_form) = -4.09300211782 0.242280756927
absolute error = 0.0007021
relative error = 0.01712 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) 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) = -4.11821190874 0.2380996809
y[1] (closed_form) = -4.1184961313 0.238688603441
absolute error = 0.0006539
relative error = 0.01585 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) 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) = -4.13363375673 0.236122828196
y[1] (closed_form) = -4.13389950101 0.236717111726
absolute error = 0.000651
relative error = 0.01572 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) 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) = -4.13959187551 0.240415434474
y[1] (closed_form) = -4.13984767013 0.241009248638
absolute error = 0.0006466
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.7195 2.702
h = 0.0001 0.004
y[1] (numeric) = -4.15580050961 0.243071988114
y[1] (closed_form) = -4.15607664203 0.24366596062
absolute error = 0.000655
relative error = 0.01573 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) 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) = -4.1765020492 0.240284579555
y[1] (closed_form) = -4.1767872649 0.240863716546
absolute error = 0.0006456
relative error = 0.01543 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) 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) = -4.21010318516 0.250808616343
y[1] (closed_form) = -4.21042204973 0.251456821647
absolute error = 0.0007224
relative error = 0.01713 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) for Equation 1
NO REAL POLE (three term test) for Equation 1
NO COMPLEX POLE (six term test) for Equation 1
x[1] = 0.7227 2.717
h = 0.0001 0.003
y[1] (numeric) = -4.23635603495 0.247215736293
y[1] (closed_form) = -4.23664559048 0.247823098214
absolute error = 0.0006729
relative error = 0.01585 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) 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) = -4.2522186714 0.245219455074
y[1] (closed_form) = -4.25248922389 0.24583225151
absolute error = 0.0006699
relative error = 0.01573 %
Correct digits = 4
memory used=1169.3MB, alloc=52.3MB, time=13.60
NO POLE (given) for Equation 1
NO POLE (ratio test) 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) = -4.25833509647 0.249647558759
y[1] (closed_form) = -4.25859542993 0.250259833928
absolute error = 0.0006653
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.7248 2.724
h = 0.0001 0.004
y[1] (numeric) = -4.27499571905 0.252417603098
y[1] (closed_form) = -4.27527694402 0.253030120862
absolute error = 0.000674
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.7249 2.728
h = 0.003 0.006
y[1] (numeric) = -4.29628906815 0.249600573348
y[1] (closed_form) = -4.29657968231 0.250197887006
absolute error = 0.0006643
relative error = 0.01543 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) 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) = -4.33081481818 0.260502206428
y[1] (closed_form) = -4.33113972625 0.261170602948
absolute error = 0.0007432
relative error = 0.01713 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) 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) = -4.35781787865 0.2568707205
y[1] (closed_form) = -4.35811284009 0.25749704546
absolute error = 0.0006923
relative error = 0.01586 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) 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) = -4.37413339179 0.254856216358
y[1] (closed_form) = -4.37440881108 0.255488048948
absolute error = 0.0006893
relative error = 0.01573 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) 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) = -4.38041190333 0.25942413301
y[1] (closed_form) = -4.38067682729 0.26005538983
absolute error = 0.0006846
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.7301 2.746
h = 0.0001 0.004
y[1] (numeric) = -4.39753638347 0.262312539829
y[1] (closed_form) = -4.39782276703 0.262944128247
absolute error = 0.0006935
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.7302 2.75
h = 0.003 0.006
y[1] (numeric) = -4.41943778256 0.259467413104
y[1] (closed_form) = -4.41973387104 0.260083420377
absolute error = 0.0006835
relative error = 0.01544 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) 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) = -4.45491184657 0.270760574674
y[1] (closed_form) = -4.45524288208 0.271449735991
absolute error = 0.0007645
relative error = 0.01713 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) 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) = -4.48268570176 0.267092391274
y[1] (closed_form) = -4.48298614162 0.26773821723
absolute error = 0.0007123
relative error = 0.01586 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) 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) = -4.49946649668 0.26506095661
y[1] (closed_form) = -4.49974684059 0.265712362823
absolute error = 0.0007092
relative error = 0.01573 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) 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) = -4.50591095616 0.269773133957
y[1] (closed_form) = -4.50618052131 0.270423907192
absolute error = 0.0007044
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.7345 2.769
h = 0.003 0.006
y[1] (numeric) = -4.52832193772 0.266905256334
y[1] (closed_form) = -4.52862831182 0.267532472265
absolute error = 0.000698
relative error = 0.01539 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) 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) = -4.56463658955 0.278535263067
y[1] (closed_form) = -4.5649785049 0.279237454438
absolute error = 0.000781
relative error = 0.01708 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) 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) = -4.5930904106 0.274827604267
y[1] (closed_form) = -4.59340114675 0.275485351086
absolute error = 0.0007275
relative error = 0.01581 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) 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) = -4.61028170687 0.272776950813
y[1] (closed_form) = -4.61057185917 0.273440346785
absolute error = 0.0007241
relative error = 0.01568 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) 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) = -4.61687395715 0.277614927395
y[1] (closed_form) = -4.61715308016 0.278277642399
absolute error = 0.0007191
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.7397 2.787
h = 0.0001 0.004
y[1] (numeric) = -4.634895727 0.280731305755
y[1] (closed_form) = -4.63519740742 0.281394524091
absolute error = 0.0007286
relative error = 0.01569 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) 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) = -4.65797297055 0.277830628431
y[1] (closed_form) = -4.6582849658 0.278477536919
absolute error = 0.0007182
relative error = 0.01539 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) 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) = -4.69528173903 0.289879075132
y[1] (closed_form) = -4.69562994425 0.290603139568
absolute error = 0.0008034
relative error = 0.01708 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) 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) = -4.72454613078 0.286138397464
y[1] (closed_form) = -4.72486248571 0.286816684775
absolute error = 0.0007484
relative error = 0.01581 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) 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) = -4.74222668003 0.284073305478
y[1] (closed_form) = -4.74252186892 0.284757313612
absolute error = 0.000745
relative error = 0.01568 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) 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) = -4.74899234172 0.289064135513
y[1] (closed_form) = -4.74927620416 0.289747400248
absolute error = 0.0007399
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.745 2.809
h = 0.0001 0.004
y[1] (numeric) = -4.76751363852 0.29231369496
y[1] (closed_form) = -4.76782066965 0.292997566525
absolute error = 0.0007496
relative error = 0.01569 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) 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) = -4.79124780412 0.289389717519
y[1] (closed_form) = -4.79156549547 0.29005687695
absolute error = 0.0007389
relative error = 0.01539 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) 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) = -4.82957605524 0.301871939232
y[1] (closed_form) = -4.82993063315 0.302618496164
absolute error = 0.0008265
relative error = 0.01708 %
Correct digits = 4
memory used=1213.3MB, alloc=52.3MB, time=14.11
NO POLE (given) for Equation 1
NO POLE (ratio test) 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) = -4.85967318359 0.298100573405
y[1] (closed_form) = -4.85999522832 0.298799982151
absolute error = 0.00077
relative error = 0.01581 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) 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) = -4.8778563422 0.296022601021
y[1] (closed_form) = -4.87815662292 0.296727801518
absolute error = 0.0007665
relative error = 0.01568 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) 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) = -4.88479951909 0.301171130765
y[1] (closed_form) = -4.88508816856 0.301875522423
absolute error = 0.0007612
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.7503 2.831
h = 0.0001 0.004
y[1] (numeric) = -4.90383338869 0.30455948289
y[1] (closed_form) = -4.90414583392 0.305264590405
absolute error = 0.0007712
relative error = 0.0157 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) 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) = -4.92824242196 0.301614193007
y[1] (closed_form) = -4.9285658838 0.302302176977
absolute error = 0.0007602
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.7534 2.841
h = 0.0001 0.005
y[1] (numeric) = -4.96761612656 0.31454604789
y[1] (closed_form) = -4.96797715935 0.315315733575
absolute error = 0.0008502
relative error = 0.01708 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) 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) = -4.9985687361 0.310746487327
y[1] (closed_form) = -4.99889654092 0.311467614222
absolute error = 0.0007921
relative error = 0.01582 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) 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) = -5.01726820843 0.30865729485
y[1] (closed_form) = -5.01757363504 0.309384283587
absolute error = 0.0007885
relative error = 0.01569 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) 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) = -5.02439309135 0.313968518048
y[1] (closed_form) = -5.02468657413 0.314694629381
absolute error = 0.0007832
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.7556 2.853
h = 0.0001 0.004
y[1] (numeric) = -5.04395290084 0.317501482934
y[1] (closed_form) = -5.0442708226 0.318228424902
absolute error = 0.0007934
relative error = 0.0157 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) 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) = -5.06905521526 0.314537002755
y[1] (closed_form) = -5.06938452137 0.31524640046
absolute error = 0.0007821
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.7587 2.863
h = 0.0001 0.005
y[1] (numeric) = -5.10950096214 0.327934888587
y[1] (closed_form) = -5.10986853126 0.328728356541
absolute error = 0.0008745
relative error = 0.01708 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) 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) = -5.14133239031 0.324109796483
y[1] (closed_form) = -5.14166602465 0.324853254421
absolute error = 0.0008149
relative error = 0.01582 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) 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) = -5.16056223717 0.32201115075
y[1] (closed_form) = -5.16087286246 0.322760539682
absolute error = 0.0008112
relative error = 0.01569 %
Correct digits = 4
NO POLE (given) for Equation 1
NO POLE (ratio test) 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) = -5.1678731055 0.327490212878
y[1] (closed_form) = -5.16817146639 0.328238652593
absolute error = 0.0008057
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
Finished!
diff ( y , x , 1 ) = ( 0.2 * x + 0.3 ) * sin ( x ) ;
Iterations = 754
Total Elapsed Time = 14 Seconds
Expected Time Remaining = 0 Seconds
Optimized Time Remaining = 0 Seconds
Expected Total Time = 14 Seconds
> quit
memory used=1239.7MB, alloc=52.3MB, time=14.40