|\^/| 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(ln(cosh(c(3.0)*c(x) + c(1.0)))/c(3.0)); > end; exact_soln_y := proc(x) return ln(cosh(c(3.0)*c(x) + c(1.0)))/c(3.0) end proc > next_delta := proc() > global glob_nxt, x_delta; > x_delta := [ 0.001 + 0.00004 * I, > 0.0001 + 0.004 * I, > 0.003 + 0.006 * I, > 0.0001 + 0.005 * I, > 0.0001 + 0.003 * I, > 0.001 + 0.001 * I, > 0.001 + 0.003 * I, > 0.0001 + 0.004 * I, > 0.003 + 0.006 * I, > 0.0001 + 0.005 * I, > 0.0001 + 0.003 * I, > 0.001 + 0.001 * I, > 0.001 + 0.003 * I, > 0.0001 + 0.004 * I, > 0.003 + 0.006 * I, > 0.0001 + 0.005 * I, > 0.0001 + 0.003 * I, > 0.001 + 0.001 * I, > 0.001 + 0.003 * I, > 0.0001 + 0.004 * I, > 0.003 + 0.006 * I, > 0.0001 + 0.005 * I, > 0.0001 + 0.003 * I, > 0.001 + 0.001 * I, > 0.001 + 0.003 * I, > 0.0001 + 0.004 * I, > 0.003 + 0.006 * I, > 0.0001 + 0.005 * I, > 0.0001 + 0.003 * I, > 0.001 + 0.001 * I, > 0.0001 + 0.004 * I, > 0.003 + 0.006 * I, > 0.0001 + 0.005 * I, > 0.0001 + 0.003 * I, > 0.001 + 0.001 * I, > 0.001 + 0.003 * I, > 0.0001 + 0.004 * I, > 0.003 + 0.006 * I, > 0.0001 + 0.005 * I, > 0.0001 + 0.003 * I, > 0.001 + 0.001 * I, > 0.001 + 0.003 * I, > 0.0001 + 0.004 * I, > 0.003 + 0.006 * I, > 0.0001 + 0.005 * I, > 0.0001 + 0.003 * I, > 0.001 + 0.001 * I, > 0.001 + 0.003 * I, > 0.0001 + 0.004 * I, > 0.003 + 0.006 * I, > 0.0001 + 0.005 * I, > 0.0001 + 0.003 * I, > 0.001 + 0.001 * I, > 0.001 + 0.003 * I, > 0.0001 + 0.004 * I, > 0.003 + 0.006 * I, > 0.0001 + 0.005 * I, > 0.0001 + 0.003 * I, > 0.001 + 0.001 * I, > 0.0001 + 0.004 * I, > 0.003 + 0.006 * I, > 0.0001 + 0.005 * I, > 0.0001 + 0.003 * I, > 0.001 + 0.001 * I, > 0.001 + 0.003 * I, > 0.0001 + 0.004 * I, > 0.003 + 0.006 * I, > 0.0001 + 0.005 * I, > 0.0001 + 0.003 * I, > 0.001 + 0.001 * I, > 0.001 + 0.003 * I, > 0.0001 + 0.004 * I, > 0.003 + 0.006 * I, > 0.0001 + 0.005 * I, > 0.0001 + 0.003 * I, > 0.001 + 0.001 * I, > 0.001 + 0.003 * I, > 0.0001 + 0.004 * I, > 0.003 + 0.006 * I, > 0.0001 + 0.005 * I, > 0.0001 + 0.003 * I, > 0.001 + 0.001 * I, > 0.001 + 0.003 * I, > 0.0001 + 0.004 * I, > 0.003 + 0.006 * I, > 0.0001 + 0.005 * I, > 0.0001 + 0.003 * I, > 0.001 + 0.001 * I, > 0.0001 + 0.004 * I, > 0.003 + 0.006 * I, > 0.0001 + 0.005 * I, > 0.0001 + 0.003 * I, > 0.001 + 0.001 * I, > 0.001 + 0.003 * I, > 0.0001 + 0.004 * I, > 0.003 + 0.006 * I, > 0.0001 + 0.005 * I, > 0.0001 + 0.003 * I, > 0.001 + 0.001 * I, > 0.001 + 0.003 * I, > 0.0001 + 0.004 * I, > 0.003 + 0.006 * I, > 0.0001 + 0.005 * I, > 0.0001 + 0.003 * I, > 0.001 + 0.001 * I, > 0.001 + 0.003 * I, > 0.0001 + 0.004 * I, > 0.003 + 0.006 * I, > 0.0001 + 0.005 * I, > 0.0001 + 0.003 * I, > 0.001 + 0.001 * I, > 0.001 + 0.003 * I, > 0.0001 + 0.004 * I, > 0.003 + 0.006 * I, > 0.0001 + 0.005 * I, > 0.0001 + 0.003 * I, > 0.001 + 0.001 * I, > 0.0001 + 0.004 * I, > 0.003 + 0.006 * I, > 0.0001 + 0.005 * I, > 0.0001 + 0.003 * I, > 0.001 + 0.001 * I, > 0.001 + 0.003 * I, > 0.0001 + 0.004 * I, > 0.003 + 0.006 * I, > 0.0001 + 0.005 * I, > 0.0001 + 0.003 * I, > 0.001 + 0.001 * I, > 0.001 + 0.003 * I, > 0.0001 + 0.004 * I, > 0.003 + 0.006 * I, > 0.0001 + 0.005 * I, > 0.0001 + 0.003 * I, > 0.001 + 0.001 * I, > 0.001 + 0.003 * I, > 0.0001 + 0.004 * I, > 0.003 + 0.006 * I, > 0.0001 + 0.005 * I, > 0.0001 + 0.003 * I, > 0.001 + 0.001 * I, > 0.001 + 0.003 * I, > 0.0001 + 0.004 * I, > 0.003 + 0.006 * I, > 0.0001 + 0.005 * I, > 0.0001 + 0.003 * I, > 0.001 + 0.001 * I, > 0.0001 + 0.004 * I, > 0.003 + 0.006 * I, > 0.0001 + 0.005 * I, > 0.0001 + 0.003 * I, > 0.001 + 0.001 * I, > 0.001 + 0.003 * I, > 0.0001 + 0.004 * I, > 0.003 + 0.006 * I, > 0.0001 + 0.005 * I, > 0.0001 + 0.003 * I, > 0.001 + 0.001 * I, > 0.001 + 0.003 * I, > 0.0001 + 0.004 * I, > 0.003 + 0.006 * I, > 0.0001 + 0.005 * I, > 0.0001 + 0.003 * I, > 0.001 + 0.001 * I, > 0.001 + 0.003 * I, > 0.0001 + 0.004 * I, > 0.003 + 0.006 * I, > 0.0001 + 0.005 * I, > 0.0001 + 0.003 * I, > 0.001 + 0.001 * I, > 0.001 + 0.003 * I, > 0.0001 + 0.004 * I, > 0.003 + 0.006 * I, > 0.0001 + 0.005 * I, > 0.0001 + 0.003 * I, > 0.001 + 0.001 * I, > 0.0001 + 0.004 * I, > 0.003 + 0.006 * I, > 0.0001 + 0.005 * I, > 0.0001 + 0.003 * I, > 0.001 + 0.001 * I, > 0.001 + 0.003 * I, > 0.0001 + 0.004 * I, > 0.0001 + 0.004 * I, > 0.003 + 0.006 * I, > 0.0001 + 0.005 * I, > 0.0001 + 0.003 * I, > 0.001 + 0.001 * I, > 0.001 + 0.003 * I, > 0.0001 + 0.004 * I, > 0.003 + 0.006 * I, > 0.0001 + 0.005 * I, > 0.0001 + 0.003 * I, > 0.001 + 0.001 * I, > 0.001 + 0.003 * I, > 0.0001 + 0.004 * I, > 0.003 + 0.006 * I, > 0.0001 + 0.005 * I, > 0.0001 + 0.003 * I, > 0.001 + 0.001 * I, > 0.001 + 0.003 * I, > 0.0001 + 0.004 * I, > 0.003 + 0.006 * I, > 0.0001 + 0.005 * I, > 0.0001 + 0.003 * I, > 0.001 + 0.001 * I, > 0.001 + 0.003 * I, > 0.0001 + 0.004 * I, > 0.003 + 0.006 * I, > 0.0001 + 0.005 * I, > 0.0001 + 0.003 * I, > 0.001 + 0.001 * I, > 0.0001 + 0.004 * I, > 0.003 + 0.006 * I, > 0.0001 + 0.005 * I, > 0.0001 + 0.003 * I, > 0.001 + 0.001 * I, > 0.001 + 0.003 * I, > 0.0001 + 0.004 * I, > 0.003 + 0.006 * I, > 0.0001 + 0.005 * I, > 0.0001 + 0.003 * I, > 0.001 + 0.001 * I, > 0.001 + 0.003 * I, > 0.0001 + 0.004 * I, > 0.003 + 0.006 * I, > 0.0001 + 0.005 * I, > 0.0001 + 0.003 * I, > 0.001 + 0.001 * I, > 0.001 + 0.003 * I, > 0.0001 + 0.004 * I, > 0.003 + 0.006 * I, > 0.0001 + 0.005 * I, > 0.0001 + 0.003 * I, > 0.001 + 0.001 * I, > 0.001 + 0.003 * I, > 0.0001 + 0.004 * I, > 0.003 + 0.006 * I, > 0.0001 + 0.005 * I, > 0.0001 + 0.003 * I, > 0.001 + 0.001 * I, > 0.0001 + 0.004 * I, > 0.003 + 0.006 * I, > 0.0001 + 0.005 * I, > 0.0001 + 0.003 * I, > 0.001 + 0.001 * I, > 0.001 + 0.003 * I, > 0.0001 + 0.004 * I, > 0.003 + 0.006 * I, > 0.0001 + 0.005 * I, > 0.0001 + 0.003 * I, > 0.001 + 0.001 * I, > 0.001 + 0.003 * I, > 0.0001 + 0.004 * I, > 0.003 + 0.006 * I, > 0.0001 + 0.005 * I, > 0.0001 + 0.003 * I, > 0.001 + 0.001 * I, > 0.001 + 0.003 * I, > 0.0001 + 0.004 * I, > 0.003 + 0.006 * I, > 0.0001 + 0.005 * I, > 0.0001 + 0.003 * I, > 0.001 + 0.001 * I, > 0.001 + 0.003 * I, > 0.0001 + 0.004 * I, > 0.003 + 0.006 * I, > 0.0001 + 0.005 * I, > 0.0001 + 0.003 * I, > 0.001 + 0.001 * I, > 0.0001 + 0.004 * I, > 0.003 + 0.006 * I, > 0.0001 + 0.005 * I, > 0.0001 + 0.003 * I, > 0.001 + 0.001 * I, > 0.001 + 0.003 * I, > 0.0001 + 0.004 * I, > 0.003 + 0.006 * I, > 0.0001 + 0.005 * I, > 0.0001 + 0.003 * I, > 0.001 + 0.001 * I, > 0.001 + 0.003 * I, > 0.0001 + 0.004 * I, > 0.003 + 0.006 * I, > 0.0001 + 0.005 * I, > 0.0001 + 0.003 * I, > 0.001 + 0.001 * I, > 0.001 + 0.003 * I, > 0.0001 + 0.004 * I, > 0.003 + 0.006 * I, > 0.0001 + 0.005 * I, > 0.0001 + 0.003 * I, > 0.001 + 0.001 * I, > 0.001 + 0.003 * I, > 0.0001 + 0.004 * I, > 0.003 + 0.006 * I, > 0.0001 + 0.005 * I, > 0.0001 + 0.003 * I, > 0.001 + 0.001 * I, > 0.0001 + 0.004 * I, > 0.003 + 0.006 * I, > 0.0001 + 0.005 * I, > 0.0001 + 0.003 * I, > 0.001 + 0.001 * I, > 0.001 + 0.003 * I, > 0.0001 + 0.004 * I, > 0.003 + 0.006 * I, > 0.0001 + 0.005 * I, > 0.0001 + 0.003 * I, > 0.001 + 0.001 * I, > 0.001 + 0.003 * I, > 0.0001 + 0.004 * I, > 0.003 + 0.006 * I, > 0.0001 + 0.005 * I, > 0.0001 + 0.003 * I, > 0.001 + 0.001 * I, > 0.001 + 0.003 * I, > 0.0001 + 0.004 * I, > 0.003 + 0.006 * I, > 0.0001 + 0.005 * I, > 0.0001 + 0.003 * I, > 0.001 + 0.001 * I, > 0.001 + 0.003 * I, > 0.0001 + 0.004 * I, > 0.003 + 0.006 * I, > 0.0001 + 0.005 * I, > 0.0001 + 0.003 * I, > 0.001 + 0.001 * I, > 0.0001 + 0.004 * I, > 0.003 + 0.006 * I, > 0.0001 + 0.005 * I, > 0.0001 + 0.003 * I, > 0.001 + 0.001 * I, > 0.001 + 0.003 * I, > 0.0001 + 0.004 * I, > 0.003 + 0.006 * I, > 0.0001 + 0.005 * I, > 0.0001 + 0.003 * I, > 0.001 + 0.001 * I, > 0.001 + 0.003 * I, > 0.0001 + 0.004 * I, > 0.003 + 0.006 * I, > 0.0001 + 0.005 * I, > 0.0001 + 0.003 * I, > 0.001 + 0.001 * I, > 0.001 + 0.003 * I, > 0.0001 + 0.004 * I, > 0.003 + 0.006 * I, > 0.0001 + 0.005 * I, > 0.0001 + 0.003 * I, > 0.001 + 0.001 * I, > 0.001 + 0.003 * I, > 0.0001 + 0.004 * I, > 0.003 + 0.006 * I, > 0.0001 + 0.005 * I, > 0.0001 + 0.003 * I, > 0.001 + 0.001 * I, > 0.003 + 0.006 * I, > 0.0001 + 0.005 * I, > 0.0001 + 0.003 * I, > 0.001 + 0.001 * I, > 0.001 + 0.003 * I, > 0.0001 + 0.004 * I, > 0.003 + 0.006 * I, > 0.0001 + 0.005 * I, > 0.0001 + 0.003 * I, > 0.001 + 0.001 * I, > 0.001 + 0.003 * I, > 0.0001 + 0.004 * I, > 0.003 + 0.006 * I, > 0.0001 + 0.005 * I, > 0.0001 + 0.003 * I, > 0.001 + 0.001 * I, > 0.001 + 0.003 * I, > 0.0001 + 0.004 * I, > 0.003 + 0.006 * I, > 0.0001 + 0.005 * I, > 0.0001 + 0.003 * I, > 0.001 + 0.001 * I, > 0.0001 + 0.004 * I, > 0.003 + 0.006 * I, > 0.0001 + 0.005 * I, > 0.0001 + 0.003 * I, > 0.001 + 0.001 * I, > 0.001 + 0.003 * I, > 0.0001 + 0.004 * I, > 0.003 + 0.006 * I, > 0.0001 + 0.005 * I, > 0.0001 + 0.003 * I, > 0.001 + 0.001 * I, > 0.001 + 0.003 * I, > 0.0001 + 0.004 * I, > 0.003 + 0.006 * I, > 0.0001 + 0.005 * I, > 0.0001 + 0.003 * I, > 0.001 + 0.001 * I, > 0.001 + 0.003 * I, > 0.0001 + 0.004 * I, > 0.003 + 0.006 * I, > 0.0001 + 0.005 * I, > 0.0001 + 0.003 * I, > 0.001 + 0.001 * I, > 0.001 + 0.003 * I, > 0.0001 + 0.004 * I, > 0.003 + 0.006 * I, > 0.0001 + 0.005 * I, > 0.0001 + 0.003 * I, > 0.001 + 0.001 * I, > 0.0001 + 0.004 * I, > 0.003 + 0.006 * I, > 0.0001 + 0.005 * I, > 0.0001 + 0.003 * I, > 0.001 + 0.001 * I, > 0.001 + 0.003 * I, > 0.0001 + 0.004 * I, > 0.003 + 0.006 * I, > 0.0001 + 0.005 * I, > 0.0001 + 0.003 * I, > 0.001 + 0.001 * I, > 0.001 + 0.003 * I, > 0.0001 + 0.004 * I, > 0.003 + 0.006 * I, > 0.0001 + 0.005 * I, > 0.0001 + 0.003 * I, > 0.001 + 0.001 * I, > 0.001 + 0.003 * I, > 0.0001 + 0.004 * I, > 0.003 + 0.006 * I, > 0.0001 + 0.005 * I, > 0.0001 + 0.003 * I, > 0.001 + 0.001 * I, > 0.001 + 0.003 * I, > 0.0001 + 0.004 * I, > 0.003 + 0.006 * I, > 0.0001 + 0.005 * I, > 0.0001 + 0.003 * I, > 0.001 + 0.001 * I, > 0.0001 + 0.004 * I, > 0.003 + 0.006 * I, > 0.0001 + 0.005 * I, > 0.0001 + 0.003 * I, > 0.001 + 0.001 * I, > 0.001 + 0.003 * I, > 0.0001 + 0.004 * I, > 0.003 + 0.006 * I, > 0.0001 + 0.005 * I, > 0.0001 + 0.003 * I, > 0.001 + 0.001 * I, > 0.001 + 0.003 * I, > 0.0001 + 0.004 * I, > 0.003 + 0.006 * I, > 0.0001 + 0.005 * I, > 0.0001 + 0.003 * I, > 0.001 + 0.001 * I, > 0.001 + 0.003 * I, > 0.0001 + 0.004 * I, > 0.003 + 0.006 * I, > 0.0001 + 0.005 * I, > 0.0001 + 0.003 * I, > 0.001 + 0.001 * I, > 0.001 + 0.003 * I, > 0.0001 + 0.004 * I, > 0.003 + 0.006 * I, > 0.0001 + 0.005 * I, > 0.0001 + 0.003 * I, > 0.001 + 0.001 * I, > 0.0001 + 0.004 * I, > 0.003 + 0.006 * I, > 0.0001 + 0.005 * I, > 0.0001 + 0.003 * I, > 0.001 + 0.001 * I, > 0.001 + 0.003 * I, > 0.0001 + 0.004 * I, > 0.003 + 0.006 * I, > 0.0001 + 0.005 * I, > 0.0001 + 0.003 * I, > 0.001 + 0.001 * I, > 0.001 + 0.003 * I, > 0.0001 + 0.004 * I, > 0.003 + 0.006 * I, > 0.0001 + 0.005 * I, > 0.0001 + 0.003 * I, > 0.001 + 0.001 * I, > 0.001 + 0.003 * I, > 0.0001 + 0.004 * I, > 0.003 + 0.006 * I, > 0.0001 + 0.005 * I, > 0.0001 + 0.003 * I, > 0.001 + 0.001 * I, > 0.001 + 0.003 * I, > 0.0001 + 0.004 * I, > 0.003 + 0.006 * I, > 0.0001 + 0.005 * I, > 0.0001 + 0.003 * I, > 0.001 + 0.001 * I, > 0.0001 + 0.004 * I, > 0.003 + 0.006 * I, > 0.0001 + 0.005 * I, > 0.0001 + 0.003 * I, > 0.001 + 0.001 * I, > 0.001 + 0.003 * I, > 0.0001 + 0.004 * I, > 0.003 + 0.006 * I, > 0.0001 + 0.005 * I, > 0.0001 + 0.003 * I, > 0.001 + 0.001 * I, > 0.001 + 0.003 * I, > 0.0001 + 0.004 * I, > 0.003 + 0.006 * I, > 0.0001 + 0.005 * I, > 0.0001 + 0.003 * I, > 0.001 + 0.001 * I, > 0.001 + 0.003 * I, > 0.0001 + 0.004 * I, > 0.003 + 0.006 * I, > 0.0001 + 0.005 * I, > 0.0001 + 0.003 * I, > 0.001 + 0.001 * I, > 0.001 + 0.003 * I, > 0.0001 + 0.004 * I, > 0.003 + 0.006 * I, > 0.0001 + 0.005 * I, > 0.0001 + 0.003 * I, > 0.001 + 0.001 * I, > 0.0001 + 0.004 * I, > 0.003 + 0.006 * I, > 0.0001 + 0.005 * I, > 0.0001 + 0.003 * I, > 0.001 + 0.001 * I, > 0.001 + 0.003 * I, > 0.0001 + 0.004 * I, > 0.003 + 0.006 * I, > 0.0001 + 0.005 * I, > 0.0001 + 0.003 * I, > 0.001 + 0.001 * I, > 0.001 + 0.003 * I, > 0.0001 + 0.004 * I, > 0.003 + 0.006 * I, > 0.0001 + 0.005 * I, > 0.0001 + 0.003 * I, > 0.001 + 0.001 * I, > 0.001 + 0.003 * I, > 0.0001 + 0.004 * I, > 0.003 + 0.006 * I, > 0.0001 + 0.005 * I, > 0.0001 + 0.003 * I, > 0.001 + 0.001 * I, > 0.001 + 0.003 * I, > 0.0001 + 0.004 * I, > 0.003 + 0.006 * I, > 0.0001 + 0.005 * I, > 0.0001 + 0.003 * I, > 0.001 + 0.001 * I, > 0.0001 + 0.004 * I, > 0.003 + 0.006 * I, > 0.0001 + 0.005 * I, > 0.0001 + 0.003 * I, > 0.001 + 0.001 * I, > 0.001 + 0.003 * I, > 0.0001 + 0.004 * I, > 0.003 + 0.006 * I, > 0.0001 + 0.005 * I, > 0.0001 + 0.003 * I, > 0.001 + 0.001 * I, > 0.001 + 0.003 * I, > 0.0001 + 0.004 * I, > 0.003 + 0.006 * I, > 0.0001 + 0.005 * I, > 0.0001 + 0.003 * I, > 0.001 + 0.001 * I, > 0.001 + 0.003 * I, > 0.0001 + 0.004 * I, > 0.003 + 0.006 * I, > 0.0001 + 0.005 * I, > 0.0001 + 0.003 * I, > 0.001 + 0.001 * I, > 0.001 + 0.003 * I, > 0.0001 + 0.004 * I, > 0.003 + 0.006 * I, > 0.0001 + 0.005 * I, > 0.0001 + 0.003 * I, > 0.001 + 0.001 * I, > 0.0001 + 0.004 * I, > 0.003 + 0.006 * I, > 0.0001 + 0.005 * I, > 0.0001 + 0.003 * I, > 0.001 + 0.001 * I, > 0.001 + 0.003 * I, > 0.0001 + 0.004 * I, > 0.003 + 0.006 * I, > 0.0001 + 0.005 * I, > 0.0001 + 0.003 * I, > 0.001 + 0.001 * I, > 0.001 + 0.003 * I, > 0.0001 + 0.004 * I, > 0.003 + 0.006 * I, > 0.0001 + 0.005 * I, > 0.0001 + 0.003 * I, > 0.001 + 0.001 * I, > 0.001 + 0.003 * I, > 0.0001 + 0.004 * I, > 0.003 + 0.006 * I, > 0.0001 + 0.005 * I, > 0.0001 + 0.003 * I, > 0.001 + 0.001 * I, > 0.001 + 0.003 * I, > 0.0001 + 0.004 * I, > 0.003 + 0.006 * I, > 0.0001 + 0.005 * I, > 0.0001 + 0.003 * I, > 0.001 + 0.001 * I, > 0.0001 + 0.004 * I, > 0.003 + 0.006 * I, > 0.0001 + 0.005 * I, > 0.0001 + 0.003 * I, > 0.001 + 0.001 * I, > 0.001 + 0.003 * I, > 0.0001 + 0.004 * I, > 0.003 + 0.006 * I, > 0.0001 + 0.005 * I, > 0.0001 + 0.003 * I, > 0.001 + 0.001 * I, > 0.001 + 0.003 * I, > 0.0001 + 0.004 * I, > 0.003 + 0.006 * I, > 0.0001 + 0.005 * I, > 0.0001 + 0.003 * I, > 0.001 + 0.001 * I, > 0.001 + 0.003 * I, > 0.0001 + 0.004 * I, > 0.003 + 0.006 * I, > 0.0001 + 0.005 * I, > 0.0001 + 0.003 * I, > 0.001 + 0.001 * I, > 0.001 + 0.003 * I, > 0.0001 + 0.004 * I, > 0.003 + 0.006 * I, > 0.0001 + 0.005 * I, > 0.0001 + 0.003 * I, > 0.001 + 0.001 * I, > 0.0001 + 0.004 * I, > 0.003 + 0.006 * I, > 0.0001 + 0.005 * I, > 0.0001 + 0.003 * I, > 0.001 + 0.001 * I, > 0.001 + 0.003 * I, > 0.0001 + 0.004 * I, > 0.003 + 0.006 * I, > 0.0001 + 0.005 * I, > 0.0001 + 0.003 * I, > 0.001 + 0.001 * I, > 0.001 + 0.003 * I, > 0.0001 + 0.004 * I, > 0.003 + 0.006 * I, > 0.0001 + 0.005 * I, > 0.0001 + 0.003 * I, > 0.001 + 0.001 * I, > 0.001 + 0.003 * I, > 0.0001 + 0.004 * I, > 0.003 + 0.006 * I, > 0.0001 + 0.005 * I, > 0.0001 + 0.003 * I, > 0.001 + 0.001 * I, > 0.001 + 0.003 * I, > 0.0001 + 0.004 * I, > 0.003 + 0.006 * I, > 0.0001 + 0.005 * I, > 0.0001 + 0.003 * I, > 0.001 + 0.001 * I, > 0.0001 + 0.004 * I, > 0.003 + 0.006 * I, > 0.0001 + 0.005 * I, > 0.0001 + 0.003 * I, > 0.001 + 0.001 * I, > 0.001 + 0.003 * I, > 0.0001 + 0.004 * I, > 0.003 + 0.006 * I, > 0.0001 + 0.005 * I, > 0.0001 + 0.003 * I, > 0.001 + 0.001 * I, > 0.001 + 0.003 * I, > 0.0001 + 0.004 * I, > 0.003 + 0.006 * I, > 0.0001 + 0.005 * I, > 0.0001 + 0.003 * I, > 0.001 + 0.001 * I, > 0.001 + 0.003 * I, > 0.0001 + 0.004 * I, > 0.003 + 0.006 * I, > 0.0001 + 0.005 * I, > 0.0001 + 0.003 * I, > 0.001 + 0.001 * I, > 0.001 + 0.003 * I, > 0.0001 + 0.004 * I, > 0.003 + 0.006 * I, > 0.0001 + 0.005 * I, > 0.0001 + 0.003 * I, > 0.001 + 0.001 * I, > 0.0001 + 0.004 * I, > 0.003 + 0.006 * I, > 0.0001 + 0.005 * I, > 0.0001 + 0.003 * I, > 0.001 + 0.001 * I, > 0.001 + 0.003 * I, > 0.0001 + 0.004 * I, > 0.003 + 0.006 * I, > 0.0001 + 0.005 * I, > 0.0001 + 0.003 * I, > 0.001 + 0.001 * I, > 0.001 + 0.003 * I, > 0.0001 + 0.004 * I, > 0.003 + 0.006 * I, > 0.0001 + 0.005 * I, > 0.0001 + 0.003 * I, > 0.001 + 0.001 * I, > 0.001 + 0.003 * I, > 0.0001 + 0.004 * I, > 0.003 + 0.006 * I, > 0.0001 + 0.005 * I, > 0.0001 + 0.003 * I, > 0.001 + 0.001 * I, > 0.001 + 0.003 * I, > 0.0001 + 0.004 * I, > 0.003 + 0.006 * I, > 0.0001 + 0.005 * I, > 0.0001 + 0.003 * I, > 0.001 + 0.001 * I, > 0.0001 + 0.004 * I, > 0.003 + 0.006 * I, > 0.0001 + 0.005 * I, > 0.0001 + 0.003 * I, > 0.001 + 0.001 * I, > 0.001 + 0.003 * I, > 0.0001 + 0.004 * I, > 0.003 + 0.006 * I, > 0.0001 + 0.005 * I, > 0.0001 + 0.003 * I, > 0.001 + 0.001 * I, > 0.001 + 0.003 * I, > 0.0001 + 0.004 * I, > 0.003 + 0.006 * I, > 0.0001 + 0.005 * I, > 0.0001 + 0.003 * I, > 0.001 + 0.001 * I, > 0.001 + 0.003 * I, > 0.0001 + 0.004 * I, > 0.003 + 0.006 * I, > 0.0001 + 0.005 * I, > 0.0001 + 0.003 * I, > 0.001 + 0.001 * I, > 0.001 + 0.003 * I, > 0.0001 + 0.004 * I, > 0.003 + 0.006 * I, > 0.0001 + 0.005 * I, > 0.0001 + 0.003 * I, > 0.001 + 0.001 * I, > 0.001 + 0.003 * I, > 0.000 + 0.000 * I ]; > glob_nxt := glob_nxt + 1; > it := x_delta[glob_nxt]; > return it; > end; Warning, `it` is implicitly declared local to procedure `next_delta` next_delta := proc() local it; global glob_nxt, x_delta; x_delta := [0.001 + 0.00004*I, 0.0001 + 0.004*I, 0.003 + 0.006*I, 0.0001 + 0.005*I, 0.0001 + 0.003*I, 0.001 + 0.001*I, 0.001 + 0.003*I, 0.0001 + 0.004*I, 0.003 + 0.006*I, 0.0001 + 0.005*I, 0.0001 + 0.003*I, 0.001 + 0.001*I, 0.001 + 0.003*I, 0.0001 + 0.004*I, 0.003 + 0.006*I, 0.0001 + 0.005*I, 0.0001 + 0.003*I, 0.001 + 0.001*I, 0.001 + 0.003*I, 0.0001 + 0.004*I, 0.003 + 0.006*I, 0.0001 + 0.005*I, 0.0001 + 0.003*I, 0.001 + 0.001*I, 0.001 + 0.003*I, 0.0001 + 0.004*I, 0.003 + 0.006*I, 0.0001 + 0.005*I, 0.0001 + 0.003*I, 0.001 + 0.001*I, 0.0001 + 0.004*I, 0.003 + 0.006*I, 0.0001 + 0.005*I, 0.0001 + 0.003*I, 0.001 + 0.001*I, 0.001 + 0.003*I, 0.0001 + 0.004*I, 0.003 + 0.006*I, 0.0001 + 0.005*I, 0.0001 + 0.003*I, 0.001 + 0.001*I, 0.001 + 0.003*I, 0.0001 + 0.004*I, 0.003 + 0.006*I, 0.0001 + 0.005*I, 0.0001 + 0.003*I, 0.001 + 0.001*I, 0.001 + 0.003*I, 0.0001 + 0.004*I, 0.003 + 0.006*I, 0.0001 + 0.005*I, 0.0001 + 0.003*I, 0.001 + 0.001*I, 0.001 + 0.003*I, 0.0001 + 0.004*I, 0.003 + 0.006*I, 0.0001 + 0.005*I, 0.0001 + 0.003*I, 0.001 + 0.001*I, 0.0001 + 0.004*I, 0.003 + 0.006*I, 0.0001 + 0.005*I, 0.0001 + 0.003*I, 0.001 + 0.001*I, 0.001 + 0.003*I, 0.0001 + 0.004*I, 0.003 + 0.006*I, 0.0001 + 0.005*I, 0.0001 + 0.003*I, 0.001 + 0.001*I, 0.001 + 0.003*I, 0.0001 + 0.004*I, 0.003 + 0.006*I, 0.0001 + 0.005*I, 0.0001 + 0.003*I, 0.001 + 0.001*I, 0.001 + 0.003*I, 0.0001 + 0.004*I, 0.003 + 0.006*I, 0.0001 + 0.005*I, 0.0001 + 0.003*I, 0.001 + 0.001*I, 0.001 + 0.003*I, 0.0001 + 0.004*I, 0.003 + 0.006*I, 0.0001 + 0.005*I, 0.0001 + 0.003*I, 0.001 + 0.001*I, 0.0001 + 0.004*I, 0.003 + 0.006*I, 0.0001 + 0.005*I, 0.0001 + 0.003*I, 0.001 + 0.001*I, 0.001 + 0.003*I, 0.0001 + 0.004*I, 0.003 + 0.006*I, 0.0001 + 0.005*I, 0.0001 + 0.003*I, 0.001 + 0.001*I, 0.001 + 0.003*I, 0.0001 + 0.004*I, 0.003 + 0.006*I, 0.0001 + 0.005*I, 0.0001 + 0.003*I, 0.001 + 0.001*I, 0.001 + 0.003*I, 0.0001 + 0.004*I, 0.003 + 0.006*I, 0.0001 + 0.005*I, 0.0001 + 0.003*I, 0.001 + 0.001*I, 0.001 + 0.003*I, 0.0001 + 0.004*I, 0.003 + 0.006*I, 0.0001 + 0.005*I, 0.0001 + 0.003*I, 0.001 + 0.001*I, 0.0001 + 0.004*I, 0.003 + 0.006*I, 0.0001 + 0.005*I, 0.0001 + 0.003*I, 0.001 + 0.001*I, 0.001 + 0.003*I, 0.0001 + 0.004*I, 0.003 + 0.006*I, 0.0001 + 0.005*I, 0.0001 + 0.003*I, 0.001 + 0.001*I, 0.001 + 0.003*I, 0.0001 + 0.004*I, 0.003 + 0.006*I, 0.0001 + 0.005*I, 0.0001 + 0.003*I, 0.001 + 0.001*I, 0.001 + 0.003*I, 0.0001 + 0.004*I, 0.003 + 0.006*I, 0.0001 + 0.005*I, 0.0001 + 0.003*I, 0.001 + 0.001*I, 0.001 + 0.003*I, 0.0001 + 0.004*I, 0.003 + 0.006*I, 0.0001 + 0.005*I, 0.0001 + 0.003*I, 0.001 + 0.001*I, 0.0001 + 0.004*I, 0.003 + 0.006*I, 0.0001 + 0.005*I, 0.0001 + 0.003*I, 0.001 + 0.001*I, 0.001 + 0.003*I, 0.0001 + 0.004*I, 0.003 + 0.006*I, 0.0001 + 0.005*I, 0.0001 + 0.003*I, 0.001 + 0.001*I, 0.001 + 0.003*I, 0.0001 + 0.004*I, 0.003 + 0.006*I, 0.0001 + 0.005*I, 0.0001 + 0.003*I, 0.001 + 0.001*I, 0.001 + 0.003*I, 0.0001 + 0.004*I, 0.003 + 0.006*I, 0.0001 + 0.005*I, 0.0001 + 0.003*I, 0.001 + 0.001*I, 0.001 + 0.003*I, 0.0001 + 0.004*I, 0.003 + 0.006*I, 0.0001 + 0.005*I, 0.0001 + 0.003*I, 0.001 + 0.001*I, 0.0001 + 0.004*I, 0.003 + 0.006*I, 0.0001 + 0.005*I, 0.0001 + 0.003*I, 0.001 + 0.001*I, 0.001 + 0.003*I, 0.0001 + 0.004*I, 0.0001 + 0.004*I, 0.003 + 0.006*I, 0.0001 + 0.005*I, 0.0001 + 0.003*I, 0.001 + 0.001*I, 0.001 + 0.003*I, 0.0001 + 0.004*I, 0.003 + 0.006*I, 0.0001 + 0.005*I, 0.0001 + 0.003*I, 0.001 + 0.001*I, 0.001 + 0.003*I, 0.0001 + 0.004*I, 0.003 + 0.006*I, 0.0001 + 0.005*I, 0.0001 + 0.003*I, 0.001 + 0.001*I, 0.001 + 0.003*I, 0.0001 + 0.004*I, 0.003 + 0.006*I, 0.0001 + 0.005*I, 0.0001 + 0.003*I, 0.001 + 0.001*I, 0.001 + 0.003*I, 0.0001 + 0.004*I, 0.003 + 0.006*I, 0.0001 + 0.005*I, 0.0001 + 0.003*I, 0.001 + 0.001*I, 0.0001 + 0.004*I, 0.003 + 0.006*I, 0.0001 + 0.005*I, 0.0001 + 0.003*I, 0.001 + 0.001*I, 0.001 + 0.003*I, 0.0001 + 0.004*I, 0.003 + 0.006*I, 0.0001 + 0.005*I, 0.0001 + 0.003*I, 0.001 + 0.001*I, 0.001 + 0.003*I, 0.0001 + 0.004*I, 0.003 + 0.006*I, 0.0001 + 0.005*I, 0.0001 + 0.003*I, 0.001 + 0.001*I, 0.001 + 0.003*I, 0.0001 + 0.004*I, 0.003 + 0.006*I, 0.0001 + 0.005*I, 0.0001 + 0.003*I, 0.001 + 0.001*I, 0.001 + 0.003*I, 0.0001 + 0.004*I, 0.003 + 0.006*I, 0.0001 + 0.005*I, 0.0001 + 0.003*I, 0.001 + 0.001*I, 0.0001 + 0.004*I, 0.003 + 0.006*I, 0.0001 + 0.005*I, 0.0001 + 0.003*I, 0.001 + 0.001*I, 0.001 + 0.003*I, 0.0001 + 0.004*I, 0.003 + 0.006*I, 0.0001 + 0.005*I, 0.0001 + 0.003*I, 0.001 + 0.001*I, 0.001 + 0.003*I, 0.0001 + 0.004*I, 0.003 + 0.006*I, 0.0001 + 0.005*I, 0.0001 + 0.003*I, 0.001 + 0.001*I, 0.001 + 0.003*I, 0.0001 + 0.004*I, 0.003 + 0.006*I, 0.0001 + 0.005*I, 0.0001 + 0.003*I, 0.001 + 0.001*I, 0.001 + 0.003*I, 0.0001 + 0.004*I, 0.003 + 0.006*I, 0.0001 + 0.005*I, 0.0001 + 0.003*I, 0.001 + 0.001*I, 0.0001 + 0.004*I, 0.003 + 0.006*I, 0.0001 + 0.005*I, 0.0001 + 0.003*I, 0.001 + 0.001*I, 0.001 + 0.003*I, 0.0001 + 0.004*I, 0.003 + 0.006*I, 0.0001 + 0.005*I, 0.0001 + 0.003*I, 0.001 + 0.001*I, 0.001 + 0.003*I, 0.0001 + 0.004*I, 0.003 + 0.006*I, 0.0001 + 0.005*I, 0.0001 + 0.003*I, 0.001 + 0.001*I, 0.001 + 0.003*I, 0.0001 + 0.004*I, 0.003 + 0.006*I, 0.0001 + 0.005*I, 0.0001 + 0.003*I, 0.001 + 0.001*I, 0.001 + 0.003*I, 0.0001 + 0.004*I, 0.003 + 0.006*I, 0.0001 + 0.005*I, 0.0001 + 0.003*I, 0.001 + 0.001*I, 0.0001 + 0.004*I, 0.003 + 0.006*I, 0.0001 + 0.005*I, 0.0001 + 0.003*I, 0.001 + 0.001*I, 0.001 + 0.003*I, 0.0001 + 0.004*I, 0.003 + 0.006*I, 0.0001 + 0.005*I, 0.0001 + 0.003*I, 0.001 + 0.001*I, 0.001 + 0.003*I, 0.0001 + 0.004*I, 0.003 + 0.006*I, 0.0001 + 0.005*I, 0.0001 + 0.003*I, 0.001 + 0.001*I, 0.001 + 0.003*I, 0.0001 + 0.004*I, 0.003 + 0.006*I, 0.0001 + 0.005*I, 0.0001 + 0.003*I, 0.001 + 0.001*I, 0.001 + 0.003*I, 0.0001 + 0.004*I, 0.003 + 0.006*I, 0.0001 + 0.005*I, 0.0001 + 0.003*I, 0.001 + 0.001*I, 0.0001 + 0.004*I, 0.003 + 0.006*I, 0.0001 + 0.005*I, 0.0001 + 0.003*I, 0.001 + 0.001*I, 0.001 + 0.003*I, 0.0001 + 0.004*I, 0.003 + 0.006*I, 0.0001 + 0.005*I, 0.0001 + 0.003*I, 0.001 + 0.001*I, 0.001 + 0.003*I, 0.0001 + 0.004*I, 0.003 + 0.006*I, 0.0001 + 0.005*I, 0.0001 + 0.003*I, 0.001 + 0.001*I, 0.001 + 0.003*I, 0.0001 + 0.004*I, 0.003 + 0.006*I, 0.0001 + 0.005*I, 0.0001 + 0.003*I, 0.001 + 0.001*I, 0.001 + 0.003*I, 0.0001 + 0.004*I, 0.003 + 0.006*I, 0.0001 + 0.005*I, 0.0001 + 0.003*I, 0.001 + 0.001*I, 0.003 + 0.006*I, 0.0001 + 0.005*I, 0.0001 + 0.003*I, 0.001 + 0.001*I, 0.001 + 0.003*I, 0.0001 + 0.004*I, 0.003 + 0.006*I, 0.0001 + 0.005*I, 0.0001 + 0.003*I, 0.001 + 0.001*I, 0.001 + 0.003*I, 0.0001 + 0.004*I, 0.003 + 0.006*I, 0.0001 + 0.005*I, 0.0001 + 0.003*I, 0.001 + 0.001*I, 0.001 + 0.003*I, 0.0001 + 0.004*I, 0.003 + 0.006*I, 0.0001 + 0.005*I, 0.0001 + 0.003*I, 0.001 + 0.001*I, 0.0001 + 0.004*I, 0.003 + 0.006*I, 0.0001 + 0.005*I, 0.0001 + 0.003*I, 0.001 + 0.001*I, 0.001 + 0.003*I, 0.0001 + 0.004*I, 0.003 + 0.006*I, 0.0001 + 0.005*I, 0.0001 + 0.003*I, 0.001 + 0.001*I, 0.001 + 0.003*I, 0.0001 + 0.004*I, 0.003 + 0.006*I, 0.0001 + 0.005*I, 0.0001 + 0.003*I, 0.001 + 0.001*I, 0.001 + 0.003*I, 0.0001 + 0.004*I, 0.003 + 0.006*I, 0.0001 + 0.005*I, 0.0001 + 0.003*I, 0.001 + 0.001*I, 0.001 + 0.003*I, 0.0001 + 0.004*I, 0.003 + 0.006*I, 0.0001 + 0.005*I, 0.0001 + 0.003*I, 0.001 + 0.001*I, 0.0001 + 0.004*I, 0.003 + 0.006*I, 0.0001 + 0.005*I, 0.0001 + 0.003*I, 0.001 + 0.001*I, 0.001 + 0.003*I, 0.0001 + 0.004*I, 0.003 + 0.006*I, 0.0001 + 0.005*I, 0.0001 + 0.003*I, 0.001 + 0.001*I, 0.001 + 0.003*I, 0.0001 + 0.004*I, 0.003 + 0.006*I, 0.0001 + 0.005*I, 0.0001 + 0.003*I, 0.001 + 0.001*I, 0.001 + 0.003*I, 0.0001 + 0.004*I, 0.003 + 0.006*I, 0.0001 + 0.005*I, 0.0001 + 0.003*I, 0.001 + 0.001*I, 0.001 + 0.003*I, 0.0001 + 0.004*I, 0.003 + 0.006*I, 0.0001 + 0.005*I, 0.0001 + 0.003*I, 0.001 + 0.001*I, 0.0001 + 0.004*I, 0.003 + 0.006*I, 0.0001 + 0.005*I, 0.0001 + 0.003*I, 0.001 + 0.001*I, 0.001 + 0.003*I, 0.0001 + 0.004*I, 0.003 + 0.006*I, 0.0001 + 0.005*I, 0.0001 + 0.003*I, 0.001 + 0.001*I, 0.001 + 0.003*I, 0.0001 + 0.004*I, 0.003 + 0.006*I, 0.0001 + 0.005*I, 0.0001 + 0.003*I, 0.001 + 0.001*I, 0.001 + 0.003*I, 0.0001 + 0.004*I, 0.003 + 0.006*I, 0.0001 + 0.005*I, 0.0001 + 0.003*I, 0.001 + 0.001*I, 0.001 + 0.003*I, 0.0001 + 0.004*I, 0.003 + 0.006*I, 0.0001 + 0.005*I, 0.0001 + 0.003*I, 0.001 + 0.001*I, 0.0001 + 0.004*I, 0.003 + 0.006*I, 0.0001 + 0.005*I, 0.0001 + 0.003*I, 0.001 + 0.001*I, 0.001 + 0.003*I, 0.0001 + 0.004*I, 0.003 + 0.006*I, 0.0001 + 0.005*I, 0.0001 + 0.003*I, 0.001 + 0.001*I, 0.001 + 0.003*I, 0.0001 + 0.004*I, 0.003 + 0.006*I, 0.0001 + 0.005*I, 0.0001 + 0.003*I, 0.001 + 0.001*I, 0.001 + 0.003*I, 0.0001 + 0.004*I, 0.003 + 0.006*I, 0.0001 + 0.005*I, 0.0001 + 0.003*I, 0.001 + 0.001*I, 0.001 + 0.003*I, 0.0001 + 0.004*I, 0.003 + 0.006*I, 0.0001 + 0.005*I, 0.0001 + 0.003*I, 0.001 + 0.001*I, 0.0001 + 0.004*I, 0.003 + 0.006*I, 0.0001 + 0.005*I, 0.0001 + 0.003*I, 0.001 + 0.001*I, 0.001 + 0.003*I, 0.0001 + 0.004*I, 0.003 + 0.006*I, 0.0001 + 0.005*I, 0.0001 + 0.003*I, 0.001 + 0.001*I, 0.001 + 0.003*I, 0.0001 + 0.004*I, 0.003 + 0.006*I, 0.0001 + 0.005*I, 0.0001 + 0.003*I, 0.001 + 0.001*I, 0.001 + 0.003*I, 0.0001 + 0.004*I, 0.003 + 0.006*I, 0.0001 + 0.005*I, 0.0001 + 0.003*I, 0.001 + 0.001*I, 0.001 + 0.003*I, 0.0001 + 0.004*I, 0.003 + 0.006*I, 0.0001 + 0.005*I, 0.0001 + 0.003*I, 0.001 + 0.001*I, 0.0001 + 0.004*I, 0.003 + 0.006*I, 0.0001 + 0.005*I, 0.0001 + 0.003*I, 0.001 + 0.001*I, 0.001 + 0.003*I, 0.0001 + 0.004*I, 0.003 + 0.006*I, 0.0001 + 0.005*I, 0.0001 + 0.003*I, 0.001 + 0.001*I, 0.001 + 0.003*I, 0.0001 + 0.004*I, 0.003 + 0.006*I, 0.0001 + 0.005*I, 0.0001 + 0.003*I, 0.001 + 0.001*I, 0.001 + 0.003*I, 0.0001 + 0.004*I, 0.003 + 0.006*I, 0.0001 + 0.005*I, 0.0001 + 0.003*I, 0.001 + 0.001*I, 0.001 + 0.003*I, 0.0001 + 0.004*I, 0.003 + 0.006*I, 0.0001 + 0.005*I, 0.0001 + 0.003*I, 0.001 + 0.001*I, 0.0001 + 0.004*I, 0.003 + 0.006*I, 0.0001 + 0.005*I, 0.0001 + 0.003*I, 0.001 + 0.001*I, 0.001 + 0.003*I, 0.0001 + 0.004*I, 0.003 + 0.006*I, 0.0001 + 0.005*I, 0.0001 + 0.003*I, 0.001 + 0.001*I, 0.001 + 0.003*I, 0.0001 + 0.004*I, 0.003 + 0.006*I, 0.0001 + 0.005*I, 0.0001 + 0.003*I, 0.001 + 0.001*I, 0.001 + 0.003*I, 0.0001 + 0.004*I, 0.003 + 0.006*I, 0.0001 + 0.005*I, 0.0001 + 0.003*I, 0.001 + 0.001*I, 0.001 + 0.003*I, 0.0001 + 0.004*I, 0.003 + 0.006*I, 0.0001 + 0.005*I, 0.0001 + 0.003*I, 0.001 + 0.001*I, 0.0001 + 0.004*I, 0.003 + 0.006*I, 0.0001 + 0.005*I, 0.0001 + 0.003*I, 0.001 + 0.001*I, 0.001 + 0.003*I, 0.0001 + 0.004*I, 0.003 + 0.006*I, 0.0001 + 0.005*I, 0.0001 + 0.003*I, 0.001 + 0.001*I, 0.001 + 0.003*I, 0.0001 + 0.004*I, 0.003 + 0.006*I, 0.0001 + 0.005*I, 0.0001 + 0.003*I, 0.001 + 0.001*I, 0.001 + 0.003*I, 0.0001 + 0.004*I, 0.003 + 0.006*I, 0.0001 + 0.005*I, 0.0001 + 0.003*I, 0.001 + 0.001*I, 0.001 + 0.003*I, 0.0001 + 0.004*I, 0.003 + 0.006*I, 0.0001 + 0.005*I, 0.0001 + 0.003*I, 0.001 + 0.001*I, 0.0001 + 0.004*I, 0.003 + 0.006*I, 0.0001 + 0.005*I, 0.0001 + 0.003*I, 0.001 + 0.001*I, 0.001 + 0.003*I, 0.0001 + 0.004*I, 0.003 + 0.006*I, 0.0001 + 0.005*I, 0.0001 + 0.003*I, 0.001 + 0.001*I, 0.001 + 0.003*I, 0.0001 + 0.004*I, 0.003 + 0.006*I, 0.0001 + 0.005*I, 0.0001 + 0.003*I, 0.001 + 0.001*I, 0.001 + 0.003*I, 0.0001 + 0.004*I, 0.003 + 0.006*I, 0.0001 + 0.005*I, 0.0001 + 0.003*I, 0.001 + 0.001*I, 0.001 + 0.003*I, 0.0001 + 0.004*I, 0.003 + 0.006*I, 0.0001 + 0.005*I, 0.0001 + 0.003*I, 0.001 + 0.001*I, 0.0001 + 0.004*I, 0.003 + 0.006*I, 0.0001 + 0.005*I, 0.0001 + 0.003*I, 0.001 + 0.001*I, 0.001 + 0.003*I, 0.0001 + 0.004*I, 0.003 + 0.006*I, 0.0001 + 0.005*I, 0.0001 + 0.003*I, 0.001 + 0.001*I, 0.001 + 0.003*I, 0.0001 + 0.004*I, 0.003 + 0.006*I, 0.0001 + 0.005*I, 0.0001 + 0.003*I, 0.001 + 0.001*I, 0.001 + 0.003*I, 0.0001 + 0.004*I, 0.003 + 0.006*I, 0.0001 + 0.005*I, 0.0001 + 0.003*I, 0.001 + 0.001*I, 0.001 + 0.003*I, 0.0001 + 0.004*I, 0.003 + 0.006*I, 0.0001 + 0.005*I, 0.0001 + 0.003*I, 0.001 + 0.001*I, 0.0001 + 0.004*I, 0.003 + 0.006*I, 0.0001 + 0.005*I, 0.0001 + 0.003*I, 0.001 + 0.001*I, 0.001 + 0.003*I, 0.0001 + 0.004*I, 0.003 + 0.006*I, 0.0001 + 0.005*I, 0.0001 + 0.003*I, 0.001 + 0.001*I, 0.001 + 0.003*I, 0.0001 + 0.004*I, 0.003 + 0.006*I, 0.0001 + 0.005*I, 0.0001 + 0.003*I, 0.001 + 0.001*I, 0.001 + 0.003*I, 0.0001 + 0.004*I, 0.003 + 0.006*I, 0.0001 + 0.005*I, 0.0001 + 0.003*I, 0.001 + 0.001*I, 0.001 + 0.003*I, 0.0001 + 0.004*I, 0.003 + 0.006*I, 0.0001 + 0.005*I, 0.0001 + 0.003*I, 0.001 + 0.001*I, 0.0001 + 0.004*I, 0.003 + 0.006*I, 0.0001 + 0.005*I, 0.0001 + 0.003*I, 0.001 + 0.001*I, 0.001 + 0.003*I, 0.0001 + 0.004*I, 0.003 + 0.006*I, 0.0001 + 0.005*I, 0.0001 + 0.003*I, 0.001 + 0.001*I, 0.001 + 0.003*I, 0.0001 + 0.004*I, 0.003 + 0.006*I, 0.0001 + 0.005*I, 0.0001 + 0.003*I, 0.001 + 0.001*I, 0.001 + 0.003*I, 0.0001 + 0.004*I, 0.003 + 0.006*I, 0.0001 + 0.005*I, 0.0001 + 0.003*I, 0.001 + 0.001*I, 0.001 + 0.003*I, 0.0001 + 0.004*I, 0.003 + 0.006*I, 0.0001 + 0.005*I, 0.0001 + 0.003*I, 0.001 + 0.001*I, 0.0001 + 0.004*I, 0.003 + 0.006*I, 0.0001 + 0.005*I, 0.0001 + 0.003*I, 0.001 + 0.001*I, 0.001 + 0.003*I, 0.0001 + 0.004*I, 0.003 + 0.006*I, 0.0001 + 0.005*I, 0.0001 + 0.003*I, 0.001 + 0.001*I, 0.001 + 0.003*I, 0.0001 + 0.004*I, 0.003 + 0.006*I, 0.0001 + 0.005*I, 0.0001 + 0.003*I, 0.001 + 0.001*I, 0.001 + 0.003*I, 0.0001 + 0.004*I, 0.003 + 0.006*I, 0.0001 + 0.005*I, 0.0001 + 0.003*I, 0.001 + 0.001*I, 0.001 + 0.003*I, 0.0001 + 0.004*I, 0.003 + 0.006*I, 0.0001 + 0.005*I, 0.0001 + 0.003*I, 0.001 + 0.001*I, 0.001 + 0.003*I, 0. + 0.*I]; glob_nxt := glob_nxt + 1; it := x_delta[glob_nxt]; return it end proc #END USER DEF BLOCK #END BLOCK 3 #END USER FUNCTION BLOCK # before write_aux functions # Begin Function number 2 > display_poles := proc() > local rad_given; > global ALWAYS,glob_display_flag,glob_larger_float, glob_large_float, glob_diff_ord_fm, glob_diff_ord_fmm1, glob_diff_ord_fmm2, glob_diff_rc_fm, glob_diff_rc_fmm1, glob_diff_rc_fmm2, glob_guess_error_ord, glob_guess_error_rc, glob_type_given_pole,array_given_rad_poles,array_given_ord_poles,array_rad_test_poles,array_ord_test_poles,glob_least_3_sing,glob_least_6_sing,glob_least_given_sing,glob_least_ratio_sing,array_x ; > if ((glob_type_given_pole = 1) or (glob_type_given_pole = 2)) then # if number 1 > rad_given := float_abs(array_x[1] - (array_given_rad_poles[1,1] + array_given_rad_poles[1,2] * I )); > omniout_float(ALWAYS,"Radius of convergence (given) for eq 1 ",4,rad_given,4," "); > omniout_complex(ALWAYS,"Order of pole (given) ",4,array_given_ord_poles[1,1],4," "); > if ((float_abs(rad_given) < float_abs(glob_least_given_sing)) and > (float_abs(rad_given) > 0.0)) then # if number 2 > glob_least_given_sing := rad_given; > fi;# end if 2; > elif > (glob_type_given_pole = 3) then # if number 2 > omniout_str(ALWAYS,"NO POLE (given) for Equation 1"); > elif > (glob_type_given_pole = 5) then # if number 3 > omniout_str(ALWAYS,"SOME POLE (given) for Equation 1"); > else > omniout_str(ALWAYS,"NO INFO (given) for Equation 1"); > fi;# end if 3; > if (array_rad_test_poles[1,1] < glob_large_float) then # if number 3 > omniout_float(ALWAYS,"Radius of convergence (ratio test) for eq 1 ",4,array_rad_test_poles[1,1],4," "); > if ((float_abs(array_rad_test_poles[1,1]) < glob_least_ratio_sing)) then # if number 4 > glob_least_ratio_sing := array_rad_test_poles[1,1]; > fi;# end if 4; > omniout_complex(ALWAYS,"Order of pole (ratio test) ",4, array_ord_test_poles[1,1],4," "); > else > omniout_str(ALWAYS,"NO POLE (ratio test) for Equation 1"); > fi;# end if 3; > if ((array_rad_test_poles[1,2] > glob__small) and (array_rad_test_poles[1,2] < glob_large_float)) then # if number 3 > omniout_float(ALWAYS,"Radius of convergence (three term test) for eq 1 ",4,array_rad_test_poles[1,2],4," "); > if ((float_abs(array_rad_test_poles[1,2]) < glob_least_3_sing)) then # if number 4 > glob_least_3_sing := array_rad_test_poles[1,2]; > fi;# end if 4; > omniout_complex(ALWAYS,"Order of pole (three term test) ",4, array_ord_test_poles[1,2],4," "); > else > omniout_str(ALWAYS,"NO REAL POLE (three term test) for Equation 1"); > fi;# end if 3; > if ((array_rad_test_poles[1,3] > glob__small) and (array_rad_test_poles[1,3] < glob_large_float)) then # if number 3 > omniout_float(ALWAYS,"Radius of convergence (six term test) for eq 1 ",4,array_rad_test_poles[1,3],4," "); > if ((float_abs(array_rad_test_poles[1,3]) < glob_least_6_sing)) then # if number 4 > glob_least_6_sing := array_rad_test_poles[1,3]; > fi;# end if 4; > omniout_complex(ALWAYS,"Order of pole (six term test) ",4, array_ord_test_poles[1,3],4," "); > else > omniout_str(ALWAYS,"NO COMPLEX POLE (six term test) for Equation 1"); > fi;# end if 3 > ; > end; display_poles := proc() local rad_given; global ALWAYS, glob_display_flag, glob_larger_float, glob_large_float, glob_diff_ord_fm, glob_diff_ord_fmm1, glob_diff_ord_fmm2, glob_diff_rc_fm, glob_diff_rc_fmm1, glob_diff_rc_fmm2, glob_guess_error_ord, glob_guess_error_rc, glob_type_given_pole, array_given_rad_poles, array_given_ord_poles, array_rad_test_poles, array_ord_test_poles, glob_least_3_sing, glob_least_6_sing, glob_least_given_sing, glob_least_ratio_sing, array_x; if glob_type_given_pole = 1 or glob_type_given_pole = 2 then rad_given := float_abs(array_x[1] - array_given_rad_poles[1, 1] - array_given_rad_poles[1, 2]*I); omniout_float(ALWAYS, "Radius of convergence (given) for eq 1 ", 4, rad_given, 4, " "); omniout_complex(ALWAYS, "Order of pole (given) ", 4, array_given_ord_poles[1, 1], 4, " "); if float_abs(rad_given) < float_abs(glob_least_given_sing) and 0. < float_abs(rad_given) then glob_least_given_sing := rad_given end if elif glob_type_given_pole = 3 then omniout_str(ALWAYS, "NO POLE (given) for Equation 1") elif glob_type_given_pole = 5 then omniout_str(ALWAYS, "SOME POLE (given) for Equation 1") else omniout_str(ALWAYS, "NO INFO (given) for Equation 1") end if; if array_rad_test_poles[1, 1] < glob_large_float then omniout_float(ALWAYS, "Radius of convergence (ratio test) for eq 1 ", 4, array_rad_test_poles[1, 1], 4, " "); if float_abs(array_rad_test_poles[1, 1]) < glob_least_ratio_sing then glob_least_ratio_sing := array_rad_test_poles[1, 1] end if; omniout_complex(ALWAYS, "Order of pole (ratio test) ", 4, array_ord_test_poles[1, 1], 4, " ") else omniout_str(ALWAYS, "NO POLE (ratio test) for Equation 1") end if; if glob__small < array_rad_test_poles[1, 2] and array_rad_test_poles[1, 2] < glob_large_float then omniout_float(ALWAYS, "Radius of convergence (three term test) for eq 1 ", 4, array_rad_test_poles[1, 2], 4, " "); if float_abs(array_rad_test_poles[1, 2]) < glob_least_3_sing then glob_least_3_sing := array_rad_test_poles[1, 2] end if; omniout_complex(ALWAYS, "Order of pole (three term test) ", 4, array_ord_test_poles[1, 2], 4, " ") else omniout_str(ALWAYS, "NO REAL POLE (three term test) for Equation 1") end if; if glob__small < array_rad_test_poles[1, 3] and array_rad_test_poles[1, 3] < glob_large_float then omniout_float(ALWAYS, "Radius of convergence (six term test) for eq 1 ", 4, array_rad_test_poles[1, 3], 4, " "); if float_abs(array_rad_test_poles[1, 3]) < glob_least_6_sing then glob_least_6_sing := array_rad_test_poles[1, 3] end if; omniout_complex(ALWAYS, "Order of pole (six term test) ", 4, array_ord_test_poles[1, 3], 4, " ") else omniout_str(ALWAYS, "NO COMPLEX POLE (six term test) for Equation 1") end if end proc # End Function number 2 # Begin Function number 3 > my_check_sign := proc( x0 ,xf) > local ret; > if (xf > x0) then # if number 3 > ret := glob__1; > else > ret := glob__m1; > fi;# end if 3; > ret;; > end; my_check_sign := proc(x0, xf) local ret; if x0 < xf then ret := glob__1 else ret := glob__m1 end if; ret end proc # End Function number 3 # Begin Function number 4 > est_size_answer := proc() > global > ALWAYS, > INFO, > DEBUGL, > DEBUGMASSIVE, > glob_iolevel, > glob_yes_pole, > glob_no_pole, > glob_not_given, > glob_no_sing_tests, > glob_ratio_test, > glob_three_term_test, > glob_six_term_test, > glob_log_10, #Top Generate Globals Decl > MAX_UNCHANGED, > glob__small, > glob_small_float, > glob_smallish_float, > glob_large_float, > glob_larger_float, > glob__m2, > glob__m1, > glob__0, > glob__1, > glob__2, > glob__3, > glob__4, > glob__5, > glob__8, > glob__10, > glob__100, > glob__pi, > glob__0_5, > glob__0_8, > glob__m0_8, > glob__0_25, > glob__0_125, > glob_h, > glob_nxt, > glob_prec, > glob_check_sign, > glob_desired_digits_correct, > glob_max_estimated_step_error, > glob_ratio_of_radius, > glob_percent_done, > glob_total_exp_sec, > glob_optimal_expect_sec, > glob_estimated_size_answer, > glob_almost_1, > glob_clock_sec, > glob_clock_start_sec, > glob_disp_incr, > glob_diff_rc_fm, > glob_diff_rc_fmm1, > glob_diff_rc_fmm2, > glob_diff_ord_fm, > glob_diff_ord_fmm1, > glob_diff_ord_fmm2, > glob_six_term_ord_save, > glob_guess_error_rc, > glob_guess_error_ord, > glob_least_given_sing, > glob_least_ratio_sing, > glob_least_3_sing, > glob_least_6_sing, > glob_last_good_h, > glob_max_h, > glob_min_h, > glob_display_interval, > glob_abserr, > glob_relerr, > glob_min_pole_est, > glob_max_rel_trunc_err, > glob_max_trunc_err, > glob_max_hours, > glob_optimal_clock_start_sec, > glob_optimal_start, > glob_upper_ratio_limit, > glob_lower_ratio_limit, > glob_max_sec, > glob_orig_start_sec, > glob_normmax, > glob_max_minutes, > glob_next_display, > glob_est_digits, > glob_subiter_method, > glob_html_log, > glob_min_good_digits, > glob_good_digits, > glob_min_apfp_est_good_digits, > glob_apfp_est_good_digits, > glob_max_opt_iter, > glob_dump, > glob_djd_debug, > glob_display_flag, > glob_djd_debug2, > glob_h_reason, > glob_sec_in_minute, > glob_min_in_hour, > glob_hours_in_day, > glob_days_in_year, > glob_sec_in_hour, > glob_sec_in_day, > glob_sec_in_year, > glob_not_yet_finished, > glob_initial_pass, > glob_not_yet_start_msg, > glob_reached_optimal_h, > glob_optimal_done, > glob_type_given_pole, > glob_optimize, > glob_look_poles, > glob_dump_closed_form, > glob_max_iter, > glob_no_eqs, > glob_unchanged_h_cnt, > glob_warned, > glob_warned2, > glob_start, > glob_iter, #Bottom Generate Globals Decl #BEGIN CONST > array_const_1, > array_const_0D0, > array_const_3D0, > array_const_1D0, #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_a1, > array_tmp3_a2, > array_tmp3, > array_tmp4, > array_m1, > array_y_higher, > array_y_higher_work, > array_y_higher_work2, > array_y_set_initial, > array_given_rad_poles, > array_given_ord_poles, > array_rad_test_poles, > array_ord_test_poles, > array_fact_2, > ATS_MAX_TERMS, > glob_last; > local min_size; > min_size := glob_estimated_size_answer; > if (float_abs(array_y[1]) < min_size) then # if number 3 > min_size := float_abs(array_y[1]); > omniout_float(ALWAYS,"min_size",32,min_size,32,""); > fi;# end if 3; > if (min_size < glob__1) then # if number 3 > min_size := glob__1; > omniout_float(ALWAYS,"min_size",32,min_size,32,""); > fi;# end if 3; > min_size; > end; est_size_answer := proc() local min_size; global ALWAYS, INFO, DEBUGL, DEBUGMASSIVE, glob_iolevel, glob_yes_pole, glob_no_pole, glob_not_given, glob_no_sing_tests, glob_ratio_test, glob_three_term_test, glob_six_term_test, glob_log_10, MAX_UNCHANGED, glob__small, glob_small_float, glob_smallish_float, glob_large_float, glob_larger_float, glob__m2, glob__m1, glob__0, glob__1, glob__2, glob__3, glob__4, glob__5, glob__8, glob__10, glob__100, glob__pi, glob__0_5, glob__0_8, glob__m0_8, glob__0_25, glob__0_125, glob_h, glob_nxt, glob_prec, glob_check_sign, glob_desired_digits_correct, glob_max_estimated_step_error, glob_ratio_of_radius, glob_percent_done, glob_total_exp_sec, glob_optimal_expect_sec, glob_estimated_size_answer, glob_almost_1, glob_clock_sec, glob_clock_start_sec, glob_disp_incr, glob_diff_rc_fm, glob_diff_rc_fmm1, glob_diff_rc_fmm2, glob_diff_ord_fm, glob_diff_ord_fmm1, glob_diff_ord_fmm2, glob_six_term_ord_save, glob_guess_error_rc, glob_guess_error_ord, glob_least_given_sing, glob_least_ratio_sing, glob_least_3_sing, glob_least_6_sing, glob_last_good_h, glob_max_h, glob_min_h, glob_display_interval, glob_abserr, glob_relerr, glob_min_pole_est, glob_max_rel_trunc_err, glob_max_trunc_err, glob_max_hours, glob_optimal_clock_start_sec, glob_optimal_start, glob_upper_ratio_limit, glob_lower_ratio_limit, glob_max_sec, glob_orig_start_sec, glob_normmax, glob_max_minutes, glob_next_display, glob_est_digits, glob_subiter_method, glob_html_log, glob_min_good_digits, glob_good_digits, glob_min_apfp_est_good_digits, glob_apfp_est_good_digits, glob_max_opt_iter, glob_dump, glob_djd_debug, glob_display_flag, glob_djd_debug2, glob_h_reason, glob_sec_in_minute, glob_min_in_hour, glob_hours_in_day, glob_days_in_year, glob_sec_in_hour, glob_sec_in_day, glob_sec_in_year, glob_not_yet_finished, glob_initial_pass, glob_not_yet_start_msg, glob_reached_optimal_h, glob_optimal_done, glob_type_given_pole, glob_optimize, glob_look_poles, glob_dump_closed_form, glob_max_iter, glob_no_eqs, glob_unchanged_h_cnt, glob_warned, glob_warned2, glob_start, glob_iter, array_const_1, array_const_0D0, array_const_3D0, array_const_1D0, 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_a1, array_tmp3_a2, array_tmp3, array_tmp4, array_m1, array_y_higher, array_y_higher_work, array_y_higher_work2, array_y_set_initial, array_given_rad_poles, array_given_ord_poles, array_rad_test_poles, array_ord_test_poles, array_fact_2, ATS_MAX_TERMS, glob_last; min_size := glob_estimated_size_answer; if float_abs(array_y[1]) < min_size then min_size := float_abs(array_y[1]); omniout_float(ALWAYS, "min_size", 32, min_size, 32, "") end if; if min_size < glob__1 then min_size := glob__1; omniout_float(ALWAYS, "min_size", 32, min_size, 32, "") end if; min_size end proc # End Function number 4 # Begin Function number 5 > test_suggested_h := proc() > global > ALWAYS, > INFO, > DEBUGL, > DEBUGMASSIVE, > glob_iolevel, > glob_yes_pole, > glob_no_pole, > glob_not_given, > glob_no_sing_tests, > glob_ratio_test, > glob_three_term_test, > glob_six_term_test, > glob_log_10, #Top Generate Globals Decl > MAX_UNCHANGED, > glob__small, > glob_small_float, > glob_smallish_float, > glob_large_float, > glob_larger_float, > glob__m2, > glob__m1, > glob__0, > glob__1, > glob__2, > glob__3, > glob__4, > glob__5, > glob__8, > glob__10, > glob__100, > glob__pi, > glob__0_5, > glob__0_8, > glob__m0_8, > glob__0_25, > glob__0_125, > glob_h, > glob_nxt, > glob_prec, > glob_check_sign, > glob_desired_digits_correct, > glob_max_estimated_step_error, > glob_ratio_of_radius, > glob_percent_done, > glob_total_exp_sec, > glob_optimal_expect_sec, > glob_estimated_size_answer, > glob_almost_1, > glob_clock_sec, > glob_clock_start_sec, > glob_disp_incr, > glob_diff_rc_fm, > glob_diff_rc_fmm1, > glob_diff_rc_fmm2, > glob_diff_ord_fm, > glob_diff_ord_fmm1, > glob_diff_ord_fmm2, > glob_six_term_ord_save, > glob_guess_error_rc, > glob_guess_error_ord, > glob_least_given_sing, > glob_least_ratio_sing, > glob_least_3_sing, > glob_least_6_sing, > glob_last_good_h, > glob_max_h, > glob_min_h, > glob_display_interval, > glob_abserr, > glob_relerr, > glob_min_pole_est, > glob_max_rel_trunc_err, > glob_max_trunc_err, > glob_max_hours, > glob_optimal_clock_start_sec, > glob_optimal_start, > glob_upper_ratio_limit, > glob_lower_ratio_limit, > glob_max_sec, > glob_orig_start_sec, > glob_normmax, > glob_max_minutes, > glob_next_display, > glob_est_digits, > glob_subiter_method, > glob_html_log, > glob_min_good_digits, > glob_good_digits, > glob_min_apfp_est_good_digits, > glob_apfp_est_good_digits, > glob_max_opt_iter, > glob_dump, > glob_djd_debug, > glob_display_flag, > glob_djd_debug2, > glob_h_reason, > glob_sec_in_minute, > glob_min_in_hour, > glob_hours_in_day, > glob_days_in_year, > glob_sec_in_hour, > glob_sec_in_day, > glob_sec_in_year, > glob_not_yet_finished, > glob_initial_pass, > glob_not_yet_start_msg, > glob_reached_optimal_h, > glob_optimal_done, > glob_type_given_pole, > glob_optimize, > glob_look_poles, > glob_dump_closed_form, > glob_max_iter, > glob_no_eqs, > glob_unchanged_h_cnt, > glob_warned, > glob_warned2, > glob_start, > glob_iter, #Bottom Generate Globals Decl #BEGIN CONST > array_const_1, > array_const_0D0, > array_const_3D0, > array_const_1D0, #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_a1, > array_tmp3_a2, > array_tmp3, > array_tmp4, > array_m1, > array_y_higher, > array_y_higher_work, > array_y_higher_work2, > array_y_set_initial, > array_given_rad_poles, > array_given_ord_poles, > array_rad_test_poles, > array_ord_test_poles, > array_fact_2, > ATS_MAX_TERMS, > glob_last; > local max_estimated_step_error,hn_div_ho,hn_div_ho_2,hn_div_ho_3,no_terms,est_tmp; > max_estimated_step_error := glob__small; > no_terms := ATS_MAX_TERMS; > hn_div_ho := glob__0_5; > hn_div_ho_2 := glob__0_25; > hn_div_ho_3 := glob__0_125; > omniout_float(ALWAYS,"hn_div_ho",32,hn_div_ho,32,""); > omniout_float(ALWAYS,"hn_div_ho_2",32,hn_div_ho_2,32,""); > omniout_float(ALWAYS,"hn_div_ho_3",32,hn_div_ho_3,32,""); > est_tmp := float_abs(array_y[no_terms-3] + array_y[no_terms - 2] * hn_div_ho + array_y[no_terms - 1] * hn_div_ho_2 + array_y[no_terms] * hn_div_ho_3); > if (est_tmp >= max_estimated_step_error) then # if number 3 > max_estimated_step_error := est_tmp; > fi;# end if 3; > omniout_float(ALWAYS,"max_estimated_step_error",32,max_estimated_step_error,32,""); > max_estimated_step_error; > end; test_suggested_h := proc() local max_estimated_step_error, hn_div_ho, hn_div_ho_2, hn_div_ho_3, no_terms, est_tmp; global ALWAYS, INFO, DEBUGL, DEBUGMASSIVE, glob_iolevel, glob_yes_pole, glob_no_pole, glob_not_given, glob_no_sing_tests, glob_ratio_test, glob_three_term_test, glob_six_term_test, glob_log_10, MAX_UNCHANGED, glob__small, glob_small_float, glob_smallish_float, glob_large_float, glob_larger_float, glob__m2, glob__m1, glob__0, glob__1, glob__2, glob__3, glob__4, glob__5, glob__8, glob__10, glob__100, glob__pi, glob__0_5, glob__0_8, glob__m0_8, glob__0_25, glob__0_125, glob_h, glob_nxt, glob_prec, glob_check_sign, glob_desired_digits_correct, glob_max_estimated_step_error, glob_ratio_of_radius, glob_percent_done, glob_total_exp_sec, glob_optimal_expect_sec, glob_estimated_size_answer, glob_almost_1, glob_clock_sec, glob_clock_start_sec, glob_disp_incr, glob_diff_rc_fm, glob_diff_rc_fmm1, glob_diff_rc_fmm2, glob_diff_ord_fm, glob_diff_ord_fmm1, glob_diff_ord_fmm2, glob_six_term_ord_save, glob_guess_error_rc, glob_guess_error_ord, glob_least_given_sing, glob_least_ratio_sing, glob_least_3_sing, glob_least_6_sing, glob_last_good_h, glob_max_h, glob_min_h, glob_display_interval, glob_abserr, glob_relerr, glob_min_pole_est, glob_max_rel_trunc_err, glob_max_trunc_err, glob_max_hours, glob_optimal_clock_start_sec, glob_optimal_start, glob_upper_ratio_limit, glob_lower_ratio_limit, glob_max_sec, glob_orig_start_sec, glob_normmax, glob_max_minutes, glob_next_display, glob_est_digits, glob_subiter_method, glob_html_log, glob_min_good_digits, glob_good_digits, glob_min_apfp_est_good_digits, glob_apfp_est_good_digits, glob_max_opt_iter, glob_dump, glob_djd_debug, glob_display_flag, glob_djd_debug2, glob_h_reason, glob_sec_in_minute, glob_min_in_hour, glob_hours_in_day, glob_days_in_year, glob_sec_in_hour, glob_sec_in_day, glob_sec_in_year, glob_not_yet_finished, glob_initial_pass, glob_not_yet_start_msg, glob_reached_optimal_h, glob_optimal_done, glob_type_given_pole, glob_optimize, glob_look_poles, glob_dump_closed_form, glob_max_iter, glob_no_eqs, glob_unchanged_h_cnt, glob_warned, glob_warned2, glob_start, glob_iter, array_const_1, array_const_0D0, array_const_3D0, array_const_1D0, 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_a1, array_tmp3_a2, array_tmp3, array_tmp4, array_m1, array_y_higher, array_y_higher_work, array_y_higher_work2, array_y_set_initial, array_given_rad_poles, array_given_ord_poles, array_rad_test_poles, array_ord_test_poles, array_fact_2, ATS_MAX_TERMS, glob_last; max_estimated_step_error := glob__small; no_terms := ATS_MAX_TERMS; hn_div_ho := glob__0_5; hn_div_ho_2 := glob__0_25; hn_div_ho_3 := glob__0_125; omniout_float(ALWAYS, "hn_div_ho", 32, hn_div_ho, 32, ""); omniout_float(ALWAYS, "hn_div_ho_2", 32, hn_div_ho_2, 32, ""); omniout_float(ALWAYS, "hn_div_ho_3", 32, hn_div_ho_3, 32, ""); est_tmp := float_abs(array_y[no_terms - 3] + array_y[no_terms - 2]*hn_div_ho + array_y[no_terms - 1]*hn_div_ho_2 + array_y[no_terms]*hn_div_ho_3); if max_estimated_step_error <= est_tmp then max_estimated_step_error := est_tmp end if; omniout_float(ALWAYS, "max_estimated_step_error", 32, max_estimated_step_error, 32, ""); max_estimated_step_error end proc # End Function number 5 # Begin Function number 6 > track_estimated_error := proc() > global > ALWAYS, > INFO, > DEBUGL, > DEBUGMASSIVE, > glob_iolevel, > glob_yes_pole, > glob_no_pole, > glob_not_given, > glob_no_sing_tests, > glob_ratio_test, > glob_three_term_test, > glob_six_term_test, > glob_log_10, #Top Generate Globals Decl > MAX_UNCHANGED, > glob__small, > glob_small_float, > glob_smallish_float, > glob_large_float, > glob_larger_float, > glob__m2, > glob__m1, > glob__0, > glob__1, > glob__2, > glob__3, > glob__4, > glob__5, > glob__8, > glob__10, > glob__100, > glob__pi, > glob__0_5, > glob__0_8, > glob__m0_8, > glob__0_25, > glob__0_125, > glob_h, > glob_nxt, > glob_prec, > glob_check_sign, > glob_desired_digits_correct, > glob_max_estimated_step_error, > glob_ratio_of_radius, > glob_percent_done, > glob_total_exp_sec, > glob_optimal_expect_sec, > glob_estimated_size_answer, > glob_almost_1, > glob_clock_sec, > glob_clock_start_sec, > glob_disp_incr, > glob_diff_rc_fm, > glob_diff_rc_fmm1, > glob_diff_rc_fmm2, > glob_diff_ord_fm, > glob_diff_ord_fmm1, > glob_diff_ord_fmm2, > glob_six_term_ord_save, > glob_guess_error_rc, > glob_guess_error_ord, > glob_least_given_sing, > glob_least_ratio_sing, > glob_least_3_sing, > glob_least_6_sing, > glob_last_good_h, > glob_max_h, > glob_min_h, > glob_display_interval, > glob_abserr, > glob_relerr, > glob_min_pole_est, > glob_max_rel_trunc_err, > glob_max_trunc_err, > glob_max_hours, > glob_optimal_clock_start_sec, > glob_optimal_start, > glob_upper_ratio_limit, > glob_lower_ratio_limit, > glob_max_sec, > glob_orig_start_sec, > glob_normmax, > glob_max_minutes, > glob_next_display, > glob_est_digits, > glob_subiter_method, > glob_html_log, > glob_min_good_digits, > glob_good_digits, > glob_min_apfp_est_good_digits, > glob_apfp_est_good_digits, > glob_max_opt_iter, > glob_dump, > glob_djd_debug, > glob_display_flag, > glob_djd_debug2, > glob_h_reason, > glob_sec_in_minute, > glob_min_in_hour, > glob_hours_in_day, > glob_days_in_year, > glob_sec_in_hour, > glob_sec_in_day, > glob_sec_in_year, > glob_not_yet_finished, > glob_initial_pass, > glob_not_yet_start_msg, > glob_reached_optimal_h, > glob_optimal_done, > glob_type_given_pole, > glob_optimize, > glob_look_poles, > glob_dump_closed_form, > glob_max_iter, > glob_no_eqs, > glob_unchanged_h_cnt, > glob_warned, > glob_warned2, > glob_start, > glob_iter, #Bottom Generate Globals Decl #BEGIN CONST > array_const_1, > array_const_0D0, > array_const_3D0, > array_const_1D0, #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_a1, > array_tmp3_a2, > array_tmp3, > array_tmp4, > array_m1, > array_y_higher, > array_y_higher_work, > array_y_higher_work2, > array_y_set_initial, > array_given_rad_poles, > array_given_ord_poles, > array_rad_test_poles, > array_ord_test_poles, > array_fact_2, > ATS_MAX_TERMS, > glob_last; > local hn_div_ho,hn_div_ho_2,hn_div_ho_3,no_terms,est_tmp; > no_terms := ATS_MAX_TERMS; > hn_div_ho := glob__0_5; > hn_div_ho_2 := glob__0_25; > hn_div_ho_3 := glob__0_125; > est_tmp := c(float_abs(array_y[no_terms-3])) + c(float_abs(array_y[no_terms - 2])) * c(hn_div_ho) + c(float_abs(array_y[no_terms - 1])) * c(hn_div_ho_2) + c(float_abs(array_y[no_terms])) * c(hn_div_ho_3); > if (glob_prec * c(float_abs(array_y[1])) > c(est_tmp)) then # if number 3 > est_tmp := c(glob_prec) * c(float_abs(array_y[1])); > fi;# end if 3; > if (c(est_tmp) >= c(array_max_est_error[1])) then # if number 3 > array_max_est_error[1] := c(est_tmp); > fi;# end if 3 > ; > end; track_estimated_error := proc() local hn_div_ho, hn_div_ho_2, hn_div_ho_3, no_terms, est_tmp; global ALWAYS, INFO, DEBUGL, DEBUGMASSIVE, glob_iolevel, glob_yes_pole, glob_no_pole, glob_not_given, glob_no_sing_tests, glob_ratio_test, glob_three_term_test, glob_six_term_test, glob_log_10, MAX_UNCHANGED, glob__small, glob_small_float, glob_smallish_float, glob_large_float, glob_larger_float, glob__m2, glob__m1, glob__0, glob__1, glob__2, glob__3, glob__4, glob__5, glob__8, glob__10, glob__100, glob__pi, glob__0_5, glob__0_8, glob__m0_8, glob__0_25, glob__0_125, glob_h, glob_nxt, glob_prec, glob_check_sign, glob_desired_digits_correct, glob_max_estimated_step_error, glob_ratio_of_radius, glob_percent_done, glob_total_exp_sec, glob_optimal_expect_sec, glob_estimated_size_answer, glob_almost_1, glob_clock_sec, glob_clock_start_sec, glob_disp_incr, glob_diff_rc_fm, glob_diff_rc_fmm1, glob_diff_rc_fmm2, glob_diff_ord_fm, glob_diff_ord_fmm1, glob_diff_ord_fmm2, glob_six_term_ord_save, glob_guess_error_rc, glob_guess_error_ord, glob_least_given_sing, glob_least_ratio_sing, glob_least_3_sing, glob_least_6_sing, glob_last_good_h, glob_max_h, glob_min_h, glob_display_interval, glob_abserr, glob_relerr, glob_min_pole_est, glob_max_rel_trunc_err, glob_max_trunc_err, glob_max_hours, glob_optimal_clock_start_sec, glob_optimal_start, glob_upper_ratio_limit, glob_lower_ratio_limit, glob_max_sec, glob_orig_start_sec, glob_normmax, glob_max_minutes, glob_next_display, glob_est_digits, glob_subiter_method, glob_html_log, glob_min_good_digits, glob_good_digits, glob_min_apfp_est_good_digits, glob_apfp_est_good_digits, glob_max_opt_iter, glob_dump, glob_djd_debug, glob_display_flag, glob_djd_debug2, glob_h_reason, glob_sec_in_minute, glob_min_in_hour, glob_hours_in_day, glob_days_in_year, glob_sec_in_hour, glob_sec_in_day, glob_sec_in_year, glob_not_yet_finished, glob_initial_pass, glob_not_yet_start_msg, glob_reached_optimal_h, glob_optimal_done, glob_type_given_pole, glob_optimize, glob_look_poles, glob_dump_closed_form, glob_max_iter, glob_no_eqs, glob_unchanged_h_cnt, glob_warned, glob_warned2, glob_start, glob_iter, array_const_1, array_const_0D0, array_const_3D0, array_const_1D0, 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_a1, array_tmp3_a2, array_tmp3, array_tmp4, array_m1, array_y_higher, array_y_higher_work, array_y_higher_work2, array_y_set_initial, array_given_rad_poles, array_given_ord_poles, array_rad_test_poles, array_ord_test_poles, array_fact_2, ATS_MAX_TERMS, glob_last; no_terms := ATS_MAX_TERMS; hn_div_ho := glob__0_5; hn_div_ho_2 := glob__0_25; hn_div_ho_3 := glob__0_125; est_tmp := c(float_abs(array_y[no_terms - 3])) + c(float_abs(array_y[no_terms - 2]))*c(hn_div_ho) + c(float_abs(array_y[no_terms - 1]))*c(hn_div_ho_2) + c(float_abs(array_y[no_terms]))*c(hn_div_ho_3); if c(est_tmp) < glob_prec*c(float_abs(array_y[1])) then est_tmp := c(glob_prec)*c(float_abs(array_y[1])) end if; if c(array_max_est_error[1]) <= c(est_tmp) then array_max_est_error[1] := c(est_tmp) end if end proc # End Function number 6 # Begin Function number 7 > reached_interval := proc() > global > ALWAYS, > INFO, > DEBUGL, > DEBUGMASSIVE, > glob_iolevel, > glob_yes_pole, > glob_no_pole, > glob_not_given, > glob_no_sing_tests, > glob_ratio_test, > glob_three_term_test, > glob_six_term_test, > glob_log_10, #Top Generate Globals Decl > MAX_UNCHANGED, > glob__small, > glob_small_float, > glob_smallish_float, > glob_large_float, > glob_larger_float, > glob__m2, > glob__m1, > glob__0, > glob__1, > glob__2, > glob__3, > glob__4, > glob__5, > glob__8, > glob__10, > glob__100, > glob__pi, > glob__0_5, > glob__0_8, > glob__m0_8, > glob__0_25, > glob__0_125, > glob_h, > glob_nxt, > glob_prec, > glob_check_sign, > glob_desired_digits_correct, > glob_max_estimated_step_error, > glob_ratio_of_radius, > glob_percent_done, > glob_total_exp_sec, > glob_optimal_expect_sec, > glob_estimated_size_answer, > glob_almost_1, > glob_clock_sec, > glob_clock_start_sec, > glob_disp_incr, > glob_diff_rc_fm, > glob_diff_rc_fmm1, > glob_diff_rc_fmm2, > glob_diff_ord_fm, > glob_diff_ord_fmm1, > glob_diff_ord_fmm2, > glob_six_term_ord_save, > glob_guess_error_rc, > glob_guess_error_ord, > glob_least_given_sing, > glob_least_ratio_sing, > glob_least_3_sing, > glob_least_6_sing, > glob_last_good_h, > glob_max_h, > glob_min_h, > glob_display_interval, > glob_abserr, > glob_relerr, > glob_min_pole_est, > glob_max_rel_trunc_err, > glob_max_trunc_err, > glob_max_hours, > glob_optimal_clock_start_sec, > glob_optimal_start, > glob_upper_ratio_limit, > glob_lower_ratio_limit, > glob_max_sec, > glob_orig_start_sec, > glob_normmax, > glob_max_minutes, > glob_next_display, > glob_est_digits, > glob_subiter_method, > glob_html_log, > glob_min_good_digits, > glob_good_digits, > glob_min_apfp_est_good_digits, > glob_apfp_est_good_digits, > glob_max_opt_iter, > glob_dump, > glob_djd_debug, > glob_display_flag, > glob_djd_debug2, > glob_h_reason, > glob_sec_in_minute, > glob_min_in_hour, > glob_hours_in_day, > glob_days_in_year, > glob_sec_in_hour, > glob_sec_in_day, > glob_sec_in_year, > glob_not_yet_finished, > glob_initial_pass, > glob_not_yet_start_msg, > glob_reached_optimal_h, > glob_optimal_done, > glob_type_given_pole, > glob_optimize, > glob_look_poles, > glob_dump_closed_form, > glob_max_iter, > glob_no_eqs, > glob_unchanged_h_cnt, > glob_warned, > glob_warned2, > glob_start, > glob_iter, #Bottom Generate Globals Decl #BEGIN CONST > array_const_1, > array_const_0D0, > array_const_3D0, > array_const_1D0, #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_a1, > array_tmp3_a2, > array_tmp3, > array_tmp4, > array_m1, > array_y_higher, > array_y_higher_work, > array_y_higher_work2, > array_y_set_initial, > array_given_rad_poles, > array_given_ord_poles, > array_rad_test_poles, > array_ord_test_poles, > array_fact_2, > ATS_MAX_TERMS, > glob_last; > local ret; > if ((glob_check_sign * array_x[1]) >= (glob_check_sign * glob_next_display - glob_h/glob__10)) then # if number 3 > ret := true; > else > ret := false; > fi;# end if 3; > return(ret); > end; reached_interval := proc() local ret; global ALWAYS, INFO, DEBUGL, DEBUGMASSIVE, glob_iolevel, glob_yes_pole, glob_no_pole, glob_not_given, glob_no_sing_tests, glob_ratio_test, glob_three_term_test, glob_six_term_test, glob_log_10, MAX_UNCHANGED, glob__small, glob_small_float, glob_smallish_float, glob_large_float, glob_larger_float, glob__m2, glob__m1, glob__0, glob__1, glob__2, glob__3, glob__4, glob__5, glob__8, glob__10, glob__100, glob__pi, glob__0_5, glob__0_8, glob__m0_8, glob__0_25, glob__0_125, glob_h, glob_nxt, glob_prec, glob_check_sign, glob_desired_digits_correct, glob_max_estimated_step_error, glob_ratio_of_radius, glob_percent_done, glob_total_exp_sec, glob_optimal_expect_sec, glob_estimated_size_answer, glob_almost_1, glob_clock_sec, glob_clock_start_sec, glob_disp_incr, glob_diff_rc_fm, glob_diff_rc_fmm1, glob_diff_rc_fmm2, glob_diff_ord_fm, glob_diff_ord_fmm1, glob_diff_ord_fmm2, glob_six_term_ord_save, glob_guess_error_rc, glob_guess_error_ord, glob_least_given_sing, glob_least_ratio_sing, glob_least_3_sing, glob_least_6_sing, glob_last_good_h, glob_max_h, glob_min_h, glob_display_interval, glob_abserr, glob_relerr, glob_min_pole_est, glob_max_rel_trunc_err, glob_max_trunc_err, glob_max_hours, glob_optimal_clock_start_sec, glob_optimal_start, glob_upper_ratio_limit, glob_lower_ratio_limit, glob_max_sec, glob_orig_start_sec, glob_normmax, glob_max_minutes, glob_next_display, glob_est_digits, glob_subiter_method, glob_html_log, glob_min_good_digits, glob_good_digits, glob_min_apfp_est_good_digits, glob_apfp_est_good_digits, glob_max_opt_iter, glob_dump, glob_djd_debug, glob_display_flag, glob_djd_debug2, glob_h_reason, glob_sec_in_minute, glob_min_in_hour, glob_hours_in_day, glob_days_in_year, glob_sec_in_hour, glob_sec_in_day, glob_sec_in_year, glob_not_yet_finished, glob_initial_pass, glob_not_yet_start_msg, glob_reached_optimal_h, glob_optimal_done, glob_type_given_pole, glob_optimize, glob_look_poles, glob_dump_closed_form, glob_max_iter, glob_no_eqs, glob_unchanged_h_cnt, glob_warned, glob_warned2, glob_start, glob_iter, array_const_1, array_const_0D0, array_const_3D0, array_const_1D0, 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_a1, array_tmp3_a2, array_tmp3, array_tmp4, array_m1, array_y_higher, array_y_higher_work, array_y_higher_work2, array_y_set_initial, array_given_rad_poles, array_given_ord_poles, array_rad_test_poles, array_ord_test_poles, array_fact_2, ATS_MAX_TERMS, glob_last; if glob_check_sign*glob_next_display - glob_h/glob__10 <= glob_check_sign*array_x[1] then ret := true else ret := false end if; return ret end proc # End Function number 7 # Begin Function number 8 > display_alot := proc(iter) > global > ALWAYS, > INFO, > DEBUGL, > DEBUGMASSIVE, > glob_iolevel, > glob_yes_pole, > glob_no_pole, > glob_not_given, > glob_no_sing_tests, > glob_ratio_test, > glob_three_term_test, > glob_six_term_test, > glob_log_10, #Top Generate Globals Decl > MAX_UNCHANGED, > glob__small, > glob_small_float, > glob_smallish_float, > glob_large_float, > glob_larger_float, > glob__m2, > glob__m1, > glob__0, > glob__1, > glob__2, > glob__3, > glob__4, > glob__5, > glob__8, > glob__10, > glob__100, > glob__pi, > glob__0_5, > glob__0_8, > glob__m0_8, > glob__0_25, > glob__0_125, > glob_h, > glob_nxt, > glob_prec, > glob_check_sign, > glob_desired_digits_correct, > glob_max_estimated_step_error, > glob_ratio_of_radius, > glob_percent_done, > glob_total_exp_sec, > glob_optimal_expect_sec, > glob_estimated_size_answer, > glob_almost_1, > glob_clock_sec, > glob_clock_start_sec, > glob_disp_incr, > glob_diff_rc_fm, > glob_diff_rc_fmm1, > glob_diff_rc_fmm2, > glob_diff_ord_fm, > glob_diff_ord_fmm1, > glob_diff_ord_fmm2, > glob_six_term_ord_save, > glob_guess_error_rc, > glob_guess_error_ord, > glob_least_given_sing, > glob_least_ratio_sing, > glob_least_3_sing, > glob_least_6_sing, > glob_last_good_h, > glob_max_h, > glob_min_h, > glob_display_interval, > glob_abserr, > glob_relerr, > glob_min_pole_est, > glob_max_rel_trunc_err, > glob_max_trunc_err, > glob_max_hours, > glob_optimal_clock_start_sec, > glob_optimal_start, > glob_upper_ratio_limit, > glob_lower_ratio_limit, > glob_max_sec, > glob_orig_start_sec, > glob_normmax, > glob_max_minutes, > glob_next_display, > glob_est_digits, > glob_subiter_method, > glob_html_log, > glob_min_good_digits, > glob_good_digits, > glob_min_apfp_est_good_digits, > glob_apfp_est_good_digits, > glob_max_opt_iter, > glob_dump, > glob_djd_debug, > glob_display_flag, > glob_djd_debug2, > glob_h_reason, > glob_sec_in_minute, > glob_min_in_hour, > glob_hours_in_day, > glob_days_in_year, > glob_sec_in_hour, > glob_sec_in_day, > glob_sec_in_year, > glob_not_yet_finished, > glob_initial_pass, > glob_not_yet_start_msg, > glob_reached_optimal_h, > glob_optimal_done, > glob_type_given_pole, > glob_optimize, > glob_look_poles, > glob_dump_closed_form, > glob_max_iter, > glob_no_eqs, > glob_unchanged_h_cnt, > glob_warned, > glob_warned2, > glob_start, > glob_iter, #Bottom Generate Globals Decl #BEGIN CONST > array_const_1, > array_const_0D0, > array_const_3D0, > array_const_1D0, #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_a1, > array_tmp3_a2, > array_tmp3, > array_tmp4, > array_m1, > array_y_higher, > array_y_higher_work, > array_y_higher_work2, > array_y_set_initial, > array_given_rad_poles, > array_given_ord_poles, > array_rad_test_poles, > array_ord_test_poles, > array_fact_2, > ATS_MAX_TERMS, > glob_last; > local abserr, closed_form_val_y, ind_var, numeric_val, relerr, term_no, est_rel_err; > #TOP DISPLAY ALOT > ind_var := array_x[1]; > omniout_complex(ALWAYS,"x[1] ",33,ind_var,20," "); > term_no := 1; > numeric_val := array_y[term_no]; > omniout_complex(ALWAYS,"h ",33,glob_h,20," "); > omniout_complex(ALWAYS,"y[1] (numeric) ",33,numeric_val,20," "); > closed_form_val_y := evalf(exact_soln_y(ind_var)); > omniout_complex(ALWAYS,"y[1] (closed_form) ",33,closed_form_val_y,20," "); > abserr := float_abs(numeric_val - closed_form_val_y); > if (float_abs(closed_form_val_y) > 0.0) then # if number 3 > relerr := abserr/float_abs(closed_form_val_y); > if (float_abs(c(relerr)) > 0.0) then # if number 4 > glob_good_digits := round(-log10(relerr)); > else > relerr := 0.0 ; > glob_good_digits := Digits - 2; > fi;# end if 4; > else > ; > relerr := glob__m1 ; > glob_good_digits := -16; > fi;# end if 3; > if (glob_good_digits < glob_min_good_digits) then # if number 3 > glob_min_good_digits := glob_good_digits; > fi;# end if 3; > omniout_float(ALWAYS,"absolute error ",4,abserr,4," "); > omniout_float(ALWAYS,"relative error ",4,relerr * glob__100 ,4,"%"); > omniout_int(INFO,"Correct digits ",32,glob_good_digits,4," ") > ; > #BOTTOM DISPLAY ALOT > end; display_alot := proc(iter) local abserr, closed_form_val_y, ind_var, numeric_val, relerr, term_no, est_rel_err; global ALWAYS, INFO, DEBUGL, DEBUGMASSIVE, glob_iolevel, glob_yes_pole, glob_no_pole, glob_not_given, glob_no_sing_tests, glob_ratio_test, glob_three_term_test, glob_six_term_test, glob_log_10, MAX_UNCHANGED, glob__small, glob_small_float, glob_smallish_float, glob_large_float, glob_larger_float, glob__m2, glob__m1, glob__0, glob__1, glob__2, glob__3, glob__4, glob__5, glob__8, glob__10, glob__100, glob__pi, glob__0_5, glob__0_8, glob__m0_8, glob__0_25, glob__0_125, glob_h, glob_nxt, glob_prec, glob_check_sign, glob_desired_digits_correct, glob_max_estimated_step_error, glob_ratio_of_radius, glob_percent_done, glob_total_exp_sec, glob_optimal_expect_sec, glob_estimated_size_answer, glob_almost_1, glob_clock_sec, glob_clock_start_sec, glob_disp_incr, glob_diff_rc_fm, glob_diff_rc_fmm1, glob_diff_rc_fmm2, glob_diff_ord_fm, glob_diff_ord_fmm1, glob_diff_ord_fmm2, glob_six_term_ord_save, glob_guess_error_rc, glob_guess_error_ord, glob_least_given_sing, glob_least_ratio_sing, glob_least_3_sing, glob_least_6_sing, glob_last_good_h, glob_max_h, glob_min_h, glob_display_interval, glob_abserr, glob_relerr, glob_min_pole_est, glob_max_rel_trunc_err, glob_max_trunc_err, glob_max_hours, glob_optimal_clock_start_sec, glob_optimal_start, glob_upper_ratio_limit, glob_lower_ratio_limit, glob_max_sec, glob_orig_start_sec, glob_normmax, glob_max_minutes, glob_next_display, glob_est_digits, glob_subiter_method, glob_html_log, glob_min_good_digits, glob_good_digits, glob_min_apfp_est_good_digits, glob_apfp_est_good_digits, glob_max_opt_iter, glob_dump, glob_djd_debug, glob_display_flag, glob_djd_debug2, glob_h_reason, glob_sec_in_minute, glob_min_in_hour, glob_hours_in_day, glob_days_in_year, glob_sec_in_hour, glob_sec_in_day, glob_sec_in_year, glob_not_yet_finished, glob_initial_pass, glob_not_yet_start_msg, glob_reached_optimal_h, glob_optimal_done, glob_type_given_pole, glob_optimize, glob_look_poles, glob_dump_closed_form, glob_max_iter, glob_no_eqs, glob_unchanged_h_cnt, glob_warned, glob_warned2, glob_start, glob_iter, array_const_1, array_const_0D0, array_const_3D0, array_const_1D0, 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_a1, array_tmp3_a2, array_tmp3, array_tmp4, array_m1, array_y_higher, array_y_higher_work, array_y_higher_work2, array_y_set_initial, array_given_rad_poles, array_given_ord_poles, array_rad_test_poles, array_ord_test_poles, array_fact_2, ATS_MAX_TERMS, glob_last; ind_var := array_x[1]; omniout_complex(ALWAYS, "x[1] ", 33, ind_var, 20, " "); term_no := 1; numeric_val := array_y[term_no]; omniout_complex(ALWAYS, "h ", 33, glob_h, 20, " "); omniout_complex(ALWAYS, "y[1] (numeric) ", 33, numeric_val, 20, " "); closed_form_val_y := evalf(exact_soln_y(ind_var)); omniout_complex(ALWAYS, "y[1] (closed_form) ", 33, closed_form_val_y, 20, " "); abserr := float_abs(numeric_val - closed_form_val_y); if 0. < float_abs(closed_form_val_y) then relerr := abserr/float_abs(closed_form_val_y); if 0. < float_abs(c(relerr)) then glob_good_digits := round(-log10(relerr)) else relerr := 0.; glob_good_digits := Digits - 2 end if else relerr := glob__m1; glob_good_digits := -16 end if; if glob_good_digits < glob_min_good_digits then glob_min_good_digits := glob_good_digits end if; omniout_float(ALWAYS, "absolute error ", 4, abserr, 4, " "); omniout_float(ALWAYS, "relative error ", 4, relerr*glob__100, 4, "%"); omniout_int(INFO, "Correct digits ", 32, glob_good_digits, 4, " ") end proc # End Function number 8 # Begin Function number 9 > prog_report := proc(x_start,x_end) > global > ALWAYS, > INFO, > DEBUGL, > DEBUGMASSIVE, > glob_iolevel, > glob_yes_pole, > glob_no_pole, > glob_not_given, > glob_no_sing_tests, > glob_ratio_test, > glob_three_term_test, > glob_six_term_test, > glob_log_10, #Top Generate Globals Decl > MAX_UNCHANGED, > glob__small, > glob_small_float, > glob_smallish_float, > glob_large_float, > glob_larger_float, > glob__m2, > glob__m1, > glob__0, > glob__1, > glob__2, > glob__3, > glob__4, > glob__5, > glob__8, > glob__10, > glob__100, > glob__pi, > glob__0_5, > glob__0_8, > glob__m0_8, > glob__0_25, > glob__0_125, > glob_h, > glob_nxt, > glob_prec, > glob_check_sign, > glob_desired_digits_correct, > glob_max_estimated_step_error, > glob_ratio_of_radius, > glob_percent_done, > glob_total_exp_sec, > glob_optimal_expect_sec, > glob_estimated_size_answer, > glob_almost_1, > glob_clock_sec, > glob_clock_start_sec, > glob_disp_incr, > glob_diff_rc_fm, > glob_diff_rc_fmm1, > glob_diff_rc_fmm2, > glob_diff_ord_fm, > glob_diff_ord_fmm1, > glob_diff_ord_fmm2, > glob_six_term_ord_save, > glob_guess_error_rc, > glob_guess_error_ord, > glob_least_given_sing, > glob_least_ratio_sing, > glob_least_3_sing, > glob_least_6_sing, > glob_last_good_h, > glob_max_h, > glob_min_h, > glob_display_interval, > glob_abserr, > glob_relerr, > glob_min_pole_est, > glob_max_rel_trunc_err, > glob_max_trunc_err, > glob_max_hours, > glob_optimal_clock_start_sec, > glob_optimal_start, > glob_upper_ratio_limit, > glob_lower_ratio_limit, > glob_max_sec, > glob_orig_start_sec, > glob_normmax, > glob_max_minutes, > glob_next_display, > glob_est_digits, > glob_subiter_method, > glob_html_log, > glob_min_good_digits, > glob_good_digits, > glob_min_apfp_est_good_digits, > glob_apfp_est_good_digits, > glob_max_opt_iter, > glob_dump, > glob_djd_debug, > glob_display_flag, > glob_djd_debug2, > glob_h_reason, > glob_sec_in_minute, > glob_min_in_hour, > glob_hours_in_day, > glob_days_in_year, > glob_sec_in_hour, > glob_sec_in_day, > glob_sec_in_year, > glob_not_yet_finished, > glob_initial_pass, > glob_not_yet_start_msg, > glob_reached_optimal_h, > glob_optimal_done, > glob_type_given_pole, > glob_optimize, > glob_look_poles, > glob_dump_closed_form, > glob_max_iter, > glob_no_eqs, > glob_unchanged_h_cnt, > glob_warned, > glob_warned2, > glob_start, > glob_iter, #Bottom Generate Globals Decl #BEGIN CONST > array_const_1, > array_const_0D0, > array_const_3D0, > array_const_1D0, #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_a1, > array_tmp3_a2, > array_tmp3, > array_tmp4, > array_m1, > array_y_higher, > array_y_higher_work, > array_y_higher_work2, > array_y_set_initial, > array_given_rad_poles, > array_given_ord_poles, > array_rad_test_poles, > array_ord_test_poles, > array_fact_2, > ATS_MAX_TERMS, > glob_last; > local clock_sec, opt_clock_sec, clock_sec1, expect_sec, left_sec, percent_done, total_clock_sec; > #TOP PROGRESS REPORT > clock_sec1 := elapsed_time_seconds(); > total_clock_sec := (clock_sec1) - (glob_orig_start_sec); > glob_clock_sec := (clock_sec1) - (glob_clock_start_sec); > left_sec := (glob_max_sec) + (glob_orig_start_sec) - (clock_sec1); > expect_sec := comp_expect_sec((x_end),(x_start),(array_x[1]) + (glob_h) ,( clock_sec1) - (glob_orig_start_sec)); > opt_clock_sec := ( clock_sec1) - (glob_optimal_clock_start_sec); > glob_optimal_expect_sec := comp_expect_sec((x_end),(x_start),(array_x[1]) +( glob_h) ,( opt_clock_sec)); > glob_total_exp_sec := glob_optimal_expect_sec + c(total_clock_sec); > percent_done := comp_percent((x_end),(x_start),(array_x[1]) + (glob_h)); > glob_percent_done := percent_done; > omniout_str_noeol(INFO,"Total Elapsed Time "); > omniout_timestr((total_clock_sec)); > if (c(percent_done) < glob__100) then # if number 3 > omniout_str_noeol(INFO,"Expected Time Remaining "); > omniout_timestr((expect_sec)); > omniout_str_noeol(INFO,"Optimized Time Remaining "); > omniout_timestr((glob_optimal_expect_sec)); > omniout_str_noeol(INFO,"Expected Total Time "); > omniout_timestr((glob_total_exp_sec)); > fi;# end if 3; > #BOTTOM PROGRESS REPORT > end; prog_report := proc(x_start, x_end) local clock_sec, opt_clock_sec, clock_sec1, expect_sec, left_sec, percent_done, total_clock_sec; global ALWAYS, INFO, DEBUGL, DEBUGMASSIVE, glob_iolevel, glob_yes_pole, glob_no_pole, glob_not_given, glob_no_sing_tests, glob_ratio_test, glob_three_term_test, glob_six_term_test, glob_log_10, MAX_UNCHANGED, glob__small, glob_small_float, glob_smallish_float, glob_large_float, glob_larger_float, glob__m2, glob__m1, glob__0, glob__1, glob__2, glob__3, glob__4, glob__5, glob__8, glob__10, glob__100, glob__pi, glob__0_5, glob__0_8, glob__m0_8, glob__0_25, glob__0_125, glob_h, glob_nxt, glob_prec, glob_check_sign, glob_desired_digits_correct, glob_max_estimated_step_error, glob_ratio_of_radius, glob_percent_done, glob_total_exp_sec, glob_optimal_expect_sec, glob_estimated_size_answer, glob_almost_1, glob_clock_sec, glob_clock_start_sec, glob_disp_incr, glob_diff_rc_fm, glob_diff_rc_fmm1, glob_diff_rc_fmm2, glob_diff_ord_fm, glob_diff_ord_fmm1, glob_diff_ord_fmm2, glob_six_term_ord_save, glob_guess_error_rc, glob_guess_error_ord, glob_least_given_sing, glob_least_ratio_sing, glob_least_3_sing, glob_least_6_sing, glob_last_good_h, glob_max_h, glob_min_h, glob_display_interval, glob_abserr, glob_relerr, glob_min_pole_est, glob_max_rel_trunc_err, glob_max_trunc_err, glob_max_hours, glob_optimal_clock_start_sec, glob_optimal_start, glob_upper_ratio_limit, glob_lower_ratio_limit, glob_max_sec, glob_orig_start_sec, glob_normmax, glob_max_minutes, glob_next_display, glob_est_digits, glob_subiter_method, glob_html_log, glob_min_good_digits, glob_good_digits, glob_min_apfp_est_good_digits, glob_apfp_est_good_digits, glob_max_opt_iter, glob_dump, glob_djd_debug, glob_display_flag, glob_djd_debug2, glob_h_reason, glob_sec_in_minute, glob_min_in_hour, glob_hours_in_day, glob_days_in_year, glob_sec_in_hour, glob_sec_in_day, glob_sec_in_year, glob_not_yet_finished, glob_initial_pass, glob_not_yet_start_msg, glob_reached_optimal_h, glob_optimal_done, glob_type_given_pole, glob_optimize, glob_look_poles, glob_dump_closed_form, glob_max_iter, glob_no_eqs, glob_unchanged_h_cnt, glob_warned, glob_warned2, glob_start, glob_iter, array_const_1, array_const_0D0, array_const_3D0, array_const_1D0, 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_a1, array_tmp3_a2, array_tmp3, array_tmp4, array_m1, array_y_higher, array_y_higher_work, array_y_higher_work2, array_y_set_initial, array_given_rad_poles, array_given_ord_poles, array_rad_test_poles, array_ord_test_poles, array_fact_2, ATS_MAX_TERMS, glob_last; clock_sec1 := elapsed_time_seconds(); total_clock_sec := clock_sec1 - glob_orig_start_sec; glob_clock_sec := clock_sec1 - glob_clock_start_sec; left_sec := glob_max_sec + glob_orig_start_sec - clock_sec1; expect_sec := comp_expect_sec(x_end, x_start, array_x[1] + glob_h, clock_sec1 - glob_orig_start_sec); opt_clock_sec := clock_sec1 - glob_optimal_clock_start_sec; glob_optimal_expect_sec := comp_expect_sec(x_end, x_start, array_x[1] + glob_h, opt_clock_sec) ; glob_total_exp_sec := glob_optimal_expect_sec + c(total_clock_sec); percent_done := comp_percent(x_end, x_start, array_x[1] + glob_h); glob_percent_done := percent_done; omniout_str_noeol(INFO, "Total Elapsed Time "); omniout_timestr(total_clock_sec); if c(percent_done) < glob__100 then omniout_str_noeol(INFO, "Expected Time Remaining "); omniout_timestr(expect_sec); omniout_str_noeol(INFO, "Optimized Time Remaining "); omniout_timestr(glob_optimal_expect_sec); omniout_str_noeol(INFO, "Expected Total Time "); omniout_timestr(glob_total_exp_sec) end if end proc # End Function number 9 # Begin Function number 10 > check_for_pole := proc() > global > ALWAYS, > INFO, > DEBUGL, > DEBUGMASSIVE, > glob_iolevel, > glob_yes_pole, > glob_no_pole, > glob_not_given, > glob_no_sing_tests, > glob_ratio_test, > glob_three_term_test, > glob_six_term_test, > glob_log_10, #Top Generate Globals Decl > MAX_UNCHANGED, > glob__small, > glob_small_float, > glob_smallish_float, > glob_large_float, > glob_larger_float, > glob__m2, > glob__m1, > glob__0, > glob__1, > glob__2, > glob__3, > glob__4, > glob__5, > glob__8, > glob__10, > glob__100, > glob__pi, > glob__0_5, > glob__0_8, > glob__m0_8, > glob__0_25, > glob__0_125, > glob_h, > glob_nxt, > glob_prec, > glob_check_sign, > glob_desired_digits_correct, > glob_max_estimated_step_error, > glob_ratio_of_radius, > glob_percent_done, > glob_total_exp_sec, > glob_optimal_expect_sec, > glob_estimated_size_answer, > glob_almost_1, > glob_clock_sec, > glob_clock_start_sec, > glob_disp_incr, > glob_diff_rc_fm, > glob_diff_rc_fmm1, > glob_diff_rc_fmm2, > glob_diff_ord_fm, > glob_diff_ord_fmm1, > glob_diff_ord_fmm2, > glob_six_term_ord_save, > glob_guess_error_rc, > glob_guess_error_ord, > glob_least_given_sing, > glob_least_ratio_sing, > glob_least_3_sing, > glob_least_6_sing, > glob_last_good_h, > glob_max_h, > glob_min_h, > glob_display_interval, > glob_abserr, > glob_relerr, > glob_min_pole_est, > glob_max_rel_trunc_err, > glob_max_trunc_err, > glob_max_hours, > glob_optimal_clock_start_sec, > glob_optimal_start, > glob_upper_ratio_limit, > glob_lower_ratio_limit, > glob_max_sec, > glob_orig_start_sec, > glob_normmax, > glob_max_minutes, > glob_next_display, > glob_est_digits, > glob_subiter_method, > glob_html_log, > glob_min_good_digits, > glob_good_digits, > glob_min_apfp_est_good_digits, > glob_apfp_est_good_digits, > glob_max_opt_iter, > glob_dump, > glob_djd_debug, > glob_display_flag, > glob_djd_debug2, > glob_h_reason, > glob_sec_in_minute, > glob_min_in_hour, > glob_hours_in_day, > glob_days_in_year, > glob_sec_in_hour, > glob_sec_in_day, > glob_sec_in_year, > glob_not_yet_finished, > glob_initial_pass, > glob_not_yet_start_msg, > glob_reached_optimal_h, > glob_optimal_done, > glob_type_given_pole, > glob_optimize, > glob_look_poles, > glob_dump_closed_form, > glob_max_iter, > glob_no_eqs, > glob_unchanged_h_cnt, > glob_warned, > glob_warned2, > glob_start, > glob_iter, #Bottom Generate Globals Decl #BEGIN CONST > array_const_1, > array_const_0D0, > array_const_3D0, > array_const_1D0, #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_a1, > array_tmp3_a2, > array_tmp3, > array_tmp4, > array_m1, > array_y_higher, > array_y_higher_work, > array_y_higher_work2, > array_y_set_initial, > array_given_rad_poles, > array_given_ord_poles, > array_rad_test_poles, > array_ord_test_poles, > array_fact_2, > ATS_MAX_TERMS, > glob_last; > local cnt, dr1, dr2, ds1, ds2, hdrc, m, n, nr1, nr2, ord_no, term1, term2, term3, part1, part2, part3, part4, part5, part6, part7, part8, part9, part10, part11, part12, part13, part14, rad_c, rcs, rm0, rm1, rm2, rm3, rm4, found_sing, h_new, ratio, term, local_test, tmp_rad,tmp_ord, tmp_ratio, prev_tmp_rad, last_no; > #TOP CHECK FOR POLE > tmp_rad := glob_larger_float; > prev_tmp_rad := glob_larger_float; > tmp_ratio := glob_larger_float; > rad_c := glob_larger_float; > array_rad_test_poles[1,1] := glob_larger_float; > array_ord_test_poles[1,1] := glob_larger_float; > found_sing := 1; > last_no := ATS_MAX_TERMS - 1 - 10; > cnt := 0; > while (last_no < ATS_MAX_TERMS-3 and found_sing = 1) do # do number 1 > tmp_rad := comp_rad_from_ratio(array_y_higher[1,last_no-1],array_y_higher[1,last_no],last_no); > if (float_abs(prev_tmp_rad) > glob__0) then # if number 3 > tmp_ratio := tmp_rad / prev_tmp_rad; > else > tmp_ratio := glob_large_float; > fi;# end if 3; > if ((cnt > 0 ) and (tmp_ratio < glob_upper_ratio_limit) and (tmp_ratio > glob_lower_ratio_limit)) then # if number 3 > rad_c := tmp_rad; > elif > (cnt = 0) then # if number 4 > rad_c := tmp_rad; > elif > (cnt > 0) then # if number 5 > found_sing := 0; > fi;# end if 5; > prev_tmp_rad := tmp_rad;; > cnt := cnt + 1; > last_no := last_no + 1; > od;# end do number 1; > if (found_sing = 1) then # if number 5 > if (rad_c < array_rad_test_poles[1,1]) then # if number 6 > array_rad_test_poles[1,1] := rad_c; > last_no := last_no - 1; > tmp_ord := comp_ord_from_ratio(array_y_higher[1,last_no-1],array_y_higher[1,last_no],last_no); > array_rad_test_poles[1,1] := rad_c; > array_ord_test_poles[1,1] := tmp_ord; > fi;# end if 6; > fi;# end if 5; > #BOTTOM general radius test1 > tmp_rad := glob_larger_float; > prev_tmp_rad := glob_larger_float; > tmp_ratio := glob_larger_float; > rad_c := glob_larger_float; > array_rad_test_poles[1,2] := glob_larger_float; > array_ord_test_poles[1,2] := glob_larger_float; > found_sing := 1; > last_no := ATS_MAX_TERMS - 1 - 10; > cnt := 0; > while (last_no < ATS_MAX_TERMS-4 and found_sing = 1) do # do number 1 > tmp_rad := comp_rad_from_three_terms(array_y_higher[1,last_no-2],array_y_higher[1,last_no-1],array_y_higher[1,last_no],last_no); > if (float_abs(prev_tmp_rad) > glob__0) then # if number 5 > tmp_ratio := tmp_rad / prev_tmp_rad; > else > tmp_ratio := glob_large_float; > fi;# end if 5; > if ((cnt > 0 ) and (tmp_ratio < glob_upper_ratio_limit) and (tmp_ratio > glob_lower_ratio_limit)) then # if number 5 > rad_c := tmp_rad; > elif > (cnt = 0) then # if number 6 > rad_c := tmp_rad; > elif > (cnt > 0) then # if number 7 > found_sing := 0; > fi;# end if 7; > prev_tmp_rad := tmp_rad;; > cnt := cnt + 1; > last_no := last_no + 1; > od;# end do number 1; > if (found_sing = 1) then # if number 7 > if (rad_c < array_rad_test_poles[1,2]) then # if number 8 > array_rad_test_poles[1,2] := rad_c; > last_no := last_no - 1; > tmp_ord := comp_ord_from_three_terms(array_y_higher[1,last_no-2],array_y_higher[1,last_no-1],array_y_higher[1,last_no],last_no); > array_rad_test_poles[1,2] := rad_c; > if (rad_c < glob_min_pole_est) then # if number 9 > glob_min_pole_est := rad_c; > fi;# end if 9; > array_ord_test_poles[1,2] := tmp_ord; > fi;# end if 8; > fi;# end if 7; > #BOTTOM general radius test1 > tmp_rad := glob_larger_float; > prev_tmp_rad := glob_larger_float; > tmp_ratio := glob_larger_float; > rad_c := glob_larger_float; > array_rad_test_poles[1,3] := glob_larger_float; > array_ord_test_poles[1,3] := glob_larger_float; > found_sing := 1; > last_no := ATS_MAX_TERMS - 1 - 10; > cnt := 0; > while (last_no < ATS_MAX_TERMS-7 and found_sing = 1) do # do number 1 > tmp_rad := comp_rad_from_six_terms(array_y_higher[1,last_no-5],array_y_higher[1,last_no-4],array_y_higher[1,last_no-3],array_y_higher[1,last_no-2],array_y_higher[1,last_no-1],array_y_higher[1,last_no],last_no); > if (float_abs(prev_tmp_rad) > glob__0) then # if number 7 > tmp_ratio := tmp_rad / prev_tmp_rad; > else > tmp_ratio := glob_large_float; > fi;# end if 7; > if ((cnt > 0 ) and (tmp_ratio < glob_upper_ratio_limit) and (tmp_ratio > glob_lower_ratio_limit)) then # if number 7 > rad_c := tmp_rad; > elif > (cnt = 0) then # if number 8 > rad_c := tmp_rad; > elif > (cnt > 0) then # if number 9 > found_sing := 0; > fi;# end if 9; > prev_tmp_rad := tmp_rad;; > cnt := cnt + 1; > last_no := last_no + 1; > od;# end do number 1; > if (found_sing = 1) then # if number 9 > if (rad_c < array_rad_test_poles[1,3]) then # if number 10 > array_rad_test_poles[1,3] := rad_c; > last_no := last_no - 1; > tmp_ord := comp_ord_from_six_terms(array_y_higher[1,last_no-5],array_y_higher[1,last_no-4],array_y_higher[1,last_no-3],array_y_higher[1,last_no-2],array_y_higher[1,last_no-1],array_y_higher[1,last_no],last_no); > array_rad_test_poles[1,3] := rad_c; > if (rad_c < glob_min_pole_est) then # if number 11 > glob_min_pole_est := rad_c; > fi;# end if 11; > array_ord_test_poles[1,3] := tmp_ord; > fi;# end if 10; > fi;# end if 9; > #BOTTOM general radius test1 > ; > if (true) then # if number 9 > display_poles(); > fi;# end if 9 > end; check_for_pole := proc() local cnt, dr1, dr2, ds1, ds2, hdrc, m, n, nr1, nr2, ord_no, term1, term2, term3, part1, part2, part3, part4, part5, part6, part7, part8, part9, part10, part11, part12, part13, part14, rad_c, rcs, rm0, rm1, rm2, rm3, rm4, found_sing, h_new, ratio, term, local_test, tmp_rad, tmp_ord, tmp_ratio, prev_tmp_rad, last_no; global ALWAYS, INFO, DEBUGL, DEBUGMASSIVE, glob_iolevel, glob_yes_pole, glob_no_pole, glob_not_given, glob_no_sing_tests, glob_ratio_test, glob_three_term_test, glob_six_term_test, glob_log_10, MAX_UNCHANGED, glob__small, glob_small_float, glob_smallish_float, glob_large_float, glob_larger_float, glob__m2, glob__m1, glob__0, glob__1, glob__2, glob__3, glob__4, glob__5, glob__8, glob__10, glob__100, glob__pi, glob__0_5, glob__0_8, glob__m0_8, glob__0_25, glob__0_125, glob_h, glob_nxt, glob_prec, glob_check_sign, glob_desired_digits_correct, glob_max_estimated_step_error, glob_ratio_of_radius, glob_percent_done, glob_total_exp_sec, glob_optimal_expect_sec, glob_estimated_size_answer, glob_almost_1, glob_clock_sec, glob_clock_start_sec, glob_disp_incr, glob_diff_rc_fm, glob_diff_rc_fmm1, glob_diff_rc_fmm2, glob_diff_ord_fm, glob_diff_ord_fmm1, glob_diff_ord_fmm2, glob_six_term_ord_save, glob_guess_error_rc, glob_guess_error_ord, glob_least_given_sing, glob_least_ratio_sing, glob_least_3_sing, glob_least_6_sing, glob_last_good_h, glob_max_h, glob_min_h, glob_display_interval, glob_abserr, glob_relerr, glob_min_pole_est, glob_max_rel_trunc_err, glob_max_trunc_err, glob_max_hours, glob_optimal_clock_start_sec, glob_optimal_start, glob_upper_ratio_limit, glob_lower_ratio_limit, glob_max_sec, glob_orig_start_sec, glob_normmax, glob_max_minutes, glob_next_display, glob_est_digits, glob_subiter_method, glob_html_log, glob_min_good_digits, glob_good_digits, glob_min_apfp_est_good_digits, glob_apfp_est_good_digits, glob_max_opt_iter, glob_dump, glob_djd_debug, glob_display_flag, glob_djd_debug2, glob_h_reason, glob_sec_in_minute, glob_min_in_hour, glob_hours_in_day, glob_days_in_year, glob_sec_in_hour, glob_sec_in_day, glob_sec_in_year, glob_not_yet_finished, glob_initial_pass, glob_not_yet_start_msg, glob_reached_optimal_h, glob_optimal_done, glob_type_given_pole, glob_optimize, glob_look_poles, glob_dump_closed_form, glob_max_iter, glob_no_eqs, glob_unchanged_h_cnt, glob_warned, glob_warned2, glob_start, glob_iter, array_const_1, array_const_0D0, array_const_3D0, array_const_1D0, 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_a1, array_tmp3_a2, array_tmp3, array_tmp4, array_m1, array_y_higher, array_y_higher_work, array_y_higher_work2, array_y_set_initial, array_given_rad_poles, array_given_ord_poles, array_rad_test_poles, array_ord_test_poles, array_fact_2, ATS_MAX_TERMS, glob_last; tmp_rad := glob_larger_float; prev_tmp_rad := glob_larger_float; tmp_ratio := glob_larger_float; rad_c := glob_larger_float; array_rad_test_poles[1, 1] := glob_larger_float; array_ord_test_poles[1, 1] := glob_larger_float; found_sing := 1; last_no := ATS_MAX_TERMS - 11; cnt := 0; while last_no < ATS_MAX_TERMS - 3 and found_sing = 1 do tmp_rad := comp_rad_from_ratio(array_y_higher[1, last_no - 1], array_y_higher[1, last_no], last_no); if glob__0 < float_abs(prev_tmp_rad) then tmp_ratio := tmp_rad/prev_tmp_rad else tmp_ratio := glob_large_float end if; if 0 < cnt and tmp_ratio < glob_upper_ratio_limit and glob_lower_ratio_limit < tmp_ratio then rad_c := tmp_rad elif cnt = 0 then rad_c := tmp_rad elif 0 < cnt then found_sing := 0 end if; prev_tmp_rad := tmp_rad; cnt := cnt + 1; last_no := last_no + 1 end do; if found_sing = 1 then if rad_c < array_rad_test_poles[1, 1] then array_rad_test_poles[1, 1] := rad_c; last_no := last_no - 1; tmp_ord := comp_ord_from_ratio(array_y_higher[1, last_no - 1], array_y_higher[1, last_no], last_no); array_rad_test_poles[1, 1] := rad_c; array_ord_test_poles[1, 1] := tmp_ord end if end if; tmp_rad := glob_larger_float; prev_tmp_rad := glob_larger_float; tmp_ratio := glob_larger_float; rad_c := glob_larger_float; array_rad_test_poles[1, 2] := glob_larger_float; array_ord_test_poles[1, 2] := glob_larger_float; found_sing := 1; last_no := ATS_MAX_TERMS - 11; cnt := 0; while last_no < ATS_MAX_TERMS - 4 and found_sing = 1 do tmp_rad := comp_rad_from_three_terms( array_y_higher[1, last_no - 2], array_y_higher[1, last_no - 1], array_y_higher[1, last_no], last_no); if glob__0 < float_abs(prev_tmp_rad) then tmp_ratio := tmp_rad/prev_tmp_rad else tmp_ratio := glob_large_float end if; if 0 < cnt and tmp_ratio < glob_upper_ratio_limit and glob_lower_ratio_limit < tmp_ratio then rad_c := tmp_rad elif cnt = 0 then rad_c := tmp_rad elif 0 < cnt then found_sing := 0 end if; prev_tmp_rad := tmp_rad; cnt := cnt + 1; last_no := last_no + 1 end do; if found_sing = 1 then if rad_c < array_rad_test_poles[1, 2] then array_rad_test_poles[1, 2] := rad_c; last_no := last_no - 1; tmp_ord := comp_ord_from_three_terms( array_y_higher[1, last_no - 2], array_y_higher[1, last_no - 1], array_y_higher[1, last_no], last_no); array_rad_test_poles[1, 2] := rad_c; if rad_c < glob_min_pole_est then glob_min_pole_est := rad_c end if; array_ord_test_poles[1, 2] := tmp_ord end if end if; tmp_rad := glob_larger_float; prev_tmp_rad := glob_larger_float; tmp_ratio := glob_larger_float; rad_c := glob_larger_float; array_rad_test_poles[1, 3] := glob_larger_float; array_ord_test_poles[1, 3] := glob_larger_float; found_sing := 1; last_no := ATS_MAX_TERMS - 11; cnt := 0; while last_no < ATS_MAX_TERMS - 7 and found_sing = 1 do tmp_rad := comp_rad_from_six_terms(array_y_higher[1, last_no - 5], array_y_higher[1, last_no - 4], array_y_higher[1, last_no - 3], array_y_higher[1, last_no - 2], array_y_higher[1, last_no - 1], array_y_higher[1, last_no], last_no); if glob__0 < float_abs(prev_tmp_rad) then tmp_ratio := tmp_rad/prev_tmp_rad else tmp_ratio := glob_large_float end if; if 0 < cnt and tmp_ratio < glob_upper_ratio_limit and glob_lower_ratio_limit < tmp_ratio then rad_c := tmp_rad elif cnt = 0 then rad_c := tmp_rad elif 0 < cnt then found_sing := 0 end if; prev_tmp_rad := tmp_rad; cnt := cnt + 1; last_no := last_no + 1 end do; if found_sing = 1 then if rad_c < array_rad_test_poles[1, 3] then array_rad_test_poles[1, 3] := rad_c; last_no := last_no - 1; tmp_ord := comp_ord_from_six_terms( array_y_higher[1, last_no - 5], array_y_higher[1, last_no - 4], array_y_higher[1, last_no - 3], array_y_higher[1, last_no - 2], array_y_higher[1, last_no - 1], array_y_higher[1, last_no], last_no); array_rad_test_poles[1, 3] := rad_c; if rad_c < glob_min_pole_est then glob_min_pole_est := rad_c end if; array_ord_test_poles[1, 3] := tmp_ord end if end if; display_poles() end proc # End Function number 10 # Begin Function number 11 > atomall := proc() > global > ALWAYS, > INFO, > DEBUGL, > DEBUGMASSIVE, > glob_iolevel, > glob_yes_pole, > glob_no_pole, > glob_not_given, > glob_no_sing_tests, > glob_ratio_test, > glob_three_term_test, > glob_six_term_test, > glob_log_10, #Top Generate Globals Decl > MAX_UNCHANGED, > glob__small, > glob_small_float, > glob_smallish_float, > glob_large_float, > glob_larger_float, > glob__m2, > glob__m1, > glob__0, > glob__1, > glob__2, > glob__3, > glob__4, > glob__5, > glob__8, > glob__10, > glob__100, > glob__pi, > glob__0_5, > glob__0_8, > glob__m0_8, > glob__0_25, > glob__0_125, > glob_h, > glob_nxt, > glob_prec, > glob_check_sign, > glob_desired_digits_correct, > glob_max_estimated_step_error, > glob_ratio_of_radius, > glob_percent_done, > glob_total_exp_sec, > glob_optimal_expect_sec, > glob_estimated_size_answer, > glob_almost_1, > glob_clock_sec, > glob_clock_start_sec, > glob_disp_incr, > glob_diff_rc_fm, > glob_diff_rc_fmm1, > glob_diff_rc_fmm2, > glob_diff_ord_fm, > glob_diff_ord_fmm1, > glob_diff_ord_fmm2, > glob_six_term_ord_save, > glob_guess_error_rc, > glob_guess_error_ord, > glob_least_given_sing, > glob_least_ratio_sing, > glob_least_3_sing, > glob_least_6_sing, > glob_last_good_h, > glob_max_h, > glob_min_h, > glob_display_interval, > glob_abserr, > glob_relerr, > glob_min_pole_est, > glob_max_rel_trunc_err, > glob_max_trunc_err, > glob_max_hours, > glob_optimal_clock_start_sec, > glob_optimal_start, > glob_upper_ratio_limit, > glob_lower_ratio_limit, > glob_max_sec, > glob_orig_start_sec, > glob_normmax, > glob_max_minutes, > glob_next_display, > glob_est_digits, > glob_subiter_method, > glob_html_log, > glob_min_good_digits, > glob_good_digits, > glob_min_apfp_est_good_digits, > glob_apfp_est_good_digits, > glob_max_opt_iter, > glob_dump, > glob_djd_debug, > glob_display_flag, > glob_djd_debug2, > glob_h_reason, > glob_sec_in_minute, > glob_min_in_hour, > glob_hours_in_day, > glob_days_in_year, > glob_sec_in_hour, > glob_sec_in_day, > glob_sec_in_year, > glob_not_yet_finished, > glob_initial_pass, > glob_not_yet_start_msg, > glob_reached_optimal_h, > glob_optimal_done, > glob_type_given_pole, > glob_optimize, > glob_look_poles, > glob_dump_closed_form, > glob_max_iter, > glob_no_eqs, > glob_unchanged_h_cnt, > glob_warned, > glob_warned2, > glob_start, > glob_iter, #Bottom Generate Globals Decl #BEGIN CONST > array_const_1, > array_const_0D0, > array_const_3D0, > array_const_1D0, #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_a1, > array_tmp3_a2, > array_tmp3, > array_tmp4, > array_m1, > array_y_higher, > array_y_higher_work, > array_y_higher_work2, > array_y_set_initial, > array_given_rad_poles, > array_given_ord_poles, > array_rad_test_poles, > array_ord_test_poles, > array_fact_2, > ATS_MAX_TERMS, > glob_last; > local kkk, order_d, adj2, adj3 , temporary, term; > #TOP ATOMALL > # before write maple main top matter > # before generate constants assign > # before generate globals assign > #END OUTFILE1 > #BEGIN OUTFILE2 > #END OUTFILE2 > #BEGIN ATOMHDR1 > #emit pre mult CONST - LINEAR $eq_no = 1 i = 1 > array_tmp1[1] := array_const_3D0[1] * array_x[1]; > #emit pre add LINEAR - CONST $eq_no = 1 i = 1 > array_tmp2[1] := array_tmp1[1] + array_const_1D0[1]; > #emit pre tanh $eq_no = 1 > array_tmp3_a1[1] := sinh(array_tmp2[1]); > array_tmp3_a2[1] := cosh(array_tmp2[1]); > array_tmp3[1] := (array_tmp3_a1[1] / array_tmp3_a2[1]); > #emit pre add CONST FULL $eq_no = 1 i = 1 > array_tmp4[1] := array_const_0D0[1] + array_tmp3[1]; > #emit pre assign xxx $eq_no = 1 i = 1 $min_hdrs = 5 > if ( not array_y_set_initial[1,2]) then # if number 1 > if (1 <= ATS_MAX_TERMS) then # if number 2 > temporary := c(array_tmp4[1]) * (expt((glob_h) , c(1))) * c(factorial_3(0,1)); > if (2 <= ATS_MAX_TERMS) then # if number 3 > array_y[2] := temporary; > array_y_higher[1,2] := temporary; > fi;# end if 3; > temporary := c(temporary) / c(glob_h) * c(1); > array_y_higher[2,1] := c(temporary); > fi;# end if 2; > fi;# end if 1; > kkk := 2; > #END ATOMHDR1 > #BEGIN ATOMHDR2 > #emit pre mult CONST - LINEAR $eq_no = 1 i = 2 > array_tmp1[2] := array_const_3D0[1] * array_x[2]; > #emit pre add LINEAR - CONST $eq_no = 1 i = 2 > array_tmp2[2] := array_tmp1[2]; > #emit pre tanh $eq_no = 1 > array_tmp3_a1[2] := array_tmp3_a2[1] * array_tmp2[2] / c(1); > array_tmp3_a2[2] := array_tmp3_a1[1] * array_tmp2[2] / c(1); > array_tmp3[2] := (array_tmp3_a1[2] - ats(2,array_tmp3_a2,array_tmp3,2)) / array_tmp3_a2[1]; > #emit pre add CONST FULL $eq_no = 1 i = 2 > array_tmp4[2] := array_tmp3[2]; > #emit pre assign xxx $eq_no = 1 i = 2 $min_hdrs = 5 > if ( not array_y_set_initial[1,3]) then # if number 1 > if (2 <= ATS_MAX_TERMS) then # if number 2 > temporary := c(array_tmp4[2]) * (expt((glob_h) , c(1))) * c(factorial_3(1,2)); > if (3 <= ATS_MAX_TERMS) then # if number 3 > array_y[3] := temporary; > array_y_higher[1,3] := temporary; > fi;# end if 3; > temporary := c(temporary) / c(glob_h) * c(2); > array_y_higher[2,2] := c(temporary); > fi;# end if 2; > fi;# end if 1; > kkk := 3; > #END ATOMHDR2 > #BEGIN ATOMHDR3 > #emit pre tanh $eq_no = 1 > array_tmp3_a1[3] := array_tmp3_a2[2] * array_tmp2[2] / c(2); > array_tmp3_a2[3] := array_tmp3_a1[2] * array_tmp2[2] / c(2); > array_tmp3[3] := (array_tmp3_a1[3] - ats(3,array_tmp3_a2,array_tmp3,2)) / array_tmp3_a2[1]; > #emit pre add CONST FULL $eq_no = 1 i = 3 > array_tmp4[3] := array_tmp3[3]; > #emit pre assign xxx $eq_no = 1 i = 3 $min_hdrs = 5 > if ( not array_y_set_initial[1,4]) then # if number 1 > if (3 <= ATS_MAX_TERMS) then # if number 2 > temporary := c(array_tmp4[3]) * (expt((glob_h) , c(1))) * c(factorial_3(2,3)); > if (4 <= ATS_MAX_TERMS) then # if number 3 > array_y[4] := temporary; > array_y_higher[1,4] := temporary; > fi;# end if 3; > temporary := c(temporary) / c(glob_h) * c(3); > array_y_higher[2,3] := c(temporary); > fi;# end if 2; > fi;# end if 1; > kkk := 4; > #END ATOMHDR3 > #BEGIN ATOMHDR4 > #emit pre tanh $eq_no = 1 > array_tmp3_a1[4] := array_tmp3_a2[3] * array_tmp2[2] / c(3); > array_tmp3_a2[4] := array_tmp3_a1[3] * array_tmp2[2] / c(3); > array_tmp3[4] := (array_tmp3_a1[4] - ats(4,array_tmp3_a2,array_tmp3,2)) / array_tmp3_a2[1]; > #emit pre add CONST FULL $eq_no = 1 i = 4 > array_tmp4[4] := array_tmp3[4]; > #emit pre assign xxx $eq_no = 1 i = 4 $min_hdrs = 5 > if ( not array_y_set_initial[1,5]) then # if number 1 > if (4 <= ATS_MAX_TERMS) then # if number 2 > temporary := c(array_tmp4[4]) * (expt((glob_h) , c(1))) * c(factorial_3(3,4)); > if (5 <= ATS_MAX_TERMS) then # if number 3 > array_y[5] := temporary; > array_y_higher[1,5] := temporary; > fi;# end if 3; > temporary := c(temporary) / c(glob_h) * c(4); > array_y_higher[2,4] := c(temporary); > fi;# end if 2; > fi;# end if 1; > kkk := 5; > #END ATOMHDR4 > #BEGIN ATOMHDR5 > #emit pre tanh $eq_no = 1 > array_tmp3_a1[5] := array_tmp3_a2[4] * array_tmp2[2] / c(4); > array_tmp3_a2[5] := array_tmp3_a1[4] * array_tmp2[2] / c(4); > array_tmp3[5] := (array_tmp3_a1[5] - ats(5,array_tmp3_a2,array_tmp3,2)) / array_tmp3_a2[1]; > #emit pre add CONST FULL $eq_no = 1 i = 5 > array_tmp4[5] := array_tmp3[5]; > #emit pre assign xxx $eq_no = 1 i = 5 $min_hdrs = 5 > if ( not array_y_set_initial[1,6]) then # if number 1 > if (5 <= ATS_MAX_TERMS) then # if number 2 > temporary := c(array_tmp4[5]) * (expt((glob_h) , c(1))) * c(factorial_3(4,5)); > if (6 <= ATS_MAX_TERMS) then # if number 3 > array_y[6] := temporary; > array_y_higher[1,6] := temporary; > fi;# end if 3; > temporary := c(temporary) / c(glob_h) * c(5); > array_y_higher[2,5] := c(temporary); > fi;# end if 2; > fi;# end if 1; > kkk := 6; > #END ATOMHDR5 > #BEGIN OUTFILE3 > #Top Atomall While Loop-- outfile3 > while (kkk <= ATS_MAX_TERMS) do # do number 1 > #END OUTFILE3 > #BEGIN OUTFILE4 > array_tmp3_a1[kkk] := array_tmp3_a2[kkk-1] * array_tmp2[2] / c(kkk - 1); > array_tmp3_a2[kkk] := array_tmp3_a1[kkk-1] * array_tmp2[2] / c(kkk - 1); > array_tmp3[kkk] := (array_tmp3_a1[kkk] - ats(kkk ,array_tmp3_a2,array_tmp3,2)) / array_tmp3_a2[1]; > #emit NOT FULL - FULL add $eq_no = 1 > array_tmp4[kkk] := array_tmp3[kkk]; > #emit assign $eq_no = 1 > order_d := 1; > if (kkk + order_d <= ATS_MAX_TERMS) then # if number 1 > if ( not array_y_set_initial[1,kkk + order_d]) then # if number 2 > temporary := c(array_tmp4[kkk]) * expt((glob_h) , c(order_d)) * c(factorial_3((kkk - 1),(kkk + order_d - 1))); > array_y[kkk + order_d] := c(temporary); > array_y_higher[1,kkk + order_d] := c(temporary); > term := kkk + order_d - 1; > adj2 := kkk + order_d - 1; > adj3 := 2; > while ((term >= 1) and (term <= ATS_MAX_TERMS) and (adj3 < order_d + 1)) do # do number 1 > if (adj3 <= order_d + 1) then # if number 3 > if (adj2 > 0) then # if number 4 > temporary := c(temporary) / c(glob_h) * c(adj2); > else > temporary := c(temporary); > fi;# end if 4; > array_y_higher[adj3,term] := c(temporary); > fi;# end if 3; > term := term - 1; > adj2 := adj2 - 1; > adj3 := adj3 + 1; > od;# end do number 1 > fi;# end if 2 > fi;# end if 1; > kkk := kkk + 1; > od;# end do number 1; > #BOTTOM ATOMALL > #END OUTFILE4 > #BEGIN OUTFILE5 > #BOTTOM ATOMALL ??? > end; atomall := proc() local kkk, order_d, adj2, adj3, temporary, term; global ALWAYS, INFO, DEBUGL, DEBUGMASSIVE, glob_iolevel, glob_yes_pole, glob_no_pole, glob_not_given, glob_no_sing_tests, glob_ratio_test, glob_three_term_test, glob_six_term_test, glob_log_10, MAX_UNCHANGED, glob__small, glob_small_float, glob_smallish_float, glob_large_float, glob_larger_float, glob__m2, glob__m1, glob__0, glob__1, glob__2, glob__3, glob__4, glob__5, glob__8, glob__10, glob__100, glob__pi, glob__0_5, glob__0_8, glob__m0_8, glob__0_25, glob__0_125, glob_h, glob_nxt, glob_prec, glob_check_sign, glob_desired_digits_correct, glob_max_estimated_step_error, glob_ratio_of_radius, glob_percent_done, glob_total_exp_sec, glob_optimal_expect_sec, glob_estimated_size_answer, glob_almost_1, glob_clock_sec, glob_clock_start_sec, glob_disp_incr, glob_diff_rc_fm, glob_diff_rc_fmm1, glob_diff_rc_fmm2, glob_diff_ord_fm, glob_diff_ord_fmm1, glob_diff_ord_fmm2, glob_six_term_ord_save, glob_guess_error_rc, glob_guess_error_ord, glob_least_given_sing, glob_least_ratio_sing, glob_least_3_sing, glob_least_6_sing, glob_last_good_h, glob_max_h, glob_min_h, glob_display_interval, glob_abserr, glob_relerr, glob_min_pole_est, glob_max_rel_trunc_err, glob_max_trunc_err, glob_max_hours, glob_optimal_clock_start_sec, glob_optimal_start, glob_upper_ratio_limit, glob_lower_ratio_limit, glob_max_sec, glob_orig_start_sec, glob_normmax, glob_max_minutes, glob_next_display, glob_est_digits, glob_subiter_method, glob_html_log, glob_min_good_digits, glob_good_digits, glob_min_apfp_est_good_digits, glob_apfp_est_good_digits, glob_max_opt_iter, glob_dump, glob_djd_debug, glob_display_flag, glob_djd_debug2, glob_h_reason, glob_sec_in_minute, glob_min_in_hour, glob_hours_in_day, glob_days_in_year, glob_sec_in_hour, glob_sec_in_day, glob_sec_in_year, glob_not_yet_finished, glob_initial_pass, glob_not_yet_start_msg, glob_reached_optimal_h, glob_optimal_done, glob_type_given_pole, glob_optimize, glob_look_poles, glob_dump_closed_form, glob_max_iter, glob_no_eqs, glob_unchanged_h_cnt, glob_warned, glob_warned2, glob_start, glob_iter, array_const_1, array_const_0D0, array_const_3D0, array_const_1D0, 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_a1, array_tmp3_a2, array_tmp3, array_tmp4, array_m1, array_y_higher, array_y_higher_work, array_y_higher_work2, array_y_set_initial, array_given_rad_poles, array_given_ord_poles, array_rad_test_poles, array_ord_test_poles, array_fact_2, ATS_MAX_TERMS, glob_last; array_tmp1[1] := array_const_3D0[1]*array_x[1]; array_tmp2[1] := array_tmp1[1] + array_const_1D0[1]; array_tmp3_a1[1] := sinh(array_tmp2[1]); array_tmp3_a2[1] := cosh(array_tmp2[1]); array_tmp3[1] := array_tmp3_a1[1]/array_tmp3_a2[1]; array_tmp4[1] := array_const_0D0[1] + array_tmp3[1]; if not array_y_set_initial[1, 2] then if 1 <= ATS_MAX_TERMS then temporary := c(array_tmp4[1])*expt(glob_h, c(1))*c(factorial_3(0, 1)); if 2 <= ATS_MAX_TERMS then array_y[2] := temporary; array_y_higher[1, 2] := temporary end if; temporary := c(temporary)*c(1)/c(glob_h); array_y_higher[2, 1] := c(temporary) end if end if; kkk := 2; array_tmp1[2] := array_const_3D0[1]*array_x[2]; array_tmp2[2] := array_tmp1[2]; array_tmp3_a1[2] := array_tmp3_a2[1]*array_tmp2[2]/c(1); array_tmp3_a2[2] := array_tmp3_a1[1]*array_tmp2[2]/c(1); array_tmp3[2] := ( array_tmp3_a1[2] - ats(2, array_tmp3_a2, array_tmp3, 2))/ array_tmp3_a2[1]; array_tmp4[2] := array_tmp3[2]; if not array_y_set_initial[1, 3] then if 2 <= ATS_MAX_TERMS then temporary := c(array_tmp4[2])*expt(glob_h, c(1))*c(factorial_3(1, 2)); if 3 <= ATS_MAX_TERMS then array_y[3] := temporary; array_y_higher[1, 3] := temporary end if; temporary := c(temporary)*c(2)/c(glob_h); array_y_higher[2, 2] := c(temporary) end if end if; kkk := 3; array_tmp3_a1[3] := array_tmp3_a2[2]*array_tmp2[2]/c(2); array_tmp3_a2[3] := array_tmp3_a1[2]*array_tmp2[2]/c(2); array_tmp3[3] := ( array_tmp3_a1[3] - ats(3, array_tmp3_a2, array_tmp3, 2))/ array_tmp3_a2[1]; array_tmp4[3] := array_tmp3[3]; if not array_y_set_initial[1, 4] then if 3 <= ATS_MAX_TERMS then temporary := c(array_tmp4[3])*expt(glob_h, c(1))*c(factorial_3(2, 3)); if 4 <= ATS_MAX_TERMS then array_y[4] := temporary; array_y_higher[1, 4] := temporary end if; temporary := c(temporary)*c(3)/c(glob_h); array_y_higher[2, 3] := c(temporary) end if end if; kkk := 4; array_tmp3_a1[4] := array_tmp3_a2[3]*array_tmp2[2]/c(3); array_tmp3_a2[4] := array_tmp3_a1[3]*array_tmp2[2]/c(3); array_tmp3[4] := ( array_tmp3_a1[4] - ats(4, array_tmp3_a2, array_tmp3, 2))/ array_tmp3_a2[1]; array_tmp4[4] := array_tmp3[4]; if not array_y_set_initial[1, 5] then if 4 <= ATS_MAX_TERMS then temporary := c(array_tmp4[4])*expt(glob_h, c(1))*c(factorial_3(3, 4)); if 5 <= ATS_MAX_TERMS then array_y[5] := temporary; array_y_higher[1, 5] := temporary end if; temporary := c(temporary)*c(4)/c(glob_h); array_y_higher[2, 4] := c(temporary) end if end if; kkk := 5; array_tmp3_a1[5] := array_tmp3_a2[4]*array_tmp2[2]/c(4); array_tmp3_a2[5] := array_tmp3_a1[4]*array_tmp2[2]/c(4); array_tmp3[5] := ( array_tmp3_a1[5] - ats(5, array_tmp3_a2, array_tmp3, 2))/ array_tmp3_a2[1]; array_tmp4[5] := array_tmp3[5]; if not array_y_set_initial[1, 6] then if 5 <= ATS_MAX_TERMS then temporary := c(array_tmp4[5])*expt(glob_h, c(1))*c(factorial_3(4, 5)); if 6 <= ATS_MAX_TERMS then array_y[6] := temporary; array_y_higher[1, 6] := temporary end if; temporary := c(temporary)*c(5)/c(glob_h); array_y_higher[2, 5] := c(temporary) end if end if; kkk := 6; while kkk <= ATS_MAX_TERMS do array_tmp3_a1[kkk] := array_tmp3_a2[kkk - 1]*array_tmp2[2]/c(kkk - 1); array_tmp3_a2[kkk] := array_tmp3_a1[kkk - 1]*array_tmp2[2]/c(kkk - 1); array_tmp3[kkk] := ( array_tmp3_a1[kkk] - ats(kkk, array_tmp3_a2, array_tmp3, 2))/ array_tmp3_a2[1]; array_tmp4[kkk] := array_tmp3[kkk]; order_d := 1; if kkk + order_d <= ATS_MAX_TERMS then if not array_y_set_initial[1, kkk + order_d] then temporary := c(array_tmp4[kkk])*expt(glob_h, c(order_d))* c(factorial_3(kkk - 1, kkk + order_d - 1)); array_y[kkk + order_d] := c(temporary); array_y_higher[1, kkk + order_d] := c(temporary); term := kkk + order_d - 1; adj2 := kkk + order_d - 1; adj3 := 2; while 1 <= term and term <= ATS_MAX_TERMS and adj3 < order_d + 1 do if adj3 <= order_d + 1 then if 0 < adj2 then temporary := c(temporary)*c(adj2)/c(glob_h) else temporary := c(temporary) end if; array_y_higher[adj3, term] := c(temporary) end if; term := term - 1; adj2 := adj2 - 1; adj3 := adj3 + 1 end do end if end if; kkk := kkk + 1 end do end proc # End Function number 12 #END OUTFILE5 # Begin Function number 12 > main := proc() > #BEGIN OUTFIEMAIN > local d1,d2,d3,d4,est_err_2,niii,done_once,max_terms,display_max, > term,ord,order_diff,term_no,html_log_file,iiif,jjjf, > rows,r_order,sub_iter,calc_term,iii,temp_sum,current_iter, > x_start,x_end > ,it,last_min_pole_est, opt_iter, tmp,subiter, est_needed_step_err,estimated_step_error,min_value,est_answer,found_h,repeat_it; > global > ALWAYS, > INFO, > DEBUGL, > DEBUGMASSIVE, > glob_iolevel, > glob_yes_pole, > glob_no_pole, > glob_not_given, > glob_no_sing_tests, > glob_ratio_test, > glob_three_term_test, > glob_six_term_test, > glob_log_10, > #Top Generate Globals Decl > MAX_UNCHANGED, > glob__small, > glob_small_float, > glob_smallish_float, > glob_large_float, > glob_larger_float, > glob__m2, > glob__m1, > glob__0, > glob__1, > glob__2, > glob__3, > glob__4, > glob__5, > glob__8, > glob__10, > glob__100, > glob__pi, > glob__0_5, > glob__0_8, > glob__m0_8, > glob__0_25, > glob__0_125, > glob_h, > glob_nxt, > glob_prec, > glob_check_sign, > glob_desired_digits_correct, > glob_max_estimated_step_error, > glob_ratio_of_radius, > glob_percent_done, > glob_total_exp_sec, > glob_optimal_expect_sec, > glob_estimated_size_answer, > glob_almost_1, > glob_clock_sec, > glob_clock_start_sec, > glob_disp_incr, > glob_diff_rc_fm, > glob_diff_rc_fmm1, > glob_diff_rc_fmm2, > glob_diff_ord_fm, > glob_diff_ord_fmm1, > glob_diff_ord_fmm2, > glob_six_term_ord_save, > glob_guess_error_rc, > glob_guess_error_ord, > glob_least_given_sing, > glob_least_ratio_sing, > glob_least_3_sing, > glob_least_6_sing, > glob_last_good_h, > glob_max_h, > glob_min_h, > glob_display_interval, > glob_abserr, > glob_relerr, > glob_min_pole_est, > glob_max_rel_trunc_err, > glob_max_trunc_err, > glob_max_hours, > glob_optimal_clock_start_sec, > glob_optimal_start, > glob_upper_ratio_limit, > glob_lower_ratio_limit, > glob_max_sec, > glob_orig_start_sec, > glob_normmax, > glob_max_minutes, > glob_next_display, > glob_est_digits, > glob_subiter_method, > glob_html_log, > glob_min_good_digits, > glob_good_digits, > glob_min_apfp_est_good_digits, > glob_apfp_est_good_digits, > glob_max_opt_iter, > glob_dump, > glob_djd_debug, > glob_display_flag, > glob_djd_debug2, > glob_h_reason, > glob_sec_in_minute, > glob_min_in_hour, > glob_hours_in_day, > glob_days_in_year, > glob_sec_in_hour, > glob_sec_in_day, > glob_sec_in_year, > glob_not_yet_finished, > glob_initial_pass, > glob_not_yet_start_msg, > glob_reached_optimal_h, > glob_optimal_done, > glob_type_given_pole, > glob_optimize, > glob_look_poles, > glob_dump_closed_form, > glob_max_iter, > glob_no_eqs, > glob_unchanged_h_cnt, > glob_warned, > glob_warned2, > glob_start, > glob_iter, > #Bottom Generate Globals Decl > #BEGIN CONST > array_const_1, > array_const_0D0, > array_const_3D0, > array_const_1D0, > #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_a1, > array_tmp3_a2, > array_tmp3, > array_tmp4, > array_m1, > array_y_higher, > array_y_higher_work, > array_y_higher_work2, > array_y_set_initial, > array_given_rad_poles, > array_given_ord_poles, > array_rad_test_poles, > array_ord_test_poles, > array_fact_2, > ATS_MAX_TERMS, > glob_last; > ATS_MAX_TERMS := 40; > # before first input block > #BEGIN FIRST INPUT BLOCK > #BEGIN BLOCK 1 > #BEGIN FIRST INPUT BLOCK > Digits:=32; > max_terms:=40; > #END BLOCK 1 > #END FIRST INPUT BLOCK > #START OF INITS AFTER INPUT BLOCK > glob_html_log := true; > #END OF INITS AFTER INPUT BLOCK > # before generate arrays > array_y_init:= Array(0..(40),[]); > array_norms:= Array(0..(40),[]); > array_fact_1:= Array(0..(40),[]); > array_1st_rel_error:= Array(0..(2),[]); > array_last_rel_error:= Array(0..(2),[]); > array_est_rel_error:= Array(0..(2),[]); > array_max_est_error:= Array(0..(2),[]); > array_type_pole:= Array(0..(2),[]); > array_type_real_pole:= Array(0..(2),[]); > array_type_complex_pole:= Array(0..(2),[]); > array_est_digits:= Array(0..(2),[]); > array_y:= Array(0..(40),[]); > array_x:= Array(0..(40),[]); > array_tmp0:= Array(0..(40),[]); > array_tmp1:= Array(0..(40),[]); > array_tmp2:= Array(0..(40),[]); > array_tmp3_g:= Array(0..(40),[]); > array_tmp3_a1:= Array(0..(40),[]); > array_tmp3_a2:= Array(0..(40),[]); > array_tmp3:= Array(0..(40),[]); > array_tmp4:= Array(0..(40),[]); > array_m1:= Array(0..(40),[]); > array_y_higher := Array(0..(2) ,(0..40+ 1),[]); > array_y_higher_work := Array(0..(2) ,(0..40+ 1),[]); > array_y_higher_work2 := Array(0..(2) ,(0..40+ 1),[]); > array_y_set_initial := Array(0..(2) ,(0..40+ 1),[]); > array_given_rad_poles := Array(0..(2) ,(0..3+ 1),[]); > array_given_ord_poles := Array(0..(2) ,(0..3+ 1),[]); > array_rad_test_poles := Array(0..(2) ,(0..4+ 1),[]); > array_ord_test_poles := Array(0..(2) ,(0..4+ 1),[]); > array_fact_2 := Array(0..(40) ,(0..40+ 1),[]); > # before generate constants > # before generate globals definition > #Top Generate Globals Definition > #Bottom Generate Globals Deninition > # before generate const definition > # before arrays initialized > term := 1; > while (term <= 40) do # do number 1 > array_y_init[term] := c(0.0); > term := term + 1; > od;# end do number 1; > term := 1; > while (term <= 40) do # do number 1 > array_norms[term] := c(0.0); > term := term + 1; > od;# end do number 1; > term := 1; > while (term <= 40) do # do number 1 > array_fact_1[term] := c(0.0); > term := term + 1; > od;# end do number 1; > term := 1; > while (term <= 2) do # do number 1 > array_1st_rel_error[term] := c(0.0); > term := term + 1; > od;# end do number 1; > term := 1; > while (term <= 2) do # do number 1 > array_last_rel_error[term] := c(0.0); > term := term + 1; > od;# end do number 1; > term := 1; > while (term <= 2) do # do number 1 > array_est_rel_error[term] := c(0.0); > term := term + 1; > od;# end do number 1; > term := 1; > while (term <= 2) do # do number 1 > array_max_est_error[term] := c(0.0); > term := term + 1; > od;# end do number 1; > term := 1; > while (term <= 2) do # do number 1 > array_type_pole[term] := 0; > term := term + 1; > od;# end do number 1; > term := 1; > while (term <= 2) do # do number 1 > array_type_real_pole[term] := 0; > term := term + 1; > od;# end do number 1; > term := 1; > while (term <= 2) do # do number 1 > array_type_complex_pole[term] := 0; > term := term + 1; > od;# end do number 1; > term := 1; > while (term <= 2) do # do number 1 > array_est_digits[term] := 0; > term := term + 1; > od;# end do number 1; > term := 1; > while (term <= 40) do # do number 1 > array_y[term] := c(0.0); > term := term + 1; > od;# end do number 1; > term := 1; > while (term <= 40) do # do number 1 > array_x[term] := c(0.0); > term := term + 1; > od;# end do number 1; > term := 1; > while (term <= 40) do # do number 1 > array_tmp0[term] := c(0.0); > term := term + 1; > od;# end do number 1; > term := 1; > while (term <= 40) do # do number 1 > array_tmp1[term] := c(0.0); > term := term + 1; > od;# end do number 1; > term := 1; > while (term <= 40) do # do number 1 > array_tmp2[term] := c(0.0); > term := term + 1; > od;# end do number 1; > term := 1; > while (term <= 40) do # do number 1 > array_tmp3_g[term] := c(0.0); > term := term + 1; > od;# end do number 1; > term := 1; > while (term <= 40) do # do number 1 > array_tmp3_a1[term] := c(0.0); > term := term + 1; > od;# end do number 1; > term := 1; > while (term <= 40) do # do number 1 > array_tmp3_a2[term] := c(0.0); > term := term + 1; > od;# end do number 1; > term := 1; > while (term <= 40) do # do number 1 > array_tmp3[term] := c(0.0); > term := term + 1; > od;# end do number 1; > term := 1; > while (term <= 40) do # do number 1 > array_tmp4[term] := c(0.0); > term := term + 1; > od;# end do number 1; > term := 1; > while (term <= 40) do # do number 1 > array_m1[term] := c(0.0); > term := term + 1; > od;# end do number 1; > ord := 1; > while (ord <=2) do # do number 1 > term := 1; > while (term <= 40) do # do number 2 > array_y_higher[ord,term] := c(0.0); > term := term + 1; > od;# end do number 2; > ord := ord + 1; > od;# end do number 1; > ord := 1; > while (ord <=2) do # do number 1 > term := 1; > while (term <= 40) do # do number 2 > array_y_higher_work[ord,term] := c(0.0); > term := term + 1; > od;# end do number 2; > ord := ord + 1; > od;# end do number 1; > ord := 1; > while (ord <=2) do # do number 1 > term := 1; > while (term <= 40) do # do number 2 > array_y_higher_work2[ord,term] := c(0.0); > term := term + 1; > od;# end do number 2; > ord := ord + 1; > od;# end do number 1; > ord := 1; > while (ord <=2) do # do number 1 > term := 1; > while (term <= 40) do # do number 2 > array_y_set_initial[ord,term] := c(0.0); > term := term + 1; > od;# end do number 2; > ord := ord + 1; > od;# end do number 1; > ord := 1; > while (ord <=2) do # do number 1 > term := 1; > while (term <= 3) do # do number 2 > array_given_rad_poles[ord,term] := c(0.0); > term := term + 1; > od;# end do number 2; > ord := ord + 1; > od;# end do number 1; > ord := 1; > while (ord <=2) do # do number 1 > term := 1; > while (term <= 3) do # do number 2 > array_given_ord_poles[ord,term] := c(0.0); > term := term + 1; > od;# end do number 2; > ord := ord + 1; > od;# end do number 1; > ord := 1; > while (ord <=2) do # do number 1 > term := 1; > while (term <= 4) do # do number 2 > array_rad_test_poles[ord,term] := c(0.0); > term := term + 1; > od;# end do number 2; > ord := ord + 1; > od;# end do number 1; > ord := 1; > while (ord <=2) do # do number 1 > term := 1; > while (term <= 4) do # do number 2 > array_ord_test_poles[ord,term] := c(0.0); > term := term + 1; > od;# end do number 2; > ord := ord + 1; > od;# end do number 1; > ord := 1; > while (ord <=40) do # do number 1 > term := 1; > while (term <= 40) do # do number 2 > array_fact_2[ord,term] := c(0.0); > term := term + 1; > od;# end do number 2; > ord := ord + 1; > od;# end do number 1; > # before symbols initialized > #BEGIN SYMBOLS INITIALIZATED > zero_ats_ar(array_y); > zero_ats_ar(array_x); > zero_ats_ar(array_tmp0); > zero_ats_ar(array_tmp1); > zero_ats_ar(array_tmp2); > zero_ats_ar(array_tmp3_g); > zero_ats_ar(array_tmp3_a1); > zero_ats_ar(array_tmp3_a2); > zero_ats_ar(array_tmp3); > zero_ats_ar(array_tmp4); > zero_ats_ar(array_m1); > zero_ats_ar(array_const_1); > array_const_1[1] := c(1); > zero_ats_ar(array_const_0D0); > array_const_0D0[1] := c(0.0); > zero_ats_ar(array_const_3D0); > array_const_3D0[1] := c(3.0); > zero_ats_ar(array_const_1D0); > array_const_1D0[1] := c(1.0); > zero_ats_ar(array_m1); > array_m1[1] := glob__m1; > #END SYMBOLS INITIALIZATED > # before generate factorials init > #Initing Factorial Tables > iiif := 0; > while (iiif <= ATS_MAX_TERMS) do # do number 1 > jjjf := 0; > while (jjjf <= ATS_MAX_TERMS) do # do number 2 > array_fact_1[iiif] := 0; > array_fact_2[iiif,jjjf] := 0; > jjjf := jjjf + 1; > od;# end do number 2; > iiif := iiif + 1; > od;# end do number 1; > #Done Initing Factorial Table > ALWAYS := 1; > INFO := 2; > DEBUGL := 3; > DEBUGMASSIVE := 4; > glob_iolevel := 5; > glob_yes_pole := 4; > glob_no_pole := 3; > glob_not_given := 0; > glob_no_sing_tests := 4; > glob_ratio_test := 1; > glob_three_term_test := 2; > glob_six_term_test := 3; > glob_log_10 := log(c(10.0)); > MAX_UNCHANGED := 10; > glob__small := c(0.1e-50); > glob_small_float := c(0.1e-50); > glob_smallish_float := c(0.1e-60); > glob_large_float := c(1.0e100); > glob_larger_float := c(1.1e100); > glob__m2 := c(-2); > glob__m1 := c(-1); > glob__0 := c(0); > glob__1 := c(1); > glob__2 := c(2); > glob__3 := c(3); > glob__4 := c(4); > glob__5 := c(5); > glob__8 := c(8); > glob__10 := c(10); > glob__100 := c(100); > glob__pi := c(0.0); > glob__0_5 := c(0.5); > glob__0_8 := c(0.8); > glob__m0_8 := c(-0.8); > glob__0_25 := c(0.25); > glob__0_125 := c(0.125); > glob_h := 0.1; > glob_nxt := 1; > glob_prec := c(1.0e-16); > glob_check_sign := c(1.0); > glob_desired_digits_correct := c(8.0); > glob_max_estimated_step_error := c(0.0); > glob_ratio_of_radius := c(0.1); > glob_percent_done := c(0.0); > glob_total_exp_sec := c(0.1); > glob_optimal_expect_sec := c(0.1); > glob_estimated_size_answer := c(100.0); > glob_almost_1 := c(0.9990); > glob_clock_sec := c(0.0); > glob_clock_start_sec := c(0.0); > glob_disp_incr := c(0.1); > glob_diff_rc_fm := c(0.1); > glob_diff_rc_fmm1 := c(0.1); > glob_diff_rc_fmm2 := c(0.1); > glob_diff_ord_fm := c(0.1); > glob_diff_ord_fmm1 := c(0.1); > glob_diff_ord_fmm2 := c(0.1); > glob_six_term_ord_save := c(0.1); > glob_guess_error_rc := c(0.1); > glob_guess_error_ord := c(0.1); > glob_least_given_sing := c(9.9e200); > glob_least_ratio_sing := c(9.9e200); > glob_least_3_sing := c(9.9e100); > glob_least_6_sing := c(9.9e100); > glob_last_good_h := c(0.1); > glob_max_h := c(0.1); > glob_min_h := c(0.000001); > glob_display_interval := c(0.1); > glob_abserr := c(0.1e-10); > glob_relerr := c(0.1e-10); > glob_min_pole_est := c(0.1e+10); > glob_max_rel_trunc_err := c(0.1e-10); > glob_max_trunc_err := c(0.1e-10); > glob_max_hours := c(0.0); > glob_optimal_clock_start_sec := c(0.0); > glob_optimal_start := c(0.0); > glob_upper_ratio_limit := c(1.0001); > glob_lower_ratio_limit := c(0.9999); > glob_max_sec := c(10000.0); > glob_orig_start_sec := c(0.0); > glob_normmax := c(0.0); > glob_max_minutes := c(0.0); > glob_next_display := c(0.0); > glob_est_digits := 1; > glob_subiter_method := 3; > glob_html_log := true; > glob_min_good_digits := 99999; > glob_good_digits := 0; > glob_min_apfp_est_good_digits := 99999; > glob_apfp_est_good_digits := 0; > glob_max_opt_iter := 10; > glob_dump := false; > glob_djd_debug := true; > glob_display_flag := true; > glob_djd_debug2 := true; > glob_h_reason := 0; > glob_sec_in_minute := 60 ; > glob_min_in_hour := 60; > glob_hours_in_day := 24; > glob_days_in_year := 365; > glob_sec_in_hour := 3600; > glob_sec_in_day := 86400; > glob_sec_in_year := 31536000; > glob_not_yet_finished := true; > glob_initial_pass := true; > glob_not_yet_start_msg := true; > glob_reached_optimal_h := false; > glob_optimal_done := false; > glob_type_given_pole := 0; > glob_optimize := false; > glob_look_poles := false; > glob_dump_closed_form := false; > glob_max_iter := 10000; > glob_no_eqs := 0; > glob_unchanged_h_cnt := 0; > glob_warned := false; > glob_warned2 := false; > glob_start := 0; > glob_iter := 0; > # before generate set diff initial > array_y_set_initial[1,1] := true; > array_y_set_initial[1,2] := false; > array_y_set_initial[1,3] := false; > array_y_set_initial[1,4] := false; > array_y_set_initial[1,5] := false; > array_y_set_initial[1,6] := false; > array_y_set_initial[1,7] := false; > array_y_set_initial[1,8] := false; > array_y_set_initial[1,9] := false; > array_y_set_initial[1,10] := false; > array_y_set_initial[1,11] := false; > array_y_set_initial[1,12] := false; > array_y_set_initial[1,13] := false; > array_y_set_initial[1,14] := false; > array_y_set_initial[1,15] := false; > array_y_set_initial[1,16] := false; > array_y_set_initial[1,17] := false; > array_y_set_initial[1,18] := false; > array_y_set_initial[1,19] := false; > array_y_set_initial[1,20] := false; > array_y_set_initial[1,21] := false; > array_y_set_initial[1,22] := false; > array_y_set_initial[1,23] := false; > array_y_set_initial[1,24] := false; > array_y_set_initial[1,25] := false; > array_y_set_initial[1,26] := false; > array_y_set_initial[1,27] := false; > array_y_set_initial[1,28] := false; > array_y_set_initial[1,29] := false; > array_y_set_initial[1,30] := false; > array_y_set_initial[1,31] := false; > array_y_set_initial[1,32] := false; > array_y_set_initial[1,33] := false; > array_y_set_initial[1,34] := false; > array_y_set_initial[1,35] := false; > array_y_set_initial[1,36] := false; > array_y_set_initial[1,37] := false; > array_y_set_initial[1,38] := false; > array_y_set_initial[1,39] := false; > array_y_set_initial[1,40] := false; > # before generate init omniout const > ALWAYS := 1; > INFO := 2; > DEBUGL := 3; > DEBUGMASSIVE := 4; > ATS_MAX_TERMS := 40; > glob_iolevel := INFO; > # set default block > #Write Set Defaults > glob_orig_start_sec := elapsed_time_seconds(); > glob_display_flag := true; > glob_no_eqs := 1; > glob_iter := -1; > opt_iter := -1; > glob_max_iter := 10000; > glob_max_hours := (0.0); > glob_max_minutes := (15.0); > omniout_str(ALWAYS,"##############ECHO OF PROBLEM#################"); > omniout_str(ALWAYS,"##############temp/lin_tanhpostcpx.cpx#################"); > omniout_str(ALWAYS,"diff ( y , x , 1 ) = tanh ( 3.0 * x + 1.0 ) ; "); > omniout_str(ALWAYS,"!"); > omniout_str(ALWAYS,"#BEGIN FIRST INPUT BLOCK"); > omniout_str(ALWAYS,"Digits:=32;"); > omniout_str(ALWAYS,"max_terms:=40;"); > omniout_str(ALWAYS,"!"); > omniout_str(ALWAYS,"#END FIRST INPUT BLOCK"); > omniout_str(ALWAYS,"#BEGIN SECOND INPUT BLOCK"); > omniout_str(ALWAYS,"x_start := 1.1 + 0.1 * I;"); > omniout_str(ALWAYS,"x_end := 99.0 + 99.0 * I;"); > omniout_str(ALWAYS,"array_y_init[0 + 1] := exact_soln_y(x_start);"); > omniout_str(ALWAYS,"glob_look_poles := true;"); > omniout_str(ALWAYS,""); > omniout_str(ALWAYS,""); > omniout_str(ALWAYS,""); > omniout_str(ALWAYS,""); > omniout_str(ALWAYS,""); > omniout_str(ALWAYS,""); > omniout_str(ALWAYS,""); > omniout_str(ALWAYS,"glob_type_given_pole := 3;"); > omniout_str(ALWAYS,"#END SECOND INPUT BLOCK"); > omniout_str(ALWAYS,"#BEGIN OVERRIDE BLOCK"); > omniout_str(ALWAYS,"glob_desired_digits_correct:=8;"); > omniout_str(ALWAYS,"glob_max_minutes:=(3.0);"); > omniout_str(ALWAYS,"glob_subiter_method:=3;"); > omniout_str(ALWAYS,"glob_max_iter:=10000;"); > omniout_str(ALWAYS,"glob_upper_ratio_limit:=c(1.000001);"); > omniout_str(ALWAYS,"glob_lower_ratio_limit:=c(0.999999);"); > omniout_str(ALWAYS,"glob_look_poles:=true;"); > omniout_str(ALWAYS,"glob_h:=c(0.001);"); > omniout_str(ALWAYS,"glob_display_interval:=c(0.01);"); > omniout_str(ALWAYS,"#END OVERRIDE BLOCK"); > omniout_str(ALWAYS,"!"); > omniout_str(ALWAYS,"#BEGIN USER DEF BLOCK"); > omniout_str(ALWAYS,"exact_soln_y := proc(x)"); > omniout_str(ALWAYS,"return(ln(cosh(c(3.0)*c(x) + c(1.0)))/c(3.0));"); > omniout_str(ALWAYS,"end;"); > omniout_str(ALWAYS,""); > 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 := 1.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 ) = tanh ( 3.0 * x + 1.0 ) ; "); > omniout_int(INFO,"Iterations ",32,glob_iter,4," ") > ; > prog_report(x_start,x_end); > if (glob_html_log) then # if number 10 > logstart(html_log_file); > logitem_str(html_log_file,"2017-11-26T15:03:33-06:00") > ; > logitem_str(html_log_file,"Maple") > ; > logitem_str(html_log_file,"lin_tanh") > ; > logitem_str(html_log_file,"diff ( y , x , 1 ) = tanh ( 3.0 * x + 1.0 ) ; ") > ; > logitem_complex(html_log_file,x_start) > ; > logitem_complex(html_log_file,x_end) > ; > logitem_complex(html_log_file,array_x[1]) > ; > logitem_complex(html_log_file,glob_h) > ; > logitem_h_reason(html_log_file) > ; > logitem_integer(html_log_file,Digits) > ; > ; > glob_desired_digits_correct := 0.0; > logitem_float(html_log_file,glob_desired_digits_correct) > ; > if (array_est_digits[1] <> -16) then # if number 11 > logitem_integer(html_log_file,array_est_digits[1]) > ; > else > logitem_str(html_log_file,"Unknown") > ; > fi;# end if 11; > if (glob_min_good_digits <> -16) then # if number 11 > logitem_integer(html_log_file,glob_min_good_digits) > ; > else > logitem_str(html_log_file,"Unknown") > ; > fi;# end if 11; > if (glob_good_digits <> -16) then # if number 11 > logitem_integer(html_log_file,glob_good_digits) > ; > else > logitem_str(html_log_file,"Unknown") > ; > fi;# end if 11; > logitem_str(html_log_file,"NA") > ; > logitem_str(html_log_file,"NA") > ; > logitem_integer(html_log_file,ATS_MAX_TERMS) > ; > if (glob_type_given_pole = 0) then # if number 11 > logitem_str(html_log_file,"Not Given") > ; > logitem_str(html_log_file,"NA") > ; > elif > (glob_type_given_pole = 4) then # if number 12 > logitem_str(html_log_file,"No Solution") > ; > logitem_str(html_log_file,"NA") > ; > elif > (glob_type_given_pole = 5) then # if number 13 > logitem_str(html_log_file,"Some Pole") > ; > logitem_str(html_log_file,"????") > ; > elif > (glob_type_given_pole = 3) then # if number 14 > logitem_str(html_log_file,"No Pole") > ; > logitem_str(html_log_file,"NA") > ; > elif > (glob_type_given_pole = 1) then # if number 15 > logitem_str(html_log_file,"Real Sing") > ; > logitem_float(html_log_file,glob_least_given_sing) > ; > elif > (glob_type_given_pole = 2) then # if number 16 > logitem_str(html_log_file,"Complex Sing") > ; > logitem_float(html_log_file,glob_least_given_sing) > ; > fi;# end if 16; > if (glob_least_ratio_sing < glob_large_float) then # if number 16 > glob_least_ratio_sing := 0; > logitem_float(html_log_file,glob_least_ratio_sing) > ; > else > logitem_str(html_log_file,"NONE") > ; > fi;# end if 16; > if (glob_least_3_sing < glob_large_float) then # if number 16 > logitem_float(html_log_file,glob_least_3_sing) > ; > else > logitem_str(html_log_file,"NONE") > ; > fi;# end if 16; > if (glob_least_6_sing < glob_large_float) then # if number 16 > glob_least_6_sing := 0.0; > logitem_float(html_log_file,glob_least_6_sing) > ; > else > logitem_str(html_log_file,"NONE") > ; > fi;# end if 16; > logitem_integer(html_log_file,glob_iter) > ; > logitem_time(html_log_file,(glob_clock_sec)) > ; > if (c(glob_percent_done) < glob__100) then # if number 16 > logitem_time(html_log_file,(glob_total_exp_sec)) > ; > 0; > else > logitem_str(html_log_file,"Done") > ; > 0; > fi;# end if 16; > log_revs(html_log_file," 309 ") > ; > logitem_str(html_log_file,"lin_tanh diffeq.mxt") > ; > logitem_str(html_log_file,"lin_tanh maple results") > ; > logitem_str(html_log_file,"Poor Accuracy") > ; > 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_3D0, array_const_1D0, 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_a1, array_tmp3_a2, array_tmp3, array_tmp4, array_m1, array_y_higher, array_y_higher_work, array_y_higher_work2, array_y_set_initial, array_given_rad_poles, array_given_ord_poles, array_rad_test_poles, array_ord_test_poles, array_fact_2, ATS_MAX_TERMS, glob_last; ATS_MAX_TERMS := 40; Digits := 32; max_terms := 40; glob_html_log := true; array_y_init := Array(0 .. 40, []); array_norms := Array(0 .. 40, []); array_fact_1 := Array(0 .. 40, []); array_1st_rel_error := Array(0 .. 2, []); array_last_rel_error := Array(0 .. 2, []); array_est_rel_error := Array(0 .. 2, []); array_max_est_error := Array(0 .. 2, []); array_type_pole := Array(0 .. 2, []); array_type_real_pole := Array(0 .. 2, []); array_type_complex_pole := Array(0 .. 2, []); array_est_digits := Array(0 .. 2, []); array_y := Array(0 .. 40, []); array_x := Array(0 .. 40, []); array_tmp0 := Array(0 .. 40, []); array_tmp1 := Array(0 .. 40, []); array_tmp2 := Array(0 .. 40, []); array_tmp3_g := Array(0 .. 40, []); array_tmp3_a1 := Array(0 .. 40, []); array_tmp3_a2 := Array(0 .. 40, []); array_tmp3 := Array(0 .. 40, []); array_tmp4 := Array(0 .. 40, []); array_m1 := Array(0 .. 40, []); array_y_higher := Array(0 .. 2, 0 .. 41, []); array_y_higher_work := Array(0 .. 2, 0 .. 41, []); array_y_higher_work2 := Array(0 .. 2, 0 .. 41, []); array_y_set_initial := Array(0 .. 2, 0 .. 41, []); array_given_rad_poles := Array(0 .. 2, 0 .. 4, []); array_given_ord_poles := Array(0 .. 2, 0 .. 4, []); array_rad_test_poles := Array(0 .. 2, 0 .. 5, []); array_ord_test_poles := Array(0 .. 2, 0 .. 5, []); array_fact_2 := Array(0 .. 40, 0 .. 41, []); term := 1; while term <= 40 do array_y_init[term] := c(0.); term := term + 1 end do; term := 1; while term <= 40 do array_norms[term] := c(0.); term := term + 1 end do ; term := 1; while term <= 40 do array_fact_1[term] := c(0.); term := term + 1 end do; term := 1; while term <= 2 do array_1st_rel_error[term] := c(0.); term := term + 1 end do; term := 1; while term <= 2 do array_last_rel_error[term] := c(0.); term := term + 1 end do; term := 1; while term <= 2 do array_est_rel_error[term] := c(0.); term := term + 1 end do; term := 1; while term <= 2 do array_max_est_error[term] := c(0.); term := term + 1 end do; term := 1; while term <= 2 do array_type_pole[term] := 0; term := term + 1 end do; term := 1; while term <= 2 do array_type_real_pole[term] := 0; term := term + 1 end do; term := 1; while term <= 2 do array_type_complex_pole[term] := 0; term := term + 1 end do; term := 1; while term <= 2 do array_est_digits[term] := 0; term := term + 1 end do ; term := 1; while term <= 40 do array_y[term] := c(0.); term := term + 1 end do; term := 1; while term <= 40 do array_x[term] := c(0.); term := term + 1 end do; term := 1; while term <= 40 do array_tmp0[term] := c(0.); term := term + 1 end do; term := 1; while term <= 40 do array_tmp1[term] := c(0.); term := term + 1 end do; term := 1; while term <= 40 do array_tmp2[term] := c(0.); term := term + 1 end do; term := 1; while term <= 40 do array_tmp3_g[term] := c(0.); term := term + 1 end do; term := 1; while term <= 40 do array_tmp3_a1[term] := c(0.); term := term + 1 end do; term := 1; while term <= 40 do array_tmp3_a2[term] := c(0.); term := term + 1 end do; term := 1; while term <= 40 do array_tmp3[term] := c(0.); term := term + 1 end do; term := 1; while term <= 40 do array_tmp4[term] := c(0.); term := term + 1 end do; term := 1; while term <= 40 do array_m1[term] := c(0.); term := term + 1 end do; ord := 1; while ord <= 2 do term := 1; while term <= 40 do array_y_higher[ord, term] := c(0.); term := term + 1 end do; ord := ord + 1 end do; ord := 1; while ord <= 2 do term := 1; while term <= 40 do array_y_higher_work[ord, term] := c(0.); term := term + 1 end do; ord := ord + 1 end do; ord := 1; while ord <= 2 do term := 1; while term <= 40 do array_y_higher_work2[ord, term] := c(0.); term := term + 1 end do; ord := ord + 1 end do; ord := 1; while ord <= 2 do term := 1; while term <= 40 do array_y_set_initial[ord, term] := c(0.); term := term + 1 end do; ord := ord + 1 end do; ord := 1; while ord <= 2 do term := 1; while term <= 3 do array_given_rad_poles[ord, term] := c(0.); term := term + 1 end do; ord := ord + 1 end do; ord := 1; while ord <= 2 do term := 1; while term <= 3 do array_given_ord_poles[ord, term] := c(0.); term := term + 1 end do; ord := ord + 1 end do; ord := 1; while ord <= 2 do term := 1; while term <= 4 do array_rad_test_poles[ord, term] := c(0.); term := term + 1 end do; ord := ord + 1 end do; ord := 1; while ord <= 2 do term := 1; while term <= 4 do array_ord_test_poles[ord, term] := c(0.); term := term + 1 end do; ord := ord + 1 end do; ord := 1; while ord <= 40 do term := 1; while term <= 40 do array_fact_2[ord, term] := c(0.); term := term + 1 end do; ord := ord + 1 end do; zero_ats_ar(array_y); zero_ats_ar(array_x); zero_ats_ar(array_tmp0); zero_ats_ar(array_tmp1); zero_ats_ar(array_tmp2); zero_ats_ar(array_tmp3_g); zero_ats_ar(array_tmp3_a1); zero_ats_ar(array_tmp3_a2); zero_ats_ar(array_tmp3); zero_ats_ar(array_tmp4); zero_ats_ar(array_m1); zero_ats_ar(array_const_1); array_const_1[1] := c(1); zero_ats_ar(array_const_0D0); array_const_0D0[1] := c(0.); zero_ats_ar(array_const_3D0); array_const_3D0[1] := c(3.0); zero_ats_ar(array_const_1D0); array_const_1D0[1] := c(1.0); zero_ats_ar(array_m1); array_m1[1] := glob__m1; iiif := 0; while iiif <= ATS_MAX_TERMS do jjjf := 0; while jjjf <= ATS_MAX_TERMS do array_fact_1[iiif] := 0; array_fact_2[iiif, jjjf] := 0; jjjf := jjjf + 1 end do; iiif := iiif + 1 end do; ALWAYS := 1; INFO := 2; DEBUGL := 3; DEBUGMASSIVE := 4; glob_iolevel := 5; glob_yes_pole := 4; glob_no_pole := 3; glob_not_given := 0; glob_no_sing_tests := 4; glob_ratio_test := 1; glob_three_term_test := 2; glob_six_term_test := 3; glob_log_10 := log(c(10.0)); MAX_UNCHANGED := 10; glob__small := c(0.1*10^(-50)); glob_small_float := c(0.1*10^(-50)); glob_smallish_float := c(0.1*10^(-60)); glob_large_float := c(0.10*10^101); glob_larger_float := c(0.11*10^101); glob__m2 := c(-2); glob__m1 := c(-1); glob__0 := c(0); glob__1 := c(1); glob__2 := c(2); glob__3 := c(3); glob__4 := c(4); glob__5 := c(5); glob__8 := c(8); glob__10 := c(10); glob__100 := c(100); glob__pi := c(0.); glob__0_5 := c(0.5); glob__0_8 := c(0.8); glob__m0_8 := c(-0.8); glob__0_25 := c(0.25); glob__0_125 := c(0.125); glob_h := 0.1; glob_nxt := 1; glob_prec := c(0.10*10^(-15)); glob_check_sign := c(1.0); glob_desired_digits_correct := c(8.0); glob_max_estimated_step_error := c(0.); glob_ratio_of_radius := c(0.1); glob_percent_done := c(0.); glob_total_exp_sec := c(0.1); glob_optimal_expect_sec := c(0.1); glob_estimated_size_answer := c(100.0); glob_almost_1 := c(0.9990); glob_clock_sec := c(0.); glob_clock_start_sec := c(0.); glob_disp_incr := c(0.1); glob_diff_rc_fm := c(0.1); glob_diff_rc_fmm1 := c(0.1); glob_diff_rc_fmm2 := c(0.1); glob_diff_ord_fm := c(0.1); glob_diff_ord_fmm1 := c(0.1); glob_diff_ord_fmm2 := c(0.1); glob_six_term_ord_save := c(0.1); glob_guess_error_rc := c(0.1); glob_guess_error_ord := c(0.1); glob_least_given_sing := c(0.99*10^201); glob_least_ratio_sing := c(0.99*10^201); glob_least_3_sing := c(0.99*10^101); glob_least_6_sing := c(0.99*10^101); glob_last_good_h := c(0.1); glob_max_h := c(0.1); glob_min_h := c(0.1*10^(-5)); glob_display_interval := c(0.1); glob_abserr := c(0.1*10^(-10)); glob_relerr := c(0.1*10^(-10)); glob_min_pole_est := c(0.1*10^10); glob_max_rel_trunc_err := c(0.1*10^(-10)); glob_max_trunc_err := c(0.1*10^(-10)); glob_max_hours := c(0.); glob_optimal_clock_start_sec := c(0.); glob_optimal_start := c(0.); glob_upper_ratio_limit := c(1.0001); glob_lower_ratio_limit := c(0.9999); glob_max_sec := c(10000.0); glob_orig_start_sec := c(0.); glob_normmax := c(0.); glob_max_minutes := c(0.); glob_next_display := c(0.); glob_est_digits := 1; glob_subiter_method := 3; glob_html_log := true; glob_min_good_digits := 99999; glob_good_digits := 0; glob_min_apfp_est_good_digits := 99999; glob_apfp_est_good_digits := 0; glob_max_opt_iter := 10; glob_dump := false; glob_djd_debug := true; glob_display_flag := true; glob_djd_debug2 := true; glob_h_reason := 0; glob_sec_in_minute := 60; glob_min_in_hour := 60; glob_hours_in_day := 24; glob_days_in_year := 365; glob_sec_in_hour := 3600; glob_sec_in_day := 86400; glob_sec_in_year := 31536000; glob_not_yet_finished := true; glob_initial_pass := true; glob_not_yet_start_msg := true; glob_reached_optimal_h := false; glob_optimal_done := false; glob_type_given_pole := 0; glob_optimize := false; glob_look_poles := false; glob_dump_closed_form := false; glob_max_iter := 10000; glob_no_eqs := 0; glob_unchanged_h_cnt := 0; glob_warned := false; glob_warned2 := false; glob_start := 0; glob_iter := 0; array_y_set_initial[1, 1] := true; array_y_set_initial[1, 2] := false; array_y_set_initial[1, 3] := false; array_y_set_initial[1, 4] := false; array_y_set_initial[1, 5] := false; array_y_set_initial[1, 6] := false; array_y_set_initial[1, 7] := false; array_y_set_initial[1, 8] := false; array_y_set_initial[1, 9] := false; array_y_set_initial[1, 10] := false; array_y_set_initial[1, 11] := false; array_y_set_initial[1, 12] := false; array_y_set_initial[1, 13] := false; array_y_set_initial[1, 14] := false; array_y_set_initial[1, 15] := false; array_y_set_initial[1, 16] := false; array_y_set_initial[1, 17] := false; array_y_set_initial[1, 18] := false; array_y_set_initial[1, 19] := false; array_y_set_initial[1, 20] := false; array_y_set_initial[1, 21] := false; array_y_set_initial[1, 22] := false; array_y_set_initial[1, 23] := false; array_y_set_initial[1, 24] := false; array_y_set_initial[1, 25] := false; array_y_set_initial[1, 26] := false; array_y_set_initial[1, 27] := false; array_y_set_initial[1, 28] := false; array_y_set_initial[1, 29] := false; array_y_set_initial[1, 30] := false; array_y_set_initial[1, 31] := false; array_y_set_initial[1, 32] := false; array_y_set_initial[1, 33] := false; array_y_set_initial[1, 34] := false; array_y_set_initial[1, 35] := false; array_y_set_initial[1, 36] := false; array_y_set_initial[1, 37] := false; array_y_set_initial[1, 38] := false; array_y_set_initial[1, 39] := false; array_y_set_initial[1, 40] := false; ALWAYS := 1; INFO := 2; DEBUGL := 3; DEBUGMASSIVE := 4; ATS_MAX_TERMS := 40; glob_iolevel := INFO; glob_orig_start_sec := elapsed_time_seconds(); glob_display_flag := true; glob_no_eqs := 1; glob_iter := -1; opt_iter := -1; glob_max_iter := 10000; glob_max_hours := 0.; glob_max_minutes := 15.0; omniout_str(ALWAYS, "##############ECHO OF PROBLEM#################"); omniout_str(ALWAYS, "##############temp/lin_tanhpostcpx.cpx#################"); omniout_str(ALWAYS, "diff ( y , x , 1 ) = tanh ( 3.0 * x + 1.0 ) ; ") ; omniout_str(ALWAYS, "!"); omniout_str(ALWAYS, "#BEGIN FIRST INPUT BLOCK"); omniout_str(ALWAYS, "Digits:=32;"); omniout_str(ALWAYS, "max_terms:=40;"); omniout_str(ALWAYS, "!"); omniout_str(ALWAYS, "#END FIRST INPUT BLOCK"); omniout_str(ALWAYS, "#BEGIN SECOND INPUT BLOCK"); omniout_str(ALWAYS, "x_start := 1.1 + 0.1 * I;"); omniout_str(ALWAYS, "x_end := 99.0 + 99.0 * I;"); omniout_str(ALWAYS, "array_y_init[0 + 1] := exact_soln_y(x_start);"); omniout_str(ALWAYS, "glob_look_poles := true;"); omniout_str(ALWAYS, ""); omniout_str(ALWAYS, ""); omniout_str(ALWAYS, ""); omniout_str(ALWAYS, ""); omniout_str(ALWAYS, ""); omniout_str(ALWAYS, ""); omniout_str(ALWAYS, ""); omniout_str(ALWAYS, "glob_type_given_pole := 3;"); omniout_str(ALWAYS, "#END SECOND INPUT BLOCK"); omniout_str(ALWAYS, "#BEGIN OVERRIDE BLOCK"); omniout_str(ALWAYS, "glob_desired_digits_correct:=8;"); omniout_str(ALWAYS, "glob_max_minutes:=(3.0);"); omniout_str(ALWAYS, "glob_subiter_method:=3;"); omniout_str(ALWAYS, "glob_max_iter:=10000;"); omniout_str(ALWAYS, "glob_upper_ratio_limit:=c(1.000001);"); omniout_str(ALWAYS, "glob_lower_ratio_limit:=c(0.999999);"); omniout_str(ALWAYS, "glob_look_poles:=true;"); omniout_str(ALWAYS, "glob_h:=c(0.001);"); omniout_str(ALWAYS, "glob_display_interval:=c(0.01);"); omniout_str(ALWAYS, "#END OVERRIDE BLOCK"); omniout_str(ALWAYS, "!"); omniout_str(ALWAYS, "#BEGIN USER DEF BLOCK"); omniout_str(ALWAYS, "exact_soln_y := proc(x)"); omniout_str(ALWAYS, "return(ln(cosh(c(3.0)*c(x) + c(1.0)))/c(3.0));"); omniout_str(ALWAYS, "end;"); omniout_str(ALWAYS, ""); 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 := 1.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 ) = tanh ( 3.0 *\ x + 1.0 ) ; "); omniout_int(INFO, "Iterations ", 32, glob_iter, 4, " "); prog_report(x_start, x_end); if glob_html_log then logstart(html_log_file); logitem_str(html_log_file, "2017-11-26T15:03:33-06:00"); logitem_str(html_log_file, "Maple"); logitem_str(html_log_file, "lin_tanh"); logitem_str(html_log_file, "diff ( y , x , 1 ) = t\ anh ( 3.0 * x + 1.0 ) ; "); logitem_complex(html_log_file, x_start); logitem_complex(html_log_file, x_end); logitem_complex(html_log_file, array_x[1]); logitem_complex(html_log_file, glob_h); logitem_h_reason(html_log_file); logitem_integer(html_log_file, Digits); glob_desired_digits_correct := 0.; logitem_float(html_log_file, glob_desired_digits_correct); if array_est_digits[1] <> -16 then logitem_integer(html_log_file, array_est_digits[1]) else logitem_str(html_log_file, "Unknown") end if; if glob_min_good_digits <> -16 then logitem_integer(html_log_file, glob_min_good_digits) else logitem_str(html_log_file, "Unknown") end if; if glob_good_digits <> -16 then logitem_integer(html_log_file, glob_good_digits) else logitem_str(html_log_file, "Unknown") end if; logitem_str(html_log_file, "NA"); logitem_str(html_log_file, "NA"); logitem_integer(html_log_file, ATS_MAX_TERMS); if glob_type_given_pole = 0 then logitem_str(html_log_file, "Not Given"); logitem_str(html_log_file, "NA") elif glob_type_given_pole = 4 then logitem_str(html_log_file, "No Solution"); logitem_str(html_log_file, "NA") elif glob_type_given_pole = 5 then logitem_str(html_log_file, "Some Pole"); logitem_str(html_log_file, "????") elif glob_type_given_pole = 3 then logitem_str(html_log_file, "No Pole"); logitem_str(html_log_file, "NA") elif glob_type_given_pole = 1 then logitem_str(html_log_file, "Real Sing"); logitem_float(html_log_file, glob_least_given_sing) elif glob_type_given_pole = 2 then logitem_str(html_log_file, "Complex Sing"); logitem_float(html_log_file, glob_least_given_sing) end if; if glob_least_ratio_sing < glob_large_float then glob_least_ratio_sing := 0; logitem_float(html_log_file, glob_least_ratio_sing) else logitem_str(html_log_file, "NONE") end if; if glob_least_3_sing < glob_large_float then logitem_float(html_log_file, glob_least_3_sing) else logitem_str(html_log_file, "NONE") end if; if glob_least_6_sing < glob_large_float then glob_least_6_sing := 0.; logitem_float(html_log_file, glob_least_6_sing) else logitem_str(html_log_file, "NONE") end if; logitem_integer(html_log_file, glob_iter); logitem_time(html_log_file, glob_clock_sec); if c(glob_percent_done) < glob__100 then logitem_time(html_log_file, glob_total_exp_sec); 0 else logitem_str(html_log_file, "Done"); 0 end if; log_revs(html_log_file, " 309 "); logitem_str(html_log_file, "lin_tanh diffeq.mxt"); logitem_str(html_log_file, "lin_tanh maple results"); logitem_str(html_log_file, "Poor Accuracy"); 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.7MB, alloc=40.3MB, time=0.08 ##############ECHO OF PROBLEM################# ##############temp/lin_tanhpostcpx.cpx################# diff ( y , x , 1 ) = tanh ( 3.0 * x + 1.0 ) ; ! #BEGIN FIRST INPUT BLOCK Digits:=32; max_terms:=40; ! #END FIRST INPUT BLOCK #BEGIN SECOND INPUT BLOCK x_start := 1.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(ln(cosh(c(3.0)*c(x) + c(1.0)))/c(3.0)); end; next_delta := proc() global glob_nxt, x_delta; x_delta := [ 0.001 + 0.00004 * I, 0.0001 + 0.004 * I, 0.003 + 0.006 * I, 0.0001 + 0.005 * I, 0.0001 + 0.003 * I, 0.001 + 0.001 * I, 0.001 + 0.003 * I, 0.0001 + 0.004 * I, 0.003 + 0.006 * I, 0.0001 + 0.005 * I, 0.0001 + 0.003 * I, 0.001 + 0.001 * I, 0.001 + 0.003 * I, 0.0001 + 0.004 * I, 0.003 + 0.006 * I, 0.0001 + 0.005 * I, 0.0001 + 0.003 * I, 0.001 + 0.001 * I, 0.001 + 0.003 * I, 0.0001 + 0.004 * I, 0.003 + 0.006 * I, 0.0001 + 0.005 * I, 0.0001 + 0.003 * I, 0.001 + 0.001 * I, 0.001 + 0.003 * I, 0.0001 + 0.004 * I, 0.003 + 0.006 * I, 0.0001 + 0.005 * I, 0.0001 + 0.003 * I, 0.001 + 0.001 * I, 0.0001 + 0.004 * I, 0.003 + 0.006 * I, 0.0001 + 0.005 * I, 0.0001 + 0.003 * I, 0.001 + 0.001 * I, 0.001 + 0.003 * I, 0.0001 + 0.004 * I, 0.003 + 0.006 * I, 0.0001 + 0.005 * I, 0.0001 + 0.003 * I, 0.001 + 0.001 * I, 0.001 + 0.003 * I, 0.0001 + 0.004 * I, 0.003 + 0.006 * I, 0.0001 + 0.005 * I, 0.0001 + 0.003 * I, 0.001 + 0.001 * I, 0.001 + 0.003 * I, 0.0001 + 0.004 * I, 0.003 + 0.006 * I, 0.0001 + 0.005 * I, 0.0001 + 0.003 * I, 0.001 + 0.001 * I, 0.001 + 0.003 * I, 0.0001 + 0.004 * I, 0.003 + 0.006 * I, 0.0001 + 0.005 * I, 0.0001 + 0.003 * I, 0.001 + 0.001 * I, 0.0001 + 0.004 * I, 0.003 + 0.006 * I, 0.0001 + 0.005 * I, 0.0001 + 0.003 * I, 0.001 + 0.001 * I, 0.001 + 0.003 * I, 0.0001 + 0.004 * I, 0.003 + 0.006 * I, 0.0001 + 0.005 * I, 0.0001 + 0.003 * I, 0.001 + 0.001 * I, 0.001 + 0.003 * I, 0.0001 + 0.004 * I, 0.003 + 0.006 * I, 0.0001 + 0.005 * I, 0.0001 + 0.003 * I, 0.001 + 0.001 * I, 0.001 + 0.003 * I, 0.0001 + 0.004 * I, 0.003 + 0.006 * I, 0.0001 + 0.005 * I, 0.0001 + 0.003 * I, 0.001 + 0.001 * I, 0.001 + 0.003 * I, 0.0001 + 0.004 * I, 0.003 + 0.006 * I, 0.0001 + 0.005 * I, 0.0001 + 0.003 * I, 0.001 + 0.001 * I, 0.0001 + 0.004 * I, 0.003 + 0.006 * I, 0.0001 + 0.005 * I, 0.0001 + 0.003 * I, 0.001 + 0.001 * I, 0.001 + 0.003 * I, 0.0001 + 0.004 * I, 0.003 + 0.006 * I, 0.0001 + 0.005 * I, 0.0001 + 0.003 * I, 0.001 + 0.001 * I, 0.001 + 0.003 * I, 0.0001 + 0.004 * I, 0.003 + 0.006 * I, 0.0001 + 0.005 * I, 0.0001 + 0.003 * I, 0.001 + 0.001 * I, 0.001 + 0.003 * I, 0.0001 + 0.004 * I, 0.003 + 0.006 * I, 0.0001 + 0.005 * I, 0.0001 + 0.003 * I, 0.001 + 0.001 * I, 0.001 + 0.003 * I, 0.0001 + 0.004 * I, 0.003 + 0.006 * I, 0.0001 + 0.005 * I, 0.0001 + 0.003 * I, 0.001 + 0.001 * I, 0.0001 + 0.004 * I, 0.003 + 0.006 * I, 0.0001 + 0.005 * I, 0.0001 + 0.003 * I, 0.001 + 0.001 * I, 0.001 + 0.003 * I, 0.0001 + 0.004 * I, 0.003 + 0.006 * I, 0.0001 + 0.005 * I, 0.0001 + 0.003 * I, 0.001 + 0.001 * I, 0.001 + 0.003 * I, 0.0001 + 0.004 * I, 0.003 + 0.006 * I, 0.0001 + 0.005 * I, 0.0001 + 0.003 * I, 0.001 + 0.001 * I, 0.001 + 0.003 * I, 0.0001 + 0.004 * I, 0.003 + 0.006 * I, 0.0001 + 0.005 * I, 0.0001 + 0.003 * I, 0.001 + 0.001 * I, 0.001 + 0.003 * I, 0.0001 + 0.004 * I, 0.003 + 0.006 * I, 0.0001 + 0.005 * I, 0.0001 + 0.003 * I, 0.001 + 0.001 * I, 0.0001 + 0.004 * I, 0.003 + 0.006 * I, 0.0001 + 0.005 * I, 0.0001 + 0.003 * I, 0.001 + 0.001 * I, 0.001 + 0.003 * I, 0.0001 + 0.004 * I, 0.003 + 0.006 * I, 0.0001 + 0.005 * I, 0.0001 + 0.003 * I, 0.001 + 0.001 * I, 0.001 + 0.003 * I, 0.0001 + 0.004 * I, 0.003 + 0.006 * I, 0.0001 + 0.005 * I, 0.0001 + 0.003 * I, 0.001 + 0.001 * I, 0.001 + 0.003 * I, 0.0001 + 0.004 * I, 0.003 + 0.006 * I, 0.0001 + 0.005 * I, 0.0001 + 0.003 * I, 0.001 + 0.001 * I, 0.001 + 0.003 * I, 0.0001 + 0.004 * I, 0.003 + 0.006 * I, 0.0001 + 0.005 * I, 0.0001 + 0.003 * I, 0.001 + 0.001 * I, 0.0001 + 0.004 * I, 0.003 + 0.006 * I, 0.0001 + 0.005 * I, 0.0001 + 0.003 * I, 0.001 + 0.001 * I, 0.001 + 0.003 * I, 0.0001 + 0.004 * I, 0.0001 + 0.004 * I, 0.003 + 0.006 * I, 0.0001 + 0.005 * I, 0.0001 + 0.003 * I, 0.001 + 0.001 * I, 0.001 + 0.003 * I, 0.0001 + 0.004 * I, 0.003 + 0.006 * I, 0.0001 + 0.005 * I, 0.0001 + 0.003 * I, 0.001 + 0.001 * I, 0.001 + 0.003 * I, 0.0001 + 0.004 * I, 0.003 + 0.006 * I, 0.0001 + 0.005 * I, 0.0001 + 0.003 * I, 0.001 + 0.001 * I, 0.001 + 0.003 * I, 0.0001 + 0.004 * I, 0.003 + 0.006 * I, 0.0001 + 0.005 * I, 0.0001 + 0.003 * I, 0.001 + 0.001 * I, 0.001 + 0.003 * I, 0.0001 + 0.004 * I, 0.003 + 0.006 * I, 0.0001 + 0.005 * I, 0.0001 + 0.003 * I, 0.001 + 0.001 * I, 0.0001 + 0.004 * I, 0.003 + 0.006 * I, 0.0001 + 0.005 * I, 0.0001 + 0.003 * I, 0.001 + 0.001 * I, 0.001 + 0.003 * I, 0.0001 + 0.004 * I, 0.003 + 0.006 * I, 0.0001 + 0.005 * I, 0.0001 + 0.003 * I, 0.001 + 0.001 * I, 0.001 + 0.003 * I, 0.0001 + 0.004 * I, 0.003 + 0.006 * I, 0.0001 + 0.005 * I, 0.0001 + 0.003 * I, 0.001 + 0.001 * I, 0.001 + 0.003 * I, 0.0001 + 0.004 * I, 0.003 + 0.006 * I, 0.0001 + 0.005 * I, 0.0001 + 0.003 * I, 0.001 + 0.001 * I, 0.001 + 0.003 * I, 0.0001 + 0.004 * I, 0.003 + 0.006 * I, 0.0001 + 0.005 * I, 0.0001 + 0.003 * I, 0.001 + 0.001 * I, 0.0001 + 0.004 * I, 0.003 + 0.006 * I, 0.0001 + 0.005 * I, 0.0001 + 0.003 * I, 0.001 + 0.001 * I, 0.001 + 0.003 * I, 0.0001 + 0.004 * I, 0.003 + 0.006 * I, 0.0001 + 0.005 * I, 0.0001 + 0.003 * I, 0.001 + 0.001 * I, 0.001 + 0.003 * I, 0.0001 + 0.004 * I, 0.003 + 0.006 * I, 0.0001 + 0.005 * I, 0.0001 + 0.003 * I, 0.001 + 0.001 * I, 0.001 + 0.003 * I, 0.0001 + 0.004 * I, 0.003 + 0.006 * I, 0.0001 + 0.005 * I, 0.0001 + 0.003 * I, 0.001 + 0.001 * I, 0.001 + 0.003 * I, 0.0001 + 0.004 * I, 0.003 + 0.006 * I, 0.0001 + 0.005 * I, 0.0001 + 0.003 * I, 0.001 + 0.001 * I, 0.0001 + 0.004 * I, 0.003 + 0.006 * I, 0.0001 + 0.005 * I, 0.0001 + 0.003 * I, 0.001 + 0.001 * I, 0.001 + 0.003 * I, 0.0001 + 0.004 * I, 0.003 + 0.006 * I, 0.0001 + 0.005 * I, 0.0001 + 0.003 * I, 0.001 + 0.001 * I, 0.001 + 0.003 * I, 0.0001 + 0.004 * I, 0.003 + 0.006 * I, 0.0001 + 0.005 * I, 0.0001 + 0.003 * I, 0.001 + 0.001 * I, 0.001 + 0.003 * I, 0.0001 + 0.004 * I, 0.003 + 0.006 * I, 0.0001 + 0.005 * I, 0.0001 + 0.003 * I, 0.001 + 0.001 * I, 0.001 + 0.003 * I, 0.0001 + 0.004 * I, 0.003 + 0.006 * I, 0.0001 + 0.005 * I, 0.0001 + 0.003 * I, 0.001 + 0.001 * I, 0.0001 + 0.004 * I, 0.003 + 0.006 * I, 0.0001 + 0.005 * I, 0.0001 + 0.003 * I, 0.001 + 0.001 * I, 0.001 + 0.003 * I, 0.0001 + 0.004 * I, 0.003 + 0.006 * I, 0.0001 + 0.005 * I, 0.0001 + 0.003 * I, 0.001 + 0.001 * I, 0.001 + 0.003 * I, 0.0001 + 0.004 * I, 0.003 + 0.006 * I, 0.0001 + 0.005 * I, 0.0001 + 0.003 * I, 0.001 + 0.001 * I, 0.001 + 0.003 * I, 0.0001 + 0.004 * I, 0.003 + 0.006 * I, 0.0001 + 0.005 * I, 0.0001 + 0.003 * I, 0.001 + 0.001 * I, 0.001 + 0.003 * I, 0.0001 + 0.004 * I, 0.003 + 0.006 * I, 0.0001 + 0.005 * I, 0.0001 + 0.003 * I, 0.001 + 0.001 * I, 0.0001 + 0.004 * I, 0.003 + 0.006 * I, 0.0001 + 0.005 * I, 0.0001 + 0.003 * I, 0.001 + 0.001 * I, 0.001 + 0.003 * I, 0.0001 + 0.004 * I, 0.003 + 0.006 * I, 0.0001 + 0.005 * I, 0.0001 + 0.003 * I, 0.001 + 0.001 * I, 0.001 + 0.003 * I, 0.0001 + 0.004 * I, 0.003 + 0.006 * I, 0.0001 + 0.005 * I, 0.0001 + 0.003 * I, 0.001 + 0.001 * I, 0.001 + 0.003 * I, 0.0001 + 0.004 * I, 0.003 + 0.006 * I, 0.0001 + 0.005 * I, 0.0001 + 0.003 * I, 0.001 + 0.001 * I, 0.001 + 0.003 * I, 0.0001 + 0.004 * I, 0.003 + 0.006 * I, 0.0001 + 0.005 * I, 0.0001 + 0.003 * I, 0.001 + 0.001 * I, 0.003 + 0.006 * I, 0.0001 + 0.005 * I, 0.0001 + 0.003 * I, 0.001 + 0.001 * I, 0.001 + 0.003 * I, 0.0001 + 0.004 * I, 0.003 + 0.006 * I, 0.0001 + 0.005 * I, 0.0001 + 0.003 * I, 0.001 + 0.001 * I, 0.001 + 0.003 * I, 0.0001 + 0.004 * I, 0.003 + 0.006 * I, 0.0001 + 0.005 * I, 0.0001 + 0.003 * I, 0.001 + 0.001 * I, 0.001 + 0.003 * I, 0.0001 + 0.004 * I, 0.003 + 0.006 * I, 0.0001 + 0.005 * I, 0.0001 + 0.003 * I, 0.001 + 0.001 * I, 0.0001 + 0.004 * I, 0.003 + 0.006 * I, 0.0001 + 0.005 * I, 0.0001 + 0.003 * I, 0.001 + 0.001 * I, 0.001 + 0.003 * I, 0.0001 + 0.004 * I, 0.003 + 0.006 * I, 0.0001 + 0.005 * I, 0.0001 + 0.003 * I, 0.001 + 0.001 * I, 0.001 + 0.003 * I, 0.0001 + 0.004 * I, 0.003 + 0.006 * I, 0.0001 + 0.005 * I, 0.0001 + 0.003 * I, 0.001 + 0.001 * I, 0.001 + 0.003 * I, 0.0001 + 0.004 * I, 0.003 + 0.006 * I, 0.0001 + 0.005 * I, 0.0001 + 0.003 * I, 0.001 + 0.001 * I, 0.001 + 0.003 * I, 0.0001 + 0.004 * I, 0.003 + 0.006 * I, 0.0001 + 0.005 * I, 0.0001 + 0.003 * I, 0.001 + 0.001 * I, 0.0001 + 0.004 * I, 0.003 + 0.006 * I, 0.0001 + 0.005 * I, 0.0001 + 0.003 * I, 0.001 + 0.001 * I, 0.001 + 0.003 * I, 0.0001 + 0.004 * I, 0.003 + 0.006 * I, 0.0001 + 0.005 * I, 0.0001 + 0.003 * I, 0.001 + 0.001 * I, 0.001 + 0.003 * I, 0.0001 + 0.004 * I, 0.003 + 0.006 * I, 0.0001 + 0.005 * I, 0.0001 + 0.003 * I, 0.001 + 0.001 * I, 0.001 + 0.003 * I, 0.0001 + 0.004 * I, 0.003 + 0.006 * I, 0.0001 + 0.005 * I, 0.0001 + 0.003 * I, 0.001 + 0.001 * I, 0.001 + 0.003 * I, 0.0001 + 0.004 * I, 0.003 + 0.006 * I, 0.0001 + 0.005 * I, 0.0001 + 0.003 * I, 0.001 + 0.001 * I, 0.0001 + 0.004 * I, 0.003 + 0.006 * I, 0.0001 + 0.005 * I, 0.0001 + 0.003 * I, 0.001 + 0.001 * I, 0.001 + 0.003 * I, 0.0001 + 0.004 * I, 0.003 + 0.006 * I, 0.0001 + 0.005 * I, 0.0001 + 0.003 * I, 0.001 + 0.001 * I, 0.001 + 0.003 * I, 0.0001 + 0.004 * I, 0.003 + 0.006 * I, 0.0001 + 0.005 * I, 0.0001 + 0.003 * I, 0.001 + 0.001 * I, 0.001 + 0.003 * I, 0.0001 + 0.004 * I, 0.003 + 0.006 * I, 0.0001 + 0.005 * I, 0.0001 + 0.003 * I, 0.001 + 0.001 * I, 0.001 + 0.003 * I, 0.0001 + 0.004 * I, 0.003 + 0.006 * I, 0.0001 + 0.005 * I, 0.0001 + 0.003 * I, 0.001 + 0.001 * I, 0.0001 + 0.004 * I, 0.003 + 0.006 * I, 0.0001 + 0.005 * I, 0.0001 + 0.003 * I, 0.001 + 0.001 * I, 0.001 + 0.003 * I, 0.0001 + 0.004 * I, 0.003 + 0.006 * I, 0.0001 + 0.005 * I, 0.0001 + 0.003 * I, 0.001 + 0.001 * I, 0.001 + 0.003 * I, 0.0001 + 0.004 * I, 0.003 + 0.006 * I, 0.0001 + 0.005 * I, 0.0001 + 0.003 * I, 0.001 + 0.001 * I, 0.001 + 0.003 * I, 0.0001 + 0.004 * I, 0.003 + 0.006 * I, 0.0001 + 0.005 * I, 0.0001 + 0.003 * I, 0.001 + 0.001 * I, 0.001 + 0.003 * I, 0.0001 + 0.004 * I, 0.003 + 0.006 * I, 0.0001 + 0.005 * I, 0.0001 + 0.003 * I, 0.001 + 0.001 * I, 0.0001 + 0.004 * I, 0.003 + 0.006 * I, 0.0001 + 0.005 * I, 0.0001 + 0.003 * I, 0.001 + 0.001 * I, 0.001 + 0.003 * I, 0.0001 + 0.004 * I, 0.003 + 0.006 * I, 0.0001 + 0.005 * I, 0.0001 + 0.003 * I, 0.001 + 0.001 * I, 0.001 + 0.003 * I, 0.0001 + 0.004 * I, 0.003 + 0.006 * I, 0.0001 + 0.005 * I, 0.0001 + 0.003 * I, 0.001 + 0.001 * I, 0.001 + 0.003 * I, 0.0001 + 0.004 * I, 0.003 + 0.006 * I, 0.0001 + 0.005 * I, 0.0001 + 0.003 * I, 0.001 + 0.001 * I, 0.001 + 0.003 * I, 0.0001 + 0.004 * I, 0.003 + 0.006 * I, 0.0001 + 0.005 * I, 0.0001 + 0.003 * I, 0.001 + 0.001 * I, 0.0001 + 0.004 * I, 0.003 + 0.006 * I, 0.0001 + 0.005 * I, 0.0001 + 0.003 * I, 0.001 + 0.001 * I, 0.001 + 0.003 * I, 0.0001 + 0.004 * I, 0.003 + 0.006 * I, 0.0001 + 0.005 * I, 0.0001 + 0.003 * I, 0.001 + 0.001 * I, 0.001 + 0.003 * I, 0.0001 + 0.004 * I, 0.003 + 0.006 * I, 0.0001 + 0.005 * I, 0.0001 + 0.003 * I, 0.001 + 0.001 * I, 0.001 + 0.003 * I, 0.0001 + 0.004 * I, 0.003 + 0.006 * I, 0.0001 + 0.005 * I, 0.0001 + 0.003 * I, 0.001 + 0.001 * I, 0.001 + 0.003 * I, 0.0001 + 0.004 * I, 0.003 + 0.006 * I, 0.0001 + 0.005 * I, 0.0001 + 0.003 * I, 0.001 + 0.001 * I, 0.0001 + 0.004 * I, 0.003 + 0.006 * I, 0.0001 + 0.005 * I, 0.0001 + 0.003 * I, 0.001 + 0.001 * I, 0.001 + 0.003 * I, 0.0001 + 0.004 * I, 0.003 + 0.006 * I, 0.0001 + 0.005 * I, 0.0001 + 0.003 * I, 0.001 + 0.001 * I, 0.001 + 0.003 * I, 0.0001 + 0.004 * I, 0.003 + 0.006 * I, 0.0001 + 0.005 * I, 0.0001 + 0.003 * I, 0.001 + 0.001 * I, 0.001 + 0.003 * I, 0.0001 + 0.004 * I, 0.003 + 0.006 * I, 0.0001 + 0.005 * I, 0.0001 + 0.003 * I, 0.001 + 0.001 * I, 0.001 + 0.003 * I, 0.0001 + 0.004 * I, 0.003 + 0.006 * I, 0.0001 + 0.005 * I, 0.0001 + 0.003 * I, 0.001 + 0.001 * I, 0.0001 + 0.004 * I, 0.003 + 0.006 * I, 0.0001 + 0.005 * I, 0.0001 + 0.003 * I, 0.001 + 0.001 * I, 0.001 + 0.003 * I, 0.0001 + 0.004 * I, 0.003 + 0.006 * I, 0.0001 + 0.005 * I, 0.0001 + 0.003 * I, 0.001 + 0.001 * I, 0.001 + 0.003 * I, 0.0001 + 0.004 * I, 0.003 + 0.006 * I, 0.0001 + 0.005 * I, 0.0001 + 0.003 * I, 0.001 + 0.001 * I, 0.001 + 0.003 * I, 0.0001 + 0.004 * I, 0.003 + 0.006 * I, 0.0001 + 0.005 * I, 0.0001 + 0.003 * I, 0.001 + 0.001 * I, 0.001 + 0.003 * I, 0.0001 + 0.004 * I, 0.003 + 0.006 * I, 0.0001 + 0.005 * I, 0.0001 + 0.003 * I, 0.001 + 0.001 * I, 0.0001 + 0.004 * I, 0.003 + 0.006 * I, 0.0001 + 0.005 * I, 0.0001 + 0.003 * I, 0.001 + 0.001 * I, 0.001 + 0.003 * I, 0.0001 + 0.004 * I, 0.003 + 0.006 * I, 0.0001 + 0.005 * I, 0.0001 + 0.003 * I, 0.001 + 0.001 * I, 0.001 + 0.003 * I, 0.0001 + 0.004 * I, 0.003 + 0.006 * I, 0.0001 + 0.005 * I, 0.0001 + 0.003 * I, 0.001 + 0.001 * I, 0.001 + 0.003 * I, 0.0001 + 0.004 * I, 0.003 + 0.006 * I, 0.0001 + 0.005 * I, 0.0001 + 0.003 * I, 0.001 + 0.001 * I, 0.001 + 0.003 * I, 0.0001 + 0.004 * I, 0.003 + 0.006 * I, 0.0001 + 0.005 * I, 0.0001 + 0.003 * I, 0.001 + 0.001 * I, 0.0001 + 0.004 * I, 0.003 + 0.006 * I, 0.0001 + 0.005 * I, 0.0001 + 0.003 * I, 0.001 + 0.001 * I, 0.001 + 0.003 * I, 0.0001 + 0.004 * I, 0.003 + 0.006 * I, 0.0001 + 0.005 * I, 0.0001 + 0.003 * I, 0.001 + 0.001 * I, 0.001 + 0.003 * I, 0.0001 + 0.004 * I, 0.003 + 0.006 * I, 0.0001 + 0.005 * I, 0.0001 + 0.003 * I, 0.001 + 0.001 * I, 0.001 + 0.003 * I, 0.0001 + 0.004 * I, 0.003 + 0.006 * I, 0.0001 + 0.005 * I, 0.0001 + 0.003 * I, 0.001 + 0.001 * I, 0.001 + 0.003 * I, 0.0001 + 0.004 * I, 0.003 + 0.006 * I, 0.0001 + 0.005 * I, 0.0001 + 0.003 * I, 0.001 + 0.001 * I, 0.0001 + 0.004 * I, 0.003 + 0.006 * I, 0.0001 + 0.005 * I, 0.0001 + 0.003 * I, 0.001 + 0.001 * I, 0.001 + 0.003 * I, 0.0001 + 0.004 * I, 0.003 + 0.006 * I, 0.0001 + 0.005 * I, 0.0001 + 0.003 * I, 0.001 + 0.001 * I, 0.001 + 0.003 * I, 0.0001 + 0.004 * I, 0.003 + 0.006 * I, 0.0001 + 0.005 * I, 0.0001 + 0.003 * I, 0.001 + 0.001 * I, 0.001 + 0.003 * I, 0.0001 + 0.004 * I, 0.003 + 0.006 * I, 0.0001 + 0.005 * I, 0.0001 + 0.003 * I, 0.001 + 0.001 * I, 0.001 + 0.003 * I, 0.0001 + 0.004 * I, 0.003 + 0.006 * I, 0.0001 + 0.005 * I, 0.0001 + 0.003 * I, 0.001 + 0.001 * I, 0.0001 + 0.004 * I, 0.003 + 0.006 * I, 0.0001 + 0.005 * I, 0.0001 + 0.003 * I, 0.001 + 0.001 * I, 0.001 + 0.003 * I, 0.0001 + 0.004 * I, 0.003 + 0.006 * I, 0.0001 + 0.005 * I, 0.0001 + 0.003 * I, 0.001 + 0.001 * I, 0.001 + 0.003 * I, 0.0001 + 0.004 * I, 0.003 + 0.006 * I, 0.0001 + 0.005 * I, 0.0001 + 0.003 * I, 0.001 + 0.001 * I, 0.001 + 0.003 * I, 0.0001 + 0.004 * I, 0.003 + 0.006 * I, 0.0001 + 0.005 * I, 0.0001 + 0.003 * I, 0.001 + 0.001 * I, 0.001 + 0.003 * I, 0.0001 + 0.004 * I, 0.003 + 0.006 * I, 0.0001 + 0.005 * I, 0.0001 + 0.003 * I, 0.001 + 0.001 * I, 0.0001 + 0.004 * I, 0.003 + 0.006 * I, 0.0001 + 0.005 * I, 0.0001 + 0.003 * I, 0.001 + 0.001 * I, 0.001 + 0.003 * I, 0.0001 + 0.004 * I, 0.003 + 0.006 * I, 0.0001 + 0.005 * I, 0.0001 + 0.003 * I, 0.001 + 0.001 * I, 0.001 + 0.003 * I, 0.0001 + 0.004 * I, 0.003 + 0.006 * I, 0.0001 + 0.005 * I, 0.0001 + 0.003 * I, 0.001 + 0.001 * I, 0.001 + 0.003 * I, 0.0001 + 0.004 * I, 0.003 + 0.006 * I, 0.0001 + 0.005 * I, 0.0001 + 0.003 * I, 0.001 + 0.001 * I, 0.001 + 0.003 * I, 0.0001 + 0.004 * I, 0.003 + 0.006 * I, 0.0001 + 0.005 * I, 0.0001 + 0.003 * I, 0.001 + 0.001 * I, 0.001 + 0.003 * I, 0.000 + 0.000 * I ]; glob_nxt := glob_nxt + 1; it := x_delta[glob_nxt]; return it; end; #END USER DEF BLOCK #######END OF ECHO OF PROBLEM################# START of Soultion x[1] = 1.1 0.1 h = 0.0001 0.005 y[1] (numeric) = 1.20233492079 0.0999653539477 y[1] (closed_form) = 1.20233492079 0.0999653539477 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] = 1.1001 0.105 h = 0.0001 0.003 y[1] (numeric) = 1.20243383363 0.104963868783 y[1] (closed_form) = 1.20243382919 0.10496387207 absolute error = 5.520e-09 relative error = 4.574e-07 % Correct digits = 8 NO POLE (given) for Equation 1 NO 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=26.6MB, alloc=40.3MB, time=0.35 x[1] = 1.1002 0.108 h = 0.001 0.001 y[1] (numeric) = 1.20253314095 0.107963009062 y[1] (closed_form) = 1.20253314167 0.107963008189 absolute error = 1.130e-09 relative error = 9.363e-08 % Correct digits = 9 NO POLE (given) for Equation 1 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 1.1012 0.109 h = 0.001 0.003 y[1] (numeric) = 1.20353262537 0.108962942437 y[1] (closed_form) = 1.20353262788 0.108962938658 absolute error = 4.536e-09 relative error = 3.754e-07 % Correct digits = 8 NO POLE (given) for Equation 1 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 1.1022 0.112 h = 0.0001 0.004 y[1] (numeric) = 1.20453166917 0.111962299217 y[1] (closed_form) = 1.20453166786 0.111962301188 absolute error = 2.370e-09 relative error = 1.959e-07 % Correct digits = 9 NO POLE (given) for Equation 1 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 1.1023 0.116 h = 0.003 0.006 y[1] (numeric) = 1.20463072895 0.115961196149 y[1] (closed_form) = 1.20463072178 0.115961197991 absolute error = 7.402e-09 relative error = 6.117e-07 % Correct digits = 8 NO POLE (given) for Equation 1 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 1.1053 0.122 h = 0.0001 0.005 y[1] (numeric) = 1.20762848541 0.121960249534 y[1] (closed_form) = 1.20762849217 0.121960272833 absolute error = 2.426e-08 relative error = 1.999e-06 % Correct digits = 8 NO POLE (given) for Equation 1 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 1.1054 0.127 h = 0.0001 0.003 y[1] (numeric) = 1.20772725521 0.126958980403 y[1] (closed_form) = 1.207727255 0.126958988958 absolute error = 8.557e-09 relative error = 7.047e-07 % Correct digits = 8 NO POLE (given) for Equation 1 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 1.1055 0.13 h = 0.001 0.001 y[1] (numeric) = 1.20782648043 0.129958243125 y[1] (closed_form) = 1.20782648464 0.129958247028 absolute error = 5.735e-09 relative error = 4.721e-07 % Correct digits = 8 NO POLE (given) for Equation 1 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 1.1065 0.131 h = 0.001 0.003 y[1] (numeric) = 1.20882597683 0.130958244874 y[1] (closed_form) = 1.20882598238 0.130958245759 absolute error = 5.622e-09 relative error = 4.624e-07 % Correct digits = 8 NO POLE (given) for Equation 1 NO 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=71.2MB, alloc=52.3MB, time=0.92 x[1] = 1.1075 0.134 h = 0.0001 0.004 y[1] (numeric) = 1.2098249766 0.133957749096 y[1] (closed_form) = 1.20982497921 0.133957755989 absolute error = 7.371e-09 relative error = 6.056e-07 % Correct digits = 8 NO POLE (given) for Equation 1 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 1.1076 0.138 h = 0.003 0.006 y[1] (numeric) = 1.20992393308 0.137956809693 y[1] (closed_form) = 1.20992393005 0.137956817209 absolute error = 8.102e-09 relative error = 6.653e-07 % Correct digits = 8 NO POLE (given) for Equation 1 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 1.1106 0.144 h = 0.0001 0.005 y[1] (numeric) = 1.21292165795 0.143956186686 y[1] (closed_form) = 1.21292167103 0.143956213033 absolute error = 2.942e-08 relative error = 2.408e-06 % Correct digits = 8 NO POLE (given) for Equation 1 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 1.1107 0.149 h = 0.0001 0.003 y[1] (numeric) = 1.21302031479 0.148955124784 y[1] (closed_form) = 1.2130203193 0.14895513786 absolute error = 1.383e-08 relative error = 1.132e-06 % Correct digits = 8 NO POLE (given) for Equation 1 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 1.1108 0.152 h = 0.001 0.001 y[1] (numeric) = 1.21311947678 0.151954515556 y[1] (closed_form) = 1.21311948494 0.151954523601 absolute error = 1.146e-08 relative error = 9.371e-07 % Correct digits = 8 NO POLE (given) for Equation 1 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 1.1118 0.153 h = 0.001 0.003 y[1] (numeric) = 1.2141189934 0.15295458144 y[1] (closed_form) = 1.21411900247 0.152954586414 absolute error = 1.034e-08 relative error = 8.452e-07 % Correct digits = 8 NO POLE (given) for Equation 1 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 1.1128 0.156 h = 0.0001 0.004 y[1] (numeric) = 1.21511796968 0.155954232865 y[1] (closed_form) = 1.21511797669 0.155954243985 absolute error = 1.314e-08 relative error = 1.073e-06 % Correct digits = 8 NO POLE (given) for Equation 1 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 1.1129 0.16 h = 0.003 0.006 y[1] (numeric) = 1.21521684782 0.1599534638 y[1] (closed_form) = 1.2152168495 0.159953476236 absolute error = 1.255e-08 relative error = 1.024e-06 % Correct digits = 8 NO POLE (given) for Equation 1 NO 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=116.0MB, alloc=52.3MB, time=1.46 x[1] = 1.1159 0.166 h = 0.0001 0.005 y[1] (numeric) = 1.21821458359 0.165953155589 y[1] (closed_form) = 1.21821460314 0.165953184055 absolute error = 3.453e-08 relative error = 2.809e-06 % Correct digits = 8 NO POLE (given) for Equation 1 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 1.116 0.171 h = 0.0001 0.003 y[1] (numeric) = 1.21831315839 0.170952307091 y[1] (closed_form) = 1.218313168 0.170952323906 absolute error = 1.937e-08 relative error = 1.575e-06 % Correct digits = 8 NO POLE (given) for Equation 1 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 1.1161 0.174 h = 0.001 0.001 y[1] (numeric) = 1.21841227598 0.173951828892 y[1] (closed_form) = 1.21841228846 0.173951840411 absolute error = 1.699e-08 relative error = 1.380e-06 % Correct digits = 8 NO POLE (given) for Equation 1 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 1.1171 0.175 h = 0.001 0.003 y[1] (numeric) = 1.21941182018 0.174951953788 y[1] (closed_form) = 1.21941183315 0.174951962242 absolute error = 1.548e-08 relative error = 1.257e-06 % Correct digits = 8 NO POLE (given) for Equation 1 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 1.1181 0.178 h = 0.0001 0.004 y[1] (numeric) = 1.22041079267 0.177951749571 y[1] (closed_form) = 1.22041080444 0.177951764189 absolute error = 1.877e-08 relative error = 1.522e-06 % Correct digits = 8 NO POLE (given) for Equation 1 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 1.1182 0.182 h = 0.003 0.006 y[1] (numeric) = 1.22050961731 0.181951154071 y[1] (closed_form) = 1.22050962413 0.181951170633 absolute error = 1.791e-08 relative error = 1.451e-06 % Correct digits = 8 NO POLE (given) for Equation 1 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 1.1212 0.188 h = 0.0001 0.005 y[1] (numeric) = 1.22350740369 0.187951146772 y[1] (closed_form) = 1.22350742971 0.18795117645 absolute error = 3.947e-08 relative error = 3.189e-06 % Correct digits = 7 NO POLE (given) for Equation 1 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 1.1213 0.193 h = 0.0001 0.003 y[1] (numeric) = 1.22360592689 0.19295051367 y[1] (closed_form) = 1.22360594189 0.192950533425 absolute error = 2.481e-08 relative error = 2.003e-06 % Correct digits = 8 NO POLE (given) for Equation 1 NO 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=160.8MB, alloc=52.3MB, time=2.00 x[1] = 1.1214 0.196 h = 0.001 0.001 y[1] (numeric) = 1.22370501855 0.195950166962 y[1] (closed_form) = 1.22370503563 0.195950181265 absolute error = 2.228e-08 relative error = 1.798e-06 % Correct digits = 8 NO POLE (given) for Equation 1 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 1.1224 0.197 h = 0.0001 0.004 y[1] (numeric) = 1.22470459678 0.19695034501 y[1] (closed_form) = 1.22470461393 0.196950356309 absolute error = 2.054e-08 relative error = 1.656e-06 % Correct digits = 8 NO POLE (given) for Equation 1 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 1.1225 0.201 h = 0.003 0.006 y[1] (numeric) = 1.22480339543 0.200949891514 y[1] (closed_form) = 1.22480340532 0.200949912457 absolute error = 2.316e-08 relative error = 1.866e-06 % Correct digits = 8 NO POLE (given) for Equation 1 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 1.1255 0.207 h = 0.0001 0.005 y[1] (numeric) = 1.22780125135 0.206950129837 y[1] (closed_form) = 1.22780128128 0.206950161351 absolute error = 4.347e-08 relative error = 3.491e-06 % Correct digits = 7 NO POLE (given) for Equation 1 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 1.1256 0.212 h = 0.0001 0.003 y[1] (numeric) = 1.22789975129 0.211949680565 y[1] (closed_form) = 1.22789976946 0.211949703692 absolute error = 2.941e-08 relative error = 2.360e-06 % Correct digits = 8 NO POLE (given) for Equation 1 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 1.1257 0.215 h = 0.001 0.001 y[1] (numeric) = 1.22799883338 0.214949445569 y[1] (closed_form) = 1.22799885296 0.214949463188 absolute error = 2.634e-08 relative error = 2.113e-06 % Correct digits = 8 NO POLE (given) for Equation 1 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 1.1267 0.216 h = 0.001 0.003 y[1] (numeric) = 1.22899844475 0.215949664715 y[1] (closed_form) = 1.22899846407 0.215949679416 absolute error = 2.427e-08 relative error = 1.945e-06 % Correct digits = 8 NO POLE (given) for Equation 1 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 1.1277 0.219 h = 0.0001 0.004 y[1] (numeric) = 1.22999745697 0.218949713949 y[1] (closed_form) = 1.2299974766 0.218949734568 absolute error = 2.847e-08 relative error = 2.279e-06 % Correct digits = 8 NO POLE (given) for Equation 1 NO 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=205.6MB, alloc=52.3MB, time=2.55 x[1] = 1.1278 0.223 h = 0.003 0.006 y[1] (numeric) = 1.23009624385 0.222949438897 y[1] (closed_form) = 1.23009625939 0.222949462436 absolute error = 2.821e-08 relative error = 2.257e-06 % Correct digits = 8 NO POLE (given) for Equation 1 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 1.1308 0.229 h = 0.0001 0.005 y[1] (numeric) = 1.23309421528 0.228949941127 y[1] (closed_form) = 1.23309425142 0.228949972261 absolute error = 4.771e-08 relative error = 3.804e-06 % Correct digits = 7 NO POLE (given) for Equation 1 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 1.1309 0.234 h = 0.0001 0.003 y[1] (numeric) = 1.23319271751 0.23394970095 y[1] (closed_form) = 1.23319274128 0.233949725531 absolute error = 3.420e-08 relative error = 2.725e-06 % Correct digits = 8 NO POLE (given) for Equation 1 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 1.131 0.237 h = 0.001 0.001 y[1] (numeric) = 1.23329180608 0.23694959232 y[1] (closed_form) = 1.2332918305 0.236949611431 absolute error = 3.101e-08 relative error = 2.469e-06 % Correct digits = 8 NO POLE (given) for Equation 1 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 1.132 0.238 h = 0.001 0.003 y[1] (numeric) = 1.23429146082 0.237949852315 y[1] (closed_form) = 1.23429148462 0.237949868658 absolute error = 2.887e-08 relative error = 2.297e-06 % Correct digits = 8 NO POLE (given) for Equation 1 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 1.133 0.241 h = 0.0001 0.004 y[1] (numeric) = 1.23529051853 0.240950025537 y[1] (closed_form) = 1.2352905434 0.240950047522 absolute error = 3.319e-08 relative error = 2.637e-06 % Correct digits = 8 NO POLE (given) for Equation 1 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 1.1331 0.245 h = 0.003 0.006 y[1] (numeric) = 1.23538931851 0.244949916081 y[1] (closed_form) = 1.23538933983 0.244949941391 absolute error = 3.309e-08 relative error = 2.627e-06 % Correct digits = 8 NO POLE (given) for Equation 1 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 1.1361 0.251 h = 0.0001 0.005 y[1] (numeric) = 1.23838743453 0.250950657015 y[1] (closed_form) = 1.23838747659 0.250950686992 absolute error = 5.165e-08 relative error = 4.088e-06 % Correct digits = 7 memory used=250.5MB, alloc=52.3MB, time=3.09 NO POLE (given) for Equation 1 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 1.1362 0.256 h = 0.0001 0.003 y[1] (numeric) = 1.23848596561 0.255950617344 y[1] (closed_form) = 1.23848599495 0.255950642605 absolute error = 3.872e-08 relative error = 3.062e-06 % Correct digits = 8 NO POLE (given) for Equation 1 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 1.1363 0.259 h = 0.001 0.001 y[1] (numeric) = 1.23858507652 0.258950629237 y[1] (closed_form) = 1.23858510579 0.258950649164 absolute error = 3.541e-08 relative error = 2.798e-06 % Correct digits = 8 NO POLE (given) for Equation 1 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 1.1373 0.26 h = 0.001 0.003 y[1] (numeric) = 1.23958477812 0.25995092293 y[1] (closed_form) = 1.23958480644 0.259950940277 absolute error = 3.321e-08 relative error = 2.622e-06 % Correct digits = 8 NO POLE (given) for Equation 1 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 1.1383 0.263 h = 0.0001 0.004 y[1] (numeric) = 1.24058389534 0.262951209418 y[1] (closed_form) = 1.2405839254 0.262951232048 absolute error = 3.763e-08 relative error = 2.967e-06 % Correct digits = 8 NO POLE (given) for Equation 1 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 1.1384 0.267 h = 0.003 0.006 y[1] (numeric) = 1.24068272901 0.266951257315 y[1] (closed_form) = 1.24068275609 0.266951283591 absolute error = 3.773e-08 relative error = 2.973e-06 % Correct digits = 8 NO POLE (given) for Equation 1 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 1.1414 0.273 h = 0.0001 0.005 y[1] (numeric) = 1.24368101431 0.272952209043 y[1] (closed_form) = 1.2436810619 0.272952237155 absolute error = 5.528e-08 relative error = 4.341e-06 % Correct digits = 7 NO POLE (given) for Equation 1 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 1.1415 0.278 h = 0.0001 0.003 y[1] (numeric) = 1.24377959866 0.277952358242 y[1] (closed_form) = 1.24377963344 0.277952383447 absolute error = 4.295e-08 relative error = 3.370e-06 % Correct digits = 7 NO POLE (given) for Equation 1 NO 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=295.3MB, alloc=52.3MB, time=3.64 x[1] = 1.1416 0.281 h = 0.001 0.001 y[1] (numeric) = 1.24387874639 0.280952483026 y[1] (closed_form) = 1.24387878042 0.280952503118 absolute error = 3.952e-08 relative error = 3.099e-06 % Correct digits = 8 NO POLE (given) for Equation 1 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 1.1426 0.282 h = 0.001 0.003 y[1] (numeric) = 1.24487849729 0.281952803103 y[1] (closed_form) = 1.24487853008 0.281952820839 absolute error = 3.728e-08 relative error = 2.920e-06 % Correct digits = 8 NO POLE (given) for Equation 1 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 1.1436 0.285 h = 0.0001 0.004 y[1] (numeric) = 1.24587768609 0.284953190775 y[1] (closed_form) = 1.24587772123 0.284953213362 absolute error = 4.177e-08 relative error = 3.268e-06 % Correct digits = 7 NO POLE (given) for Equation 1 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 1.1437 0.289 h = 0.003 0.006 y[1] (numeric) = 1.24597657219 0.288953385483 y[1] (closed_form) = 1.24597660492 0.288953411953 absolute error = 4.209e-08 relative error = 3.291e-06 % Correct digits = 7 NO POLE (given) for Equation 1 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 1.1467 0.295 h = 0.0001 0.005 y[1] (numeric) = 1.24897504693 0.294954518053 y[1] (closed_form) = 1.2489750996 0.294954543669 absolute error = 5.857e-08 relative error = 4.564e-06 % Correct digits = 7 NO POLE (given) for Equation 1 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 1.1468 0.3 h = 0.0001 0.003 y[1] (numeric) = 1.24907370652 0.299954841832 y[1] (closed_form) = 1.24907374651 0.29995486629 absolute error = 4.688e-08 relative error = 3.650e-06 % Correct digits = 7 NO POLE (given) for Equation 1 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 1.1469 0.303 h = 0.001 0.001 y[1] (numeric) = 1.24917290401 0.30295507033 y[1] (closed_form) = 1.24917294263 0.302955089974 absolute error = 4.333e-08 relative error = 3.371e-06 % Correct digits = 7 NO POLE (given) for Equation 1 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 1.1479 0.304 h = 0.0001 0.004 y[1] (numeric) = 1.25017270561 0.30395540946 y[1] (closed_form) = 1.25017274274 0.303955426999 absolute error = 4.106e-08 relative error = 3.191e-06 % Correct digits = 7 NO POLE (given) for Equation 1 NO 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=340.1MB, alloc=52.3MB, time=4.18 x[1] = 1.148 0.308 h = 0.003 0.006 y[1] (numeric) = 1.25027164683 0.307955715134 y[1] (closed_form) = 1.25027168392 0.307955743037 absolute error = 4.641e-08 relative error = 3.605e-06 % Correct digits = 7 NO POLE (given) for Equation 1 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 1.151 0.314 h = 0.0001 0.005 y[1] (numeric) = 1.25327029561 0.313956980806 y[1] (closed_form) = 1.25327035191 0.313957005671 absolute error = 6.155e-08 relative error = 4.764e-06 % Correct digits = 7 NO POLE (given) for Equation 1 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 1.1511 0.319 h = 0.0001 0.003 y[1] (numeric) = 1.2533690337 0.318957442898 y[1] (closed_form) = 1.2533690776 0.318957468047 absolute error = 5.060e-08 relative error = 3.912e-06 % Correct digits = 7 NO POLE (given) for Equation 1 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 1.1512 0.322 h = 0.001 0.001 y[1] (numeric) = 1.25346828203 0.321957753105 y[1] (closed_form) = 1.25346832407 0.321957773745 absolute error = 4.683e-08 relative error = 3.619e-06 % Correct digits = 7 NO POLE (given) for Equation 1 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 1.1522 0.323 h = 0.001 0.003 y[1] (numeric) = 1.25446812753 0.32295810345 y[1] (closed_form) = 1.25446816789 0.322958122219 absolute error = 4.451e-08 relative error = 3.436e-06 % Correct digits = 7 NO POLE (given) for Equation 1 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 1.1532 0.326 h = 0.0001 0.004 y[1] (numeric) = 1.2554674739 0.325958644924 y[1] (closed_form) = 1.25546751753 0.325958667596 absolute error = 4.916e-08 relative error = 3.790e-06 % Correct digits = 7 NO POLE (given) for Equation 1 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 1.1533 0.33 h = 0.003 0.006 y[1] (numeric) = 1.25556649875 0.329959079311 y[1] (closed_form) = 1.25556654106 0.32995910609 absolute error = 5.008e-08 relative error = 3.857e-06 % Correct digits = 7 NO POLE (given) for Equation 1 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 1.1563 0.336 h = 0.0001 0.005 y[1] (numeric) = 1.25856536257 0.335960467012 y[1] (closed_form) = 1.25856542295 0.335960488424 absolute error = 6.406e-08 relative error = 4.918e-06 % Correct digits = 7 NO POLE (given) for Equation 1 NO 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=385.0MB, alloc=52.3MB, time=4.73 x[1] = 1.1564 0.341 h = 0.0001 0.003 y[1] (numeric) = 1.2586642097 0.340961071659 y[1] (closed_form) = 1.2586642582 0.340961094924 absolute error = 5.380e-08 relative error = 4.125e-06 % Correct digits = 7 NO POLE (given) for Equation 1 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 1.1565 0.344 h = 0.001 0.001 y[1] (numeric) = 1.25876352743 0.343961465391 y[1] (closed_form) = 1.25876357357 0.343961484565 absolute error = 4.997e-08 relative error = 3.829e-06 % Correct digits = 7 NO POLE (given) for Equation 1 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 1.1575 0.345 h = 0.001 0.003 y[1] (numeric) = 1.25976342375 0.344961821522 y[1] (closed_form) = 1.25976346803 0.344961839114 absolute error = 4.765e-08 relative error = 3.648e-06 % Correct digits = 7 NO POLE (given) for Equation 1 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 1.1585 0.348 h = 0.0001 0.004 y[1] (numeric) = 1.26076286512 0.347962424836 y[1] (closed_form) = 1.26076291304 0.347962445758 absolute error = 5.229e-08 relative error = 3.998e-06 % Correct digits = 7 NO POLE (given) for Equation 1 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 1.1586 0.352 h = 0.003 0.006 y[1] (numeric) = 1.26086198408 0.351962966313 y[1] (closed_form) = 1.26086203126 0.351962991348 absolute error = 5.342e-08 relative error = 4.080e-06 % Correct digits = 7 NO POLE (given) for Equation 1 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 1.1616 0.358 h = 0.0001 0.005 y[1] (numeric) = 1.26386106997 0.357964443776 y[1] (closed_form) = 1.26386113382 0.357964461353 absolute error = 6.622e-08 relative error = 5.041e-06 % Correct digits = 7 NO POLE (given) for Equation 1 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 1.1617 0.363 h = 0.0001 0.003 y[1] (numeric) = 1.26396003998 0.362965171412 y[1] (closed_form) = 1.26396009267 0.362965192283 absolute error = 5.667e-08 relative error = 4.309e-06 % Correct digits = 7 NO POLE (given) for Equation 1 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 1.1618 0.366 h = 0.001 0.001 y[1] (numeric) = 1.26405943502 0.365965636503 y[1] (closed_form) = 1.26405948491 0.365965653746 absolute error = 5.279e-08 relative error = 4.011e-06 % Correct digits = 7 NO POLE (given) for Equation 1 NO 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=430.0MB, alloc=52.3MB, time=5.27 x[1] = 1.1628 0.367 h = 0.001 0.003 y[1] (numeric) = 1.26505938086 0.366965991711 y[1] (closed_form) = 1.26505942878 0.36696600767 absolute error = 5.050e-08 relative error = 3.834e-06 % Correct digits = 7 NO POLE (given) for Equation 1 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 1.1638 0.37 h = 0.0001 0.004 y[1] (numeric) = 1.26605892135 0.369966642294 y[1] (closed_form) = 1.26605897318 0.369966660989 absolute error = 5.509e-08 relative error = 4.177e-06 % Correct digits = 7 NO POLE (given) for Equation 1 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 1.1639 0.374 h = 0.003 0.006 y[1] (numeric) = 1.26615814435 0.373967274608 y[1] (closed_form) = 1.26615819599 0.373967297345 absolute error = 5.643e-08 relative error = 4.274e-06 % Correct digits = 7 NO POLE (given) for Equation 1 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 1.1669 0.38 h = 0.0001 0.005 y[1] (numeric) = 1.26915745494 0.379968809948 y[1] (closed_form) = 1.26915752164 0.379968823399 absolute error = 6.803e-08 relative error = 5.135e-06 % Correct digits = 7 NO POLE (given) for Equation 1 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 1.167 0.385 h = 0.0001 0.003 y[1] (numeric) = 1.26925655865 0.384969640019 y[1] (closed_form) = 1.26925661504 0.384969658057 absolute error = 5.921e-08 relative error = 4.464e-06 % Correct digits = 7 NO POLE (given) for Equation 1 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 1.1671 0.388 h = 0.001 0.001 y[1] (numeric) = 1.26935603702 0.387970163777 y[1] (closed_form) = 1.26935609026 0.387970178688 absolute error = 5.529e-08 relative error = 4.166e-06 % Correct digits = 7 NO POLE (given) for Equation 1 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 1.1681 0.389 h = 0.001 0.003 y[1] (numeric) = 1.2703560303 0.388970511782 y[1] (closed_form) = 1.27035608149 0.388970525712 absolute error = 5.304e-08 relative error = 3.993e-06 % Correct digits = 7 NO POLE (given) for Equation 1 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 1.1691 0.392 h = 0.0001 0.004 y[1] (numeric) = 1.271355672 0.391971195118 y[1] (closed_form) = 1.27135572729 0.391971211176 absolute error = 5.757e-08 relative error = 4.327e-06 % Correct digits = 7 NO POLE (given) for Equation 1 NO 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=474.9MB, alloc=52.3MB, time=5.82 x[1] = 1.1692 0.396 h = 0.003 0.006 y[1] (numeric) = 1.27145500649 0.395971901394 y[1] (closed_form) = 1.27145506212 0.395971921357 absolute error = 5.910e-08 relative error = 4.438e-06 % Correct digits = 7 NO POLE (given) for Equation 1 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 1.1722 0.402 h = 0.0001 0.005 y[1] (numeric) = 1.27445454024 0.401973463658 y[1] (closed_form) = 1.27445460913 0.401973472785 absolute error = 6.950e-08 relative error = 5.201e-06 % Correct digits = 7 NO POLE (given) for Equation 1 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 1.1723 0.407 h = 0.0001 0.003 y[1] (numeric) = 1.27455378539 0.406974375047 y[1] (closed_form) = 1.27455384498 0.406974389891 absolute error = 6.141e-08 relative error = 4.590e-06 % Correct digits = 7 NO POLE (given) for Equation 1 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 1.1724 0.41 h = 0.001 0.001 y[1] (numeric) = 1.27465335126 0.409974944515 y[1] (closed_form) = 1.27465340743 0.409974956758 absolute error = 5.749e-08 relative error = 4.294e-06 % Correct digits = 7 NO POLE (given) for Equation 1 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 1.1734 0.411 h = 0.0001 0.004 y[1] (numeric) = 1.27565338919 0.410975279553 y[1] (closed_form) = 1.27565344326 0.410975291117 absolute error = 5.529e-08 relative error = 4.125e-06 % Correct digits = 7 NO POLE (given) for Equation 1 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 1.1735 0.415 h = 0.003 0.006 y[1] (numeric) = 1.2757528186 0.414976033762 y[1] (closed_form) = 1.27575287797 0.414976052468 absolute error = 6.224e-08 relative error = 4.640e-06 % Correct digits = 7 NO POLE (given) for Equation 1 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 1.1765 0.421 h = 0.0001 0.005 y[1] (numeric) = 1.27875254038 0.420977598054 y[1] (closed_form) = 1.27875261139 0.420977604796 absolute error = 7.133e-08 relative error = 5.298e-06 % Correct digits = 7 NO POLE (given) for Equation 1 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 1.1766 0.426 h = 0.0001 0.003 y[1] (numeric) = 1.27885191057 0.425978564157 y[1] (closed_form) = 1.2788519732 0.425978577468 absolute error = 6.403e-08 relative error = 4.750e-06 % Correct digits = 7 NO POLE (given) for Equation 1 NO 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=519.8MB, alloc=52.3MB, time=6.36 x[1] = 1.1767 0.429 h = 0.001 0.001 y[1] (numeric) = 1.27895155338 0.428979163652 y[1] (closed_form) = 1.27895161242 0.428979174822 absolute error = 6.008e-08 relative error = 4.454e-06 % Correct digits = 7 NO POLE (given) for Equation 1 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 1.1777 0.43 h = 0.001 0.003 y[1] (numeric) = 1.27995162725 0.429979483833 y[1] (closed_form) = 1.27995168417 0.429979494581 absolute error = 5.792e-08 relative error = 4.290e-06 % Correct digits = 7 NO POLE (given) for Equation 1 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 1.1787 0.433 h = 0.0001 0.004 y[1] (numeric) = 1.2809514563 0.432980191886 y[1] (closed_form) = 1.28095151747 0.432980203638 absolute error = 6.229e-08 relative error = 4.606e-06 % Correct digits = 7 NO POLE (given) for Equation 1 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 1.1788 0.437 h = 0.003 0.006 y[1] (numeric) = 1.28105100934 0.436980991577 y[1] (closed_form) = 1.28105107172 0.436981006826 absolute error = 6.421e-08 relative error = 4.744e-06 % Correct digits = 7 NO POLE (given) for Equation 1 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 1.1818 0.443 h = 0.0001 0.005 y[1] (numeric) = 1.28405094164 0.442982529206 y[1] (closed_form) = 1.28405101367 0.442982531482 absolute error = 7.207e-08 relative error = 5.306e-06 % Correct digits = 7 NO POLE (given) for Equation 1 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 1.1819 0.448 h = 0.0001 0.003 y[1] (numeric) = 1.28415046004 0.44798353724 y[1] (closed_form) = 1.28415052486 0.447983546891 absolute error = 6.554e-08 relative error = 4.819e-06 % Correct digits = 7 NO POLE (given) for Equation 1 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 1.182 0.451 h = 0.001 0.001 y[1] (numeric) = 1.28425019348 0.450984158465 y[1] (closed_form) = 1.28425025458 0.450984166521 absolute error = 6.163e-08 relative error = 4.528e-06 % Correct digits = 7 NO POLE (given) for Equation 1 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 1.183 0.452 h = 0.001 0.003 y[1] (numeric) = 1.28525030524 0.451984456508 y[1] (closed_form) = 1.28525036425 0.451984464428 absolute error = 5.954e-08 relative error = 4.370e-06 % Correct digits = 7 NO POLE (given) for Equation 1 NO 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=564.8MB, alloc=52.3MB, time=6.92 x[1] = 1.184 0.455 h = 0.0001 0.004 y[1] (numeric) = 1.28625023137 0.454985158233 y[1] (closed_form) = 1.28625029459 0.454985166574 absolute error = 6.377e-08 relative error = 4.674e-06 % Correct digits = 7 NO POLE (given) for Equation 1 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 1.1841 0.459 h = 0.003 0.006 y[1] (numeric) = 1.28634990413 0.458985983149 y[1] (closed_form) = 1.28634996896 0.458985994694 absolute error = 6.585e-08 relative error = 4.821e-06 % Correct digits = 7 NO POLE (given) for Equation 1 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 1.1871 0.465 h = 0.0001 0.005 y[1] (numeric) = 1.28935003518 0.464987468328 y[1] (closed_form) = 1.28935010763 0.464987466184 absolute error = 7.248e-08 relative error = 5.288e-06 % Correct digits = 7 NO POLE (given) for Equation 1 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 1.1872 0.47 h = 0.0001 0.003 y[1] (numeric) = 1.28944970125 0.469988497726 y[1] (closed_form) = 1.28944976772 0.469988503583 absolute error = 6.673e-08 relative error = 4.862e-06 % Correct digits = 7 NO POLE (given) for Equation 1 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 1.1873 0.473 h = 0.001 0.001 y[1] (numeric) = 1.2895495245 0.472989128261 y[1] (closed_form) = 1.28954958718 0.472989133062 absolute error = 6.287e-08 relative error = 4.577e-06 % Correct digits = 7 NO POLE (given) for Equation 1 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 1.1883 0.474 h = 0.001 0.003 y[1] (numeric) = 1.29054966982 0.473989400213 y[1] (closed_form) = 1.29054973049 0.473989405148 absolute error = 6.086e-08 relative error = 4.427e-06 % Correct digits = 7 NO POLE (given) for Equation 1 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 1.1893 0.477 h = 0.0001 0.004 y[1] (numeric) = 1.29154968836 0.47699008348 y[1] (closed_form) = 1.29154975312 0.476990088284 absolute error = 6.494e-08 relative error = 4.716e-06 % Correct digits = 7 NO POLE (given) for Equation 1 NO 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=609.7MB, alloc=52.3MB, time=7.46 x[1] = 1.1894 0.481 h = 0.003 0.006 y[1] (numeric) = 1.29164947931 0.480990917351 y[1] (closed_form) = 1.29164954602 0.480990925027 absolute error = 6.715e-08 relative error = 4.872e-06 % Correct digits = 7 NO POLE (given) for Equation 1 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 1.1924 0.487 h = 0.0001 0.005 y[1] (numeric) = 1.29464979454 0.486992326816 y[1] (closed_form) = 1.29464986682 0.486992320375 absolute error = 7.257e-08 relative error = 5.246e-06 % Correct digits = 7 NO POLE (given) for Equation 1 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 1.1925 0.492 h = 0.0001 0.003 y[1] (numeric) = 1.29474960513 0.491993357898 y[1] (closed_form) = 1.29474967269 0.491993359903 absolute error = 6.759e-08 relative error = 4.880e-06 % Correct digits = 7 NO POLE (given) for Equation 1 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 1.1926 0.495 h = 0.001 0.001 y[1] (numeric) = 1.2948495158 0.494993985921 y[1] (closed_form) = 1.29484957959 0.494993987394 absolute error = 6.381e-08 relative error = 4.603e-06 % Correct digits = 7 NO POLE (given) for Equation 1 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 1.1936 0.496 h = 0.001 0.003 y[1] (numeric) = 1.29584969003 0.495994228538 y[1] (closed_form) = 1.2958497519 0.495994230398 absolute error = 6.190e-08 relative error = 4.461e-06 % Correct digits = 7 NO POLE (given) for Equation 1 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 1.1946 0.499 h = 0.0001 0.004 y[1] (numeric) = 1.29684979496 0.498994882296 y[1] (closed_form) = 1.29684986074 0.498994883508 absolute error = 6.579e-08 relative error = 4.735e-06 % Correct digits = 7 NO POLE (given) for Equation 1 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 1.1947 0.503 h = 0.003 0.006 y[1] (numeric) = 1.29694970054 0.502995709694 y[1] (closed_form) = 1.29694976856 0.502995713415 absolute error = 6.813e-08 relative error = 4.897e-06 % Correct digits = 7 NO POLE (given) for Equation 1 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 1.1977 0.509 h = 0.0001 0.005 y[1] (numeric) = 1.29995018296 0.508997022968 y[1] (closed_form) = 1.29995025454 0.508997012422 absolute error = 7.235e-08 relative error = 5.182e-06 % Correct digits = 7 NO POLE (given) for Equation 1 NO 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=654.7MB, alloc=52.3MB, time=8.01 x[1] = 1.1978 0.514 h = 0.0001 0.003 y[1] (numeric) = 1.30005013256 0.513998037236 y[1] (closed_form) = 1.30005020067 0.513998035403 absolute error = 6.814e-08 relative error = 4.874e-06 % Correct digits = 7 NO POLE (given) for Equation 1 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 1.1979 0.517 h = 0.001 0.001 y[1] (numeric) = 1.30015012686 0.516998651698 y[1] (closed_form) = 1.30015019129 0.516998649834 absolute error = 6.446e-08 relative error = 4.607e-06 % Correct digits = 7 NO POLE (given) for Equation 1 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 1.1989 0.518 h = 0.0001 0.004 y[1] (numeric) = 1.3011503251 0.517998862459 y[1] (closed_form) = 1.30115038773 0.517998861213 absolute error = 6.265e-08 relative error = 4.473e-06 % Correct digits = 7 NO POLE (given) for Equation 1 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 1.199 0.522 h = 0.003 0.006 y[1] (numeric) = 1.30125032055 0.521999674013 y[1] (closed_form) = 1.3012503905 0.521999674949 absolute error = 6.995e-08 relative error = 4.989e-06 % Correct digits = 7 NO POLE (given) for Equation 1 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 1.202 0.528 h = 0.0001 0.005 y[1] (numeric) = 1.30425093323 0.52800089204 y[1] (closed_form) = 1.30425100503 0.528000878771 absolute error = 7.302e-08 relative error = 5.189e-06 % Correct digits = 7 NO POLE (given) for Equation 1 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 1.2021 0.533 h = 0.0001 0.003 y[1] (numeric) = 1.30435099688 0.533001879644 y[1] (closed_form) = 1.3043510663 0.533001875193 absolute error = 6.956e-08 relative error = 4.937e-06 % Correct digits = 7 NO POLE (given) for Equation 1 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 1.2022 0.536 h = 0.001 0.001 y[1] (numeric) = 1.30445105948 0.536002475198 y[1] (closed_form) = 1.30445112533 0.536002471127 absolute error = 6.597e-08 relative error = 4.678e-06 % Correct digits = 7 NO POLE (given) for Equation 1 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 1.2032 0.537 h = 0.001 0.003 y[1] (numeric) = 1.30545127479 0.537002657279 y[1] (closed_form) = 1.30545133896 0.537002654004 absolute error = 6.426e-08 relative error = 4.552e-06 % Correct digits = 7 NO POLE (given) for Equation 1 NO 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=699.5MB, alloc=52.3MB, time=8.56 x[1] = 1.2042 0.54 h = 0.0001 0.004 y[1] (numeric) = 1.30645152117 0.540003231733 y[1] (closed_form) = 1.30645158878 0.540003226965 absolute error = 6.778e-08 relative error = 4.795e-06 % Correct digits = 7 NO POLE (given) for Equation 1 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 1.2043 0.544 h = 0.003 0.006 y[1] (numeric) = 1.30655162495 0.544004011005 y[1] (closed_form) = 1.30655169519 0.544004008017 absolute error = 7.030e-08 relative error = 4.967e-06 % Correct digits = 7 NO POLE (given) for Equation 1 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 1.2073 0.55 h = 0.0001 0.005 y[1] (numeric) = 1.3095523686 0.550005102514 y[1] (closed_form) = 1.30955243881 0.550005085649 absolute error = 7.221e-08 relative error = 5.084e-06 % Correct digits = 7 NO POLE (given) for Equation 1 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 1.2074 0.555 h = 0.0001 0.003 y[1] (numeric) = 1.30965255565 0.555006042763 y[1] (closed_form) = 1.30965262469 0.555006034669 absolute error = 6.952e-08 relative error = 4.887e-06 % Correct digits = 7 NO POLE (given) for Equation 1 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 1.2075 0.558 h = 0.001 0.001 y[1] (numeric) = 1.3097526917 0.558006606671 y[1] (closed_form) = 1.30975275736 0.558006599398 absolute error = 6.607e-08 relative error = 4.641e-06 % Correct digits = 7 NO POLE (given) for Equation 1 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 1.2085 0.559 h = 0.001 0.003 y[1] (numeric) = 1.31075292167 0.559006754064 y[1] (closed_form) = 1.31075298583 0.559006747769 absolute error = 6.447e-08 relative error = 4.524e-06 % Correct digits = 7 NO POLE (given) for Equation 1 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 1.2095 0.562 h = 0.0001 0.004 y[1] (numeric) = 1.31175323151 0.562007274278 y[1] (closed_form) = 1.31175329877 0.56200726611 absolute error = 6.776e-08 relative error = 4.748e-06 % Correct digits = 7 NO POLE (given) for Equation 1 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 1.2096 0.566 h = 0.003 0.006 y[1] (numeric) = 1.31185343053 0.566008009353 y[1] (closed_form) = 1.31185350055 0.56600800256 absolute error = 7.035e-08 relative error = 4.924e-06 % Correct digits = 7 NO POLE (given) for Equation 1 NO 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=744.1MB, alloc=52.3MB, time=9.10 x[1] = 1.2126 0.572 h = 0.0001 0.005 y[1] (numeric) = 1.31485428381 0.572008962672 y[1] (closed_form) = 1.31485435203 0.572008942557 absolute error = 7.112e-08 relative error = 4.960e-06 % Correct digits = 7 NO POLE (given) for Equation 1 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 1.2127 0.577 h = 0.0001 0.003 y[1] (numeric) = 1.31495458331 0.577009841711 y[1] (closed_form) = 1.31495465153 0.577009830167 absolute error = 6.919e-08 relative error = 4.819e-06 % Correct digits = 7 NO POLE (given) for Equation 1 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 1.2128 0.58 h = 0.001 0.001 y[1] (numeric) = 1.31505478586 0.580010365865 y[1] (closed_form) = 1.31505485094 0.58001035554 absolute error = 6.589e-08 relative error = 4.585e-06 % Correct digits = 7 NO POLE (given) for Equation 1 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 1.2138 0.581 h = 0.001 0.003 y[1] (numeric) = 1.31605502548 0.581010478078 y[1] (closed_form) = 1.31605508925 0.581010468885 absolute error = 6.442e-08 relative error = 4.478e-06 % Correct digits = 7 NO POLE (given) for Equation 1 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 1.2148 0.584 h = 0.0001 0.004 y[1] (numeric) = 1.31705538934 0.584010938116 y[1] (closed_form) = 1.31705545585 0.584010926727 absolute error = 6.748e-08 relative error = 4.683e-06 % Correct digits = 7 NO POLE (given) for Equation 1 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 1.2149 0.588 h = 0.003 0.006 y[1] (numeric) = 1.31715567419 0.588011618605 y[1] (closed_form) = 1.31715574351 0.588011608186 absolute error = 7.010e-08 relative error = 4.860e-06 % Correct digits = 7 NO POLE (given) for Equation 1 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 1.2179 0.594 h = 0.0001 0.005 y[1] (numeric) = 1.32015661511 0.594012425246 y[1] (closed_form) = 1.32015668101 0.594012402264 absolute error = 6.979e-08 relative error = 4.821e-06 % Correct digits = 7 NO POLE (given) for Equation 1 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 1.218 0.599 h = 0.0001 0.003 y[1] (numeric) = 1.3202570148 0.599013231168 y[1] (closed_form) = 1.32025708179 0.599013216416 absolute error = 6.860e-08 relative error = 4.732e-06 % Correct digits = 7 NO POLE (given) for Equation 1 NO 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=788.8MB, alloc=52.3MB, time=9.65 x[1] = 1.2181 0.602 h = 0.001 0.001 y[1] (numeric) = 1.32035727613 0.602013708668 y[1] (closed_form) = 1.32035734026 0.602013695487 absolute error = 6.547e-08 relative error = 4.512e-06 % Correct digits = 7 NO POLE (given) for Equation 1 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 1.2191 0.603 h = 0.001 0.003 y[1] (numeric) = 1.32135752054 0.603013785869 y[1] (closed_form) = 1.32135758355 0.603013773943 absolute error = 6.413e-08 relative error = 4.415e-06 % Correct digits = 7 NO POLE (given) for Equation 1 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 1.2201 0.606 h = 0.0001 0.004 y[1] (numeric) = 1.3223579286 0.606014181233 y[1] (closed_form) = 1.32235799397 0.606014166849 absolute error = 6.693e-08 relative error = 4.601e-06 % Correct digits = 7 NO POLE (given) for Equation 1 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 1.2202 0.61 h = 0.003 0.006 y[1] (numeric) = 1.32245828889 0.610014798364 y[1] (closed_form) = 1.32245835709 0.610014784551 absolute error = 6.958e-08 relative error = 4.778e-06 % Correct digits = 7 NO POLE (given) for Equation 1 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 1.2232 0.616 h = 0.0001 0.005 y[1] (numeric) = 1.32545929528 0.616015452979 y[1] (closed_form) = 1.32545935858 0.616015427539 absolute error = 6.822e-08 relative error = 4.668e-06 % Correct digits = 7 NO POLE (given) for Equation 1 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 1.2233 0.621 h = 0.0001 0.003 y[1] (numeric) = 1.32555978184 0.621016175915 y[1] (closed_form) = 1.32555984725 0.621016158239 absolute error = 6.775e-08 relative error = 4.628e-06 % Correct digits = 7 NO POLE (given) for Equation 1 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 1.2234 0.624 h = 0.001 0.001 y[1] (numeric) = 1.32566009368 0.62401660112 y[1] (closed_form) = 1.32566015653 0.624016585318 absolute error = 6.481e-08 relative error = 4.423e-06 % Correct digits = 7 NO POLE (given) for Equation 1 NO 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=833.4MB, alloc=52.3MB, time=10.19 x[1] = 1.2244 0.625 h = 0.0001 0.004 y[1] (numeric) = 1.32666033822 0.62501664409 y[1] (closed_form) = 1.32666040016 0.625016629636 absolute error = 6.360e-08 relative error = 4.337e-06 % Correct digits = 7 NO POLE (given) for Equation 1 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 1.2245 0.629 h = 0.003 0.006 y[1] (numeric) = 1.32676075212 0.62901720415 y[1] (closed_form) = 1.32676082021 0.629017187436 absolute error = 7.011e-08 relative error = 4.775e-06 % Correct digits = 7 NO POLE (given) for Equation 1 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 1.2275 0.635 h = 0.0001 0.005 y[1] (numeric) = 1.32976179908 0.635017726375 y[1] (closed_form) = 1.32976186114 0.635017698947 absolute error = 6.785e-08 relative error = 4.604e-06 % Correct digits = 7 NO POLE (given) for Equation 1 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 1.2276 0.64 h = 0.0001 0.003 y[1] (numeric) = 1.32986235031 0.640018372378 y[1] (closed_form) = 1.32986241527 0.640018352234 absolute error = 6.801e-08 relative error = 4.608e-06 % Correct digits = 7 NO POLE (given) for Equation 1 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 1.2277 0.643 h = 0.001 0.001 y[1] (numeric) = 1.32996269937 0.64301874949 y[1] (closed_form) = 1.32996276206 0.643018731442 absolute error = 6.524e-08 relative error = 4.416e-06 % Correct digits = 7 NO POLE (given) for Equation 1 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 1.2287 0.644 h = 0.001 0.003 y[1] (numeric) = 1.3309629409 0.644018763983 y[1] (closed_form) = 1.33096300285 0.644018747342 absolute error = 6.415e-08 relative error = 4.339e-06 % Correct digits = 7 NO POLE (given) for Equation 1 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 1.2297 0.647 h = 0.0001 0.004 y[1] (numeric) = 1.3319634054 0.647019032159 y[1] (closed_form) = 1.33196346895 0.647019012726 absolute error = 6.645e-08 relative error = 4.488e-06 % Correct digits = 7 NO POLE (given) for Equation 1 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 1.2298 0.651 h = 0.003 0.006 y[1] (numeric) = 1.33206387717 0.651019514364 y[1] (closed_form) = 1.33206394344 0.651019494803 absolute error = 6.910e-08 relative error = 4.660e-06 % Correct digits = 7 NO POLE (given) for Equation 1 NO 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=878.1MB, alloc=52.3MB, time=10.74 x[1] = 1.2328 0.657 h = 0.0001 0.005 y[1] (numeric) = 1.3350649491 0.657019882348 y[1] (closed_form) = 1.33506500822 0.657019853267 absolute error = 6.588e-08 relative error = 4.428e-06 % Correct digits = 7 NO POLE (given) for Equation 1 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 1.2329 0.662 h = 0.0001 0.003 y[1] (numeric) = 1.3351655608 0.662020432398 y[1] (closed_form) = 1.33516562363 0.662020409942 absolute error = 6.672e-08 relative error = 4.477e-06 % Correct digits = 7 NO POLE (given) for Equation 1 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 1.233 0.665 h = 0.001 0.001 y[1] (numeric) = 1.33526594407 0.665020750019 y[1] (closed_form) = 1.33526600499 0.665020729865 absolute error = 6.417e-08 relative error = 4.302e-06 % Correct digits = 7 NO POLE (given) for Equation 1 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 1.234 0.666 h = 0.001 0.003 y[1] (numeric) = 1.33626617784 0.666020733141 y[1] (closed_form) = 1.33626623824 0.666020714432 absolute error = 6.322e-08 relative error = 4.235e-06 % Correct digits = 7 NO POLE (given) for Equation 1 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 1.235 0.669 h = 0.0001 0.004 y[1] (numeric) = 1.33726665809 0.669020931435 y[1] (closed_form) = 1.33726671966 0.669020909841 absolute error = 6.524e-08 relative error = 4.363e-06 % Correct digits = 7 NO POLE (given) for Equation 1 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 1.2351 0.673 h = 0.003 0.006 y[1] (numeric) = 1.33736717258 0.673021334328 y[1] (closed_form) = 1.33736723675 0.673021312265 absolute error = 6.785e-08 relative error = 4.532e-06 % Correct digits = 7 NO POLE (given) for Equation 1 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 1.2381 0.679 h = 0.0001 0.005 y[1] (numeric) = 1.34036824885 0.679021551016 y[1] (closed_form) = 1.34036830493 0.679021520723 absolute error = 6.374e-08 relative error = 4.242e-06 % Correct digits = 7 NO POLE (given) for Equation 1 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 1.2382 0.684 h = 0.0001 0.003 y[1] (numeric) = 1.34046890637 0.684022001217 y[1] (closed_form) = 1.34046896685 0.684021976813 absolute error = 6.523e-08 relative error = 4.334e-06 % Correct digits = 7 NO POLE (given) for Equation 1 NO 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=922.7MB, alloc=52.3MB, time=11.28 x[1] = 1.2383 0.687 h = 0.001 0.001 y[1] (numeric) = 1.3405693149 0.68702225735 y[1] (closed_form) = 1.34056937385 0.687022235398 absolute error = 6.291e-08 relative error = 4.176e-06 % Correct digits = 7 NO POLE (given) for Equation 1 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 1.2393 0.688 h = 0.001 0.003 y[1] (numeric) = 1.34156953724 0.688022211336 y[1] (closed_form) = 1.34156959587 0.68802219084 absolute error = 6.211e-08 relative error = 4.119e-06 % Correct digits = 7 NO POLE (given) for Equation 1 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 1.2403 0.691 h = 0.0001 0.004 y[1] (numeric) = 1.34257002368 0.691022340519 y[1] (closed_form) = 1.34257008307 0.691022317103 absolute error = 6.384e-08 relative error = 4.228e-06 % Correct digits = 7 NO POLE (given) for Equation 1 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 1.2404 0.695 h = 0.003 0.006 y[1] (numeric) = 1.3426705691 0.695022661804 y[1] (closed_form) = 1.34267063092 0.695022637606 absolute error = 6.639e-08 relative error = 4.391e-06 % Correct digits = 7 NO POLE (given) for Equation 1 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 1.2434 0.701 h = 0.0001 0.005 y[1] (numeric) = 1.34567163022 0.701022732658 y[1] (closed_form) = 1.34567168323 0.701022701589 absolute error = 6.145e-08 relative error = 4.050e-06 % Correct digits = 7 NO POLE (given) for Equation 1 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 1.2435 0.706 h = 0.0001 0.003 y[1] (numeric) = 1.34577231901 0.706023081137 y[1] (closed_form) = 1.34577237701 0.70602305516 absolute error = 6.355e-08 relative error = 4.181e-06 % Correct digits = 7 NO POLE (given) for Equation 1 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 1.2436 0.709 h = 0.001 0.001 y[1] (numeric) = 1.34587274397 0.709023275004 y[1] (closed_form) = 1.34587280081 0.709023251577 absolute error = 6.147e-08 relative error = 4.041e-06 % Correct digits = 7 NO POLE (given) for Equation 1 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 1.2446 0.71 h = 0.001 0.003 y[1] (numeric) = 1.34687295161 0.71002320247 y[1] (closed_form) = 1.34687300831 0.710023180483 absolute error = 6.082e-08 relative error = 3.995e-06 % Correct digits = 7 NO POLE (given) for Equation 1 NO 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=967.3MB, alloc=52.3MB, time=11.82 x[1] = 1.2456 0.713 h = 0.0001 0.004 y[1] (numeric) = 1.34787343519 0.713023264499 y[1] (closed_form) = 1.34787349226 0.713023239611 absolute error = 6.226e-08 relative error = 4.083e-06 % Correct digits = 7 NO POLE (given) for Equation 1 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 1.2457 0.717 h = 0.003 0.006 y[1] (numeric) = 1.3479739999 0.717023503477 y[1] (closed_form) = 1.3479740592 0.717023477528 absolute error = 6.473e-08 relative error = 4.240e-06 % Correct digits = 7 NO POLE (given) for Equation 1 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 1.2487 0.723 h = 0.0001 0.005 y[1] (numeric) = 1.35097502789 0.723023436225 y[1] (closed_form) = 1.35097507786 0.7230234048 absolute error = 5.903e-08 relative error = 3.852e-06 % Correct digits = 7 NO POLE (given) for Equation 1 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 1.2488 0.728 h = 0.0001 0.003 y[1] (numeric) = 1.35107573374 0.728023683036 y[1] (closed_form) = 1.35107578914 0.728023655866 absolute error = 6.170e-08 relative error = 4.020e-06 % Correct digits = 7 NO POLE (given) for Equation 1 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 1.2489 0.731 h = 0.001 0.001 y[1] (numeric) = 1.35117616653 0.731023815018 y[1] (closed_form) = 1.35117622114 0.731023790446 absolute error = 5.988e-08 relative error = 3.898e-06 % Correct digits = 7 NO POLE (given) for Equation 1 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 1.2499 0.732 h = 0.0001 0.004 y[1] (numeric) = 1.35217635667 0.732023718894 y[1] (closed_form) = 1.35217641134 0.73202369572 absolute error = 5.938e-08 relative error = 3.862e-06 % Correct digits = 7 NO POLE (given) for Equation 1 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 1.25 0.736 h = 0.003 0.006 y[1] (numeric) = 1.3522769289 0.736023891105 y[1] (closed_form) = 1.35227698663 0.73602386322 absolute error = 6.412e-08 relative error = 4.165e-06 % Correct digits = 7 NO POLE (given) for Equation 1 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 1.253 0.742 h = 0.0001 0.005 y[1] (numeric) = 1.35527791673 0.742023712033 y[1] (closed_form) = 1.35527796482 0.742023679882 absolute error = 5.785e-08 relative error = 3.744e-06 % Correct digits = 7 NO POLE (given) for Equation 1 NO 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=1012.0MB, alloc=52.3MB, time=12.37 x[1] = 1.2531 0.747 h = 0.0001 0.003 y[1] (numeric) = 1.3553786275 0.747023872747 y[1] (closed_form) = 1.35537868132 0.747023844113 absolute error = 6.097e-08 relative error = 3.939e-06 % Correct digits = 7 NO POLE (given) for Equation 1 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 1.2532 0.75 h = 0.001 0.001 y[1] (numeric) = 1.35547906115 0.750023952554 y[1] (closed_form) = 1.3554791145 0.750023926522 absolute error = 5.936e-08 relative error = 3.832e-06 % Correct digits = 7 NO POLE (given) for Equation 1 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 1.2542 0.751 h = 0.001 0.003 y[1] (numeric) = 1.35647923459 0.75102383841 y[1] (closed_form) = 1.35647928815 0.751023813725 absolute error = 5.898e-08 relative error = 3.804e-06 % Correct digits = 7 NO POLE (given) for Equation 1 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 1.2552 0.754 h = 0.0001 0.004 y[1] (numeric) = 1.35747969161 0.75402378403 y[1] (closed_form) = 1.35747974483 0.754023756607 absolute error = 5.987e-08 relative error = 3.856e-06 % Correct digits = 7 NO POLE (given) for Equation 1 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 1.2553 0.758 h = 0.0001 0.004 y[1] (numeric) = 1.35758026359 0.758023873013 y[1] (closed_form) = 1.35758031862 0.758023844104 absolute error = 6.216e-08 relative error = 3.998e-06 % Correct digits = 7 NO POLE (given) for Equation 1 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 1.2554 0.762 h = 0.003 0.006 y[1] (numeric) = 1.35768083897 0.76202394667 y[1] (closed_form) = 1.357680894 0.762023917761 absolute error = 6.216e-08 relative error = 3.992e-06 % Correct digits = 7 NO POLE (given) for Equation 1 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 1.2584 0.768 h = 0.0001 0.005 y[1] (numeric) = 1.36068175676 0.768023626831 y[1] (closed_form) = 1.36068180192 0.768023595293 absolute error = 5.508e-08 relative error = 3.525e-06 % Correct digits = 7 NO POLE (given) for Equation 1 NO 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=1056.8MB, alloc=52.3MB, time=12.91 x[1] = 1.2585 0.773 h = 0.0001 0.003 y[1] (numeric) = 1.36078246067 0.773023673622 y[1] (closed_form) = 1.36078251184 0.773023644585 absolute error = 5.884e-08 relative error = 3.759e-06 % Correct digits = 7 NO POLE (given) for Equation 1 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 1.2586 0.776 h = 0.001 0.001 y[1] (numeric) = 1.3608828874 0.776023684719 y[1] (closed_form) = 1.36088293851 0.776023658242 absolute error = 5.756e-08 relative error = 3.674e-06 % Correct digits = 7 NO POLE (given) for Equation 1 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 1.2596 0.777 h = 0.001 0.003 y[1] (numeric) = 1.3618830361 0.77702354947 y[1] (closed_form) = 1.36188308761 0.777023524249 absolute error = 5.736e-08 relative error = 3.658e-06 % Correct digits = 7 NO POLE (given) for Equation 1 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 1.2606 0.78 h = 0.0001 0.004 y[1] (numeric) = 1.36288346499 0.780023428722 y[1] (closed_form) = 1.36288351577 0.780023400934 absolute error = 5.788e-08 relative error = 3.686e-06 % Correct digits = 7 NO POLE (given) for Equation 1 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 1.2607 0.784 h = 0.003 0.006 y[1] (numeric) = 1.36298402539 0.784023427788 y[1] (closed_form) = 1.36298407768 0.784023398307 absolute error = 6.002e-08 relative error = 3.817e-06 % Correct digits = 7 NO POLE (given) for Equation 1 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 1.2637 0.79 h = 0.0001 0.005 y[1] (numeric) = 1.36598486593 0.790023003644 y[1] (closed_form) = 1.36598490841 0.790022972897 absolute error = 5.243e-08 relative error = 3.323e-06 % Correct digits = 7 NO POLE (given) for Equation 1 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 1.2638 0.795 h = 0.0001 0.003 y[1] (numeric) = 1.36608554784 0.795022958831 y[1] (closed_form) = 1.36608559641 0.79502292972 absolute error = 5.662e-08 relative error = 3.582e-06 % Correct digits = 7 NO POLE (given) for Equation 1 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 1.2639 0.798 h = 0.001 0.001 y[1] (numeric) = 1.36618595903 0.798022915081 y[1] (closed_form) = 1.36618600786 0.798022888436 absolute error = 5.562e-08 relative error = 3.516e-06 % Correct digits = 7 NO POLE (given) for Equation 1 NO 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=1101.4MB, alloc=52.3MB, time=13.46 x[1] = 1.2649 0.799 h = 0.001 0.003 y[1] (numeric) = 1.36718608458 0.799022766249 y[1] (closed_form) = 1.36718613396 0.799022740758 absolute error = 5.557e-08 relative error = 3.509e-06 % Correct digits = 7 NO POLE (given) for Equation 1 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 1.2659 0.802 h = 0.0001 0.004 y[1] (numeric) = 1.36818648104 0.802022595617 y[1] (closed_form) = 1.36818652938 0.802022567755 absolute error = 5.580e-08 relative error = 3.518e-06 % Correct digits = 7 NO POLE (given) for Equation 1 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 1.266 0.806 h = 0.003 0.006 y[1] (numeric) = 1.36828701905 0.806022523273 y[1] (closed_form) = 1.36828706862 0.806022493593 absolute error = 5.778e-08 relative error = 3.638e-06 % Correct digits = 7 NO POLE (given) for Equation 1 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 1.269 0.812 h = 0.0001 0.005 y[1] (numeric) = 1.37128777212 0.812022008819 y[1] (closed_form) = 1.37128781211 0.812021979174 absolute error = 4.978e-08 relative error = 3.124e-06 % Correct digits = 8 NO POLE (given) for Equation 1 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 1.2691 0.817 h = 0.0001 0.003 y[1] (numeric) = 1.37138842122 0.817021878847 y[1] (closed_form) = 1.37138846726 0.817021849996 absolute error = 5.434e-08 relative error = 3.404e-06 % Correct digits = 7 NO POLE (given) for Equation 1 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 1.2692 0.82 h = 0.001 0.001 y[1] (numeric) = 1.37148881049 0.820021784412 y[1] (closed_form) = 1.37148885711 0.820021757896 absolute error = 5.363e-08 relative error = 3.356e-06 % Correct digits = 7 NO POLE (given) for Equation 1 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 1.2702 0.821 h = 0.001 0.003 y[1] (numeric) = 1.37248891207 0.821021625488 y[1] (closed_form) = 1.37248895936 0.821021600009 absolute error = 5.372e-08 relative error = 3.359e-06 % Correct digits = 7 NO POLE (given) for Equation 1 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 1.2712 0.824 h = 0.0001 0.004 y[1] (numeric) = 1.37348927102 0.82402141109 y[1] (closed_form) = 1.37348931702 0.824021383466 absolute error = 5.365e-08 relative error = 3.350e-06 % Correct digits = 7 NO POLE (given) for Equation 1 NO 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=1145.9MB, alloc=52.3MB, time=14.00 x[1] = 1.2713 0.828 h = 0.003 0.006 y[1] (numeric) = 1.37358977843 0.828021273027 y[1] (closed_form) = 1.37358982538 0.828021243502 absolute error = 5.546e-08 relative error = 3.458e-06 % Correct digits = 7 NO POLE (given) for Equation 1 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 1.2743 0.834 h = 0.0001 0.005 y[1] (numeric) = 1.37659043599 0.834020683004 y[1] (closed_form) = 1.37659047374 0.834020654734 absolute error = 4.716e-08 relative error = 2.930e-06 % Correct digits = 8 NO POLE (given) for Equation 1 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 1.2744 0.839 h = 0.0001 0.003 y[1] (numeric) = 1.37669104273 0.839020475442 y[1] (closed_form) = 1.37669108639 0.839020447162 absolute error = 5.202e-08 relative error = 3.227e-06 % Correct digits = 7 NO POLE (given) for Equation 1 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 1.2745 0.842 h = 0.001 0.001 y[1] (numeric) = 1.37679140449 0.842020335129 y[1] (closed_form) = 1.376791449 0.842020309019 absolute error = 5.160e-08 relative error = 3.197e-06 % Correct digits = 7 NO POLE (given) for Equation 1 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 1.2755 0.843 h = 0.001 0.003 y[1] (numeric) = 1.37779148178 0.843020169569 y[1] (closed_form) = 1.37779152707 0.843020144368 absolute error = 5.183e-08 relative error = 3.209e-06 % Correct digits = 7 NO POLE (given) for Equation 1 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 1.2765 0.846 h = 0.0001 0.004 y[1] (numeric) = 1.37879179913 0.846019917927 y[1] (closed_form) = 1.37879184291 0.846019890831 absolute error = 5.148e-08 relative error = 3.182e-06 % Correct digits = 7 NO POLE (given) for Equation 1 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 1.2766 0.85 h = 0.003 0.006 y[1] (numeric) = 1.37889226878 0.850019720658 y[1] (closed_form) = 1.37889231322 0.850019691616 absolute error = 5.309e-08 relative error = 3.277e-06 % Correct digits = 7 NO POLE (given) for Equation 1 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 1.2796 0.856 h = 0.0001 0.005 y[1] (numeric) = 1.38189282499 0.856019070246 y[1] (closed_form) = 1.38189286076 0.856019043581 absolute error = 4.462e-08 relative error = 2.745e-06 % Correct digits = 8 NO POLE (given) for Equation 1 NO 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=1190.3MB, alloc=52.3MB, time=14.54 x[1] = 1.2797 0.861 h = 0.0001 0.003 y[1] (numeric) = 1.38199338116 0.861018793576 y[1] (closed_form) = 1.38199342261 0.861018766148 absolute error = 4.970e-08 relative error = 3.053e-06 % Correct digits = 8 NO POLE (given) for Equation 1 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 1.2798 0.864 h = 0.001 0.001 y[1] (numeric) = 1.38209371066 0.864018612717 y[1] (closed_form) = 1.3820937532 0.864018587264 absolute error = 4.957e-08 relative error = 3.041e-06 % Correct digits = 8 NO POLE (given) for Equation 1 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 1.2808 0.865 h = 0.0001 0.004 y[1] (numeric) = 1.38309376376 0.865018443882 y[1] (closed_form) = 1.38309380717 0.865018419203 absolute error = 4.993e-08 relative error = 3.061e-06 % Correct digits = 8 NO POLE (given) for Equation 1 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 1.2809 0.869 h = 0.003 0.006 y[1] (numeric) = 1.38319419806 0.869018203421 y[1] (closed_form) = 1.38319424045 0.869018174188 absolute error = 5.149e-08 relative error = 3.152e-06 % Correct digits = 8 NO POLE (given) for Equation 1 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 1.2839 0.875 h = 0.0001 0.005 y[1] (numeric) = 1.38619466448 0.875017512037 y[1] (closed_form) = 1.38619469873 0.875017486067 absolute error = 4.298e-08 relative error = 2.622e-06 % Correct digits = 8 NO POLE (given) for Equation 1 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 1.284 0.88 h = 0.0001 0.003 y[1] (numeric) = 1.3862951723 0.880017182514 y[1] (closed_form) = 1.38629521196 0.880017155174 absolute error = 4.817e-08 relative error = 2.934e-06 % Correct digits = 8 NO POLE (given) for Equation 1 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 1.2841 0.883 h = 0.001 0.001 y[1] (numeric) = 1.38639547127 0.88301697088 y[1] (closed_form) = 1.38639551221 0.883016945332 absolute error = 4.825e-08 relative error = 2.936e-06 % Correct digits = 8 NO POLE (given) for Equation 1 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 1.2851 0.884 h = 0.001 0.003 y[1] (numeric) = 1.38739550397 0.884016801527 y[1] (closed_form) = 1.38739554584 0.884016776633 absolute error = 4.871e-08 relative error = 2.961e-06 % Correct digits = 8 NO POLE (given) for Equation 1 NO 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=1235.0MB, alloc=52.3MB, time=15.09 x[1] = 1.2861 0.887 h = 0.0001 0.004 y[1] (numeric) = 1.38839573669 0.887016498169 y[1] (closed_form) = 1.38839577673 0.887016471889 absolute error = 4.789e-08 relative error = 2.907e-06 % Correct digits = 8 NO POLE (given) for Equation 1 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 1.2862 0.891 h = 0.003 0.006 y[1] (numeric) = 1.38849612136 0.891016209585 y[1] (closed_form) = 1.38849616156 0.89101618137 absolute error = 4.911e-08 relative error = 2.977e-06 % Correct digits = 8 NO POLE (given) for Equation 1 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 1.2892 0.897 h = 0.0001 0.005 y[1] (numeric) = 1.3914964811 0.897015486207 y[1] (closed_form) = 1.39149651391 0.897015462161 absolute error = 4.068e-08 relative error = 2.457e-06 % Correct digits = 8 NO POLE (given) for Equation 1 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 1.2893 0.902 h = 0.0001 0.003 y[1] (numeric) = 1.39159692672 0.902015105034 y[1] (closed_form) = 1.39159696456 0.902015078983 absolute error = 4.594e-08 relative error = 2.770e-06 % Correct digits = 8 NO POLE (given) for Equation 1 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 1.2894 0.905 h = 0.001 0.001 y[1] (numeric) = 1.39169718684 0.905014863692 y[1] (closed_form) = 1.39169722612 0.9050148392 absolute error = 4.629e-08 relative error = 2.789e-06 % Correct digits = 8 NO POLE (given) for Equation 1 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 1.2904 0.906 h = 0.001 0.003 y[1] (numeric) = 1.39269719665 0.906014696899 y[1] (closed_form) = 1.39269723691 0.906014672917 absolute error = 4.686e-08 relative error = 2.820e-06 % Correct digits = 8 NO POLE (given) for Equation 1 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 1.2914 0.909 h = 0.0001 0.004 y[1] (numeric) = 1.39369738145 0.909014375924 y[1] (closed_form) = 1.39369741978 0.909014350843 absolute error = 4.580e-08 relative error = 2.753e-06 % Correct digits = 8 NO POLE (given) for Equation 1 NO 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=1279.7MB, alloc=52.3MB, time=15.64 x[1] = 1.2915 0.913 h = 0.003 0.006 y[1] (numeric) = 1.39379771404 0.913014049765 y[1] (closed_form) = 1.39379775227 0.913014022805 absolute error = 4.679e-08 relative error = 2.808e-06 % Correct digits = 8 NO POLE (given) for Equation 1 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 1.2945 0.919 h = 0.0001 0.005 y[1] (numeric) = 1.39679796726 0.919013309263 y[1] (closed_form) = 1.39679799893 0.91901328725 absolute error = 3.857e-08 relative error = 2.307e-06 % Correct digits = 8 NO POLE (given) for Equation 1 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 1.2946 0.924 h = 0.0001 0.003 y[1] (numeric) = 1.39689834659 0.924012886421 y[1] (closed_form) = 1.39689838283 0.924012861841 absolute error = 4.379e-08 relative error = 2.615e-06 % Correct digits = 8 NO POLE (given) for Equation 1 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 1.2947 0.927 h = 0.001 0.001 y[1] (numeric) = 1.3969985656 0.927012621505 y[1] (closed_form) = 1.39699860343 0.927012598237 absolute error = 4.441e-08 relative error = 2.649e-06 % Correct digits = 8 NO POLE (given) for Equation 1 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 1.2957 0.928 h = 0.001 0.003 y[1] (numeric) = 1.39799855376 0.928012460088 y[1] (closed_form) = 1.39799859259 0.928012437186 absolute error = 4.508e-08 relative error = 2.687e-06 % Correct digits = 8 NO POLE (given) for Equation 1 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 1.2967 0.931 h = 0.0001 0.004 y[1] (numeric) = 1.39899869029 0.931012128305 y[1] (closed_form) = 1.39899872713 0.931012104594 absolute error = 4.381e-08 relative error = 2.607e-06 % Correct digits = 8 NO POLE (given) for Equation 1 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 1.2968 0.935 h = 0.003 0.006 y[1] (numeric) = 1.39909896809 0.935011772702 y[1] (closed_form) = 1.3990990046 0.935011747198 absolute error = 4.454e-08 relative error = 2.647e-06 % Correct digits = 8 NO POLE (given) for Equation 1 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 1.2998 0.941 h = 0.0001 0.005 y[1] (numeric) = 1.40209911684 0.941011029336 y[1] (closed_form) = 1.40209914768 0.94101100942 absolute error = 3.671e-08 relative error = 2.174e-06 % Correct digits = 8 NO POLE (given) for Equation 1 NO 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=1324.3MB, alloc=52.3MB, time=16.18 x[1] = 1.2999 0.946 h = 0.0001 0.003 y[1] (numeric) = 1.40219942719 0.946010574933 y[1] (closed_form) = 1.40219946209 0.946010551969 absolute error = 4.177e-08 relative error = 2.470e-06 % Correct digits = 8 NO POLE (given) for Equation 1 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 1.3 0.949 h = 0.001 0.001 y[1] (numeric) = 1.40229960373 0.94901029262 y[1] (closed_form) = 1.40229964032 0.949010270713 absolute error = 4.265e-08 relative error = 2.519e-06 % Correct digits = 8 NO POLE (given) for Equation 1 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 1.301 0.95 h = 0.001 0.003 y[1] (numeric) = 1.40329957178 0.950010139126 y[1] (closed_form) = 1.40329960937 0.950010117443 absolute error = 4.340e-08 relative error = 2.561e-06 % Correct digits = 8 NO POLE (given) for Equation 1 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 1.302 0.953 h = 0.0001 0.004 y[1] (numeric) = 1.40429966059 0.953009803117 y[1] (closed_form) = 1.40429969617 0.953009780911 absolute error = 4.194e-08 relative error = 2.471e-06 % Correct digits = 8 NO POLE (given) for Equation 1 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 1.3021 0.957 h = 0.003 0.006 y[1] (numeric) = 1.40439988201 0.957009426226 y[1] (closed_form) = 1.40439991705 0.95700940234 absolute error = 4.241e-08 relative error = 2.495e-06 % Correct digits = 8 NO POLE (given) for Equation 1 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 1.3051 0.963 h = 0.0001 0.005 y[1] (numeric) = 1.40739993008 0.963008693428 y[1] (closed_form) = 1.40739996038 0.963008675631 absolute error = 3.514e-08 relative error = 2.061e-06 % Correct digits = 8 NO POLE (given) for Equation 1 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 1.3052 0.968 h = 0.0001 0.003 y[1] (numeric) = 1.40750017017 0.968008217511 y[1] (closed_form) = 1.40750020398 0.96800819627 absolute error = 3.993e-08 relative error = 2.338e-06 % Correct digits = 8 NO POLE (given) for Equation 1 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 1.3053 0.971 h = 0.001 0.001 y[1] (numeric) = 1.4076003037 0.971007923906 y[1] (closed_form) = 1.40760033928 0.971007903464 absolute error = 4.103e-08 relative error = 2.399e-06 % Correct digits = 8 NO POLE (given) for Equation 1 NO 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=1369.0MB, alloc=52.3MB, time=16.73 x[1] = 1.3063 0.972 h = 0.0001 0.004 y[1] (numeric) = 1.40860025345 0.972007780584 y[1] (closed_form) = 1.40860029002 0.972007760229 absolute error = 4.185e-08 relative error = 2.445e-06 % Correct digits = 8 NO POLE (given) for Equation 1 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 1.3064 0.976 h = 0.003 0.006 y[1] (numeric) = 1.40870042838 0.97600739217 y[1] (closed_form) = 1.40870046191 0.976007369211 absolute error = 4.063e-08 relative error = 2.371e-06 % Correct digits = 8 NO POLE (given) for Equation 1 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 1.3094 0.982 h = 0.0001 0.005 y[1] (numeric) = 1.4117003937 0.982006677343 y[1] (closed_form) = 1.41170042331 0.982006660804 absolute error = 3.392e-08 relative error = 1.972e-06 % Correct digits = 8 NO POLE (given) for Equation 1 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 1.3095 0.987 h = 0.0001 0.003 y[1] (numeric) = 1.4118005734 0.987006189945 y[1] (closed_form) = 1.41180060603 0.987006169682 absolute error = 3.841e-08 relative error = 2.230e-06 % Correct digits = 8 NO POLE (given) for Equation 1 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 1.3096 0.99 h = 0.001 0.001 y[1] (numeric) = 1.41190067014 0.990005890873 y[1] (closed_form) = 1.41190070456 0.990005871189 absolute error = 3.966e-08 relative error = 2.300e-06 % Correct digits = 8 NO POLE (given) for Equation 1 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 1.3106 0.991 h = 0.001 0.003 y[1] (numeric) = 1.41290060559 0.991005757679 y[1] (closed_form) = 1.41290064099 0.991005737968 absolute error = 4.051e-08 relative error = 2.348e-06 % Correct digits = 8 NO POLE (given) for Equation 1 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 1.3116 0.994 h = 0.0001 0.004 y[1] (numeric) = 1.41390060967 0.99400542961 y[1] (closed_form) = 1.4139006431 0.994005409885 absolute error = 3.882e-08 relative error = 2.246e-06 % Correct digits = 8 NO POLE (given) for Equation 1 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 1.3117 0.998 h = 0.003 0.006 y[1] (numeric) = 1.41400072576 0.998005033625 y[1] (closed_form) = 1.41400075831 0.998005012486 absolute error = 3.881e-08 relative error = 2.242e-06 % Correct digits = 8 NO POLE (given) for Equation 1 NO 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=1413.5MB, alloc=52.3MB, time=17.27 x[1] = 1.3147 1.004 h = 0.0001 0.005 y[1] (numeric) = 1.41700060132 1.00400435162 y[1] (closed_form) = 1.41700063093 1.00400433714 absolute error = 3.296e-08 relative error = 1.898e-06 % Correct digits = 8 NO POLE (given) for Equation 1 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 1.3148 1.009 h = 0.0001 0.003 y[1] (numeric) = 1.41710071174 1.00900386067 y[1] (closed_form) = 1.41710074378 1.00900384224 absolute error = 3.696e-08 relative error = 2.125e-06 % Correct digits = 8 NO POLE (given) for Equation 1 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 1.3149 1.012 h = 0.001 0.001 y[1] (numeric) = 1.41720076651 1.01200356115 y[1] (closed_form) = 1.41720080034 1.01200354304 absolute error = 3.837e-08 relative error = 2.204e-06 % Correct digits = 8 NO POLE (given) for Equation 1 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 1.3159 1.013 h = 0.001 0.003 y[1] (numeric) = 1.41820068755 1.01300344147 y[1] (closed_form) = 1.41820072231 1.01300342322 absolute error = 3.926e-08 relative error = 2.253e-06 % Correct digits = 8 NO POLE (given) for Equation 1 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 1.3169 1.016 h = 0.0001 0.004 y[1] (numeric) = 1.41920064964 1.01600312592 y[1] (closed_form) = 1.41920068251 1.0160031079 absolute error = 3.749e-08 relative error = 2.148e-06 % Correct digits = 8 NO POLE (given) for Equation 1 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 1.317 1.02 h = 0.003 0.006 y[1] (numeric) = 1.41930071064 1.02000273086 y[1] (closed_form) = 1.41930074248 1.0200027116 absolute error = 3.722e-08 relative error = 2.129e-06 % Correct digits = 8 NO POLE (given) for Equation 1 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 1.32 1.026 h = 0.0001 0.005 y[1] (numeric) = 1.42230050419 1.02600209181 y[1] (closed_form) = 1.42230053406 1.02600207932 absolute error = 3.238e-08 relative error = 1.846e-06 % Correct digits = 8 NO POLE (given) for Equation 1 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 1.3201 1.031 h = 0.0001 0.003 y[1] (numeric) = 1.42240054763 1.0310016063 y[1] (closed_form) = 1.42240057933 1.03100158969 absolute error = 3.578e-08 relative error = 2.037e-06 % Correct digits = 8 NO POLE (given) for Equation 1 NO 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=1458.1MB, alloc=52.3MB, time=17.81 x[1] = 1.3202 1.034 h = 0.001 0.001 y[1] (numeric) = 1.42250056204 1.03400131169 y[1] (closed_form) = 1.4225005955 1.03400129517 absolute error = 3.732e-08 relative error = 2.122e-06 % Correct digits = 8 NO POLE (given) for Equation 1 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 1.3212 1.035 h = 0.001 0.003 y[1] (numeric) = 1.42350047096 1.03500120683 y[1] (closed_form) = 1.42350050529 1.03500119005 absolute error = 3.822e-08 relative error = 2.171e-06 % Correct digits = 8 NO POLE (given) for Equation 1 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 1.3222 1.038 h = 0.0001 0.004 y[1] (numeric) = 1.42450039432 1.03800090865 y[1] (closed_form) = 1.42450042687 1.03800089233 absolute error = 3.641e-08 relative error = 2.066e-06 % Correct digits = 8 NO POLE (given) for Equation 1 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 1.3223 1.042 h = 0.003 0.006 y[1] (numeric) = 1.42460040253 1.04200052151 y[1] (closed_form) = 1.42460043393 1.04200050413 absolute error = 3.589e-08 relative error = 2.034e-06 % Correct digits = 8 NO POLE (given) for Equation 1 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 1.3253 1.048 h = 0.0001 0.005 y[1] (numeric) = 1.42760012281 1.04799993417 y[1] (closed_form) = 1.42760015318 -1.04639517885 absolute error = 2.094 relative error = 118.3 % Correct digits = 0 NO POLE (given) for Equation 1 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 1.3254 1.053 h = 0.0001 0.003 y[1] (numeric) = 1.42770010263 1.0529994624 y[1] (closed_form) = 1.42770013423 -1.0413956548 absolute error = 2.094 relative error = 118.5 % Correct digits = 0 NO POLE (given) for Equation 1 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 1.3255 1.056 h = 0.001 0.001 y[1] (numeric) = 1.4278000789 1.05599917765 y[1] (closed_form) = 1.42780011221 -1.03839593969 absolute error = 2.094 relative error = 118.6 % Correct digits = 0 NO POLE (given) for Equation 1 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 1.3265 1.057 h = 0.001 0.003 y[1] (numeric) = 1.42879997807 1.05699908858 memory used=1502.8MB, alloc=52.3MB, time=18.36 y[1] (closed_form) = 1.42880001219 -1.03739602913 absolute error = 2.094 relative error = 118.6 % Correct digits = 0 NO POLE (given) for Equation 1 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 1.3275 1.06 h = 0.0001 0.004 y[1] (numeric) = 1.42979986646 1.05999881201 y[1] (closed_form) = 1.42979989892 -1.03439630502 absolute error = 2.094 relative error = 118.7 % Correct digits = 0 NO POLE (given) for Equation 1 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 1.3276 1.064 h = 0.003 0.006 y[1] (numeric) = 1.42989982499 1.0639984392 y[1] (closed_form) = 1.42989985621 -1.0303966787 absolute error = 2.094 relative error = 118.8 % Correct digits = 0 NO POLE (given) for Equation 1 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 1.3306 1.07 h = 0.0001 0.005 y[1] (numeric) = 1.4328994815 1.06999791085 y[1] (closed_form) = 1.4328995126 -1.02439720043 absolute error = 2.094 relative error = 118.9 % Correct digits = 0 NO POLE (given) for Equation 1 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 1.3307 1.075 h = 0.0001 0.003 y[1] (numeric) = 1.43299940197 1.0749974604 y[1] (closed_form) = 1.43299943371 -1.01939765506 absolute error = 2.094 relative error = 119.1 % Correct digits = 0 NO POLE (given) for Equation 1 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 1.3308 1.078 h = 0.001 0.001 y[1] (numeric) = 1.43309934288 1.07799718999 y[1] (closed_form) = 1.43309937625 -1.01639792582 absolute error = 2.094 relative error = 119.2 % Correct digits = 0 NO POLE (given) for Equation 1 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 1.3318 1.079 h = 0.0001 0.004 y[1] (numeric) = 1.4340992347 1.07899711731 y[1] (closed_form) = 1.43409926879 -1.01539799896 absolute error = 2.094 relative error = 119.2 % Correct digits = 0 NO POLE (given) for Equation 1 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 1.3319 1.083 h = 0.003 0.006 y[1] (numeric) = 1.43419915536 1.08299676047 y[1] (closed_form) = 1.43419918602 -1.01139835602 absolute error = 2.094 relative error = 119.3 % Correct digits = 0 NO POLE (given) for Equation 1 NO 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=1547.4MB, alloc=52.3MB, time=18.89 x[1] = 1.3349 1.089 h = 0.0001 0.005 y[1] (numeric) = 1.43719876422 1.08899628699 y[1] (closed_form) = 1.43719879549 -1.00539882308 absolute error = 2.094 relative error = 119.4 % Correct digits = 0 NO POLE (given) for Equation 1 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 1.335 1.094 h = 0.0001 0.003 y[1] (numeric) = 1.43729863729 1.09399585967 y[1] (closed_form) = 1.43729866872 -1.00039925451 absolute error = 2.094 relative error = 119.6 % Correct digits = 0 NO POLE (given) for Equation 1 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 1.3351 1.097 h = 0.001 0.001 y[1] (numeric) = 1.43739855011 1.09699560441 y[1] (closed_form) = 1.43739858307 -0.997399510289 absolute error = 2.094 relative error = 119.7 % Correct digits = 0 NO POLE (given) for Equation 1 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 1.3361 1.098 h = 0.001 0.003 y[1] (numeric) = 1.43839843731 1.09799554603 y[1] (closed_form) = 1.43839847092 -0.996399569187 absolute error = 2.094 relative error = 119.7 % Correct digits = 0 NO POLE (given) for Equation 1 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 1.3371 1.101 h = 0.0001 0.004 y[1] (numeric) = 1.43939827154 1.10099531846 y[1] (closed_form) = 1.43939830379 -0.993399795761 absolute error = 2.094 relative error = 119.8 % Correct digits = 0 NO POLE (given) for Equation 1 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 1.3372 1.105 h = 0.003 0.006 y[1] (numeric) = 1.43949814786 1.10499498665 y[1] (closed_form) = 1.43949817878 -0.98940012809 absolute error = 2.094 relative error = 119.9 % Correct digits = 0 NO POLE (given) for Equation 1 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 1.3402 1.111 h = 0.0001 0.005 y[1] (numeric) = 1.44249771189 1.11099458185 y[1] (closed_form) = 1.44249774422 -0.983400526801 absolute error = 2.094 relative error = 120 % Correct digits = 0 NO POLE (given) for Equation 1 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 1.3403 1.116 h = 0.0001 0.003 y[1] (numeric) = 1.44259753552 1.11599418768 y[1] (closed_form) = 1.44259756748 -0.978400924931 absolute error = 2.094 relative error = 120.2 % Correct digits = 0 NO POLE (given) for Equation 1 NO 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=1592.1MB, alloc=52.3MB, time=19.44 x[1] = 1.3404 1.119 h = 0.001 0.001 y[1] (numeric) = 1.44269741926 1.11899395368 y[1] (closed_form) = 1.44269745262 -0.975401159633 absolute error = 2.094 relative error = 120.3 % Correct digits = 0 NO POLE (given) for Equation 1 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 1.3414 1.12 h = 0.001 0.003 y[1] (numeric) = 1.4436973035 1.119993912 y[1] (closed_form) = 1.44369733742 -0.974401201894 absolute error = 2.094 relative error = 120.2 % Correct digits = 0 NO POLE (given) for Equation 1 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 1.3424 1.123 h = 0.0001 0.004 y[1] (numeric) = 1.4446971153 1.1229937146 y[1] (closed_form) = 1.44469714805 -0.97140139816 absolute error = 2.094 relative error = 120.3 % Correct digits = 0 NO POLE (given) for Equation 1 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 1.3425 1.127 h = 0.003 0.006 y[1] (numeric) = 1.44479695423 1.12699341174 y[1] (closed_form) = 1.44479698563 -0.96740170135 absolute error = 2.094 relative error = 120.5 % Correct digits = 0 NO POLE (given) for Equation 1 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 1.3455 1.133 h = 0.0001 0.005 y[1] (numeric) = 1.44779648397 1.1329930786 y[1] (closed_form) = 1.4477965175 -0.961402028819 absolute error = 2.094 relative error = 120.5 % Correct digits = 0 NO POLE (given) for Equation 1 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 1.3456 1.138 h = 0.0001 0.003 y[1] (numeric) = 1.44789626435 1.13799272258 y[1] (closed_form) = 1.44789629702 -0.956402388601 absolute error = 2.094 relative error = 120.7 % Correct digits = 0 NO POLE (given) for Equation 1 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 1.3457 1.141 h = 0.001 0.001 y[1] (numeric) = 1.44799612288 1.1409925127 y[1] (closed_form) = 1.4479961568 -0.953402599337 absolute error = 2.094 relative error = 120.8 % Correct digits = 0 NO POLE (given) for Equation 1 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 1.3467 1.142 h = 0.001 0.003 y[1] (numeric) = 1.4489960064 1.14199248743 y[1] (closed_form) = 1.44899604079 -0.952402625232 absolute error = 2.094 relative error = 120.8 % Correct digits = 0 NO POLE (given) for Equation 1 NO 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=1636.6MB, alloc=52.3MB, time=19.98 x[1] = 1.3477 1.145 h = 0.0001 0.004 y[1] (numeric) = 1.44999580051 1.14499232186 y[1] (closed_form) = 1.44999583391 -0.949402789557 absolute error = 2.094 relative error = 120.8 % Correct digits = 0 NO POLE (given) for Equation 1 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 1.3478 1.149 h = 0.003 0.006 y[1] (numeric) = 1.45009560722 1.14899205157 y[1] (closed_form) = 1.45009563929 -0.945403059997 absolute error = 2.094 relative error = 121 % Correct digits = 0 NO POLE (given) for Equation 1 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 1.3508 1.155 h = 0.0001 0.005 y[1] (numeric) = 1.45309511317 1.15499179162 y[1] (closed_form) = 1.45309514801 -0.939403314774 absolute error = 2.094 relative error = 121 % Correct digits = 0 NO POLE (given) for Equation 1 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 1.3509 1.16 h = 0.0001 0.003 y[1] (numeric) = 1.45319485689 1.15999147774 y[1] (closed_form) = 1.45319489042 -0.934403632155 absolute error = 2.094 relative error = 121.2 % Correct digits = 0 NO POLE (given) for Equation 1 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 1.351 1.163 h = 0.001 0.001 y[1] (numeric) = 1.45329469427 1.16299129423 y[1] (closed_form) = 1.4532947289 -0.931403816643 absolute error = 2.094 relative error = 121.3 % Correct digits = 0 NO POLE (given) for Equation 1 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 1.352 1.164 h = 0.001 0.003 y[1] (numeric) = 1.4542945792 1.16399128482 y[1] (closed_form) = 1.4542946142 -0.930403826718 absolute error = 2.094 relative error = 121.3 % Correct digits = 0 NO POLE (given) for Equation 1 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 1.353 1.167 h = 0.0001 0.004 y[1] (numeric) = 1.45529436038 1.16699115208 y[1] (closed_form) = 1.45529439458 -0.92740395814 absolute error = 2.094 relative error = 121.4 % Correct digits = 0 NO POLE (given) for Equation 1 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 1.3531 1.171 h = 0.003 0.006 y[1] (numeric) = 1.45539414031 1.17099091716 y[1] (closed_form) = 1.45539417322 -0.923404193025 absolute error = 2.094 relative error = 121.5 % Correct digits = 0 NO POLE (given) for Equation 1 NO 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=1681.2MB, alloc=52.3MB, time=20.52 x[1] = 1.3561 1.177 h = 0.0001 0.005 y[1] (numeric) = 1.45839363274 1.17699073053 y[1] (closed_form) = 1.45839366896 -0.917404375046 absolute error = 2.094 relative error = 121.6 % Correct digits = 0 NO POLE (given) for Equation 1 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 1.3562 1.182 h = 0.0001 0.003 y[1] (numeric) = 1.45849334662 1.18199046179 y[1] (closed_form) = 1.45849338114 -0.912404646978 absolute error = 2.094 relative error = 121.7 % Correct digits = 0 NO POLE (given) for Equation 1 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 1.3563 1.185 h = 0.001 0.001 y[1] (numeric) = 1.45859316707 1.18499030631 y[1] (closed_form) = 1.45859320252 -0.909404803545 absolute error = 2.094 relative error = 121.8 % Correct digits = 0 NO POLE (given) for Equation 1 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 1.3573 1.186 h = 0.0001 0.004 y[1] (numeric) = 1.45959305536 1.18599031194 y[1] (closed_form) = 1.45959309108 -0.908404798595 absolute error = 2.094 relative error = 121.8 % Correct digits = 0 NO POLE (given) for Equation 1 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 1.3574 1.19 h = 0.003 0.006 y[1] (numeric) = 1.45969281747 1.18999010745 y[1] (closed_form) = 1.45969285072 -0.904405001473 absolute error = 2.094 relative error = 122 % Correct digits = 0 NO POLE (given) for Equation 1 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 1.3604 1.196 h = 0.0001 0.005 y[1] (numeric) = 1.46269230535 1.19598998302 y[1] (closed_form) = 1.46269234232 -0.898405121809 absolute error = 2.094 relative error = 122 % Correct digits = 0 NO POLE (given) for Equation 1 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 1.3605 1.201 h = 0.0001 0.003 y[1] (numeric) = 1.46279199853 1.20098975454 y[1] (closed_form) = 1.4627920335 -0.893405353189 absolute error = 2.094 relative error = 122.2 % Correct digits = 0 NO POLE (given) for Equation 1 NO 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=1725.7MB, alloc=52.3MB, time=21.07 x[1] = 1.3606 1.204 h = 0.001 0.001 y[1] (numeric) = 1.46289180745 1.2039896239 y[1] (closed_form) = 1.4628918432 -0.890405484977 absolute error = 2.094 relative error = 122.3 % Correct digits = 0 NO POLE (given) for Equation 1 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 1.3616 1.205 h = 0.001 0.003 y[1] (numeric) = 1.46389169993 1.20498964174 y[1] (closed_form) = 1.46389173586 -0.889405467832 absolute error = 2.094 relative error = 122.3 % Correct digits = 0 NO POLE (given) for Equation 1 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 1.3626 1.208 h = 0.0001 0.004 y[1] (numeric) = 1.46489146905 1.20798957051 y[1] (closed_form) = 1.46489150456 -0.886405537678 absolute error = 2.094 relative error = 122.3 % Correct digits = 0 NO POLE (given) for Equation 1 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 1.3627 1.212 h = 0.003 0.006 y[1] (numeric) = 1.46499121355 1.21198940601 y[1] (closed_form) = 1.46499124788 -0.882405701851 absolute error = 2.094 relative error = 122.5 % Correct digits = 0 NO POLE (given) for Equation 1 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 1.3657 1.218 h = 0.0001 0.005 y[1] (numeric) = 1.46799070591 1.21798935181 y[1] (closed_form) = 1.46799074433 -0.876405752588 absolute error = 2.094 relative error = 122.5 % Correct digits = 0 NO POLE (given) for Equation 1 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 1.3658 1.223 h = 0.0001 0.003 y[1] (numeric) = 1.46809038215 1.22298917153 y[1] (closed_form) = 1.46809041828 -0.871405935404 absolute error = 2.094 relative error = 122.7 % Correct digits = 0 NO POLE (given) for Equation 1 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 1.3659 1.226 h = 0.001 0.001 y[1] (numeric) = 1.468190182 1.22598907044 y[1] (closed_form) = 1.46819021873 -0.868406037694 absolute error = 2.094 relative error = 122.8 % Correct digits = 0 NO POLE (given) for Equation 1 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 1.3669 1.227 h = 0.001 0.003 y[1] (numeric) = 1.46919008102 1.22698910128 y[1] (closed_form) = 1.46919011784 -0.867406007545 absolute error = 2.094 relative error = 122.8 % Correct digits = 0 NO POLE (given) for Equation 1 NO 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=1770.4MB, alloc=52.3MB, time=21.61 x[1] = 1.3679 1.23 h = 0.0001 0.004 y[1] (numeric) = 1.47018985024 1.22998906231 y[1] (closed_form) = 1.47018988683 -0.864406045127 absolute error = 2.094 relative error = 122.8 % Correct digits = 0 NO POLE (given) for Equation 1 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 1.368 1.234 h = 0.003 0.006 y[1] (numeric) = 1.47028958391 1.23398893692 y[1] (closed_form) = 1.47028961941 -0.860406170052 absolute error = 2.094 relative error = 122.9 % Correct digits = 0 NO POLE (given) for Equation 1 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 1.371 1.24 h = 0.0001 0.005 y[1] (numeric) = 1.47328908952 1.23998894959 y[1] (closed_form) = 1.4732891294 -0.854406154573 absolute error = 2.094 relative error = 123 % Correct digits = 0 NO POLE (given) for Equation 1 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 1.3711 1.245 h = 0.0001 0.003 y[1] (numeric) = 1.47338875564 1.24498881775 y[1] (closed_form) = 1.47338879299 -0.849406288556 absolute error = 2.094 relative error = 123.1 % Correct digits = 0 NO POLE (given) for Equation 1 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 1.3712 1.248 h = 0.001 0.001 y[1] (numeric) = 1.47348855055 1.2479887462 y[1] (closed_form) = 1.47348858833 -0.846406361343 absolute error = 2.094 relative error = 123.3 % Correct digits = 0 NO POLE (given) for Equation 1 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 1.3722 1.249 h = 0.001 0.003 y[1] (numeric) = 1.47448845751 1.24898878868 y[1] (closed_form) = 1.47448849529 -0.845406319528 absolute error = 2.094 relative error = 123.2 % Correct digits = 0 NO POLE (given) for Equation 1 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 1.3732 1.252 h = 0.0001 0.004 y[1] (numeric) = 1.47548823093 1.25198878069 y[1] (closed_form) = 1.47548826866 -0.842406326164 absolute error = 2.094 relative error = 123.3 % Correct digits = 0 NO POLE (given) for Equation 1 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 1.3733 1.256 h = 0.003 0.006 y[1] (numeric) = 1.47558795919 1.25598869424 y[1] (closed_form) = 1.47558799594 -0.838406412031 absolute error = 2.094 relative error = 123.4 % Correct digits = 0 NO POLE (given) for Equation 1 NO 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=1815.0MB, alloc=52.3MB, time=22.15 x[1] = 1.3763 1.262 h = 0.0001 0.005 y[1] (numeric) = 1.47858748606 1.26198876944 y[1] (closed_form) = 1.47858752736 -0.832406334691 absolute error = 2.094 relative error = 123.4 % Correct digits = 0 NO POLE (given) for Equation 1 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 1.3764 1.267 h = 0.0001 0.003 y[1] (numeric) = 1.47868714863 1.26698868541 y[1] (closed_form) = 1.47868718723 -0.827406420461 absolute error = 2.094 relative error = 123.6 % Correct digits = 0 NO POLE (given) for Equation 1 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 1.3765 1.27 h = 0.001 0.001 y[1] (numeric) = 1.47878694256 1.26998864284 y[1] (closed_form) = 1.47878698142 -0.824406464263 absolute error = 2.094 relative error = 123.7 % Correct digits = 0 NO POLE (given) for Equation 1 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 1.3775 1.271 h = 0.001 0.003 y[1] (numeric) = 1.47978685864 1.2709886955 y[1] (closed_form) = 1.47978689741 -0.823406412246 absolute error = 2.094 relative error = 123.7 % Correct digits = 0 NO POLE (given) for Equation 1 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 1.3785 1.274 h = 0.0001 0.004 y[1] (numeric) = 1.48078664004 1.27398871672 y[1] (closed_form) = 1.48078667894 -0.820406389724 absolute error = 2.094 relative error = 123.7 % Correct digits = 0 NO POLE (given) for Equation 1 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 1.3786 1.278 h = 0.003 0.006 y[1] (numeric) = 1.48088636807 1.27798866834 y[1] (closed_form) = 1.4808864061 -0.816406437409 absolute error = 2.094 relative error = 123.9 % Correct digits = 0 NO POLE (given) for Equation 1 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 1.3816 1.284 h = 0.0001 0.005 y[1] (numeric) = 1.48388592332 1.28398880088 y[1] (closed_form) = 1.483885966 -0.810406303398 absolute error = 2.094 relative error = 123.9 % Correct digits = 0 NO POLE (given) for Equation 1 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 1.3817 1.289 h = 0.0001 0.003 y[1] (numeric) = 1.48398558858 1.28898876321 y[1] (closed_form) = 1.48398562844 -0.805406342396 absolute error = 2.094 relative error = 124 % Correct digits = 0 NO POLE (given) for Equation 1 NO 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=1859.6MB, alloc=52.3MB, time=22.69 x[1] = 1.3818 1.292 h = 0.001 0.001 y[1] (numeric) = 1.48408538527 1.29198874861 y[1] (closed_form) = 1.48408542522 -0.802406358217 absolute error = 2.094 relative error = 124.1 % Correct digits = 0 NO POLE (given) for Equation 1 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 1.3828 1.293 h = 0.0001 0.004 y[1] (numeric) = 1.4850853114 1.29298880988 y[1] (closed_form) = 1.48508535118 -0.801406297555 absolute error = 2.094 relative error = 124.1 % Correct digits = 0 NO POLE (given) for Equation 1 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 1.3829 1.297 h = 0.003 0.006 y[1] (numeric) = 1.48518504282 1.29698879158 y[1] (closed_form) = 1.48518508173 -0.797406313477 absolute error = 2.094 relative error = 124.2 % Correct digits = 0 NO POLE (given) for Equation 1 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 1.3859 1.303 h = 0.0001 0.005 y[1] (numeric) = 1.4881846269 1.30298896921 y[1] (closed_form) = 1.48818467047 -0.791406134939 absolute error = 2.094 relative error = 124.3 % Correct digits = 0 NO POLE (given) for Equation 1 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 1.386 1.308 h = 0.0001 0.003 y[1] (numeric) = 1.48828429862 1.30798896984 y[1] (closed_form) = 1.48828433932 -0.786406135276 absolute error = 2.094 relative error = 124.4 % Correct digits = 0 NO POLE (given) for Equation 1 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 1.3861 1.311 h = 0.001 0.001 y[1] (numeric) = 1.48838410016 1.31098897824 y[1] (closed_form) = 1.48838414081 -0.783406128066 absolute error = 2.094 relative error = 124.5 % Correct digits = 0 NO POLE (given) for Equation 1 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 1.3871 1.312 h = 0.001 0.003 y[1] (numeric) = 1.48938403542 1.31198904576 y[1] (closed_form) = 1.48938407585 -0.782406061125 absolute error = 2.094 relative error = 124.5 % Correct digits = 0 NO POLE (given) for Equation 1 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 1.3881 1.315 h = 0.0001 0.004 y[1] (numeric) = 1.49038384015 1.31498911543 y[1] (closed_form) = 1.49038388099 -0.779405990278 absolute error = 2.094 relative error = 124.5 % Correct digits = 0 NO POLE (given) for Equation 1 NO 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=1904.3MB, alloc=52.3MB, time=23.24 x[1] = 1.3882 1.319 h = 0.003 0.006 y[1] (numeric) = 1.49048358001 1.31898913367 y[1] (closed_form) = 1.49048362021 -0.775405971212 absolute error = 2.094 relative error = 124.7 % Correct digits = 0 NO POLE (given) for Equation 1 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 1.3912 1.325 h = 0.0001 0.005 y[1] (numeric) = 1.49348320326 1.32498935727 y[1] (closed_form) = 1.49348324806 -0.769405747331 absolute error = 2.094 relative error = 124.7 % Correct digits = 0 NO POLE (given) for Equation 1 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 1.3913 1.33 h = 0.0001 0.003 y[1] (numeric) = 1.4935828881 1.32998939973 y[1] (closed_form) = 1.49358293002 -0.764405705435 absolute error = 2.094 relative error = 124.8 % Correct digits = 0 NO POLE (given) for Equation 1 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 1.3914 1.333 h = 0.001 0.001 y[1] (numeric) = 1.4936826986 1.3329894331 y[1] (closed_form) = 1.49368274031 -0.7614056732 absolute error = 2.094 relative error = 124.9 % Correct digits = 0 NO POLE (given) for Equation 1 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 1.3924 1.334 h = 0.001 0.003 y[1] (numeric) = 1.49468264504 1.33398950619 y[1] (closed_form) = 1.49468268646 -0.760405600635 absolute error = 2.094 relative error = 124.9 % Correct digits = 0 NO POLE (given) for Equation 1 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 1.3934 1.337 h = 0.0001 0.004 y[1] (numeric) = 1.4956824664 1.336989598 y[1] (closed_form) = 1.49568250838 -0.757405507758 absolute error = 2.094 relative error = 124.9 % Correct digits = 0 NO POLE (given) for Equation 1 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 1.3935 1.341 h = 0.003 0.006 y[1] (numeric) = 1.49578221893 1.34098964867 y[1] (closed_form) = 1.49578226039 -0.753405456201 absolute error = 2.094 relative error = 125.1 % Correct digits = 0 NO POLE (given) for Equation 1 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 1.3965 1.347 h = 0.0001 0.005 y[1] (numeric) = 1.49878188565 1.34698991143 memory used=1949.0MB, alloc=52.3MB, time=23.78 y[1] (closed_form) = 1.49878193156 -0.747405193764 absolute error = 2.094 relative error = 125.1 % Correct digits = 0 NO POLE (given) for Equation 1 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 1.3966 1.352 h = 0.0001 0.003 y[1] (numeric) = 1.49888158843 1.35198999239 y[1] (closed_form) = 1.49888163151 -0.742405112982 absolute error = 2.094 relative error = 125.2 % Correct digits = 0 NO POLE (given) for Equation 1 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 1.3967 1.355 h = 0.001 0.001 y[1] (numeric) = 1.49898141071 1.35499004859 y[1] (closed_form) = 1.49898145344 -0.739405057841 absolute error = 2.094 relative error = 125.3 % Correct digits = 0 NO POLE (given) for Equation 1 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 1.3977 1.356 h = 0.001 0.003 y[1] (numeric) = 1.49998136859 1.3559901256 y[1] (closed_form) = 1.49998141098 -0.738404981292 absolute error = 2.094 relative error = 125.3 % Correct digits = 0 NO POLE (given) for Equation 1 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 1.3987 1.359 h = 0.0001 0.004 y[1] (numeric) = 1.50098120876 1.35899023654 y[1] (closed_form) = 1.50098125182 -0.735404869399 absolute error = 2.094 relative error = 125.3 % Correct digits = 0 NO POLE (given) for Equation 1 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 1.3988 1.363 h = 0.003 0.006 y[1] (numeric) = 1.50108097757 1.36299031676 y[1] (closed_form) = 1.50108102025 -0.731404788271 absolute error = 2.094 relative error = 125.4 % Correct digits = 0 NO POLE (given) for Equation 1 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 1.4018 1.369 h = 0.0001 0.005 y[1] (numeric) = 1.50408069104 1.36899061157 y[1] (closed_form) = 1.50408073795 -0.725404494334 absolute error = 2.094 relative error = 125.4 % Correct digits = 0 NO POLE (given) for Equation 1 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 1.4019 1.374 h = 0.0001 0.003 y[1] (numeric) = 1.50418041594 1.37399072721 y[1] (closed_form) = 1.50418046011 -0.720404378503 absolute error = 2.094 relative error = 125.6 % Correct digits = 0 NO POLE (given) for Equation 1 NO 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=1993.6MB, alloc=52.3MB, time=24.33 x[1] = 1.402 1.377 h = 0.001 0.001 y[1] (numeric) = 1.50428025245 1.37699080384 y[1] (closed_form) = 1.50428029615 -0.71740430285 absolute error = 2.094 relative error = 125.7 % Correct digits = 0 NO POLE (given) for Equation 1 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 1.403 1.378 h = 0.001 0.003 y[1] (numeric) = 1.50528022183 1.37799088316 y[1] (closed_form) = 1.50528026514 -0.716404223928 absolute error = 2.094 relative error = 125.6 % Correct digits = 0 NO POLE (given) for Equation 1 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 1.404 1.381 h = 0.0001 0.004 y[1] (numeric) = 1.50628008248 1.38099101007 y[1] (closed_form) = 1.50628012656 -0.713404096187 absolute error = 2.094 relative error = 125.7 % Correct digits = 0 NO POLE (given) for Equation 1 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 1.4041 1.385 h = 0.003 0.006 y[1] (numeric) = 1.50637987071 1.38499111657 y[1] (closed_form) = 1.50637991454 -0.709403988757 absolute error = 2.094 relative error = 125.8 % Correct digits = 0 NO POLE (given) for Equation 1 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 1.4071 1.391 h = 0.0001 0.005 y[1] (numeric) = 1.50937963315 1.39099143621 y[1] (closed_form) = 1.50937968092 -0.703403670501 absolute error = 2.094 relative error = 125.8 % Correct digits = 0 NO POLE (given) for Equation 1 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 1.4072 1.396 h = 0.0001 0.003 y[1] (numeric) = 1.50947938372 1.39599158233 y[1] (closed_form) = 1.50947942889 -0.698403523848 absolute error = 2.094 relative error = 125.9 % Correct digits = 0 NO POLE (given) for Equation 1 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 1.4073 1.399 h = 0.001 0.001 y[1] (numeric) = 1.50957923649 1.39899167676 y[1] (closed_form) = 1.50957928109 -0.695403430294 absolute error = 2.094 relative error = 126 % Correct digits = 0 NO POLE (given) for Equation 1 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 1.4083 1.4 h = 0.003 0.006 y[1] (numeric) = 1.5105792172 1.39999175683 y[1] (closed_form) = 1.51057926137 -0.694403350554 absolute error = 2.094 relative error = 126 % Correct digits = 0 NO POLE (given) for Equation 1 NO 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=2038.3MB, alloc=52.3MB, time=24.87 x[1] = 1.4113 1.406 h = 0.0001 0.005 y[1] (numeric) = 1.51357901208 1.40599208536 y[1] (closed_form) = 1.51357906239 -0.688403020999 absolute error = 2.094 relative error = 126 % Correct digits = 0 NO POLE (given) for Equation 1 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 1.4114 1.411 h = 0.0001 0.003 y[1] (numeric) = 1.51367878265 1.41099224912 y[1] (closed_form) = 1.51367883047 -0.683402856484 absolute error = 2.094 relative error = 126.1 % Correct digits = 0 NO POLE (given) for Equation 1 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 1.4115 1.414 h = 0.001 0.001 y[1] (numeric) = 1.51377864794 1.41399235374 y[1] (closed_form) = 1.51377869513 -0.680402752675 absolute error = 2.094 relative error = 126.2 % Correct digits = 0 NO POLE (given) for Equation 1 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 1.4125 1.415 h = 0.001 0.003 y[1] (numeric) = 1.51477863623 1.41499243319 y[1] (closed_form) = 1.51477868297 -0.679402673505 absolute error = 2.094 relative error = 126.2 % Correct digits = 0 NO POLE (given) for Equation 1 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 1.4135 1.418 h = 0.0001 0.004 y[1] (numeric) = 1.51577853423 1.41799257911 y[1] (closed_form) = 1.51577858185 -0.67640252698 absolute error = 2.094 relative error = 126.2 % Correct digits = 0 NO POLE (given) for Equation 1 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 1.4136 1.422 h = 0.003 0.006 y[1] (numeric) = 1.51587836125 1.42199272129 y[1] (closed_form) = 1.51587840884 -0.672402383894 absolute error = 2.094 relative error = 126.3 % Correct digits = 0 NO POLE (given) for Equation 1 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 1.4166 1.428 h = 0.0001 0.005 y[1] (numeric) = 1.51887820883 1.42799306522 y[1] (closed_form) = 1.51887825977 -0.66640204206 absolute error = 2.094 relative error = 126.3 % Correct digits = 0 NO POLE (given) for Equation 1 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 1.4167 1.433 h = 0.0001 0.003 y[1] (numeric) = 1.5189780094 1.43299325173 y[1] (closed_form) = 1.51897805805 -0.661401854511 absolute error = 2.094 relative error = 126.4 % Correct digits = 0 NO POLE (given) for Equation 1 NO 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=2082.9MB, alloc=52.3MB, time=25.42 x[1] = 1.4168 1.436 h = 0.001 0.001 y[1] (numeric) = 1.51907789338 1.43599336937 y[1] (closed_form) = 1.51907794132 -0.658401737569 absolute error = 2.094 relative error = 126.5 % Correct digits = 0 NO POLE (given) for Equation 1 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 1.4178 1.437 h = 0.001 0.003 y[1] (numeric) = 1.52007789226 1.43699344716 y[1] (closed_form) = 1.52007793974 -0.657401659994 absolute error = 2.094 relative error = 126.5 % Correct digits = 0 NO POLE (given) for Equation 1 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 1.4188 1.44 h = 0.0001 0.004 y[1] (numeric) = 1.52107781292 1.43999360029 y[1] (closed_form) = 1.52107786132 -0.654401506397 absolute error = 2.094 relative error = 126.5 % Correct digits = 0 NO POLE (given) for Equation 1 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 1.4189 1.444 h = 0.003 0.006 y[1] (numeric) = 1.52117766494 1.44399375888 y[1] (closed_form) = 1.52117771342 -0.650401346935 absolute error = 2.094 relative error = 126.6 % Correct digits = 0 NO POLE (given) for Equation 1 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 1.4219 1.45 h = 0.0001 0.005 y[1] (numeric) = 1.52417756243 1.44999410857 y[1] (closed_form) = 1.52417761386 -0.644400999675 absolute error = 2.094 relative error = 126.6 % Correct digits = 0 NO POLE (given) for Equation 1 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 1.422 1.455 h = 0.0001 0.003 y[1] (numeric) = 1.52427739471 1.45499431311 y[1] (closed_form) = 1.52427744406 -0.639400793856 absolute error = 2.094 relative error = 126.7 % Correct digits = 0 NO POLE (given) for Equation 1 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 1.4221 1.458 h = 0.001 0.001 y[1] (numeric) = 1.52437729829 1.45799444086 y[1] (closed_form) = 1.52437734688 -0.636400666677 absolute error = 2.094 relative error = 126.8 % Correct digits = 0 NO POLE (given) for Equation 1 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 1.4231 1.459 h = 0.001 0.003 y[1] (numeric) = 1.52537730714 1.45899451571 y[1] (closed_form) = 1.52537735525 -0.635400591982 absolute error = 2.094 relative error = 126.7 % Correct digits = 0 NO POLE (given) for Equation 1 NO 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=2127.6MB, alloc=52.3MB, time=25.96 x[1] = 1.4241 1.462 h = 0.0001 0.004 y[1] (numeric) = 1.52637725047 1.46199467287 y[1] (closed_form) = 1.52637729953 -0.632400434488 absolute error = 2.094 relative error = 126.8 % Correct digits = 0 NO POLE (given) for Equation 1 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 1.4242 1.466 h = 0.003 0.006 y[1] (numeric) = 1.52647712859 1.46599484402 y[1] (closed_form) = 1.52647717784 -0.628400262504 absolute error = 2.094 relative error = 126.9 % Correct digits = 0 NO POLE (given) for Equation 1 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 1.4272 1.472 h = 0.0001 0.005 y[1] (numeric) = 1.52947707474 1.4719951929 y[1] (closed_form) = 1.52947712651 -0.622399916345 absolute error = 2.094 relative error = 126.8 % Correct digits = 0 NO POLE (given) for Equation 1 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 1.4273 1.477 h = 0.0001 0.003 y[1] (numeric) = 1.52957693975 1.47699541069 y[1] (closed_form) = 1.5295769897 -0.617399697053 absolute error = 2.094 relative error = 127 % Correct digits = 0 NO POLE (given) for Equation 1 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 1.4274 1.48 h = 0.001 0.001 y[1] (numeric) = 1.52967686346 1.47999554566 y[1] (closed_form) = 1.52967691259 -0.614399562536 absolute error = 2.094 relative error = 127.1 % Correct digits = 0 NO POLE (given) for Equation 1 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 1.4284 1.481 h = 0.0001 0.004 y[1] (numeric) = 1.53067688149 1.48099561641 y[1] (closed_form) = 1.53067693016 -0.613399491876 absolute error = 2.094 relative error = 127 % Correct digits = 0 NO POLE (given) for Equation 1 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 1.4285 1.485 h = 0.003 0.006 y[1] (numeric) = 1.53077678139 1.48499579504 y[1] (closed_form) = 1.5307768314 -0.609399311869 absolute error = 2.094 relative error = 127.1 % Correct digits = 0 NO POLE (given) for Equation 1 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 1.4315 1.491 h = 0.0001 0.005 y[1] (numeric) = 1.53377676792 1.49099613879 y[1] (closed_form) = 1.53377682008 -0.603398971027 absolute error = 2.094 relative error = 127.1 % Correct digits = 0 NO POLE (given) for Equation 1 NO 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=2172.2MB, alloc=52.3MB, time=26.51 x[1] = 1.4316 1.496 h = 0.0001 0.003 y[1] (numeric) = 1.53387666137 1.49599636462 y[1] (closed_form) = 1.53387671193 -0.59839874354 absolute error = 2.094 relative error = 127.2 % Correct digits = 0 NO POLE (given) for Equation 1 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 1.4317 1.499 h = 0.001 0.001 y[1] (numeric) = 1.53397660247 1.49899650376 y[1] (closed_form) = 1.53397665219 -0.595398604752 absolute error = 2.094 relative error = 127.3 % Correct digits = 0 NO POLE (given) for Equation 1 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 1.4327 1.5 h = 0.001 0.003 y[1] (numeric) = 1.53497662777 1.49999657026 y[1] (closed_form) = 1.53497667702 -0.594398538286 absolute error = 2.094 relative error = 127.2 % Correct digits = 0 NO POLE (given) for Equation 1 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 1.4337 1.503 h = 0.0001 0.004 y[1] (numeric) = 1.53597661202 1.50299672718 y[1] (closed_form) = 1.53597666221 -0.591398381272 absolute error = 2.094 relative error = 127.2 % Correct digits = 0 NO POLE (given) for Equation 1 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 1.4338 1.507 h = 0.003 0.006 y[1] (numeric) = 1.53607653977 1.50699691191 y[1] (closed_form) = 1.53607659033 -0.587398195824 absolute error = 2.094 relative error = 127.4 % Correct digits = 0 NO POLE (given) for Equation 1 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 1.4368 1.513 h = 0.0001 0.005 y[1] (numeric) = 1.53907657067 1.51299724373 y[1] (closed_form) = 1.53907662292 -0.58139786708 absolute error = 2.094 relative error = 127.3 % Correct digits = 0 NO POLE (given) for Equation 1 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 1.4369 1.518 h = 0.0001 0.003 y[1] (numeric) = 1.53917649715 1.51799747417 y[1] (closed_form) = 1.53917654807 -0.576397634841 absolute error = 2.094 relative error = 127.4 % Correct digits = 0 NO POLE (given) for Equation 1 NO 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=2216.9MB, alloc=52.3MB, time=27.06 x[1] = 1.437 1.521 h = 0.001 0.001 y[1] (numeric) = 1.53927645833 1.52099761529 y[1] (closed_form) = 1.5392765084 -0.57339749395 absolute error = 2.094 relative error = 127.5 % Correct digits = 0 NO POLE (given) for Equation 1 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 1.438 1.522 h = 0.001 0.003 y[1] (numeric) = 1.5402764911 1.52199767592 y[1] (closed_form) = 1.54027654072 -0.57239743329 absolute error = 2.094 relative error = 127.5 % Correct digits = 0 NO POLE (given) for Equation 1 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 1.439 1.525 h = 0.0001 0.004 y[1] (numeric) = 1.54127649599 1.52499782862 y[1] (closed_form) = 1.54127654652 -0.569397280626 absolute error = 2.094 relative error = 127.5 % Correct digits = 0 NO POLE (given) for Equation 1 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 1.4391 1.529 h = 0.003 0.006 y[1] (numeric) = 1.54137645016 1.52899801522 y[1] (closed_form) = 1.54137650113 -0.56539709338 absolute error = 2.094 relative error = 127.6 % Correct digits = 0 NO POLE (given) for Equation 1 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 1.4421 1.535 h = 0.0001 0.005 y[1] (numeric) = 1.54437652214 1.53499832991 y[1] (closed_form) = 1.54437657434 -0.559396781851 absolute error = 2.094 relative error = 127.5 % Correct digits = 0 NO POLE (given) for Equation 1 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 1.4422 1.54 h = 0.0001 0.003 y[1] (numeric) = 1.54447648092 1.53999856058 y[1] (closed_form) = 1.54447653208 -0.554396549294 absolute error = 2.094 relative error = 127.6 % Correct digits = 0 NO POLE (given) for Equation 1 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 1.4423 1.543 h = 0.001 0.001 y[1] (numeric) = 1.54457646163 1.54299870104 y[1] (closed_form) = 1.54457651194 -0.551396408942 absolute error = 2.094 relative error = 127.7 % Correct digits = 0 NO POLE (given) for Equation 1 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 1.4433 1.544 h = 0.001 0.003 y[1] (numeric) = 1.54557650084 1.54399875508 y[1] (closed_form) = 1.54557655072 -0.550396354814 absolute error = 2.094 relative error = 127.7 % Correct digits = 0 NO POLE (given) for Equation 1 NO 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=2261.5MB, alloc=52.3MB, time=27.60 x[1] = 1.4443 1.547 h = 0.0001 0.004 y[1] (numeric) = 1.54657652499 1.54699890109 y[1] (closed_form) = 1.54657657575 -0.547396208954 absolute error = 2.094 relative error = 127.7 % Correct digits = 0 NO POLE (given) for Equation 1 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 1.4444 1.551 h = 0.003 0.006 y[1] (numeric) = 1.54667650478 1.55099908613 y[1] (closed_form) = 1.54667655604 -0.543396023361 absolute error = 2.094 relative error = 127.8 % Correct digits = 0 NO POLE (given) for Equation 1 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 1.4474 1.557 h = 0.0001 0.005 y[1] (numeric) = 1.54967661403 1.55699937914 y[1] (closed_form) = 1.54967666607 -0.537395733541 absolute error = 2.094 relative error = 127.7 % Correct digits = 0 NO POLE (given) for Equation 1 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 1.4475 1.562 h = 0.0001 0.003 y[1] (numeric) = 1.54977660385 1.5619996059 y[1] (closed_form) = 1.54977665513 -0.532395504835 absolute error = 2.094 relative error = 127.8 % Correct digits = 0 NO POLE (given) for Equation 1 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 1.4476 1.565 h = 0.001 0.001 y[1] (numeric) = 1.54987660324 1.56499974324 y[1] (closed_form) = 1.54987665369 -0.529395367492 absolute error = 2.094 relative error = 127.9 % Correct digits = 0 NO POLE (given) for Equation 1 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 1.4486 1.566 h = 0.001 0.003 y[1] (numeric) = 1.55087664778 1.56599979014 y[1] (closed_form) = 1.55087669783 -0.528395320458 absolute error = 2.094 relative error = 127.8 % Correct digits = 0 NO POLE (given) for Equation 1 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 1.4496 1.569 h = 0.0001 0.004 y[1] (numeric) = 1.55187668959 1.56899992726 y[1] (closed_form) = 1.55187674046 -0.525395183584 absolute error = 2.094 relative error = 127.8 % Correct digits = 0 NO POLE (given) for Equation 1 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 1.4497 1.573 h = 0.003 0.006 y[1] (numeric) = 1.55197669377 1.57300010752 y[1] (closed_form) = 1.5519767452 -0.521395002851 absolute error = 2.094 relative error = 127.9 % Correct digits = 0 NO POLE (given) for Equation 1 NO 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=2306.1MB, alloc=52.3MB, time=28.14 x[1] = 1.4527 1.579 h = 0.0001 0.005 y[1] (numeric) = 1.55497683604 1.57900037497 y[1] (closed_form) = 1.5549768878 -0.515394738574 absolute error = 2.094 relative error = 127.9 % Correct digits = 0 NO POLE (given) for Equation 1 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 1.4528 1.584 h = 0.0001 0.003 y[1] (numeric) = 1.55507685518 1.58400059401 y[1] (closed_form) = 1.55507690646 -0.510394517559 absolute error = 2.094 relative error = 128 % Correct digits = 0 NO POLE (given) for Equation 1 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 1.4529 1.587 h = 0.001 0.001 y[1] (numeric) = 1.5551768721 1.58700072598 y[1] (closed_form) = 1.55517692259 -0.507394385489 absolute error = 2.094 relative error = 128 % Correct digits = 0 NO POLE (given) for Equation 1 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 1.4539 1.588 h = 0.0001 0.004 y[1] (numeric) = 1.55617692085 1.58800076533 y[1] (closed_form) = 1.55617697097 -0.506394345951 absolute error = 2.094 relative error = 128 % Correct digits = 0 NO POLE (given) for Equation 1 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 1.454 1.592 h = 0.003 0.006 y[1] (numeric) = 1.55627694384 1.59200093954 y[1] (closed_form) = 1.5562769956 -0.50239417149 absolute error = 2.094 relative error = 128.1 % Correct digits = 0 NO POLE (given) for Equation 1 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 1.457 1.598 h = 0.0001 0.005 y[1] (numeric) = 1.55927711123 1.59800118271 y[1] (closed_form) = 1.55927716296 -0.496393931424 absolute error = 2.094 relative error = 128 % Correct digits = 0 NO POLE (given) for Equation 1 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 1.4571 1.603 h = 0.0001 0.003 y[1] (numeric) = 1.55937715404 1.60300139266 y[1] (closed_form) = 1.55937720553 -0.491393719505 absolute error = 2.094 relative error = 128.1 % Correct digits = 0 NO POLE (given) for Equation 1 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 1.4572 1.606 h = 0.001 0.001 y[1] (numeric) = 1.55947718506 1.60600151856 y[1] (closed_form) = 1.55947723579 -0.488393593423 absolute error = 2.094 relative error = 128.2 % Correct digits = 0 NO POLE (given) for Equation 1 NO 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=2350.7MB, alloc=52.3MB, time=28.68 x[1] = 1.4582 1.607 h = 0.001 0.003 y[1] (numeric) = 1.56047723662 1.60700155126 y[1] (closed_form) = 1.56047728701 -0.487393560506 absolute error = 2.094 relative error = 128.1 % Correct digits = 0 NO POLE (given) for Equation 1 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 1.4592 1.61 h = 0.0001 0.004 y[1] (numeric) = 1.56147730643 1.6100016672 y[1] (closed_form) = 1.56147735751 -0.484393444985 absolute error = 2.094 relative error = 128.1 % Correct digits = 0 NO POLE (given) for Equation 1 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 1.4593 1.614 h = 0.003 0.006 y[1] (numeric) = 1.5615773517 1.61400183129 y[1] (closed_form) = 1.5615774034 -0.480393280595 absolute error = 2.094 relative error = 128.2 % Correct digits = 0 NO POLE (given) for Equation 1 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 1.4623 1.62 h = 0.0001 0.005 y[1] (numeric) = 1.56457754344 1.62000204345 y[1] (closed_form) = 1.56457759473 -0.474393071405 absolute error = 2.094 relative error = 128.1 % Correct digits = 0 NO POLE (given) for Equation 1 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 1.4624 1.625 h = 0.0001 0.003 y[1] (numeric) = 1.56467761133 1.62500223961 y[1] (closed_form) = 1.56467766262 -0.469392873333 absolute error = 2.094 relative error = 128.2 % Correct digits = 0 NO POLE (given) for Equation 1 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 1.4625 1.628 h = 0.001 0.001 y[1] (numeric) = 1.56477765716 1.62800235655 y[1] (closed_form) = 1.56477770776 -0.466392756118 absolute error = 2.094 relative error = 128.3 % Correct digits = 0 NO POLE (given) for Equation 1 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 1.4635 1.629 h = 0.001 0.003 y[1] (numeric) = 1.56577771084 1.62900238137 y[1] (closed_form) = 1.56577776114 -0.465392731039 absolute error = 2.094 relative error = 128.2 % Correct digits = 0 NO POLE (given) for Equation 1 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 1.4645 1.632 h = 0.0001 0.004 y[1] (numeric) = 1.56677779266 1.63200248381 y[1] (closed_form) = 1.56677784357 -0.462392629097 absolute error = 2.094 relative error = 128.2 % Correct digits = 0 NO POLE (given) for Equation 1 NO 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=2395.4MB, alloc=52.3MB, time=29.22 x[1] = 1.4646 1.636 h = 0.003 0.006 y[1] (numeric) = 1.56687785705 1.6360026356 y[1] (closed_form) = 1.5668779086 -0.458392477089 absolute error = 2.094 relative error = 128.3 % Correct digits = 0 NO POLE (given) for Equation 1 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 1.4676 1.642 h = 0.0001 0.005 y[1] (numeric) = 1.56987806823 1.64200281489 y[1] (closed_form) = 1.56987811899 -0.452392300604 absolute error = 2.094 relative error = 128.2 % Correct digits = 0 NO POLE (given) for Equation 1 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 1.4677 1.647 h = 0.0001 0.003 y[1] (numeric) = 1.56997815843 1.6470029946 y[1] (closed_form) = 1.56997820945 -0.447392119057 absolute error = 2.094 relative error = 128.3 % Correct digits = 0 NO POLE (given) for Equation 1 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 1.4678 1.65 h = 0.001 0.001 y[1] (numeric) = 1.57007821735 1.65000310105 y[1] (closed_form) = 1.57007826773 -0.444392012253 absolute error = 2.094 relative error = 128.4 % Correct digits = 0 NO POLE (given) for Equation 1 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 1.4688 1.651 h = 0.001 0.003 y[1] (numeric) = 1.57107827206 1.65100311804 y[1] (closed_form) = 1.57107832219 -0.443391994977 absolute error = 2.094 relative error = 128.3 % Correct digits = 0 NO POLE (given) for Equation 1 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 1.4698 1.654 h = 0.0001 0.004 y[1] (numeric) = 1.57207836369 1.65400320598 y[1] (closed_form) = 1.57207841435 -0.440391907595 absolute error = 2.094 relative error = 128.3 % Correct digits = 0 NO POLE (given) for Equation 1 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 1.4699 1.658 h = 0.003 0.006 y[1] (numeric) = 1.57217844488 1.65800334353 y[1] (closed_form) = 1.57217849617 -0.436391769917 absolute error = 2.094 relative error = 128.4 % Correct digits = 0 NO POLE (given) for Equation 1 NO 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=2440.2MB, alloc=52.3MB, time=29.77 x[1] = 1.4729 1.664 h = 0.0001 0.005 y[1] (numeric) = 1.57517867053 1.66400348877 y[1] (closed_form) = 1.57517872071 -0.430391627269 absolute error = 2.094 relative error = 128.3 % Correct digits = 0 NO POLE (given) for Equation 1 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 1.473 1.669 h = 0.0001 0.003 y[1] (numeric) = 1.57527878005 1.66900364984 y[1] (closed_form) = 1.57527883071 -0.425391464467 absolute error = 2.094 relative error = 128.4 % Correct digits = 0 NO POLE (given) for Equation 1 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 1.4731 1.672 h = 0.001 0.001 y[1] (numeric) = 1.57537885021 1.67200374455 y[1] (closed_form) = 1.5753789003 -0.422391369338 absolute error = 2.094 relative error = 128.4 % Correct digits = 0 NO POLE (given) for Equation 1 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 1.4741 1.673 h = 0.001 0.003 y[1] (numeric) = 1.57637890491 1.67300375389 y[1] (closed_form) = 1.5763789548 -0.421391359692 absolute error = 2.094 relative error = 128.4 % Correct digits = 0 NO POLE (given) for Equation 1 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 1.4751 1.676 h = 0.0001 0.004 y[1] (numeric) = 1.57737900411 1.67600382665 y[1] (closed_form) = 1.57737905443 -0.418391287531 absolute error = 2.094 relative error = 128.3 % Correct digits = 0 NO POLE (given) for Equation 1 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 1.4752 1.68 h = 0.003 0.006 y[1] (numeric) = 1.57747909962 1.68000394839 y[1] (closed_form) = 1.57747915056 -0.414391165755 absolute error = 2.094 relative error = 128.4 % Correct digits = 0 NO POLE (given) for Equation 1 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 1.4782 1.686 h = 0.0001 0.005 y[1] (numeric) = 1.58047933481 1.68600405909 y[1] (closed_form) = 1.58047938437 -0.408391057402 absolute error = 2.094 relative error = 128.3 % Correct digits = 0 NO POLE (given) for Equation 1 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 1.4783 1.691 h = 0.0001 0.003 y[1] (numeric) = 1.58057946052 1.69100419979 y[1] (closed_form) = 1.58057951076 -0.403390915094 absolute error = 2.094 relative error = 128.4 % Correct digits = 0 NO POLE (given) for Equation 1 NO 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=2484.8MB, alloc=52.3MB, time=30.31 x[1] = 1.4784 1.694 h = 0.001 0.001 y[1] (numeric) = 1.58067953997 1.69400428179 y[1] (closed_form) = 1.58067958971 -0.400390832616 absolute error = 2.094 relative error = 128.4 % Correct digits = 0 NO POLE (given) for Equation 1 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 1.4794 1.695 h = 0.0001 0.004 y[1] (numeric) = 1.58167959369 1.69500428379 y[1] (closed_form) = 1.58167964327 -0.399390830303 absolute error = 2.094 relative error = 128.4 % Correct digits = 0 NO POLE (given) for Equation 1 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 1.4795 1.699 h = 0.003 0.006 y[1] (numeric) = 1.58177969901 1.69900439171 y[1] (closed_form) = 1.58177974984 -0.395390723055 absolute error = 2.094 relative error = 128.5 % Correct digits = 0 NO POLE (given) for Equation 1 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 1.4825 1.705 h = 0.0001 0.005 y[1] (numeric) = 1.584779939 1.70500447281 y[1] (closed_form) = 1.58477998823 -0.389390644066 absolute error = 2.094 relative error = 128.3 % Correct digits = 0 NO POLE (given) for Equation 1 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 1.4826 1.71 h = 0.0001 0.003 y[1] (numeric) = 1.58488007631 1.71000459511 y[1] (closed_form) = 1.58488012637 -0.384390520295 absolute error = 2.094 relative error = 128.4 % Correct digits = 0 NO POLE (given) for Equation 1 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 1.4827 1.713 h = 0.001 0.001 y[1] (numeric) = 1.58498016232 1.7130046657 y[1] (closed_form) = 1.58498021196 -0.381390449192 absolute error = 2.094 relative error = 128.5 % Correct digits = 0 NO POLE (given) for Equation 1 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 1.4837 1.714 h = 0.001 0.003 y[1] (numeric) = 1.58598021455 1.71400466167 y[1] (closed_form) = 1.58598026408 -0.38039045289 absolute error = 2.094 relative error = 128.4 % Correct digits = 0 NO POLE (given) for Equation 1 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 1.4847 1.717 h = 0.0001 0.004 y[1] (numeric) = 1.58698032211 1.71700470549 y[1] (closed_form) = 1.58698037189 -0.377390409725 absolute error = 2.094 relative error = 128.4 % Correct digits = 0 NO POLE (given) for Equation 1 NO 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=2529.4MB, alloc=52.3MB, time=30.85 x[1] = 1.4848 1.721 h = 0.003 0.006 y[1] (numeric) = 1.58708043754 1.72100479499 y[1] (closed_form) = 1.5870804879 -0.373390320326 absolute error = 2.094 relative error = 128.5 % Correct digits = 0 NO POLE (given) for Equation 1 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 1.4878 1.727 h = 0.0001 0.005 y[1] (numeric) = 1.59008067834 1.72700484228 y[1] (closed_form) = 1.59008072688 -0.367390274868 absolute error = 2.094 relative error = 128.3 % Correct digits = 0 NO POLE (given) for Equation 1 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 1.4879 1.732 h = 0.0001 0.003 y[1] (numeric) = 1.59018082579 1.73200494221 y[1] (closed_form) = 1.59018087532 -0.362390173627 absolute error = 2.094 relative error = 128.4 % Correct digits = 0 NO POLE (given) for Equation 1 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 1.488 1.735 h = 0.001 0.001 y[1] (numeric) = 1.59028091737 1.73500499903 y[1] (closed_form) = 1.59028096657 -0.359390116261 absolute error = 2.094 relative error = 128.5 % Correct digits = 0 NO POLE (given) for Equation 1 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 1.489 1.736 h = 0.001 0.003 y[1] (numeric) = 1.59128096702 1.7360049885 y[1] (closed_form) = 1.59128101615 -0.358390126458 absolute error = 2.094 relative error = 128.4 % Correct digits = 0 NO POLE (given) for Equation 1 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 1.49 1.739 h = 0.0001 0.004 y[1] (numeric) = 1.59228107589 1.73900501686 y[1] (closed_form) = 1.59228112519 -0.355390098754 absolute error = 2.094 relative error = 128.4 % Correct digits = 0 NO POLE (given) for Equation 1 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 1.4901 1.743 h = 0.003 0.006 y[1] (numeric) = 1.59238119815 1.7430050881 y[1] (closed_form) = 1.59238124798 -0.351390027697 absolute error = 2.094 relative error = 128.4 % Correct digits = 0 NO POLE (given) for Equation 1 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 1.4931 1.749 h = 0.0001 0.005 y[1] (numeric) = 1.59538143541 1.7490051028 y[1] (closed_form) = 1.59538148327 -0.345390014516 absolute error = 2.094 relative error = 128.3 % Correct digits = 0 NO POLE (given) for Equation 1 NO 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=2574.1MB, alloc=52.3MB, time=31.40 x[1] = 1.4932 1.754 h = 0.0001 0.003 y[1] (numeric) = 1.59548158974 1.75400517996 y[1] (closed_form) = 1.59548163872 -0.340389936223 absolute error = 2.094 relative error = 128.4 % Correct digits = 0 NO POLE (given) for Equation 1 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 1.4933 1.757 h = 0.001 0.001 y[1] (numeric) = 1.59558168493 1.75700522284 y[1] (closed_form) = 1.59558173366 -0.33738989277 absolute error = 2.094 relative error = 128.4 % Correct digits = 0 NO POLE (given) for Equation 1 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 1.4943 1.758 h = 0.001 0.003 y[1] (numeric) = 1.59658173127 1.75800520641 y[1] (closed_form) = 1.59658177996 -0.336389908882 absolute error = 2.094 relative error = 128.4 % Correct digits = 0 NO POLE (given) for Equation 1 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 1.4953 1.761 h = 0.0001 0.004 y[1] (numeric) = 1.59758183943 1.76100521976 y[1] (closed_form) = 1.5975818882 -0.33338989618 absolute error = 2.094 relative error = 128.3 % Correct digits = 0 NO POLE (given) for Equation 1 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 1.4954 1.765 h = 0.003 0.006 y[1] (numeric) = 1.59768196591 1.76500527258 y[1] (closed_form) = 1.59768201518 -0.329389843603 absolute error = 2.094 relative error = 128.4 % Correct digits = 0 NO POLE (given) for Equation 1 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 1.4984 1.771 h = 0.0001 0.005 y[1] (numeric) = 1.60068219562 1.77100525645 y[1] (closed_form) = 1.6006822428 -0.323389860944 absolute error = 2.094 relative error = 128.3 % Correct digits = 0 NO POLE (given) for Equation 1 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 1.4985 1.776 h = 0.0001 0.003 y[1] (numeric) = 1.60078235365 1.77600531087 y[1] (closed_form) = 1.60078240205 -0.318389805581 absolute error = 2.094 relative error = 128.3 % Correct digits = 0 NO POLE (given) for Equation 1 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 1.4986 1.779 h = 0.001 0.001 y[1] (numeric) = 1.60088245053 1.77900533991 y[1] (closed_form) = 1.60088249876 -0.315389775959 absolute error = 2.094 relative error = 128.4 % Correct digits = 0 NO POLE (given) for Equation 1 NO 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=2618.7MB, alloc=52.3MB, time=31.94 x[1] = 1.4996 1.78 h = 0.001 0.003 y[1] (numeric) = 1.60188249293 1.78000531822 y[1] (closed_form) = 1.60188254117 -0.314389797335 absolute error = 2.094 relative error = 128.3 % Correct digits = 0 NO POLE (given) for Equation 1 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 1.5006 1.783 h = 0.0001 0.004 y[1] (numeric) = 1.6028825985 1.78300531725 y[1] (closed_form) = 1.60288264673 -0.311389798937 absolute error = 2.094 relative error = 128.3 % Correct digits = 0 NO POLE (given) for Equation 1 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 1.5007 1.787 h = 0.003 0.006 y[1] (numeric) = 1.60298272669 1.78700535184 y[1] (closed_form) = 1.60298277537 -0.307389764639 absolute error = 2.094 relative error = 128.3 % Correct digits = 0 NO POLE (given) for Equation 1 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 1.5037 1.793 h = 0.0001 0.005 y[1] (numeric) = 1.60598294521 1.79300530707 y[1] (closed_form) = 1.60598299173 -0.301389810311 absolute error = 2.094 relative error = 128.2 % Correct digits = 0 NO POLE (given) for Equation 1 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 1.5038 1.798 h = 0.0001 0.003 y[1] (numeric) = 1.60608310391 1.79800533918 y[1] (closed_form) = 1.60608315172 -0.296389777452 absolute error = 2.094 relative error = 128.2 % Correct digits = 0 NO POLE (given) for Equation 1 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 1.5039 1.801 h = 0.001 0.001 y[1] (numeric) = 1.60618320064 1.80100535471 y[1] (closed_form) = 1.60618324836 -0.293389761337 absolute error = 2.094 relative error = 128.3 % Correct digits = 0 NO POLE (given) for Equation 1 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 1.5049 1.802 h = 0.0001 0.004 y[1] (numeric) = 1.60718323859 1.80200532848 y[1] (closed_form) = 1.60718328636 -0.292389787271 absolute error = 2.094 relative error = 128.2 % Correct digits = 0 NO POLE (given) for Equation 1 NO 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=2663.5MB, alloc=52.3MB, time=32.48 x[1] = 1.505 1.806 h = 0.003 0.006 y[1] (numeric) = 1.60728336642 1.80600534853 y[1] (closed_form) = 1.60728341471 -0.288389768324 absolute error = 2.094 relative error = 128.3 % Correct digits = 0 NO POLE (given) for Equation 1 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 1.508 1.812 h = 0.0001 0.005 y[1] (numeric) = 1.61028357304 1.81200528095 y[1] (closed_form) = 1.61028361913 -0.282389836528 absolute error = 2.094 relative error = 128.1 % Correct digits = 0 NO POLE (given) for Equation 1 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 1.5081 1.817 h = 0.0001 0.003 y[1] (numeric) = 1.61038373025 1.81700529445 y[1] (closed_form) = 1.61038377767 -0.27738982245 absolute error = 2.094 relative error = 128.2 % Correct digits = 0 NO POLE (given) for Equation 1 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 1.5082 1.82 h = 0.001 0.001 y[1] (numeric) = 1.61048382563 1.82000529876 y[1] (closed_form) = 1.61048387303 -0.27438981756 absolute error = 2.094 relative error = 128.2 % Correct digits = 0 NO POLE (given) for Equation 1 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 1.5092 1.821 h = 0.001 0.003 y[1] (numeric) = 1.61148385946 1.82100526916 y[1] (closed_form) = 1.61148390695 -0.273389846883 absolute error = 2.094 relative error = 128.1 % Correct digits = 0 NO POLE (given) for Equation 1 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 1.5102 1.824 h = 0.0001 0.004 y[1] (numeric) = 1.61248395589 1.824005244 y[1] (closed_form) = 1.61248400323 -0.270389872617 absolute error = 2.094 relative error = 128.1 % Correct digits = 0 NO POLE (given) for Equation 1 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 1.5103 1.828 h = 0.003 0.006 y[1] (numeric) = 1.61258408122 1.8280052462 y[1] (closed_form) = 1.61258412889 -0.266389870786 absolute error = 2.094 relative error = 128.1 % Correct digits = 0 NO POLE (given) for Equation 1 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 1.5133 1.834 h = 0.0001 0.005 y[1] (numeric) = 1.61558427101 1.83400515497 y[1] (closed_form) = 1.6155843165 -0.260389962344 absolute error = 2.094 relative error = 128 % Correct digits = 0 NO POLE (given) for Equation 1 NO 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=2708.2MB, alloc=52.3MB, time=33.02 x[1] = 1.5134 1.839 h = 0.0001 0.003 y[1] (numeric) = 1.61568442369 1.83900514789 y[1] (closed_form) = 1.61568447054 -0.255389969039 absolute error = 2.094 relative error = 128 % Correct digits = 0 NO POLE (given) for Equation 1 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 1.5135 1.842 h = 0.001 0.001 y[1] (numeric) = 1.61578451583 1.84200513987 y[1] (closed_form) = 1.61578456273 -0.252389976501 absolute error = 2.094 relative error = 128.1 % Correct digits = 0 NO POLE (given) for Equation 1 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 1.5145 1.843 h = 0.001 0.003 y[1] (numeric) = 1.61678454455 1.84300510713 y[1] (closed_form) = 1.61678459156 -0.251390008983 absolute error = 2.094 relative error = 128 % Correct digits = 0 NO POLE (given) for Equation 1 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 1.5155 1.846 h = 0.0001 0.004 y[1] (numeric) = 1.61778463394 1.84600507068 y[1] (closed_form) = 1.61778468073 -0.24839004597 absolute error = 2.094 relative error = 128 % Correct digits = 0 NO POLE (given) for Equation 1 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 1.5156 1.85 h = 0.003 0.006 y[1] (numeric) = 1.61788475457 1.85000505681 y[1] (closed_form) = 1.61788480164 -0.244390060234 absolute error = 2.094 relative error = 128 % Correct digits = 0 NO POLE (given) for Equation 1 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 1.5186 1.856 h = 0.0001 0.005 y[1] (numeric) = 1.62088492519 1.85600494501 y[1] (closed_form) = 1.62088497011 -0.238390172073 absolute error = 2.094 relative error = 127.8 % Correct digits = 0 NO POLE (given) for Equation 1 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 1.5187 1.861 h = 0.0001 0.003 y[1] (numeric) = 1.6209850709 1.86100491874 y[1] (closed_form) = 1.62098511718 -0.233390198142 absolute error = 2.094 relative error = 127.9 % Correct digits = 0 NO POLE (given) for Equation 1 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 1.5188 1.864 h = 0.001 0.001 y[1] (numeric) = 1.62108515836 1.86400489929 y[1] (closed_form) = 1.62108520476 -0.230390217061 absolute error = 2.094 relative error = 127.9 % Correct digits = 0 NO POLE (given) for Equation 1 NO 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=2753.0MB, alloc=52.3MB, time=33.57 x[1] = 1.5198 1.865 h = 0.001 0.003 y[1] (numeric) = 1.62208518176 1.86500486419 y[1] (closed_form) = 1.6220852283 -0.229390251929 absolute error = 2.094 relative error = 127.8 % Correct digits = 0 NO POLE (given) for Equation 1 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 1.5208 1.868 h = 0.0001 0.004 y[1] (numeric) = 1.62308526295 1.86800481779 y[1] (closed_form) = 1.62308530922 -0.226390298815 absolute error = 2.094 relative error = 127.8 % Correct digits = 0 NO POLE (given) for Equation 1 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 1.5209 1.872 h = 0.003 0.006 y[1] (numeric) = 1.62318537702 1.8720047891 y[1] (closed_form) = 1.6231854235 -0.222390327928 absolute error = 2.094 relative error = 127.8 % Correct digits = 0 NO POLE (given) for Equation 1 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 1.5239 1.878 h = 0.0001 0.005 y[1] (numeric) = 1.62618552661 1.87800465998 y[1] (closed_form) = 1.62618557103 -0.216390456804 absolute error = 2.094 relative error = 127.7 % Correct digits = 0 NO POLE (given) for Equation 1 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 1.524 1.883 h = 0.0001 0.003 y[1] (numeric) = 1.62628566318 1.88300461617 y[1] (closed_form) = 1.62628570893 -0.211390500588 absolute error = 2.094 relative error = 127.7 % Correct digits = 0 NO POLE (given) for Equation 1 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 1.5241 1.886 h = 0.001 0.001 y[1] (numeric) = 1.62638574469 1.88600458635 y[1] (closed_form) = 1.62638579061 -0.208390529921 absolute error = 2.094 relative error = 127.7 % Correct digits = 0 NO POLE (given) for Equation 1 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 1.5251 1.887 h = 0.001 0.003 y[1] (numeric) = 1.62738576268 1.88700454966 y[1] (closed_form) = 1.62738580878 -0.207390566405 absolute error = 2.094 relative error = 127.7 % Correct digits = 0 NO POLE (given) for Equation 1 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 1.5261 1.89 h = 0.0001 0.004 y[1] (numeric) = 1.62838583473 1.89000449475 y[1] (closed_form) = 1.6283858805 -0.204390621745 absolute error = 2.094 relative error = 127.6 % Correct digits = 0 NO POLE (given) for Equation 1 NO 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=2797.8MB, alloc=52.3MB, time=34.12 x[1] = 1.5262 1.894 h = 0.003 0.006 y[1] (numeric) = 1.62848594061 1.89400445265 y[1] (closed_form) = 1.62848598653 -0.200390664273 absolute error = 2.094 relative error = 127.6 % Correct digits = 0 NO POLE (given) for Equation 1 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 1.5292 1.9 h = 0.0001 0.005 y[1] (numeric) = 1.63148606779 1.9000043096 y[1] (closed_form) = 1.63148611176 -0.194390806837 absolute error = 2.094 relative error = 127.5 % Correct digits = 0 NO POLE (given) for Equation 1 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 1.5293 1.905 h = 0.0001 0.003 y[1] (numeric) = 1.63158619336 1.90500425012 y[1] (closed_form) = 1.6315862386 -0.189390866463 absolute error = 2.094 relative error = 127.5 % Correct digits = 0 NO POLE (given) for Equation 1 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 1.5294 1.908 h = 0.001 0.001 y[1] (numeric) = 1.63168626782 1.90800421109 y[1] (closed_form) = 1.6316863133 -0.186390905045 absolute error = 2.094 relative error = 127.5 % Correct digits = 0 NO POLE (given) for Equation 1 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 1.5304 1.909 h = 0.0001 0.004 y[1] (numeric) = 1.63268628042 1.90900417356 y[1] (closed_form) = 1.63268632609 -0.185390942397 absolute error = 2.094 relative error = 127.5 % Correct digits = 0 NO POLE (given) for Equation 1 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 1.5305 1.913 h = 0.003 0.006 y[1] (numeric) = 1.63278637858 1.91300412165 y[1] (closed_form) = 1.63278642404 -0.181390995326 absolute error = 2.094 relative error = 127.5 % Correct digits = 0 NO POLE (given) for Equation 1 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 1.5335 1.919 h = 0.0001 0.005 y[1] (numeric) = 1.63578648586 1.91900396904 y[1] (closed_form) = 1.63578652949 -0.17539114724 absolute error = 2.094 relative error = 127.3 % Correct digits = 0 NO POLE (given) for Equation 1 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 1.5336 1.924 h = 0.0001 0.003 y[1] (numeric) = 1.63588660084 1.92400389754 y[1] (closed_form) = 1.63588664568 -0.170391219031 absolute error = 2.094 relative error = 127.3 % Correct digits = 0 NO POLE (given) for Equation 1 NO 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=2842.5MB, alloc=52.3MB, time=34.66 x[1] = 1.5337 1.927 h = 0.001 0.001 y[1] (numeric) = 1.63598666861 1.92700385149 y[1] (closed_form) = 1.63598671373 -0.167391264667 absolute error = 2.094 relative error = 127.4 % Correct digits = 0 NO POLE (given) for Equation 1 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 1.5347 1.928 h = 0.001 0.003 y[1] (numeric) = 1.63698667665 1.92800381376 y[1] (closed_form) = 1.63698672198 -0.166391302249 absolute error = 2.094 relative error = 127.3 % Correct digits = 0 NO POLE (given) for Equation 1 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 1.5357 1.931 h = 0.0001 0.004 y[1] (numeric) = 1.63798673 1.93100374692 y[1] (closed_form) = 1.63798677492 -0.163391369406 absolute error = 2.094 relative error = 127.2 % Correct digits = 0 NO POLE (given) for Equation 1 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 1.5358 1.935 h = 0.003 0.006 y[1] (numeric) = 1.63808681726 1.93500368404 y[1] (closed_form) = 1.63808686223 -0.159391432721 absolute error = 2.094 relative error = 127.3 % Correct digits = 0 NO POLE (given) for Equation 1 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 1.5388 1.941 h = 0.0001 0.005 y[1] (numeric) = 1.64108690082 1.94100352382 y[1] (closed_form) = 1.64108694412 -0.153391592044 absolute error = 2.094 relative error = 127.1 % Correct digits = 0 NO POLE (given) for Equation 1 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 1.5389 1.946 h = 0.0001 0.003 y[1] (numeric) = 1.64118700212 1.94600344049 y[1] (closed_form) = 1.64118704655 -0.148391675797 absolute error = 2.094 relative error = 127.1 % Correct digits = 0 NO POLE (given) for Equation 1 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 1.539 1.949 h = 0.001 0.001 y[1] (numeric) = 1.64128706132 1.94900338764 y[1] (closed_form) = 1.64128710607 -0.145391728296 absolute error = 2.094 relative error = 127.1 % Correct digits = 0 NO POLE (given) for Equation 1 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 1.54 1.95 h = 0.001 0.003 y[1] (numeric) = 1.64228706423 1.95000335038 y[1] (closed_form) = 1.6422871092 -0.144391765436 absolute error = 2.094 relative error = 127 % Correct digits = 0 NO POLE (given) for Equation 1 NO 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=2887.3MB, alloc=52.3MB, time=35.20 x[1] = 1.541 1.953 h = 0.0001 0.004 y[1] (numeric) = 1.64328710694 1.95300327939 y[1] (closed_form) = 1.64328715148 -0.141391836675 absolute error = 2.094 relative error = 127 % Correct digits = 0 NO POLE (given) for Equation 1 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 1.5411 1.957 h = 0.003 0.006 y[1] (numeric) = 1.64338718272 1.95700320788 y[1] (closed_form) = 1.64338722724 -0.137391908606 absolute error = 2.094 relative error = 127 % Correct digits = 0 NO POLE (given) for Equation 1 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 1.5441 1.963 h = 0.0001 0.005 y[1] (numeric) = 1.64638724253 1.96300304337 y[1] (closed_form) = 1.64638728557 -0.13139207204 absolute error = 2.094 relative error = 126.8 % Correct digits = 0 NO POLE (given) for Equation 1 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 1.5442 1.968 h = 0.0001 0.003 y[1] (numeric) = 1.64648732918 1.96800295044 y[1] (closed_form) = 1.64648737325 -0.126392165525 absolute error = 2.094 relative error = 126.8 % Correct digits = 0 NO POLE (given) for Equation 1 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 1.5443 1.971 h = 0.001 0.001 y[1] (numeric) = 1.6465873793 1.97100289214 y[1] (closed_form) = 1.64658742371 -0.123392223527 absolute error = 2.094 relative error = 126.8 % Correct digits = 0 NO POLE (given) for Equation 1 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 1.5453 1.972 h = 0.001 0.003 y[1] (numeric) = 1.64758737734 1.97200285599 y[1] (closed_form) = 1.64758742198 -0.12239225959 absolute error = 2.094 relative error = 126.8 % Correct digits = 0 NO POLE (given) for Equation 1 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 1.5463 1.975 h = 0.0001 0.004 y[1] (numeric) = 1.6485874093 1.97500278238 y[1] (closed_form) = 1.6485874535 -0.11939233339 absolute error = 2.094 relative error = 126.7 % Correct digits = 0 NO POLE (given) for Equation 1 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 1.5464 1.979 h = 0.003 0.006 y[1] (numeric) = 1.64868747295 1.97900270405 y[1] (closed_form) = 1.64868751708 -0.115392412123 absolute error = 2.094 relative error = 126.7 % Correct digits = 0 memory used=2932.2MB, alloc=52.3MB, time=35.75 NO POLE (given) for Equation 1 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 1.5494 1.985 h = 0.0001 0.005 y[1] (numeric) = 1.65168750941 1.98500253844 y[1] (closed_form) = 1.65168755225 -0.1093925765 absolute error = 2.094 relative error = 126.5 % Correct digits = 0 NO POLE (given) for Equation 1 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 1.5495 1.99 h = 0.0001 0.003 y[1] (numeric) = 1.65178758077 1.99000243816 y[1] (closed_form) = 1.65178762453 -0.10439267745 absolute error = 2.094 relative error = 126.5 % Correct digits = 0 NO POLE (given) for Equation 1 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 1.5496 1.993 h = 0.001 0.001 y[1] (numeric) = 1.65188762146 1.99300237578 y[1] (closed_form) = 1.6518876656 -0.101392739583 absolute error = 2.094 relative error = 126.5 % Correct digits = 0 NO POLE (given) for Equation 1 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 1.5506 1.994 h = 0.001 0.003 y[1] (numeric) = 1.65288761498 1.99400234132 y[1] (closed_form) = 1.65288765933 -0.100392773992 absolute error = 2.094 relative error = 126.5 % Correct digits = 0 NO POLE (given) for Equation 1 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 1.5516 1.997 h = 0.0001 0.004 y[1] (numeric) = 1.65388763628 1.99700226656 y[1] (closed_form) = 1.65388768019 -0.0973928488786 absolute error = 2.094 relative error = 126.4 % Correct digits = 0 NO POLE (given) for Equation 1 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 1.5517 2.001 h = 0.003 0.006 y[1] (numeric) = 1.65398768742 2.00100218322 y[1] (closed_form) = 1.65398773121 -0.0933929325907 absolute error = 2.094 relative error = 126.4 % Correct digits = 0 NO POLE (given) for Equation 1 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 1.5547 2.007 h = 0.0001 0.005 y[1] (numeric) = 1.65698770132 2.00700201955 y[1] (closed_form) = 1.65698774403 -0.0873930949209 absolute error = 2.094 relative error = 126.2 % Correct digits = 0 NO POLE (given) for Equation 1 NO 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=2977.0MB, alloc=52.3MB, time=36.30 x[1] = 1.5548 2.012 h = 0.0001 0.003 y[1] (numeric) = 1.65708775705 2.01200191415 y[1] (closed_form) = 1.65708780056 -0.0823932010757 absolute error = 2.094 relative error = 126.2 % Correct digits = 0 NO POLE (given) for Equation 1 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 1.5549 2.015 h = 0.001 0.001 y[1] (numeric) = 1.65718778817 2.01500184907 y[1] (closed_form) = 1.65718783208 -0.0793932659757 absolute error = 2.094 relative error = 126.2 % Correct digits = 0 NO POLE (given) for Equation 1 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 1.5559 2.016 h = 0.0001 0.004 y[1] (numeric) = 1.65818777755 2.0160018168 y[1] (closed_form) = 1.65818782167 -0.0783932982195 absolute error = 2.094 relative error = 126.2 % Correct digits = 0 NO POLE (given) for Equation 1 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 1.556 2.02 h = 0.003 0.006 y[1] (numeric) = 1.65828781834 2.02000173069 y[1] (closed_form) = 1.65828786179 -0.074393384926 absolute error = 2.094 relative error = 126.2 % Correct digits = 0 NO POLE (given) for Equation 1 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 1.559 2.026 h = 0.0001 0.005 y[1] (numeric) = 1.66128781365 2.02600157068 y[1] (closed_form) = 1.6612878562 -0.0683935435152 absolute error = 2.094 relative error = 126 % Correct digits = 0 NO POLE (given) for Equation 1 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 1.5591 2.031 h = 0.0001 0.003 y[1] (numeric) = 1.66138785593 2.03100146245 y[1] (closed_form) = 1.66138789918 -0.0633936525619 absolute error = 2.094 relative error = 126 % Correct digits = 0 NO POLE (given) for Equation 1 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 1.5592 2.034 h = 0.001 0.001 y[1] (numeric) = 1.66148787885 2.03400139599 y[1] (closed_form) = 1.66148792249 -0.0603937188918 absolute error = 2.094 relative error = 126 % Correct digits = 0 NO POLE (given) for Equation 1 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 1.5602 2.035 h = 0.001 0.003 y[1] (numeric) = 1.66248786499 2.03500136592 y[1] (closed_form) = 1.66248790885 -0.0593937489575 absolute error = 2.094 relative error = 125.9 % Correct digits = 0 NO POLE (given) for Equation 1 NO 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=3021.7MB, alloc=52.3MB, time=36.84 x[1] = 1.5612 2.038 h = 0.0001 0.004 y[1] (numeric) = 1.66348786731 2.03800129257 y[1] (closed_form) = 1.66348791073 -0.056393822319 absolute error = 2.094 relative error = 125.8 % Correct digits = 0 NO POLE (given) for Equation 1 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 1.5613 2.042 h = 0.003 0.006 y[1] (numeric) = 1.66358789497 2.04200120451 y[1] (closed_form) = 1.6635879382 -0.052393910696 absolute error = 2.094 relative error = 125.8 % Correct digits = 0 NO POLE (given) for Equation 1 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 1.5643 2.048 h = 0.0001 0.005 y[1] (numeric) = 1.66658787007 2.04800105146 y[1] (closed_form) = 1.66658791261 -0.0463940622724 absolute error = 2.094 relative error = 125.6 % Correct digits = 0 NO POLE (given) for Equation 1 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 1.5644 2.053 h = 0.0001 0.003 y[1] (numeric) = 1.66668789687 2.05300094214 y[1] (closed_form) = 1.66668793997 -0.0413941724656 absolute error = 2.094 relative error = 125.6 % Correct digits = 0 NO POLE (given) for Equation 1 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 1.5645 2.056 h = 0.001 0.001 y[1] (numeric) = 1.66678791041 2.05600087539 y[1] (closed_form) = 1.66678795391 -0.0383942391333 absolute error = 2.094 relative error = 125.6 % Correct digits = 0 NO POLE (given) for Equation 1 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 1.5655 2.057 h = 0.001 0.003 y[1] (numeric) = 1.66778789326 2.05700084829 y[1] (closed_form) = 1.66778793697 -0.037394266265 absolute error = 2.094 relative error = 125.5 % Correct digits = 0 NO POLE (given) for Equation 1 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 1.5665 2.06 h = 0.0001 0.004 y[1] (numeric) = 1.66878788614 2.06000077756 y[1] (closed_form) = 1.66878792942 -0.0343943369518 absolute error = 2.094 relative error = 125.5 % Correct digits = 0 NO POLE (given) for Equation 1 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 1.5666 2.064 h = 0.003 0.006 y[1] (numeric) = 1.66888790148 2.06400068947 y[1] (closed_form) = 1.66888794454 -0.0303944253203 absolute error = 2.094 relative error = 125.5 % Correct digits = 0 NO POLE (given) for Equation 1 NO 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=3066.3MB, alloc=52.3MB, time=37.38 x[1] = 1.5696 2.07 h = 0.0001 0.005 y[1] (numeric) = 1.67188785805 2.07000054568 y[1] (closed_form) = 1.67188790064 -0.0243945676129 absolute error = 2.094 relative error = 125.3 % Correct digits = 0 NO POLE (given) for Equation 1 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 1.5697 2.075 h = 0.0001 0.003 y[1] (numeric) = 1.67198786985 2.07500043728 y[1] (closed_form) = 1.67198791287 -0.0193946769168 absolute error = 2.094 relative error = 125.3 % Correct digits = 0 NO POLE (given) for Equation 1 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 1.5698 2.078 h = 0.001 0.001 y[1] (numeric) = 1.67208787434 2.07800037146 y[1] (closed_form) = 1.67208791775 -0.0163947427127 absolute error = 2.094 relative error = 125.3 % Correct digits = 0 NO POLE (given) for Equation 1 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 1.5708 2.079 h = 0.001 0.003 y[1] (numeric) = 1.67308785442 2.07900034762 y[1] (closed_form) = 1.67308789802 -0.0153947666073 absolute error = 2.094 relative error = 125.2 % Correct digits = 0 NO POLE (given) for Equation 1 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 1.5718 2.082 h = 0.0001 0.004 y[1] (numeric) = 1.67408783856 2.08200028061 y[1] (closed_form) = 1.67408788176 -0.0123948335236 absolute error = 2.094 relative error = 125.1 % Correct digits = 0 NO POLE (given) for Equation 1 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 1.5719 2.086 h = 0.003 0.006 y[1] (numeric) = 1.67418784205 2.08600019407 y[1] (closed_form) = 1.67418788501 -0.0083949203084 absolute error = 2.094 relative error = 125.1 % Correct digits = 0 NO POLE (given) for Equation 1 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 1.5749 2.092 h = 0.0001 0.005 y[1] (numeric) = 1.67718778202 2.09200006152 y[1] (closed_form) = 1.67718782472 -0.00239505135171 absolute error = 2.094 relative error = 124.9 % Correct digits = 0 NO POLE (given) for Equation 1 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 1.575 2.097 h = 0.0001 0.003 y[1] (numeric) = 1.67728777953 2.09699995593 y[1] (closed_form) = 1.67728782252 0.00260484212807 absolute error = 2.094 relative error = 124.9 % Correct digits = 0 NO POLE (given) for Equation 1 NO 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=3110.8MB, alloc=52.3MB, time=37.92 x[1] = 1.5751 2.1 h = 0.001 0.001 y[1] (numeric) = 1.67738777545 2.09999989215 y[1] (closed_form) = 1.67738781882 0.00560477832374 absolute error = 2.094 relative error = 124.9 % Correct digits = 0 NO POLE (given) for Equation 1 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 1.5761 2.101 h = 0.001 0.003 y[1] (numeric) = 1.67838775328 2.10099987179 y[1] (closed_form) = 1.67838779683 0.00660475789289 absolute error = 2.094 relative error = 124.8 % Correct digits = 0 NO POLE (given) for Equation 1 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 1.5771 2.104 h = 0.0001 0.004 y[1] (numeric) = 1.67938772951 2.10399980946 y[1] (closed_form) = 1.67938777269 0.00960469570796 absolute error = 2.094 relative error = 124.7 % Correct digits = 0 NO POLE (given) for Equation 1 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 1.5772 2.108 h = 0.003 0.006 y[1] (numeric) = 1.67948772183 2.10799972591 y[1] (closed_form) = 1.67948776474 0.0136046119571 absolute error = 2.094 relative error = 124.7 % Correct digits = 0 NO POLE (given) for Equation 1 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 1.5802 2.114 h = 0.0001 0.005 y[1] (numeric) = 1.68248764728 2.11399960628 y[1] (closed_form) = 1.68248769013 0.0196044938068 absolute error = 2.094 relative error = 124.5 % Correct digits = 0 NO POLE (given) for Equation 1 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 1.5803 2.119 h = 0.0001 0.003 y[1] (numeric) = 1.68258763143 2.11899950521 y[1] (closed_form) = 1.68258767444 0.0246043917984 absolute error = 2.094 relative error = 124.5 % Correct digits = 0 NO POLE (given) for Equation 1 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 1.5804 2.122 h = 0.001 0.001 y[1] (numeric) = 1.68268761938 2.12199944448 y[1] (closed_form) = 1.68268766275 0.0276043310007 absolute error = 2.094 relative error = 124.5 % Correct digits = 0 NO POLE (given) for Equation 1 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 1.5814 2.123 h = 0.0001 0.004 y[1] (numeric) = 1.6836875955 2.12299942776 y[1] (closed_form) = 1.68368763904 0.0286043141845 absolute error = 2.094 relative error = 124.4 % Correct digits = 0 NO POLE (given) for Equation 1 NO 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=3155.5MB, alloc=52.3MB, time=38.46 x[1] = 1.5815 2.127 h = 0.003 0.006 y[1] (numeric) = 1.68378757928 2.12699934762 y[1] (closed_form) = 1.68378762206 0.0326042339776 absolute error = 2.094 relative error = 124.4 % Correct digits = 0 NO POLE (given) for Equation 1 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 1.5845 2.133 h = 0.0001 0.005 y[1] (numeric) = 1.68678749384 2.13299924006 y[1] (closed_form) = 1.68678753672 0.0386041278543 absolute error = 2.094 relative error = 124.1 % Correct digits = 0 NO POLE (given) for Equation 1 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 1.5846 2.138 h = 0.0001 0.003 y[1] (numeric) = 1.68688746729 2.13799914395 y[1] (closed_form) = 1.68688751022 0.0436040308287 absolute error = 2.094 relative error = 124.1 % Correct digits = 0 NO POLE (given) for Equation 1 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 1.5847 2.141 h = 0.001 0.001 y[1] (numeric) = 1.68698744889 2.14099908649 y[1] (closed_form) = 1.68698749217 0.0466039732599 absolute error = 2.094 relative error = 124.1 % Correct digits = 0 NO POLE (given) for Equation 1 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 1.5857 2.142 h = 0.001 0.003 y[1] (numeric) = 1.68798742391 2.14199907295 y[1] (closed_form) = 1.68798746734 0.0476039596074 absolute error = 2.094 relative error = 124 % Correct digits = 0 NO POLE (given) for Equation 1 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 1.5867 2.145 h = 0.0001 0.004 y[1] (numeric) = 1.68898738781 2.14499902135 y[1] (closed_form) = 1.68898743094 0.0506039082213 absolute error = 2.094 relative error = 123.9 % Correct digits = 0 NO POLE (given) for Equation 1 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 1.5868 2.149 h = 0.003 0.006 y[1] (numeric) = 1.68908736158 2.14899894662 y[1] (closed_form) = 1.68908740441 0.0546038333656 absolute error = 2.094 relative error = 123.9 % Correct digits = 0 NO POLE (given) for Equation 1 NO 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=3200.1MB, alloc=52.3MB, time=39.01 x[1] = 1.5898 2.155 h = 0.0001 0.005 y[1] (numeric) = 1.69208726582 2.15499885422 y[1] (closed_form) = 1.69208730893 0.0606037423376 absolute error = 2.094 relative error = 123.7 % Correct digits = 0 NO POLE (given) for Equation 1 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 1.5899 2.16 h = 0.0001 0.003 y[1] (numeric) = 1.69218722807 2.15999876532 y[1] (closed_form) = 1.69218727112 0.0656036525451 absolute error = 2.094 relative error = 123.7 % Correct digits = 0 NO POLE (given) for Equation 1 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 1.59 2.163 h = 0.001 0.001 y[1] (numeric) = 1.69228720307 2.16299871249 y[1] (closed_form) = 1.69228724644 0.0686035995655 absolute error = 2.094 relative error = 123.7 % Correct digits = 0 NO POLE (given) for Equation 1 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 1.591 2.164 h = 0.001 0.003 y[1] (numeric) = 1.69328717736 2.16399870267 y[1] (closed_form) = 1.69328722085 0.0696035896207 absolute error = 2.094 relative error = 123.6 % Correct digits = 0 NO POLE (given) for Equation 1 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 1.592 2.167 h = 0.0001 0.004 y[1] (numeric) = 1.69428713612 2.16699865772 y[1] (closed_form) = 1.69428717935 0.0726035449174 absolute error = 2.094 relative error = 123.5 % Correct digits = 0 NO POLE (given) for Equation 1 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 1.5921 2.171 h = 0.003 0.006 y[1] (numeric) = 1.6943871014 2.1709985893 y[1] (closed_form) = 1.69438714432 0.0766034764181 absolute error = 2.094 relative error = 123.5 % Correct digits = 0 NO POLE (given) for Equation 1 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 1.5951 2.177 h = 0.0001 0.005 y[1] (numeric) = 1.69738699766 2.17699851278 y[1] (closed_form) = 1.69738704104 0.0826034011785 absolute error = 2.094 relative error = 123.2 % Correct digits = 0 NO POLE (given) for Equation 1 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 1.5952 2.182 h = 0.0001 0.003 y[1] (numeric) = 1.69748695008 2.18199843222 y[1] (closed_form) = 1.69748699328 0.0876033197747 absolute error = 2.094 relative error = 123.2 % Correct digits = 0 NO POLE (given) for Equation 1 NO 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=3244.8MB, alloc=52.3MB, time=39.55 x[1] = 1.5953 2.185 h = 0.001 0.001 y[1] (numeric) = 1.69758691934 2.18499838468 y[1] (closed_form) = 1.69758696282 0.0906032720464 absolute error = 2.094 relative error = 123.2 % Correct digits = 0 NO POLE (given) for Equation 1 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 1.5963 2.186 h = 0.001 0.003 y[1] (numeric) = 1.6985868934 2.18599837853 y[1] (closed_form) = 1.69858693699 0.0916032657582 absolute error = 2.094 relative error = 123.1 % Correct digits = 0 NO POLE (given) for Equation 1 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 1.5973 2.189 h = 0.0001 0.004 y[1] (numeric) = 1.69958684806 2.18899834062 y[1] (closed_form) = 1.69958689143 0.094603228123 absolute error = 2.094 relative error = 123 % Correct digits = 0 NO POLE (given) for Equation 1 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 1.5974 2.193 h = 0.003 0.006 y[1] (numeric) = 1.699686806 2.19299827935 y[1] (closed_form) = 1.69968684907 0.0986031668099 absolute error = 2.094 relative error = 123 % Correct digits = 0 NO POLE (given) for Equation 1 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 1.6004 2.199 h = 0.0001 0.005 y[1] (numeric) = 1.70268669663 2.1989982191 y[1] (closed_form) = 1.70268674029 0.104603107728 absolute error = 2.094 relative error = 122.8 % Correct digits = 0 NO POLE (given) for Equation 1 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 1.6005 2.204 h = 0.0001 0.003 y[1] (numeric) = 1.70278664066 2.2039981478 y[1] (closed_form) = 1.70278668405 0.109603035648 absolute error = 2.094 relative error = 122.7 % Correct digits = 0 NO POLE (given) for Equation 1 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 1.6006 2.207 h = 0.001 0.001 y[1] (numeric) = 1.70288660508 2.20699810607 y[1] (closed_form) = 1.70288664872 0.112602993698 absolute error = 2.094 relative error = 122.7 % Correct digits = 0 NO POLE (given) for Equation 1 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 1.6016 2.208 h = 0.001 0.003 y[1] (numeric) = 1.70388657939 2.20799810347 y[1] (closed_form) = 1.70388662311 0.113602990953 absolute error = 2.094 relative error = 122.6 % Correct digits = 0 NO POLE (given) for Equation 1 NO 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=3289.6MB, alloc=52.3MB, time=40.10 x[1] = 1.6026 2.211 h = 0.0001 0.004 y[1] (numeric) = 1.70488653102 2.21099807285 y[1] (closed_form) = 1.70488657456 0.116602960622 absolute error = 2.094 relative error = 122.6 % Correct digits = 0 NO POLE (given) for Equation 1 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 1.6027 2.215 h = 0.003 0.006 y[1] (numeric) = 1.70498648281 2.21499801937 y[1] (closed_form) = 1.70498652606 0.120602907146 absolute error = 2.094 relative error = 122.5 % Correct digits = 0 NO POLE (given) for Equation 1 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 1.6057 2.221 h = 0.0001 0.005 y[1] (numeric) = 1.70798637011 2.22099797546 y[1] (closed_form) = 1.70798641408 0.126602864279 absolute error = 2.094 relative error = 122.3 % Correct digits = 0 NO POLE (given) for Equation 1 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 1.6058 2.226 h = 0.0001 0.003 y[1] (numeric) = 1.70808630727 2.22599791413 y[1] (closed_form) = 1.70808635088 0.131602802233 absolute error = 2.094 relative error = 122.3 % Correct digits = 0 NO POLE (given) for Equation 1 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 1.6059 2.229 h = 0.001 0.001 y[1] (numeric) = 1.70818626778 2.22899787859 y[1] (closed_form) = 1.7081863116 0.134602766455 absolute error = 2.094 relative error = 122.2 % Correct digits = 0 NO POLE (given) for Equation 1 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 1.6069 2.23 h = 0.0001 0.004 y[1] (numeric) = 1.70918624278 2.22999787937 y[1] (closed_form) = 1.70918628666 0.135602767084 absolute error = 2.094 relative error = 122.2 % Correct digits = 0 NO POLE (given) for Equation 1 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 1.607 2.234 h = 0.003 0.006 y[1] (numeric) = 1.70928619046 2.23399783263 y[1] (closed_form) = 1.70928623378 0.139602720684 absolute error = 2.094 relative error = 122.1 % Correct digits = 0 NO POLE (given) for Equation 1 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 1.61 2.24 h = 0.0001 0.005 y[1] (numeric) = 1.71228607646 2.2399978026 y[1] (closed_form) = 1.7122861206 0.145602691595 absolute error = 2.094 relative error = 121.9 % Correct digits = 0 NO POLE (given) for Equation 1 NO 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=3334.2MB, alloc=52.3MB, time=40.64 x[1] = 1.6101 2.245 h = 0.0001 0.003 y[1] (numeric) = 1.71238600883 2.2449977502 y[1] (closed_form) = 1.71238605253 0.150602638528 absolute error = 2.094 relative error = 121.8 % Correct digits = 0 NO POLE (given) for Equation 1 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 1.6102 2.248 h = 0.001 0.001 y[1] (numeric) = 1.71248596666 2.24799772016 y[1] (closed_form) = 1.71248601054 0.153602608241 absolute error = 2.094 relative error = 121.8 % Correct digits = 0 NO POLE (given) for Equation 1 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 1.6112 2.249 h = 0.001 0.003 y[1] (numeric) = 1.71348594254 2.24899772369 y[1] (closed_form) = 1.71348598646 0.154602611615 absolute error = 2.094 relative error = 121.7 % Correct digits = 0 NO POLE (given) for Equation 1 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 1.6122 2.252 h = 0.0001 0.004 y[1] (numeric) = 1.71448589121 2.25199770677 y[1] (closed_form) = 1.71448593504 0.157602595004 absolute error = 2.094 relative error = 121.6 % Correct digits = 0 NO POLE (given) for Equation 1 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 1.6123 2.256 h = 0.003 0.006 y[1] (numeric) = 1.71458583478 2.25599766889 y[1] (closed_form) = 1.71458587834 0.16160255719 absolute error = 2.094 relative error = 121.6 % Correct digits = 0 NO POLE (given) for Equation 1 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 1.6153 2.262 h = 0.0001 0.005 y[1] (numeric) = 1.71758572149 2.26199765459 y[1] (closed_form) = 1.71758576595 0.167602543686 absolute error = 2.094 relative error = 121.4 % Correct digits = 0 NO POLE (given) for Equation 1 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 1.6154 2.267 h = 0.0001 0.003 y[1] (numeric) = 1.71768564986 2.26699761289 y[1] (closed_form) = 1.71768569382 0.172602501406 absolute error = 2.094 relative error = 121.3 % Correct digits = 0 NO POLE (given) for Equation 1 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 1.6155 2.27 h = 0.001 0.001 y[1] (numeric) = 1.71778560553 2.26999758942 y[1] (closed_form) = 1.71778564963 0.175602477676 absolute error = 2.094 relative error = 121.3 % Correct digits = 0 NO POLE (given) for Equation 1 NO 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=3378.9MB, alloc=52.3MB, time=41.18 x[1] = 1.6165 2.271 h = 0.001 0.003 y[1] (numeric) = 1.71878558282 2.27099759589 y[1] (closed_form) = 1.71878562694 0.176602483986 absolute error = 2.094 relative error = 121.2 % Correct digits = 0 NO POLE (given) for Equation 1 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 1.6175 2.274 h = 0.0001 0.004 y[1] (numeric) = 1.71978553138 2.27399758619 y[1] (closed_form) = 1.71978557544 0.179602474591 absolute error = 2.094 relative error = 121.1 % Correct digits = 0 NO POLE (given) for Equation 1 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 1.6176 2.278 h = 0.003 0.006 y[1] (numeric) = 1.71988547235 2.277997557 y[1] (closed_form) = 1.71988551617 0.183602445509 absolute error = 2.094 relative error = 121.1 % Correct digits = 0 NO POLE (given) for Equation 1 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 1.6206 2.284 h = 0.0001 0.005 y[1] (numeric) = 1.72288536174 2.28399755772 y[1] (closed_form) = 1.72288540652 0.189602446871 absolute error = 2.094 relative error = 120.8 % Correct digits = 0 NO POLE (given) for Equation 1 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 1.6207 2.289 h = 0.0001 0.003 y[1] (numeric) = 1.72298528764 2.28899752681 y[1] (closed_form) = 1.72298533187 0.194602415467 absolute error = 2.094 relative error = 120.8 % Correct digits = 0 NO POLE (given) for Equation 1 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 1.6208 2.292 h = 0.001 0.001 y[1] (numeric) = 1.72308524208 2.29199750992 y[1] (closed_form) = 1.72308528641 0.197602398313 absolute error = 2.094 relative error = 120.8 % Correct digits = 0 NO POLE (given) for Equation 1 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 1.6218 2.293 h = 0.001 0.003 y[1] (numeric) = 1.7240852211 2.29299751903 y[1] (closed_form) = 1.72408526543 0.198602407265 absolute error = 2.094 relative error = 120.7 % Correct digits = 0 NO POLE (given) for Equation 1 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 1.6228 2.296 h = 0.0001 0.004 y[1] (numeric) = 1.72508517046 2.29599751627 y[1] (closed_form) = 1.72508521478 0.20160240481 absolute error = 2.094 relative error = 120.6 % Correct digits = 0 memory used=3423.8MB, alloc=52.3MB, time=41.73 NO POLE (given) for Equation 1 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 1.6229 2.3 h = 0.003 0.006 y[1] (numeric) = 1.72518511006 2.29999749577 y[1] (closed_form) = 1.72518515415 0.205602384439 absolute error = 2.094 relative error = 120.5 % Correct digits = 0 NO POLE (given) for Equation 1 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 1.6259 2.306 h = 0.0001 0.005 y[1] (numeric) = 1.72818500394 2.30599751056 y[1] (closed_form) = 1.72818504904 0.211602399726 absolute error = 2.094 relative error = 120.3 % Correct digits = 0 NO POLE (given) for Equation 1 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 1.626 2.311 h = 0.0001 0.003 y[1] (numeric) = 1.72828492884 2.31099749032 y[1] (closed_form) = 1.72828497334 0.216602379088 absolute error = 2.094 relative error = 120.2 % Correct digits = 0 NO POLE (given) for Equation 1 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 1.6261 2.314 h = 0.001 0.001 y[1] (numeric) = 1.72838488294 2.31399747992 y[1] (closed_form) = 1.72838492751 0.219602368411 absolute error = 2.094 relative error = 120.2 % Correct digits = 0 NO POLE (given) for Equation 1 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 1.6271 2.315 h = 0.001 0.003 y[1] (numeric) = 1.72938486394 2.31499749134 y[1] (closed_form) = 1.7293849085 0.220602379684 absolute error = 2.094 relative error = 120.1 % Correct digits = 0 NO POLE (given) for Equation 1 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 1.6281 2.318 h = 0.0001 0.004 y[1] (numeric) = 1.73038481497 2.31799749515 y[1] (closed_form) = 1.73038485954 0.223602383784 absolute error = 2.094 relative error = 120 % Correct digits = 0 NO POLE (given) for Equation 1 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 1.6282 2.322 h = 0.003 0.006 y[1] (numeric) = 1.73048475436 2.32199748316 y[1] (closed_form) = 1.73048479873 0.227602371951 absolute error = 2.094 relative error = 120 % Correct digits = 0 NO POLE (given) for Equation 1 NO 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=3468.4MB, alloc=52.3MB, time=42.27 x[1] = 1.6312 2.328 h = 0.0001 0.005 y[1] (numeric) = 1.73348465433 2.3279975109 y[1] (closed_form) = 1.73348469974 0.233602400034 absolute error = 2.094 relative error = 119.7 % Correct digits = 0 NO POLE (given) for Equation 1 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 1.6313 2.333 h = 0.0001 0.003 y[1] (numeric) = 1.73358457964 2.33299750104 y[1] (closed_form) = 1.73358462442 0.238602389866 absolute error = 2.094 relative error = 119.7 % Correct digits = 0 NO POLE (given) for Equation 1 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 1.6314 2.336 h = 0.001 0.001 y[1] (numeric) = 1.73368453423 2.3359974969 y[1] (closed_form) = 1.73368457904 0.241602385458 absolute error = 2.094 relative error = 119.6 % Correct digits = 0 NO POLE (given) for Equation 1 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 1.6324 2.337 h = 0.0001 0.004 y[1] (numeric) = 1.73468451745 2.33699751029 y[1] (closed_form) = 1.73468456223 0.242602398706 absolute error = 2.094 relative error = 119.6 % Correct digits = 0 NO POLE (given) for Equation 1 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 1.6325 2.341 h = 0.003 0.006 y[1] (numeric) = 1.73478445747 2.34099750504 y[1] (closed_form) = 1.73478450204 0.246602393991 absolute error = 2.094 relative error = 119.5 % Correct digits = 0 NO POLE (given) for Equation 1 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 1.6355 2.347 h = 0.0001 0.005 y[1] (numeric) = 1.7377843637 2.34699754298 y[1] (closed_form) = 1.73778440931 0.252602432154 absolute error = 2.094 relative error = 119.3 % Correct digits = 0 NO POLE (given) for Equation 1 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 1.6356 2.352 h = 0.0001 0.003 y[1] (numeric) = 1.73788429028 2.35199754172 y[1] (closed_form) = 1.73788433525 0.25760243066 absolute error = 2.094 relative error = 119.2 % Correct digits = 0 NO POLE (given) for Equation 1 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 1.6357 2.355 h = 0.001 0.001 y[1] (numeric) = 1.73798424587 2.35499754275 y[1] (closed_form) = 1.73798429083 0.260602431422 absolute error = 2.094 relative error = 119.2 % Correct digits = 0 NO POLE (given) for Equation 1 NO 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=3512.9MB, alloc=52.3MB, time=42.81 x[1] = 1.6367 2.356 h = 0.001 0.003 y[1] (numeric) = 1.7389842311 2.35599755757 y[1] (closed_form) = 1.73898427602 0.261602446113 absolute error = 2.094 relative error = 119.1 % Correct digits = 0 NO POLE (given) for Equation 1 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 1.6377 2.359 h = 0.0001 0.004 y[1] (numeric) = 1.73998418713 2.35899757231 y[1] (closed_form) = 1.73998423214 0.264602461121 absolute error = 2.094 relative error = 119 % Correct digits = 0 NO POLE (given) for Equation 1 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 1.6378 2.363 h = 0.003 0.006 y[1] (numeric) = 1.74008412888 2.36299757527 y[1] (closed_form) = 1.74008417374 0.268602464267 absolute error = 2.094 relative error = 119 % Correct digits = 0 NO POLE (given) for Equation 1 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 1.6408 2.369 h = 0.0001 0.005 y[1] (numeric) = 1.74308404367 2.36899762366 y[1] (closed_form) = 1.74308408956 0.274602512738 absolute error = 2.094 relative error = 118.7 % Correct digits = 0 NO POLE (given) for Equation 1 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 1.6409 2.374 h = 0.0001 0.003 y[1] (numeric) = 1.74318397301 2.37399763181 y[1] (closed_form) = 1.74318401826 0.279602520744 absolute error = 2.094 relative error = 118.6 % Correct digits = 0 NO POLE (given) for Equation 1 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 1.641 2.377 h = 0.001 0.001 y[1] (numeric) = 1.74328393049 2.37699763846 y[1] (closed_form) = 1.7432839757 0.282602527139 absolute error = 2.094 relative error = 118.6 % Correct digits = 0 NO POLE (given) for Equation 1 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 1.642 2.378 h = 0.001 0.003 y[1] (numeric) = 1.7442839182 2.37799765457 y[1] (closed_form) = 1.74428396334 0.283602543136 absolute error = 2.094 relative error = 118.5 % Correct digits = 0 NO POLE (given) for Equation 1 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 1.643 2.381 h = 0.0001 0.004 y[1] (numeric) = 1.74528387786 2.38099767434 y[1] (closed_form) = 1.74528392312 0.286602563142 absolute error = 2.094 relative error = 118.4 % Correct digits = 0 NO POLE (given) for Equation 1 NO 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=3557.6MB, alloc=52.3MB, time=43.36 x[1] = 1.6431 2.385 h = 0.003 0.006 y[1] (numeric) = 1.7453838223 2.38499768461 y[1] (closed_form) = 1.74538386744 0.290602573609 absolute error = 2.094 relative error = 118.4 % Correct digits = 0 NO POLE (given) for Equation 1 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 1.6461 2.391 h = 0.0001 0.005 y[1] (numeric) = 1.74838374665 2.39099774194 y[1] (closed_form) = 1.74838379279 0.296602630887 absolute error = 2.094 relative error = 118.1 % Correct digits = 0 NO POLE (given) for Equation 1 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 1.6462 2.396 h = 0.0001 0.003 y[1] (numeric) = 1.74848367984 2.39599775877 y[1] (closed_form) = 1.74848372534 0.301602647666 absolute error = 2.094 relative error = 118 % Correct digits = 0 NO POLE (given) for Equation 1 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 1.6463 2.399 h = 0.001 0.001 y[1] (numeric) = 1.74858363985 2.39899777058 y[1] (closed_form) = 1.74858368528 0.304602659234 absolute error = 2.094 relative error = 118 % Correct digits = 0 NO POLE (given) for Equation 1 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 1.6473 2.4 h = 0.001 0.003 y[1] (numeric) = 1.7495836301 2.39999778762 y[1] (closed_form) = 1.74958367546 0.30560267617 absolute error = 2.094 relative error = 117.9 % Correct digits = 0 NO POLE (given) for Equation 1 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 1.6483 2.403 h = 0.0001 0.004 y[1] (numeric) = 1.75058359389 2.40299781174 y[1] (closed_form) = 1.75058363939 0.30860270051 absolute error = 2.094 relative error = 117.8 % Correct digits = 0 NO POLE (given) for Equation 1 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 1.6484 2.407 h = 0.003 0.006 y[1] (numeric) = 1.75068354184 2.40699782869 y[1] (closed_form) = 1.75068358726 0.312602717659 absolute error = 2.094 relative error = 117.8 % Correct digits = 0 NO POLE (given) for Equation 1 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 1.6514 2.413 h = 0.0001 0.005 y[1] (numeric) = 1.7536834765 2.41299789339 y[1] (closed_form) = 1.75368352287 0.318602782181 absolute error = 2.094 relative error = 117.5 % Correct digits = 0 NO POLE (given) for Equation 1 NO 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=3602.4MB, alloc=52.3MB, time=43.90 x[1] = 1.6515 2.418 h = 0.0001 0.003 y[1] (numeric) = 1.75378341449 2.41799791807 y[1] (closed_form) = 1.75378346024 0.323602806892 absolute error = 2.094 relative error = 117.4 % Correct digits = 0 NO POLE (given) for Equation 1 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 1.6516 2.421 h = 0.001 0.001 y[1] (numeric) = 1.7538833776 2.4209979345 y[1] (closed_form) = 1.75388342325 0.326602823107 absolute error = 2.094 relative error = 117.4 % Correct digits = 0 NO POLE (given) for Equation 1 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 1.6526 2.422 h = 0.001 0.003 y[1] (numeric) = 1.75488337041 2.42199795211 y[1] (closed_form) = 1.75488341598 0.327602840623 absolute error = 2.094 relative error = 117.3 % Correct digits = 0 NO POLE (given) for Equation 1 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 1.6536 2.425 h = 0.0001 0.004 y[1] (numeric) = 1.75588333871 2.42499797989 y[1] (closed_form) = 1.75588338444 0.330602868595 absolute error = 2.094 relative error = 117.2 % Correct digits = 0 NO POLE (given) for Equation 1 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 1.6537 2.429 h = 0.003 0.006 y[1] (numeric) = 1.75598329089 2.4289980028 y[1] (closed_form) = 1.75598333657 0.33460289171 absolute error = 2.094 relative error = 117.2 % Correct digits = 0 NO POLE (given) for Equation 1 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 1.6567 2.435 h = 0.0001 0.005 y[1] (numeric) = 1.7589832364 2.43499807326 y[1] (closed_form) = 1.75898328296 0.340602961878 absolute error = 2.094 relative error = 116.9 % Correct digits = 0 NO POLE (given) for Equation 1 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 1.6568 2.44 h = 0.0001 0.003 y[1] (numeric) = 1.75908318 2.43999810487 y[1] (closed_form) = 1.75908322597 0.345602993593 absolute error = 2.094 relative error = 116.8 % Correct digits = 0 NO POLE (given) for Equation 1 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 1.6569 2.443 h = 0.001 0.001 y[1] (numeric) = 1.75918314667 2.44299812535 y[1] (closed_form) = 1.75918319252 0.34860301388 absolute error = 2.094 relative error = 116.8 % Correct digits = 0 NO POLE (given) for Equation 1 NO 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=3647.2MB, alloc=52.3MB, time=44.45 x[1] = 1.6579 2.444 h = 0.0001 0.004 y[1] (numeric) = 1.76018314201 2.44399814318 y[1] (closed_form) = 1.76018318777 0.349603031627 absolute error = 2.094 relative error = 116.7 % Correct digits = 0 NO POLE (given) for Equation 1 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 1.658 2.448 h = 0.003 0.006 y[1] (numeric) = 1.76028309809 2.4479981704 y[1] (closed_form) = 1.76028314398 0.353603059314 absolute error = 2.094 relative error = 116.7 % Correct digits = 0 NO POLE (given) for Equation 1 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 1.661 2.454 h = 0.0001 0.005 y[1] (numeric) = 1.76328305314 2.45399824466 y[1] (closed_form) = 1.76328309986 0.359603133194 absolute error = 2.094 relative error = 116.4 % Correct digits = 0 NO POLE (given) for Equation 1 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 1.6611 2.459 h = 0.0001 0.003 y[1] (numeric) = 1.76338300204 2.45899828151 y[1] (closed_form) = 1.76338304819 0.364603170218 absolute error = 2.094 relative error = 116.3 % Correct digits = 0 NO POLE (given) for Equation 1 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 1.6612 2.462 h = 0.001 0.001 y[1] (numeric) = 1.76348297204 2.46199830504 y[1] (closed_form) = 1.76348301806 0.367603193568 absolute error = 2.094 relative error = 116.3 % Correct digits = 0 NO POLE (given) for Equation 1 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 1.6622 2.463 h = 0.001 0.003 y[1] (numeric) = 1.7644829695 2.46299832281 y[1] (closed_form) = 1.76448301542 0.368603211278 absolute error = 2.094 relative error = 116.2 % Correct digits = 0 NO POLE (given) for Equation 1 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 1.6632 2.466 h = 0.0001 0.004 y[1] (numeric) = 1.76548294686 2.46599835554 y[1] (closed_form) = 1.76548299298 0.371603244139 absolute error = 2.094 relative error = 116.1 % Correct digits = 0 NO POLE (given) for Equation 1 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 1.6633 2.47 h = 0.003 0.006 y[1] (numeric) = 1.76558290835 2.46999838751 y[1] (closed_form) = 1.76558295446 0.37560327631 absolute error = 2.094 relative error = 116 % Correct digits = 0 memory used=3692.0MB, alloc=52.3MB, time=44.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] = 1.6663 2.476 h = 0.0001 0.005 y[1] (numeric) = 1.76858287465 2.47599846455 y[1] (closed_form) = 1.76858292151 0.38160335288 absolute error = 2.094 relative error = 115.8 % Correct digits = 0 NO POLE (given) for Equation 1 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 1.6664 2.481 h = 0.0001 0.003 y[1] (numeric) = 1.76868283028 2.48099850646 y[1] (closed_form) = 1.76868287662 0.38660339502 absolute error = 2.094 relative error = 115.7 % Correct digits = 0 NO POLE (given) for Equation 1 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 1.6665 2.484 h = 0.001 0.001 y[1] (numeric) = 1.76878280447 2.48399853288 y[1] (closed_form) = 1.76878285065 0.389603421285 absolute error = 2.094 relative error = 115.6 % Correct digits = 0 NO POLE (given) for Equation 1 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 1.6675 2.485 h = 0.001 0.003 y[1] (numeric) = 1.7697828043 2.48499855027 y[1] (closed_form) = 1.76978285038 0.390603438627 absolute error = 2.094 relative error = 115.6 % Correct digits = 0 NO POLE (given) for Equation 1 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 1.6685 2.488 h = 0.0001 0.004 y[1] (numeric) = 1.77078278673 2.48799858458 y[1] (closed_form) = 1.77078283302 0.393603473045 absolute error = 2.094 relative error = 115.5 % Correct digits = 0 NO POLE (given) for Equation 1 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 1.6686 2.492 h = 0.003 0.006 y[1] (numeric) = 1.77088275383 2.49199862019 y[1] (closed_form) = 1.77088280013 0.397603508848 absolute error = 2.094 relative error = 115.4 % Correct digits = 0 NO POLE (given) for Equation 1 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 1.6716 2.498 h = 0.0001 0.005 y[1] (numeric) = 1.77388273129 2.49799869847 y[1] (closed_form) = 1.77388277826 0.403603586577 absolute error = 2.094 relative error = 115.1 % Correct digits = 0 NO POLE (given) for Equation 1 NO 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=3736.7MB, alloc=52.3MB, time=45.54 x[1] = 1.6717 2.503 h = 0.0001 0.003 y[1] (numeric) = 1.77398269402 2.50299874436 y[1] (closed_form) = 1.77398274052 0.408603632766 absolute error = 2.094 relative error = 115 % Correct digits = 0 NO POLE (given) for Equation 1 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 1.6718 2.506 h = 0.001 0.001 y[1] (numeric) = 1.77408267261 2.50599877303 y[1] (closed_form) = 1.77408271894 0.411603661299 absolute error = 2.094 relative error = 115 % Correct digits = 0 NO POLE (given) for Equation 1 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 1.6728 2.507 h = 0.001 0.003 y[1] (numeric) = 1.77508267467 2.50699878975 y[1] (closed_form) = 1.77508272089 0.412603677986 absolute error = 2.094 relative error = 114.9 % Correct digits = 0 NO POLE (given) for Equation 1 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 1.6738 2.51 h = 0.0001 0.004 y[1] (numeric) = 1.77608266217 2.50999882494 y[1] (closed_form) = 1.7760827086 0.415603713251 absolute error = 2.094 relative error = 114.8 % Correct digits = 0 NO POLE (given) for Equation 1 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 1.6739 2.514 h = 0.003 0.006 y[1] (numeric) = 1.77618263511 2.51399886333 y[1] (closed_form) = 1.77618268159 0.419603751825 absolute error = 2.094 relative error = 114.8 % Correct digits = 0 NO POLE (given) for Equation 1 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 1.6769 2.52 h = 0.0001 0.005 y[1] (numeric) = 1.77918262345 2.51999894137 y[1] (closed_form) = 1.77918267049 0.425603829256 absolute error = 2.094 relative error = 114.5 % Correct digits = 0 NO POLE (given) for Equation 1 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 1.677 2.525 h = 0.0001 0.003 y[1] (numeric) = 1.77928259351 2.52499899019 y[1] (closed_form) = 1.77928264014 0.430603878421 absolute error = 2.094 relative error = 114.4 % Correct digits = 0 NO POLE (given) for Equation 1 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 1.6771 2.528 h = 0.001 0.001 y[1] (numeric) = 1.7793825766 2.52799902045 y[1] (closed_form) = 1.77938262305 0.433603908572 absolute error = 2.094 relative error = 114.4 % Correct digits = 0 NO POLE (given) for Equation 1 NO 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=3781.5MB, alloc=52.3MB, time=46.08 x[1] = 1.6781 2.529 h = 0.001 0.003 y[1] (numeric) = 1.78038258071 2.52899903624 y[1] (closed_form) = 1.78038262706 0.434603924347 absolute error = 2.094 relative error = 114.3 % Correct digits = 0 NO POLE (given) for Equation 1 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 1.6791 2.532 h = 0.0001 0.004 y[1] (numeric) = 1.7813825732 2.53199907162 y[1] (closed_form) = 1.78138261976 0.437603959777 absolute error = 2.094 relative error = 114.2 % Correct digits = 0 NO POLE (given) for Equation 1 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 1.6792 2.536 h = 0.003 0.006 y[1] (numeric) = 1.78148255211 2.53599911194 y[1] (closed_form) = 1.78148259873 0.441604000263 absolute error = 2.094 relative error = 114.1 % Correct digits = 0 NO POLE (given) for Equation 1 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 1.6822 2.542 h = 0.0001 0.005 y[1] (numeric) = 1.78448255086 2.54199918837 y[1] (closed_form) = 1.78448259794 0.447604076033 absolute error = 2.094 relative error = 113.8 % Correct digits = 0 NO POLE (given) for Equation 1 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 1.6823 2.547 h = 0.0001 0.003 y[1] (numeric) = 1.78458252834 2.54699923907 y[1] (closed_form) = 1.78458257507 0.452604127114 absolute error = 2.094 relative error = 113.8 % Correct digits = 0 NO POLE (given) for Equation 1 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 1.6824 2.55 h = 0.001 0.001 y[1] (numeric) = 1.78468251596 2.54999927028 y[1] (closed_form) = 1.78468256251 0.455604158246 absolute error = 2.094 relative error = 113.7 % Correct digits = 0 NO POLE (given) for Equation 1 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 1.6834 2.551 h = 0.0001 0.004 y[1] (numeric) = 1.78568252192 2.55099928492 y[1] (closed_form) = 1.78568256836 0.456604172885 absolute error = 2.094 relative error = 113.6 % Correct digits = 0 NO POLE (given) for Equation 1 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 1.6835 2.555 h = 0.003 0.006 y[1] (numeric) = 1.78578250572 2.55499932619 y[1] (closed_form) = 1.78578255249 0.460604214414 absolute error = 2.094 relative error = 113.6 % Correct digits = 0 NO POLE (given) for Equation 1 NO 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=3826.2MB, alloc=52.3MB, time=46.63 x[1] = 1.6865 2.561 h = 0.0001 0.005 y[1] (numeric) = 1.78878251298 2.56099940033 y[1] (closed_form) = 1.78878256013 0.466604287862 absolute error = 2.094 relative error = 113.3 % Correct digits = 0 NO POLE (given) for Equation 1 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 1.6866 2.566 h = 0.0001 0.003 y[1] (numeric) = 1.7888824968 2.56599945192 y[1] (closed_form) = 1.78888254365 0.471604339854 absolute error = 2.094 relative error = 113.2 % Correct digits = 0 NO POLE (given) for Equation 1 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 1.6867 2.569 h = 0.001 0.001 y[1] (numeric) = 1.78898248827 2.56899948351 y[1] (closed_form) = 1.78898253494 0.47460437139 absolute error = 2.094 relative error = 113.2 % Correct digits = 0 NO POLE (given) for Equation 1 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 1.6877 2.57 h = 0.001 0.003 y[1] (numeric) = 1.78998249566 2.56999949702 y[1] (closed_form) = 1.78998254223 0.475604384914 absolute error = 2.094 relative error = 113.1 % Correct digits = 0 NO POLE (given) for Equation 1 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 1.6887 2.573 h = 0.0001 0.004 y[1] (numeric) = 1.79098249692 2.57299953115 y[1] (closed_form) = 1.79098254369 0.478604419032 absolute error = 2.094 relative error = 113 % Correct digits = 0 NO POLE (given) for Equation 1 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 1.6888 2.577 h = 0.003 0.006 y[1] (numeric) = 1.79108248688 2.57699957291 y[1] (closed_form) = 1.79108253374 0.482604460935 absolute error = 2.094 relative error = 112.9 % Correct digits = 0 NO POLE (given) for Equation 1 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 1.6918 2.583 h = 0.0001 0.005 y[1] (numeric) = 1.79408250331 2.58299964317 y[1] (closed_form) = 1.79408255044 0.488604530491 absolute error = 2.094 relative error = 112.6 % Correct digits = 0 NO POLE (given) for Equation 1 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 1.6919 2.588 h = 0.0001 0.003 y[1] (numeric) = 1.79418249434 2.58799969478 y[1] (closed_form) = 1.79418254125 0.493604582519 absolute error = 2.094 relative error = 112.6 % Correct digits = 0 NO POLE (given) for Equation 1 NO 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=3870.8MB, alloc=52.3MB, time=47.17 x[1] = 1.692 2.591 h = 0.001 0.001 y[1] (numeric) = 1.79428249018 2.5909997262 y[1] (closed_form) = 1.7942825369 0.496604613913 absolute error = 2.094 relative error = 112.5 % Correct digits = 0 NO POLE (given) for Equation 1 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 1.693 2.592 h = 0.001 0.003 y[1] (numeric) = 1.795282499 2.59199973823 y[1] (closed_form) = 1.79528254562 0.49760462597 absolute error = 2.094 relative error = 112.4 % Correct digits = 0 NO POLE (given) for Equation 1 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 1.694 2.595 h = 0.0001 0.004 y[1] (numeric) = 1.79628250456 2.59499977084 y[1] (closed_form) = 1.79628255138 0.500604658546 absolute error = 2.094 relative error = 112.3 % Correct digits = 0 NO POLE (given) for Equation 1 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 1.6941 2.599 h = 0.003 0.006 y[1] (numeric) = 1.79638250024 2.59899981222 y[1] (closed_form) = 1.79638254717 0.504604700052 absolute error = 2.094 relative error = 112.2 % Correct digits = 0 NO POLE (given) for Equation 1 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 1.6971 2.605 h = 0.0001 0.005 y[1] (numeric) = 1.79938252497 2.6049998776 y[1] (closed_form) = 1.79938257207 0.510604764716 absolute error = 2.094 relative error = 112 % Correct digits = 0 NO POLE (given) for Equation 1 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 1.6972 2.61 h = 0.0001 0.003 y[1] (numeric) = 1.79948252294 2.6099999283 y[1] (closed_form) = 1.79948256988 0.515604815849 absolute error = 2.094 relative error = 111.9 % Correct digits = 0 NO POLE (given) for Equation 1 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 1.6973 2.613 h = 0.001 0.001 y[1] (numeric) = 1.79958252295 2.612999959 y[1] (closed_form) = 1.7995825697 0.518604846551 absolute error = 2.094 relative error = 111.8 % Correct digits = 0 NO POLE (given) for Equation 1 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 1.6983 2.614 h = 0.001 0.003 y[1] (numeric) = 1.80058253296 2.61399996943 y[1] (closed_form) = 1.80058257962 0.519604857016 absolute error = 2.094 relative error = 111.8 % Correct digits = 0 NO POLE (given) for Equation 1 NO 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=3915.5MB, alloc=52.3MB, time=47.72 x[1] = 1.6993 2.617 h = 0.0001 0.004 y[1] (numeric) = 1.80158254245 2.61700000004 y[1] (closed_form) = 1.8015825893 0.522604887565 absolute error = 2.094 relative error = 111.7 % Correct digits = 0 NO POLE (given) for Equation 1 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 1.6994 2.621 h = 0.003 0.006 y[1] (numeric) = 1.80168254358 2.62100004033 y[1] (closed_form) = 1.80168259055 0.526604927959 absolute error = 2.094 relative error = 111.6 % Correct digits = 0 NO POLE (given) for Equation 1 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 1.7024 2.627 h = 0.0001 0.005 y[1] (numeric) = 1.80468257567 2.62700009996 y[1] (closed_form) = 1.80468262271 0.532604986878 absolute error = 2.094 relative error = 111.3 % Correct digits = 0 NO POLE (given) for Equation 1 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 1.7025 2.632 h = 0.0001 0.003 y[1] (numeric) = 1.80478258018 2.6320001489 y[1] (closed_form) = 1.80478262712 0.537605036261 absolute error = 2.094 relative error = 111.2 % Correct digits = 0 NO POLE (given) for Equation 1 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 1.7026 2.635 h = 0.001 0.001 y[1] (numeric) = 1.80488258411 2.63500017838 y[1] (closed_form) = 1.80488263087 0.540605065764 absolute error = 2.094 relative error = 111.2 % Correct digits = 0 NO POLE (given) for Equation 1 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 1.7036 2.636 h = 0.001 0.003 y[1] (numeric) = 1.80588259505 2.63600018712 y[1] (closed_form) = 1.80588264172 0.54160507455 absolute error = 2.094 relative error = 111.1 % Correct digits = 0 NO POLE (given) for Equation 1 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 1.7046 2.639 h = 0.0001 0.004 y[1] (numeric) = 1.80688260807 2.6390002153 y[1] (closed_form) = 1.80688265491 0.544605102651 absolute error = 2.094 relative error = 111 % Correct digits = 0 NO POLE (given) for Equation 1 NO 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=3960.2MB, alloc=52.3MB, time=48.26 x[1] = 1.7047 2.643 h = 0.003 0.006 y[1] (numeric) = 1.80698261429 2.64300025385 y[1] (closed_form) = 1.80698266126 0.54860514128 absolute error = 2.094 relative error = 110.9 % Correct digits = 0 NO POLE (given) for Equation 1 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 1.7077 2.649 h = 0.0001 0.005 y[1] (numeric) = 1.8099826527 2.64900030701 y[1] (closed_form) = 1.80998269966 0.554605193759 absolute error = 2.094 relative error = 110.6 % Correct digits = 0 NO POLE (given) for Equation 1 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 1.7078 2.654 h = 0.0001 0.003 y[1] (numeric) = 1.81008266328 2.65400035344 y[1] (closed_form) = 1.81008271019 0.559605240617 absolute error = 2.094 relative error = 110.5 % Correct digits = 0 NO POLE (given) for Equation 1 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 1.7079 2.657 h = 0.001 0.001 y[1] (numeric) = 1.81018267081 2.65700038124 y[1] (closed_form) = 1.81018271755 0.562605268471 absolute error = 2.094 relative error = 110.5 % Correct digits = 0 NO POLE (given) for Equation 1 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 1.7089 2.658 h = 0.0001 0.004 y[1] (numeric) = 1.81118268242 2.65800038825 y[1] (closed_form) = 1.81118272909 0.563605275523 absolute error = 2.094 relative error = 110.4 % Correct digits = 0 NO POLE (given) for Equation 1 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 1.709 2.662 h = 0.003 0.006 y[1] (numeric) = 1.8112826925 2.66200042494 y[1] (closed_form) = 1.81128273953 0.567605312219 absolute error = 2.094 relative error = 110.3 % Correct digits = 0 NO POLE (given) for Equation 1 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 1.712 2.668 h = 0.0001 0.005 y[1] (numeric) = 1.81428273559 2.66800047215 y[1] (closed_form) = 1.81428278252 0.573605358773 absolute error = 2.094 relative error = 110.1 % Correct digits = 0 NO POLE (given) for Equation 1 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 1.7121 2.673 h = 0.0001 0.003 y[1] (numeric) = 1.81438275097 2.67300051593 y[1] (closed_form) = 1.81438279791 0.578605402974 absolute error = 2.094 relative error = 110 % Correct digits = 0 NO POLE (given) for Equation 1 NO 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=4004.9MB, alloc=52.3MB, time=48.80 x[1] = 1.7122 2.676 h = 0.001 0.001 y[1] (numeric) = 1.81448276134 2.67600054202 y[1] (closed_form) = 1.81448280812 0.581605429127 absolute error = 2.094 relative error = 109.9 % Correct digits = 0 NO POLE (given) for Equation 1 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 1.7132 2.677 h = 0.001 0.003 y[1] (numeric) = 1.81548277337 2.67700054751 y[1] (closed_form) = 1.81548282008 0.582605434675 absolute error = 2.094 relative error = 109.8 % Correct digits = 0 NO POLE (given) for Equation 1 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 1.7142 2.68 h = 0.0001 0.004 y[1] (numeric) = 1.81648279177 2.68000057032 y[1] (closed_form) = 1.81648283862 0.585605457373 absolute error = 2.094 relative error = 109.7 % Correct digits = 0 NO POLE (given) for Equation 1 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 1.7143 2.684 h = 0.003 0.006 y[1] (numeric) = 1.81658280633 2.68400060418 y[1] (closed_form) = 1.81658285332 0.589605491281 absolute error = 2.094 relative error = 109.7 % Correct digits = 0 NO POLE (given) for Equation 1 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 1.7173 2.69 h = 0.0001 0.005 y[1] (numeric) = 1.81958285372 2.69000064403 y[1] (closed_form) = 1.81958290053 0.595605530504 absolute error = 2.094 relative error = 109.4 % Correct digits = 0 NO POLE (given) for Equation 1 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 1.7174 2.695 h = 0.0001 0.003 y[1] (numeric) = 1.81968287408 2.6950006841 y[1] (closed_form) = 1.81968292095 0.600605570987 absolute error = 2.094 relative error = 109.3 % Correct digits = 0 NO POLE (given) for Equation 1 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 1.7175 2.698 h = 0.001 0.001 y[1] (numeric) = 1.81978288736 2.69800070783 y[1] (closed_form) = 1.81978293409 0.603605594798 absolute error = 2.094 relative error = 109.2 % Correct digits = 0 NO POLE (given) for Equation 1 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 1.7185 2.699 h = 0.001 0.003 y[1] (numeric) = 1.82078289961 2.69900071157 y[1] (closed_form) = 1.82078294628 0.604605598601 absolute error = 2.094 relative error = 109.2 % Correct digits = 0 NO POLE (given) for Equation 1 NO 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=4049.6MB, alloc=52.3MB, time=49.35 x[1] = 1.7195 2.702 h = 0.0001 0.004 y[1] (numeric) = 1.82178292019 2.70200073113 y[1] (closed_form) = 1.82178296698 0.607605618034 absolute error = 2.094 relative error = 109.1 % Correct digits = 0 NO POLE (given) for Equation 1 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 1.7196 2.706 h = 0.003 0.006 y[1] (numeric) = 1.82188293848 2.70600076179 y[1] (closed_form) = 1.82188298541 0.611605648721 absolute error = 2.094 relative error = 109 % Correct digits = 0 NO POLE (given) for Equation 1 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 1.7226 2.712 h = 0.0001 0.005 y[1] (numeric) = 1.82488298907 2.71200079401 y[1] (closed_form) = 1.82488303576 0.617605680366 absolute error = 2.094 relative error = 108.7 % Correct digits = 0 NO POLE (given) for Equation 1 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 1.7227 2.717 h = 0.0001 0.003 y[1] (numeric) = 1.82498301373 2.7170008299 y[1] (closed_form) = 1.82498306052 0.622605716638 absolute error = 2.094 relative error = 108.6 % Correct digits = 0 NO POLE (given) for Equation 1 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 1.7228 2.72 h = 0.001 0.001 y[1] (numeric) = 1.82508302951 2.72000085099 y[1] (closed_form) = 1.82508307618 0.625605737827 absolute error = 2.094 relative error = 108.6 % Correct digits = 0 NO POLE (given) for Equation 1 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 1.7238 2.721 h = 0.001 0.003 y[1] (numeric) = 1.82608304175 2.72100085302 y[1] (closed_form) = 1.82608308837 0.626605739925 absolute error = 2.094 relative error = 108.5 % Correct digits = 0 NO POLE (given) for Equation 1 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 1.7248 2.724 h = 0.0001 0.004 y[1] (numeric) = 1.827083064 2.72400086918 y[1] (closed_form) = 1.82708311072 0.629605755947 absolute error = 2.094 relative error = 108.4 % Correct digits = 0 NO POLE (given) for Equation 1 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 1.7249 2.728 h = 0.003 0.006 y[1] (numeric) = 1.82718308548 2.72800089629 y[1] (closed_form) = 1.82718313234 0.633605783064 absolute error = 2.094 relative error = 108.3 % Correct digits = 0 NO POLE (given) for Equation 1 NO 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=4094.3MB, alloc=52.3MB, time=49.89 x[1] = 1.7279 2.734 h = 0.0001 0.005 y[1] (numeric) = 1.83018313817 2.73400092078 y[1] (closed_form) = 1.83018318472 0.639605807033 absolute error = 2.094 relative error = 108 % Correct digits = 0 NO POLE (given) for Equation 1 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 1.728 2.739 h = 0.0001 0.003 y[1] (numeric) = 1.83028316642 2.73900095209 y[1] (closed_form) = 1.83028321312 0.644605838707 absolute error = 2.094 relative error = 107.9 % Correct digits = 0 NO POLE (given) for Equation 1 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 1.7281 2.742 h = 0.001 0.001 y[1] (numeric) = 1.83038318427 2.74200097034 y[1] (closed_form) = 1.83038323086 0.647605857058 absolute error = 2.094 relative error = 107.9 % Correct digits = 0 NO POLE (given) for Equation 1 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 1.7291 2.743 h = 0.001 0.003 y[1] (numeric) = 1.83138319628 2.74300097073 y[1] (closed_form) = 1.83138324283 0.648605857518 absolute error = 2.094 relative error = 107.8 % Correct digits = 0 NO POLE (given) for Equation 1 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 1.7301 2.746 h = 0.0001 0.004 y[1] (numeric) = 1.83238321971 2.7460009834 y[1] (closed_form) = 1.83238326634 0.651605870055 absolute error = 2.094 relative error = 107.7 % Correct digits = 0 NO POLE (given) for Equation 1 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 1.7302 2.75 h = 0.003 0.006 y[1] (numeric) = 1.83248324379 2.7500010067 y[1] (closed_form) = 1.83248329055 0.655605893338 absolute error = 2.094 relative error = 107.6 % Correct digits = 0 NO POLE (given) for Equation 1 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 1.7332 2.756 h = 0.0001 0.005 y[1] (numeric) = 1.83548329751 2.7560010235 y[1] (closed_form) = 1.8354833439 0.661605909677 absolute error = 2.094 relative error = 107.3 % Correct digits = 0 NO POLE (given) for Equation 1 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 1.7333 2.761 h = 0.0001 0.003 y[1] (numeric) = 1.83558332863 2.76100104997 y[1] (closed_form) = 1.83558337522 0.666605936471 absolute error = 2.094 relative error = 107.2 % Correct digits = 0 NO POLE (given) for Equation 1 NO 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=4139.0MB, alloc=52.3MB, time=50.43 x[1] = 1.7334 2.764 h = 0.001 0.001 y[1] (numeric) = 1.8356833481 2.76400106521 y[1] (closed_form) = 1.83568339459 0.669605951832 absolute error = 2.094 relative error = 107.2 % Correct digits = 0 NO POLE (given) for Equation 1 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 1.7344 2.765 h = 0.0001 0.004 y[1] (numeric) = 1.83668335968 2.76500106406 y[1] (closed_form) = 1.83668340615 0.670605950746 absolute error = 2.094 relative error = 107.1 % Correct digits = 0 NO POLE (given) for Equation 1 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 1.7345 2.769 h = 0.003 0.006 y[1] (numeric) = 1.83678338546 2.76900108409 y[1] (closed_form) = 1.83678343218 0.674605970605 absolute error = 2.094 relative error = 107 % Correct digits = 0 NO POLE (given) for Equation 1 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 1.7375 2.775 h = 0.0001 0.005 y[1] (numeric) = 1.83978343933 2.77500109441 y[1] (closed_form) = 1.83978348564 0.680605980509 absolute error = 2.094 relative error = 106.8 % Correct digits = 0 NO POLE (given) for Equation 1 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 1.7376 2.78 h = 0.0001 0.003 y[1] (numeric) = 1.8398834724 2.78000111658 y[1] (closed_form) = 1.83988351893 0.68560600298 absolute error = 2.094 relative error = 106.7 % Correct digits = 0 NO POLE (given) for Equation 1 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 1.7377 2.783 h = 0.001 0.001 y[1] (numeric) = 1.83998349293 2.78300112919 y[1] (closed_form) = 1.83998353939 0.688606015705 absolute error = 2.094 relative error = 106.6 % Correct digits = 0 NO POLE (given) for Equation 1 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 1.7387 2.784 h = 0.001 0.003 y[1] (numeric) = 1.84098350402 2.78400112678 y[1] (closed_form) = 1.84098355046 0.689606013372 absolute error = 2.094 relative error = 106.5 % Correct digits = 0 NO POLE (given) for Equation 1 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 1.7397 2.787 h = 0.0001 0.004 y[1] (numeric) = 1.84198352838 2.787001133 y[1] (closed_form) = 1.84198357487 0.692606019448 absolute error = 2.094 relative error = 106.4 % Correct digits = 0 memory used=4183.8MB, alloc=52.3MB, time=50.98 NO POLE (given) for Equation 1 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 1.7398 2.791 h = 0.003 0.006 y[1] (numeric) = 1.84208355579 2.79100114879 y[1] (closed_form) = 1.84208360239 0.696606035199 absolute error = 2.094 relative error = 106.3 % Correct digits = 0 NO POLE (given) for Equation 1 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 1.7428 2.797 h = 0.0001 0.005 y[1] (numeric) = 1.84508360884 2.79700115183 y[1] (closed_form) = 1.845083655 0.702606037893 absolute error = 2.094 relative error = 106.1 % Correct digits = 0 NO POLE (given) for Equation 1 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 1.7429 2.802 h = 0.0001 0.003 y[1] (numeric) = 1.84518364342 2.80200116891 y[1] (closed_form) = 1.84518368983 0.707606055227 absolute error = 2.094 relative error = 106 % Correct digits = 0 NO POLE (given) for Equation 1 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 1.743 2.805 h = 0.001 0.001 y[1] (numeric) = 1.84528366474 2.80500117839 y[1] (closed_form) = 1.8452837111 0.710606064838 absolute error = 2.094 relative error = 105.9 % Correct digits = 0 NO POLE (given) for Equation 1 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 1.744 2.806 h = 0.001 0.003 y[1] (numeric) = 1.84628367508 2.80600117467 y[1] (closed_form) = 1.84628372143 0.711606061187 absolute error = 2.094 relative error = 105.8 % Correct digits = 0 NO POLE (given) for Equation 1 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 1.745 2.809 h = 0.0001 0.004 y[1] (numeric) = 1.84728369927 2.80900117754 y[1] (closed_form) = 1.84728374564 0.71460606391 absolute error = 2.094 relative error = 105.7 % Correct digits = 0 NO POLE (given) for Equation 1 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 1.7451 2.813 h = 0.003 0.006 y[1] (numeric) = 1.8473837276 2.81300118921 y[1] (closed_form) = 1.84738377408 0.718606075526 absolute error = 2.094 relative error = 105.7 % Correct digits = 0 NO POLE (given) for Equation 1 NO 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=4228.5MB, alloc=52.3MB, time=51.52 x[1] = 1.7481 2.819 h = 0.0001 0.005 y[1] (numeric) = 1.85038377893 2.81900118536 y[1] (closed_form) = 1.85038382494 0.724606071405 absolute error = 2.094 relative error = 105.4 % Correct digits = 0 NO POLE (given) for Equation 1 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 1.7482 2.824 h = 0.0001 0.003 y[1] (numeric) = 1.85048381432 2.82400119735 y[1] (closed_form) = 1.8504838606 0.72960608361 absolute error = 2.094 relative error = 105.3 % Correct digits = 0 NO POLE (given) for Equation 1 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 1.7483 2.827 h = 0.001 0.001 y[1] (numeric) = 1.850583836 2.82700120374 y[1] (closed_form) = 1.85058388224 0.732606090127 absolute error = 2.094 relative error = 105.2 % Correct digits = 0 NO POLE (given) for Equation 1 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 1.7493 2.828 h = 0.001 0.003 y[1] (numeric) = 1.85158384546 2.82800119884 y[1] (closed_form) = 1.8515838917 0.733606085303 absolute error = 2.094 relative error = 105.2 % Correct digits = 0 NO POLE (given) for Equation 1 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 1.7503 2.831 h = 0.0001 0.004 y[1] (numeric) = 1.85258386905 2.83100119851 y[1] (closed_form) = 1.85258391529 0.736606084832 absolute error = 2.094 relative error = 105.1 % Correct digits = 0 NO POLE (given) for Equation 1 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 1.7504 2.835 h = 0.003 0.006 y[1] (numeric) = 1.85268389774 2.83500120611 y[1] (closed_form) = 1.85268394409 0.74060609236 absolute error = 2.094 relative error = 105 % Correct digits = 0 NO POLE (given) for Equation 1 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 1.7534 2.841 h = 0.0001 0.005 y[1] (numeric) = 1.85568394654 2.84100119587 y[1] (closed_form) = 1.8556839924 0.746606081919 absolute error = 2.094 relative error = 104.7 % Correct digits = 0 NO POLE (given) for Equation 1 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 1.7535 2.846 h = 0.0001 0.003 y[1] (numeric) = 1.85578398205 2.84600120287 y[1] (closed_form) = 1.8557840282 0.751606089092 absolute error = 2.094 relative error = 104.6 % Correct digits = 0 NO POLE (given) for Equation 1 NO 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=4273.1MB, alloc=52.3MB, time=52.06 x[1] = 1.7536 2.849 h = 0.001 0.001 y[1] (numeric) = 1.85588400369 2.84900120624 y[1] (closed_form) = 1.85588404982 0.754606092591 absolute error = 2.094 relative error = 104.5 % Correct digits = 0 NO POLE (given) for Equation 1 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 1.7546 2.85 h = 0.001 0.003 y[1] (numeric) = 1.85688401214 2.85000120034 y[1] (closed_form) = 1.85688405828 0.755606086753 absolute error = 2.094 relative error = 104.5 % Correct digits = 0 NO POLE (given) for Equation 1 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 1.7556 2.853 h = 0.0001 0.004 y[1] (numeric) = 1.85788403476 2.85300119701 y[1] (closed_form) = 1.85788408088 0.758606083292 absolute error = 2.094 relative error = 104.4 % Correct digits = 0 NO POLE (given) for Equation 1 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 1.7557 2.857 h = 0.003 0.006 y[1] (numeric) = 1.85798406328 2.85700120065 y[1] (closed_form) = 1.85798410949 0.762606086851 absolute error = 2.094 relative error = 104.3 % Correct digits = 0 NO POLE (given) for Equation 1 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 1.7587 2.863 h = 0.0001 0.005 y[1] (numeric) = 1.86098410883 2.86300118459 y[1] (closed_form) = 1.86098415455 0.768606070665 absolute error = 2.094 relative error = 104 % Correct digits = 0 NO POLE (given) for Equation 1 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 1.7588 2.868 h = 0.0001 0.003 y[1] (numeric) = 1.86108414383 2.86800118679 y[1] (closed_form) = 1.86108418984 0.773606072989 absolute error = 2.094 relative error = 103.9 % Correct digits = 0 NO POLE (given) for Equation 1 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 1.7589 2.871 h = 0.001 0.001 y[1] (numeric) = 1.86118416503 2.87100118727 y[1] (closed_form) = 1.86118421105 0.776606073592 absolute error = 2.094 relative error = 103.9 % Correct digits = 0 NO POLE (given) for Equation 1 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 1.7599 2.872 h = 0.001 0.003 y[1] (numeric) = 1.8621841724 2.87200118052 y[1] (closed_form) = 1.86218421843 0.777606066906 absolute error = 2.094 relative error = 103.8 % Correct digits = 0 NO POLE (given) for Equation 1 NO 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=4317.7MB, alloc=52.3MB, time=52.60 Finished! diff ( y , x , 1 ) = tanh ( 3.0 * x + 1.0 ) ; Iterations = 754 Total Elapsed Time = 52 Seconds Expected Time Remaining = 0 Seconds Optimized Time Remaining = 0 Seconds Expected Total Time = 52 Seconds > quit memory used=4321.2MB, alloc=52.3MB, time=52.65