|\^/| Maple 2016 (X86 64 LINUX) ._|\| |/|_. Copyright (c) Maplesoft, a division of Waterloo Maple Inc. 2016 \ MAPLE / All rights reserved. Maple is a trademark of <____ ____> Waterloo Maple Inc. | Type ? for help. #BEGIN OUTFILE1 # before write maple top matter # before write_ats library and user def block #BEGIN ATS LIBRARY BLOCK # Begin Function number 2 > omniout_str := proc(iolevel,str) > global glob_iolevel; > if (glob_iolevel >= iolevel) then # if number 1 > printf("%s\n",str); > fi;# end if 1; > end; omniout_str := proc(iolevel, str) global glob_iolevel; if iolevel <= glob_iolevel then printf("%s\n", str) end if end proc # End Function number 2 # Begin Function number 3 > omniout_str_noeol := proc(iolevel,str) > global glob_iolevel; > if (glob_iolevel >= iolevel) then # if number 1 > printf("%s",str); > fi;# end if 1; > end; omniout_str_noeol := proc(iolevel, str) global glob_iolevel; if iolevel <= glob_iolevel then printf("%s", str) end if end proc # End Function number 3 # Begin Function number 4 > omniout_labstr := proc(iolevel,label,str) > global glob_iolevel; > if (glob_iolevel >= iolevel) then # if number 1 > print(label,str); > fi;# end if 1; > end; omniout_labstr := proc(iolevel, label, str) global glob_iolevel; if iolevel <= glob_iolevel then print(label, str) end if end proc # End Function number 4 # Begin Function number 5 > omniout_float := proc(iolevel,prelabel,prelen,value,vallen,postlabel) > global glob_iolevel; > if (glob_iolevel >= iolevel) then # if number 1 > if vallen = 4 then > printf("%-30s = %-42.4g %s \n",prelabel,value, postlabel); > else > printf("%-30s = %-42.32g %s \n",prelabel,value, postlabel); > fi;# end if 1; > fi;# end if 0; > end; omniout_float := proc(iolevel, prelabel, prelen, value, vallen, postlabel) global glob_iolevel; if iolevel <= glob_iolevel then if vallen = 4 then printf("%-30s = %-42.4g %s \n", prelabel, value, postlabel) else printf("%-30s = %-42.32g %s \n", prelabel, value, postlabel) end if end if end proc # End Function number 5 # Begin Function number 6 > omniout_complex := proc(iolevel,prelabel,prelen,value,vallen,postlabel) > global glob_iolevel; > if (glob_iolevel >= iolevel) then # if number 0 > if vallen = 4 then > printf("%-30s = %-20.4g %-20g %s \n",prelabel,Re(value), Im(value), postlabel); > else > printf("%-30s = %-20.12g %-20.12g %s \n",prelabel,Re(value),Im(value), postlabel); > fi;# end if 0; > fi;# end if -1; > end; omniout_complex := proc(iolevel, prelabel, prelen, value, vallen, postlabel) global glob_iolevel; if iolevel <= glob_iolevel then if vallen = 4 then printf("%-30s = %-20.4g %-20g %s \n", prelabel, Re(value), Im(value), postlabel) else printf("%-30s = %-20.12g %-20.12g %s \n", prelabel, Re(value), Im(value), postlabel) end if end if end proc # End Function number 6 # Begin Function number 7 > omniout_int := proc(iolevel,prelabel,prelen,value,vallen,postlabel) > global glob_iolevel; > if (glob_iolevel >= iolevel) then # if number -1 > if vallen = 5 then # if number 0 > printf("%-30s = %-32d %s\n",prelabel,value, postlabel); > else > printf("%-30s = %-32d %s \n",prelabel,value, postlabel); > fi;# end if 0; > fi;# end if -1; > end; omniout_int := proc(iolevel, prelabel, prelen, value, vallen, postlabel) global glob_iolevel; if iolevel <= glob_iolevel then if vallen = 5 then printf("%-30s = %-32d %s\n", prelabel, value, postlabel) else printf("%-30s = %-32d %s \n", prelabel, value, postlabel) end if end if end proc # End Function number 7 # Begin Function number 8 > logitem_time := proc(fd,secs_in) > global glob_sec_in_day, glob_sec_in_hour, glob_sec_in_minute, glob_sec_in_year; > local days_int, hours_int,minutes_int, sec_int, sec_temp, years_int; > fprintf(fd,""); > if (secs_in >= 0) then # if number -1 > years_int := int_trunc(secs_in / glob_sec_in_year); > sec_temp := int_trunc(secs_in) mod int_trunc(glob_sec_in_year); > days_int := int_trunc(sec_temp / glob_sec_in_day) ; > sec_temp := sec_temp mod int_trunc(glob_sec_in_day) ; > hours_int := int_trunc(sec_temp / glob_sec_in_hour); > sec_temp := sec_temp mod int_trunc(glob_sec_in_hour); > minutes_int := int_trunc(sec_temp / glob_sec_in_minute); > sec_int := sec_temp mod int_trunc(glob_sec_in_minute); > if (years_int > 0) then # if number 0 > fprintf(fd,"%d Years %d Days %d Hours %d Minutes %d Seconds",years_int,days_int,hours_int,minutes_int,sec_int); > elif > (days_int > 0) then # if number 1 > fprintf(fd,"%d Days %d Hours %d Minutes %d Seconds",days_int,hours_int,minutes_int,sec_int); > elif > (hours_int > 0) then # if number 2 > fprintf(fd,"%d Hours %d Minutes %d Seconds",hours_int,minutes_int,sec_int); > elif > (minutes_int > 0) then # if number 3 > fprintf(fd,"%d Minutes %d Seconds",minutes_int,sec_int); > else > fprintf(fd,"%d Seconds",sec_int); > fi;# end if 3 > else > fprintf(fd," 0.0 Seconds"); > fi;# end if 2 > fprintf(fd,"\n"); > end; logitem_time := proc(fd, secs_in) local days_int, hours_int, minutes_int, sec_int, sec_temp, years_int; global glob_sec_in_day, glob_sec_in_hour, glob_sec_in_minute, glob_sec_in_year; fprintf(fd, ""); if 0 <= secs_in then years_int := int_trunc(secs_in/glob_sec_in_year); sec_temp := int_trunc(secs_in) mod int_trunc(glob_sec_in_year); days_int := int_trunc(sec_temp/glob_sec_in_day); sec_temp := sec_temp mod int_trunc(glob_sec_in_day); hours_int := int_trunc(sec_temp/glob_sec_in_hour); sec_temp := sec_temp mod int_trunc(glob_sec_in_hour); minutes_int := int_trunc(sec_temp/glob_sec_in_minute); sec_int := sec_temp mod int_trunc(glob_sec_in_minute); if 0 < years_int then fprintf(fd, "%d Years %d Days %d Hours %d Minutes %d Seconds", years_int, days_int, hours_int, minutes_int, sec_int) elif 0 < days_int then fprintf(fd, "%d Days %d Hours %d Minutes %d Seconds", days_int, hours_int, minutes_int, sec_int) elif 0 < hours_int then fprintf(fd, "%d Hours %d Minutes %d Seconds", hours_int, minutes_int, sec_int) elif 0 < minutes_int then fprintf(fd, "%d Minutes %d Seconds", minutes_int, sec_int) else fprintf(fd, "%d Seconds", sec_int) end if else fprintf(fd, " 0.0 Seconds") end if; fprintf(fd, "\n") end proc # End Function number 8 # Begin Function number 9 > omniout_timestr := proc(secs_in) > global glob_sec_in_day, glob_sec_in_hour, glob_sec_in_minute, glob_sec_in_year; > local days_int, hours_int,minutes_int, sec_int, sec_temp, years_int; > if (secs_in >= 0) then # if number 2 > years_int := int_trunc(secs_in / glob_sec_in_year); > sec_temp := (int_trunc(secs_in) mod int_trunc(glob_sec_in_year)); > days_int := int_trunc(sec_temp / glob_sec_in_day) ; > sec_temp := (sec_temp mod int_trunc(glob_sec_in_day)) ; > hours_int := int_trunc(sec_temp / glob_sec_in_hour); > sec_temp := (sec_temp mod int_trunc(glob_sec_in_hour)); > minutes_int := int_trunc(sec_temp / glob_sec_in_minute); > sec_int := (sec_temp mod int_trunc(glob_sec_in_minute)); > if (years_int > 0) then # if number 3 > printf(" = %d Years %d Days %d Hours %d Minutes %d Seconds\n",years_int,days_int,hours_int,minutes_int,sec_int); > elif > (days_int > 0) then # if number 4 > printf(" = %d Days %d Hours %d Minutes %d Seconds\n",days_int,hours_int,minutes_int,sec_int); > elif > (hours_int > 0) then # if number 5 > printf(" = %d Hours %d Minutes %d Seconds\n",hours_int,minutes_int,sec_int); > elif > (minutes_int > 0) then # if number 6 > printf(" = %d Minutes %d Seconds\n",minutes_int,sec_int); > else > printf(" = %d Seconds\n",sec_int); > fi;# end if 6 > else > printf(" 0.0 Seconds\n"); > fi;# end if 5 > end; omniout_timestr := proc(secs_in) local days_int, hours_int, minutes_int, sec_int, sec_temp, years_int; global glob_sec_in_day, glob_sec_in_hour, glob_sec_in_minute, glob_sec_in_year; if 0 <= secs_in then years_int := int_trunc(secs_in/glob_sec_in_year); sec_temp := int_trunc(secs_in) mod int_trunc(glob_sec_in_year); days_int := int_trunc(sec_temp/glob_sec_in_day); sec_temp := sec_temp mod int_trunc(glob_sec_in_day); hours_int := int_trunc(sec_temp/glob_sec_in_hour); sec_temp := sec_temp mod int_trunc(glob_sec_in_hour); minutes_int := int_trunc(sec_temp/glob_sec_in_minute); sec_int := sec_temp mod int_trunc(glob_sec_in_minute); if 0 < years_int then printf( " = %d Years %d Days %d Hours %d Minutes %d Seconds\n", years_int, days_int, hours_int, minutes_int, sec_int) elif 0 < days_int then printf( " = %d Days %d Hours %d Minutes %d Seconds\n", days_int, hours_int, minutes_int, sec_int) elif 0 < hours_int then printf( " = %d Hours %d Minutes %d Seconds\n", hours_int, minutes_int, sec_int) elif 0 < minutes_int then printf(" = %d Minutes %d Seconds\n", minutes_int, sec_int) else printf(" = %d Seconds\n", sec_int) end if else printf(" 0.0 Seconds\n") end if end proc # End Function number 9 # Begin Function number 10 > zero_ats_ar := proc(arr_a) > global ATS_MAX_TERMS; > local iii; > iii := 1; > while (iii <= ATS_MAX_TERMS) do # do number 1 > arr_a [iii] := glob__0; > iii := iii + 1; > od;# end do number 1 > end; zero_ats_ar := proc(arr_a) local iii; global ATS_MAX_TERMS; iii := 1; while iii <= ATS_MAX_TERMS do arr_a[iii] := glob__0; iii := iii + 1 end do end proc # End Function number 10 # Begin Function number 11 > ats := proc(mmm_ats,arr_a,arr_b,jjj_ats) > global ATS_MAX_TERMS; > local iii_ats, lll_ats,ma_ats, ret_ats; > ret_ats := glob__0; > if (jjj_ats <= mmm_ats) then # if number 5 > ma_ats := mmm_ats + 1; > iii_ats := jjj_ats; > while (iii_ats <= mmm_ats) do # do number 1 > lll_ats := ma_ats - iii_ats; > if ((lll_ats <= ATS_MAX_TERMS and (iii_ats <= ATS_MAX_TERMS) )) then # if number 6 > ret_ats := ret_ats + c(arr_a[iii_ats])*c(arr_b[lll_ats]); > fi;# end if 6; > iii_ats := iii_ats + 1; > od;# end do number 1 > fi;# end if 5; > ret_ats; > end; ats := proc(mmm_ats, arr_a, arr_b, jjj_ats) local iii_ats, lll_ats, ma_ats, ret_ats; global ATS_MAX_TERMS; ret_ats := glob__0; if jjj_ats <= mmm_ats then ma_ats := mmm_ats + 1; iii_ats := jjj_ats; while iii_ats <= mmm_ats do lll_ats := ma_ats - iii_ats; if lll_ats <= ATS_MAX_TERMS and iii_ats <= ATS_MAX_TERMS then ret_ats := ret_ats + c(arr_a[iii_ats])*c(arr_b[lll_ats]) end if; iii_ats := iii_ats + 1 end do end if; ret_ats end proc # End Function number 11 # Begin Function number 12 > att := proc(mmm_att,arr_aa,arr_bb,jjj_att) > global ATS_MAX_TERMS; > local al_att, iii_att,lll_att, ma_att, ret_att; > ret_att := glob__0; > if (jjj_att < mmm_att) then # if number 5 > ma_att := mmm_att + 2; > iii_att := jjj_att; > while ((iii_att < mmm_att) and (iii_att <= ATS_MAX_TERMS) ) do # do number 1 > lll_att := ma_att - iii_att; > al_att := (lll_att - 1); > if ((lll_att <= ATS_MAX_TERMS and (iii_att <= ATS_MAX_TERMS) )) then # if number 6 > ret_att := ret_att + c(arr_aa[iii_att])*c(arr_bb[lll_att])* c(al_att); > fi;# end if 6; > iii_att := iii_att + 1; > od;# end do number 1; > ret_att := ret_att / c(mmm_att) ; > fi;# end if 5; > ret_att; > end; att := proc(mmm_att, arr_aa, arr_bb, jjj_att) local al_att, iii_att, lll_att, ma_att, ret_att; global ATS_MAX_TERMS; ret_att := glob__0; if jjj_att < mmm_att then ma_att := mmm_att + 2; iii_att := jjj_att; while iii_att < mmm_att and iii_att <= ATS_MAX_TERMS do lll_att := ma_att - iii_att; al_att := lll_att - 1; if lll_att <= ATS_MAX_TERMS and iii_att <= ATS_MAX_TERMS then ret_att := ret_att + c(arr_aa[iii_att])*c(arr_bb[lll_att])*c(al_att) end if; iii_att := iii_att + 1 end do; ret_att := ret_att/c(mmm_att) end if; ret_att end proc # End Function number 12 # Begin Function number 13 > logditto := proc(file) > fprintf(file,""); > fprintf(file,"ditto"); > fprintf(file,""); > end; logditto := proc(file) fprintf(file, ""); fprintf(file, "ditto"); fprintf(file, "") end proc # End Function number 13 # Begin Function number 14 > logitem_integer := proc(file,n) > fprintf(file,""); > fprintf(file,"%d",n); > fprintf(file,""); > end; logitem_integer := proc(file, n) fprintf(file, ""); fprintf(file, "%d", n); fprintf(file, "") end proc # End Function number 14 # Begin Function number 15 > logitem_str := proc(file,str) > fprintf(file,""); > fprintf(file,str); > fprintf(file,""); > end; logitem_str := proc(file, str) fprintf(file, ""); fprintf(file, str); fprintf(file, "") end proc # End Function number 15 # Begin Function number 16 > logitem_good_digits := proc(file,rel_error) > global glob_small_float,glob_prec; > local good_digits; > fprintf(file,""); > fprintf(file,"%d",glob_min_good_digits); > fprintf(file,""); > end; logitem_good_digits := proc(file, rel_error) local good_digits; global glob_small_float, glob_prec; fprintf(file, ""); fprintf(file, "%d", glob_min_good_digits); fprintf(file, "") end proc # End Function number 16 # Begin Function number 17 > log_revs := proc(file,revs) > fprintf(file,revs); > end; log_revs := proc(file, revs) fprintf(file, revs) end proc # End Function number 17 # Begin Function number 18 > logitem_float := proc(file,x) > fprintf(file,""); > fprintf(file,"%g",x); > fprintf(file,""); > end; logitem_float := proc(file, x) fprintf(file, ""); fprintf(file, "%g", x); fprintf(file, "") end proc # End Function number 18 # Begin Function number 19 > logitem_complex := proc(file,x) > fprintf(file,""); > fprintf(file,"%g + %g I",Re(x),Im(x)); > fprintf(file,""); > end; logitem_complex := proc(file, x) fprintf(file, ""); fprintf(file, "%g + %g I", Re(x), Im(x)); fprintf(file, "") end proc # End Function number 19 # Begin Function number 20 > logitem_h_reason := proc(file) > global glob_h_reason; > fprintf(file,""); > if (glob_h_reason = 1) then # if number 5 > fprintf(file,"Max H"); > elif > (glob_h_reason = 2) then # if number 6 > fprintf(file,"Display Interval"); > elif > (glob_h_reason = 3) then # if number 7 > fprintf(file,"Optimal"); > elif > (glob_h_reason = 4) then # if number 8 > fprintf(file,"Pole Accuracy"); > elif > (glob_h_reason = 5) then # if number 9 > fprintf(file,"Min H (Pole)"); > elif > (glob_h_reason = 6) then # if number 10 > fprintf(file,"Pole"); > elif > (glob_h_reason = 7) then # if number 11 > fprintf(file,"Opt Iter"); > else > fprintf(file,"Impossible"); > fi;# end if 11 > fprintf(file,""); > end; logitem_h_reason := proc(file) global glob_h_reason; fprintf(file, ""); if glob_h_reason = 1 then fprintf(file, "Max H") elif glob_h_reason = 2 then fprintf(file, "Display Interval") elif glob_h_reason = 3 then fprintf(file, "Optimal") elif glob_h_reason = 4 then fprintf(file, "Pole Accuracy") elif glob_h_reason = 5 then fprintf(file, "Min H (Pole)") elif glob_h_reason = 6 then fprintf(file, "Pole") elif glob_h_reason = 7 then fprintf(file, "Opt Iter") else fprintf(file, "Impossible") end if; fprintf(file, "") end proc # End Function number 20 # Begin Function number 21 > logstart := proc(file) > fprintf(file,""); > end; logstart := proc(file) fprintf(file, "") end proc # End Function number 21 # Begin Function number 22 > logend := proc(file) > fprintf(file,"\n"); > end; logend := proc(file) fprintf(file, "\n") end proc # End Function number 22 # Begin Function number 23 > chk_data := proc() > global glob_max_iter,ALWAYS, ATS_MAX_TERMS; > local errflag; > errflag := false; > if (glob_max_iter < 2) then # if number 11 > omniout_str(ALWAYS,"Illegal max_iter"); > errflag := true; > fi;# end if 11; > if (errflag) then # if number 11 > quit; > fi;# end if 11 > end; chk_data := proc() local errflag; global glob_max_iter, ALWAYS, ATS_MAX_TERMS; errflag := false; if glob_max_iter < 2 then omniout_str(ALWAYS, "Illegal max_iter"); errflag := true end if; if errflag then quit end if end proc # End Function number 23 # Begin Function number 24 > comp_expect_sec := proc(t_end2,t_start2,t2,clock_sec2) > global glob_small_float; > local ms2, rrr, sec_left, sub1, sub2; > ; > ms2 := c(clock_sec2); > sub1 := c(t_end2-t_start2); > sub2 := c(t2-t_start2); > if (sub1 = glob__0) then # if number 11 > sec_left := glob__0; > else > if (sub2 > glob__0) then # if number 12 > rrr := (sub1/sub2); > sec_left := rrr * c(ms2) - c(ms2); > else > sec_left := glob__0; > fi;# end if 12 > fi;# end if 11; > sec_left; > end; comp_expect_sec := proc(t_end2, t_start2, t2, clock_sec2) local ms2, rrr, sec_left, sub1, sub2; global glob_small_float; ms2 := c(clock_sec2); sub1 := c(t_end2 - t_start2); sub2 := c(t2 - t_start2); if sub1 = glob__0 then sec_left := glob__0 else if glob__0 < sub2 then rrr := sub1/sub2; sec_left := rrr*c(ms2) - c(ms2) else sec_left := glob__0 end if end if; sec_left end proc # End Function number 24 # Begin Function number 25 > comp_percent := proc(t_end2,t_start2, t2) > global glob_small_float; > local rrr, sub1, sub2; > sub1 := (t_end2-t_start2); > sub2 := (t2-t_start2); > if (sub2 > glob_small_float) then # if number 11 > rrr := (glob__100*sub2)/sub1; > else > rrr := 0.0; > fi;# end if 11; > rrr; > end; comp_percent := proc(t_end2, t_start2, t2) local rrr, sub1, sub2; global glob_small_float; sub1 := t_end2 - t_start2; sub2 := t2 - t_start2; if glob_small_float < sub2 then rrr := glob__100*sub2/sub1 else rrr := 0. end if; rrr end proc # End Function number 25 # Begin Function number 26 > comp_rad_from_ratio := proc(term1,term2,last_no) > #TOP TWO TERM RADIUS ANALYSIS > global glob_h,glob_larger_float; > local ret; > if (float_abs(term2) > glob__0) then # if number 11 > ret := float_abs(term1 * glob_h / term2); > else > ret := glob_larger_float; > fi;# end if 11; > ret; > #BOTTOM TWO TERM RADIUS ANALYSIS > end; comp_rad_from_ratio := proc(term1, term2, last_no) local ret; global glob_h, glob_larger_float; if glob__0 < float_abs(term2) then ret := float_abs(term1*glob_h/term2) else ret := glob_larger_float end if; ret end proc # End Function number 26 # Begin Function number 27 > comp_ord_from_ratio := proc(term1,term2,last_no) > #TOP TWO TERM ORDER ANALYSIS > global glob_h,glob_larger_float; > local ret; > if (float_abs(term2) > glob__0) then # if number 11 > ret := glob__1 + float_abs(term2) * c(last_no) * ln(float_abs(term1 * glob_h / term2))/ln(c(last_no)); > else > ret := glob_larger_float; > fi;# end if 11; > ret; > #BOTTOM TWO TERM ORDER ANALYSIS > end; comp_ord_from_ratio := proc(term1, term2, last_no) local ret; global glob_h, glob_larger_float; if glob__0 < float_abs(term2) then ret := glob__1 + float_abs(term2)* c(last_no)*ln(float_abs(term1*glob_h/term2))/ln(c(last_no)) else ret := glob_larger_float end if; ret end proc # End Function number 27 # Begin Function number 28 > c := proc(in_val) > #To Force Conversion when needed > local ret; > ret := evalc(in_val); > ret; > #End Conversion > end; c := proc(in_val) local ret; ret := evalc(in_val); ret end proc # End Function number 28 # Begin Function number 29 > comp_rad_from_three_terms := proc(term1,term2,term3,last_no) > #TOP THREE TERM RADIUS ANALYSIS > global glob_h,glob_larger_float; > local ret,temp; > temp := float_abs(term2*term2*c(last_no)+glob__m2*term2*term2-term1*term3*c(last_no)+term1*term3); > if (float_abs(temp) > glob__0) then # if number 11 > ret := float_abs((term2*glob_h*term1)/(temp)); > else > ret := glob_larger_float; > fi;# end if 11; > ret; > #BOTTOM THREE TERM RADIUS ANALYSIS > end; comp_rad_from_three_terms := proc(term1, term2, term3, last_no) local ret, temp; global glob_h, glob_larger_float; temp := float_abs(term2*term2*c(last_no) + glob__m2*term2*term2 - term1*term3*c(last_no) + term1*term3); if glob__0 < float_abs(temp) then ret := float_abs(term2*glob_h*term1/temp) else ret := glob_larger_float end if; ret end proc # End Function number 29 # Begin Function number 30 > comp_ord_from_three_terms := proc(term1,term2,term3,last_no) > #TOP THREE TERM ORDER ANALYSIS > local ret; > ret := float_abs((glob__4*term1*term3*c(last_no)-glob__3*term1*term3-glob__4*term2*term2*c(last_no)+glob__4*term2*term2+term2*term2*c(last_no*last_no)-term1*term3*c(last_no*last_no))/(term2*term2*c(last_no)-glob__2*term2*term2-term1*term3*c(last_no)+term1*term3)); > ret; > #TOP THREE TERM ORDER ANALYSIS > end; comp_ord_from_three_terms := proc(term1, term2, term3, last_no) local ret; ret := float_abs((glob__4*term1*term3*c(last_no) - glob__3*term1*term3 - glob__4*term2*term2*c(last_no) + glob__4*term2*term2 + term2*term2*c(last_no*last_no) - term1*term3*c(last_no*last_no)) /(term2*term2*c(last_no) - glob__2*term2*term2 - term1*term3*c(last_no) + term1*term3)); ret end proc # End Function number 30 # Begin Function number 31 > comp_rad_from_six_terms := proc(term1,term2,term3,term4,term5,term6,last_no) > #TOP SIX TERM RADIUS ANALYSIS > global glob_h,glob_larger_float,glob_six_term_ord_save; > local ret,rm0,rm1,rm2,rm3,rm4,nr1,nr2,dr1,dr2,ds2,rad_c,ord_no,ds1,rcs; > if ((term5 <> glob__0) and (term4 <> glob__0) and (term3 <> glob__0) and (term2 <> glob__0) and (term1 <> glob__0)) then # if number 11 > rm0 := term6/term5; > rm1 := term5/term4; > rm2 := term4/term3; > rm3 := term3/term2; > rm4 := term2/term1; > nr1 := c(last_no-1)*rm0 - glob__2*c(last_no-2)*rm1 + c(last_no-3)*rm2; > nr2 := c(last_no-2)*rm1 - glob__2*c(last_no-3)*rm2 + c(last_no-4)*rm3; > dr1 := glob__m1/rm1 + glob__2/rm2 - glob__1/rm3; > dr2 := glob__m1/rm2 + glob__2/rm3 - glob__1/rm4; > ds1 := glob__3/rm1 - glob__8/rm2 + glob__5/rm3; > ds2 := glob__3/rm2 - glob__8/rm3 + glob__5/rm4; > if ((float_abs(nr1 * dr2 - nr2 * dr1) = glob__0) or (float_abs(dr1) = glob__0)) then # if number 12 > rad_c := glob_larger_float; > ord_no := glob_larger_float; > else > if (float_abs(nr1*dr2 - nr2 * dr1) > glob__0) then # if number 13 > rcs := ((ds1*dr2 - ds2*dr1 +dr1*dr2)/(nr1*dr2 - nr2 * dr1)); > #(Manuels) rcs := (ds1*dr2 - ds2*dr1)/(nr1*dr2 - nr2 * dr1) > ord_no := (rcs*nr1 - ds1)/(glob__2*dr1) -c(last_no)/glob__2; > if (float_abs(rcs) <> glob__0) then # if number 14 > if (rcs > glob__0) then # if number 15 > rad_c := float_abs( sqrt(rcs) * float_abs(glob_h)); > else > rad_c := glob_larger_float; > ord_no := glob_larger_float; > fi;# end if 15 > else > rad_c := glob_larger_float; > ord_no := glob_larger_float; > fi;# end if 14 > else > rad_c := glob_larger_float; > ord_no := glob_larger_float; > fi;# end if 13 > fi;# end if 12 > else > rad_c := glob_larger_float; > ord_no := glob_larger_float; > fi;# end if 11; > glob_six_term_ord_save := ord_no; > rad_c; > #BOTTOM SIX TERM RADIUS ANALYSIS > end; comp_rad_from_six_terms := proc( term1, term2, term3, term4, term5, term6, last_no) local ret, rm0, rm1, rm2, rm3, rm4, nr1, nr2, dr1, dr2, ds2, rad_c, ord_no, ds1, rcs; global glob_h, glob_larger_float, glob_six_term_ord_save; if term5 <> glob__0 and term4 <> glob__0 and term3 <> glob__0 and term2 <> glob__0 and term1 <> glob__0 then rm0 := term6/term5; rm1 := term5/term4; rm2 := term4/term3; rm3 := term3/term2; rm4 := term2/term1; nr1 := c(last_no - 1)*rm0 - glob__2*c(last_no - 2)*rm1 + c(last_no - 3)*rm2; nr2 := c(last_no - 2)*rm1 - glob__2*c(last_no - 3)*rm2 + c(last_no - 4)*rm3; dr1 := glob__m1/rm1 + glob__2/rm2 - glob__1/rm3; dr2 := glob__m1/rm2 + glob__2/rm3 - glob__1/rm4; ds1 := glob__3/rm1 - glob__8/rm2 + glob__5/rm3; ds2 := glob__3/rm2 - glob__8/rm3 + glob__5/rm4; if float_abs(nr1*dr2 - nr2*dr1) = glob__0 or float_abs(dr1) = glob__0 then rad_c := glob_larger_float; ord_no := glob_larger_float else if glob__0 < float_abs(nr1*dr2 - nr2*dr1) then rcs := (ds1*dr2 - ds2*dr1 + dr1*dr2)/(nr1*dr2 - nr2*dr1); ord_no := (rcs*nr1 - ds1)/(glob__2*dr1) - c(last_no)/glob__2; if float_abs(rcs) <> glob__0 then if glob__0 < rcs then rad_c := float_abs(sqrt(rcs)*float_abs(glob_h)) else rad_c := glob_larger_float; ord_no := glob_larger_float end if else rad_c := glob_larger_float; ord_no := glob_larger_float end if else rad_c := glob_larger_float; ord_no := glob_larger_float end if end if else rad_c := glob_larger_float; ord_no := glob_larger_float end if; glob_six_term_ord_save := ord_no; rad_c end proc # End Function number 31 # Begin Function number 32 > comp_ord_from_six_terms := proc(term1,term2,term3,term4,term5,term6,last_no) > global glob_six_term_ord_save; > #TOP SIX TERM ORDER ANALYSIS > #TOP SAVED FROM SIX TERM RADIUS ANALYSIS > glob_six_term_ord_save; > #BOTTOM SIX TERM ORDER ANALYSIS > end; comp_ord_from_six_terms := proc( term1, term2, term3, term4, term5, term6, last_no) global glob_six_term_ord_save; glob_six_term_ord_save end proc # End Function number 32 # Begin Function number 33 > factorial_2 := proc(nnn) > ret := nnn!; > ret;; > end; Warning, `ret` is implicitly declared local to procedure `factorial_2` factorial_2 := proc(nnn) local ret; ret := nnn!; ret end proc # End Function number 33 # Begin Function number 34 > factorial_1 := proc(nnn) > global ATS_MAX_TERMS,array_fact_1; > local ret; > if (nnn <= ATS_MAX_TERMS) then # if number 11 > if (array_fact_1[nnn] = 0) then # if number 12 > ret := factorial_2(nnn); > array_fact_1[nnn] := ret; > else > ret := array_fact_1[nnn]; > fi;# end if 12; > else > ret := factorial_2(nnn); > fi;# end if 11; > ret; > end; factorial_1 := proc(nnn) local ret; global ATS_MAX_TERMS, array_fact_1; if nnn <= ATS_MAX_TERMS then if array_fact_1[nnn] = 0 then ret := factorial_2(nnn); array_fact_1[nnn] := ret else ret := array_fact_1[nnn] end if else ret := factorial_2(nnn) end if; ret end proc # End Function number 34 # Begin Function number 35 > factorial_3 := proc(mmm,nnn) > global ATS_MAX_TERMS,array_fact_2; > local ret; > if ((nnn <= ATS_MAX_TERMS) and (mmm <= ATS_MAX_TERMS)) then # if number 11 > if (array_fact_2[mmm,nnn] = 0) then # if number 12 > ret := factorial_1(mmm)/factorial_1(nnn); > array_fact_2[mmm,nnn] := ret; > else > ret := array_fact_2[mmm,nnn]; > fi;# end if 12; > else > ret := factorial_2(mmm)/factorial_2(nnn); > fi;# end if 11; > ret; > end; factorial_3 := proc(mmm, nnn) local ret; global ATS_MAX_TERMS, array_fact_2; if nnn <= ATS_MAX_TERMS and mmm <= ATS_MAX_TERMS then if array_fact_2[mmm, nnn] = 0 then ret := factorial_1(mmm)/factorial_1(nnn); array_fact_2[mmm, nnn] := ret else ret := array_fact_2[mmm, nnn] end if else ret := factorial_2(mmm)/factorial_2(nnn) end if; ret end proc # End Function number 35 # Begin Function number 36 > convfloat := proc(mmm) > (mmm); > end; convfloat := proc(mmm) mmm end proc # End Function number 36 # Begin Function number 37 > elapsed_time_seconds := proc() > time(); > end; elapsed_time_seconds := proc() time() end proc # End Function number 37 # Begin Function number 38 > float_abs := proc(x) > abs(x); > end; float_abs := proc(x) abs(x) end proc # End Function number 38 # Begin Function number 39 > expt := proc(x,y) > x^y; > end; expt := proc(x, y) x^y end proc # End Function number 39 # Begin Function number 40 > neg := proc(x) > -x; > end; neg := proc(x) -x end proc # End Function number 40 # Begin Function number 41 > int_trunc := proc(x) > trunc(x); > end; int_trunc := proc(x) trunc(x) end proc # End Function number 41 # Begin Function number 42 > estimated_needed_step_error := proc(x_start,x_end,estimated_h,estimated_answer) > local desired_abs_gbl_error,range,estimated_steps,step_error; > global glob_desired_digits_correct,ALWAYS,ATS_MAX_TERMS; > omniout_float(ALWAYS,"glob_desired_digits_correct",32,glob_desired_digits_correct,32,""); > desired_abs_gbl_error := expt(glob__10,c( -glob_desired_digits_correct)) * c(float_abs(c(estimated_answer))); > omniout_float(ALWAYS,"estimated_h",32,estimated_h,32,""); > omniout_float(ALWAYS,"estimated_answer",32,estimated_answer,32,""); > omniout_float(ALWAYS,"desired_abs_gbl_error",32,desired_abs_gbl_error,32,""); > range := (x_end - x_start); > omniout_float(ALWAYS,"range",32,range,32,""); > estimated_steps := range / estimated_h; > omniout_float(ALWAYS,"estimated_steps",32,estimated_steps,32,""); > step_error := (c(float_abs(desired_abs_gbl_error) /sqrt(c( estimated_steps))/c(ATS_MAX_TERMS))); > omniout_float(ALWAYS,"step_error",32,step_error,32,""); > (step_error);; > end; estimated_needed_step_error := proc( x_start, x_end, estimated_h, estimated_answer) local desired_abs_gbl_error, range, estimated_steps, step_error; global glob_desired_digits_correct, ALWAYS, ATS_MAX_TERMS; omniout_float(ALWAYS, "glob_desired_digits_correct", 32, glob_desired_digits_correct, 32, ""); desired_abs_gbl_error := expt(glob__10, c(-glob_desired_digits_correct))* c(float_abs(c(estimated_answer))); omniout_float(ALWAYS, "estimated_h", 32, estimated_h, 32, ""); omniout_float(ALWAYS, "estimated_answer", 32, estimated_answer, 32, "") ; omniout_float(ALWAYS, "desired_abs_gbl_error", 32, desired_abs_gbl_error, 32, ""); range := x_end - x_start; omniout_float(ALWAYS, "range", 32, range, 32, ""); estimated_steps := range/estimated_h; omniout_float(ALWAYS, "estimated_steps", 32, estimated_steps, 32, ""); step_error := c(float_abs(desired_abs_gbl_error)/( sqrt(c(estimated_steps))*c(ATS_MAX_TERMS))); omniout_float(ALWAYS, "step_error", 32, step_error, 32, ""); step_error end proc # End Function number 42 #END ATS LIBRARY BLOCK #BEGIN USER FUNCTION BLOCK #BEGIN BLOCK 3 #BEGIN USER DEF BLOCK > exact_soln_y := proc(x) > return(c(10.0) * (c(0.1) * c(x) + c(0.2)) * arccos(sqrt ( c(0.1) * c(x) + c(0.2))) - c(5.0) * sqrt( c(0.1) * c(x) + c(0.2)) * sqrt( c(0.8) - c(0.1) * c(x)) + c(5.0) * arcsin(sqrt( c(0.1) * c(x) + c(0.2)))); > end; exact_soln_y := proc(x) return c(10.0)*(c(0.1)*c(x) + c(0.2))*arccos(sqrt(c(0.1)*c(x) + c(0.2))) - c(5.0)*sqrt(c(0.1)*c(x) + c(0.2))*sqrt(c(0.8) - c(0.1)*c(x)) + c(5.0)*arcsin(sqrt(c(0.1)*c(x) + c(0.2))) 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_0D1, > array_const_0D2, #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, > array_tmp4_a1, > array_tmp4, > array_tmp5, > array_m1, > array_y_higher, > array_y_higher_work, > array_y_higher_work2, > array_y_set_initial, > array_given_rad_poles, > array_given_ord_poles, > array_rad_test_poles, > array_ord_test_poles, > array_fact_2, > ATS_MAX_TERMS, > glob_last; > local min_size; > min_size := glob_estimated_size_answer; > if (float_abs(array_y[1]) < min_size) then # if number 3 > min_size := float_abs(array_y[1]); > omniout_float(ALWAYS,"min_size",32,min_size,32,""); > fi;# end if 3; > if (min_size < glob__1) then # if number 3 > min_size := glob__1; > omniout_float(ALWAYS,"min_size",32,min_size,32,""); > fi;# end if 3; > min_size; > end; est_size_answer := proc() local min_size; global ALWAYS, INFO, DEBUGL, DEBUGMASSIVE, glob_iolevel, glob_yes_pole, glob_no_pole, glob_not_given, glob_no_sing_tests, glob_ratio_test, glob_three_term_test, glob_six_term_test, glob_log_10, MAX_UNCHANGED, glob__small, glob_small_float, glob_smallish_float, glob_large_float, glob_larger_float, glob__m2, glob__m1, glob__0, glob__1, glob__2, glob__3, glob__4, glob__5, glob__8, glob__10, glob__100, glob__pi, glob__0_5, glob__0_8, glob__m0_8, glob__0_25, glob__0_125, glob_h, glob_nxt, glob_prec, glob_check_sign, glob_desired_digits_correct, glob_max_estimated_step_error, glob_ratio_of_radius, glob_percent_done, glob_total_exp_sec, glob_optimal_expect_sec, glob_estimated_size_answer, glob_almost_1, glob_clock_sec, glob_clock_start_sec, glob_disp_incr, glob_diff_rc_fm, glob_diff_rc_fmm1, glob_diff_rc_fmm2, glob_diff_ord_fm, glob_diff_ord_fmm1, glob_diff_ord_fmm2, glob_six_term_ord_save, glob_guess_error_rc, glob_guess_error_ord, glob_least_given_sing, glob_least_ratio_sing, glob_least_3_sing, glob_least_6_sing, glob_last_good_h, glob_max_h, glob_min_h, glob_display_interval, glob_abserr, glob_relerr, glob_min_pole_est, glob_max_rel_trunc_err, glob_max_trunc_err, glob_max_hours, glob_optimal_clock_start_sec, glob_optimal_start, glob_upper_ratio_limit, glob_lower_ratio_limit, glob_max_sec, glob_orig_start_sec, glob_normmax, glob_max_minutes, glob_next_display, glob_est_digits, glob_subiter_method, glob_html_log, glob_min_good_digits, glob_good_digits, glob_min_apfp_est_good_digits, glob_apfp_est_good_digits, glob_max_opt_iter, glob_dump, glob_djd_debug, glob_display_flag, glob_djd_debug2, glob_h_reason, glob_sec_in_minute, glob_min_in_hour, glob_hours_in_day, glob_days_in_year, glob_sec_in_hour, glob_sec_in_day, glob_sec_in_year, glob_not_yet_finished, glob_initial_pass, glob_not_yet_start_msg, glob_reached_optimal_h, glob_optimal_done, glob_type_given_pole, glob_optimize, glob_look_poles, glob_dump_closed_form, glob_max_iter, glob_no_eqs, glob_unchanged_h_cnt, glob_warned, glob_warned2, glob_start, glob_iter, array_const_1, array_const_0D0, array_const_0D1, array_const_0D2, 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, array_tmp4_a1, array_tmp4, array_tmp5, array_m1, array_y_higher, array_y_higher_work, array_y_higher_work2, array_y_set_initial, array_given_rad_poles, array_given_ord_poles, array_rad_test_poles, array_ord_test_poles, array_fact_2, ATS_MAX_TERMS, glob_last; min_size := glob_estimated_size_answer; if float_abs(array_y[1]) < min_size then min_size := float_abs(array_y[1]); omniout_float(ALWAYS, "min_size", 32, min_size, 32, "") end if; if min_size < glob__1 then min_size := glob__1; omniout_float(ALWAYS, "min_size", 32, min_size, 32, "") end if; min_size end proc # End Function number 4 # Begin Function number 5 > test_suggested_h := proc() > global > ALWAYS, > INFO, > DEBUGL, > DEBUGMASSIVE, > glob_iolevel, > glob_yes_pole, > glob_no_pole, > glob_not_given, > glob_no_sing_tests, > glob_ratio_test, > glob_three_term_test, > glob_six_term_test, > glob_log_10, #Top Generate Globals Decl > MAX_UNCHANGED, > glob__small, > glob_small_float, > glob_smallish_float, > glob_large_float, > glob_larger_float, > glob__m2, > glob__m1, > glob__0, > glob__1, > glob__2, > glob__3, > glob__4, > glob__5, > glob__8, > glob__10, > glob__100, > glob__pi, > glob__0_5, > glob__0_8, > glob__m0_8, > glob__0_25, > glob__0_125, > glob_h, > glob_nxt, > glob_prec, > glob_check_sign, > glob_desired_digits_correct, > glob_max_estimated_step_error, > glob_ratio_of_radius, > glob_percent_done, > glob_total_exp_sec, > glob_optimal_expect_sec, > glob_estimated_size_answer, > glob_almost_1, > glob_clock_sec, > glob_clock_start_sec, > glob_disp_incr, > glob_diff_rc_fm, > glob_diff_rc_fmm1, > glob_diff_rc_fmm2, > glob_diff_ord_fm, > glob_diff_ord_fmm1, > glob_diff_ord_fmm2, > glob_six_term_ord_save, > glob_guess_error_rc, > glob_guess_error_ord, > glob_least_given_sing, > glob_least_ratio_sing, > glob_least_3_sing, > glob_least_6_sing, > glob_last_good_h, > glob_max_h, > glob_min_h, > glob_display_interval, > glob_abserr, > glob_relerr, > glob_min_pole_est, > glob_max_rel_trunc_err, > glob_max_trunc_err, > glob_max_hours, > glob_optimal_clock_start_sec, > glob_optimal_start, > glob_upper_ratio_limit, > glob_lower_ratio_limit, > glob_max_sec, > glob_orig_start_sec, > glob_normmax, > glob_max_minutes, > glob_next_display, > glob_est_digits, > glob_subiter_method, > glob_html_log, > glob_min_good_digits, > glob_good_digits, > glob_min_apfp_est_good_digits, > glob_apfp_est_good_digits, > glob_max_opt_iter, > glob_dump, > glob_djd_debug, > glob_display_flag, > glob_djd_debug2, > glob_h_reason, > glob_sec_in_minute, > glob_min_in_hour, > glob_hours_in_day, > glob_days_in_year, > glob_sec_in_hour, > glob_sec_in_day, > glob_sec_in_year, > glob_not_yet_finished, > glob_initial_pass, > glob_not_yet_start_msg, > glob_reached_optimal_h, > glob_optimal_done, > glob_type_given_pole, > glob_optimize, > glob_look_poles, > glob_dump_closed_form, > glob_max_iter, > glob_no_eqs, > glob_unchanged_h_cnt, > glob_warned, > glob_warned2, > glob_start, > glob_iter, #Bottom Generate Globals Decl #BEGIN CONST > array_const_1, > array_const_0D0, > array_const_0D1, > array_const_0D2, #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, > array_tmp4_a1, > array_tmp4, > array_tmp5, > array_m1, > array_y_higher, > array_y_higher_work, > array_y_higher_work2, > array_y_set_initial, > array_given_rad_poles, > array_given_ord_poles, > array_rad_test_poles, > array_ord_test_poles, > array_fact_2, > ATS_MAX_TERMS, > glob_last; > local max_estimated_step_error,hn_div_ho,hn_div_ho_2,hn_div_ho_3,no_terms,est_tmp; > max_estimated_step_error := glob__small; > no_terms := ATS_MAX_TERMS; > hn_div_ho := glob__0_5; > hn_div_ho_2 := glob__0_25; > hn_div_ho_3 := glob__0_125; > omniout_float(ALWAYS,"hn_div_ho",32,hn_div_ho,32,""); > omniout_float(ALWAYS,"hn_div_ho_2",32,hn_div_ho_2,32,""); > omniout_float(ALWAYS,"hn_div_ho_3",32,hn_div_ho_3,32,""); > est_tmp := float_abs(array_y[no_terms-3] + array_y[no_terms - 2] * hn_div_ho + array_y[no_terms - 1] * hn_div_ho_2 + array_y[no_terms] * hn_div_ho_3); > if (est_tmp >= max_estimated_step_error) then # if number 3 > max_estimated_step_error := est_tmp; > fi;# end if 3; > omniout_float(ALWAYS,"max_estimated_step_error",32,max_estimated_step_error,32,""); > max_estimated_step_error; > end; test_suggested_h := proc() local max_estimated_step_error, hn_div_ho, hn_div_ho_2, hn_div_ho_3, no_terms, est_tmp; global ALWAYS, INFO, DEBUGL, DEBUGMASSIVE, glob_iolevel, glob_yes_pole, glob_no_pole, glob_not_given, glob_no_sing_tests, glob_ratio_test, glob_three_term_test, glob_six_term_test, glob_log_10, MAX_UNCHANGED, glob__small, glob_small_float, glob_smallish_float, glob_large_float, glob_larger_float, glob__m2, glob__m1, glob__0, glob__1, glob__2, glob__3, glob__4, glob__5, glob__8, glob__10, glob__100, glob__pi, glob__0_5, glob__0_8, glob__m0_8, glob__0_25, glob__0_125, glob_h, glob_nxt, glob_prec, glob_check_sign, glob_desired_digits_correct, glob_max_estimated_step_error, glob_ratio_of_radius, glob_percent_done, glob_total_exp_sec, glob_optimal_expect_sec, glob_estimated_size_answer, glob_almost_1, glob_clock_sec, glob_clock_start_sec, glob_disp_incr, glob_diff_rc_fm, glob_diff_rc_fmm1, glob_diff_rc_fmm2, glob_diff_ord_fm, glob_diff_ord_fmm1, glob_diff_ord_fmm2, glob_six_term_ord_save, glob_guess_error_rc, glob_guess_error_ord, glob_least_given_sing, glob_least_ratio_sing, glob_least_3_sing, glob_least_6_sing, glob_last_good_h, glob_max_h, glob_min_h, glob_display_interval, glob_abserr, glob_relerr, glob_min_pole_est, glob_max_rel_trunc_err, glob_max_trunc_err, glob_max_hours, glob_optimal_clock_start_sec, glob_optimal_start, glob_upper_ratio_limit, glob_lower_ratio_limit, glob_max_sec, glob_orig_start_sec, glob_normmax, glob_max_minutes, glob_next_display, glob_est_digits, glob_subiter_method, glob_html_log, glob_min_good_digits, glob_good_digits, glob_min_apfp_est_good_digits, glob_apfp_est_good_digits, glob_max_opt_iter, glob_dump, glob_djd_debug, glob_display_flag, glob_djd_debug2, glob_h_reason, glob_sec_in_minute, glob_min_in_hour, glob_hours_in_day, glob_days_in_year, glob_sec_in_hour, glob_sec_in_day, glob_sec_in_year, glob_not_yet_finished, glob_initial_pass, glob_not_yet_start_msg, glob_reached_optimal_h, glob_optimal_done, glob_type_given_pole, glob_optimize, glob_look_poles, glob_dump_closed_form, glob_max_iter, glob_no_eqs, glob_unchanged_h_cnt, glob_warned, glob_warned2, glob_start, glob_iter, array_const_1, array_const_0D0, array_const_0D1, array_const_0D2, 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, array_tmp4_a1, array_tmp4, array_tmp5, array_m1, array_y_higher, array_y_higher_work, array_y_higher_work2, array_y_set_initial, array_given_rad_poles, array_given_ord_poles, array_rad_test_poles, array_ord_test_poles, array_fact_2, ATS_MAX_TERMS, glob_last; max_estimated_step_error := glob__small; no_terms := ATS_MAX_TERMS; hn_div_ho := glob__0_5; hn_div_ho_2 := glob__0_25; hn_div_ho_3 := glob__0_125; omniout_float(ALWAYS, "hn_div_ho", 32, hn_div_ho, 32, ""); omniout_float(ALWAYS, "hn_div_ho_2", 32, hn_div_ho_2, 32, ""); omniout_float(ALWAYS, "hn_div_ho_3", 32, hn_div_ho_3, 32, ""); est_tmp := float_abs(array_y[no_terms - 3] + array_y[no_terms - 2]*hn_div_ho + array_y[no_terms - 1]*hn_div_ho_2 + array_y[no_terms]*hn_div_ho_3); if max_estimated_step_error <= est_tmp then max_estimated_step_error := est_tmp end if; omniout_float(ALWAYS, "max_estimated_step_error", 32, max_estimated_step_error, 32, ""); max_estimated_step_error end proc # End Function number 5 # Begin Function number 6 > track_estimated_error := proc() > global > ALWAYS, > INFO, > DEBUGL, > DEBUGMASSIVE, > glob_iolevel, > glob_yes_pole, > glob_no_pole, > glob_not_given, > glob_no_sing_tests, > glob_ratio_test, > glob_three_term_test, > glob_six_term_test, > glob_log_10, #Top Generate Globals Decl > MAX_UNCHANGED, > glob__small, > glob_small_float, > glob_smallish_float, > glob_large_float, > glob_larger_float, > glob__m2, > glob__m1, > glob__0, > glob__1, > glob__2, > glob__3, > glob__4, > glob__5, > glob__8, > glob__10, > glob__100, > glob__pi, > glob__0_5, > glob__0_8, > glob__m0_8, > glob__0_25, > glob__0_125, > glob_h, > glob_nxt, > glob_prec, > glob_check_sign, > glob_desired_digits_correct, > glob_max_estimated_step_error, > glob_ratio_of_radius, > glob_percent_done, > glob_total_exp_sec, > glob_optimal_expect_sec, > glob_estimated_size_answer, > glob_almost_1, > glob_clock_sec, > glob_clock_start_sec, > glob_disp_incr, > glob_diff_rc_fm, > glob_diff_rc_fmm1, > glob_diff_rc_fmm2, > glob_diff_ord_fm, > glob_diff_ord_fmm1, > glob_diff_ord_fmm2, > glob_six_term_ord_save, > glob_guess_error_rc, > glob_guess_error_ord, > glob_least_given_sing, > glob_least_ratio_sing, > glob_least_3_sing, > glob_least_6_sing, > glob_last_good_h, > glob_max_h, > glob_min_h, > glob_display_interval, > glob_abserr, > glob_relerr, > glob_min_pole_est, > glob_max_rel_trunc_err, > glob_max_trunc_err, > glob_max_hours, > glob_optimal_clock_start_sec, > glob_optimal_start, > glob_upper_ratio_limit, > glob_lower_ratio_limit, > glob_max_sec, > glob_orig_start_sec, > glob_normmax, > glob_max_minutes, > glob_next_display, > glob_est_digits, > glob_subiter_method, > glob_html_log, > glob_min_good_digits, > glob_good_digits, > glob_min_apfp_est_good_digits, > glob_apfp_est_good_digits, > glob_max_opt_iter, > glob_dump, > glob_djd_debug, > glob_display_flag, > glob_djd_debug2, > glob_h_reason, > glob_sec_in_minute, > glob_min_in_hour, > glob_hours_in_day, > glob_days_in_year, > glob_sec_in_hour, > glob_sec_in_day, > glob_sec_in_year, > glob_not_yet_finished, > glob_initial_pass, > glob_not_yet_start_msg, > glob_reached_optimal_h, > glob_optimal_done, > glob_type_given_pole, > glob_optimize, > glob_look_poles, > glob_dump_closed_form, > glob_max_iter, > glob_no_eqs, > glob_unchanged_h_cnt, > glob_warned, > glob_warned2, > glob_start, > glob_iter, #Bottom Generate Globals Decl #BEGIN CONST > array_const_1, > array_const_0D0, > array_const_0D1, > array_const_0D2, #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, > array_tmp4_a1, > array_tmp4, > array_tmp5, > array_m1, > array_y_higher, > array_y_higher_work, > array_y_higher_work2, > array_y_set_initial, > array_given_rad_poles, > array_given_ord_poles, > array_rad_test_poles, > array_ord_test_poles, > array_fact_2, > ATS_MAX_TERMS, > glob_last; > local hn_div_ho,hn_div_ho_2,hn_div_ho_3,no_terms,est_tmp; > no_terms := ATS_MAX_TERMS; > hn_div_ho := glob__0_5; > hn_div_ho_2 := glob__0_25; > hn_div_ho_3 := glob__0_125; > est_tmp := c(float_abs(array_y[no_terms-3])) + c(float_abs(array_y[no_terms - 2])) * c(hn_div_ho) + c(float_abs(array_y[no_terms - 1])) * c(hn_div_ho_2) + c(float_abs(array_y[no_terms])) * c(hn_div_ho_3); > if (glob_prec * c(float_abs(array_y[1])) > c(est_tmp)) then # if number 3 > est_tmp := c(glob_prec) * c(float_abs(array_y[1])); > fi;# end if 3; > if (c(est_tmp) >= c(array_max_est_error[1])) then # if number 3 > array_max_est_error[1] := c(est_tmp); > fi;# end if 3 > ; > end; track_estimated_error := proc() local hn_div_ho, hn_div_ho_2, hn_div_ho_3, no_terms, est_tmp; global ALWAYS, INFO, DEBUGL, DEBUGMASSIVE, glob_iolevel, glob_yes_pole, glob_no_pole, glob_not_given, glob_no_sing_tests, glob_ratio_test, glob_three_term_test, glob_six_term_test, glob_log_10, MAX_UNCHANGED, glob__small, glob_small_float, glob_smallish_float, glob_large_float, glob_larger_float, glob__m2, glob__m1, glob__0, glob__1, glob__2, glob__3, glob__4, glob__5, glob__8, glob__10, glob__100, glob__pi, glob__0_5, glob__0_8, glob__m0_8, glob__0_25, glob__0_125, glob_h, glob_nxt, glob_prec, glob_check_sign, glob_desired_digits_correct, glob_max_estimated_step_error, glob_ratio_of_radius, glob_percent_done, glob_total_exp_sec, glob_optimal_expect_sec, glob_estimated_size_answer, glob_almost_1, glob_clock_sec, glob_clock_start_sec, glob_disp_incr, glob_diff_rc_fm, glob_diff_rc_fmm1, glob_diff_rc_fmm2, glob_diff_ord_fm, glob_diff_ord_fmm1, glob_diff_ord_fmm2, glob_six_term_ord_save, glob_guess_error_rc, glob_guess_error_ord, glob_least_given_sing, glob_least_ratio_sing, glob_least_3_sing, glob_least_6_sing, glob_last_good_h, glob_max_h, glob_min_h, glob_display_interval, glob_abserr, glob_relerr, glob_min_pole_est, glob_max_rel_trunc_err, glob_max_trunc_err, glob_max_hours, glob_optimal_clock_start_sec, glob_optimal_start, glob_upper_ratio_limit, glob_lower_ratio_limit, glob_max_sec, glob_orig_start_sec, glob_normmax, glob_max_minutes, glob_next_display, glob_est_digits, glob_subiter_method, glob_html_log, glob_min_good_digits, glob_good_digits, glob_min_apfp_est_good_digits, glob_apfp_est_good_digits, glob_max_opt_iter, glob_dump, glob_djd_debug, glob_display_flag, glob_djd_debug2, glob_h_reason, glob_sec_in_minute, glob_min_in_hour, glob_hours_in_day, glob_days_in_year, glob_sec_in_hour, glob_sec_in_day, glob_sec_in_year, glob_not_yet_finished, glob_initial_pass, glob_not_yet_start_msg, glob_reached_optimal_h, glob_optimal_done, glob_type_given_pole, glob_optimize, glob_look_poles, glob_dump_closed_form, glob_max_iter, glob_no_eqs, glob_unchanged_h_cnt, glob_warned, glob_warned2, glob_start, glob_iter, array_const_1, array_const_0D0, array_const_0D1, array_const_0D2, 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, array_tmp4_a1, array_tmp4, array_tmp5, array_m1, array_y_higher, array_y_higher_work, array_y_higher_work2, array_y_set_initial, array_given_rad_poles, array_given_ord_poles, array_rad_test_poles, array_ord_test_poles, array_fact_2, ATS_MAX_TERMS, glob_last; no_terms := ATS_MAX_TERMS; hn_div_ho := glob__0_5; hn_div_ho_2 := glob__0_25; hn_div_ho_3 := glob__0_125; est_tmp := c(float_abs(array_y[no_terms - 3])) + c(float_abs(array_y[no_terms - 2]))*c(hn_div_ho) + c(float_abs(array_y[no_terms - 1]))*c(hn_div_ho_2) + c(float_abs(array_y[no_terms]))*c(hn_div_ho_3); if c(est_tmp) < glob_prec*c(float_abs(array_y[1])) then est_tmp := c(glob_prec)*c(float_abs(array_y[1])) end if; if c(array_max_est_error[1]) <= c(est_tmp) then array_max_est_error[1] := c(est_tmp) end if end proc # End Function number 6 # Begin Function number 7 > reached_interval := proc() > global > ALWAYS, > INFO, > DEBUGL, > DEBUGMASSIVE, > glob_iolevel, > glob_yes_pole, > glob_no_pole, > glob_not_given, > glob_no_sing_tests, > glob_ratio_test, > glob_three_term_test, > glob_six_term_test, > glob_log_10, #Top Generate Globals Decl > MAX_UNCHANGED, > glob__small, > glob_small_float, > glob_smallish_float, > glob_large_float, > glob_larger_float, > glob__m2, > glob__m1, > glob__0, > glob__1, > glob__2, > glob__3, > glob__4, > glob__5, > glob__8, > glob__10, > glob__100, > glob__pi, > glob__0_5, > glob__0_8, > glob__m0_8, > glob__0_25, > glob__0_125, > glob_h, > glob_nxt, > glob_prec, > glob_check_sign, > glob_desired_digits_correct, > glob_max_estimated_step_error, > glob_ratio_of_radius, > glob_percent_done, > glob_total_exp_sec, > glob_optimal_expect_sec, > glob_estimated_size_answer, > glob_almost_1, > glob_clock_sec, > glob_clock_start_sec, > glob_disp_incr, > glob_diff_rc_fm, > glob_diff_rc_fmm1, > glob_diff_rc_fmm2, > glob_diff_ord_fm, > glob_diff_ord_fmm1, > glob_diff_ord_fmm2, > glob_six_term_ord_save, > glob_guess_error_rc, > glob_guess_error_ord, > glob_least_given_sing, > glob_least_ratio_sing, > glob_least_3_sing, > glob_least_6_sing, > glob_last_good_h, > glob_max_h, > glob_min_h, > glob_display_interval, > glob_abserr, > glob_relerr, > glob_min_pole_est, > glob_max_rel_trunc_err, > glob_max_trunc_err, > glob_max_hours, > glob_optimal_clock_start_sec, > glob_optimal_start, > glob_upper_ratio_limit, > glob_lower_ratio_limit, > glob_max_sec, > glob_orig_start_sec, > glob_normmax, > glob_max_minutes, > glob_next_display, > glob_est_digits, > glob_subiter_method, > glob_html_log, > glob_min_good_digits, > glob_good_digits, > glob_min_apfp_est_good_digits, > glob_apfp_est_good_digits, > glob_max_opt_iter, > glob_dump, > glob_djd_debug, > glob_display_flag, > glob_djd_debug2, > glob_h_reason, > glob_sec_in_minute, > glob_min_in_hour, > glob_hours_in_day, > glob_days_in_year, > glob_sec_in_hour, > glob_sec_in_day, > glob_sec_in_year, > glob_not_yet_finished, > glob_initial_pass, > glob_not_yet_start_msg, > glob_reached_optimal_h, > glob_optimal_done, > glob_type_given_pole, > glob_optimize, > glob_look_poles, > glob_dump_closed_form, > glob_max_iter, > glob_no_eqs, > glob_unchanged_h_cnt, > glob_warned, > glob_warned2, > glob_start, > glob_iter, #Bottom Generate Globals Decl #BEGIN CONST > array_const_1, > array_const_0D0, > array_const_0D1, > array_const_0D2, #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, > array_tmp4_a1, > array_tmp4, > array_tmp5, > array_m1, > array_y_higher, > array_y_higher_work, > array_y_higher_work2, > array_y_set_initial, > array_given_rad_poles, > array_given_ord_poles, > array_rad_test_poles, > array_ord_test_poles, > array_fact_2, > ATS_MAX_TERMS, > glob_last; > local ret; > if ((glob_check_sign * array_x[1]) >= (glob_check_sign * glob_next_display - glob_h/glob__10)) then # if number 3 > ret := true; > else > ret := false; > fi;# end if 3; > return(ret); > end; reached_interval := proc() local ret; global ALWAYS, INFO, DEBUGL, DEBUGMASSIVE, glob_iolevel, glob_yes_pole, glob_no_pole, glob_not_given, glob_no_sing_tests, glob_ratio_test, glob_three_term_test, glob_six_term_test, glob_log_10, MAX_UNCHANGED, glob__small, glob_small_float, glob_smallish_float, glob_large_float, glob_larger_float, glob__m2, glob__m1, glob__0, glob__1, glob__2, glob__3, glob__4, glob__5, glob__8, glob__10, glob__100, glob__pi, glob__0_5, glob__0_8, glob__m0_8, glob__0_25, glob__0_125, glob_h, glob_nxt, glob_prec, glob_check_sign, glob_desired_digits_correct, glob_max_estimated_step_error, glob_ratio_of_radius, glob_percent_done, glob_total_exp_sec, glob_optimal_expect_sec, glob_estimated_size_answer, glob_almost_1, glob_clock_sec, glob_clock_start_sec, glob_disp_incr, glob_diff_rc_fm, glob_diff_rc_fmm1, glob_diff_rc_fmm2, glob_diff_ord_fm, glob_diff_ord_fmm1, glob_diff_ord_fmm2, glob_six_term_ord_save, glob_guess_error_rc, glob_guess_error_ord, glob_least_given_sing, glob_least_ratio_sing, glob_least_3_sing, glob_least_6_sing, glob_last_good_h, glob_max_h, glob_min_h, glob_display_interval, glob_abserr, glob_relerr, glob_min_pole_est, glob_max_rel_trunc_err, glob_max_trunc_err, glob_max_hours, glob_optimal_clock_start_sec, glob_optimal_start, glob_upper_ratio_limit, glob_lower_ratio_limit, glob_max_sec, glob_orig_start_sec, glob_normmax, glob_max_minutes, glob_next_display, glob_est_digits, glob_subiter_method, glob_html_log, glob_min_good_digits, glob_good_digits, glob_min_apfp_est_good_digits, glob_apfp_est_good_digits, glob_max_opt_iter, glob_dump, glob_djd_debug, glob_display_flag, glob_djd_debug2, glob_h_reason, glob_sec_in_minute, glob_min_in_hour, glob_hours_in_day, glob_days_in_year, glob_sec_in_hour, glob_sec_in_day, glob_sec_in_year, glob_not_yet_finished, glob_initial_pass, glob_not_yet_start_msg, glob_reached_optimal_h, glob_optimal_done, glob_type_given_pole, glob_optimize, glob_look_poles, glob_dump_closed_form, glob_max_iter, glob_no_eqs, glob_unchanged_h_cnt, glob_warned, glob_warned2, glob_start, glob_iter, array_const_1, array_const_0D0, array_const_0D1, array_const_0D2, 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, array_tmp4_a1, array_tmp4, array_tmp5, array_m1, array_y_higher, array_y_higher_work, array_y_higher_work2, array_y_set_initial, array_given_rad_poles, array_given_ord_poles, array_rad_test_poles, array_ord_test_poles, array_fact_2, ATS_MAX_TERMS, glob_last; if glob_check_sign*glob_next_display - glob_h/glob__10 <= glob_check_sign*array_x[1] then ret := true else ret := false end if; return ret end proc # End Function number 7 # Begin Function number 8 > display_alot := proc(iter) > global > ALWAYS, > INFO, > DEBUGL, > DEBUGMASSIVE, > glob_iolevel, > glob_yes_pole, > glob_no_pole, > glob_not_given, > glob_no_sing_tests, > glob_ratio_test, > glob_three_term_test, > glob_six_term_test, > glob_log_10, #Top Generate Globals Decl > MAX_UNCHANGED, > glob__small, > glob_small_float, > glob_smallish_float, > glob_large_float, > glob_larger_float, > glob__m2, > glob__m1, > glob__0, > glob__1, > glob__2, > glob__3, > glob__4, > glob__5, > glob__8, > glob__10, > glob__100, > glob__pi, > glob__0_5, > glob__0_8, > glob__m0_8, > glob__0_25, > glob__0_125, > glob_h, > glob_nxt, > glob_prec, > glob_check_sign, > glob_desired_digits_correct, > glob_max_estimated_step_error, > glob_ratio_of_radius, > glob_percent_done, > glob_total_exp_sec, > glob_optimal_expect_sec, > glob_estimated_size_answer, > glob_almost_1, > glob_clock_sec, > glob_clock_start_sec, > glob_disp_incr, > glob_diff_rc_fm, > glob_diff_rc_fmm1, > glob_diff_rc_fmm2, > glob_diff_ord_fm, > glob_diff_ord_fmm1, > glob_diff_ord_fmm2, > glob_six_term_ord_save, > glob_guess_error_rc, > glob_guess_error_ord, > glob_least_given_sing, > glob_least_ratio_sing, > glob_least_3_sing, > glob_least_6_sing, > glob_last_good_h, > glob_max_h, > glob_min_h, > glob_display_interval, > glob_abserr, > glob_relerr, > glob_min_pole_est, > glob_max_rel_trunc_err, > glob_max_trunc_err, > glob_max_hours, > glob_optimal_clock_start_sec, > glob_optimal_start, > glob_upper_ratio_limit, > glob_lower_ratio_limit, > glob_max_sec, > glob_orig_start_sec, > glob_normmax, > glob_max_minutes, > glob_next_display, > glob_est_digits, > glob_subiter_method, > glob_html_log, > glob_min_good_digits, > glob_good_digits, > glob_min_apfp_est_good_digits, > glob_apfp_est_good_digits, > glob_max_opt_iter, > glob_dump, > glob_djd_debug, > glob_display_flag, > glob_djd_debug2, > glob_h_reason, > glob_sec_in_minute, > glob_min_in_hour, > glob_hours_in_day, > glob_days_in_year, > glob_sec_in_hour, > glob_sec_in_day, > glob_sec_in_year, > glob_not_yet_finished, > glob_initial_pass, > glob_not_yet_start_msg, > glob_reached_optimal_h, > glob_optimal_done, > glob_type_given_pole, > glob_optimize, > glob_look_poles, > glob_dump_closed_form, > glob_max_iter, > glob_no_eqs, > glob_unchanged_h_cnt, > glob_warned, > glob_warned2, > glob_start, > glob_iter, #Bottom Generate Globals Decl #BEGIN CONST > array_const_1, > array_const_0D0, > array_const_0D1, > array_const_0D2, #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, > array_tmp4_a1, > array_tmp4, > array_tmp5, > array_m1, > array_y_higher, > array_y_higher_work, > array_y_higher_work2, > array_y_set_initial, > array_given_rad_poles, > array_given_ord_poles, > array_rad_test_poles, > array_ord_test_poles, > array_fact_2, > ATS_MAX_TERMS, > glob_last; > local abserr, closed_form_val_y, ind_var, numeric_val, relerr, term_no, est_rel_err; > #TOP DISPLAY ALOT > ind_var := array_x[1]; > omniout_complex(ALWAYS,"x[1] ",33,ind_var,20," "); > term_no := 1; > numeric_val := array_y[term_no]; > omniout_complex(ALWAYS,"h ",33,glob_h,20," "); > omniout_complex(ALWAYS,"y[1] (numeric) ",33,numeric_val,20," "); > closed_form_val_y := evalf(exact_soln_y(ind_var)); > omniout_complex(ALWAYS,"y[1] (closed_form) ",33,closed_form_val_y,20," "); > abserr := float_abs(numeric_val - closed_form_val_y); > if (float_abs(closed_form_val_y) > 0.0) then # if number 3 > relerr := abserr/float_abs(closed_form_val_y); > if (float_abs(c(relerr)) > 0.0) then # if number 4 > glob_good_digits := round(-log10(relerr)); > else > relerr := 0.0 ; > glob_good_digits := Digits - 2; > fi;# end if 4; > else > ; > relerr := glob__m1 ; > glob_good_digits := -16; > fi;# end if 3; > if (glob_good_digits < glob_min_good_digits) then # if number 3 > glob_min_good_digits := glob_good_digits; > fi;# end if 3; > omniout_float(ALWAYS,"absolute error ",4,abserr,4," "); > omniout_float(ALWAYS,"relative error ",4,relerr * glob__100 ,4,"%"); > omniout_int(INFO,"Correct digits ",32,glob_good_digits,4," ") > ; > #BOTTOM DISPLAY ALOT > end; display_alot := proc(iter) local abserr, closed_form_val_y, ind_var, numeric_val, relerr, term_no, est_rel_err; global ALWAYS, INFO, DEBUGL, DEBUGMASSIVE, glob_iolevel, glob_yes_pole, glob_no_pole, glob_not_given, glob_no_sing_tests, glob_ratio_test, glob_three_term_test, glob_six_term_test, glob_log_10, MAX_UNCHANGED, glob__small, glob_small_float, glob_smallish_float, glob_large_float, glob_larger_float, glob__m2, glob__m1, glob__0, glob__1, glob__2, glob__3, glob__4, glob__5, glob__8, glob__10, glob__100, glob__pi, glob__0_5, glob__0_8, glob__m0_8, glob__0_25, glob__0_125, glob_h, glob_nxt, glob_prec, glob_check_sign, glob_desired_digits_correct, glob_max_estimated_step_error, glob_ratio_of_radius, glob_percent_done, glob_total_exp_sec, glob_optimal_expect_sec, glob_estimated_size_answer, glob_almost_1, glob_clock_sec, glob_clock_start_sec, glob_disp_incr, glob_diff_rc_fm, glob_diff_rc_fmm1, glob_diff_rc_fmm2, glob_diff_ord_fm, glob_diff_ord_fmm1, glob_diff_ord_fmm2, glob_six_term_ord_save, glob_guess_error_rc, glob_guess_error_ord, glob_least_given_sing, glob_least_ratio_sing, glob_least_3_sing, glob_least_6_sing, glob_last_good_h, glob_max_h, glob_min_h, glob_display_interval, glob_abserr, glob_relerr, glob_min_pole_est, glob_max_rel_trunc_err, glob_max_trunc_err, glob_max_hours, glob_optimal_clock_start_sec, glob_optimal_start, glob_upper_ratio_limit, glob_lower_ratio_limit, glob_max_sec, glob_orig_start_sec, glob_normmax, glob_max_minutes, glob_next_display, glob_est_digits, glob_subiter_method, glob_html_log, glob_min_good_digits, glob_good_digits, glob_min_apfp_est_good_digits, glob_apfp_est_good_digits, glob_max_opt_iter, glob_dump, glob_djd_debug, glob_display_flag, glob_djd_debug2, glob_h_reason, glob_sec_in_minute, glob_min_in_hour, glob_hours_in_day, glob_days_in_year, glob_sec_in_hour, glob_sec_in_day, glob_sec_in_year, glob_not_yet_finished, glob_initial_pass, glob_not_yet_start_msg, glob_reached_optimal_h, glob_optimal_done, glob_type_given_pole, glob_optimize, glob_look_poles, glob_dump_closed_form, glob_max_iter, glob_no_eqs, glob_unchanged_h_cnt, glob_warned, glob_warned2, glob_start, glob_iter, array_const_1, array_const_0D0, array_const_0D1, array_const_0D2, 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, array_tmp4_a1, array_tmp4, array_tmp5, array_m1, array_y_higher, array_y_higher_work, array_y_higher_work2, array_y_set_initial, array_given_rad_poles, array_given_ord_poles, array_rad_test_poles, array_ord_test_poles, array_fact_2, ATS_MAX_TERMS, glob_last; ind_var := array_x[1]; omniout_complex(ALWAYS, "x[1] ", 33, ind_var, 20, " "); term_no := 1; numeric_val := array_y[term_no]; omniout_complex(ALWAYS, "h ", 33, glob_h, 20, " "); omniout_complex(ALWAYS, "y[1] (numeric) ", 33, numeric_val, 20, " "); closed_form_val_y := evalf(exact_soln_y(ind_var)); omniout_complex(ALWAYS, "y[1] (closed_form) ", 33, closed_form_val_y, 20, " "); abserr := float_abs(numeric_val - closed_form_val_y); if 0. < float_abs(closed_form_val_y) then relerr := abserr/float_abs(closed_form_val_y); if 0. < float_abs(c(relerr)) then glob_good_digits := round(-log10(relerr)) else relerr := 0.; glob_good_digits := Digits - 2 end if else relerr := glob__m1; glob_good_digits := -16 end if; if glob_good_digits < glob_min_good_digits then glob_min_good_digits := glob_good_digits end if; omniout_float(ALWAYS, "absolute error ", 4, abserr, 4, " "); omniout_float(ALWAYS, "relative error ", 4, relerr*glob__100, 4, "%"); omniout_int(INFO, "Correct digits ", 32, glob_good_digits, 4, " ") end proc # End Function number 8 # Begin Function number 9 > prog_report := proc(x_start,x_end) > global > ALWAYS, > INFO, > DEBUGL, > DEBUGMASSIVE, > glob_iolevel, > glob_yes_pole, > glob_no_pole, > glob_not_given, > glob_no_sing_tests, > glob_ratio_test, > glob_three_term_test, > glob_six_term_test, > glob_log_10, #Top Generate Globals Decl > MAX_UNCHANGED, > glob__small, > glob_small_float, > glob_smallish_float, > glob_large_float, > glob_larger_float, > glob__m2, > glob__m1, > glob__0, > glob__1, > glob__2, > glob__3, > glob__4, > glob__5, > glob__8, > glob__10, > glob__100, > glob__pi, > glob__0_5, > glob__0_8, > glob__m0_8, > glob__0_25, > glob__0_125, > glob_h, > glob_nxt, > glob_prec, > glob_check_sign, > glob_desired_digits_correct, > glob_max_estimated_step_error, > glob_ratio_of_radius, > glob_percent_done, > glob_total_exp_sec, > glob_optimal_expect_sec, > glob_estimated_size_answer, > glob_almost_1, > glob_clock_sec, > glob_clock_start_sec, > glob_disp_incr, > glob_diff_rc_fm, > glob_diff_rc_fmm1, > glob_diff_rc_fmm2, > glob_diff_ord_fm, > glob_diff_ord_fmm1, > glob_diff_ord_fmm2, > glob_six_term_ord_save, > glob_guess_error_rc, > glob_guess_error_ord, > glob_least_given_sing, > glob_least_ratio_sing, > glob_least_3_sing, > glob_least_6_sing, > glob_last_good_h, > glob_max_h, > glob_min_h, > glob_display_interval, > glob_abserr, > glob_relerr, > glob_min_pole_est, > glob_max_rel_trunc_err, > glob_max_trunc_err, > glob_max_hours, > glob_optimal_clock_start_sec, > glob_optimal_start, > glob_upper_ratio_limit, > glob_lower_ratio_limit, > glob_max_sec, > glob_orig_start_sec, > glob_normmax, > glob_max_minutes, > glob_next_display, > glob_est_digits, > glob_subiter_method, > glob_html_log, > glob_min_good_digits, > glob_good_digits, > glob_min_apfp_est_good_digits, > glob_apfp_est_good_digits, > glob_max_opt_iter, > glob_dump, > glob_djd_debug, > glob_display_flag, > glob_djd_debug2, > glob_h_reason, > glob_sec_in_minute, > glob_min_in_hour, > glob_hours_in_day, > glob_days_in_year, > glob_sec_in_hour, > glob_sec_in_day, > glob_sec_in_year, > glob_not_yet_finished, > glob_initial_pass, > glob_not_yet_start_msg, > glob_reached_optimal_h, > glob_optimal_done, > glob_type_given_pole, > glob_optimize, > glob_look_poles, > glob_dump_closed_form, > glob_max_iter, > glob_no_eqs, > glob_unchanged_h_cnt, > glob_warned, > glob_warned2, > glob_start, > glob_iter, #Bottom Generate Globals Decl #BEGIN CONST > array_const_1, > array_const_0D0, > array_const_0D1, > array_const_0D2, #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, > array_tmp4_a1, > array_tmp4, > array_tmp5, > array_m1, > array_y_higher, > array_y_higher_work, > array_y_higher_work2, > array_y_set_initial, > array_given_rad_poles, > array_given_ord_poles, > array_rad_test_poles, > array_ord_test_poles, > array_fact_2, > ATS_MAX_TERMS, > glob_last; > local clock_sec, opt_clock_sec, clock_sec1, expect_sec, left_sec, percent_done, total_clock_sec; > #TOP PROGRESS REPORT > clock_sec1 := elapsed_time_seconds(); > total_clock_sec := (clock_sec1) - (glob_orig_start_sec); > glob_clock_sec := (clock_sec1) - (glob_clock_start_sec); > left_sec := (glob_max_sec) + (glob_orig_start_sec) - (clock_sec1); > expect_sec := comp_expect_sec((x_end),(x_start),(array_x[1]) + (glob_h) ,( clock_sec1) - (glob_orig_start_sec)); > opt_clock_sec := ( clock_sec1) - (glob_optimal_clock_start_sec); > glob_optimal_expect_sec := comp_expect_sec((x_end),(x_start),(array_x[1]) +( glob_h) ,( opt_clock_sec)); > glob_total_exp_sec := glob_optimal_expect_sec + c(total_clock_sec); > percent_done := comp_percent((x_end),(x_start),(array_x[1]) + (glob_h)); > glob_percent_done := percent_done; > omniout_str_noeol(INFO,"Total Elapsed Time "); > omniout_timestr((total_clock_sec)); > if (c(percent_done) < glob__100) then # if number 3 > omniout_str_noeol(INFO,"Expected Time Remaining "); > omniout_timestr((expect_sec)); > omniout_str_noeol(INFO,"Optimized Time Remaining "); > omniout_timestr((glob_optimal_expect_sec)); > omniout_str_noeol(INFO,"Expected Total Time "); > omniout_timestr((glob_total_exp_sec)); > fi;# end if 3; > #BOTTOM PROGRESS REPORT > end; prog_report := proc(x_start, x_end) local clock_sec, opt_clock_sec, clock_sec1, expect_sec, left_sec, percent_done, total_clock_sec; global ALWAYS, INFO, DEBUGL, DEBUGMASSIVE, glob_iolevel, glob_yes_pole, glob_no_pole, glob_not_given, glob_no_sing_tests, glob_ratio_test, glob_three_term_test, glob_six_term_test, glob_log_10, MAX_UNCHANGED, glob__small, glob_small_float, glob_smallish_float, glob_large_float, glob_larger_float, glob__m2, glob__m1, glob__0, glob__1, glob__2, glob__3, glob__4, glob__5, glob__8, glob__10, glob__100, glob__pi, glob__0_5, glob__0_8, glob__m0_8, glob__0_25, glob__0_125, glob_h, glob_nxt, glob_prec, glob_check_sign, glob_desired_digits_correct, glob_max_estimated_step_error, glob_ratio_of_radius, glob_percent_done, glob_total_exp_sec, glob_optimal_expect_sec, glob_estimated_size_answer, glob_almost_1, glob_clock_sec, glob_clock_start_sec, glob_disp_incr, glob_diff_rc_fm, glob_diff_rc_fmm1, glob_diff_rc_fmm2, glob_diff_ord_fm, glob_diff_ord_fmm1, glob_diff_ord_fmm2, glob_six_term_ord_save, glob_guess_error_rc, glob_guess_error_ord, glob_least_given_sing, glob_least_ratio_sing, glob_least_3_sing, glob_least_6_sing, glob_last_good_h, glob_max_h, glob_min_h, glob_display_interval, glob_abserr, glob_relerr, glob_min_pole_est, glob_max_rel_trunc_err, glob_max_trunc_err, glob_max_hours, glob_optimal_clock_start_sec, glob_optimal_start, glob_upper_ratio_limit, glob_lower_ratio_limit, glob_max_sec, glob_orig_start_sec, glob_normmax, glob_max_minutes, glob_next_display, glob_est_digits, glob_subiter_method, glob_html_log, glob_min_good_digits, glob_good_digits, glob_min_apfp_est_good_digits, glob_apfp_est_good_digits, glob_max_opt_iter, glob_dump, glob_djd_debug, glob_display_flag, glob_djd_debug2, glob_h_reason, glob_sec_in_minute, glob_min_in_hour, glob_hours_in_day, glob_days_in_year, glob_sec_in_hour, glob_sec_in_day, glob_sec_in_year, glob_not_yet_finished, glob_initial_pass, glob_not_yet_start_msg, glob_reached_optimal_h, glob_optimal_done, glob_type_given_pole, glob_optimize, glob_look_poles, glob_dump_closed_form, glob_max_iter, glob_no_eqs, glob_unchanged_h_cnt, glob_warned, glob_warned2, glob_start, glob_iter, array_const_1, array_const_0D0, array_const_0D1, array_const_0D2, 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, array_tmp4_a1, array_tmp4, array_tmp5, array_m1, array_y_higher, array_y_higher_work, array_y_higher_work2, array_y_set_initial, array_given_rad_poles, array_given_ord_poles, array_rad_test_poles, array_ord_test_poles, array_fact_2, ATS_MAX_TERMS, glob_last; clock_sec1 := elapsed_time_seconds(); total_clock_sec := clock_sec1 - glob_orig_start_sec; glob_clock_sec := clock_sec1 - glob_clock_start_sec; left_sec := glob_max_sec + glob_orig_start_sec - clock_sec1; expect_sec := comp_expect_sec(x_end, x_start, array_x[1] + glob_h, clock_sec1 - glob_orig_start_sec); opt_clock_sec := clock_sec1 - glob_optimal_clock_start_sec; glob_optimal_expect_sec := comp_expect_sec(x_end, x_start, array_x[1] + glob_h, opt_clock_sec) ; glob_total_exp_sec := glob_optimal_expect_sec + c(total_clock_sec); percent_done := comp_percent(x_end, x_start, array_x[1] + glob_h); glob_percent_done := percent_done; omniout_str_noeol(INFO, "Total Elapsed Time "); omniout_timestr(total_clock_sec); if c(percent_done) < glob__100 then omniout_str_noeol(INFO, "Expected Time Remaining "); omniout_timestr(expect_sec); omniout_str_noeol(INFO, "Optimized Time Remaining "); omniout_timestr(glob_optimal_expect_sec); omniout_str_noeol(INFO, "Expected Total Time "); omniout_timestr(glob_total_exp_sec) end if end proc # End Function number 9 # Begin Function number 10 > check_for_pole := proc() > global > ALWAYS, > INFO, > DEBUGL, > DEBUGMASSIVE, > glob_iolevel, > glob_yes_pole, > glob_no_pole, > glob_not_given, > glob_no_sing_tests, > glob_ratio_test, > glob_three_term_test, > glob_six_term_test, > glob_log_10, #Top Generate Globals Decl > MAX_UNCHANGED, > glob__small, > glob_small_float, > glob_smallish_float, > glob_large_float, > glob_larger_float, > glob__m2, > glob__m1, > glob__0, > glob__1, > glob__2, > glob__3, > glob__4, > glob__5, > glob__8, > glob__10, > glob__100, > glob__pi, > glob__0_5, > glob__0_8, > glob__m0_8, > glob__0_25, > glob__0_125, > glob_h, > glob_nxt, > glob_prec, > glob_check_sign, > glob_desired_digits_correct, > glob_max_estimated_step_error, > glob_ratio_of_radius, > glob_percent_done, > glob_total_exp_sec, > glob_optimal_expect_sec, > glob_estimated_size_answer, > glob_almost_1, > glob_clock_sec, > glob_clock_start_sec, > glob_disp_incr, > glob_diff_rc_fm, > glob_diff_rc_fmm1, > glob_diff_rc_fmm2, > glob_diff_ord_fm, > glob_diff_ord_fmm1, > glob_diff_ord_fmm2, > glob_six_term_ord_save, > glob_guess_error_rc, > glob_guess_error_ord, > glob_least_given_sing, > glob_least_ratio_sing, > glob_least_3_sing, > glob_least_6_sing, > glob_last_good_h, > glob_max_h, > glob_min_h, > glob_display_interval, > glob_abserr, > glob_relerr, > glob_min_pole_est, > glob_max_rel_trunc_err, > glob_max_trunc_err, > glob_max_hours, > glob_optimal_clock_start_sec, > glob_optimal_start, > glob_upper_ratio_limit, > glob_lower_ratio_limit, > glob_max_sec, > glob_orig_start_sec, > glob_normmax, > glob_max_minutes, > glob_next_display, > glob_est_digits, > glob_subiter_method, > glob_html_log, > glob_min_good_digits, > glob_good_digits, > glob_min_apfp_est_good_digits, > glob_apfp_est_good_digits, > glob_max_opt_iter, > glob_dump, > glob_djd_debug, > glob_display_flag, > glob_djd_debug2, > glob_h_reason, > glob_sec_in_minute, > glob_min_in_hour, > glob_hours_in_day, > glob_days_in_year, > glob_sec_in_hour, > glob_sec_in_day, > glob_sec_in_year, > glob_not_yet_finished, > glob_initial_pass, > glob_not_yet_start_msg, > glob_reached_optimal_h, > glob_optimal_done, > glob_type_given_pole, > glob_optimize, > glob_look_poles, > glob_dump_closed_form, > glob_max_iter, > glob_no_eqs, > glob_unchanged_h_cnt, > glob_warned, > glob_warned2, > glob_start, > glob_iter, #Bottom Generate Globals Decl #BEGIN CONST > array_const_1, > array_const_0D0, > array_const_0D1, > array_const_0D2, #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, > array_tmp4_a1, > array_tmp4, > array_tmp5, > array_m1, > array_y_higher, > array_y_higher_work, > array_y_higher_work2, > array_y_set_initial, > array_given_rad_poles, > array_given_ord_poles, > array_rad_test_poles, > array_ord_test_poles, > array_fact_2, > ATS_MAX_TERMS, > glob_last; > local cnt, dr1, dr2, ds1, ds2, hdrc, m, n, nr1, nr2, ord_no, term1, term2, term3, part1, part2, part3, part4, part5, part6, part7, part8, part9, part10, part11, part12, part13, part14, rad_c, rcs, rm0, rm1, rm2, rm3, rm4, found_sing, h_new, ratio, term, local_test, tmp_rad,tmp_ord, tmp_ratio, prev_tmp_rad, last_no; > #TOP CHECK FOR POLE > tmp_rad := glob_larger_float; > prev_tmp_rad := glob_larger_float; > tmp_ratio := glob_larger_float; > rad_c := glob_larger_float; > array_rad_test_poles[1,1] := glob_larger_float; > array_ord_test_poles[1,1] := glob_larger_float; > found_sing := 1; > last_no := ATS_MAX_TERMS - 1 - 10; > cnt := 0; > while (last_no < ATS_MAX_TERMS-3 and found_sing = 1) do # do number 1 > tmp_rad := comp_rad_from_ratio(array_y_higher[1,last_no-1],array_y_higher[1,last_no],last_no); > if (float_abs(prev_tmp_rad) > glob__0) then # if number 3 > tmp_ratio := tmp_rad / prev_tmp_rad; > else > tmp_ratio := glob_large_float; > fi;# end if 3; > if ((cnt > 0 ) and (tmp_ratio < glob_upper_ratio_limit) and (tmp_ratio > glob_lower_ratio_limit)) then # if number 3 > rad_c := tmp_rad; > elif > (cnt = 0) then # if number 4 > rad_c := tmp_rad; > elif > (cnt > 0) then # if number 5 > found_sing := 0; > fi;# end if 5; > prev_tmp_rad := tmp_rad;; > cnt := cnt + 1; > last_no := last_no + 1; > od;# end do number 1; > if (found_sing = 1) then # if number 5 > if (rad_c < array_rad_test_poles[1,1]) then # if number 6 > array_rad_test_poles[1,1] := rad_c; > last_no := last_no - 1; > tmp_ord := comp_ord_from_ratio(array_y_higher[1,last_no-1],array_y_higher[1,last_no],last_no); > array_rad_test_poles[1,1] := rad_c; > array_ord_test_poles[1,1] := tmp_ord; > fi;# end if 6; > fi;# end if 5; > #BOTTOM general radius test1 > tmp_rad := glob_larger_float; > prev_tmp_rad := glob_larger_float; > tmp_ratio := glob_larger_float; > rad_c := glob_larger_float; > array_rad_test_poles[1,2] := glob_larger_float; > array_ord_test_poles[1,2] := glob_larger_float; > found_sing := 1; > last_no := ATS_MAX_TERMS - 1 - 10; > cnt := 0; > while (last_no < ATS_MAX_TERMS-4 and found_sing = 1) do # do number 1 > tmp_rad := comp_rad_from_three_terms(array_y_higher[1,last_no-2],array_y_higher[1,last_no-1],array_y_higher[1,last_no],last_no); > if (float_abs(prev_tmp_rad) > glob__0) then # if number 5 > tmp_ratio := tmp_rad / prev_tmp_rad; > else > tmp_ratio := glob_large_float; > fi;# end if 5; > if ((cnt > 0 ) and (tmp_ratio < glob_upper_ratio_limit) and (tmp_ratio > glob_lower_ratio_limit)) then # if number 5 > rad_c := tmp_rad; > elif > (cnt = 0) then # if number 6 > rad_c := tmp_rad; > elif > (cnt > 0) then # if number 7 > found_sing := 0; > fi;# end if 7; > prev_tmp_rad := tmp_rad;; > cnt := cnt + 1; > last_no := last_no + 1; > od;# end do number 1; > if (found_sing = 1) then # if number 7 > if (rad_c < array_rad_test_poles[1,2]) then # if number 8 > array_rad_test_poles[1,2] := rad_c; > last_no := last_no - 1; > tmp_ord := comp_ord_from_three_terms(array_y_higher[1,last_no-2],array_y_higher[1,last_no-1],array_y_higher[1,last_no],last_no); > array_rad_test_poles[1,2] := rad_c; > if (rad_c < glob_min_pole_est) then # if number 9 > glob_min_pole_est := rad_c; > fi;# end if 9; > array_ord_test_poles[1,2] := tmp_ord; > fi;# end if 8; > fi;# end if 7; > #BOTTOM general radius test1 > tmp_rad := glob_larger_float; > prev_tmp_rad := glob_larger_float; > tmp_ratio := glob_larger_float; > rad_c := glob_larger_float; > array_rad_test_poles[1,3] := glob_larger_float; > array_ord_test_poles[1,3] := glob_larger_float; > found_sing := 1; > last_no := ATS_MAX_TERMS - 1 - 10; > cnt := 0; > while (last_no < ATS_MAX_TERMS-7 and found_sing = 1) do # do number 1 > tmp_rad := comp_rad_from_six_terms(array_y_higher[1,last_no-5],array_y_higher[1,last_no-4],array_y_higher[1,last_no-3],array_y_higher[1,last_no-2],array_y_higher[1,last_no-1],array_y_higher[1,last_no],last_no); > if (float_abs(prev_tmp_rad) > glob__0) then # if number 7 > tmp_ratio := tmp_rad / prev_tmp_rad; > else > tmp_ratio := glob_large_float; > fi;# end if 7; > if ((cnt > 0 ) and (tmp_ratio < glob_upper_ratio_limit) and (tmp_ratio > glob_lower_ratio_limit)) then # if number 7 > rad_c := tmp_rad; > elif > (cnt = 0) then # if number 8 > rad_c := tmp_rad; > elif > (cnt > 0) then # if number 9 > found_sing := 0; > fi;# end if 9; > prev_tmp_rad := tmp_rad;; > cnt := cnt + 1; > last_no := last_no + 1; > od;# end do number 1; > if (found_sing = 1) then # if number 9 > if (rad_c < array_rad_test_poles[1,3]) then # if number 10 > array_rad_test_poles[1,3] := rad_c; > last_no := last_no - 1; > tmp_ord := comp_ord_from_six_terms(array_y_higher[1,last_no-5],array_y_higher[1,last_no-4],array_y_higher[1,last_no-3],array_y_higher[1,last_no-2],array_y_higher[1,last_no-1],array_y_higher[1,last_no],last_no); > array_rad_test_poles[1,3] := rad_c; > if (rad_c < glob_min_pole_est) then # if number 11 > glob_min_pole_est := rad_c; > fi;# end if 11; > array_ord_test_poles[1,3] := tmp_ord; > fi;# end if 10; > fi;# end if 9; > #BOTTOM general radius test1 > ; > if (true) then # if number 9 > display_poles(); > fi;# end if 9 > end; check_for_pole := proc() local cnt, dr1, dr2, ds1, ds2, hdrc, m, n, nr1, nr2, ord_no, term1, term2, term3, part1, part2, part3, part4, part5, part6, part7, part8, part9, part10, part11, part12, part13, part14, rad_c, rcs, rm0, rm1, rm2, rm3, rm4, found_sing, h_new, ratio, term, local_test, tmp_rad, tmp_ord, tmp_ratio, prev_tmp_rad, last_no; global ALWAYS, INFO, DEBUGL, DEBUGMASSIVE, glob_iolevel, glob_yes_pole, glob_no_pole, glob_not_given, glob_no_sing_tests, glob_ratio_test, glob_three_term_test, glob_six_term_test, glob_log_10, MAX_UNCHANGED, glob__small, glob_small_float, glob_smallish_float, glob_large_float, glob_larger_float, glob__m2, glob__m1, glob__0, glob__1, glob__2, glob__3, glob__4, glob__5, glob__8, glob__10, glob__100, glob__pi, glob__0_5, glob__0_8, glob__m0_8, glob__0_25, glob__0_125, glob_h, glob_nxt, glob_prec, glob_check_sign, glob_desired_digits_correct, glob_max_estimated_step_error, glob_ratio_of_radius, glob_percent_done, glob_total_exp_sec, glob_optimal_expect_sec, glob_estimated_size_answer, glob_almost_1, glob_clock_sec, glob_clock_start_sec, glob_disp_incr, glob_diff_rc_fm, glob_diff_rc_fmm1, glob_diff_rc_fmm2, glob_diff_ord_fm, glob_diff_ord_fmm1, glob_diff_ord_fmm2, glob_six_term_ord_save, glob_guess_error_rc, glob_guess_error_ord, glob_least_given_sing, glob_least_ratio_sing, glob_least_3_sing, glob_least_6_sing, glob_last_good_h, glob_max_h, glob_min_h, glob_display_interval, glob_abserr, glob_relerr, glob_min_pole_est, glob_max_rel_trunc_err, glob_max_trunc_err, glob_max_hours, glob_optimal_clock_start_sec, glob_optimal_start, glob_upper_ratio_limit, glob_lower_ratio_limit, glob_max_sec, glob_orig_start_sec, glob_normmax, glob_max_minutes, glob_next_display, glob_est_digits, glob_subiter_method, glob_html_log, glob_min_good_digits, glob_good_digits, glob_min_apfp_est_good_digits, glob_apfp_est_good_digits, glob_max_opt_iter, glob_dump, glob_djd_debug, glob_display_flag, glob_djd_debug2, glob_h_reason, glob_sec_in_minute, glob_min_in_hour, glob_hours_in_day, glob_days_in_year, glob_sec_in_hour, glob_sec_in_day, glob_sec_in_year, glob_not_yet_finished, glob_initial_pass, glob_not_yet_start_msg, glob_reached_optimal_h, glob_optimal_done, glob_type_given_pole, glob_optimize, glob_look_poles, glob_dump_closed_form, glob_max_iter, glob_no_eqs, glob_unchanged_h_cnt, glob_warned, glob_warned2, glob_start, glob_iter, array_const_1, array_const_0D0, array_const_0D1, array_const_0D2, 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, array_tmp4_a1, array_tmp4, array_tmp5, array_m1, array_y_higher, array_y_higher_work, array_y_higher_work2, array_y_set_initial, array_given_rad_poles, array_given_ord_poles, array_rad_test_poles, array_ord_test_poles, array_fact_2, ATS_MAX_TERMS, glob_last; tmp_rad := glob_larger_float; prev_tmp_rad := glob_larger_float; tmp_ratio := glob_larger_float; rad_c := glob_larger_float; array_rad_test_poles[1, 1] := glob_larger_float; array_ord_test_poles[1, 1] := glob_larger_float; found_sing := 1; last_no := ATS_MAX_TERMS - 11; cnt := 0; while last_no < ATS_MAX_TERMS - 3 and found_sing = 1 do tmp_rad := comp_rad_from_ratio(array_y_higher[1, last_no - 1], array_y_higher[1, last_no], last_no); if glob__0 < float_abs(prev_tmp_rad) then tmp_ratio := tmp_rad/prev_tmp_rad else tmp_ratio := glob_large_float end if; if 0 < cnt and tmp_ratio < glob_upper_ratio_limit and glob_lower_ratio_limit < tmp_ratio then rad_c := tmp_rad elif cnt = 0 then rad_c := tmp_rad elif 0 < cnt then found_sing := 0 end if; prev_tmp_rad := tmp_rad; cnt := cnt + 1; last_no := last_no + 1 end do; if found_sing = 1 then if rad_c < array_rad_test_poles[1, 1] then array_rad_test_poles[1, 1] := rad_c; last_no := last_no - 1; tmp_ord := comp_ord_from_ratio(array_y_higher[1, last_no - 1], array_y_higher[1, last_no], last_no); array_rad_test_poles[1, 1] := rad_c; array_ord_test_poles[1, 1] := tmp_ord end if end if; tmp_rad := glob_larger_float; prev_tmp_rad := glob_larger_float; tmp_ratio := glob_larger_float; rad_c := glob_larger_float; array_rad_test_poles[1, 2] := glob_larger_float; array_ord_test_poles[1, 2] := glob_larger_float; found_sing := 1; last_no := ATS_MAX_TERMS - 11; cnt := 0; while last_no < ATS_MAX_TERMS - 4 and found_sing = 1 do tmp_rad := comp_rad_from_three_terms( array_y_higher[1, last_no - 2], array_y_higher[1, last_no - 1], array_y_higher[1, last_no], last_no); if glob__0 < float_abs(prev_tmp_rad) then tmp_ratio := tmp_rad/prev_tmp_rad else tmp_ratio := glob_large_float end if; if 0 < cnt and tmp_ratio < glob_upper_ratio_limit and glob_lower_ratio_limit < tmp_ratio then rad_c := tmp_rad elif cnt = 0 then rad_c := tmp_rad elif 0 < cnt then found_sing := 0 end if; prev_tmp_rad := tmp_rad; cnt := cnt + 1; last_no := last_no + 1 end do; if found_sing = 1 then if rad_c < array_rad_test_poles[1, 2] then array_rad_test_poles[1, 2] := rad_c; last_no := last_no - 1; tmp_ord := comp_ord_from_three_terms( array_y_higher[1, last_no - 2], array_y_higher[1, last_no - 1], array_y_higher[1, last_no], last_no); array_rad_test_poles[1, 2] := rad_c; if rad_c < glob_min_pole_est then glob_min_pole_est := rad_c end if; array_ord_test_poles[1, 2] := tmp_ord end if end if; tmp_rad := glob_larger_float; prev_tmp_rad := glob_larger_float; tmp_ratio := glob_larger_float; rad_c := glob_larger_float; array_rad_test_poles[1, 3] := glob_larger_float; array_ord_test_poles[1, 3] := glob_larger_float; found_sing := 1; last_no := ATS_MAX_TERMS - 11; cnt := 0; while last_no < ATS_MAX_TERMS - 7 and found_sing = 1 do tmp_rad := comp_rad_from_six_terms(array_y_higher[1, last_no - 5], array_y_higher[1, last_no - 4], array_y_higher[1, last_no - 3], array_y_higher[1, last_no - 2], array_y_higher[1, last_no - 1], array_y_higher[1, last_no], last_no); if glob__0 < float_abs(prev_tmp_rad) then tmp_ratio := tmp_rad/prev_tmp_rad else tmp_ratio := glob_large_float end if; if 0 < cnt and tmp_ratio < glob_upper_ratio_limit and glob_lower_ratio_limit < tmp_ratio then rad_c := tmp_rad elif cnt = 0 then rad_c := tmp_rad elif 0 < cnt then found_sing := 0 end if; prev_tmp_rad := tmp_rad; cnt := cnt + 1; last_no := last_no + 1 end do; if found_sing = 1 then if rad_c < array_rad_test_poles[1, 3] then array_rad_test_poles[1, 3] := rad_c; last_no := last_no - 1; tmp_ord := comp_ord_from_six_terms( array_y_higher[1, last_no - 5], array_y_higher[1, last_no - 4], array_y_higher[1, last_no - 3], array_y_higher[1, last_no - 2], array_y_higher[1, last_no - 1], array_y_higher[1, last_no], last_no); array_rad_test_poles[1, 3] := rad_c; if rad_c < glob_min_pole_est then glob_min_pole_est := rad_c end if; array_ord_test_poles[1, 3] := tmp_ord end if end if; display_poles() end proc # End Function number 10 # Begin Function number 11 > atomall := proc() > global > ALWAYS, > INFO, > DEBUGL, > DEBUGMASSIVE, > glob_iolevel, > glob_yes_pole, > glob_no_pole, > glob_not_given, > glob_no_sing_tests, > glob_ratio_test, > glob_three_term_test, > glob_six_term_test, > glob_log_10, #Top Generate Globals Decl > MAX_UNCHANGED, > glob__small, > glob_small_float, > glob_smallish_float, > glob_large_float, > glob_larger_float, > glob__m2, > glob__m1, > glob__0, > glob__1, > glob__2, > glob__3, > glob__4, > glob__5, > glob__8, > glob__10, > glob__100, > glob__pi, > glob__0_5, > glob__0_8, > glob__m0_8, > glob__0_25, > glob__0_125, > glob_h, > glob_nxt, > glob_prec, > glob_check_sign, > glob_desired_digits_correct, > glob_max_estimated_step_error, > glob_ratio_of_radius, > glob_percent_done, > glob_total_exp_sec, > glob_optimal_expect_sec, > glob_estimated_size_answer, > glob_almost_1, > glob_clock_sec, > glob_clock_start_sec, > glob_disp_incr, > glob_diff_rc_fm, > glob_diff_rc_fmm1, > glob_diff_rc_fmm2, > glob_diff_ord_fm, > glob_diff_ord_fmm1, > glob_diff_ord_fmm2, > glob_six_term_ord_save, > glob_guess_error_rc, > glob_guess_error_ord, > glob_least_given_sing, > glob_least_ratio_sing, > glob_least_3_sing, > glob_least_6_sing, > glob_last_good_h, > glob_max_h, > glob_min_h, > glob_display_interval, > glob_abserr, > glob_relerr, > glob_min_pole_est, > glob_max_rel_trunc_err, > glob_max_trunc_err, > glob_max_hours, > glob_optimal_clock_start_sec, > glob_optimal_start, > glob_upper_ratio_limit, > glob_lower_ratio_limit, > glob_max_sec, > glob_orig_start_sec, > glob_normmax, > glob_max_minutes, > glob_next_display, > glob_est_digits, > glob_subiter_method, > glob_html_log, > glob_min_good_digits, > glob_good_digits, > glob_min_apfp_est_good_digits, > glob_apfp_est_good_digits, > glob_max_opt_iter, > glob_dump, > glob_djd_debug, > glob_display_flag, > glob_djd_debug2, > glob_h_reason, > glob_sec_in_minute, > glob_min_in_hour, > glob_hours_in_day, > glob_days_in_year, > glob_sec_in_hour, > glob_sec_in_day, > glob_sec_in_year, > glob_not_yet_finished, > glob_initial_pass, > glob_not_yet_start_msg, > glob_reached_optimal_h, > glob_optimal_done, > glob_type_given_pole, > glob_optimize, > glob_look_poles, > glob_dump_closed_form, > glob_max_iter, > glob_no_eqs, > glob_unchanged_h_cnt, > glob_warned, > glob_warned2, > glob_start, > glob_iter, #Bottom Generate Globals Decl #BEGIN CONST > array_const_1, > array_const_0D0, > array_const_0D1, > array_const_0D2, #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, > array_tmp4_a1, > array_tmp4, > array_tmp5, > array_m1, > array_y_higher, > array_y_higher_work, > array_y_higher_work2, > array_y_set_initial, > array_given_rad_poles, > array_given_ord_poles, > array_rad_test_poles, > array_ord_test_poles, > array_fact_2, > ATS_MAX_TERMS, > glob_last; > local kkk, order_d, adj2, adj3 , temporary, term; > #TOP ATOMALL > # before write maple main top matter > # before generate constants assign > # before generate globals assign > #END OUTFILE1 > #BEGIN OUTFILE2 > #END OUTFILE2 > #BEGIN ATOMHDR1 > #emit pre mult CONST - LINEAR $eq_no = 1 i = 1 > array_tmp1[1] := array_const_0D1[1] * array_x[1]; > #emit pre add LINEAR - CONST $eq_no = 1 i = 1 > array_tmp2[1] := array_tmp1[1] + array_const_0D2[1]; > #emit pre sqrt 1 $eq_no = 1 > array_tmp3[1] := sqrt(array_tmp2[1]); > #emit pre arccos FULL $eq_no = 1 > array_tmp4[1] := arccos(array_tmp3[1]); > array_tmp4_a1[1] := sin(array_tmp4[1]); > #emit pre add CONST FULL $eq_no = 1 i = 1 > array_tmp5[1] := array_const_0D0[1] + array_tmp4[1]; > #emit pre assign xxx $eq_no = 1 i = 1 $min_hdrs = 5 > if ( not array_y_set_initial[1,2]) then # if number 1 > if (1 <= ATS_MAX_TERMS) then # if number 2 > temporary := c(array_tmp5[1]) * (expt((glob_h) , c(1))) * c(factorial_3(0,1)); > if (2 <= ATS_MAX_TERMS) then # if number 3 > array_y[2] := temporary; > array_y_higher[1,2] := temporary; > fi;# end if 3; > temporary := c(temporary) / c(glob_h) * c(1); > array_y_higher[2,1] := c(temporary); > fi;# end if 2; > fi;# end if 1; > kkk := 2; > #END ATOMHDR1 > #BEGIN ATOMHDR2 > #emit pre mult CONST - LINEAR $eq_no = 1 i = 2 > array_tmp1[2] := array_const_0D1[1] * array_x[2]; > #emit pre add LINEAR - CONST $eq_no = 1 i = 2 > array_tmp2[2] := array_tmp1[2]; > #emit pre sqrt 2 $eq_no = 1 > array_tmp3[2] := array_tmp2[2] / array_tmp3[1]/glob__2; > #emit pre arccos FULL $eq_no = 1 > temp := att(1,array_tmp4_a1,array_tmp4,2); > array_tmp4[2] := neg(array_tmp3[2] + temp) / array_tmp4_a1[1]; > temp2 := att(1,array_tmp3,array_tmp4,1); > array_tmp4_a1[2] := temp2; > #emit pre add CONST FULL $eq_no = 1 i = 2 > array_tmp5[2] := array_tmp4[2]; > #emit pre assign xxx $eq_no = 1 i = 2 $min_hdrs = 5 > if ( not array_y_set_initial[1,3]) then # if number 1 > if (2 <= ATS_MAX_TERMS) then # if number 2 > temporary := c(array_tmp5[2]) * (expt((glob_h) , c(1))) * c(factorial_3(1,2)); > if (3 <= ATS_MAX_TERMS) then # if number 3 > array_y[3] := temporary; > array_y_higher[1,3] := temporary; > fi;# end if 3; > temporary := c(temporary) / c(glob_h) * c(2); > array_y_higher[2,2] := c(temporary); > fi;# end if 2; > fi;# end if 1; > kkk := 3; > #END ATOMHDR2 > #BEGIN ATOMHDR3 > #emit pre sqrt ID_LINEAR iii = 3 $eq_no = 1 > array_tmp3[3] := 0; > array_tmp3[3] := neg(ats(3,array_tmp3,array_tmp3,2)) / array_tmp3[1] /glob__2; > #emit pre arccos FULL $eq_no = 1 > temp := att(2,array_tmp4_a1,array_tmp4,2); > array_tmp4[3] := neg(array_tmp3[3] + temp) / array_tmp4_a1[1]; > temp2 := att(2,array_tmp3,array_tmp4,1); > array_tmp4_a1[3] := temp2; > #emit pre add CONST FULL $eq_no = 1 i = 3 > array_tmp5[3] := array_tmp4[3]; > #emit pre assign xxx $eq_no = 1 i = 3 $min_hdrs = 5 > if ( not array_y_set_initial[1,4]) then # if number 1 > if (3 <= ATS_MAX_TERMS) then # if number 2 > temporary := c(array_tmp5[3]) * (expt((glob_h) , c(1))) * c(factorial_3(2,3)); > if (4 <= ATS_MAX_TERMS) then # if number 3 > array_y[4] := temporary; > array_y_higher[1,4] := temporary; > fi;# end if 3; > temporary := c(temporary) / c(glob_h) * c(3); > array_y_higher[2,3] := c(temporary); > fi;# end if 2; > fi;# end if 1; > kkk := 4; > #END ATOMHDR3 > #BEGIN ATOMHDR4 > #emit pre sqrt ID_LINEAR iii = 4 $eq_no = 1 > array_tmp3[4] := 0; > array_tmp3[4] := neg(ats(4,array_tmp3,array_tmp3,2)) / array_tmp3[1] /glob__2; > #emit pre arccos FULL $eq_no = 1 > temp := att(3,array_tmp4_a1,array_tmp4,2); > array_tmp4[4] := neg(array_tmp3[4] + temp) / array_tmp4_a1[1]; > temp2 := att(3,array_tmp3,array_tmp4,1); > array_tmp4_a1[4] := temp2; > #emit pre add CONST FULL $eq_no = 1 i = 4 > array_tmp5[4] := array_tmp4[4]; > #emit pre assign xxx $eq_no = 1 i = 4 $min_hdrs = 5 > if ( not array_y_set_initial[1,5]) then # if number 1 > if (4 <= ATS_MAX_TERMS) then # if number 2 > temporary := c(array_tmp5[4]) * (expt((glob_h) , c(1))) * c(factorial_3(3,4)); > if (5 <= ATS_MAX_TERMS) then # if number 3 > array_y[5] := temporary; > array_y_higher[1,5] := temporary; > fi;# end if 3; > temporary := c(temporary) / c(glob_h) * c(4); > array_y_higher[2,4] := c(temporary); > fi;# end if 2; > fi;# end if 1; > kkk := 5; > #END ATOMHDR4 > #BEGIN ATOMHDR5 > #emit pre sqrt ID_LINEAR iii = 5 $eq_no = 1 > array_tmp3[5] := 0; > array_tmp3[5] := neg(ats(5,array_tmp3,array_tmp3,2)) / array_tmp3[1] /glob__2; > #emit pre arccos FULL $eq_no = 1 > temp := att(4,array_tmp4_a1,array_tmp4,2); > array_tmp4[5] := neg(array_tmp3[5] + temp) / array_tmp4_a1[1]; > temp2 := att(4,array_tmp3,array_tmp4,1); > array_tmp4_a1[5] := temp2; > #emit pre add CONST FULL $eq_no = 1 i = 5 > array_tmp5[5] := array_tmp4[5]; > #emit pre assign xxx $eq_no = 1 i = 5 $min_hdrs = 5 > if ( not array_y_set_initial[1,6]) then # if number 1 > if (5 <= ATS_MAX_TERMS) then # if number 2 > temporary := c(array_tmp5[5]) * (expt((glob_h) , c(1))) * c(factorial_3(4,5)); > if (6 <= ATS_MAX_TERMS) then # if number 3 > array_y[6] := temporary; > array_y_higher[1,6] := temporary; > fi;# end if 3; > temporary := c(temporary) / c(glob_h) * c(5); > array_y_higher[2,5] := c(temporary); > fi;# end if 2; > fi;# end if 1; > kkk := 6; > #END ATOMHDR5 > #BEGIN OUTFILE3 > #Top Atomall While Loop-- outfile3 > while (kkk <= ATS_MAX_TERMS) do # do number 1 > #END OUTFILE3 > #BEGIN OUTFILE4 > #emit sqrt LINEAR $eq_no = 1 > array_tmp3[kkk] := 0; > array_tmp3[kkk] := neg(ats(kkk,array_tmp3,array_tmp3,2)) /array_tmp3[1] / glob__2; > #emit arcsin $eq_no = 1 > temp := att(kkk-1,array_tmp4_a1,array_tmp4,2); > array_tmp4[kkk] := neg(array_tmp3[kkk] + temp) / array_tmp4_a1[1]; > temp2 := att(kkk-1,array_tmp3,array_tmp4,1); > array_tmp4_a1[kkk] := temp2; > #emit NOT FULL - FULL add $eq_no = 1 > array_tmp5[kkk] := array_tmp4[kkk]; > #emit assign $eq_no = 1 > order_d := 1; > if (kkk + order_d <= ATS_MAX_TERMS) then # if number 1 > if ( not array_y_set_initial[1,kkk + order_d]) then # if number 2 > temporary := c(array_tmp5[kkk]) * expt((glob_h) , c(order_d)) * c(factorial_3((kkk - 1),(kkk + order_d - 1))); > array_y[kkk + order_d] := c(temporary); > array_y_higher[1,kkk + order_d] := c(temporary); > term := kkk + order_d - 1; > adj2 := kkk + order_d - 1; > adj3 := 2; > while ((term >= 1) and (term <= ATS_MAX_TERMS) and (adj3 < order_d + 1)) do # do number 1 > if (adj3 <= order_d + 1) then # if number 3 > if (adj2 > 0) then # if number 4 > temporary := c(temporary) / c(glob_h) * c(adj2); > else > temporary := c(temporary); > fi;# end if 4; > array_y_higher[adj3,term] := c(temporary); > fi;# end if 3; > term := term - 1; > adj2 := adj2 - 1; > adj3 := adj3 + 1; > od;# end do number 1 > fi;# end if 2 > fi;# end if 1; > kkk := kkk + 1; > od;# end do number 1; > #BOTTOM ATOMALL > #END OUTFILE4 > #BEGIN OUTFILE5 > #BOTTOM ATOMALL ??? > end; Warning, `temp` is implicitly declared local to procedure `atomall` Warning, `temp2` is implicitly declared local to procedure `atomall` atomall := proc() local kkk, order_d, adj2, adj3, temporary, term, temp, temp2; 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_0D1, array_const_0D2, 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, array_tmp4_a1, array_tmp4, array_tmp5, array_m1, array_y_higher, array_y_higher_work, array_y_higher_work2, array_y_set_initial, array_given_rad_poles, array_given_ord_poles, array_rad_test_poles, array_ord_test_poles, array_fact_2, ATS_MAX_TERMS, glob_last; array_tmp1[1] := array_const_0D1[1]*array_x[1]; array_tmp2[1] := array_tmp1[1] + array_const_0D2[1]; array_tmp3[1] := sqrt(array_tmp2[1]); array_tmp4[1] := arccos(array_tmp3[1]); array_tmp4_a1[1] := sin(array_tmp4[1]); array_tmp5[1] := array_const_0D0[1] + array_tmp4[1]; if not array_y_set_initial[1, 2] then if 1 <= ATS_MAX_TERMS then temporary := c(array_tmp5[1])*expt(glob_h, c(1))*c(factorial_3(0, 1)); if 2 <= ATS_MAX_TERMS then array_y[2] := temporary; array_y_higher[1, 2] := temporary end if; temporary := c(temporary)*c(1)/c(glob_h); array_y_higher[2, 1] := c(temporary) end if end if; kkk := 2; array_tmp1[2] := array_const_0D1[1]*array_x[2]; array_tmp2[2] := array_tmp1[2]; array_tmp3[2] := array_tmp2[2]/(array_tmp3[1]*glob__2); temp := att(1, array_tmp4_a1, array_tmp4, 2); array_tmp4[2] := neg(array_tmp3[2] + temp)/array_tmp4_a1[1]; temp2 := att(1, array_tmp3, array_tmp4, 1); array_tmp4_a1[2] := temp2; array_tmp5[2] := array_tmp4[2]; if not array_y_set_initial[1, 3] then if 2 <= ATS_MAX_TERMS then temporary := c(array_tmp5[2])*expt(glob_h, c(1))*c(factorial_3(1, 2)); if 3 <= ATS_MAX_TERMS then array_y[3] := temporary; array_y_higher[1, 3] := temporary end if; temporary := c(temporary)*c(2)/c(glob_h); array_y_higher[2, 2] := c(temporary) end if end if; kkk := 3; array_tmp3[3] := 0; array_tmp3[3] := neg(ats(3, array_tmp3, array_tmp3, 2))/(array_tmp3[1]*glob__2); temp := att(2, array_tmp4_a1, array_tmp4, 2); array_tmp4[3] := neg(array_tmp3[3] + temp)/array_tmp4_a1[1]; temp2 := att(2, array_tmp3, array_tmp4, 1); array_tmp4_a1[3] := temp2; array_tmp5[3] := array_tmp4[3]; if not array_y_set_initial[1, 4] then if 3 <= ATS_MAX_TERMS then temporary := c(array_tmp5[3])*expt(glob_h, c(1))*c(factorial_3(2, 3)); if 4 <= ATS_MAX_TERMS then array_y[4] := temporary; array_y_higher[1, 4] := temporary end if; temporary := c(temporary)*c(3)/c(glob_h); array_y_higher[2, 3] := c(temporary) end if end if; kkk := 4; array_tmp3[4] := 0; array_tmp3[4] := neg(ats(4, array_tmp3, array_tmp3, 2))/(array_tmp3[1]*glob__2); temp := att(3, array_tmp4_a1, array_tmp4, 2); array_tmp4[4] := neg(array_tmp3[4] + temp)/array_tmp4_a1[1]; temp2 := att(3, array_tmp3, array_tmp4, 1); array_tmp4_a1[4] := temp2; array_tmp5[4] := array_tmp4[4]; if not array_y_set_initial[1, 5] then if 4 <= ATS_MAX_TERMS then temporary := c(array_tmp5[4])*expt(glob_h, c(1))*c(factorial_3(3, 4)); if 5 <= ATS_MAX_TERMS then array_y[5] := temporary; array_y_higher[1, 5] := temporary end if; temporary := c(temporary)*c(4)/c(glob_h); array_y_higher[2, 4] := c(temporary) end if end if; kkk := 5; array_tmp3[5] := 0; array_tmp3[5] := neg(ats(5, array_tmp3, array_tmp3, 2))/(array_tmp3[1]*glob__2); temp := att(4, array_tmp4_a1, array_tmp4, 2); array_tmp4[5] := neg(array_tmp3[5] + temp)/array_tmp4_a1[1]; temp2 := att(4, array_tmp3, array_tmp4, 1); array_tmp4_a1[5] := temp2; array_tmp5[5] := array_tmp4[5]; if not array_y_set_initial[1, 6] then if 5 <= ATS_MAX_TERMS then temporary := c(array_tmp5[5])*expt(glob_h, c(1))*c(factorial_3(4, 5)); if 6 <= ATS_MAX_TERMS then array_y[6] := temporary; array_y_higher[1, 6] := temporary end if; temporary := c(temporary)*c(5)/c(glob_h); array_y_higher[2, 5] := c(temporary) end if end if; kkk := 6; while kkk <= ATS_MAX_TERMS do array_tmp3[kkk] := 0; array_tmp3[kkk] := neg(ats(kkk, array_tmp3, array_tmp3, 2))/( array_tmp3[1]*glob__2); temp := att(kkk - 1, array_tmp4_a1, array_tmp4, 2); array_tmp4[kkk] := neg(array_tmp3[kkk] + temp)/array_tmp4_a1[1]; temp2 := att(kkk - 1, array_tmp3, array_tmp4, 1); array_tmp4_a1[kkk] := temp2; array_tmp5[kkk] := array_tmp4[kkk]; order_d := 1; if kkk + order_d <= ATS_MAX_TERMS then if not array_y_set_initial[1, kkk + order_d] then temporary := c(array_tmp5[kkk])*expt(glob_h, c(order_d))* c(factorial_3(kkk - 1, kkk + order_d - 1)); array_y[kkk + order_d] := c(temporary); array_y_higher[1, kkk + order_d] := c(temporary); term := kkk + order_d - 1; adj2 := kkk + order_d - 1; adj3 := 2; while 1 <= term and term <= ATS_MAX_TERMS and adj3 < order_d + 1 do if adj3 <= order_d + 1 then if 0 < adj2 then temporary := c(temporary)*c(adj2)/c(glob_h) else temporary := c(temporary) end if; array_y_higher[adj3, term] := c(temporary) end if; term := term - 1; adj2 := adj2 - 1; adj3 := adj3 + 1 end do end if end if; kkk := kkk + 1 end do end proc # End Function number 12 #END OUTFILE5 # Begin Function number 12 > main := proc() > #BEGIN OUTFIEMAIN > local d1,d2,d3,d4,est_err_2,niii,done_once,max_terms,display_max, > term,ord,order_diff,term_no,html_log_file,iiif,jjjf, > rows,r_order,sub_iter,calc_term,iii,temp_sum,current_iter, > x_start,x_end > ,it,last_min_pole_est, opt_iter, tmp,subiter, est_needed_step_err,estimated_step_error,min_value,est_answer,found_h,repeat_it; > global > ALWAYS, > INFO, > DEBUGL, > DEBUGMASSIVE, > glob_iolevel, > glob_yes_pole, > glob_no_pole, > glob_not_given, > glob_no_sing_tests, > glob_ratio_test, > glob_three_term_test, > glob_six_term_test, > glob_log_10, > #Top Generate Globals Decl > MAX_UNCHANGED, > glob__small, > glob_small_float, > glob_smallish_float, > glob_large_float, > glob_larger_float, > glob__m2, > glob__m1, > glob__0, > glob__1, > glob__2, > glob__3, > glob__4, > glob__5, > glob__8, > glob__10, > glob__100, > glob__pi, > glob__0_5, > glob__0_8, > glob__m0_8, > glob__0_25, > glob__0_125, > glob_h, > glob_nxt, > glob_prec, > glob_check_sign, > glob_desired_digits_correct, > glob_max_estimated_step_error, > glob_ratio_of_radius, > glob_percent_done, > glob_total_exp_sec, > glob_optimal_expect_sec, > glob_estimated_size_answer, > glob_almost_1, > glob_clock_sec, > glob_clock_start_sec, > glob_disp_incr, > glob_diff_rc_fm, > glob_diff_rc_fmm1, > glob_diff_rc_fmm2, > glob_diff_ord_fm, > glob_diff_ord_fmm1, > glob_diff_ord_fmm2, > glob_six_term_ord_save, > glob_guess_error_rc, > glob_guess_error_ord, > glob_least_given_sing, > glob_least_ratio_sing, > glob_least_3_sing, > glob_least_6_sing, > glob_last_good_h, > glob_max_h, > glob_min_h, > glob_display_interval, > glob_abserr, > glob_relerr, > glob_min_pole_est, > glob_max_rel_trunc_err, > glob_max_trunc_err, > glob_max_hours, > glob_optimal_clock_start_sec, > glob_optimal_start, > glob_upper_ratio_limit, > glob_lower_ratio_limit, > glob_max_sec, > glob_orig_start_sec, > glob_normmax, > glob_max_minutes, > glob_next_display, > glob_est_digits, > glob_subiter_method, > glob_html_log, > glob_min_good_digits, > glob_good_digits, > glob_min_apfp_est_good_digits, > glob_apfp_est_good_digits, > glob_max_opt_iter, > glob_dump, > glob_djd_debug, > glob_display_flag, > glob_djd_debug2, > glob_h_reason, > glob_sec_in_minute, > glob_min_in_hour, > glob_hours_in_day, > glob_days_in_year, > glob_sec_in_hour, > glob_sec_in_day, > glob_sec_in_year, > glob_not_yet_finished, > glob_initial_pass, > glob_not_yet_start_msg, > glob_reached_optimal_h, > glob_optimal_done, > glob_type_given_pole, > glob_optimize, > glob_look_poles, > glob_dump_closed_form, > glob_max_iter, > glob_no_eqs, > glob_unchanged_h_cnt, > glob_warned, > glob_warned2, > glob_start, > glob_iter, > #Bottom Generate Globals Decl > #BEGIN CONST > array_const_1, > array_const_0D0, > array_const_0D1, > array_const_0D2, > #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, > array_tmp4_a1, > array_tmp4, > array_tmp5, > array_m1, > array_y_higher, > array_y_higher_work, > array_y_higher_work2, > array_y_set_initial, > array_given_rad_poles, > array_given_ord_poles, > array_rad_test_poles, > array_ord_test_poles, > array_fact_2, > ATS_MAX_TERMS, > glob_last; > ATS_MAX_TERMS := 30; > # before first input block > #BEGIN FIRST INPUT BLOCK > #BEGIN BLOCK 1 > #BEGIN FIRST INPUT BLOCK > Digits:=32; > max_terms:=30; > #END BLOCK 1 > #END FIRST INPUT BLOCK > #START OF INITS AFTER INPUT BLOCK > glob_html_log := true; > #END OF INITS AFTER INPUT BLOCK > # before generate arrays > array_y_init:= Array(0..(30),[]); > array_norms:= Array(0..(30),[]); > array_fact_1:= Array(0..(30),[]); > array_1st_rel_error:= Array(0..(2),[]); > array_last_rel_error:= Array(0..(2),[]); > array_est_rel_error:= Array(0..(2),[]); > array_max_est_error:= Array(0..(2),[]); > array_type_pole:= Array(0..(2),[]); > array_type_real_pole:= Array(0..(2),[]); > array_type_complex_pole:= Array(0..(2),[]); > array_est_digits:= Array(0..(2),[]); > array_y:= Array(0..(30),[]); > array_x:= Array(0..(30),[]); > array_tmp0:= Array(0..(30),[]); > array_tmp1:= Array(0..(30),[]); > array_tmp2:= Array(0..(30),[]); > array_tmp3:= Array(0..(30),[]); > array_tmp4_a1:= Array(0..(30),[]); > array_tmp4:= Array(0..(30),[]); > array_tmp5:= Array(0..(30),[]); > array_m1:= Array(0..(30),[]); > array_y_higher := Array(0..(2) ,(0..30+ 1),[]); > array_y_higher_work := Array(0..(2) ,(0..30+ 1),[]); > array_y_higher_work2 := Array(0..(2) ,(0..30+ 1),[]); > array_y_set_initial := Array(0..(2) ,(0..30+ 1),[]); > array_given_rad_poles := Array(0..(2) ,(0..3+ 1),[]); > array_given_ord_poles := Array(0..(2) ,(0..3+ 1),[]); > array_rad_test_poles := Array(0..(2) ,(0..4+ 1),[]); > array_ord_test_poles := Array(0..(2) ,(0..4+ 1),[]); > array_fact_2 := Array(0..(30) ,(0..30+ 1),[]); > # before generate constants > # before generate globals definition > #Top Generate Globals Definition > #Bottom Generate Globals Deninition > # before generate const definition > # before arrays initialized > term := 1; > while (term <= 30) do # do number 1 > array_y_init[term] := c(0.0); > term := term + 1; > od;# end do number 1; > term := 1; > while (term <= 30) do # do number 1 > array_norms[term] := c(0.0); > term := term + 1; > od;# end do number 1; > term := 1; > while (term <= 30) do # do number 1 > array_fact_1[term] := c(0.0); > term := term + 1; > od;# end do number 1; > term := 1; > while (term <= 2) do # do number 1 > array_1st_rel_error[term] := c(0.0); > term := term + 1; > od;# end do number 1; > term := 1; > while (term <= 2) do # do number 1 > array_last_rel_error[term] := c(0.0); > term := term + 1; > od;# end do number 1; > term := 1; > while (term <= 2) do # do number 1 > array_est_rel_error[term] := c(0.0); > term := term + 1; > od;# end do number 1; > term := 1; > while (term <= 2) do # do number 1 > array_max_est_error[term] := c(0.0); > term := term + 1; > od;# end do number 1; > term := 1; > while (term <= 2) do # do number 1 > array_type_pole[term] := 0; > term := term + 1; > od;# end do number 1; > term := 1; > while (term <= 2) do # do number 1 > array_type_real_pole[term] := 0; > term := term + 1; > od;# end do number 1; > term := 1; > while (term <= 2) do # do number 1 > array_type_complex_pole[term] := 0; > term := term + 1; > od;# end do number 1; > term := 1; > while (term <= 2) do # do number 1 > array_est_digits[term] := 0; > term := term + 1; > od;# end do number 1; > term := 1; > while (term <= 30) do # do number 1 > array_y[term] := c(0.0); > term := term + 1; > od;# end do number 1; > term := 1; > while (term <= 30) do # do number 1 > array_x[term] := c(0.0); > term := term + 1; > od;# end do number 1; > term := 1; > while (term <= 30) do # do number 1 > array_tmp0[term] := c(0.0); > term := term + 1; > od;# end do number 1; > term := 1; > while (term <= 30) do # do number 1 > array_tmp1[term] := c(0.0); > term := term + 1; > od;# end do number 1; > term := 1; > while (term <= 30) do # do number 1 > array_tmp2[term] := c(0.0); > term := term + 1; > od;# end do number 1; > term := 1; > while (term <= 30) do # do number 1 > array_tmp3[term] := c(0.0); > term := term + 1; > od;# end do number 1; > term := 1; > while (term <= 30) do # do number 1 > array_tmp4_a1[term] := c(0.0); > term := term + 1; > od;# end do number 1; > term := 1; > while (term <= 30) do # do number 1 > array_tmp4[term] := c(0.0); > term := term + 1; > od;# end do number 1; > term := 1; > while (term <= 30) do # do number 1 > array_tmp5[term] := c(0.0); > term := term + 1; > od;# end do number 1; > term := 1; > while (term <= 30) do # do number 1 > array_m1[term] := c(0.0); > term := term + 1; > od;# end do number 1; > ord := 1; > while (ord <=2) do # do number 1 > term := 1; > while (term <= 30) do # do number 2 > array_y_higher[ord,term] := c(0.0); > term := term + 1; > od;# end do number 2; > ord := ord + 1; > od;# end do number 1; > ord := 1; > while (ord <=2) do # do number 1 > term := 1; > while (term <= 30) do # do number 2 > array_y_higher_work[ord,term] := c(0.0); > term := term + 1; > od;# end do number 2; > ord := ord + 1; > od;# end do number 1; > ord := 1; > while (ord <=2) do # do number 1 > term := 1; > while (term <= 30) do # do number 2 > array_y_higher_work2[ord,term] := c(0.0); > term := term + 1; > od;# end do number 2; > ord := ord + 1; > od;# end do number 1; > ord := 1; > while (ord <=2) do # do number 1 > term := 1; > while (term <= 30) do # do number 2 > array_y_set_initial[ord,term] := c(0.0); > term := term + 1; > od;# end do number 2; > ord := ord + 1; > od;# end do number 1; > ord := 1; > while (ord <=2) do # do number 1 > term := 1; > while (term <= 3) do # do number 2 > array_given_rad_poles[ord,term] := c(0.0); > term := term + 1; > od;# end do number 2; > ord := ord + 1; > od;# end do number 1; > ord := 1; > while (ord <=2) do # do number 1 > term := 1; > while (term <= 3) do # do number 2 > array_given_ord_poles[ord,term] := c(0.0); > term := term + 1; > od;# end do number 2; > ord := ord + 1; > od;# end do number 1; > ord := 1; > while (ord <=2) do # do number 1 > term := 1; > while (term <= 4) do # do number 2 > array_rad_test_poles[ord,term] := c(0.0); > term := term + 1; > od;# end do number 2; > ord := ord + 1; > od;# end do number 1; > ord := 1; > while (ord <=2) do # do number 1 > term := 1; > while (term <= 4) do # do number 2 > array_ord_test_poles[ord,term] := c(0.0); > term := term + 1; > od;# end do number 2; > ord := ord + 1; > od;# end do number 1; > ord := 1; > while (ord <=30) do # do number 1 > term := 1; > while (term <= 30) do # do number 2 > array_fact_2[ord,term] := c(0.0); > term := term + 1; > od;# end do number 2; > ord := ord + 1; > od;# end do number 1; > # before symbols initialized > #BEGIN SYMBOLS INITIALIZATED > zero_ats_ar(array_y); > zero_ats_ar(array_x); > zero_ats_ar(array_tmp0); > zero_ats_ar(array_tmp1); > zero_ats_ar(array_tmp2); > zero_ats_ar(array_tmp3); > zero_ats_ar(array_tmp4_a1); > zero_ats_ar(array_tmp4); > zero_ats_ar(array_tmp5); > zero_ats_ar(array_m1); > zero_ats_ar(array_const_1); > array_const_1[1] := c(1); > zero_ats_ar(array_const_0D0); > array_const_0D0[1] := c(0.0); > zero_ats_ar(array_const_0D1); > array_const_0D1[1] := c(0.1); > zero_ats_ar(array_const_0D2); > array_const_0D2[1] := c(0.2); > zero_ats_ar(array_m1); > array_m1[1] := glob__m1; > #END SYMBOLS INITIALIZATED > # before generate factorials init > #Initing Factorial Tables > iiif := 0; > while (iiif <= ATS_MAX_TERMS) do # do number 1 > jjjf := 0; > while (jjjf <= ATS_MAX_TERMS) do # do number 2 > array_fact_1[iiif] := 0; > array_fact_2[iiif,jjjf] := 0; > jjjf := jjjf + 1; > od;# end do number 2; > iiif := iiif + 1; > od;# end do number 1; > #Done Initing Factorial Table > ALWAYS := 1; > INFO := 2; > DEBUGL := 3; > DEBUGMASSIVE := 4; > glob_iolevel := 5; > glob_yes_pole := 4; > glob_no_pole := 3; > glob_not_given := 0; > glob_no_sing_tests := 4; > glob_ratio_test := 1; > glob_three_term_test := 2; > glob_six_term_test := 3; > glob_log_10 := log(c(10.0)); > MAX_UNCHANGED := 10; > glob__small := c(0.1e-50); > glob_small_float := c(0.1e-50); > glob_smallish_float := c(0.1e-60); > glob_large_float := c(1.0e100); > glob_larger_float := c(1.1e100); > glob__m2 := c(-2); > glob__m1 := c(-1); > glob__0 := c(0); > glob__1 := c(1); > glob__2 := c(2); > glob__3 := c(3); > glob__4 := c(4); > glob__5 := c(5); > glob__8 := c(8); > glob__10 := c(10); > glob__100 := c(100); > glob__pi := c(0.0); > glob__0_5 := c(0.5); > glob__0_8 := c(0.8); > glob__m0_8 := c(-0.8); > glob__0_25 := c(0.25); > glob__0_125 := c(0.125); > glob_h := 0.1; > glob_nxt := 1; > glob_prec := c(1.0e-16); > glob_check_sign := c(1.0); > glob_desired_digits_correct := c(8.0); > glob_max_estimated_step_error := c(0.0); > glob_ratio_of_radius := c(0.1); > glob_percent_done := c(0.0); > glob_total_exp_sec := c(0.1); > glob_optimal_expect_sec := c(0.1); > glob_estimated_size_answer := c(100.0); > glob_almost_1 := c(0.9990); > glob_clock_sec := c(0.0); > glob_clock_start_sec := c(0.0); > glob_disp_incr := c(0.1); > glob_diff_rc_fm := c(0.1); > glob_diff_rc_fmm1 := c(0.1); > glob_diff_rc_fmm2 := c(0.1); > glob_diff_ord_fm := c(0.1); > glob_diff_ord_fmm1 := c(0.1); > glob_diff_ord_fmm2 := c(0.1); > glob_six_term_ord_save := c(0.1); > glob_guess_error_rc := c(0.1); > glob_guess_error_ord := c(0.1); > glob_least_given_sing := c(9.9e200); > glob_least_ratio_sing := c(9.9e200); > glob_least_3_sing := c(9.9e100); > glob_least_6_sing := c(9.9e100); > glob_last_good_h := c(0.1); > glob_max_h := c(0.1); > glob_min_h := c(0.000001); > glob_display_interval := c(0.1); > glob_abserr := c(0.1e-10); > glob_relerr := c(0.1e-10); > glob_min_pole_est := c(0.1e+10); > glob_max_rel_trunc_err := c(0.1e-10); > glob_max_trunc_err := c(0.1e-10); > glob_max_hours := c(0.0); > glob_optimal_clock_start_sec := c(0.0); > glob_optimal_start := c(0.0); > glob_upper_ratio_limit := c(1.0001); > glob_lower_ratio_limit := c(0.9999); > glob_max_sec := c(10000.0); > glob_orig_start_sec := c(0.0); > glob_normmax := c(0.0); > glob_max_minutes := c(0.0); > glob_next_display := c(0.0); > glob_est_digits := 1; > glob_subiter_method := 3; > glob_html_log := true; > glob_min_good_digits := 99999; > glob_good_digits := 0; > glob_min_apfp_est_good_digits := 99999; > glob_apfp_est_good_digits := 0; > glob_max_opt_iter := 10; > glob_dump := false; > glob_djd_debug := true; > glob_display_flag := true; > glob_djd_debug2 := true; > glob_h_reason := 0; > glob_sec_in_minute := 60 ; > glob_min_in_hour := 60; > glob_hours_in_day := 24; > glob_days_in_year := 365; > glob_sec_in_hour := 3600; > glob_sec_in_day := 86400; > glob_sec_in_year := 31536000; > glob_not_yet_finished := true; > glob_initial_pass := true; > glob_not_yet_start_msg := true; > glob_reached_optimal_h := false; > glob_optimal_done := false; > glob_type_given_pole := 0; > glob_optimize := false; > glob_look_poles := false; > glob_dump_closed_form := false; > glob_max_iter := 10000; > glob_no_eqs := 0; > glob_unchanged_h_cnt := 0; > glob_warned := false; > glob_warned2 := false; > glob_start := 0; > glob_iter := 0; > # before generate set diff initial > array_y_set_initial[1,1] := true; > array_y_set_initial[1,2] := false; > array_y_set_initial[1,3] := false; > array_y_set_initial[1,4] := false; > array_y_set_initial[1,5] := false; > array_y_set_initial[1,6] := false; > array_y_set_initial[1,7] := false; > array_y_set_initial[1,8] := false; > array_y_set_initial[1,9] := false; > array_y_set_initial[1,10] := false; > array_y_set_initial[1,11] := false; > array_y_set_initial[1,12] := false; > array_y_set_initial[1,13] := false; > array_y_set_initial[1,14] := false; > array_y_set_initial[1,15] := false; > array_y_set_initial[1,16] := false; > array_y_set_initial[1,17] := false; > array_y_set_initial[1,18] := false; > array_y_set_initial[1,19] := false; > array_y_set_initial[1,20] := false; > array_y_set_initial[1,21] := false; > array_y_set_initial[1,22] := false; > array_y_set_initial[1,23] := false; > array_y_set_initial[1,24] := false; > array_y_set_initial[1,25] := false; > array_y_set_initial[1,26] := false; > array_y_set_initial[1,27] := false; > array_y_set_initial[1,28] := false; > array_y_set_initial[1,29] := false; > array_y_set_initial[1,30] := false; > # before generate init omniout const > ALWAYS := 1; > INFO := 2; > DEBUGL := 3; > DEBUGMASSIVE := 4; > ATS_MAX_TERMS := 30; > glob_iolevel := INFO; > # set default block > #Write Set Defaults > glob_orig_start_sec := elapsed_time_seconds(); > glob_display_flag := true; > glob_no_eqs := 1; > glob_iter := -1; > opt_iter := -1; > glob_max_iter := 10000; > glob_max_hours := (0.0); > glob_max_minutes := (15.0); > omniout_str(ALWAYS,"##############ECHO OF PROBLEM#################"); > omniout_str(ALWAYS,"##############temp/arccos_sqrtpostcpx.cpx#################"); > omniout_str(ALWAYS,"diff ( y , x , 1 ) = arccos ( sqrt ( 0.1 * x + 0.2 ) ) ; "); > omniout_str(ALWAYS,"!"); > omniout_str(ALWAYS,"#BEGIN FIRST INPUT BLOCK"); > omniout_str(ALWAYS,"Digits:=32;"); > omniout_str(ALWAYS,"max_terms:=30;"); > omniout_str(ALWAYS,"!"); > omniout_str(ALWAYS,"#END FIRST INPUT BLOCK"); > omniout_str(ALWAYS,"#BEGIN SECOND INPUT BLOCK"); > omniout_str(ALWAYS,"x_start := 0.1 + 0.1 * I;"); > omniout_str(ALWAYS,"x_end := 99.0 + 99.0 * I;"); > omniout_str(ALWAYS,"array_y_init[0 + 1] := exact_soln_y(x_start);"); > omniout_str(ALWAYS,"glob_look_poles := true;"); > omniout_str(ALWAYS,"glob_max_h := c( 0.001);"); > omniout_str(ALWAYS,""); > 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 := 1;"); > omniout_str(ALWAYS,""); > omniout_str(ALWAYS,"array_given_rad_poles[1,1] :=c( -2.0);"); > omniout_str(ALWAYS,""); > omniout_str(ALWAYS,"array_given_rad_poles[1,2] := c(0.0);"); > omniout_str(ALWAYS,""); > omniout_str(ALWAYS,"array_given_ord_poles[1,1] := c(0.5);"); > omniout_str(ALWAYS,""); > omniout_str(ALWAYS,"array_given_ord_poles[1,2] := c(0.0);"); > omniout_str(ALWAYS,""); > omniout_str(ALWAYS,"#END SECOND INPUT BLOCK"); > omniout_str(ALWAYS,"#BEGIN OVERRIDE BLOCK"); > omniout_str(ALWAYS,"glob_desired_digits_correct:=8;"); > omniout_str(ALWAYS,"glob_max_minutes:=(3.0);"); > omniout_str(ALWAYS,"glob_subiter_method:=3;"); > omniout_str(ALWAYS,"glob_max_iter:=10000;"); > omniout_str(ALWAYS,"glob_upper_ratio_limit:=c(1.000001);"); > omniout_str(ALWAYS,"glob_lower_ratio_limit:=c(0.999999);"); > omniout_str(ALWAYS,"glob_look_poles:=true;"); > omniout_str(ALWAYS,"glob_h:=c(0.001);"); > omniout_str(ALWAYS,"glob_display_interval:=c(0.01);"); > omniout_str(ALWAYS,"#END OVERRIDE BLOCK"); > omniout_str(ALWAYS,"!"); > omniout_str(ALWAYS,"#BEGIN USER DEF BLOCK"); > omniout_str(ALWAYS,"exact_soln_y := proc(x)"); > omniout_str(ALWAYS,""); > omniout_str(ALWAYS,""); > omniout_str(ALWAYS,"return(c(10.0) * (c(0.1) * c(x) + c(0.2)) * arccos(sqrt ( c(0.1) * c(x) + c(0.2))) - c(5.0) * sqrt( c(0.1) * c(x) + c(0.2)) * sqrt( c(0.8) - c(0.1) * c(x)) + c(5.0) * arcsin(sqrt( c(0.1) * c(x) + c(0.2))));"); > omniout_str(ALWAYS,"end;"); > omniout_str(ALWAYS,"next_delta := proc()"); > omniout_str(ALWAYS,"global glob_nxt, x_delta;"); > omniout_str(ALWAYS,""); > omniout_str(ALWAYS,"x_delta := [ 0.001 + 0.00004 * I,"); > omniout_str(ALWAYS,"0.0001 + 0.004 * I,"); > omniout_str(ALWAYS,"0.003 + 0.006 * I,"); > omniout_str(ALWAYS,"0.0001 + 0.005 * I,"); > omniout_str(ALWAYS,"0.0001 + 0.003 * I,"); > omniout_str(ALWAYS,"0.001 + 0.001 * I,"); > omniout_str(ALWAYS,"0.001 + 0.003 * I,"); > omniout_str(ALWAYS,"0.0001 + 0.004 * I,"); > omniout_str(ALWAYS,"0.003 + 0.006 * I,"); > omniout_str(ALWAYS,"0.0001 + 0.005 * I,"); > omniout_str(ALWAYS,"0.0001 + 0.003 * I,"); > omniout_str(ALWAYS,"0.001 + 0.001 * I,"); > omniout_str(ALWAYS,"0.001 + 0.003 * I,"); > omniout_str(ALWAYS,"0.0001 + 0.004 * I,"); > omniout_str(ALWAYS,"0.003 + 0.006 * I,"); > omniout_str(ALWAYS,"0.0001 + 0.005 * I,"); > omniout_str(ALWAYS,"0.0001 + 0.003 * I,"); > omniout_str(ALWAYS,"0.001 + 0.001 * I,"); > omniout_str(ALWAYS,"0.001 + 0.003 * I,"); > omniout_str(ALWAYS,"0.0001 + 0.004 * I,"); > omniout_str(ALWAYS,"0.003 + 0.006 * I,"); > omniout_str(ALWAYS,"0.0001 + 0.005 * I,"); > omniout_str(ALWAYS,"0.0001 + 0.003 * I,"); > omniout_str(ALWAYS,"0.001 + 0.001 * I,"); > omniout_str(ALWAYS,"0.001 + 0.003 * I,"); > omniout_str(ALWAYS,"0.0001 + 0.004 * I,"); > omniout_str(ALWAYS,"0.003 + 0.006 * I,"); > omniout_str(ALWAYS,"0.0001 + 0.005 * I,"); > omniout_str(ALWAYS,"0.0001 + 0.003 * I,"); > omniout_str(ALWAYS,"0.001 + 0.001 * I,"); > omniout_str(ALWAYS,"0.0001 + 0.004 * I,"); > omniout_str(ALWAYS,"0.003 + 0.006 * I,"); > omniout_str(ALWAYS,"0.0001 + 0.005 * I,"); > omniout_str(ALWAYS,"0.0001 + 0.003 * I,"); > omniout_str(ALWAYS,"0.001 + 0.001 * I,"); > omniout_str(ALWAYS,"0.001 + 0.003 * I,"); > omniout_str(ALWAYS,"0.0001 + 0.004 * I,"); > omniout_str(ALWAYS,"0.003 + 0.006 * I,"); > omniout_str(ALWAYS,"0.0001 + 0.005 * I,"); > omniout_str(ALWAYS,"0.0001 + 0.003 * I,"); > omniout_str(ALWAYS,"0.001 + 0.001 * I,"); > omniout_str(ALWAYS,"0.001 + 0.003 * I,"); > omniout_str(ALWAYS,"0.0001 + 0.004 * I,"); > omniout_str(ALWAYS,"0.003 + 0.006 * I,"); > omniout_str(ALWAYS,"0.0001 + 0.005 * I,"); > omniout_str(ALWAYS,"0.0001 + 0.003 * I,"); > omniout_str(ALWAYS,"0.001 + 0.001 * I,"); > omniout_str(ALWAYS,"0.001 + 0.003 * I,"); > omniout_str(ALWAYS,"0.0001 + 0.004 * I,"); > omniout_str(ALWAYS,"0.003 + 0.006 * I,"); > omniout_str(ALWAYS,"0.0001 + 0.005 * I,"); > omniout_str(ALWAYS,"0.0001 + 0.003 * I,"); > omniout_str(ALWAYS,"0.001 + 0.001 * I,"); > omniout_str(ALWAYS,"0.001 + 0.003 * I,"); > omniout_str(ALWAYS,"0.0001 + 0.004 * I,"); > omniout_str(ALWAYS,"0.003 + 0.006 * I,"); > omniout_str(ALWAYS,"0.0001 + 0.005 * I,"); > omniout_str(ALWAYS,"0.0001 + 0.003 * I,"); > omniout_str(ALWAYS,"0.001 + 0.001 * I,"); > omniout_str(ALWAYS,"0.0001 + 0.004 * I,"); > omniout_str(ALWAYS,"0.003 + 0.006 * I,"); > omniout_str(ALWAYS,"0.0001 + 0.005 * I,"); > omniout_str(ALWAYS,"0.0001 + 0.003 * I,"); > omniout_str(ALWAYS,"0.001 + 0.001 * I,"); > omniout_str(ALWAYS,"0.001 + 0.003 * I,"); > omniout_str(ALWAYS,"0.0001 + 0.004 * I,"); > omniout_str(ALWAYS,"0.003 + 0.006 * I,"); > omniout_str(ALWAYS,"0.0001 + 0.005 * I,"); > omniout_str(ALWAYS,"0.0001 + 0.003 * I,"); > omniout_str(ALWAYS,"0.001 + 0.001 * I,"); > omniout_str(ALWAYS,"0.001 + 0.003 * I,"); > omniout_str(ALWAYS,"0.0001 + 0.004 * I,"); > omniout_str(ALWAYS,"0.003 + 0.006 * I,"); > omniout_str(ALWAYS,"0.0001 + 0.005 * I,"); > omniout_str(ALWAYS,"0.0001 + 0.003 * I,"); > omniout_str(ALWAYS,"0.001 + 0.001 * I,"); > omniout_str(ALWAYS,"0.001 + 0.003 * I,"); > omniout_str(ALWAYS,"0.0001 + 0.004 * I,"); > omniout_str(ALWAYS,"0.003 + 0.006 * I,"); > omniout_str(ALWAYS,"0.0001 + 0.005 * I,"); > omniout_str(ALWAYS,"0.0001 + 0.003 * I,"); > omniout_str(ALWAYS,"0.001 + 0.001 * I,"); > omniout_str(ALWAYS,"0.001 + 0.003 * I,"); > omniout_str(ALWAYS,"0.0001 + 0.004 * I,"); > omniout_str(ALWAYS,"0.003 + 0.006 * I,"); > omniout_str(ALWAYS,"0.0001 + 0.005 * I,"); > omniout_str(ALWAYS,"0.0001 + 0.003 * I,"); > omniout_str(ALWAYS,"0.001 + 0.001 * I,"); > omniout_str(ALWAYS,"0.0001 + 0.004 * I,"); > omniout_str(ALWAYS,"0.003 + 0.006 * I,"); > omniout_str(ALWAYS,"0.0001 + 0.005 * I,"); > omniout_str(ALWAYS,"0.0001 + 0.003 * I,"); > omniout_str(ALWAYS,"0.001 + 0.001 * I,"); > omniout_str(ALWAYS,"0.001 + 0.003 * I,"); > omniout_str(ALWAYS,"0.0001 + 0.004 * I,"); > omniout_str(ALWAYS,"0.003 + 0.006 * I,"); > omniout_str(ALWAYS,"0.0001 + 0.005 * I,"); > omniout_str(ALWAYS,"0.0001 + 0.003 * I,"); > omniout_str(ALWAYS,"0.001 + 0.001 * I,"); > omniout_str(ALWAYS,"0.001 + 0.003 * I,"); > omniout_str(ALWAYS,"0.0001 + 0.004 * I,"); > omniout_str(ALWAYS,"0.003 + 0.006 * I,"); > omniout_str(ALWAYS,"0.0001 + 0.005 * I,"); > omniout_str(ALWAYS,"0.0001 + 0.003 * I,"); > omniout_str(ALWAYS,"0.001 + 0.001 * I,"); > omniout_str(ALWAYS,"0.001 + 0.003 * I,"); > omniout_str(ALWAYS,"0.0001 + 0.004 * I,"); > omniout_str(ALWAYS,"0.003 + 0.006 * I,"); > omniout_str(ALWAYS,"0.0001 + 0.005 * I,"); > omniout_str(ALWAYS,"0.0001 + 0.003 * I,"); > omniout_str(ALWAYS,"0.001 + 0.001 * I,"); > omniout_str(ALWAYS,"0.001 + 0.003 * I,"); > omniout_str(ALWAYS,"0.0001 + 0.004 * I,"); > omniout_str(ALWAYS,"0.003 + 0.006 * I,"); > omniout_str(ALWAYS,"0.0001 + 0.005 * I,"); > omniout_str(ALWAYS,"0.0001 + 0.003 * I,"); > omniout_str(ALWAYS,"0.001 + 0.001 * I,"); > omniout_str(ALWAYS,"0.0001 + 0.004 * I,"); > omniout_str(ALWAYS,"0.003 + 0.006 * I,"); > omniout_str(ALWAYS,"0.0001 + 0.005 * I,"); > omniout_str(ALWAYS,"0.0001 + 0.003 * I,"); > omniout_str(ALWAYS,"0.001 + 0.001 * I,"); > omniout_str(ALWAYS,"0.001 + 0.003 * I,"); > omniout_str(ALWAYS,"0.0001 + 0.004 * I,"); > omniout_str(ALWAYS,"0.003 + 0.006 * I,"); > omniout_str(ALWAYS,"0.0001 + 0.005 * I,"); > omniout_str(ALWAYS,"0.0001 + 0.003 * I,"); > omniout_str(ALWAYS,"0.001 + 0.001 * I,"); > omniout_str(ALWAYS,"0.001 + 0.003 * I,"); > omniout_str(ALWAYS,"0.0001 + 0.004 * I,"); > omniout_str(ALWAYS,"0.003 + 0.006 * I,"); > omniout_str(ALWAYS,"0.0001 + 0.005 * I,"); > omniout_str(ALWAYS,"0.0001 + 0.003 * I,"); > omniout_str(ALWAYS,"0.001 + 0.001 * I,"); > omniout_str(ALWAYS,"0.001 + 0.003 * I,"); > omniout_str(ALWAYS,"0.0001 + 0.004 * I,"); > omniout_str(ALWAYS,"0.003 + 0.006 * I,"); > omniout_str(ALWAYS,"0.0001 + 0.005 * I,"); > omniout_str(ALWAYS,"0.0001 + 0.003 * I,"); > omniout_str(ALWAYS,"0.001 + 0.001 * I,"); > omniout_str(ALWAYS,"0.001 + 0.003 * I,"); > omniout_str(ALWAYS,"0.0001 + 0.004 * I,"); > omniout_str(ALWAYS,"0.003 + 0.006 * I,"); > omniout_str(ALWAYS,"0.0001 + 0.005 * I,"); > omniout_str(ALWAYS,"0.0001 + 0.003 * I,"); > omniout_str(ALWAYS,"0.001 + 0.001 * I,"); > omniout_str(ALWAYS,"0.0001 + 0.004 * I,"); > omniout_str(ALWAYS,"0.003 + 0.006 * I,"); > omniout_str(ALWAYS,"0.0001 + 0.005 * I,"); > omniout_str(ALWAYS,"0.0001 + 0.003 * I,"); > omniout_str(ALWAYS,"0.001 + 0.001 * I,"); > omniout_str(ALWAYS,"0.001 + 0.003 * I,"); > omniout_str(ALWAYS,"0.0001 + 0.004 * I,"); > omniout_str(ALWAYS,"0.003 + 0.006 * I,"); > omniout_str(ALWAYS,"0.0001 + 0.005 * I,"); > omniout_str(ALWAYS,"0.0001 + 0.003 * I,"); > omniout_str(ALWAYS,"0.001 + 0.001 * I,"); > omniout_str(ALWAYS,"0.001 + 0.003 * I,"); > omniout_str(ALWAYS,"0.0001 + 0.004 * I,"); > omniout_str(ALWAYS,"0.003 + 0.006 * I,"); > omniout_str(ALWAYS,"0.0001 + 0.005 * I,"); > omniout_str(ALWAYS,"0.0001 + 0.003 * I,"); > omniout_str(ALWAYS,"0.001 + 0.001 * I,"); > omniout_str(ALWAYS,"0.001 + 0.003 * I,"); > omniout_str(ALWAYS,"0.0001 + 0.004 * I,"); > omniout_str(ALWAYS,"0.003 + 0.006 * I,"); > omniout_str(ALWAYS,"0.0001 + 0.005 * I,"); > omniout_str(ALWAYS,"0.0001 + 0.003 * I,"); > omniout_str(ALWAYS,"0.001 + 0.001 * I,"); > omniout_str(ALWAYS,"0.001 + 0.003 * I,"); > omniout_str(ALWAYS,"0.0001 + 0.004 * I,"); > omniout_str(ALWAYS,"0.003 + 0.006 * I,"); > omniout_str(ALWAYS,"0.0001 + 0.005 * I,"); > omniout_str(ALWAYS,"0.0001 + 0.003 * I,"); > omniout_str(ALWAYS,"0.001 + 0.001 * I,"); > omniout_str(ALWAYS,"0.0001 + 0.004 * I,"); > omniout_str(ALWAYS,"0.003 + 0.006 * I,"); > omniout_str(ALWAYS,"0.0001 + 0.005 * I,"); > omniout_str(ALWAYS,"0.0001 + 0.003 * I,"); > omniout_str(ALWAYS,"0.001 + 0.001 * I,"); > omniout_str(ALWAYS,"0.001 + 0.003 * I,"); > omniout_str(ALWAYS,"0.0001 + 0.004 * I,"); > omniout_str(ALWAYS,"0.0001 + 0.004 * I,"); > omniout_str(ALWAYS,"0.003 + 0.006 * I,"); > omniout_str(ALWAYS,"0.0001 + 0.005 * I,"); > omniout_str(ALWAYS,"0.0001 + 0.003 * I,"); > omniout_str(ALWAYS,"0.001 + 0.001 * I,"); > omniout_str(ALWAYS,"0.001 + 0.003 * I,"); > omniout_str(ALWAYS,"0.0001 + 0.004 * I,"); > omniout_str(ALWAYS,"0.003 + 0.006 * I,"); > omniout_str(ALWAYS,"0.0001 + 0.005 * I,"); > omniout_str(ALWAYS,"0.0001 + 0.003 * I,"); > omniout_str(ALWAYS,"0.001 + 0.001 * I,"); > omniout_str(ALWAYS,"0.001 + 0.003 * I,"); > omniout_str(ALWAYS,"0.0001 + 0.004 * I,"); > omniout_str(ALWAYS,"0.003 + 0.006 * I,"); > omniout_str(ALWAYS,"0.0001 + 0.005 * I,"); > omniout_str(ALWAYS,"0.0001 + 0.003 * I,"); > omniout_str(ALWAYS,"0.001 + 0.001 * I,"); > omniout_str(ALWAYS,"0.001 + 0.003 * I,"); > omniout_str(ALWAYS,"0.0001 + 0.004 * I,"); > omniout_str(ALWAYS,"0.003 + 0.006 * I,"); > omniout_str(ALWAYS,"0.0001 + 0.005 * I,"); > omniout_str(ALWAYS,"0.0001 + 0.003 * I,"); > omniout_str(ALWAYS,"0.001 + 0.001 * I,"); > omniout_str(ALWAYS,"0.001 + 0.003 * I,"); > omniout_str(ALWAYS,"0.0001 + 0.004 * I,"); > omniout_str(ALWAYS,"0.003 + 0.006 * I,"); > omniout_str(ALWAYS,"0.0001 + 0.005 * I,"); > omniout_str(ALWAYS,"0.0001 + 0.003 * I,"); > omniout_str(ALWAYS,"0.001 + 0.001 * I,"); > omniout_str(ALWAYS,"0.0001 + 0.004 * I,"); > omniout_str(ALWAYS,"0.003 + 0.006 * I,"); > omniout_str(ALWAYS,"0.0001 + 0.005 * I,"); > omniout_str(ALWAYS,"0.0001 + 0.003 * I,"); > omniout_str(ALWAYS,"0.001 + 0.001 * I,"); > omniout_str(ALWAYS,"0.001 + 0.003 * I,"); > omniout_str(ALWAYS,"0.0001 + 0.004 * I,"); > omniout_str(ALWAYS,"0.003 + 0.006 * I,"); > omniout_str(ALWAYS,"0.0001 + 0.005 * I,"); > omniout_str(ALWAYS,"0.0001 + 0.003 * I,"); > omniout_str(ALWAYS,"0.001 + 0.001 * I,"); > omniout_str(ALWAYS,"0.001 + 0.003 * I,"); > omniout_str(ALWAYS,"0.0001 + 0.004 * I,"); > omniout_str(ALWAYS,"0.003 + 0.006 * I,"); > omniout_str(ALWAYS,"0.0001 + 0.005 * I,"); > omniout_str(ALWAYS,"0.0001 + 0.003 * I,"); > omniout_str(ALWAYS,"0.001 + 0.001 * I,"); > omniout_str(ALWAYS,"0.001 + 0.003 * I,"); > omniout_str(ALWAYS,"0.0001 + 0.004 * I,"); > omniout_str(ALWAYS,"0.003 + 0.006 * I,"); > omniout_str(ALWAYS,"0.0001 + 0.005 * I,"); > omniout_str(ALWAYS,"0.0001 + 0.003 * I,"); > omniout_str(ALWAYS,"0.001 + 0.001 * I,"); > omniout_str(ALWAYS,"0.001 + 0.003 * I,"); > omniout_str(ALWAYS,"0.0001 + 0.004 * I,"); > omniout_str(ALWAYS,"0.003 + 0.006 * I,"); > omniout_str(ALWAYS,"0.0001 + 0.005 * I,"); > omniout_str(ALWAYS,"0.0001 + 0.003 * I,"); > omniout_str(ALWAYS,"0.001 + 0.001 * I,"); > omniout_str(ALWAYS,"0.0001 + 0.004 * I,"); > omniout_str(ALWAYS,"0.003 + 0.006 * I,"); > omniout_str(ALWAYS,"0.0001 + 0.005 * I,"); > omniout_str(ALWAYS,"0.0001 + 0.003 * I,"); > omniout_str(ALWAYS,"0.001 + 0.001 * I,"); > omniout_str(ALWAYS,"0.001 + 0.003 * I,"); > omniout_str(ALWAYS,"0.0001 + 0.004 * I,"); > omniout_str(ALWAYS,"0.003 + 0.006 * I,"); > omniout_str(ALWAYS,"0.0001 + 0.005 * I,"); > omniout_str(ALWAYS,"0.0001 + 0.003 * I,"); > omniout_str(ALWAYS,"0.001 + 0.001 * I,"); > omniout_str(ALWAYS,"0.001 + 0.003 * I,"); > omniout_str(ALWAYS,"0.0001 + 0.004 * I,"); > omniout_str(ALWAYS,"0.003 + 0.006 * I,"); > omniout_str(ALWAYS,"0.0001 + 0.005 * I,"); > omniout_str(ALWAYS,"0.0001 + 0.003 * I,"); > omniout_str(ALWAYS,"0.001 + 0.001 * I,"); > omniout_str(ALWAYS,"0.001 + 0.003 * I,"); > omniout_str(ALWAYS,"0.0001 + 0.004 * I,"); > omniout_str(ALWAYS,"0.003 + 0.006 * I,"); > omniout_str(ALWAYS,"0.0001 + 0.005 * I,"); > omniout_str(ALWAYS,"0.0001 + 0.003 * I,"); > omniout_str(ALWAYS,"0.001 + 0.001 * I,"); > omniout_str(ALWAYS,"0.001 + 0.003 * I,"); > omniout_str(ALWAYS,"0.0001 + 0.004 * I,"); > omniout_str(ALWAYS,"0.003 + 0.006 * I,"); > omniout_str(ALWAYS,"0.0001 + 0.005 * I,"); > omniout_str(ALWAYS,"0.0001 + 0.003 * I,"); > omniout_str(ALWAYS,"0.001 + 0.001 * I,"); > omniout_str(ALWAYS,"0.0001 + 0.004 * I,"); > omniout_str(ALWAYS,"0.003 + 0.006 * I,"); > omniout_str(ALWAYS,"0.0001 + 0.005 * I,"); > omniout_str(ALWAYS,"0.0001 + 0.003 * I,"); > omniout_str(ALWAYS,"0.001 + 0.001 * I,"); > omniout_str(ALWAYS,"0.001 + 0.003 * I,"); > omniout_str(ALWAYS,"0.0001 + 0.004 * I,"); > omniout_str(ALWAYS,"0.003 + 0.006 * I,"); > omniout_str(ALWAYS,"0.0001 + 0.005 * I,"); > omniout_str(ALWAYS,"0.0001 + 0.003 * I,"); > omniout_str(ALWAYS,"0.001 + 0.001 * I,"); > omniout_str(ALWAYS,"0.001 + 0.003 * I,"); > omniout_str(ALWAYS,"0.0001 + 0.004 * I,"); > omniout_str(ALWAYS,"0.003 + 0.006 * I,"); > omniout_str(ALWAYS,"0.0001 + 0.005 * I,"); > omniout_str(ALWAYS,"0.0001 + 0.003 * I,"); > omniout_str(ALWAYS,"0.001 + 0.001 * I,"); > omniout_str(ALWAYS,"0.001 + 0.003 * I,"); > omniout_str(ALWAYS,"0.0001 + 0.004 * I,"); > omniout_str(ALWAYS,"0.003 + 0.006 * I,"); > omniout_str(ALWAYS,"0.0001 + 0.005 * I,"); > omniout_str(ALWAYS,"0.0001 + 0.003 * I,"); > omniout_str(ALWAYS,"0.001 + 0.001 * I,"); > omniout_str(ALWAYS,"0.001 + 0.003 * I,"); > omniout_str(ALWAYS,"0.0001 + 0.004 * I,"); > omniout_str(ALWAYS,"0.003 + 0.006 * I,"); > omniout_str(ALWAYS,"0.0001 + 0.005 * I,"); > omniout_str(ALWAYS,"0.0001 + 0.003 * I,"); > omniout_str(ALWAYS,"0.001 + 0.001 * I,"); > omniout_str(ALWAYS,"0.0001 + 0.004 * I,"); > omniout_str(ALWAYS,"0.003 + 0.006 * I,"); > omniout_str(ALWAYS,"0.0001 + 0.005 * I,"); > omniout_str(ALWAYS,"0.0001 + 0.003 * I,"); > omniout_str(ALWAYS,"0.001 + 0.001 * I,"); > omniout_str(ALWAYS,"0.001 + 0.003 * I,"); > omniout_str(ALWAYS,"0.0001 + 0.004 * I,"); > omniout_str(ALWAYS,"0.003 + 0.006 * I,"); > omniout_str(ALWAYS,"0.0001 + 0.005 * I,"); > omniout_str(ALWAYS,"0.0001 + 0.003 * I,"); > omniout_str(ALWAYS,"0.001 + 0.001 * I,"); > omniout_str(ALWAYS,"0.001 + 0.003 * I,"); > omniout_str(ALWAYS,"0.0001 + 0.004 * I,"); > omniout_str(ALWAYS,"0.003 + 0.006 * I,"); > omniout_str(ALWAYS,"0.0001 + 0.005 * I,"); > omniout_str(ALWAYS,"0.0001 + 0.003 * I,"); > omniout_str(ALWAYS,"0.001 + 0.001 * I,"); > omniout_str(ALWAYS,"0.001 + 0.003 * I,"); > omniout_str(ALWAYS,"0.0001 + 0.004 * I,"); > omniout_str(ALWAYS,"0.003 + 0.006 * I,"); > omniout_str(ALWAYS,"0.0001 + 0.005 * I,"); > omniout_str(ALWAYS,"0.0001 + 0.003 * I,"); > omniout_str(ALWAYS,"0.001 + 0.001 * I,"); > omniout_str(ALWAYS,"0.001 + 0.003 * I,"); > omniout_str(ALWAYS,"0.0001 + 0.004 * I,"); > omniout_str(ALWAYS,"0.003 + 0.006 * I,"); > omniout_str(ALWAYS,"0.0001 + 0.005 * I,"); > omniout_str(ALWAYS,"0.0001 + 0.003 * I,"); > omniout_str(ALWAYS,"0.001 + 0.001 * I,"); > omniout_str(ALWAYS,"0.0001 + 0.004 * I,"); > omniout_str(ALWAYS,"0.003 + 0.006 * I,"); > omniout_str(ALWAYS,"0.0001 + 0.005 * I,"); > omniout_str(ALWAYS,"0.0001 + 0.003 * I,"); > omniout_str(ALWAYS,"0.001 + 0.001 * I,"); > omniout_str(ALWAYS,"0.001 + 0.003 * I,"); > omniout_str(ALWAYS,"0.0001 + 0.004 * I,"); > omniout_str(ALWAYS,"0.003 + 0.006 * I,"); > omniout_str(ALWAYS,"0.0001 + 0.005 * I,"); > omniout_str(ALWAYS,"0.0001 + 0.003 * I,"); > omniout_str(ALWAYS,"0.001 + 0.001 * I,"); > omniout_str(ALWAYS,"0.001 + 0.003 * I,"); > omniout_str(ALWAYS,"0.0001 + 0.004 * I,"); > omniout_str(ALWAYS,"0.003 + 0.006 * I,"); > omniout_str(ALWAYS,"0.0001 + 0.005 * I,"); > omniout_str(ALWAYS,"0.0001 + 0.003 * I,"); > omniout_str(ALWAYS,"0.001 + 0.001 * I,"); > omniout_str(ALWAYS,"0.001 + 0.003 * I,"); > omniout_str(ALWAYS,"0.0001 + 0.004 * I,"); > omniout_str(ALWAYS,"0.003 + 0.006 * I,"); > omniout_str(ALWAYS,"0.0001 + 0.005 * I,"); > omniout_str(ALWAYS,"0.0001 + 0.003 * I,"); > omniout_str(ALWAYS,"0.001 + 0.001 * I,"); > omniout_str(ALWAYS,"0.001 + 0.003 * I,"); > omniout_str(ALWAYS,"0.0001 + 0.004 * I,"); > omniout_str(ALWAYS,"0.003 + 0.006 * I,"); > omniout_str(ALWAYS,"0.0001 + 0.005 * I,"); > omniout_str(ALWAYS,"0.0001 + 0.003 * I,"); > omniout_str(ALWAYS,"0.001 + 0.001 * I,"); > omniout_str(ALWAYS,"0.003 + 0.006 * I,"); > omniout_str(ALWAYS,"0.0001 + 0.005 * I,"); > omniout_str(ALWAYS,"0.0001 + 0.003 * I,"); > omniout_str(ALWAYS,"0.001 + 0.001 * I,"); > omniout_str(ALWAYS,"0.001 + 0.003 * I,"); > omniout_str(ALWAYS,"0.0001 + 0.004 * I,"); > omniout_str(ALWAYS,"0.003 + 0.006 * I,"); > omniout_str(ALWAYS,"0.0001 + 0.005 * I,"); > omniout_str(ALWAYS,"0.0001 + 0.003 * I,"); > omniout_str(ALWAYS,"0.001 + 0.001 * I,"); > omniout_str(ALWAYS,"0.001 + 0.003 * I,"); > omniout_str(ALWAYS,"0.0001 + 0.004 * I,"); > omniout_str(ALWAYS,"0.003 + 0.006 * I,"); > omniout_str(ALWAYS,"0.0001 + 0.005 * I,"); > omniout_str(ALWAYS,"0.0001 + 0.003 * I,"); > omniout_str(ALWAYS,"0.001 + 0.001 * I,"); > omniout_str(ALWAYS,"0.001 + 0.003 * I,"); > omniout_str(ALWAYS,"0.0001 + 0.004 * I,"); > omniout_str(ALWAYS,"0.003 + 0.006 * I,"); > omniout_str(ALWAYS,"0.0001 + 0.005 * I,"); > omniout_str(ALWAYS,"0.0001 + 0.003 * I,"); > omniout_str(ALWAYS,"0.001 + 0.001 * I,"); > omniout_str(ALWAYS,"0.0001 + 0.004 * I,"); > omniout_str(ALWAYS,"0.003 + 0.006 * I,"); > omniout_str(ALWAYS,"0.0001 + 0.005 * I,"); > omniout_str(ALWAYS,"0.0001 + 0.003 * I,"); > omniout_str(ALWAYS,"0.001 + 0.001 * I,"); > omniout_str(ALWAYS,"0.001 + 0.003 * I,"); > omniout_str(ALWAYS,"0.0001 + 0.004 * I,"); > omniout_str(ALWAYS,"0.003 + 0.006 * I,"); > omniout_str(ALWAYS,"0.0001 + 0.005 * I,"); > omniout_str(ALWAYS,"0.0001 + 0.003 * I,"); > omniout_str(ALWAYS,"0.001 + 0.001 * I,"); > omniout_str(ALWAYS,"0.001 + 0.003 * I,"); > omniout_str(ALWAYS,"0.0001 + 0.004 * I,"); > omniout_str(ALWAYS,"0.003 + 0.006 * I,"); > omniout_str(ALWAYS,"0.0001 + 0.005 * I,"); > omniout_str(ALWAYS,"0.0001 + 0.003 * I,"); > omniout_str(ALWAYS,"0.001 + 0.001 * I,"); > omniout_str(ALWAYS,"0.001 + 0.003 * I,"); > omniout_str(ALWAYS,"0.0001 + 0.004 * I,"); > omniout_str(ALWAYS,"0.003 + 0.006 * I,"); > omniout_str(ALWAYS,"0.0001 + 0.005 * I,"); > omniout_str(ALWAYS,"0.0001 + 0.003 * I,"); > omniout_str(ALWAYS,"0.001 + 0.001 * I,"); > omniout_str(ALWAYS,"0.001 + 0.003 * I,"); > omniout_str(ALWAYS,"0.0001 + 0.004 * I,"); > omniout_str(ALWAYS,"0.003 + 0.006 * I,"); > omniout_str(ALWAYS,"0.0001 + 0.005 * I,"); > omniout_str(ALWAYS,"0.0001 + 0.003 * I,"); > omniout_str(ALWAYS,"0.001 + 0.001 * I,"); > omniout_str(ALWAYS,"0.0001 + 0.004 * I,"); > omniout_str(ALWAYS,"0.003 + 0.006 * I,"); > omniout_str(ALWAYS,"0.0001 + 0.005 * I,"); > omniout_str(ALWAYS,"0.0001 + 0.003 * I,"); > omniout_str(ALWAYS,"0.001 + 0.001 * I,"); > omniout_str(ALWAYS,"0.001 + 0.003 * I,"); > omniout_str(ALWAYS,"0.0001 + 0.004 * I,"); > omniout_str(ALWAYS,"0.003 + 0.006 * I,"); > omniout_str(ALWAYS,"0.0001 + 0.005 * I,"); > omniout_str(ALWAYS,"0.0001 + 0.003 * I,"); > omniout_str(ALWAYS,"0.001 + 0.001 * I,"); > omniout_str(ALWAYS,"0.001 + 0.003 * I,"); > omniout_str(ALWAYS,"0.0001 + 0.004 * I,"); > omniout_str(ALWAYS,"0.003 + 0.006 * I,"); > omniout_str(ALWAYS,"0.0001 + 0.005 * I,"); > omniout_str(ALWAYS,"0.0001 + 0.003 * I,"); > omniout_str(ALWAYS,"0.001 + 0.001 * I,"); > omniout_str(ALWAYS,"0.001 + 0.003 * I,"); > omniout_str(ALWAYS,"0.0001 + 0.004 * I,"); > omniout_str(ALWAYS,"0.003 + 0.006 * I,"); > omniout_str(ALWAYS,"0.0001 + 0.005 * I,"); > omniout_str(ALWAYS,"0.0001 + 0.003 * I,"); > omniout_str(ALWAYS,"0.001 + 0.001 * I,"); > omniout_str(ALWAYS,"0.001 + 0.003 * I,"); > omniout_str(ALWAYS,"0.0001 + 0.004 * I,"); > omniout_str(ALWAYS,"0.003 + 0.006 * I,"); > omniout_str(ALWAYS,"0.0001 + 0.005 * I,"); > omniout_str(ALWAYS,"0.0001 + 0.003 * I,"); > omniout_str(ALWAYS,"0.001 + 0.001 * I,"); > omniout_str(ALWAYS,"0.0001 + 0.004 * I,"); > omniout_str(ALWAYS,"0.003 + 0.006 * I,"); > omniout_str(ALWAYS,"0.0001 + 0.005 * I,"); > omniout_str(ALWAYS,"0.0001 + 0.003 * I,"); > omniout_str(ALWAYS,"0.001 + 0.001 * I,"); > omniout_str(ALWAYS,"0.001 + 0.003 * I,"); > omniout_str(ALWAYS,"0.0001 + 0.004 * I,"); > omniout_str(ALWAYS,"0.003 + 0.006 * I,"); > omniout_str(ALWAYS,"0.0001 + 0.005 * I,"); > omniout_str(ALWAYS,"0.0001 + 0.003 * I,"); > omniout_str(ALWAYS,"0.001 + 0.001 * I,"); > omniout_str(ALWAYS,"0.001 + 0.003 * I,"); > omniout_str(ALWAYS,"0.0001 + 0.004 * I,"); > omniout_str(ALWAYS,"0.003 + 0.006 * I,"); > omniout_str(ALWAYS,"0.0001 + 0.005 * I,"); > omniout_str(ALWAYS,"0.0001 + 0.003 * I,"); > omniout_str(ALWAYS,"0.001 + 0.001 * I,"); > omniout_str(ALWAYS,"0.001 + 0.003 * I,"); > omniout_str(ALWAYS,"0.0001 + 0.004 * I,"); > omniout_str(ALWAYS,"0.003 + 0.006 * I,"); > omniout_str(ALWAYS,"0.0001 + 0.005 * I,"); > omniout_str(ALWAYS,"0.0001 + 0.003 * I,"); > omniout_str(ALWAYS,"0.001 + 0.001 * I,"); > omniout_str(ALWAYS,"0.001 + 0.003 * I,"); > omniout_str(ALWAYS,"0.0001 + 0.004 * I,"); > omniout_str(ALWAYS,"0.003 + 0.006 * I,"); > omniout_str(ALWAYS,"0.0001 + 0.005 * I,"); > omniout_str(ALWAYS,"0.0001 + 0.003 * I,"); > omniout_str(ALWAYS,"0.001 + 0.001 * I,"); > omniout_str(ALWAYS,"0.0001 + 0.004 * I,"); > omniout_str(ALWAYS,"0.003 + 0.006 * I,"); > omniout_str(ALWAYS,"0.0001 + 0.005 * I,"); > omniout_str(ALWAYS,"0.0001 + 0.003 * I,"); > omniout_str(ALWAYS,"0.001 + 0.001 * I,"); > omniout_str(ALWAYS,"0.001 + 0.003 * I,"); > omniout_str(ALWAYS,"0.0001 + 0.004 * I,"); > omniout_str(ALWAYS,"0.003 + 0.006 * I,"); > omniout_str(ALWAYS,"0.0001 + 0.005 * I,"); > omniout_str(ALWAYS,"0.0001 + 0.003 * I,"); > omniout_str(ALWAYS,"0.001 + 0.001 * I,"); > omniout_str(ALWAYS,"0.001 + 0.003 * I,"); > omniout_str(ALWAYS,"0.0001 + 0.004 * I,"); > omniout_str(ALWAYS,"0.003 + 0.006 * I,"); > omniout_str(ALWAYS,"0.0001 + 0.005 * I,"); > omniout_str(ALWAYS,"0.0001 + 0.003 * I,"); > omniout_str(ALWAYS,"0.001 + 0.001 * I,"); > omniout_str(ALWAYS,"0.001 + 0.003 * I,"); > omniout_str(ALWAYS,"0.0001 + 0.004 * I,"); > omniout_str(ALWAYS,"0.003 + 0.006 * I,"); > omniout_str(ALWAYS,"0.0001 + 0.005 * I,"); > omniout_str(ALWAYS,"0.0001 + 0.003 * I,"); > omniout_str(ALWAYS,"0.001 + 0.001 * I,"); > omniout_str(ALWAYS,"0.001 + 0.003 * I,"); > omniout_str(ALWAYS,"0.0001 + 0.004 * I,"); > omniout_str(ALWAYS,"0.003 + 0.006 * I,"); > omniout_str(ALWAYS,"0.0001 + 0.005 * I,"); > omniout_str(ALWAYS,"0.0001 + 0.003 * I,"); > omniout_str(ALWAYS,"0.001 + 0.001 * I,"); > omniout_str(ALWAYS,"0.0001 + 0.004 * I,"); > omniout_str(ALWAYS,"0.003 + 0.006 * I,"); > omniout_str(ALWAYS,"0.0001 + 0.005 * I,"); > omniout_str(ALWAYS,"0.0001 + 0.003 * I,"); > omniout_str(ALWAYS,"0.001 + 0.001 * I,"); > omniout_str(ALWAYS,"0.001 + 0.003 * I,"); > omniout_str(ALWAYS,"0.0001 + 0.004 * I,"); > omniout_str(ALWAYS,"0.003 + 0.006 * I,"); > omniout_str(ALWAYS,"0.0001 + 0.005 * I,"); > omniout_str(ALWAYS,"0.0001 + 0.003 * I,"); > omniout_str(ALWAYS,"0.001 + 0.001 * I,"); > omniout_str(ALWAYS,"0.001 + 0.003 * I,"); > omniout_str(ALWAYS,"0.0001 + 0.004 * I,"); > omniout_str(ALWAYS,"0.003 + 0.006 * I,"); > omniout_str(ALWAYS,"0.0001 + 0.005 * I,"); > omniout_str(ALWAYS,"0.0001 + 0.003 * I,"); > omniout_str(ALWAYS,"0.001 + 0.001 * I,"); > omniout_str(ALWAYS,"0.001 + 0.003 * I,"); > omniout_str(ALWAYS,"0.0001 + 0.004 * I,"); > omniout_str(ALWAYS,"0.003 + 0.006 * I,"); > omniout_str(ALWAYS,"0.0001 + 0.005 * I,"); > omniout_str(ALWAYS,"0.0001 + 0.003 * I,"); > omniout_str(ALWAYS,"0.001 + 0.001 * I,"); > omniout_str(ALWAYS,"0.001 + 0.003 * I,"); > omniout_str(ALWAYS,"0.0001 + 0.004 * I,"); > omniout_str(ALWAYS,"0.003 + 0.006 * I,"); > omniout_str(ALWAYS,"0.0001 + 0.005 * I,"); > omniout_str(ALWAYS,"0.0001 + 0.003 * I,"); > omniout_str(ALWAYS,"0.001 + 0.001 * I,"); > omniout_str(ALWAYS,"0.0001 + 0.004 * I,"); > omniout_str(ALWAYS,"0.003 + 0.006 * I,"); > omniout_str(ALWAYS,"0.0001 + 0.005 * I,"); > omniout_str(ALWAYS,"0.0001 + 0.003 * I,"); > omniout_str(ALWAYS,"0.001 + 0.001 * I,"); > omniout_str(ALWAYS,"0.001 + 0.003 * I,"); > omniout_str(ALWAYS,"0.0001 + 0.004 * I,"); > omniout_str(ALWAYS,"0.003 + 0.006 * I,"); > omniout_str(ALWAYS,"0.0001 + 0.005 * I,"); > omniout_str(ALWAYS,"0.0001 + 0.003 * I,"); > omniout_str(ALWAYS,"0.001 + 0.001 * I,"); > omniout_str(ALWAYS,"0.001 + 0.003 * I,"); > omniout_str(ALWAYS,"0.0001 + 0.004 * I,"); > omniout_str(ALWAYS,"0.003 + 0.006 * I,"); > omniout_str(ALWAYS,"0.0001 + 0.005 * I,"); > omniout_str(ALWAYS,"0.0001 + 0.003 * I,"); > omniout_str(ALWAYS,"0.001 + 0.001 * I,"); > omniout_str(ALWAYS,"0.001 + 0.003 * I,"); > omniout_str(ALWAYS,"0.0001 + 0.004 * I,"); > omniout_str(ALWAYS,"0.003 + 0.006 * I,"); > omniout_str(ALWAYS,"0.0001 + 0.005 * I,"); > omniout_str(ALWAYS,"0.0001 + 0.003 * I,"); > omniout_str(ALWAYS,"0.001 + 0.001 * I,"); > omniout_str(ALWAYS,"0.001 + 0.003 * I,"); > omniout_str(ALWAYS,"0.0001 + 0.004 * I,"); > omniout_str(ALWAYS,"0.003 + 0.006 * I,"); > omniout_str(ALWAYS,"0.0001 + 0.005 * I,"); > omniout_str(ALWAYS,"0.0001 + 0.003 * I,"); > omniout_str(ALWAYS,"0.001 + 0.001 * I,"); > omniout_str(ALWAYS,"0.0001 + 0.004 * I,"); > omniout_str(ALWAYS,"0.003 + 0.006 * I,"); > omniout_str(ALWAYS,"0.0001 + 0.005 * I,"); > omniout_str(ALWAYS,"0.0001 + 0.003 * I,"); > omniout_str(ALWAYS,"0.001 + 0.001 * I,"); > omniout_str(ALWAYS,"0.001 + 0.003 * I,"); > omniout_str(ALWAYS,"0.0001 + 0.004 * I,"); > omniout_str(ALWAYS,"0.003 + 0.006 * I,"); > omniout_str(ALWAYS,"0.0001 + 0.005 * I,"); > omniout_str(ALWAYS,"0.0001 + 0.003 * I,"); > omniout_str(ALWAYS,"0.001 + 0.001 * I,"); > omniout_str(ALWAYS,"0.001 + 0.003 * I,"); > omniout_str(ALWAYS,"0.0001 + 0.004 * I,"); > omniout_str(ALWAYS,"0.003 + 0.006 * I,"); > omniout_str(ALWAYS,"0.0001 + 0.005 * I,"); > omniout_str(ALWAYS,"0.0001 + 0.003 * I,"); > omniout_str(ALWAYS,"0.001 + 0.001 * I,"); > omniout_str(ALWAYS,"0.001 + 0.003 * I,"); > omniout_str(ALWAYS,"0.0001 + 0.004 * I,"); > omniout_str(ALWAYS,"0.003 + 0.006 * I,"); > omniout_str(ALWAYS,"0.0001 + 0.005 * I,"); > omniout_str(ALWAYS,"0.0001 + 0.003 * I,"); > omniout_str(ALWAYS,"0.001 + 0.001 * I,"); > omniout_str(ALWAYS,"0.001 + 0.003 * I,"); > omniout_str(ALWAYS,"0.0001 + 0.004 * I,"); > omniout_str(ALWAYS,"0.003 + 0.006 * I,"); > omniout_str(ALWAYS,"0.0001 + 0.005 * I,"); > omniout_str(ALWAYS,"0.0001 + 0.003 * I,"); > omniout_str(ALWAYS,"0.001 + 0.001 * I,"); > omniout_str(ALWAYS,"0.0001 + 0.004 * I,"); > omniout_str(ALWAYS,"0.003 + 0.006 * I,"); > omniout_str(ALWAYS,"0.0001 + 0.005 * I,"); > omniout_str(ALWAYS,"0.0001 + 0.003 * I,"); > omniout_str(ALWAYS,"0.001 + 0.001 * I,"); > omniout_str(ALWAYS,"0.001 + 0.003 * I,"); > omniout_str(ALWAYS,"0.0001 + 0.004 * I,"); > omniout_str(ALWAYS,"0.003 + 0.006 * I,"); > omniout_str(ALWAYS,"0.0001 + 0.005 * I,"); > omniout_str(ALWAYS,"0.0001 + 0.003 * I,"); > omniout_str(ALWAYS,"0.001 + 0.001 * I,"); > omniout_str(ALWAYS,"0.001 + 0.003 * I,"); > omniout_str(ALWAYS,"0.0001 + 0.004 * I,"); > omniout_str(ALWAYS,"0.003 + 0.006 * I,"); > omniout_str(ALWAYS,"0.0001 + 0.005 * I,"); > omniout_str(ALWAYS,"0.0001 + 0.003 * I,"); > omniout_str(ALWAYS,"0.001 + 0.001 * I,"); > omniout_str(ALWAYS,"0.001 + 0.003 * I,"); > omniout_str(ALWAYS,"0.0001 + 0.004 * I,"); > omniout_str(ALWAYS,"0.003 + 0.006 * I,"); > omniout_str(ALWAYS,"0.0001 + 0.005 * I,"); > omniout_str(ALWAYS,"0.0001 + 0.003 * I,"); > omniout_str(ALWAYS,"0.001 + 0.001 * I,"); > omniout_str(ALWAYS,"0.001 + 0.003 * I,"); > omniout_str(ALWAYS,"0.0001 + 0.004 * I,"); > omniout_str(ALWAYS,"0.003 + 0.006 * I,"); > omniout_str(ALWAYS,"0.0001 + 0.005 * I,"); > omniout_str(ALWAYS,"0.0001 + 0.003 * I,"); > omniout_str(ALWAYS,"0.001 + 0.001 * I,"); > omniout_str(ALWAYS,"0.0001 + 0.004 * I,"); > omniout_str(ALWAYS,"0.003 + 0.006 * I,"); > omniout_str(ALWAYS,"0.0001 + 0.005 * I,"); > omniout_str(ALWAYS,"0.0001 + 0.003 * I,"); > omniout_str(ALWAYS,"0.001 + 0.001 * I,"); > omniout_str(ALWAYS,"0.001 + 0.003 * I,"); > omniout_str(ALWAYS,"0.0001 + 0.004 * I,"); > omniout_str(ALWAYS,"0.003 + 0.006 * I,"); > omniout_str(ALWAYS,"0.0001 + 0.005 * I,"); > omniout_str(ALWAYS,"0.0001 + 0.003 * I,"); > omniout_str(ALWAYS,"0.001 + 0.001 * I,"); > omniout_str(ALWAYS,"0.001 + 0.003 * I,"); > omniout_str(ALWAYS,"0.0001 + 0.004 * I,"); > omniout_str(ALWAYS,"0.003 + 0.006 * I,"); > omniout_str(ALWAYS,"0.0001 + 0.005 * I,"); > omniout_str(ALWAYS,"0.0001 + 0.003 * I,"); > omniout_str(ALWAYS,"0.001 + 0.001 * I,"); > omniout_str(ALWAYS,"0.001 + 0.003 * I,"); > omniout_str(ALWAYS,"0.0001 + 0.004 * I,"); > omniout_str(ALWAYS,"0.003 + 0.006 * I,"); > omniout_str(ALWAYS,"0.0001 + 0.005 * I,"); > omniout_str(ALWAYS,"0.0001 + 0.003 * I,"); > omniout_str(ALWAYS,"0.001 + 0.001 * I,"); > omniout_str(ALWAYS,"0.001 + 0.003 * I,"); > omniout_str(ALWAYS,"0.0001 + 0.004 * I,"); > omniout_str(ALWAYS,"0.003 + 0.006 * I,"); > omniout_str(ALWAYS,"0.0001 + 0.005 * I,"); > omniout_str(ALWAYS,"0.0001 + 0.003 * I,"); > omniout_str(ALWAYS,"0.001 + 0.001 * I,"); > omniout_str(ALWAYS,"0.0001 + 0.004 * I,"); > omniout_str(ALWAYS,"0.003 + 0.006 * I,"); > omniout_str(ALWAYS,"0.0001 + 0.005 * I,"); > omniout_str(ALWAYS,"0.0001 + 0.003 * I,"); > omniout_str(ALWAYS,"0.001 + 0.001 * I,"); > omniout_str(ALWAYS,"0.001 + 0.003 * I,"); > omniout_str(ALWAYS,"0.0001 + 0.004 * I,"); > omniout_str(ALWAYS,"0.003 + 0.006 * I,"); > omniout_str(ALWAYS,"0.0001 + 0.005 * I,"); > omniout_str(ALWAYS,"0.0001 + 0.003 * I,"); > omniout_str(ALWAYS,"0.001 + 0.001 * I,"); > omniout_str(ALWAYS,"0.001 + 0.003 * I,"); > omniout_str(ALWAYS,"0.0001 + 0.004 * I,"); > omniout_str(ALWAYS,"0.003 + 0.006 * I,"); > omniout_str(ALWAYS,"0.0001 + 0.005 * I,"); > omniout_str(ALWAYS,"0.0001 + 0.003 * I,"); > omniout_str(ALWAYS,"0.001 + 0.001 * I,"); > omniout_str(ALWAYS,"0.001 + 0.003 * I,"); > omniout_str(ALWAYS,"0.0001 + 0.004 * I,"); > omniout_str(ALWAYS,"0.003 + 0.006 * I,"); > omniout_str(ALWAYS,"0.0001 + 0.005 * I,"); > omniout_str(ALWAYS,"0.0001 + 0.003 * I,"); > omniout_str(ALWAYS,"0.001 + 0.001 * I,"); > omniout_str(ALWAYS,"0.001 + 0.003 * I,"); > omniout_str(ALWAYS,"0.0001 + 0.004 * I,"); > omniout_str(ALWAYS,"0.003 + 0.006 * I,"); > omniout_str(ALWAYS,"0.0001 + 0.005 * I,"); > omniout_str(ALWAYS,"0.0001 + 0.003 * I,"); > omniout_str(ALWAYS,"0.001 + 0.001 * I,"); > omniout_str(ALWAYS,"0.0001 + 0.004 * I,"); > omniout_str(ALWAYS,"0.003 + 0.006 * I,"); > omniout_str(ALWAYS,"0.0001 + 0.005 * I,"); > omniout_str(ALWAYS,"0.0001 + 0.003 * I,"); > omniout_str(ALWAYS,"0.001 + 0.001 * I,"); > omniout_str(ALWAYS,"0.001 + 0.003 * I,"); > omniout_str(ALWAYS,"0.0001 + 0.004 * I,"); > omniout_str(ALWAYS,"0.003 + 0.006 * I,"); > omniout_str(ALWAYS,"0.0001 + 0.005 * I,"); > omniout_str(ALWAYS,"0.0001 + 0.003 * I,"); > omniout_str(ALWAYS,"0.001 + 0.001 * I,"); > omniout_str(ALWAYS,"0.001 + 0.003 * I,"); > omniout_str(ALWAYS,"0.0001 + 0.004 * I,"); > omniout_str(ALWAYS,"0.003 + 0.006 * I,"); > omniout_str(ALWAYS,"0.0001 + 0.005 * I,"); > omniout_str(ALWAYS,"0.0001 + 0.003 * I,"); > omniout_str(ALWAYS,"0.001 + 0.001 * I,"); > omniout_str(ALWAYS,"0.001 + 0.003 * I,"); > omniout_str(ALWAYS,"0.0001 + 0.004 * I,"); > omniout_str(ALWAYS,"0.003 + 0.006 * I,"); > omniout_str(ALWAYS,"0.0001 + 0.005 * I,"); > omniout_str(ALWAYS,"0.0001 + 0.003 * I,"); > omniout_str(ALWAYS,"0.001 + 0.001 * I,"); > omniout_str(ALWAYS,"0.001 + 0.003 * I,"); > omniout_str(ALWAYS,"0.0001 + 0.004 * I,"); > omniout_str(ALWAYS,"0.003 + 0.006 * I,"); > omniout_str(ALWAYS,"0.0001 + 0.005 * I,"); > omniout_str(ALWAYS,"0.0001 + 0.003 * I,"); > omniout_str(ALWAYS,"0.001 + 0.001 * I,"); > omniout_str(ALWAYS,"0.0001 + 0.004 * I,"); > omniout_str(ALWAYS,"0.003 + 0.006 * I,"); > omniout_str(ALWAYS,"0.0001 + 0.005 * I,"); > omniout_str(ALWAYS,"0.0001 + 0.003 * I,"); > omniout_str(ALWAYS,"0.001 + 0.001 * I,"); > omniout_str(ALWAYS,"0.001 + 0.003 * I,"); > omniout_str(ALWAYS,"0.0001 + 0.004 * I,"); > omniout_str(ALWAYS,"0.003 + 0.006 * I,"); > omniout_str(ALWAYS,"0.0001 + 0.005 * I,"); > omniout_str(ALWAYS,"0.0001 + 0.003 * I,"); > omniout_str(ALWAYS,"0.001 + 0.001 * I,"); > omniout_str(ALWAYS,"0.001 + 0.003 * I,"); > omniout_str(ALWAYS,"0.0001 + 0.004 * I,"); > omniout_str(ALWAYS,"0.003 + 0.006 * I,"); > omniout_str(ALWAYS,"0.0001 + 0.005 * I,"); > omniout_str(ALWAYS,"0.0001 + 0.003 * I,"); > omniout_str(ALWAYS,"0.001 + 0.001 * I,"); > omniout_str(ALWAYS,"0.001 + 0.003 * I,"); > omniout_str(ALWAYS,"0.0001 + 0.004 * I,"); > omniout_str(ALWAYS,"0.003 + 0.006 * I,"); > omniout_str(ALWAYS,"0.0001 + 0.005 * I,"); > omniout_str(ALWAYS,"0.0001 + 0.003 * I,"); > omniout_str(ALWAYS,"0.001 + 0.001 * I,"); > omniout_str(ALWAYS,"0.001 + 0.003 * I,"); > omniout_str(ALWAYS,"0.0001 + 0.004 * I,"); > omniout_str(ALWAYS,"0.003 + 0.006 * I,"); > omniout_str(ALWAYS,"0.0001 + 0.005 * I,"); > omniout_str(ALWAYS,"0.0001 + 0.003 * I,"); > omniout_str(ALWAYS,"0.001 + 0.001 * I,"); > omniout_str(ALWAYS,"0.0001 + 0.004 * I,"); > omniout_str(ALWAYS,"0.003 + 0.006 * I,"); > omniout_str(ALWAYS,"0.0001 + 0.005 * I,"); > omniout_str(ALWAYS,"0.0001 + 0.003 * I,"); > omniout_str(ALWAYS,"0.001 + 0.001 * I,"); > omniout_str(ALWAYS,"0.001 + 0.003 * I,"); > omniout_str(ALWAYS,"0.0001 + 0.004 * I,"); > omniout_str(ALWAYS,"0.003 + 0.006 * I,"); > omniout_str(ALWAYS,"0.0001 + 0.005 * I,"); > omniout_str(ALWAYS,"0.0001 + 0.003 * I,"); > omniout_str(ALWAYS,"0.001 + 0.001 * I,"); > omniout_str(ALWAYS,"0.001 + 0.003 * I,"); > omniout_str(ALWAYS,"0.0001 + 0.004 * I,"); > omniout_str(ALWAYS,"0.003 + 0.006 * I,"); > omniout_str(ALWAYS,"0.0001 + 0.005 * I,"); > omniout_str(ALWAYS,"0.0001 + 0.003 * I,"); > omniout_str(ALWAYS,"0.001 + 0.001 * I,"); > omniout_str(ALWAYS,"0.001 + 0.003 * I,"); > omniout_str(ALWAYS,"0.0001 + 0.004 * I,"); > omniout_str(ALWAYS,"0.003 + 0.006 * I,"); > omniout_str(ALWAYS,"0.0001 + 0.005 * I,"); > omniout_str(ALWAYS,"0.0001 + 0.003 * I,"); > omniout_str(ALWAYS,"0.001 + 0.001 * I,"); > omniout_str(ALWAYS,"0.001 + 0.003 * I,"); > omniout_str(ALWAYS,"0.0001 + 0.004 * I,"); > omniout_str(ALWAYS,"0.003 + 0.006 * I,"); > omniout_str(ALWAYS,"0.0001 + 0.005 * I,"); > omniout_str(ALWAYS,"0.0001 + 0.003 * I,"); > omniout_str(ALWAYS,"0.001 + 0.001 * I,"); > omniout_str(ALWAYS,"0.001 + 0.003 * I,"); > omniout_str(ALWAYS,"0.000 + 0.000 * I ];"); > omniout_str(ALWAYS,""); > omniout_str(ALWAYS,"glob_nxt := glob_nxt + 1;"); > omniout_str(ALWAYS,"it := x_delta[glob_nxt];"); > omniout_str(ALWAYS,"return it;"); > omniout_str(ALWAYS,"end;"); > omniout_str(ALWAYS,"#END USER DEF BLOCK"); > omniout_str(ALWAYS,"#######END OF ECHO OF PROBLEM#################"); > glob_unchanged_h_cnt := 0; > glob_warned := false; > glob_warned2 := false; > glob_small_float := glob__0; > glob_smallish_float := glob__0; > glob_large_float := c(1.0e100); > glob_larger_float := c( 1.1e100); > glob_almost_1 := c( 0.99); > # before second block > #TOP SECOND INPUT BLOCK > #BEGIN SECOND INPUT BLOCK > #BEGIN BLOCK 2 > #END FIRST INPUT BLOCK > #BEGIN SECOND INPUT BLOCK > x_start := 0.1 + 0.1 * I; > x_end := 99.0 + 99.0 * I; > array_y_init[0 + 1] := exact_soln_y(x_start); > glob_look_poles := true; > glob_max_h := c( 0.001); > glob_type_given_pole := 1; > array_given_rad_poles[1,1] :=c( -2.0); > array_given_rad_poles[1,2] := c(0.0); > array_given_ord_poles[1,1] := c(0.5); > array_given_ord_poles[1,2] := c(0.0); > #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 ) = arccos ( sqrt ( 0.1 * x + 0.2 ) ) ; "); > omniout_int(INFO,"Iterations ",32,glob_iter,4," ") > ; > prog_report(x_start,x_end); > if (glob_html_log) then # if number 10 > logstart(html_log_file); > logitem_str(html_log_file,"2017-11-26T14:32:57-06:00") > ; > logitem_str(html_log_file,"Maple") > ; > logitem_str(html_log_file,"arccos_sqrt") > ; > logitem_str(html_log_file,"diff ( y , x , 1 ) = arccos ( sqrt ( 0.1 * x + 0.2 ) ) ; ") > ; > 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,"arccos_sqrt diffeq.mxt") > ; > logitem_str(html_log_file,"arccos_sqrt maple results") > ; > logitem_str(html_log_file,"Good Accuracy - Wasn't for Real") > ; > 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_0D1, array_const_0D2, 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, array_tmp4_a1, array_tmp4, array_tmp5, array_m1, array_y_higher, array_y_higher_work, array_y_higher_work2, array_y_set_initial, array_given_rad_poles, array_given_ord_poles, array_rad_test_poles, array_ord_test_poles, array_fact_2, ATS_MAX_TERMS, glob_last; ATS_MAX_TERMS := 30; Digits := 32; max_terms := 30; glob_html_log := true; array_y_init := Array(0 .. 30, []); array_norms := Array(0 .. 30, []); array_fact_1 := Array(0 .. 30, []); array_1st_rel_error := Array(0 .. 2, []); array_last_rel_error := Array(0 .. 2, []); array_est_rel_error := Array(0 .. 2, []); array_max_est_error := Array(0 .. 2, []); array_type_pole := Array(0 .. 2, []); array_type_real_pole := Array(0 .. 2, []); array_type_complex_pole := Array(0 .. 2, []); array_est_digits := Array(0 .. 2, []); array_y := Array(0 .. 30, []); array_x := Array(0 .. 30, []); array_tmp0 := Array(0 .. 30, []); array_tmp1 := Array(0 .. 30, []); array_tmp2 := Array(0 .. 30, []); array_tmp3 := Array(0 .. 30, []); array_tmp4_a1 := Array(0 .. 30, []); array_tmp4 := Array(0 .. 30, []); array_tmp5 := Array(0 .. 30, []); array_m1 := Array(0 .. 30, []); array_y_higher := Array(0 .. 2, 0 .. 31, []); array_y_higher_work := Array(0 .. 2, 0 .. 31, []); array_y_higher_work2 := Array(0 .. 2, 0 .. 31, []); array_y_set_initial := Array(0 .. 2, 0 .. 31, []); array_given_rad_poles := Array(0 .. 2, 0 .. 4, []); array_given_ord_poles := Array(0 .. 2, 0 .. 4, []); array_rad_test_poles := Array(0 .. 2, 0 .. 5, []); array_ord_test_poles := Array(0 .. 2, 0 .. 5, []); array_fact_2 := Array(0 .. 30, 0 .. 31, []); term := 1; while term <= 30 do array_y_init[term] := c(0.); term := term + 1 end do; term := 1; while term <= 30 do array_norms[term] := c(0.); term := term + 1 end do ; term := 1; while term <= 30 do array_fact_1[term] := c(0.); term := term + 1 end do; term := 1; while term <= 2 do array_1st_rel_error[term] := c(0.); term := term + 1 end do; term := 1; while term <= 2 do array_last_rel_error[term] := c(0.); term := term + 1 end do; term := 1; while term <= 2 do array_est_rel_error[term] := c(0.); term := term + 1 end do; term := 1; while term <= 2 do array_max_est_error[term] := c(0.); term := term + 1 end do; term := 1; while term <= 2 do array_type_pole[term] := 0; term := term + 1 end do; term := 1; while term <= 2 do array_type_real_pole[term] := 0; term := term + 1 end do; term := 1; while term <= 2 do array_type_complex_pole[term] := 0; term := term + 1 end do; term := 1; while term <= 2 do array_est_digits[term] := 0; term := term + 1 end do ; term := 1; while term <= 30 do array_y[term] := c(0.); term := term + 1 end do; term := 1; while term <= 30 do array_x[term] := c(0.); term := term + 1 end do; term := 1; while term <= 30 do array_tmp0[term] := c(0.); term := term + 1 end do; term := 1; while term <= 30 do array_tmp1[term] := c(0.); term := term + 1 end do; term := 1; while term <= 30 do array_tmp2[term] := c(0.); term := term + 1 end do; term := 1; while term <= 30 do array_tmp3[term] := c(0.); term := term + 1 end do; term := 1; while term <= 30 do array_tmp4_a1[term] := c(0.); term := term + 1 end do; term := 1; while term <= 30 do array_tmp4[term] := c(0.); term := term + 1 end do; term := 1; while term <= 30 do array_tmp5[term] := c(0.); term := term + 1 end do; term := 1; while term <= 30 do array_m1[term] := c(0.); term := term + 1 end do; ord := 1; while ord <= 2 do term := 1; while term <= 30 do array_y_higher[ord, term] := c(0.); term := term + 1 end do; ord := ord + 1 end do; ord := 1; while ord <= 2 do term := 1; while term <= 30 do array_y_higher_work[ord, term] := c(0.); term := term + 1 end do; ord := ord + 1 end do; ord := 1; while ord <= 2 do term := 1; while term <= 30 do array_y_higher_work2[ord, term] := c(0.); term := term + 1 end do; ord := ord + 1 end do; ord := 1; while ord <= 2 do term := 1; while term <= 30 do array_y_set_initial[ord, term] := c(0.); term := term + 1 end do; ord := ord + 1 end do; ord := 1; while ord <= 2 do term := 1; while term <= 3 do array_given_rad_poles[ord, term] := c(0.); term := term + 1 end do; ord := ord + 1 end do; ord := 1; while ord <= 2 do term := 1; while term <= 3 do array_given_ord_poles[ord, term] := c(0.); term := term + 1 end do; ord := ord + 1 end do; ord := 1; while ord <= 2 do term := 1; while term <= 4 do array_rad_test_poles[ord, term] := c(0.); term := term + 1 end do; ord := ord + 1 end do; ord := 1; while ord <= 2 do term := 1; while term <= 4 do array_ord_test_poles[ord, term] := c(0.); term := term + 1 end do; ord := ord + 1 end do; ord := 1; while ord <= 30 do term := 1; while term <= 30 do array_fact_2[ord, term] := c(0.); term := term + 1 end do; ord := ord + 1 end do; zero_ats_ar(array_y); zero_ats_ar(array_x); zero_ats_ar(array_tmp0); zero_ats_ar(array_tmp1); zero_ats_ar(array_tmp2); zero_ats_ar(array_tmp3); zero_ats_ar(array_tmp4_a1); zero_ats_ar(array_tmp4); zero_ats_ar(array_tmp5); zero_ats_ar(array_m1); zero_ats_ar(array_const_1); array_const_1[1] := c(1); zero_ats_ar(array_const_0D0); array_const_0D0[1] := c(0.); zero_ats_ar(array_const_0D1); array_const_0D1[1] := c(0.1); zero_ats_ar(array_const_0D2); array_const_0D2[1] := c(0.2); zero_ats_ar(array_m1); array_m1[1] := glob__m1; iiif := 0; while iiif <= ATS_MAX_TERMS do jjjf := 0; while jjjf <= ATS_MAX_TERMS do array_fact_1[iiif] := 0; array_fact_2[iiif, jjjf] := 0; jjjf := jjjf + 1 end do; iiif := iiif + 1 end do; ALWAYS := 1; INFO := 2; DEBUGL := 3; DEBUGMASSIVE := 4; glob_iolevel := 5; glob_yes_pole := 4; glob_no_pole := 3; glob_not_given := 0; glob_no_sing_tests := 4; glob_ratio_test := 1; glob_three_term_test := 2; glob_six_term_test := 3; glob_log_10 := log(c(10.0)); MAX_UNCHANGED := 10; glob__small := c(0.1*10^(-50)); glob_small_float := c(0.1*10^(-50)); glob_smallish_float := c(0.1*10^(-60)); glob_large_float := c(0.10*10^101); glob_larger_float := c(0.11*10^101); glob__m2 := c(-2); glob__m1 := c(-1); glob__0 := c(0); glob__1 := c(1); glob__2 := c(2); glob__3 := c(3); glob__4 := c(4); glob__5 := c(5); glob__8 := c(8); glob__10 := c(10); glob__100 := c(100); glob__pi := c(0.); glob__0_5 := c(0.5); glob__0_8 := c(0.8); glob__m0_8 := c(-0.8); glob__0_25 := c(0.25); glob__0_125 := c(0.125); glob_h := 0.1; glob_nxt := 1; glob_prec := c(0.10*10^(-15)); glob_check_sign := c(1.0); glob_desired_digits_correct := c(8.0); glob_max_estimated_step_error := c(0.); glob_ratio_of_radius := c(0.1); glob_percent_done := c(0.); glob_total_exp_sec := c(0.1); glob_optimal_expect_sec := c(0.1); glob_estimated_size_answer := c(100.0); glob_almost_1 := c(0.9990); glob_clock_sec := c(0.); glob_clock_start_sec := c(0.); glob_disp_incr := c(0.1); glob_diff_rc_fm := c(0.1); glob_diff_rc_fmm1 := c(0.1); glob_diff_rc_fmm2 := c(0.1); glob_diff_ord_fm := c(0.1); glob_diff_ord_fmm1 := c(0.1); glob_diff_ord_fmm2 := c(0.1); glob_six_term_ord_save := c(0.1); glob_guess_error_rc := c(0.1); glob_guess_error_ord := c(0.1); glob_least_given_sing := c(0.99*10^201); glob_least_ratio_sing := c(0.99*10^201); glob_least_3_sing := c(0.99*10^101); glob_least_6_sing := c(0.99*10^101); glob_last_good_h := c(0.1); glob_max_h := c(0.1); glob_min_h := c(0.1*10^(-5)); glob_display_interval := c(0.1); glob_abserr := c(0.1*10^(-10)); glob_relerr := c(0.1*10^(-10)); glob_min_pole_est := c(0.1*10^10); glob_max_rel_trunc_err := c(0.1*10^(-10)); glob_max_trunc_err := c(0.1*10^(-10)); glob_max_hours := c(0.); glob_optimal_clock_start_sec := c(0.); glob_optimal_start := c(0.); glob_upper_ratio_limit := c(1.0001); glob_lower_ratio_limit := c(0.9999); glob_max_sec := c(10000.0); glob_orig_start_sec := c(0.); glob_normmax := c(0.); glob_max_minutes := c(0.); glob_next_display := c(0.); glob_est_digits := 1; glob_subiter_method := 3; glob_html_log := true; glob_min_good_digits := 99999; glob_good_digits := 0; glob_min_apfp_est_good_digits := 99999; glob_apfp_est_good_digits := 0; glob_max_opt_iter := 10; glob_dump := false; glob_djd_debug := true; glob_display_flag := true; glob_djd_debug2 := true; glob_h_reason := 0; glob_sec_in_minute := 60; glob_min_in_hour := 60; glob_hours_in_day := 24; glob_days_in_year := 365; glob_sec_in_hour := 3600; glob_sec_in_day := 86400; glob_sec_in_year := 31536000; glob_not_yet_finished := true; glob_initial_pass := true; glob_not_yet_start_msg := true; glob_reached_optimal_h := false; glob_optimal_done := false; glob_type_given_pole := 0; glob_optimize := false; glob_look_poles := false; glob_dump_closed_form := false; glob_max_iter := 10000; glob_no_eqs := 0; glob_unchanged_h_cnt := 0; glob_warned := false; glob_warned2 := false; glob_start := 0; glob_iter := 0; array_y_set_initial[1, 1] := true; array_y_set_initial[1, 2] := false; array_y_set_initial[1, 3] := false; array_y_set_initial[1, 4] := false; array_y_set_initial[1, 5] := false; array_y_set_initial[1, 6] := false; array_y_set_initial[1, 7] := false; array_y_set_initial[1, 8] := false; array_y_set_initial[1, 9] := false; array_y_set_initial[1, 10] := false; array_y_set_initial[1, 11] := false; array_y_set_initial[1, 12] := false; array_y_set_initial[1, 13] := false; array_y_set_initial[1, 14] := false; array_y_set_initial[1, 15] := false; array_y_set_initial[1, 16] := false; array_y_set_initial[1, 17] := false; array_y_set_initial[1, 18] := false; array_y_set_initial[1, 19] := false; array_y_set_initial[1, 20] := false; array_y_set_initial[1, 21] := false; array_y_set_initial[1, 22] := false; array_y_set_initial[1, 23] := false; array_y_set_initial[1, 24] := false; array_y_set_initial[1, 25] := false; array_y_set_initial[1, 26] := false; array_y_set_initial[1, 27] := false; array_y_set_initial[1, 28] := false; array_y_set_initial[1, 29] := false; array_y_set_initial[1, 30] := false; ALWAYS := 1; INFO := 2; DEBUGL := 3; DEBUGMASSIVE := 4; ATS_MAX_TERMS := 30; glob_iolevel := INFO; glob_orig_start_sec := elapsed_time_seconds(); glob_display_flag := true; glob_no_eqs := 1; glob_iter := -1; opt_iter := -1; glob_max_iter := 10000; glob_max_hours := 0.; glob_max_minutes := 15.0; omniout_str(ALWAYS, "##############ECHO OF PROBLEM#################"); omniout_str(ALWAYS, "##############temp/arccos_sqrtpostcpx.cpx#################"); omniout_str(ALWAYS, "diff ( y , x , 1 ) = arccos ( sqrt ( 0\ .1 * x + 0.2 ) ) ; "); omniout_str(ALWAYS, "!"); omniout_str(ALWAYS, "#BEGIN FIRST INPUT BLOCK"); omniout_str(ALWAYS, "Digits:=32;"); omniout_str(ALWAYS, "max_terms:=30;"); omniout_str(ALWAYS, "!"); omniout_str(ALWAYS, "#END FIRST INPUT BLOCK"); omniout_str(ALWAYS, "#BEGIN SECOND INPUT BLOCK"); omniout_str(ALWAYS, "x_start := 0.1 + 0.1 * I;"); omniout_str(ALWAYS, "x_end := 99.0 + 99.0 * I;"); omniout_str(ALWAYS, "array_y_init[0 + 1] := exact_soln_y(x_start);"); omniout_str(ALWAYS, "glob_look_poles := true;"); omniout_str(ALWAYS, "glob_max_h := c( 0.001);"); omniout_str(ALWAYS, ""); 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 := 1;"); omniout_str(ALWAYS, ""); omniout_str(ALWAYS, "array_given_rad_poles[1,1] :=c( -2.0);"); omniout_str(ALWAYS, ""); omniout_str(ALWAYS, "array_given_rad_poles[1,2] := c(0.0);"); omniout_str(ALWAYS, ""); omniout_str(ALWAYS, "array_given_ord_poles[1,1] := c(0.5);"); omniout_str(ALWAYS, ""); omniout_str(ALWAYS, "array_given_ord_poles[1,2] := c(0.0);"); omniout_str(ALWAYS, ""); omniout_str(ALWAYS, "#END SECOND INPUT BLOCK"); omniout_str(ALWAYS, "#BEGIN OVERRIDE BLOCK"); omniout_str(ALWAYS, "glob_desired_digits_correct:=8;"); omniout_str(ALWAYS, "glob_max_minutes:=(3.0);"); omniout_str(ALWAYS, "glob_subiter_method:=3;"); omniout_str(ALWAYS, "glob_max_iter:=10000;"); omniout_str(ALWAYS, "glob_upper_ratio_limit:=c(1.000001);"); omniout_str(ALWAYS, "glob_lower_ratio_limit:=c(0.999999);"); omniout_str(ALWAYS, "glob_look_poles:=true;"); omniout_str(ALWAYS, "glob_h:=c(0.001);"); omniout_str(ALWAYS, "glob_display_interval:=c(0.01);"); omniout_str(ALWAYS, "#END OVERRIDE BLOCK"); omniout_str(ALWAYS, "!"); omniout_str(ALWAYS, "#BEGIN USER DEF BLOCK"); omniout_str(ALWAYS, "exact_soln_y := proc(x)"); omniout_str(ALWAYS, ""); omniout_str(ALWAYS, ""); omniout_str(ALWAYS, "return(c(10.0) * (c(0.1) * c(x) + c(0.2)) * arcc\ os(sqrt ( c(0.1) * c(x) + c(0.2))) - c(5.0) * sqrt( c(0.1) * c(x\ ) + c(0.2)) * sqrt( c(0.8) - c(0.1) * c(x)) + c(5.0) * arcsin(sq\ rt( c(0.1) * c(x) + c(0.2))));"); omniout_str(ALWAYS, "end;"); omniout_str(ALWAYS, "next_delta := proc()"); omniout_str(ALWAYS, "global glob_nxt, x_delta;"); omniout_str(ALWAYS, ""); omniout_str(ALWAYS, "x_delta := [ 0.001 + 0.00004 * I,"); omniout_str(ALWAYS, "0.0001 + 0.004 * I,"); omniout_str(ALWAYS, "0.003 + 0.006 * I,"); omniout_str(ALWAYS, "0.0001 + 0.005 * I,"); omniout_str(ALWAYS, "0.0001 + 0.003 * I,"); omniout_str(ALWAYS, "0.001 + 0.001 * I,"); omniout_str(ALWAYS, "0.001 + 0.003 * I,"); omniout_str(ALWAYS, "0.0001 + 0.004 * I,"); omniout_str(ALWAYS, "0.003 + 0.006 * I,"); omniout_str(ALWAYS, "0.0001 + 0.005 * I,"); omniout_str(ALWAYS, "0.0001 + 0.003 * I,"); omniout_str(ALWAYS, "0.001 + 0.001 * I,"); omniout_str(ALWAYS, "0.001 + 0.003 * I,"); omniout_str(ALWAYS, "0.0001 + 0.004 * I,"); omniout_str(ALWAYS, "0.003 + 0.006 * I,"); omniout_str(ALWAYS, "0.0001 + 0.005 * I,"); omniout_str(ALWAYS, "0.0001 + 0.003 * I,"); omniout_str(ALWAYS, "0.001 + 0.001 * I,"); omniout_str(ALWAYS, "0.001 + 0.003 * I,"); omniout_str(ALWAYS, "0.0001 + 0.004 * I,"); omniout_str(ALWAYS, "0.003 + 0.006 * I,"); omniout_str(ALWAYS, "0.0001 + 0.005 * I,"); omniout_str(ALWAYS, "0.0001 + 0.003 * I,"); omniout_str(ALWAYS, "0.001 + 0.001 * I,"); omniout_str(ALWAYS, "0.001 + 0.003 * I,"); omniout_str(ALWAYS, "0.0001 + 0.004 * I,"); omniout_str(ALWAYS, "0.003 + 0.006 * I,"); omniout_str(ALWAYS, "0.0001 + 0.005 * I,"); omniout_str(ALWAYS, "0.0001 + 0.003 * I,"); omniout_str(ALWAYS, "0.001 + 0.001 * I,"); omniout_str(ALWAYS, "0.0001 + 0.004 * I,"); omniout_str(ALWAYS, "0.003 + 0.006 * I,"); omniout_str(ALWAYS, "0.0001 + 0.005 * I,"); omniout_str(ALWAYS, "0.0001 + 0.003 * I,"); omniout_str(ALWAYS, "0.001 + 0.001 * I,"); omniout_str(ALWAYS, "0.001 + 0.003 * I,"); omniout_str(ALWAYS, "0.0001 + 0.004 * I,"); omniout_str(ALWAYS, "0.003 + 0.006 * I,"); omniout_str(ALWAYS, "0.0001 + 0.005 * I,"); omniout_str(ALWAYS, "0.0001 + 0.003 * I,"); omniout_str(ALWAYS, "0.001 + 0.001 * I,"); omniout_str(ALWAYS, "0.001 + 0.003 * I,"); omniout_str(ALWAYS, "0.0001 + 0.004 * I,"); omniout_str(ALWAYS, "0.003 + 0.006 * I,"); omniout_str(ALWAYS, "0.0001 + 0.005 * I,"); omniout_str(ALWAYS, "0.0001 + 0.003 * I,"); omniout_str(ALWAYS, "0.001 + 0.001 * I,"); omniout_str(ALWAYS, "0.001 + 0.003 * I,"); omniout_str(ALWAYS, "0.0001 + 0.004 * I,"); omniout_str(ALWAYS, "0.003 + 0.006 * I,"); omniout_str(ALWAYS, "0.0001 + 0.005 * I,"); omniout_str(ALWAYS, "0.0001 + 0.003 * I,"); omniout_str(ALWAYS, "0.001 + 0.001 * I,"); omniout_str(ALWAYS, "0.001 + 0.003 * I,"); omniout_str(ALWAYS, "0.0001 + 0.004 * I,"); omniout_str(ALWAYS, "0.003 + 0.006 * I,"); omniout_str(ALWAYS, "0.0001 + 0.005 * I,"); omniout_str(ALWAYS, "0.0001 + 0.003 * I,"); omniout_str(ALWAYS, "0.001 + 0.001 * I,"); omniout_str(ALWAYS, "0.0001 + 0.004 * I,"); omniout_str(ALWAYS, "0.003 + 0.006 * I,"); omniout_str(ALWAYS, "0.0001 + 0.005 * I,"); omniout_str(ALWAYS, "0.0001 + 0.003 * I,"); omniout_str(ALWAYS, "0.001 + 0.001 * I,"); omniout_str(ALWAYS, "0.001 + 0.003 * I,"); omniout_str(ALWAYS, "0.0001 + 0.004 * I,"); omniout_str(ALWAYS, "0.003 + 0.006 * I,"); omniout_str(ALWAYS, "0.0001 + 0.005 * I,"); omniout_str(ALWAYS, "0.0001 + 0.003 * I,"); omniout_str(ALWAYS, "0.001 + 0.001 * I,"); omniout_str(ALWAYS, "0.001 + 0.003 * I,"); omniout_str(ALWAYS, "0.0001 + 0.004 * I,"); omniout_str(ALWAYS, "0.003 + 0.006 * I,"); omniout_str(ALWAYS, "0.0001 + 0.005 * I,"); omniout_str(ALWAYS, "0.0001 + 0.003 * I,"); omniout_str(ALWAYS, "0.001 + 0.001 * I,"); omniout_str(ALWAYS, "0.001 + 0.003 * I,"); omniout_str(ALWAYS, "0.0001 + 0.004 * I,"); omniout_str(ALWAYS, "0.003 + 0.006 * I,"); omniout_str(ALWAYS, "0.0001 + 0.005 * I,"); omniout_str(ALWAYS, "0.0001 + 0.003 * I,"); omniout_str(ALWAYS, "0.001 + 0.001 * I,"); omniout_str(ALWAYS, "0.001 + 0.003 * I,"); omniout_str(ALWAYS, "0.0001 + 0.004 * I,"); omniout_str(ALWAYS, "0.003 + 0.006 * I,"); omniout_str(ALWAYS, "0.0001 + 0.005 * I,"); omniout_str(ALWAYS, "0.0001 + 0.003 * I,"); omniout_str(ALWAYS, "0.001 + 0.001 * I,"); omniout_str(ALWAYS, "0.0001 + 0.004 * I,"); omniout_str(ALWAYS, "0.003 + 0.006 * I,"); omniout_str(ALWAYS, "0.0001 + 0.005 * I,"); omniout_str(ALWAYS, "0.0001 + 0.003 * I,"); omniout_str(ALWAYS, "0.001 + 0.001 * I,"); omniout_str(ALWAYS, "0.001 + 0.003 * I,"); omniout_str(ALWAYS, "0.0001 + 0.004 * I,"); omniout_str(ALWAYS, "0.003 + 0.006 * I,"); omniout_str(ALWAYS, "0.0001 + 0.005 * I,"); omniout_str(ALWAYS, "0.0001 + 0.003 * I,"); omniout_str(ALWAYS, "0.001 + 0.001 * I,"); omniout_str(ALWAYS, "0.001 + 0.003 * I,"); omniout_str(ALWAYS, "0.0001 + 0.004 * I,"); omniout_str(ALWAYS, "0.003 + 0.006 * I,"); omniout_str(ALWAYS, "0.0001 + 0.005 * I,"); omniout_str(ALWAYS, "0.0001 + 0.003 * I,"); omniout_str(ALWAYS, "0.001 + 0.001 * I,"); omniout_str(ALWAYS, "0.001 + 0.003 * I,"); omniout_str(ALWAYS, "0.0001 + 0.004 * I,"); omniout_str(ALWAYS, "0.003 + 0.006 * I,"); omniout_str(ALWAYS, "0.0001 + 0.005 * I,"); omniout_str(ALWAYS, "0.0001 + 0.003 * I,"); omniout_str(ALWAYS, "0.001 + 0.001 * I,"); omniout_str(ALWAYS, "0.001 + 0.003 * I,"); omniout_str(ALWAYS, "0.0001 + 0.004 * I,"); omniout_str(ALWAYS, "0.003 + 0.006 * I,"); omniout_str(ALWAYS, "0.0001 + 0.005 * I,"); omniout_str(ALWAYS, "0.0001 + 0.003 * I,"); omniout_str(ALWAYS, "0.001 + 0.001 * I,"); omniout_str(ALWAYS, "0.0001 + 0.004 * I,"); omniout_str(ALWAYS, "0.003 + 0.006 * I,"); omniout_str(ALWAYS, "0.0001 + 0.005 * I,"); omniout_str(ALWAYS, "0.0001 + 0.003 * I,"); omniout_str(ALWAYS, "0.001 + 0.001 * I,"); omniout_str(ALWAYS, "0.001 + 0.003 * I,"); omniout_str(ALWAYS, "0.0001 + 0.004 * I,"); omniout_str(ALWAYS, "0.003 + 0.006 * I,"); omniout_str(ALWAYS, "0.0001 + 0.005 * I,"); omniout_str(ALWAYS, "0.0001 + 0.003 * I,"); omniout_str(ALWAYS, "0.001 + 0.001 * I,"); omniout_str(ALWAYS, "0.001 + 0.003 * I,"); omniout_str(ALWAYS, "0.0001 + 0.004 * I,"); omniout_str(ALWAYS, "0.003 + 0.006 * I,"); omniout_str(ALWAYS, "0.0001 + 0.005 * I,"); omniout_str(ALWAYS, "0.0001 + 0.003 * I,"); omniout_str(ALWAYS, "0.001 + 0.001 * I,"); omniout_str(ALWAYS, "0.001 + 0.003 * I,"); omniout_str(ALWAYS, "0.0001 + 0.004 * I,"); omniout_str(ALWAYS, "0.003 + 0.006 * I,"); omniout_str(ALWAYS, "0.0001 + 0.005 * I,"); omniout_str(ALWAYS, "0.0001 + 0.003 * I,"); omniout_str(ALWAYS, "0.001 + 0.001 * I,"); omniout_str(ALWAYS, "0.001 + 0.003 * I,"); omniout_str(ALWAYS, "0.0001 + 0.004 * I,"); omniout_str(ALWAYS, "0.003 + 0.006 * I,"); omniout_str(ALWAYS, "0.0001 + 0.005 * I,"); omniout_str(ALWAYS, "0.0001 + 0.003 * I,"); omniout_str(ALWAYS, "0.001 + 0.001 * I,"); omniout_str(ALWAYS, "0.0001 + 0.004 * I,"); omniout_str(ALWAYS, "0.003 + 0.006 * I,"); omniout_str(ALWAYS, "0.0001 + 0.005 * I,"); omniout_str(ALWAYS, "0.0001 + 0.003 * I,"); omniout_str(ALWAYS, "0.001 + 0.001 * I,"); omniout_str(ALWAYS, "0.001 + 0.003 * I,"); omniout_str(ALWAYS, "0.0001 + 0.004 * I,"); omniout_str(ALWAYS, "0.003 + 0.006 * I,"); omniout_str(ALWAYS, "0.0001 + 0.005 * I,"); omniout_str(ALWAYS, "0.0001 + 0.003 * I,"); omniout_str(ALWAYS, "0.001 + 0.001 * I,"); omniout_str(ALWAYS, "0.001 + 0.003 * I,"); omniout_str(ALWAYS, "0.0001 + 0.004 * I,"); omniout_str(ALWAYS, "0.003 + 0.006 * I,"); omniout_str(ALWAYS, "0.0001 + 0.005 * I,"); omniout_str(ALWAYS, "0.0001 + 0.003 * I,"); omniout_str(ALWAYS, "0.001 + 0.001 * I,"); omniout_str(ALWAYS, "0.001 + 0.003 * I,"); omniout_str(ALWAYS, "0.0001 + 0.004 * I,"); omniout_str(ALWAYS, "0.003 + 0.006 * I,"); omniout_str(ALWAYS, "0.0001 + 0.005 * I,"); omniout_str(ALWAYS, "0.0001 + 0.003 * I,"); omniout_str(ALWAYS, "0.001 + 0.001 * I,"); omniout_str(ALWAYS, "0.001 + 0.003 * I,"); omniout_str(ALWAYS, "0.0001 + 0.004 * I,"); omniout_str(ALWAYS, "0.003 + 0.006 * I,"); omniout_str(ALWAYS, "0.0001 + 0.005 * I,"); omniout_str(ALWAYS, "0.0001 + 0.003 * I,"); omniout_str(ALWAYS, "0.001 + 0.001 * I,"); omniout_str(ALWAYS, "0.0001 + 0.004 * I,"); omniout_str(ALWAYS, "0.003 + 0.006 * I,"); omniout_str(ALWAYS, "0.0001 + 0.005 * I,"); omniout_str(ALWAYS, "0.0001 + 0.003 * I,"); omniout_str(ALWAYS, "0.001 + 0.001 * I,"); omniout_str(ALWAYS, "0.001 + 0.003 * I,"); omniout_str(ALWAYS, "0.0001 + 0.004 * I,"); omniout_str(ALWAYS, "0.0001 + 0.004 * I,"); omniout_str(ALWAYS, "0.003 + 0.006 * I,"); omniout_str(ALWAYS, "0.0001 + 0.005 * I,"); omniout_str(ALWAYS, "0.0001 + 0.003 * I,"); omniout_str(ALWAYS, "0.001 + 0.001 * I,"); omniout_str(ALWAYS, "0.001 + 0.003 * I,"); omniout_str(ALWAYS, "0.0001 + 0.004 * I,"); omniout_str(ALWAYS, "0.003 + 0.006 * I,"); omniout_str(ALWAYS, "0.0001 + 0.005 * I,"); omniout_str(ALWAYS, "0.0001 + 0.003 * I,"); omniout_str(ALWAYS, "0.001 + 0.001 * I,"); omniout_str(ALWAYS, "0.001 + 0.003 * I,"); omniout_str(ALWAYS, "0.0001 + 0.004 * I,"); omniout_str(ALWAYS, "0.003 + 0.006 * I,"); omniout_str(ALWAYS, "0.0001 + 0.005 * I,"); omniout_str(ALWAYS, "0.0001 + 0.003 * I,"); omniout_str(ALWAYS, "0.001 + 0.001 * I,"); omniout_str(ALWAYS, "0.001 + 0.003 * I,"); omniout_str(ALWAYS, "0.0001 + 0.004 * I,"); omniout_str(ALWAYS, "0.003 + 0.006 * I,"); omniout_str(ALWAYS, "0.0001 + 0.005 * I,"); omniout_str(ALWAYS, "0.0001 + 0.003 * I,"); omniout_str(ALWAYS, "0.001 + 0.001 * I,"); omniout_str(ALWAYS, "0.001 + 0.003 * I,"); omniout_str(ALWAYS, "0.0001 + 0.004 * I,"); omniout_str(ALWAYS, "0.003 + 0.006 * I,"); omniout_str(ALWAYS, "0.0001 + 0.005 * I,"); omniout_str(ALWAYS, "0.0001 + 0.003 * I,"); omniout_str(ALWAYS, "0.001 + 0.001 * I,"); omniout_str(ALWAYS, "0.0001 + 0.004 * I,"); omniout_str(ALWAYS, "0.003 + 0.006 * I,"); omniout_str(ALWAYS, "0.0001 + 0.005 * I,"); omniout_str(ALWAYS, "0.0001 + 0.003 * I,"); omniout_str(ALWAYS, "0.001 + 0.001 * I,"); omniout_str(ALWAYS, "0.001 + 0.003 * I,"); omniout_str(ALWAYS, "0.0001 + 0.004 * I,"); omniout_str(ALWAYS, "0.003 + 0.006 * I,"); omniout_str(ALWAYS, "0.0001 + 0.005 * I,"); omniout_str(ALWAYS, "0.0001 + 0.003 * I,"); omniout_str(ALWAYS, "0.001 + 0.001 * I,"); omniout_str(ALWAYS, "0.001 + 0.003 * I,"); omniout_str(ALWAYS, "0.0001 + 0.004 * I,"); omniout_str(ALWAYS, "0.003 + 0.006 * I,"); omniout_str(ALWAYS, "0.0001 + 0.005 * I,"); omniout_str(ALWAYS, "0.0001 + 0.003 * I,"); omniout_str(ALWAYS, "0.001 + 0.001 * I,"); omniout_str(ALWAYS, "0.001 + 0.003 * I,"); omniout_str(ALWAYS, "0.0001 + 0.004 * I,"); omniout_str(ALWAYS, "0.003 + 0.006 * I,"); omniout_str(ALWAYS, "0.0001 + 0.005 * I,"); omniout_str(ALWAYS, "0.0001 + 0.003 * I,"); omniout_str(ALWAYS, "0.001 + 0.001 * I,"); omniout_str(ALWAYS, "0.001 + 0.003 * I,"); omniout_str(ALWAYS, "0.0001 + 0.004 * I,"); omniout_str(ALWAYS, "0.003 + 0.006 * I,"); omniout_str(ALWAYS, "0.0001 + 0.005 * I,"); omniout_str(ALWAYS, "0.0001 + 0.003 * I,"); omniout_str(ALWAYS, "0.001 + 0.001 * I,"); omniout_str(ALWAYS, "0.0001 + 0.004 * I,"); omniout_str(ALWAYS, "0.003 + 0.006 * I,"); omniout_str(ALWAYS, "0.0001 + 0.005 * I,"); omniout_str(ALWAYS, "0.0001 + 0.003 * I,"); omniout_str(ALWAYS, "0.001 + 0.001 * I,"); omniout_str(ALWAYS, "0.001 + 0.003 * I,"); omniout_str(ALWAYS, "0.0001 + 0.004 * I,"); omniout_str(ALWAYS, "0.003 + 0.006 * I,"); omniout_str(ALWAYS, "0.0001 + 0.005 * I,"); omniout_str(ALWAYS, "0.0001 + 0.003 * I,"); omniout_str(ALWAYS, "0.001 + 0.001 * I,"); omniout_str(ALWAYS, "0.001 + 0.003 * I,"); omniout_str(ALWAYS, "0.0001 + 0.004 * I,"); omniout_str(ALWAYS, "0.003 + 0.006 * I,"); omniout_str(ALWAYS, "0.0001 + 0.005 * I,"); omniout_str(ALWAYS, "0.0001 + 0.003 * I,"); omniout_str(ALWAYS, "0.001 + 0.001 * I,"); omniout_str(ALWAYS, "0.001 + 0.003 * I,"); omniout_str(ALWAYS, "0.0001 + 0.004 * I,"); omniout_str(ALWAYS, "0.003 + 0.006 * I,"); omniout_str(ALWAYS, "0.0001 + 0.005 * I,"); omniout_str(ALWAYS, "0.0001 + 0.003 * I,"); omniout_str(ALWAYS, "0.001 + 0.001 * I,"); omniout_str(ALWAYS, "0.001 + 0.003 * I,"); omniout_str(ALWAYS, "0.0001 + 0.004 * I,"); omniout_str(ALWAYS, "0.003 + 0.006 * I,"); omniout_str(ALWAYS, "0.0001 + 0.005 * I,"); omniout_str(ALWAYS, "0.0001 + 0.003 * I,"); omniout_str(ALWAYS, "0.001 + 0.001 * I,"); omniout_str(ALWAYS, "0.0001 + 0.004 * I,"); omniout_str(ALWAYS, "0.003 + 0.006 * I,"); omniout_str(ALWAYS, "0.0001 + 0.005 * I,"); omniout_str(ALWAYS, "0.0001 + 0.003 * I,"); omniout_str(ALWAYS, "0.001 + 0.001 * I,"); omniout_str(ALWAYS, "0.001 + 0.003 * I,"); omniout_str(ALWAYS, "0.0001 + 0.004 * I,"); omniout_str(ALWAYS, "0.003 + 0.006 * I,"); omniout_str(ALWAYS, "0.0001 + 0.005 * I,"); omniout_str(ALWAYS, "0.0001 + 0.003 * I,"); omniout_str(ALWAYS, "0.001 + 0.001 * I,"); omniout_str(ALWAYS, "0.001 + 0.003 * I,"); omniout_str(ALWAYS, "0.0001 + 0.004 * I,"); omniout_str(ALWAYS, "0.003 + 0.006 * I,"); omniout_str(ALWAYS, "0.0001 + 0.005 * I,"); omniout_str(ALWAYS, "0.0001 + 0.003 * I,"); omniout_str(ALWAYS, "0.001 + 0.001 * I,"); omniout_str(ALWAYS, "0.001 + 0.003 * I,"); omniout_str(ALWAYS, "0.0001 + 0.004 * I,"); omniout_str(ALWAYS, "0.003 + 0.006 * I,"); omniout_str(ALWAYS, "0.0001 + 0.005 * I,"); omniout_str(ALWAYS, "0.0001 + 0.003 * I,"); omniout_str(ALWAYS, "0.001 + 0.001 * I,"); omniout_str(ALWAYS, "0.001 + 0.003 * I,"); omniout_str(ALWAYS, "0.0001 + 0.004 * I,"); omniout_str(ALWAYS, "0.003 + 0.006 * I,"); omniout_str(ALWAYS, "0.0001 + 0.005 * I,"); omniout_str(ALWAYS, "0.0001 + 0.003 * I,"); omniout_str(ALWAYS, "0.001 + 0.001 * I,"); omniout_str(ALWAYS, "0.0001 + 0.004 * I,"); omniout_str(ALWAYS, "0.003 + 0.006 * I,"); omniout_str(ALWAYS, "0.0001 + 0.005 * I,"); omniout_str(ALWAYS, "0.0001 + 0.003 * I,"); omniout_str(ALWAYS, "0.001 + 0.001 * I,"); omniout_str(ALWAYS, "0.001 + 0.003 * I,"); omniout_str(ALWAYS, "0.0001 + 0.004 * I,"); omniout_str(ALWAYS, "0.003 + 0.006 * I,"); omniout_str(ALWAYS, "0.0001 + 0.005 * I,"); omniout_str(ALWAYS, "0.0001 + 0.003 * I,"); omniout_str(ALWAYS, "0.001 + 0.001 * I,"); omniout_str(ALWAYS, "0.001 + 0.003 * I,"); omniout_str(ALWAYS, "0.0001 + 0.004 * I,"); omniout_str(ALWAYS, "0.003 + 0.006 * I,"); omniout_str(ALWAYS, "0.0001 + 0.005 * I,"); omniout_str(ALWAYS, "0.0001 + 0.003 * I,"); omniout_str(ALWAYS, "0.001 + 0.001 * I,"); omniout_str(ALWAYS, "0.001 + 0.003 * I,"); omniout_str(ALWAYS, "0.0001 + 0.004 * I,"); omniout_str(ALWAYS, "0.003 + 0.006 * I,"); omniout_str(ALWAYS, "0.0001 + 0.005 * I,"); omniout_str(ALWAYS, "0.0001 + 0.003 * I,"); omniout_str(ALWAYS, "0.001 + 0.001 * I,"); omniout_str(ALWAYS, "0.001 + 0.003 * I,"); omniout_str(ALWAYS, "0.0001 + 0.004 * I,"); omniout_str(ALWAYS, "0.003 + 0.006 * I,"); omniout_str(ALWAYS, "0.0001 + 0.005 * I,"); omniout_str(ALWAYS, "0.0001 + 0.003 * I,"); omniout_str(ALWAYS, "0.001 + 0.001 * I,"); omniout_str(ALWAYS, "0.0001 + 0.004 * I,"); omniout_str(ALWAYS, "0.003 + 0.006 * I,"); omniout_str(ALWAYS, "0.0001 + 0.005 * I,"); omniout_str(ALWAYS, "0.0001 + 0.003 * I,"); omniout_str(ALWAYS, "0.001 + 0.001 * I,"); omniout_str(ALWAYS, "0.001 + 0.003 * I,"); omniout_str(ALWAYS, "0.0001 + 0.004 * I,"); omniout_str(ALWAYS, "0.003 + 0.006 * I,"); omniout_str(ALWAYS, "0.0001 + 0.005 * I,"); omniout_str(ALWAYS, "0.0001 + 0.003 * I,"); omniout_str(ALWAYS, "0.001 + 0.001 * I,"); omniout_str(ALWAYS, "0.001 + 0.003 * I,"); omniout_str(ALWAYS, "0.0001 + 0.004 * I,"); omniout_str(ALWAYS, "0.003 + 0.006 * I,"); omniout_str(ALWAYS, "0.0001 + 0.005 * I,"); omniout_str(ALWAYS, "0.0001 + 0.003 * I,"); omniout_str(ALWAYS, "0.001 + 0.001 * I,"); omniout_str(ALWAYS, "0.001 + 0.003 * I,"); omniout_str(ALWAYS, "0.0001 + 0.004 * I,"); omniout_str(ALWAYS, "0.003 + 0.006 * I,"); omniout_str(ALWAYS, "0.0001 + 0.005 * I,"); omniout_str(ALWAYS, "0.0001 + 0.003 * I,"); omniout_str(ALWAYS, "0.001 + 0.001 * I,"); omniout_str(ALWAYS, "0.001 + 0.003 * I,"); omniout_str(ALWAYS, "0.0001 + 0.004 * I,"); omniout_str(ALWAYS, "0.003 + 0.006 * I,"); omniout_str(ALWAYS, "0.0001 + 0.005 * I,"); omniout_str(ALWAYS, "0.0001 + 0.003 * I,"); omniout_str(ALWAYS, "0.001 + 0.001 * I,"); omniout_str(ALWAYS, "0.003 + 0.006 * I,"); omniout_str(ALWAYS, "0.0001 + 0.005 * I,"); omniout_str(ALWAYS, "0.0001 + 0.003 * I,"); omniout_str(ALWAYS, "0.001 + 0.001 * I,"); omniout_str(ALWAYS, "0.001 + 0.003 * I,"); omniout_str(ALWAYS, "0.0001 + 0.004 * I,"); omniout_str(ALWAYS, "0.003 + 0.006 * I,"); omniout_str(ALWAYS, "0.0001 + 0.005 * I,"); omniout_str(ALWAYS, "0.0001 + 0.003 * I,"); omniout_str(ALWAYS, "0.001 + 0.001 * I,"); omniout_str(ALWAYS, "0.001 + 0.003 * I,"); omniout_str(ALWAYS, "0.0001 + 0.004 * I,"); omniout_str(ALWAYS, "0.003 + 0.006 * I,"); omniout_str(ALWAYS, "0.0001 + 0.005 * I,"); omniout_str(ALWAYS, "0.0001 + 0.003 * I,"); omniout_str(ALWAYS, "0.001 + 0.001 * I,"); omniout_str(ALWAYS, "0.001 + 0.003 * I,"); omniout_str(ALWAYS, "0.0001 + 0.004 * I,"); omniout_str(ALWAYS, "0.003 + 0.006 * I,"); omniout_str(ALWAYS, "0.0001 + 0.005 * I,"); omniout_str(ALWAYS, "0.0001 + 0.003 * I,"); omniout_str(ALWAYS, "0.001 + 0.001 * I,"); omniout_str(ALWAYS, "0.0001 + 0.004 * I,"); omniout_str(ALWAYS, "0.003 + 0.006 * I,"); omniout_str(ALWAYS, "0.0001 + 0.005 * I,"); omniout_str(ALWAYS, "0.0001 + 0.003 * I,"); omniout_str(ALWAYS, "0.001 + 0.001 * I,"); omniout_str(ALWAYS, "0.001 + 0.003 * I,"); omniout_str(ALWAYS, "0.0001 + 0.004 * I,"); omniout_str(ALWAYS, "0.003 + 0.006 * I,"); omniout_str(ALWAYS, "0.0001 + 0.005 * I,"); omniout_str(ALWAYS, "0.0001 + 0.003 * I,"); omniout_str(ALWAYS, "0.001 + 0.001 * I,"); omniout_str(ALWAYS, "0.001 + 0.003 * I,"); omniout_str(ALWAYS, "0.0001 + 0.004 * I,"); omniout_str(ALWAYS, "0.003 + 0.006 * I,"); omniout_str(ALWAYS, "0.0001 + 0.005 * I,"); omniout_str(ALWAYS, "0.0001 + 0.003 * I,"); omniout_str(ALWAYS, "0.001 + 0.001 * I,"); omniout_str(ALWAYS, "0.001 + 0.003 * I,"); omniout_str(ALWAYS, "0.0001 + 0.004 * I,"); omniout_str(ALWAYS, "0.003 + 0.006 * I,"); omniout_str(ALWAYS, "0.0001 + 0.005 * I,"); omniout_str(ALWAYS, "0.0001 + 0.003 * I,"); omniout_str(ALWAYS, "0.001 + 0.001 * I,"); omniout_str(ALWAYS, "0.001 + 0.003 * I,"); omniout_str(ALWAYS, "0.0001 + 0.004 * I,"); omniout_str(ALWAYS, "0.003 + 0.006 * I,"); omniout_str(ALWAYS, "0.0001 + 0.005 * I,"); omniout_str(ALWAYS, "0.0001 + 0.003 * I,"); omniout_str(ALWAYS, "0.001 + 0.001 * I,"); omniout_str(ALWAYS, "0.0001 + 0.004 * I,"); omniout_str(ALWAYS, "0.003 + 0.006 * I,"); omniout_str(ALWAYS, "0.0001 + 0.005 * I,"); omniout_str(ALWAYS, "0.0001 + 0.003 * I,"); omniout_str(ALWAYS, "0.001 + 0.001 * I,"); omniout_str(ALWAYS, "0.001 + 0.003 * I,"); omniout_str(ALWAYS, "0.0001 + 0.004 * I,"); omniout_str(ALWAYS, "0.003 + 0.006 * I,"); omniout_str(ALWAYS, "0.0001 + 0.005 * I,"); omniout_str(ALWAYS, "0.0001 + 0.003 * I,"); omniout_str(ALWAYS, "0.001 + 0.001 * I,"); omniout_str(ALWAYS, "0.001 + 0.003 * I,"); omniout_str(ALWAYS, "0.0001 + 0.004 * I,"); omniout_str(ALWAYS, "0.003 + 0.006 * I,"); omniout_str(ALWAYS, "0.0001 + 0.005 * I,"); omniout_str(ALWAYS, "0.0001 + 0.003 * I,"); omniout_str(ALWAYS, "0.001 + 0.001 * I,"); omniout_str(ALWAYS, "0.001 + 0.003 * I,"); omniout_str(ALWAYS, "0.0001 + 0.004 * I,"); omniout_str(ALWAYS, "0.003 + 0.006 * I,"); omniout_str(ALWAYS, "0.0001 + 0.005 * I,"); omniout_str(ALWAYS, "0.0001 + 0.003 * I,"); omniout_str(ALWAYS, "0.001 + 0.001 * I,"); omniout_str(ALWAYS, "0.001 + 0.003 * I,"); omniout_str(ALWAYS, "0.0001 + 0.004 * I,"); omniout_str(ALWAYS, "0.003 + 0.006 * I,"); omniout_str(ALWAYS, "0.0001 + 0.005 * I,"); omniout_str(ALWAYS, "0.0001 + 0.003 * I,"); omniout_str(ALWAYS, "0.001 + 0.001 * I,"); omniout_str(ALWAYS, "0.0001 + 0.004 * I,"); omniout_str(ALWAYS, "0.003 + 0.006 * I,"); omniout_str(ALWAYS, "0.0001 + 0.005 * I,"); omniout_str(ALWAYS, "0.0001 + 0.003 * I,"); omniout_str(ALWAYS, "0.001 + 0.001 * I,"); omniout_str(ALWAYS, "0.001 + 0.003 * I,"); omniout_str(ALWAYS, "0.0001 + 0.004 * I,"); omniout_str(ALWAYS, "0.003 + 0.006 * I,"); omniout_str(ALWAYS, "0.0001 + 0.005 * I,"); omniout_str(ALWAYS, "0.0001 + 0.003 * I,"); omniout_str(ALWAYS, "0.001 + 0.001 * I,"); omniout_str(ALWAYS, "0.001 + 0.003 * I,"); omniout_str(ALWAYS, "0.0001 + 0.004 * I,"); omniout_str(ALWAYS, "0.003 + 0.006 * I,"); omniout_str(ALWAYS, "0.0001 + 0.005 * I,"); omniout_str(ALWAYS, "0.0001 + 0.003 * I,"); omniout_str(ALWAYS, "0.001 + 0.001 * I,"); omniout_str(ALWAYS, "0.001 + 0.003 * I,"); omniout_str(ALWAYS, "0.0001 + 0.004 * I,"); omniout_str(ALWAYS, "0.003 + 0.006 * I,"); omniout_str(ALWAYS, "0.0001 + 0.005 * I,"); omniout_str(ALWAYS, "0.0001 + 0.003 * I,"); omniout_str(ALWAYS, "0.001 + 0.001 * I,"); omniout_str(ALWAYS, "0.001 + 0.003 * I,"); omniout_str(ALWAYS, "0.0001 + 0.004 * I,"); omniout_str(ALWAYS, "0.003 + 0.006 * I,"); omniout_str(ALWAYS, "0.0001 + 0.005 * I,"); omniout_str(ALWAYS, "0.0001 + 0.003 * I,"); omniout_str(ALWAYS, "0.001 + 0.001 * I,"); omniout_str(ALWAYS, "0.0001 + 0.004 * I,"); omniout_str(ALWAYS, "0.003 + 0.006 * I,"); omniout_str(ALWAYS, "0.0001 + 0.005 * I,"); omniout_str(ALWAYS, "0.0001 + 0.003 * I,"); omniout_str(ALWAYS, "0.001 + 0.001 * I,"); omniout_str(ALWAYS, "0.001 + 0.003 * I,"); omniout_str(ALWAYS, "0.0001 + 0.004 * I,"); omniout_str(ALWAYS, "0.003 + 0.006 * I,"); omniout_str(ALWAYS, "0.0001 + 0.005 * I,"); omniout_str(ALWAYS, "0.0001 + 0.003 * I,"); omniout_str(ALWAYS, "0.001 + 0.001 * I,"); omniout_str(ALWAYS, "0.001 + 0.003 * I,"); omniout_str(ALWAYS, "0.0001 + 0.004 * I,"); omniout_str(ALWAYS, "0.003 + 0.006 * I,"); omniout_str(ALWAYS, "0.0001 + 0.005 * I,"); omniout_str(ALWAYS, "0.0001 + 0.003 * I,"); omniout_str(ALWAYS, "0.001 + 0.001 * I,"); omniout_str(ALWAYS, "0.001 + 0.003 * I,"); omniout_str(ALWAYS, "0.0001 + 0.004 * I,"); omniout_str(ALWAYS, "0.003 + 0.006 * I,"); omniout_str(ALWAYS, "0.0001 + 0.005 * I,"); omniout_str(ALWAYS, "0.0001 + 0.003 * I,"); omniout_str(ALWAYS, "0.001 + 0.001 * I,"); omniout_str(ALWAYS, "0.001 + 0.003 * I,"); omniout_str(ALWAYS, "0.0001 + 0.004 * I,"); omniout_str(ALWAYS, "0.003 + 0.006 * I,"); omniout_str(ALWAYS, "0.0001 + 0.005 * I,"); omniout_str(ALWAYS, "0.0001 + 0.003 * I,"); omniout_str(ALWAYS, "0.001 + 0.001 * I,"); omniout_str(ALWAYS, "0.0001 + 0.004 * I,"); omniout_str(ALWAYS, "0.003 + 0.006 * I,"); omniout_str(ALWAYS, "0.0001 + 0.005 * I,"); omniout_str(ALWAYS, "0.0001 + 0.003 * I,"); omniout_str(ALWAYS, "0.001 + 0.001 * I,"); omniout_str(ALWAYS, "0.001 + 0.003 * I,"); omniout_str(ALWAYS, "0.0001 + 0.004 * I,"); omniout_str(ALWAYS, "0.003 + 0.006 * I,"); omniout_str(ALWAYS, "0.0001 + 0.005 * I,"); omniout_str(ALWAYS, "0.0001 + 0.003 * I,"); omniout_str(ALWAYS, "0.001 + 0.001 * I,"); omniout_str(ALWAYS, "0.001 + 0.003 * I,"); omniout_str(ALWAYS, "0.0001 + 0.004 * I,"); omniout_str(ALWAYS, "0.003 + 0.006 * I,"); omniout_str(ALWAYS, "0.0001 + 0.005 * I,"); omniout_str(ALWAYS, "0.0001 + 0.003 * I,"); omniout_str(ALWAYS, "0.001 + 0.001 * I,"); omniout_str(ALWAYS, "0.001 + 0.003 * I,"); omniout_str(ALWAYS, "0.0001 + 0.004 * I,"); omniout_str(ALWAYS, "0.003 + 0.006 * I,"); omniout_str(ALWAYS, "0.0001 + 0.005 * I,"); omniout_str(ALWAYS, "0.0001 + 0.003 * I,"); omniout_str(ALWAYS, "0.001 + 0.001 * I,"); omniout_str(ALWAYS, "0.001 + 0.003 * I,"); omniout_str(ALWAYS, "0.0001 + 0.004 * I,"); omniout_str(ALWAYS, "0.003 + 0.006 * I,"); omniout_str(ALWAYS, "0.0001 + 0.005 * I,"); omniout_str(ALWAYS, "0.0001 + 0.003 * I,"); omniout_str(ALWAYS, "0.001 + 0.001 * I,"); omniout_str(ALWAYS, "0.0001 + 0.004 * I,"); omniout_str(ALWAYS, "0.003 + 0.006 * I,"); omniout_str(ALWAYS, "0.0001 + 0.005 * I,"); omniout_str(ALWAYS, "0.0001 + 0.003 * I,"); omniout_str(ALWAYS, "0.001 + 0.001 * I,"); omniout_str(ALWAYS, "0.001 + 0.003 * I,"); omniout_str(ALWAYS, "0.0001 + 0.004 * I,"); omniout_str(ALWAYS, "0.003 + 0.006 * I,"); omniout_str(ALWAYS, "0.0001 + 0.005 * I,"); omniout_str(ALWAYS, "0.0001 + 0.003 * I,"); omniout_str(ALWAYS, "0.001 + 0.001 * I,"); omniout_str(ALWAYS, "0.001 + 0.003 * I,"); omniout_str(ALWAYS, "0.0001 + 0.004 * I,"); omniout_str(ALWAYS, "0.003 + 0.006 * I,"); omniout_str(ALWAYS, "0.0001 + 0.005 * I,"); omniout_str(ALWAYS, "0.0001 + 0.003 * I,"); omniout_str(ALWAYS, "0.001 + 0.001 * I,"); omniout_str(ALWAYS, "0.001 + 0.003 * I,"); omniout_str(ALWAYS, "0.0001 + 0.004 * I,"); omniout_str(ALWAYS, "0.003 + 0.006 * I,"); omniout_str(ALWAYS, "0.0001 + 0.005 * I,"); omniout_str(ALWAYS, "0.0001 + 0.003 * I,"); omniout_str(ALWAYS, "0.001 + 0.001 * I,"); omniout_str(ALWAYS, "0.001 + 0.003 * I,"); omniout_str(ALWAYS, "0.0001 + 0.004 * I,"); omniout_str(ALWAYS, "0.003 + 0.006 * I,"); omniout_str(ALWAYS, "0.0001 + 0.005 * I,"); omniout_str(ALWAYS, "0.0001 + 0.003 * I,"); omniout_str(ALWAYS, "0.001 + 0.001 * I,"); omniout_str(ALWAYS, "0.0001 + 0.004 * I,"); omniout_str(ALWAYS, "0.003 + 0.006 * I,"); omniout_str(ALWAYS, "0.0001 + 0.005 * I,"); omniout_str(ALWAYS, "0.0001 + 0.003 * I,"); omniout_str(ALWAYS, "0.001 + 0.001 * I,"); omniout_str(ALWAYS, "0.001 + 0.003 * I,"); omniout_str(ALWAYS, "0.0001 + 0.004 * I,"); omniout_str(ALWAYS, "0.003 + 0.006 * I,"); omniout_str(ALWAYS, "0.0001 + 0.005 * I,"); omniout_str(ALWAYS, "0.0001 + 0.003 * I,"); omniout_str(ALWAYS, "0.001 + 0.001 * I,"); omniout_str(ALWAYS, "0.001 + 0.003 * I,"); omniout_str(ALWAYS, "0.0001 + 0.004 * I,"); omniout_str(ALWAYS, "0.003 + 0.006 * I,"); omniout_str(ALWAYS, "0.0001 + 0.005 * I,"); omniout_str(ALWAYS, "0.0001 + 0.003 * I,"); omniout_str(ALWAYS, "0.001 + 0.001 * I,"); omniout_str(ALWAYS, "0.001 + 0.003 * I,"); omniout_str(ALWAYS, "0.0001 + 0.004 * I,"); omniout_str(ALWAYS, "0.003 + 0.006 * I,"); omniout_str(ALWAYS, "0.0001 + 0.005 * I,"); omniout_str(ALWAYS, "0.0001 + 0.003 * I,"); omniout_str(ALWAYS, "0.001 + 0.001 * I,"); omniout_str(ALWAYS, "0.001 + 0.003 * I,"); omniout_str(ALWAYS, "0.0001 + 0.004 * I,"); omniout_str(ALWAYS, "0.003 + 0.006 * I,"); omniout_str(ALWAYS, "0.0001 + 0.005 * I,"); omniout_str(ALWAYS, "0.0001 + 0.003 * I,"); omniout_str(ALWAYS, "0.001 + 0.001 * I,"); omniout_str(ALWAYS, "0.0001 + 0.004 * I,"); omniout_str(ALWAYS, "0.003 + 0.006 * I,"); omniout_str(ALWAYS, "0.0001 + 0.005 * I,"); omniout_str(ALWAYS, "0.0001 + 0.003 * I,"); omniout_str(ALWAYS, "0.001 + 0.001 * I,"); omniout_str(ALWAYS, "0.001 + 0.003 * I,"); omniout_str(ALWAYS, "0.0001 + 0.004 * I,"); omniout_str(ALWAYS, "0.003 + 0.006 * I,"); omniout_str(ALWAYS, "0.0001 + 0.005 * I,"); omniout_str(ALWAYS, "0.0001 + 0.003 * I,"); omniout_str(ALWAYS, "0.001 + 0.001 * I,"); omniout_str(ALWAYS, "0.001 + 0.003 * I,"); omniout_str(ALWAYS, "0.0001 + 0.004 * I,"); omniout_str(ALWAYS, "0.003 + 0.006 * I,"); omniout_str(ALWAYS, "0.0001 + 0.005 * I,"); omniout_str(ALWAYS, "0.0001 + 0.003 * I,"); omniout_str(ALWAYS, "0.001 + 0.001 * I,"); omniout_str(ALWAYS, "0.001 + 0.003 * I,"); omniout_str(ALWAYS, "0.0001 + 0.004 * I,"); omniout_str(ALWAYS, "0.003 + 0.006 * I,"); omniout_str(ALWAYS, "0.0001 + 0.005 * I,"); omniout_str(ALWAYS, "0.0001 + 0.003 * I,"); omniout_str(ALWAYS, "0.001 + 0.001 * I,"); omniout_str(ALWAYS, "0.001 + 0.003 * I,"); omniout_str(ALWAYS, "0.0001 + 0.004 * I,"); omniout_str(ALWAYS, "0.003 + 0.006 * I,"); omniout_str(ALWAYS, "0.0001 + 0.005 * I,"); omniout_str(ALWAYS, "0.0001 + 0.003 * I,"); omniout_str(ALWAYS, "0.001 + 0.001 * I,"); omniout_str(ALWAYS, "0.0001 + 0.004 * I,"); omniout_str(ALWAYS, "0.003 + 0.006 * I,"); omniout_str(ALWAYS, "0.0001 + 0.005 * I,"); omniout_str(ALWAYS, "0.0001 + 0.003 * I,"); omniout_str(ALWAYS, "0.001 + 0.001 * I,"); omniout_str(ALWAYS, "0.001 + 0.003 * I,"); omniout_str(ALWAYS, "0.0001 + 0.004 * I,"); omniout_str(ALWAYS, "0.003 + 0.006 * I,"); omniout_str(ALWAYS, "0.0001 + 0.005 * I,"); omniout_str(ALWAYS, "0.0001 + 0.003 * I,"); omniout_str(ALWAYS, "0.001 + 0.001 * I,"); omniout_str(ALWAYS, "0.001 + 0.003 * I,"); omniout_str(ALWAYS, "0.0001 + 0.004 * I,"); omniout_str(ALWAYS, "0.003 + 0.006 * I,"); omniout_str(ALWAYS, "0.0001 + 0.005 * I,"); omniout_str(ALWAYS, "0.0001 + 0.003 * I,"); omniout_str(ALWAYS, "0.001 + 0.001 * I,"); omniout_str(ALWAYS, "0.001 + 0.003 * I,"); omniout_str(ALWAYS, "0.0001 + 0.004 * I,"); omniout_str(ALWAYS, "0.003 + 0.006 * I,"); omniout_str(ALWAYS, "0.0001 + 0.005 * I,"); omniout_str(ALWAYS, "0.0001 + 0.003 * I,"); omniout_str(ALWAYS, "0.001 + 0.001 * I,"); omniout_str(ALWAYS, "0.001 + 0.003 * I,"); omniout_str(ALWAYS, "0.0001 + 0.004 * I,"); omniout_str(ALWAYS, "0.003 + 0.006 * I,"); omniout_str(ALWAYS, "0.0001 + 0.005 * I,"); omniout_str(ALWAYS, "0.0001 + 0.003 * I,"); omniout_str(ALWAYS, "0.001 + 0.001 * I,"); omniout_str(ALWAYS, "0.0001 + 0.004 * I,"); omniout_str(ALWAYS, "0.003 + 0.006 * I,"); omniout_str(ALWAYS, "0.0001 + 0.005 * I,"); omniout_str(ALWAYS, "0.0001 + 0.003 * I,"); omniout_str(ALWAYS, "0.001 + 0.001 * I,"); omniout_str(ALWAYS, "0.001 + 0.003 * I,"); omniout_str(ALWAYS, "0.0001 + 0.004 * I,"); omniout_str(ALWAYS, "0.003 + 0.006 * I,"); omniout_str(ALWAYS, "0.0001 + 0.005 * I,"); omniout_str(ALWAYS, "0.0001 + 0.003 * I,"); omniout_str(ALWAYS, "0.001 + 0.001 * I,"); omniout_str(ALWAYS, "0.001 + 0.003 * I,"); omniout_str(ALWAYS, "0.0001 + 0.004 * I,"); omniout_str(ALWAYS, "0.003 + 0.006 * I,"); omniout_str(ALWAYS, "0.0001 + 0.005 * I,"); omniout_str(ALWAYS, "0.0001 + 0.003 * I,"); omniout_str(ALWAYS, "0.001 + 0.001 * I,"); omniout_str(ALWAYS, "0.001 + 0.003 * I,"); omniout_str(ALWAYS, "0.0001 + 0.004 * I,"); omniout_str(ALWAYS, "0.003 + 0.006 * I,"); omniout_str(ALWAYS, "0.0001 + 0.005 * I,"); omniout_str(ALWAYS, "0.0001 + 0.003 * I,"); omniout_str(ALWAYS, "0.001 + 0.001 * I,"); omniout_str(ALWAYS, "0.001 + 0.003 * I,"); omniout_str(ALWAYS, "0.0001 + 0.004 * I,"); omniout_str(ALWAYS, "0.003 + 0.006 * I,"); omniout_str(ALWAYS, "0.0001 + 0.005 * I,"); omniout_str(ALWAYS, "0.0001 + 0.003 * I,"); omniout_str(ALWAYS, "0.001 + 0.001 * I,"); omniout_str(ALWAYS, "0.0001 + 0.004 * I,"); omniout_str(ALWAYS, "0.003 + 0.006 * I,"); omniout_str(ALWAYS, "0.0001 + 0.005 * I,"); omniout_str(ALWAYS, "0.0001 + 0.003 * I,"); omniout_str(ALWAYS, "0.001 + 0.001 * I,"); omniout_str(ALWAYS, "0.001 + 0.003 * I,"); omniout_str(ALWAYS, "0.0001 + 0.004 * I,"); omniout_str(ALWAYS, "0.003 + 0.006 * I,"); omniout_str(ALWAYS, "0.0001 + 0.005 * I,"); omniout_str(ALWAYS, "0.0001 + 0.003 * I,"); omniout_str(ALWAYS, "0.001 + 0.001 * I,"); omniout_str(ALWAYS, "0.001 + 0.003 * I,"); omniout_str(ALWAYS, "0.0001 + 0.004 * I,"); omniout_str(ALWAYS, "0.003 + 0.006 * I,"); omniout_str(ALWAYS, "0.0001 + 0.005 * I,"); omniout_str(ALWAYS, "0.0001 + 0.003 * I,"); omniout_str(ALWAYS, "0.001 + 0.001 * I,"); omniout_str(ALWAYS, "0.001 + 0.003 * I,"); omniout_str(ALWAYS, "0.0001 + 0.004 * I,"); omniout_str(ALWAYS, "0.003 + 0.006 * I,"); omniout_str(ALWAYS, "0.0001 + 0.005 * I,"); omniout_str(ALWAYS, "0.0001 + 0.003 * I,"); omniout_str(ALWAYS, "0.001 + 0.001 * I,"); omniout_str(ALWAYS, "0.001 + 0.003 * I,"); omniout_str(ALWAYS, "0.0001 + 0.004 * I,"); omniout_str(ALWAYS, "0.003 + 0.006 * I,"); omniout_str(ALWAYS, "0.0001 + 0.005 * I,"); omniout_str(ALWAYS, "0.0001 + 0.003 * I,"); omniout_str(ALWAYS, "0.001 + 0.001 * I,"); omniout_str(ALWAYS, "0.0001 + 0.004 * I,"); omniout_str(ALWAYS, "0.003 + 0.006 * I,"); omniout_str(ALWAYS, "0.0001 + 0.005 * I,"); omniout_str(ALWAYS, "0.0001 + 0.003 * I,"); omniout_str(ALWAYS, "0.001 + 0.001 * I,"); omniout_str(ALWAYS, "0.001 + 0.003 * I,"); omniout_str(ALWAYS, "0.0001 + 0.004 * I,"); omniout_str(ALWAYS, "0.003 + 0.006 * I,"); omniout_str(ALWAYS, "0.0001 + 0.005 * I,"); omniout_str(ALWAYS, "0.0001 + 0.003 * I,"); omniout_str(ALWAYS, "0.001 + 0.001 * I,"); omniout_str(ALWAYS, "0.001 + 0.003 * I,"); omniout_str(ALWAYS, "0.0001 + 0.004 * I,"); omniout_str(ALWAYS, "0.003 + 0.006 * I,"); omniout_str(ALWAYS, "0.0001 + 0.005 * I,"); omniout_str(ALWAYS, "0.0001 + 0.003 * I,"); omniout_str(ALWAYS, "0.001 + 0.001 * I,"); omniout_str(ALWAYS, "0.001 + 0.003 * I,"); omniout_str(ALWAYS, "0.0001 + 0.004 * I,"); omniout_str(ALWAYS, "0.003 + 0.006 * I,"); omniout_str(ALWAYS, "0.0001 + 0.005 * I,"); omniout_str(ALWAYS, "0.0001 + 0.003 * I,"); omniout_str(ALWAYS, "0.001 + 0.001 * I,"); omniout_str(ALWAYS, "0.001 + 0.003 * I,"); omniout_str(ALWAYS, "0.0001 + 0.004 * I,"); omniout_str(ALWAYS, "0.003 + 0.006 * I,"); omniout_str(ALWAYS, "0.0001 + 0.005 * I,"); omniout_str(ALWAYS, "0.0001 + 0.003 * I,"); omniout_str(ALWAYS, "0.001 + 0.001 * I,"); omniout_str(ALWAYS, "0.0001 + 0.004 * I,"); omniout_str(ALWAYS, "0.003 + 0.006 * I,"); omniout_str(ALWAYS, "0.0001 + 0.005 * I,"); omniout_str(ALWAYS, "0.0001 + 0.003 * I,"); omniout_str(ALWAYS, "0.001 + 0.001 * I,"); omniout_str(ALWAYS, "0.001 + 0.003 * I,"); omniout_str(ALWAYS, "0.0001 + 0.004 * I,"); omniout_str(ALWAYS, "0.003 + 0.006 * I,"); omniout_str(ALWAYS, "0.0001 + 0.005 * I,"); omniout_str(ALWAYS, "0.0001 + 0.003 * I,"); omniout_str(ALWAYS, "0.001 + 0.001 * I,"); omniout_str(ALWAYS, "0.001 + 0.003 * I,"); omniout_str(ALWAYS, "0.0001 + 0.004 * I,"); omniout_str(ALWAYS, "0.003 + 0.006 * I,"); omniout_str(ALWAYS, "0.0001 + 0.005 * I,"); omniout_str(ALWAYS, "0.0001 + 0.003 * I,"); omniout_str(ALWAYS, "0.001 + 0.001 * I,"); omniout_str(ALWAYS, "0.001 + 0.003 * I,"); omniout_str(ALWAYS, "0.0001 + 0.004 * I,"); omniout_str(ALWAYS, "0.003 + 0.006 * I,"); omniout_str(ALWAYS, "0.0001 + 0.005 * I,"); omniout_str(ALWAYS, "0.0001 + 0.003 * I,"); omniout_str(ALWAYS, "0.001 + 0.001 * I,"); omniout_str(ALWAYS, "0.001 + 0.003 * I,"); omniout_str(ALWAYS, "0.0001 + 0.004 * I,"); omniout_str(ALWAYS, "0.003 + 0.006 * I,"); omniout_str(ALWAYS, "0.0001 + 0.005 * I,"); omniout_str(ALWAYS, "0.0001 + 0.003 * I,"); omniout_str(ALWAYS, "0.001 + 0.001 * I,"); omniout_str(ALWAYS, "0.001 + 0.003 * I,"); omniout_str(ALWAYS, "0.000 + 0.000 * I ];"); omniout_str(ALWAYS, ""); omniout_str(ALWAYS, "glob_nxt := glob_nxt + 1;"); omniout_str(ALWAYS, "it := x_delta[glob_nxt];"); omniout_str(ALWAYS, "return it;"); omniout_str(ALWAYS, "end;"); omniout_str(ALWAYS, "#END USER DEF BLOCK"); omniout_str(ALWAYS, "#######END OF ECHO OF PROBLEM#################"); glob_unchanged_h_cnt := 0; glob_warned := false; glob_warned2 := false; glob_small_float := glob__0; glob_smallish_float := glob__0; glob_large_float := c(0.10*10^101); glob_larger_float := c(0.11*10^101); glob_almost_1 := c(0.99); x_start := 0.1 + 0.1*I; x_end := 99.0 + 99.0*I; array_y_init[1] := exact_soln_y(x_start); glob_look_poles := true; glob_max_h := c(0.001); glob_type_given_pole := 1; array_given_rad_poles[1, 1] := c(-2.0); array_given_rad_poles[1, 2] := c(0.); array_given_ord_poles[1, 1] := c(0.5); array_given_ord_poles[1, 2] := c(0.); 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 ) = arccos ( sqrt (\ 0.1 * x + 0.2 ) ) ; "); omniout_int(INFO, "Iterations ", 32, glob_iter, 4, " "); prog_report(x_start, x_end); if glob_html_log then logstart(html_log_file); logitem_str(html_log_file, "2017-11-26T14:32:57-06:00"); logitem_str(html_log_file, "Maple"); logitem_str(html_log_file, "arccos_sqrt"); logitem_str(html_log_file, "diff ( y , x , 1 ) = ar\ ccos ( sqrt ( 0.1 * x + 0.2 ) ) ; "); 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, "arccos_sqrt diffeq.mxt"); logitem_str(html_log_file, "arccos_sqrt maple results"); logitem_str(html_log_file, "Good Accuracy - Wasn't for Real"); logend(html_log_file) end if; if glob_html_log then fclose(html_log_file) end if end if end proc # End Function number 12 > main(); memory used=3.9MB, alloc=40.3MB, time=0.08 ##############ECHO OF PROBLEM################# ##############temp/arccos_sqrtpostcpx.cpx################# diff ( y , x , 1 ) = arccos ( sqrt ( 0.1 * x + 0.2 ) ) ; ! #BEGIN FIRST INPUT BLOCK Digits:=32; max_terms:=30; ! #END FIRST INPUT BLOCK #BEGIN SECOND INPUT BLOCK x_start := 0.1 + 0.1 * I; x_end := 99.0 + 99.0 * I; array_y_init[0 + 1] := exact_soln_y(x_start); glob_look_poles := true; glob_max_h := c( 0.001); glob_type_given_pole := 1; array_given_rad_poles[1,1] :=c( -2.0); array_given_rad_poles[1,2] := c(0.0); array_given_ord_poles[1,1] := c(0.5); array_given_ord_poles[1,2] := c(0.0); #END SECOND INPUT BLOCK #BEGIN OVERRIDE BLOCK glob_desired_digits_correct:=8; glob_max_minutes:=(3.0); glob_subiter_method:=3; glob_max_iter:=10000; glob_upper_ratio_limit:=c(1.000001); glob_lower_ratio_limit:=c(0.999999); glob_look_poles:=true; glob_h:=c(0.001); glob_display_interval:=c(0.01); #END OVERRIDE BLOCK ! #BEGIN USER DEF BLOCK exact_soln_y := proc(x) return(c(10.0) * (c(0.1) * c(x) + c(0.2)) * arccos(sqrt ( c(0.1) * c(x) + c(0.2))) - c(5.0) * sqrt( c(0.1) * c(x) + c(0.2)) * sqrt( c(0.8) - c(0.1) * c(x)) + c(5.0) * arcsin(sqrt( c(0.1) * c(x) + c(0.2)))); end; next_delta := proc() global glob_nxt, x_delta; x_delta := [ 0.001 + 0.00004 * I, 0.0001 + 0.004 * I, 0.003 + 0.006 * I, 0.0001 + 0.005 * I, 0.0001 + 0.003 * I, 0.001 + 0.001 * I, 0.001 + 0.003 * I, 0.0001 + 0.004 * I, 0.003 + 0.006 * I, 0.0001 + 0.005 * I, 0.0001 + 0.003 * I, 0.001 + 0.001 * I, 0.001 + 0.003 * I, 0.0001 + 0.004 * I, 0.003 + 0.006 * I, 0.0001 + 0.005 * I, 0.0001 + 0.003 * I, 0.001 + 0.001 * I, 0.001 + 0.003 * I, 0.0001 + 0.004 * I, 0.003 + 0.006 * I, 0.0001 + 0.005 * I, 0.0001 + 0.003 * I, 0.001 + 0.001 * I, 0.001 + 0.003 * I, 0.0001 + 0.004 * I, 0.003 + 0.006 * I, 0.0001 + 0.005 * I, 0.0001 + 0.003 * I, 0.001 + 0.001 * I, 0.0001 + 0.004 * I, 0.003 + 0.006 * I, 0.0001 + 0.005 * I, 0.0001 + 0.003 * I, 0.001 + 0.001 * I, 0.001 + 0.003 * I, 0.0001 + 0.004 * I, 0.003 + 0.006 * I, 0.0001 + 0.005 * I, 0.0001 + 0.003 * I, 0.001 + 0.001 * I, 0.001 + 0.003 * I, 0.0001 + 0.004 * I, 0.003 + 0.006 * I, 0.0001 + 0.005 * I, 0.0001 + 0.003 * I, 0.001 + 0.001 * I, 0.001 + 0.003 * I, 0.0001 + 0.004 * I, 0.003 + 0.006 * I, 0.0001 + 0.005 * I, 0.0001 + 0.003 * I, 0.001 + 0.001 * I, 0.001 + 0.003 * I, 0.0001 + 0.004 * I, 0.003 + 0.006 * I, 0.0001 + 0.005 * I, 0.0001 + 0.003 * I, 0.001 + 0.001 * I, 0.0001 + 0.004 * I, 0.003 + 0.006 * I, 0.0001 + 0.005 * I, 0.0001 + 0.003 * I, 0.001 + 0.001 * I, 0.001 + 0.003 * I, 0.0001 + 0.004 * I, 0.003 + 0.006 * I, 0.0001 + 0.005 * I, 0.0001 + 0.003 * I, 0.001 + 0.001 * I, 0.001 + 0.003 * I, 0.0001 + 0.004 * I, 0.003 + 0.006 * I, 0.0001 + 0.005 * I, 0.0001 + 0.003 * I, 0.001 + 0.001 * I, 0.001 + 0.003 * I, 0.0001 + 0.004 * I, 0.003 + 0.006 * I, 0.0001 + 0.005 * I, 0.0001 + 0.003 * I, 0.001 + 0.001 * I, 0.001 + 0.003 * I, 0.0001 + 0.004 * I, 0.003 + 0.006 * I, 0.0001 + 0.005 * I, 0.0001 + 0.003 * I, 0.001 + 0.001 * I, 0.0001 + 0.004 * I, 0.003 + 0.006 * I, 0.0001 + 0.005 * I, 0.0001 + 0.003 * I, 0.001 + 0.001 * I, 0.001 + 0.003 * I, 0.0001 + 0.004 * I, 0.003 + 0.006 * I, 0.0001 + 0.005 * I, 0.0001 + 0.003 * I, 0.001 + 0.001 * I, 0.001 + 0.003 * I, 0.0001 + 0.004 * I, 0.003 + 0.006 * I, 0.0001 + 0.005 * I, 0.0001 + 0.003 * I, 0.001 + 0.001 * I, 0.001 + 0.003 * I, 0.0001 + 0.004 * I, 0.003 + 0.006 * I, 0.0001 + 0.005 * I, 0.0001 + 0.003 * I, 0.001 + 0.001 * I, 0.001 + 0.003 * I, 0.0001 + 0.004 * I, 0.003 + 0.006 * I, 0.0001 + 0.005 * I, 0.0001 + 0.003 * I, 0.001 + 0.001 * I, 0.0001 + 0.004 * I, 0.003 + 0.006 * I, 0.0001 + 0.005 * I, 0.0001 + 0.003 * I, 0.001 + 0.001 * I, 0.001 + 0.003 * I, 0.0001 + 0.004 * I, 0.003 + 0.006 * I, 0.0001 + 0.005 * I, 0.0001 + 0.003 * I, 0.001 + 0.001 * I, 0.001 + 0.003 * I, 0.0001 + 0.004 * I, 0.003 + 0.006 * I, 0.0001 + 0.005 * I, 0.0001 + 0.003 * I, 0.001 + 0.001 * I, 0.001 + 0.003 * I, 0.0001 + 0.004 * I, 0.003 + 0.006 * I, 0.0001 + 0.005 * I, 0.0001 + 0.003 * I, 0.001 + 0.001 * I, 0.001 + 0.003 * I, 0.0001 + 0.004 * I, 0.003 + 0.006 * I, 0.0001 + 0.005 * I, 0.0001 + 0.003 * I, 0.001 + 0.001 * I, 0.0001 + 0.004 * I, 0.003 + 0.006 * I, 0.0001 + 0.005 * I, 0.0001 + 0.003 * I, 0.001 + 0.001 * I, 0.001 + 0.003 * I, 0.0001 + 0.004 * I, 0.003 + 0.006 * I, 0.0001 + 0.005 * I, 0.0001 + 0.003 * I, 0.001 + 0.001 * I, 0.001 + 0.003 * I, 0.0001 + 0.004 * I, 0.003 + 0.006 * I, 0.0001 + 0.005 * I, 0.0001 + 0.003 * I, 0.001 + 0.001 * I, 0.001 + 0.003 * I, 0.0001 + 0.004 * I, 0.003 + 0.006 * I, 0.0001 + 0.005 * I, 0.0001 + 0.003 * I, 0.001 + 0.001 * I, 0.001 + 0.003 * I, 0.0001 + 0.004 * I, 0.003 + 0.006 * I, 0.0001 + 0.005 * I, 0.0001 + 0.003 * I, 0.001 + 0.001 * I, 0.0001 + 0.004 * I, 0.003 + 0.006 * I, 0.0001 + 0.005 * I, 0.0001 + 0.003 * I, 0.001 + 0.001 * I, 0.001 + 0.003 * I, 0.0001 + 0.004 * I, 0.0001 + 0.004 * I, 0.003 + 0.006 * I, 0.0001 + 0.005 * I, 0.0001 + 0.003 * I, 0.001 + 0.001 * I, 0.001 + 0.003 * I, 0.0001 + 0.004 * I, 0.003 + 0.006 * I, 0.0001 + 0.005 * I, 0.0001 + 0.003 * I, 0.001 + 0.001 * I, 0.001 + 0.003 * I, 0.0001 + 0.004 * I, 0.003 + 0.006 * I, 0.0001 + 0.005 * I, 0.0001 + 0.003 * I, 0.001 + 0.001 * I, 0.001 + 0.003 * I, 0.0001 + 0.004 * I, 0.003 + 0.006 * I, 0.0001 + 0.005 * I, 0.0001 + 0.003 * I, 0.001 + 0.001 * I, 0.001 + 0.003 * I, 0.0001 + 0.004 * I, 0.003 + 0.006 * I, 0.0001 + 0.005 * I, 0.0001 + 0.003 * I, 0.001 + 0.001 * I, 0.0001 + 0.004 * I, 0.003 + 0.006 * I, 0.0001 + 0.005 * I, 0.0001 + 0.003 * I, 0.001 + 0.001 * I, 0.001 + 0.003 * I, 0.0001 + 0.004 * I, 0.003 + 0.006 * I, 0.0001 + 0.005 * I, 0.0001 + 0.003 * I, 0.001 + 0.001 * I, 0.001 + 0.003 * I, 0.0001 + 0.004 * I, 0.003 + 0.006 * I, 0.0001 + 0.005 * I, 0.0001 + 0.003 * I, 0.001 + 0.001 * I, 0.001 + 0.003 * I, 0.0001 + 0.004 * I, 0.003 + 0.006 * I, 0.0001 + 0.005 * I, 0.0001 + 0.003 * I, 0.001 + 0.001 * I, 0.001 + 0.003 * I, 0.0001 + 0.004 * I, 0.003 + 0.006 * I, 0.0001 + 0.005 * I, 0.0001 + 0.003 * I, 0.001 + 0.001 * I, 0.0001 + 0.004 * I, 0.003 + 0.006 * I, 0.0001 + 0.005 * I, 0.0001 + 0.003 * I, 0.001 + 0.001 * I, 0.001 + 0.003 * I, 0.0001 + 0.004 * I, 0.003 + 0.006 * I, 0.0001 + 0.005 * I, 0.0001 + 0.003 * I, 0.001 + 0.001 * I, 0.001 + 0.003 * I, 0.0001 + 0.004 * I, 0.003 + 0.006 * I, 0.0001 + 0.005 * I, 0.0001 + 0.003 * I, 0.001 + 0.001 * I, 0.001 + 0.003 * I, 0.0001 + 0.004 * I, 0.003 + 0.006 * I, 0.0001 + 0.005 * I, 0.0001 + 0.003 * I, 0.001 + 0.001 * I, 0.001 + 0.003 * I, 0.0001 + 0.004 * I, 0.003 + 0.006 * I, 0.0001 + 0.005 * I, 0.0001 + 0.003 * I, 0.001 + 0.001 * I, 0.0001 + 0.004 * I, 0.003 + 0.006 * I, 0.0001 + 0.005 * I, 0.0001 + 0.003 * I, 0.001 + 0.001 * I, 0.001 + 0.003 * I, 0.0001 + 0.004 * I, 0.003 + 0.006 * I, 0.0001 + 0.005 * I, 0.0001 + 0.003 * I, 0.001 + 0.001 * I, 0.001 + 0.003 * I, 0.0001 + 0.004 * I, 0.003 + 0.006 * I, 0.0001 + 0.005 * I, 0.0001 + 0.003 * I, 0.001 + 0.001 * I, 0.001 + 0.003 * I, 0.0001 + 0.004 * I, 0.003 + 0.006 * I, 0.0001 + 0.005 * I, 0.0001 + 0.003 * I, 0.001 + 0.001 * I, 0.001 + 0.003 * I, 0.0001 + 0.004 * I, 0.003 + 0.006 * I, 0.0001 + 0.005 * I, 0.0001 + 0.003 * I, 0.001 + 0.001 * I, 0.0001 + 0.004 * I, 0.003 + 0.006 * I, 0.0001 + 0.005 * I, 0.0001 + 0.003 * I, 0.001 + 0.001 * I, 0.001 + 0.003 * I, 0.0001 + 0.004 * I, 0.003 + 0.006 * I, 0.0001 + 0.005 * I, 0.0001 + 0.003 * I, 0.001 + 0.001 * I, 0.001 + 0.003 * I, 0.0001 + 0.004 * I, 0.003 + 0.006 * I, 0.0001 + 0.005 * I, 0.0001 + 0.003 * I, 0.001 + 0.001 * I, 0.001 + 0.003 * I, 0.0001 + 0.004 * I, 0.003 + 0.006 * I, 0.0001 + 0.005 * I, 0.0001 + 0.003 * I, 0.001 + 0.001 * I, 0.001 + 0.003 * I, 0.0001 + 0.004 * I, 0.003 + 0.006 * I, 0.0001 + 0.005 * I, 0.0001 + 0.003 * I, 0.001 + 0.001 * I, 0.0001 + 0.004 * I, 0.003 + 0.006 * I, 0.0001 + 0.005 * I, 0.0001 + 0.003 * I, 0.001 + 0.001 * I, 0.001 + 0.003 * I, 0.0001 + 0.004 * I, 0.003 + 0.006 * I, 0.0001 + 0.005 * I, 0.0001 + 0.003 * I, 0.001 + 0.001 * I, 0.001 + 0.003 * I, 0.0001 + 0.004 * I, 0.003 + 0.006 * I, 0.0001 + 0.005 * I, 0.0001 + 0.003 * I, 0.001 + 0.001 * I, 0.001 + 0.003 * I, 0.0001 + 0.004 * I, 0.003 + 0.006 * I, 0.0001 + 0.005 * I, 0.0001 + 0.003 * I, 0.001 + 0.001 * I, 0.001 + 0.003 * I, 0.0001 + 0.004 * I, 0.003 + 0.006 * I, 0.0001 + 0.005 * I, 0.0001 + 0.003 * I, 0.001 + 0.001 * I, 0.003 + 0.006 * I, 0.0001 + 0.005 * I, 0.0001 + 0.003 * I, 0.001 + 0.001 * I, 0.001 + 0.003 * I, 0.0001 + 0.004 * I, 0.003 + 0.006 * I, 0.0001 + 0.005 * I, 0.0001 + 0.003 * I, 0.001 + 0.001 * I, 0.001 + 0.003 * I, 0.0001 + 0.004 * I, 0.003 + 0.006 * I, 0.0001 + 0.005 * I, 0.0001 + 0.003 * I, 0.001 + 0.001 * I, 0.001 + 0.003 * I, 0.0001 + 0.004 * I, 0.003 + 0.006 * I, 0.0001 + 0.005 * I, 0.0001 + 0.003 * I, 0.001 + 0.001 * I, 0.0001 + 0.004 * I, 0.003 + 0.006 * I, 0.0001 + 0.005 * I, 0.0001 + 0.003 * I, 0.001 + 0.001 * I, 0.001 + 0.003 * I, 0.0001 + 0.004 * I, 0.003 + 0.006 * I, 0.0001 + 0.005 * I, 0.0001 + 0.003 * I, 0.001 + 0.001 * I, 0.001 + 0.003 * I, 0.0001 + 0.004 * I, 0.003 + 0.006 * I, 0.0001 + 0.005 * I, 0.0001 + 0.003 * I, 0.001 + 0.001 * I, 0.001 + 0.003 * I, 0.0001 + 0.004 * I, 0.003 + 0.006 * I, 0.0001 + 0.005 * I, 0.0001 + 0.003 * I, 0.001 + 0.001 * I, 0.001 + 0.003 * I, 0.0001 + 0.004 * I, 0.003 + 0.006 * I, 0.0001 + 0.005 * I, 0.0001 + 0.003 * I, 0.001 + 0.001 * I, 0.0001 + 0.004 * I, 0.003 + 0.006 * I, 0.0001 + 0.005 * I, 0.0001 + 0.003 * I, 0.001 + 0.001 * I, 0.001 + 0.003 * I, 0.0001 + 0.004 * I, 0.003 + 0.006 * I, 0.0001 + 0.005 * I, 0.0001 + 0.003 * I, 0.001 + 0.001 * I, 0.001 + 0.003 * I, 0.0001 + 0.004 * I, 0.003 + 0.006 * I, 0.0001 + 0.005 * I, 0.0001 + 0.003 * I, 0.001 + 0.001 * I, 0.001 + 0.003 * I, 0.0001 + 0.004 * I, 0.003 + 0.006 * I, 0.0001 + 0.005 * I, 0.0001 + 0.003 * I, 0.001 + 0.001 * I, 0.001 + 0.003 * I, 0.0001 + 0.004 * I, 0.003 + 0.006 * I, 0.0001 + 0.005 * I, 0.0001 + 0.003 * I, 0.001 + 0.001 * I, 0.0001 + 0.004 * I, 0.003 + 0.006 * I, 0.0001 + 0.005 * I, 0.0001 + 0.003 * I, 0.001 + 0.001 * I, 0.001 + 0.003 * I, 0.0001 + 0.004 * I, 0.003 + 0.006 * I, 0.0001 + 0.005 * I, 0.0001 + 0.003 * I, 0.001 + 0.001 * I, 0.001 + 0.003 * I, 0.0001 + 0.004 * I, 0.003 + 0.006 * I, 0.0001 + 0.005 * I, 0.0001 + 0.003 * I, 0.001 + 0.001 * I, 0.001 + 0.003 * I, 0.0001 + 0.004 * I, 0.003 + 0.006 * I, 0.0001 + 0.005 * I, 0.0001 + 0.003 * I, 0.001 + 0.001 * I, 0.001 + 0.003 * I, 0.0001 + 0.004 * I, 0.003 + 0.006 * I, 0.0001 + 0.005 * I, 0.0001 + 0.003 * I, 0.001 + 0.001 * I, 0.0001 + 0.004 * I, 0.003 + 0.006 * I, 0.0001 + 0.005 * I, 0.0001 + 0.003 * I, 0.001 + 0.001 * I, 0.001 + 0.003 * I, 0.0001 + 0.004 * I, 0.003 + 0.006 * I, 0.0001 + 0.005 * I, 0.0001 + 0.003 * I, 0.001 + 0.001 * I, 0.001 + 0.003 * I, 0.0001 + 0.004 * I, 0.003 + 0.006 * I, 0.0001 + 0.005 * I, 0.0001 + 0.003 * I, 0.001 + 0.001 * I, 0.001 + 0.003 * I, 0.0001 + 0.004 * I, 0.003 + 0.006 * I, 0.0001 + 0.005 * I, 0.0001 + 0.003 * I, 0.001 + 0.001 * I, 0.001 + 0.003 * I, 0.0001 + 0.004 * I, 0.003 + 0.006 * I, 0.0001 + 0.005 * I, 0.0001 + 0.003 * I, 0.001 + 0.001 * I, 0.0001 + 0.004 * I, 0.003 + 0.006 * I, 0.0001 + 0.005 * I, 0.0001 + 0.003 * I, 0.001 + 0.001 * I, 0.001 + 0.003 * I, 0.0001 + 0.004 * I, 0.003 + 0.006 * I, 0.0001 + 0.005 * I, 0.0001 + 0.003 * I, 0.001 + 0.001 * I, 0.001 + 0.003 * I, 0.0001 + 0.004 * I, 0.003 + 0.006 * I, 0.0001 + 0.005 * I, 0.0001 + 0.003 * I, 0.001 + 0.001 * I, 0.001 + 0.003 * I, 0.0001 + 0.004 * I, 0.003 + 0.006 * I, 0.0001 + 0.005 * I, 0.0001 + 0.003 * I, 0.001 + 0.001 * I, 0.001 + 0.003 * I, 0.0001 + 0.004 * I, 0.003 + 0.006 * I, 0.0001 + 0.005 * I, 0.0001 + 0.003 * I, 0.001 + 0.001 * I, 0.0001 + 0.004 * I, 0.003 + 0.006 * I, 0.0001 + 0.005 * I, 0.0001 + 0.003 * I, 0.001 + 0.001 * I, 0.001 + 0.003 * I, 0.0001 + 0.004 * I, 0.003 + 0.006 * I, 0.0001 + 0.005 * I, 0.0001 + 0.003 * I, 0.001 + 0.001 * I, 0.001 + 0.003 * I, 0.0001 + 0.004 * I, 0.003 + 0.006 * I, 0.0001 + 0.005 * I, 0.0001 + 0.003 * I, 0.001 + 0.001 * I, 0.001 + 0.003 * I, 0.0001 + 0.004 * I, 0.003 + 0.006 * I, 0.0001 + 0.005 * I, 0.0001 + 0.003 * I, 0.001 + 0.001 * I, 0.001 + 0.003 * I, 0.0001 + 0.004 * I, 0.003 + 0.006 * I, 0.0001 + 0.005 * I, 0.0001 + 0.003 * I, 0.001 + 0.001 * I, 0.0001 + 0.004 * I, 0.003 + 0.006 * I, 0.0001 + 0.005 * I, 0.0001 + 0.003 * I, 0.001 + 0.001 * I, 0.001 + 0.003 * I, 0.0001 + 0.004 * I, 0.003 + 0.006 * I, 0.0001 + 0.005 * I, 0.0001 + 0.003 * I, 0.001 + 0.001 * I, 0.001 + 0.003 * I, 0.0001 + 0.004 * I, 0.003 + 0.006 * I, 0.0001 + 0.005 * I, 0.0001 + 0.003 * I, 0.001 + 0.001 * I, 0.001 + 0.003 * I, 0.0001 + 0.004 * I, 0.003 + 0.006 * I, 0.0001 + 0.005 * I, 0.0001 + 0.003 * I, 0.001 + 0.001 * I, 0.001 + 0.003 * I, 0.0001 + 0.004 * I, 0.003 + 0.006 * I, 0.0001 + 0.005 * I, 0.0001 + 0.003 * I, 0.001 + 0.001 * I, 0.0001 + 0.004 * I, 0.003 + 0.006 * I, 0.0001 + 0.005 * I, 0.0001 + 0.003 * I, 0.001 + 0.001 * I, 0.001 + 0.003 * I, 0.0001 + 0.004 * I, 0.003 + 0.006 * I, 0.0001 + 0.005 * I, 0.0001 + 0.003 * I, 0.001 + 0.001 * I, 0.001 + 0.003 * I, 0.0001 + 0.004 * I, 0.003 + 0.006 * I, 0.0001 + 0.005 * I, 0.0001 + 0.003 * I, 0.001 + 0.001 * I, 0.001 + 0.003 * I, 0.0001 + 0.004 * I, 0.003 + 0.006 * I, 0.0001 + 0.005 * I, 0.0001 + 0.003 * I, 0.001 + 0.001 * I, 0.001 + 0.003 * I, 0.0001 + 0.004 * I, 0.003 + 0.006 * I, 0.0001 + 0.005 * I, 0.0001 + 0.003 * I, 0.001 + 0.001 * I, 0.0001 + 0.004 * I, 0.003 + 0.006 * I, 0.0001 + 0.005 * I, 0.0001 + 0.003 * I, 0.001 + 0.001 * I, 0.001 + 0.003 * I, 0.0001 + 0.004 * I, 0.003 + 0.006 * I, 0.0001 + 0.005 * I, 0.0001 + 0.003 * I, 0.001 + 0.001 * I, 0.001 + 0.003 * I, 0.0001 + 0.004 * I, 0.003 + 0.006 * I, 0.0001 + 0.005 * I, 0.0001 + 0.003 * I, 0.001 + 0.001 * I, 0.001 + 0.003 * I, 0.0001 + 0.004 * I, 0.003 + 0.006 * I, 0.0001 + 0.005 * I, 0.0001 + 0.003 * I, 0.001 + 0.001 * I, 0.001 + 0.003 * I, 0.0001 + 0.004 * I, 0.003 + 0.006 * I, 0.0001 + 0.005 * I, 0.0001 + 0.003 * I, 0.001 + 0.001 * I, 0.0001 + 0.004 * I, 0.003 + 0.006 * I, 0.0001 + 0.005 * I, 0.0001 + 0.003 * I, 0.001 + 0.001 * I, 0.001 + 0.003 * I, 0.0001 + 0.004 * I, 0.003 + 0.006 * I, 0.0001 + 0.005 * I, 0.0001 + 0.003 * I, 0.001 + 0.001 * I, 0.001 + 0.003 * I, 0.0001 + 0.004 * I, 0.003 + 0.006 * I, 0.0001 + 0.005 * I, 0.0001 + 0.003 * I, 0.001 + 0.001 * I, 0.001 + 0.003 * I, 0.0001 + 0.004 * I, 0.003 + 0.006 * I, 0.0001 + 0.005 * I, 0.0001 + 0.003 * I, 0.001 + 0.001 * I, 0.001 + 0.003 * I, 0.0001 + 0.004 * I, 0.003 + 0.006 * I, 0.0001 + 0.005 * I, 0.0001 + 0.003 * I, 0.001 + 0.001 * I, 0.0001 + 0.004 * I, 0.003 + 0.006 * I, 0.0001 + 0.005 * I, 0.0001 + 0.003 * I, 0.001 + 0.001 * I, 0.001 + 0.003 * I, 0.0001 + 0.004 * I, 0.003 + 0.006 * I, 0.0001 + 0.005 * I, 0.0001 + 0.003 * I, 0.001 + 0.001 * I, 0.001 + 0.003 * I, 0.0001 + 0.004 * I, 0.003 + 0.006 * I, 0.0001 + 0.005 * I, 0.0001 + 0.003 * I, 0.001 + 0.001 * I, 0.001 + 0.003 * I, 0.0001 + 0.004 * I, 0.003 + 0.006 * I, 0.0001 + 0.005 * I, 0.0001 + 0.003 * I, 0.001 + 0.001 * I, 0.001 + 0.003 * I, 0.0001 + 0.004 * I, 0.003 + 0.006 * I, 0.0001 + 0.005 * I, 0.0001 + 0.003 * I, 0.001 + 0.001 * I, 0.0001 + 0.004 * I, 0.003 + 0.006 * I, 0.0001 + 0.005 * I, 0.0001 + 0.003 * I, 0.001 + 0.001 * I, 0.001 + 0.003 * I, 0.0001 + 0.004 * I, 0.003 + 0.006 * I, 0.0001 + 0.005 * I, 0.0001 + 0.003 * I, 0.001 + 0.001 * I, 0.001 + 0.003 * I, 0.0001 + 0.004 * I, 0.003 + 0.006 * I, 0.0001 + 0.005 * I, 0.0001 + 0.003 * I, 0.001 + 0.001 * I, 0.001 + 0.003 * I, 0.0001 + 0.004 * I, 0.003 + 0.006 * I, 0.0001 + 0.005 * I, 0.0001 + 0.003 * I, 0.001 + 0.001 * I, 0.001 + 0.003 * I, 0.0001 + 0.004 * I, 0.003 + 0.006 * I, 0.0001 + 0.005 * I, 0.0001 + 0.003 * I, 0.001 + 0.001 * I, 0.0001 + 0.004 * I, 0.003 + 0.006 * I, 0.0001 + 0.005 * I, 0.0001 + 0.003 * I, 0.001 + 0.001 * I, 0.001 + 0.003 * I, 0.0001 + 0.004 * I, 0.003 + 0.006 * I, 0.0001 + 0.005 * I, 0.0001 + 0.003 * I, 0.001 + 0.001 * I, 0.001 + 0.003 * I, 0.0001 + 0.004 * I, 0.003 + 0.006 * I, 0.0001 + 0.005 * I, 0.0001 + 0.003 * I, 0.001 + 0.001 * I, 0.001 + 0.003 * I, 0.0001 + 0.004 * I, 0.003 + 0.006 * I, 0.0001 + 0.005 * I, 0.0001 + 0.003 * I, 0.001 + 0.001 * I, 0.001 + 0.003 * I, 0.0001 + 0.004 * I, 0.003 + 0.006 * I, 0.0001 + 0.005 * I, 0.0001 + 0.003 * I, 0.001 + 0.001 * I, 0.001 + 0.003 * I, 0.000 + 0.000 * I ]; glob_nxt := glob_nxt + 1; it := x_delta[glob_nxt]; return it; end; #END USER DEF BLOCK #######END OF ECHO OF PROBLEM################# START of Soultion x[1] = 0.1 0.1 h = 0.0001 0.005 y[1] (numeric) = 2.64324288131 0.109472676253 y[1] (closed_form) = 2.64324288131 0.109472676253 absolute error = 0 relative error = 0 % Correct digits = 30 Radius of convergence (given) for eq 1 = 2.102 Order of pole (given) = 0.5 0 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 0.1001 0.105 h = 0.0001 0.003 y[1] (numeric) = 2.6434149349 0.114944648524 y[1] (closed_form) = 2.64341524144 0.114944636979 absolute error = 3.068e-07 relative error = 1.159e-05 % Correct digits = 7 Radius of convergence (given) for eq 1 = 2.103 Order of pole (given) = 0.5 0 NO 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=29.4MB, alloc=40.3MB, time=0.37 x[1] = 0.1002 0.108 h = 0.001 0.001 y[1] (numeric) = 2.64356397348 0.118227189866 y[1] (closed_form) = 2.64356391232 0.118227197599 absolute error = 6.165e-08 relative error = 2.330e-06 % Correct digits = 8 Radius of convergence (given) for eq 1 = 2.103 Order of pole (given) = 0.5 0 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 0.1012 0.109 h = 0.001 0.003 y[1] (numeric) = 2.64467201403 0.119308355934 y[1] (closed_form) = 2.64467177635 0.119308434519 absolute error = 2.503e-07 relative error = 9.456e-06 % Correct digits = 7 Radius of convergence (given) for eq 1 = 2.104 Order of pole (given) = 0.5 0 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 0.1022 0.112 h = 0.0001 0.004 y[1] (numeric) = 2.64580674108 0.122578198664 y[1] (closed_form) = 2.64580686887 0.122578147566 absolute error = 1.376e-07 relative error = 5.196e-06 % Correct digits = 7 Radius of convergence (given) for eq 1 = 2.105 Order of pole (given) = 0.5 0 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 0.1023 0.116 h = 0.003 0.006 y[1] (numeric) = 2.64597185774 0.126953980003 y[1] (closed_form) = 2.64597224051 0.126954138467 absolute error = 4.143e-07 relative error = 1.564e-05 % Correct digits = 7 Radius of convergence (given) for eq 1 = 2.105 Order of pole (given) = 0.5 0 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 0.1053 0.122 h = 0.0001 0.005 y[1] (numeric) = 2.64934167901 0.133476507899 y[1] (closed_form) = 2.64934223426 0.133475228403 absolute error = 1.395e-06 relative error = 5.258e-05 % Correct digits = 6 Radius of convergence (given) for eq 1 = 2.109 Order of pole (given) = 0.5 0 NO 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=74.9MB, alloc=52.3MB, time=0.96 x[1] = 0.1054 0.127 h = 0.0001 0.003 y[1] (numeric) = 2.64952765699 0.138943784657 y[1] (closed_form) = 2.64952794357 0.138943405701 absolute error = 4.751e-07 relative error = 1.791e-05 % Correct digits = 7 Radius of convergence (given) for eq 1 = 2.109 Order of pole (given) = 0.5 0 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 0.1055 0.13 h = 0.001 0.001 y[1] (numeric) = 2.6496846742 0.142223941872 y[1] (closed_form) = 2.64968459361 0.142223583545 absolute error = 3.673e-07 relative error = 1.384e-05 % Correct digits = 7 Radius of convergence (given) for eq 1 = 2.11 Order of pole (given) = 0.5 0 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 0.1065 0.131 h = 0.001 0.003 y[1] (numeric) = 2.65079469127 0.143301719085 y[1] (closed_form) = 2.65079443465 0.143301432183 absolute error = 3.849e-07 relative error = 1.450e-05 % Correct digits = 7 Radius of convergence (given) for eq 1 = 2.111 Order of pole (given) = 0.5 0 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 0.1075 0.134 h = 0.0001 0.004 y[1] (numeric) = 2.65193675846 0.146566761985 y[1] (closed_form) = 2.65193686636 0.146566344197 absolute error = 4.315e-07 relative error = 1.625e-05 % Correct digits = 7 Radius of convergence (given) for eq 1 = 2.112 Order of pole (given) = 0.5 0 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 0.1076 0.138 h = 0.003 0.006 y[1] (numeric) = 2.65211252805 0.150939444866 y[1] (closed_form) = 2.65211289139 0.150939235426 absolute error = 4.194e-07 relative error = 1.579e-05 % Correct digits = 7 Radius of convergence (given) for eq 1 = 2.112 Order of pole (given) = 0.5 0 NO 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=120.3MB, alloc=52.3MB, time=1.51 x[1] = 0.1106 0.144 h = 0.0001 0.005 y[1] (numeric) = 2.6554963023 0.157449673587 y[1] (closed_form) = 2.65549683255 0.157448027368 absolute error = 1.730e-06 relative error = 6.502e-05 % Correct digits = 6 Radius of convergence (given) for eq 1 = 2.116 Order of pole (given) = 0.5 0 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 0.1107 0.149 h = 0.0001 0.003 y[1] (numeric) = 2.65569559493 0.162913122036 y[1] (closed_form) = 2.6556958602 0.162912376201 absolute error = 7.916e-07 relative error = 2.975e-05 % Correct digits = 7 Radius of convergence (given) for eq 1 = 2.116 Order of pole (given) = 0.5 0 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 0.1108 0.152 h = 0.001 0.001 y[1] (numeric) = 2.65586057178 0.16619086843 y[1] (closed_form) = 2.65586047042 0.166190144559 absolute error = 7.309e-07 relative error = 2.747e-05 % Correct digits = 7 Radius of convergence (given) for eq 1 = 2.116 Order of pole (given) = 0.5 0 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 0.1118 0.153 h = 0.001 0.003 y[1] (numeric) = 2.65697255023 0.167265253744 y[1] (closed_form) = 2.65697227334 0.167264601857 absolute error = 7.083e-07 relative error = 2.660e-05 % Correct digits = 7 Radius of convergence (given) for eq 1 = 2.117 Order of pole (given) = 0.5 0 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 0.1128 0.156 h = 0.0001 0.004 y[1] (numeric) = 2.65812193039 0.170525475619 y[1] (closed_form) = 2.65812201705 0.170524691666 absolute error = 7.887e-07 relative error = 2.961e-05 % Correct digits = 7 Radius of convergence (given) for eq 1 = 2.119 Order of pole (given) = 0.5 0 NO 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=165.8MB, alloc=52.3MB, time=2.06 x[1] = 0.1129 0.16 h = 0.003 0.006 y[1] (numeric) = 2.65830832775 0.174895024462 y[1] (closed_form) = 2.6583086703 0.174894447641 absolute error = 6.709e-07 relative error = 2.518e-05 % Correct digits = 7 Radius of convergence (given) for eq 1 = 2.119 Order of pole (given) = 0.5 0 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 0.1159 0.166 h = 0.0001 0.005 y[1] (numeric) = 2.66170599135 0.181392918148 y[1] (closed_form) = 2.66170649529 0.18139090583 absolute error = 2.074e-06 relative error = 7.776e-05 % Correct digits = 6 Radius of convergence (given) for eq 1 = 2.122 Order of pole (given) = 0.5 0 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 0.116 0.171 h = 0.0001 0.003 y[1] (numeric) = 2.66191856711 0.186852494144 y[1] (closed_form) = 2.66191880973 0.186851381983 absolute error = 1.138e-06 relative error = 4.266e-05 % Correct digits = 6 Radius of convergence (given) for eq 1 = 2.123 Order of pole (given) = 0.5 0 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 0.1161 0.174 h = 0.001 0.001 y[1] (numeric) = 2.66209148421 0.190127803524 y[1] (closed_form) = 2.66209136078 0.190126714644 absolute error = 1.096e-06 relative error = 4.106e-05 % Correct digits = 6 Radius of convergence (given) for eq 1 = 2.123 Order of pole (given) = 0.5 0 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 0.1171 0.175 h = 0.001 0.003 y[1] (numeric) = 2.66320540895 0.191198794192 y[1] (closed_form) = 2.66320511048 0.191197777844 absolute error = 1.059e-06 relative error = 3.967e-05 % Correct digits = 6 Radius of convergence (given) for eq 1 = 2.124 Order of pole (given) = 0.5 0 NO 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=211.1MB, alloc=52.3MB, time=2.61 x[1] = 0.1181 0.178 h = 0.0001 0.004 y[1] (numeric) = 2.66436207464 0.194454174472 y[1] (closed_form) = 2.66436213876 0.194453024904 absolute error = 1.151e-06 relative error = 4.310e-05 % Correct digits = 6 Radius of convergence (given) for eq 1 = 2.126 Order of pole (given) = 0.5 0 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 0.1182 0.182 h = 0.003 0.006 y[1] (numeric) = 2.66455907412 0.198820554363 y[1] (closed_form) = 2.66455939453 0.198819610709 absolute error = 9.966e-07 relative error = 3.730e-05 % Correct digits = 6 Radius of convergence (given) for eq 1 = 2.126 Order of pole (given) = 0.5 0 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 0.1212 0.188 h = 0.0001 0.005 y[1] (numeric) = 2.6679705631 0.205306078541 y[1] (closed_form) = 2.66797103944 0.205303700766 absolute error = 2.425e-06 relative error = 9.063e-05 % Correct digits = 6 Radius of convergence (given) for eq 1 = 2.13 Order of pole (given) = 0.5 0 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 0.1213 0.193 h = 0.0001 0.003 y[1] (numeric) = 2.66819638984 0.21076173877 y[1] (closed_form) = 2.66819660849 0.210760260861 absolute error = 1.494e-06 relative error = 5.582e-05 % Correct digits = 6 Radius of convergence (given) for eq 1 = 2.13 Order of pole (given) = 0.5 0 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 0.1214 0.196 h = 0.001 0.001 y[1] (numeric) = 2.66837722743 0.21403458545 y[1] (closed_form) = 2.66837708063 0.214033132121 absolute error = 1.461e-06 relative error = 5.457e-05 % Correct digits = 6 Radius of convergence (given) for eq 1 = 2.13 Order of pole (given) = 0.5 0 NO 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=256.5MB, alloc=52.3MB, time=3.16 x[1] = 0.1224 0.197 h = 0.0001 0.004 y[1] (numeric) = 2.66949308338 0.215102179025 y[1] (closed_form) = 2.66949276204 0.215100798762 absolute error = 1.417e-06 relative error = 5.292e-05 % Correct digits = 6 Radius of convergence (given) for eq 1 = 2.132 Order of pole (given) = 0.5 0 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 0.1225 0.201 h = 0.003 0.006 y[1] (numeric) = 2.66969873897 0.21946595842 y[1] (closed_form) = 2.66969916148 0.219464754215 absolute error = 1.276e-06 relative error = 4.764e-05 % Correct digits = 6 Radius of convergence (given) for eq 1 = 2.132 Order of pole (given) = 0.5 0 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 0.1255 0.207 h = 0.0001 0.005 y[1] (numeric) = 2.67312222481 0.225940972434 y[1] (closed_form) = 2.67312279857 0.225938335304 absolute error = 2.699e-06 relative error = 0.0001006 % Correct digits = 6 Radius of convergence (given) for eq 1 = 2.136 Order of pole (given) = 0.5 0 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 0.1256 0.212 h = 0.0001 0.003 y[1] (numeric) = 2.67335947866 0.231393385372 y[1] (closed_form) = 2.67335979785 0.231391647846 absolute error = 1.767e-06 relative error = 6.584e-05 % Correct digits = 6 Radius of convergence (given) for eq 1 = 2.136 Order of pole (given) = 0.5 0 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 0.1257 0.215 h = 0.001 0.001 y[1] (numeric) = 2.67354714757 0.234664186087 y[1] (closed_form) = 2.67354710182 0.234662474252 absolute error = 1.712e-06 relative error = 6.381e-05 % Correct digits = 6 Radius of convergence (given) for eq 1 = 2.137 Order of pole (given) = 0.5 0 NO 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=301.9MB, alloc=52.3MB, time=3.71 x[1] = 0.1267 0.216 h = 0.001 0.003 y[1] (numeric) = 2.67466469431 0.23572887658 y[1] (closed_form) = 2.67466447446 0.235727238267 absolute error = 1.653e-06 relative error = 6.156e-05 % Correct digits = 6 Radius of convergence (given) for eq 1 = 2.138 Order of pole (given) = 0.5 0 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 0.1277 0.219 h = 0.0001 0.004 y[1] (numeric) = 2.67583490113 0.238975281178 y[1] (closed_form) = 2.67583504203 0.238973507551 absolute error = 1.779e-06 relative error = 6.623e-05 % Correct digits = 6 Radius of convergence (given) for eq 1 = 2.139 Order of pole (given) = 0.5 0 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 0.1278 0.223 h = 0.003 0.006 y[1] (numeric) = 2.67605159735 0.243335799318 y[1] (closed_form) = 2.67605199526 0.243334229342 absolute error = 1.620e-06 relative error = 6.027e-05 % Correct digits = 6 Radius of convergence (given) for eq 1 = 2.139 Order of pole (given) = 0.5 0 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 0.1308 0.229 h = 0.0001 0.005 y[1] (numeric) = 2.67948878921 0.249798382585 y[1] (closed_form) = 2.67948933301 0.249795381233 absolute error = 3.050e-06 relative error = 0.0001133 % Correct digits = 6 Radius of convergence (given) for eq 1 = 2.143 Order of pole (given) = 0.5 0 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 0.1309 0.234 h = 0.0001 0.003 y[1] (numeric) = 2.67973923306 0.255246801003 y[1] (closed_form) = 2.67973952586 0.255244698841 absolute error = 2.122e-06 relative error = 7.885e-05 % Correct digits = 6 Radius of convergence (given) for eq 1 = 2.144 Order of pole (given) = 0.5 0 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 memory used=347.3MB, alloc=52.3MB, time=4.27 x[1] = 0.131 0.237 h = 0.001 0.001 y[1] (numeric) = 2.67993478501 0.258515092344 y[1] (closed_form) = 2.67993471351 0.258513017138 absolute error = 2.076e-06 relative error = 7.712e-05 % Correct digits = 6 Radius of convergence (given) for eq 1 = 2.144 Order of pole (given) = 0.5 0 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 0.132 0.238 h = 0.001 0.003 y[1] (numeric) = 2.68105423505 0.259576381785 y[1] (closed_form) = 2.68105398997 0.259574380613 absolute error = 2.016e-06 relative error = 7.485e-05 % Correct digits = 6 Radius of convergence (given) for eq 1 = 2.145 Order of pole (given) = 0.5 0 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 0.133 0.241 h = 0.0001 0.004 y[1] (numeric) = 2.68223164796 0.262817889061 y[1] (closed_form) = 2.68223176261 0.262815751491 absolute error = 2.141e-06 relative error = 7.943e-05 % Correct digits = 6 Radius of convergence (given) for eq 1 = 2.147 Order of pole (given) = 0.5 0 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 0.1331 0.245 h = 0.003 0.006 y[1] (numeric) = 2.68245887054 0.267175141778 y[1] (closed_form) = 2.68245924253 0.26717320664 absolute error = 1.971e-06 relative error = 7.310e-05 % Correct digits = 6 Radius of convergence (given) for eq 1 = 2.147 Order of pole (given) = 0.5 0 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 0.1361 0.251 h = 0.0001 0.005 y[1] (numeric) = 2.68590970372 0.273625263762 y[1] (closed_form) = 2.68591021631 0.273621898888 absolute error = 3.404e-06 relative error = 0.0001261 % Correct digits = 6 Radius of convergence (given) for eq 1 = 2.151 Order of pole (given) = 0.5 0 NO 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=392.9MB, alloc=52.3MB, time=4.82 x[1] = 0.1362 0.256 h = 0.0001 0.003 y[1] (numeric) = 2.68617330368 0.279069646765 y[1] (closed_form) = 2.68617356884 0.279067180604 absolute error = 2.480e-06 relative error = 9.184e-05 % Correct digits = 6 Radius of convergence (given) for eq 1 = 2.151 Order of pole (given) = 0.5 0 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 0.1363 0.259 h = 0.001 0.001 y[1] (numeric) = 2.68637671789 0.282335404518 y[1] (closed_form) = 2.6863766194 0.282332966558 absolute error = 2.440e-06 relative error = 9.033e-05 % Correct digits = 6 Radius of convergence (given) for eq 1 = 2.152 Order of pole (given) = 0.5 0 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 0.1373 0.26 h = 0.001 0.003 y[1] (numeric) = 2.6874980563 0.283393291289 y[1] (closed_form) = 2.68749778475 0.283390927862 absolute error = 2.379e-06 relative error = 8.803e-05 % Correct digits = 6 Radius of convergence (given) for eq 1 = 2.153 Order of pole (given) = 0.5 0 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 0.1383 0.263 h = 0.0001 0.004 y[1] (numeric) = 2.68868264707 0.286629883082 y[1] (closed_form) = 2.68868273422 0.286627382198 absolute error = 2.502e-06 relative error = 9.255e-05 % Correct digits = 6 Radius of convergence (given) for eq 1 = 2.154 Order of pole (given) = 0.5 0 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 0.1384 0.267 h = 0.003 0.006 y[1] (numeric) = 2.68892036849 0.290983838086 y[1] (closed_form) = 2.6889207133 0.290981538417 absolute error = 2.325e-06 relative error = 8.598e-05 % Correct digits = 6 Radius of convergence (given) for eq 1 = 2.155 Order of pole (given) = 0.5 0 NO 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=438.3MB, alloc=52.3MB, time=5.38 x[1] = 0.1414 0.273 h = 0.0001 0.005 y[1] (numeric) = 2.69238477813 0.297421469618 y[1] (closed_form) = 2.6923852583 0.297417741939 absolute error = 3.758e-06 relative error = 0.0001388 % Correct digits = 6 Radius of convergence (given) for eq 1 = 2.159 Order of pole (given) = 0.5 0 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 0.1415 0.278 h = 0.0001 0.003 y[1] (numeric) = 2.69266149977 0.302861777171 y[1] (closed_form) = 2.69266173604 0.302858947665 absolute error = 2.839e-06 relative error = 0.0001048 % Correct digits = 6 Radius of convergence (given) for eq 1 = 2.159 Order of pole (given) = 0.5 0 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 0.1416 0.281 h = 0.001 0.001 y[1] (numeric) = 2.69287275516 0.306124977645 y[1] (closed_form) = 2.69287262844 0.306122177566 absolute error = 2.803e-06 relative error = 0.0001034 % Correct digits = 6 Radius of convergence (given) for eq 1 = 2.16 Order of pole (given) = 0.5 0 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 0.1426 0.282 h = 0.001 0.003 y[1] (numeric) = 2.69399596704 0.307179460408 y[1] (closed_form) = 2.69399566781 0.307176735349 absolute error = 2.741e-06 relative error = 0.0001011 % Correct digits = 6 Radius of convergence (given) for eq 1 = 2.161 Order of pole (given) = 0.5 0 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 0.1436 0.285 h = 0.0001 0.004 y[1] (numeric) = 2.69518770728 0.310411119183 y[1] (closed_form) = 2.6951877657 0.310408255633 absolute error = 2.864e-06 relative error = 0.0001056 % Correct digits = 6 Radius of convergence (given) for eq 1 = 2.162 Order of pole (given) = 0.5 0 NO 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=483.8MB, alloc=52.3MB, time=5.93 x[1] = 0.1437 0.289 h = 0.003 0.006 y[1] (numeric) = 2.6954358996 0.314761744877 y[1] (closed_form) = 2.69543621597 0.314759081327 absolute error = 2.682e-06 relative error = 9.884e-05 % Correct digits = 6 Radius of convergence (given) for eq 1 = 2.163 Order of pole (given) = 0.5 0 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 0.1467 0.295 h = 0.0001 0.005 y[1] (numeric) = 2.69891382069 0.321186858144 y[1] (closed_form) = 2.69891426723 0.321182768393 absolute error = 4.114e-06 relative error = 0.0001514 % Correct digits = 6 Radius of convergence (given) for eq 1 = 2.167 Order of pole (given) = 0.5 0 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 0.1468 0.3 h = 0.0001 0.003 y[1] (numeric) = 2.69920362906 0.326623051074 y[1] (closed_form) = 2.69920383521 0.326619858898 absolute error = 3.199e-06 relative error = 0.0001177 % Correct digits = 6 Radius of convergence (given) for eq 1 = 2.168 Order of pole (given) = 0.5 0 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 0.1469 0.303 h = 0.001 0.001 y[1] (numeric) = 2.69942270422 0.329883671102 y[1] (closed_form) = 2.69942254807 0.329880509559 absolute error = 3.165e-06 relative error = 0.0001164 % Correct digits = 6 Radius of convergence (given) for eq 1 = 2.168 Order of pole (given) = 0.5 0 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 0.1479 0.304 h = 0.0001 0.004 y[1] (numeric) = 2.70054777477 0.3309347488 y[1] (closed_form) = 2.70054744664 0.330931662752 absolute error = 3.103e-06 relative error = 0.0001141 % Correct digits = 6 Radius of convergence (given) for eq 1 = 2.169 Order of pole (given) = 0.5 0 NO 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=529.3MB, alloc=52.3MB, time=6.48 x[1] = 0.148 0.308 h = 0.003 0.006 y[1] (numeric) = 2.70080451451 0.335282645129 y[1] (closed_form) = 2.70080492764 0.335279721143 absolute error = 2.953e-06 relative error = 0.0001085 % Correct digits = 6 Radius of convergence (given) for eq 1 = 2.17 Order of pole (given) = 0.5 0 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 0.151 0.314 h = 0.0001 0.005 y[1] (numeric) = 2.70429416318 0.341697121737 y[1] (closed_form) = 2.70429470206 0.341692773116 absolute error = 4.382e-06 relative error = 0.0001608 % Correct digits = 6 Radius of convergence (given) for eq 1 = 2.174 Order of pole (given) = 0.5 0 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 0.1511 0.319 h = 0.0001 0.003 y[1] (numeric) = 2.70459525744 0.347129897548 y[1] (closed_form) = 2.70459555891 0.347126445977 absolute error = 3.465e-06 relative error = 0.0001271 % Correct digits = 6 Radius of convergence (given) for eq 1 = 2.175 Order of pole (given) = 0.5 0 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 0.1512 0.322 h = 0.001 0.001 y[1] (numeric) = 2.70482107734 0.350388371062 y[1] (closed_form) = 2.70482101711 0.350384951156 absolute error = 3.420e-06 relative error = 0.0001254 % Correct digits = 6 Radius of convergence (given) for eq 1 = 2.175 Order of pole (given) = 0.5 0 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 0.1522 0.323 h = 0.001 0.003 y[1] (numeric) = 2.70594777653 0.351436539057 y[1] (closed_form) = 2.70594754478 0.35143319505 absolute error = 3.352e-06 relative error = 0.0001228 % Correct digits = 6 Radius of convergence (given) for eq 1 = 2.176 Order of pole (given) = 0.5 0 NO 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=574.4MB, alloc=52.3MB, time=7.03 x[1] = 0.1532 0.326 h = 0.0001 0.004 y[1] (numeric) = 2.70715280342 0.354659058446 y[1] (closed_form) = 2.70715292736 0.354655574079 absolute error = 3.487e-06 relative error = 0.0001277 % Correct digits = 6 Radius of convergence (given) for eq 1 = 2.178 Order of pole (given) = 0.5 0 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 0.1533 0.33 h = 0.003 0.006 y[1] (numeric) = 2.70742044442 0.359003531289 y[1] (closed_form) = 2.7074208268 0.359000244667 absolute error = 3.309e-06 relative error = 0.0001212 % Correct digits = 6 Radius of convergence (given) for eq 1 = 2.178 Order of pole (given) = 0.5 0 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 0.1563 0.336 h = 0.0001 0.005 y[1] (numeric) = 2.71092348357 0.365405440674 y[1] (closed_form) = 2.71092398665 0.365400731381 absolute error = 4.736e-06 relative error = 0.0001731 % Correct digits = 6 Radius of convergence (given) for eq 1 = 2.182 Order of pole (given) = 0.5 0 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 0.1564 0.341 h = 0.0001 0.003 y[1] (numeric) = 2.71123759866 0.370834030858 y[1] (closed_form) = 2.71123786777 0.370830217905 absolute error = 3.822e-06 relative error = 0.0001397 % Correct digits = 6 Radius of convergence (given) for eq 1 = 2.183 Order of pole (given) = 0.5 0 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 0.1565 0.344 h = 0.001 0.001 y[1] (numeric) = 2.71147119801 0.374089881961 y[1] (closed_form) = 2.71147110614 0.374086101843 absolute error = 3.781e-06 relative error = 0.0001381 % Correct digits = 6 Radius of convergence (given) for eq 1 = 2.184 Order of pole (given) = 0.5 0 NO 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=619.5MB, alloc=52.3MB, time=7.58 x[1] = 0.1575 0.345 h = 0.001 0.003 y[1] (numeric) = 2.71259972848 0.375134643475 y[1] (closed_form) = 2.71259946565 0.375130939705 absolute error = 3.713e-06 relative error = 0.0001356 % Correct digits = 6 Radius of convergence (given) for eq 1 = 2.185 Order of pole (given) = 0.5 0 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 0.1585 0.348 h = 0.0001 0.004 y[1] (numeric) = 2.71381182303 0.378352182753 y[1] (closed_form) = 2.7138119148 0.378348337662 absolute error = 3.846e-06 relative error = 0.0001404 % Correct digits = 6 Radius of convergence (given) for eq 1 = 2.186 Order of pole (given) = 0.5 0 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 0.1586 0.352 h = 0.003 0.006 y[1] (numeric) = 2.71408985318 0.382693239402 y[1] (closed_form) = 2.71409020362 0.382689590848 absolute error = 3.665e-06 relative error = 0.0001337 % Correct digits = 6 Radius of convergence (given) for eq 1 = 2.187 Order of pole (given) = 0.5 0 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 0.1616 0.358 h = 0.0001 0.005 y[1] (numeric) = 2.71760621754 0.389082557574 y[1] (closed_form) = 2.71760668368 0.389077488389 absolute error = 5.091e-06 relative error = 0.0001854 % Correct digits = 6 Radius of convergence (given) for eq 1 = 2.191 Order of pole (given) = 0.5 0 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 0.1617 0.363 h = 0.0001 0.003 y[1] (numeric) = 2.71793331713 0.394506925446 y[1] (closed_form) = 2.71793355271 0.394502751835 absolute error = 4.180e-06 relative error = 0.0001522 % Correct digits = 6 Radius of convergence (given) for eq 1 = 2.192 Order of pole (given) = 0.5 0 NO 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=664.6MB, alloc=52.3MB, time=8.13 x[1] = 0.1618 0.366 h = 0.001 0.001 y[1] (numeric) = 2.71817467374 0.397760132479 y[1] (closed_form) = 2.71817454908 0.397755992853 absolute error = 4.142e-06 relative error = 0.0001508 % Correct digits = 6 Radius of convergence (given) for eq 1 = 2.193 Order of pole (given) = 0.5 0 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 0.1628 0.367 h = 0.001 0.003 y[1] (numeric) = 2.7193050209 0.398801487227 y[1] (closed_form) = 2.71930472582 0.398797424388 absolute error = 4.074e-06 relative error = 0.0001482 % Correct digits = 6 Radius of convergence (given) for eq 1 = 2.194 Order of pole (given) = 0.5 0 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 0.1638 0.37 h = 0.0001 0.004 y[1] (numeric) = 2.72052415422 0.402014031238 y[1] (closed_form) = 2.72052421266 0.402009826141 absolute error = 4.206e-06 relative error = 0.0001529 % Correct digits = 6 Radius of convergence (given) for eq 1 = 2.195 Order of pole (given) = 0.5 0 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 0.1639 0.374 h = 0.003 0.006 y[1] (numeric) = 2.7208125441 0.406351642793 y[1] (closed_form) = 2.72081286141 0.406347633027 absolute error = 4.022e-06 relative error = 0.0001462 % Correct digits = 6 Radius of convergence (given) for eq 1 = 2.196 Order of pole (given) = 0.5 0 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 0.1669 0.38 h = 0.0001 0.005 y[1] (numeric) = 2.72434216837 0.412728347074 y[1] (closed_form) = 2.72434259646 0.412722918796 absolute error = 5.445e-06 relative error = 0.0001976 % Correct digits = 6 Radius of convergence (given) for eq 1 = 2.2 Order of pole (given) = 0.5 0 NO 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=709.7MB, alloc=52.3MB, time=8.68 x[1] = 0.167 0.385 h = 0.0001 0.003 y[1] (numeric) = 2.72468221572 0.418148456825 y[1] (closed_form) = 2.72468241661 0.418143923297 absolute error = 4.538e-06 relative error = 0.0001646 % Correct digits = 6 Radius of convergence (given) for eq 1 = 2.201 Order of pole (given) = 0.5 0 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 0.1671 0.388 h = 0.001 0.001 y[1] (numeric) = 2.72493130715 0.421398998659 y[1] (closed_form) = 2.72493114856 0.421394500246 absolute error = 4.501e-06 relative error = 0.0001632 % Correct digits = 6 Radius of convergence (given) for eq 1 = 2.202 Order of pole (given) = 0.5 0 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 0.1681 0.389 h = 0.001 0.003 y[1] (numeric) = 2.72606345648 0.422436946619 y[1] (closed_form) = 2.72606312802 0.422432525418 absolute error = 4.433e-06 relative error = 0.0001607 % Correct digits = 6 Radius of convergence (given) for eq 1 = 2.203 Order of pole (given) = 0.5 0 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 0.1691 0.392 h = 0.0001 0.004 y[1] (numeric) = 2.72728959959 0.425644480814 y[1] (closed_form) = 2.72728962356 0.425639916444 absolute error = 4.564e-06 relative error = 0.0001654 % Correct digits = 6 Radius of convergence (given) for eq 1 = 2.204 Order of pole (given) = 0.5 0 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 0.1692 0.396 h = 0.003 0.006 y[1] (numeric) = 2.72758831947 0.429978619078 y[1] (closed_form) = 2.72758860249 0.429974248837 absolute error = 4.379e-06 relative error = 0.0001586 % Correct digits = 6 Radius of convergence (given) for eq 1 = 2.205 Order of pole (given) = 0.5 0 NO 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=754.9MB, alloc=52.3MB, time=9.22 x[1] = 0.1722 0.402 h = 0.0001 0.005 y[1] (numeric) = 2.73113113836 0.43634268809 y[1] (closed_form) = 2.7311315273 0.43633690153 absolute error = 5.800e-06 relative error = 0.0002097 % Correct digits = 6 Radius of convergence (given) for eq 1 = 2.209 Order of pole (given) = 0.5 0 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 0.1723 0.407 h = 0.0001 0.003 y[1] (numeric) = 2.73148409631 0.441758504784 y[1] (closed_form) = 2.73148426139 0.441753612097 absolute error = 4.895e-06 relative error = 0.0001769 % Correct digits = 6 Radius of convergence (given) for eq 1 = 2.21 Order of pole (given) = 0.5 0 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 0.1724 0.41 h = 0.001 0.001 y[1] (numeric) = 2.73174089989 0.445006360821 y[1] (closed_form) = 2.73174070625 0.445001504358 absolute error = 4.860e-06 relative error = 0.0001756 % Correct digits = 6 Radius of convergence (given) for eq 1 = 2.211 Order of pole (given) = 0.5 0 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 0.1734 0.411 h = 0.0001 0.004 y[1] (numeric) = 2.73287483695 0.446040902228 y[1] (closed_form) = 2.73287447401 0.44603612339 absolute error = 4.793e-06 relative error = 0.0001731 % Correct digits = 6 Radius of convergence (given) for eq 1 = 2.212 Order of pole (given) = 0.5 0 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 0.1735 0.415 h = 0.003 0.006 y[1] (numeric) = 2.73318198797 0.450372195682 y[1] (closed_form) = 2.73318236258 0.450367565581 absolute error = 4.645e-06 relative error = 0.0001677 % Correct digits = 6 Radius of convergence (given) for eq 1 = 2.213 Order of pole (given) = 0.5 0 NO 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=800.2MB, alloc=52.3MB, time=9.77 x[1] = 0.1765 0.421 h = 0.0001 0.005 y[1] (numeric) = 2.73673626292 0.456725528658 y[1] (closed_form) = 2.73673673931 0.456719484124 absolute error = 6.063e-06 relative error = 0.0002185 % Correct digits = 6 Radius of convergence (given) for eq 1 = 2.217 Order of pole (given) = 0.5 0 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 0.1766 0.426 h = 0.0001 0.003 y[1] (numeric) = 2.73710035553 0.462137775905 y[1] (closed_form) = 2.73710061091 0.462132624486 absolute error = 5.158e-06 relative error = 0.0001858 % Correct digits = 6 Radius of convergence (given) for eq 1 = 2.218 Order of pole (given) = 0.5 0 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 0.1767 0.429 h = 0.001 0.001 y[1] (numeric) = 2.73736381147 0.465383395503 y[1] (closed_form) = 2.73736370878 0.465378281255 absolute error = 5.115e-06 relative error = 0.0001842 % Correct digits = 6 Radius of convergence (given) for eq 1 = 2.219 Order of pole (given) = 0.5 0 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 0.1777 0.43 h = 0.001 0.003 y[1] (numeric) = 2.73849931644 0.466415026105 y[1] (closed_form) = 2.73849904495 0.466409989835 absolute error = 5.044e-06 relative error = 0.0001816 % Correct digits = 6 Radius of convergence (given) for eq 1 = 2.22 Order of pole (given) = 0.5 0 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 0.1787 0.433 h = 0.0001 0.004 y[1] (numeric) = 2.73973848584 0.469613284225 y[1] (closed_form) = 2.7397385647 0.469608103142 absolute error = 5.182e-06 relative error = 0.0001864 % Correct digits = 6 Radius of convergence (given) for eq 1 = 2.221 Order of pole (given) = 0.5 0 NO 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=845.5MB, alloc=52.3MB, time=10.32 x[1] = 0.1788 0.437 h = 0.003 0.006 y[1] (numeric) = 2.74005638938 0.473941009062 y[1] (closed_form) = 2.74005672758 0.473936019888 absolute error = 5.001e-06 relative error = 0.0001798 % Correct digits = 6 Radius of convergence (given) for eq 1 = 2.222 Order of pole (given) = 0.5 0 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 0.1818 0.443 h = 0.0001 0.005 y[1] (numeric) = 2.7436237378 0.480281669629 y[1] (closed_form) = 2.74362417305 0.480275268345 absolute error = 6.416e-06 relative error = 0.0002304 % Correct digits = 6 Radius of convergence (given) for eq 1 = 2.226 Order of pole (given) = 0.5 0 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 0.1819 0.448 h = 0.0001 0.003 y[1] (numeric) = 2.74400067128 0.485689560686 y[1] (closed_form) = 2.74400088878 0.485684051543 absolute error = 5.513e-06 relative error = 0.0001979 % Correct digits = 6 Radius of convergence (given) for eq 1 = 2.227 Order of pole (given) = 0.5 0 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 0.182 0.451 h = 0.001 0.001 y[1] (numeric) = 2.74427179683 0.48893245729 y[1] (closed_form) = 2.74427165707 0.488926986389 absolute error = 5.473e-06 relative error = 0.0001963 % Correct digits = 6 Radius of convergence (given) for eq 1 = 2.228 Order of pole (given) = 0.5 0 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 0.183 0.452 h = 0.001 0.003 y[1] (numeric) = 2.74540906295 0.489960682272 y[1] (closed_form) = 2.74540875494 0.489955289738 absolute error = 5.401e-06 relative error = 0.0001937 % Correct digits = 6 Radius of convergence (given) for eq 1 = 2.229 Order of pole (given) = 0.5 0 NO 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=890.5MB, alloc=52.3MB, time=10.87 x[1] = 0.184 0.455 h = 0.0001 0.004 y[1] (numeric) = 2.74665515903 0.493153891923 y[1] (closed_form) = 2.74665520026 0.493148353738 absolute error = 5.538e-06 relative error = 0.0001985 % Correct digits = 6 Radius of convergence (given) for eq 1 = 2.231 Order of pole (given) = 0.5 0 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 0.1841 0.459 h = 0.003 0.006 y[1] (numeric) = 2.74698330616 0.497478066315 y[1] (closed_form) = 2.74698360683 0.49747271885 absolute error = 5.356e-06 relative error = 0.0001919 % Correct digits = 6 Radius of convergence (given) for eq 1 = 2.232 Order of pole (given) = 0.5 0 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 0.1871 0.465 h = 0.0001 0.005 y[1] (numeric) = 2.75056366292 0.503806036738 y[1] (closed_form) = 2.75056405599 0.503799279554 absolute error = 6.769e-06 relative error = 0.0002421 % Correct digits = 6 Radius of convergence (given) for eq 1 = 2.236 Order of pole (given) = 0.5 0 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 0.1872 0.47 h = 0.0001 0.003 y[1] (numeric) = 2.75095339908 0.509209539164 y[1] (closed_form) = 2.75095357763 0.509203673095 absolute error = 5.869e-06 relative error = 0.0002098 % Correct digits = 6 Radius of convergence (given) for eq 1 = 2.237 Order of pole (given) = 0.5 0 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 0.1873 0.473 h = 0.001 0.001 y[1] (numeric) = 2.75123217098 0.512449693683 y[1] (closed_form) = 2.75123199308 0.512443866907 absolute error = 5.829e-06 relative error = 0.0002083 % Correct digits = 6 Radius of convergence (given) for eq 1 = 2.238 Order of pole (given) = 0.5 0 NO 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=935.7MB, alloc=52.3MB, time=11.42 x[1] = 0.1883 0.474 h = 0.001 0.003 y[1] (numeric) = 2.75237118409 0.513474513989 y[1] (closed_form) = 2.75237083852 0.513468765958 absolute error = 5.758e-06 relative error = 0.0002057 % Correct digits = 6 Radius of convergence (given) for eq 1 = 2.239 Order of pole (given) = 0.5 0 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 0.1893 0.477 h = 0.0001 0.004 y[1] (numeric) = 2.75362417767 0.516662662925 y[1] (closed_form) = 2.75362418019 0.516656768427 absolute error = 5.894e-06 relative error = 0.0002104 % Correct digits = 6 Radius of convergence (given) for eq 1 = 2.241 Order of pole (given) = 0.5 0 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 0.1894 0.481 h = 0.003 0.006 y[1] (numeric) = 2.75396253754 0.520983261378 y[1] (closed_form) = 2.75396279961 0.520977556418 absolute error = 5.711e-06 relative error = 0.0002038 % Correct digits = 6 Radius of convergence (given) for eq 1 = 2.242 Order of pole (given) = 0.5 0 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 0.1924 0.487 h = 0.0001 0.005 y[1] (numeric) = 2.75755583763 0.527298525163 y[1] (closed_form) = 2.75755618751 0.527291412939 absolute error = 7.121e-06 relative error = 0.0002536 % Correct digits = 6 Radius of convergence (given) for eq 1 = 2.246 Order of pole (given) = 0.5 0 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 0.1925 0.492 h = 0.0001 0.003 y[1] (numeric) = 2.75795833796 0.532697607386 y[1] (closed_form) = 2.75795847652 0.532691385204 absolute error = 6.224e-06 relative error = 0.0002216 % Correct digits = 6 Radius of convergence (given) for eq 1 = 2.247 Order of pole (given) = 0.5 0 NO 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=980.8MB, alloc=52.3MB, time=11.97 x[1] = 0.1926 0.495 h = 0.001 0.001 y[1] (numeric) = 2.75824473277 0.535935001257 y[1] (closed_form) = 2.75824451569 0.535928819397 absolute error = 6.186e-06 relative error = 0.0002201 % Correct digits = 6 Radius of convergence (given) for eq 1 = 2.248 Order of pole (given) = 0.5 0 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 0.1936 0.496 h = 0.001 0.003 y[1] (numeric) = 2.75938547884 0.536956418067 y[1] (closed_form) = 2.75938509467 0.536950315318 absolute error = 6.115e-06 relative error = 0.0002175 % Correct digits = 6 Radius of convergence (given) for eq 1 = 2.249 Order of pole (given) = 0.5 0 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 0.1946 0.499 h = 0.0001 0.004 y[1] (numeric) = 2.76064534069 0.540139494624 y[1] (closed_form) = 2.76064530347 0.540133244616 absolute error = 6.250e-06 relative error = 0.0002222 % Correct digits = 6 Radius of convergence (given) for eq 1 = 2.251 Order of pole (given) = 0.5 0 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 0.1947 0.503 h = 0.003 0.006 y[1] (numeric) = 2.76099388223 0.54445649234 y[1] (closed_form) = 2.76099410464 0.544450430696 absolute error = 6.066e-06 relative error = 0.0002155 % Correct digits = 6 Radius of convergence (given) for eq 1 = 2.252 Order of pole (given) = 0.5 0 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 0.1977 0.509 h = 0.0001 0.005 y[1] (numeric) = 2.76460006077 0.55075903422 y[1] (closed_form) = 2.76460036648 0.55075156783 absolute error = 7.473e-06 relative error = 0.0002651 % Correct digits = 6 Radius of convergence (given) for eq 1 = 2.256 Order of pole (given) = 0.5 0 NO 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=1026.1MB, alloc=52.3MB, time=12.52 x[1] = 0.1978 0.514 h = 0.0001 0.003 y[1] (numeric) = 2.76501528649 0.556153665535 y[1] (closed_form) = 2.76501538403 0.556147088064 absolute error = 6.578e-06 relative error = 0.0002332 % Correct digits = 6 Radius of convergence (given) for eq 1 = 2.257 Order of pole (given) = 0.5 0 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 0.1979 0.517 h = 0.001 0.001 y[1] (numeric) = 2.76530928059 0.559388280717 y[1] (closed_form) = 2.76530902332 0.559381744578 absolute error = 6.541e-06 relative error = 0.0002318 % Correct digits = 6 Radius of convergence (given) for eq 1 = 2.258 Order of pole (given) = 0.5 0 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 0.1989 0.518 h = 0.0001 0.004 y[1] (numeric) = 2.76645174571 0.560406295445 y[1] (closed_form) = 2.76645132191 0.560399838769 absolute error = 6.471e-06 relative error = 0.0002292 % Correct digits = 6 Radius of convergence (given) for eq 1 = 2.259 Order of pole (given) = 0.5 0 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 0.199 0.522 h = 0.003 0.006 y[1] (numeric) = 2.76680859634 0.564720346411 y[1] (closed_form) = 2.7668089054 0.564714025897 absolute error = 6.328e-06 relative error = 0.0002241 % Correct digits = 6 Radius of convergence (given) for eq 1 = 2.26 Order of pole (given) = 0.5 0 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 0.202 0.528 h = 0.0001 0.005 y[1] (numeric) = 2.77042596017 0.571012078756 y[1] (closed_form) = 2.77042634868 0.57100435566 absolute error = 7.733e-06 relative error = 0.0002734 % Correct digits = 6 Radius of convergence (given) for eq 1 = 2.264 Order of pole (given) = 0.5 0 NO 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=1071.5MB, alloc=52.3MB, time=13.07 x[1] = 0.2021 0.533 h = 0.0001 0.003 y[1] (numeric) = 2.77085216171 0.576403005898 y[1] (closed_form) = 2.77085234473 0.576396170756 absolute error = 6.838e-06 relative error = 0.0002416 % Correct digits = 6 Radius of convergence (given) for eq 1 = 2.266 Order of pole (given) = 0.5 0 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 0.2022 0.536 h = 0.001 0.001 y[1] (numeric) = 2.77115271139 0.579635305365 y[1] (closed_form) = 2.77115254033 0.579628512415 absolute error = 6.795e-06 relative error = 0.00024 % Correct digits = 6 Radius of convergence (given) for eq 1 = 2.266 Order of pole (given) = 0.5 0 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 0.2032 0.537 h = 0.001 0.003 y[1] (numeric) = 2.77229668563 0.580650413254 y[1] (closed_form) = 2.77229634854 0.580643700069 absolute error = 6.722e-06 relative error = 0.0002373 % Correct digits = 6 Radius of convergence (given) for eq 1 = 2.268 Order of pole (given) = 0.5 0 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 0.2042 0.54 h = 0.0001 0.004 y[1] (numeric) = 2.77356931066 0.583824103213 y[1] (closed_form) = 2.77356931841 0.583817241352 absolute error = 6.862e-06 relative error = 0.0002421 % Correct digits = 6 Radius of convergence (given) for eq 1 = 2.269 Order of pole (given) = 0.5 0 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 0.2043 0.544 h = 0.003 0.006 y[1] (numeric) = 2.77393675801 0.588134457575 y[1] (closed_form) = 2.77393702547 0.588127781906 absolute error = 6.681e-06 relative error = 0.0002356 % Correct digits = 6 Radius of convergence (given) for eq 1 = 2.27 Order of pole (given) = 0.5 0 NO 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=1116.6MB, alloc=52.3MB, time=13.62 x[1] = 0.2073 0.55 h = 0.0001 0.005 y[1] (numeric) = 2.77756688018 0.594413442042 y[1] (closed_form) = 2.77756722271 0.594405366419 absolute error = 8.083e-06 relative error = 0.0002846 % Correct digits = 6 Radius of convergence (given) for eq 1 = 2.275 Order of pole (given) = 0.5 0 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 0.2074 0.555 h = 0.0001 0.003 y[1] (numeric) = 2.77800573457 0.59979986296 y[1] (closed_form) = 2.77800587469 0.599792674085 absolute error = 7.190e-06 relative error = 0.000253 % Correct digits = 6 Radius of convergence (given) for eq 1 = 2.276 Order of pole (given) = 0.5 0 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 0.2075 0.558 h = 0.001 0.001 y[1] (numeric) = 2.77831383941 0.603029351265 y[1] (closed_form) = 2.77831362631 0.603022205553 absolute error = 7.149e-06 relative error = 0.0002515 % Correct digits = 6 Radius of convergence (given) for eq 1 = 2.277 Order of pole (given) = 0.5 0 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 0.2085 0.559 h = 0.001 0.003 y[1] (numeric) = 2.77945950707 0.604041060142 y[1] (closed_form) = 2.77945912851 0.604033994525 absolute error = 7.076e-06 relative error = 0.0002488 % Correct digits = 6 Radius of convergence (given) for eq 1 = 2.278 Order of pole (given) = 0.5 0 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 0.2095 0.562 h = 0.0001 0.004 y[1] (numeric) = 2.78073891689 0.607209647167 y[1] (closed_form) = 2.78073888202 0.607202432153 absolute error = 7.215e-06 relative error = 0.0002535 % Correct digits = 6 Radius of convergence (given) for eq 1 = 2.28 Order of pole (given) = 0.5 0 NO 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=1161.8MB, alloc=52.3MB, time=14.17 x[1] = 0.2096 0.566 h = 0.003 0.006 y[1] (numeric) = 2.78111645611 0.611516333294 y[1] (closed_form) = 2.78111668097 0.611509303316 absolute error = 7.034e-06 relative error = 0.000247 % Correct digits = 6 Radius of convergence (given) for eq 1 = 2.281 Order of pole (given) = 0.5 0 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 0.2126 0.572 h = 0.0001 0.005 y[1] (numeric) = 2.78475927226 0.617782558027 y[1] (closed_form) = 2.78475956789 0.61777413078 absolute error = 8.432e-06 relative error = 0.0002956 % Correct digits = 6 Radius of convergence (given) for eq 1 = 2.285 Order of pole (given) = 0.5 0 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 0.2127 0.577 h = 0.0001 0.003 y[1] (numeric) = 2.78521073998 0.623164444468 y[1] (closed_form) = 2.78521083624 0.623156902719 absolute error = 7.542e-06 relative error = 0.0002643 % Correct digits = 6 Radius of convergence (given) for eq 1 = 2.287 Order of pole (given) = 0.5 0 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 0.2128 0.58 h = 0.001 0.001 y[1] (numeric) = 2.78552637598 0.626391105048 y[1] (closed_form) = 2.78552611987 0.626383607411 absolute error = 7.502e-06 relative error = 0.0002628 % Correct digits = 6 Radius of convergence (given) for eq 1 = 2.288 Order of pole (given) = 0.5 0 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 0.2138 0.581 h = 0.001 0.003 y[1] (numeric) = 2.78667372346 0.627399416967 y[1] (closed_form) = 2.78667330248 0.627391999744 absolute error = 7.429e-06 relative error = 0.0002601 % Correct digits = 6 Radius of convergence (given) for eq 1 = 2.289 Order of pole (given) = 0.5 0 NO 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=1207.0MB, alloc=52.3MB, time=14.72 x[1] = 0.2148 0.584 h = 0.0001 0.004 y[1] (numeric) = 2.78795988889 0.630562891581 y[1] (closed_form) = 2.78795981044 0.630555324265 absolute error = 7.568e-06 relative error = 0.0002648 % Correct digits = 6 Radius of convergence (given) for eq 1 = 2.291 Order of pole (given) = 0.5 0 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 0.2149 0.588 h = 0.003 0.006 y[1] (numeric) = 2.78834748813 0.634865887332 y[1] (closed_form) = 2.78834766941 0.634858503903 absolute error = 7.386e-06 relative error = 0.0002583 % Correct digits = 6 Radius of convergence (given) for eq 1 = 2.292 Order of pole (given) = 0.5 0 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 0.2179 0.594 h = 0.0001 0.005 y[1] (numeric) = 2.79200293414 0.641119341632 y[1] (closed_form) = 2.79200318196 0.641110563673 absolute error = 8.781e-06 relative error = 0.0003065 % Correct digits = 6 Radius of convergence (given) for eq 1 = 2.296 Order of pole (given) = 0.5 0 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 0.218 0.599 h = 0.0001 0.003 y[1] (numeric) = 2.79246697547 0.64649666619 y[1] (closed_form) = 2.7924670269 0.646488772436 absolute error = 7.894e-06 relative error = 0.0002754 % Correct digits = 6 Radius of convergence (given) for eq 1 = 2.297 Order of pole (given) = 0.5 0 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 0.2181 0.602 h = 0.001 0.001 y[1] (numeric) = 2.79279011848 0.649720482995 y[1] (closed_form) = 2.79278981843 0.649712634281 absolute error = 7.854e-06 relative error = 0.0002739 % Correct digits = 6 Radius of convergence (given) for eq 1 = 2.298 Order of pole (given) = 0.5 0 NO 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=1252.3MB, alloc=52.3MB, time=15.27 x[1] = 0.2191 0.603 h = 0.001 0.003 y[1] (numeric) = 2.79393913233 0.650725400219 y[1] (closed_form) = 2.79393866799 0.650717632227 absolute error = 7.782e-06 relative error = 0.0002713 % Correct digits = 6 Radius of convergence (given) for eq 1 = 2.3 Order of pole (given) = 0.5 0 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 0.2201 0.606 h = 0.0001 0.004 y[1] (numeric) = 2.79523202421 0.653883753498 y[1] (closed_form) = 2.79523190123 0.65387583474 absolute error = 7.920e-06 relative error = 0.0002759 % Correct digits = 6 Radius of convergence (given) for eq 1 = 2.301 Order of pole (given) = 0.5 0 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 0.2202 0.61 h = 0.003 0.006 y[1] (numeric) = 2.79562965147 0.658183037409 y[1] (closed_form) = 2.7956297882 0.658175301396 absolute error = 7.737e-06 relative error = 0.0002694 % Correct digits = 6 Radius of convergence (given) for eq 1 = 2.302 Order of pole (given) = 0.5 0 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 0.2232 0.616 h = 0.0001 0.005 y[1] (numeric) = 2.79929766347 0.664423711715 y[1] (closed_form) = 2.79929786258 0.664414583962 absolute error = 9.130e-06 relative error = 0.0003173 % Correct digits = 5 Radius of convergence (given) for eq 1 = 2.307 Order of pole (given) = 0.5 0 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 0.2233 0.621 h = 0.0001 0.003 y[1] (numeric) = 2.79977423848 0.669796447824 y[1] (closed_form) = 2.79977424417 0.669788202943 absolute error = 8.245e-06 relative error = 0.0002864 % Correct digits = 6 Radius of convergence (given) for eq 1 = 2.308 Order of pole (given) = 0.5 0 NO 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=1297.6MB, alloc=52.3MB, time=15.81 x[1] = 0.2234 0.624 h = 0.001 0.001 y[1] (numeric) = 2.80010486428 0.673017405309 y[1] (closed_form) = 2.80010451936 0.673009206378 absolute error = 8.206e-06 relative error = 0.000285 % Correct digits = 6 Radius of convergence (given) for eq 1 = 2.309 Order of pole (given) = 0.5 0 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 0.2244 0.625 h = 0.0001 0.004 y[1] (numeric) = 2.80125553116 0.674018930314 y[1] (closed_form) = 2.80125502254 0.674010812398 absolute error = 8.134e-06 relative error = 0.0002823 % Correct digits = 6 Radius of convergence (given) for eq 1 = 2.311 Order of pole (given) = 0.5 0 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 0.2245 0.629 h = 0.003 0.006 y[1] (numeric) = 2.8016613414 0.678315178831 y[1] (closed_form) = 2.80166156009 0.678307185307 absolute error = 7.997e-06 relative error = 0.0002774 % Correct digits = 6 Radius of convergence (given) for eq 1 = 2.312 Order of pole (given) = 0.5 0 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 0.2275 0.635 h = 0.0001 0.005 y[1] (numeric) = 2.80534027119 0.684544994398 y[1] (closed_form) = 2.80534054872 0.684535611528 absolute error = 9.387e-06 relative error = 0.0003251 % Correct digits = 5 Radius of convergence (given) for eq 1 = 2.316 Order of pole (given) = 0.5 0 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 0.2276 0.64 h = 0.0001 0.003 y[1] (numeric) = 2.80582765777 0.689913908939 y[1] (closed_form) = 2.8058277444 0.689905407797 absolute error = 8.502e-06 relative error = 0.0002942 % Correct digits = 6 Radius of convergence (given) for eq 1 = 2.318 Order of pole (given) = 0.5 0 NO 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=1342.7MB, alloc=52.3MB, time=16.37 x[1] = 0.2277 0.643 h = 0.001 0.001 y[1] (numeric) = 2.80616473932 0.693132481895 y[1] (closed_form) = 2.8061644761 0.693124027477 absolute error = 8.459e-06 relative error = 0.0002926 % Correct digits = 6 Radius of convergence (given) for eq 1 = 2.319 Order of pole (given) = 0.5 0 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 0.2287 0.644 h = 0.001 0.003 y[1] (numeric) = 2.80731685886 0.694131108601 y[1] (closed_form) = 2.80731643244 0.694122735451 absolute error = 8.384e-06 relative error = 0.0002899 % Correct digits = 6 Radius of convergence (given) for eq 1 = 2.32 Order of pole (given) = 0.5 0 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 0.2297 0.647 h = 0.0001 0.004 y[1] (numeric) = 2.80862225089 0.697279989671 y[1] (closed_form) = 2.80862216367 0.697271464554 absolute error = 8.526e-06 relative error = 0.0002946 % Correct digits = 6 Radius of convergence (given) for eq 1 = 2.322 Order of pole (given) = 0.5 0 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 0.2298 0.651 h = 0.003 0.006 y[1] (numeric) = 2.80903849711 0.701572430433 y[1] (closed_form) = 2.80903866952 0.701564085957 absolute error = 8.346e-06 relative error = 0.0002883 % Correct digits = 6 Radius of convergence (given) for eq 1 = 2.323 Order of pole (given) = 0.5 0 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 0.2328 0.657 h = 0.0001 0.005 y[1] (numeric) = 2.81272987485 0.707789450423 y[1] (closed_form) = 2.81273010206 0.707779719483 absolute error = 9.734e-06 relative error = 0.0003356 % Correct digits = 5 Radius of convergence (given) for eq 1 = 2.327 Order of pole (given) = 0.5 0 NO 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=1387.8MB, alloc=52.3MB, time=16.92 x[1] = 0.2329 0.662 h = 0.0001 0.003 y[1] (numeric) = 2.81322972071 0.713153728821 y[1] (closed_form) = 2.8132297599 0.713144878202 absolute error = 8.851e-06 relative error = 0.000305 % Correct digits = 6 Radius of convergence (given) for eq 1 = 2.329 Order of pole (given) = 0.5 0 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 0.233 0.665 h = 0.001 0.001 y[1] (numeric) = 2.81357423987 0.716369414577 y[1] (closed_form) = 2.81357393011 0.716360611553 absolute error = 8.808e-06 relative error = 0.0003034 % Correct digits = 6 Radius of convergence (given) for eq 1 = 2.33 Order of pole (given) = 0.5 0 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 0.234 0.666 h = 0.001 0.003 y[1] (numeric) = 2.81472798794 0.717364654044 y[1] (closed_form) = 2.81472751557 0.717355932562 absolute error = 8.734e-06 relative error = 0.0003007 % Correct digits = 6 Radius of convergence (given) for eq 1 = 2.331 Order of pole (given) = 0.5 0 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 0.235 0.669 h = 0.0001 0.004 y[1] (numeric) = 2.8160400234 0.720508390867 y[1] (closed_form) = 2.81603988906 0.720499516812 absolute error = 8.875e-06 relative error = 0.0003053 % Correct digits = 6 Radius of convergence (given) for eq 1 = 2.333 Order of pole (given) = 0.5 0 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 0.2351 0.673 h = 0.003 0.006 y[1] (numeric) = 2.8164662056 0.724797061694 y[1] (closed_form) = 2.81646633081 0.724788367162 absolute error = 8.695e-06 relative error = 0.000299 % Correct digits = 6 Radius of convergence (given) for eq 1 = 2.334 Order of pole (given) = 0.5 0 NO 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=1433.2MB, alloc=52.3MB, time=17.47 x[1] = 0.2381 0.679 h = 0.0001 0.005 y[1] (numeric) = 2.82016996822 0.731001279695 y[1] (closed_form) = 2.82017014429 0.730991201627 absolute error = 1.008e-05 relative error = 0.000346 % Correct digits = 5 Radius of convergence (given) for eq 1 = 2.339 Order of pole (given) = 0.5 0 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 0.2382 0.684 h = 0.0001 0.003 y[1] (numeric) = 2.820682233 0.736360897752 y[1] (closed_form) = 2.82068222388 0.736351698563 absolute error = 9.199e-06 relative error = 0.0003156 % Correct digits = 6 Radius of convergence (given) for eq 1 = 2.34 Order of pole (given) = 0.5 0 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 0.2383 0.687 h = 0.001 0.001 y[1] (numeric) = 2.8210341653 0.739573682191 y[1] (closed_form) = 2.82103380814 0.739564531445 absolute error = 9.158e-06 relative error = 0.000314 % Correct digits = 6 Radius of convergence (given) for eq 1 = 2.341 Order of pole (given) = 0.5 0 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 0.2393 0.688 h = 0.001 0.003 y[1] (numeric) = 2.82218952894 0.740565537459 y[1] (closed_form) = 2.82218900976 0.740556468518 absolute error = 9.084e-06 relative error = 0.0003113 % Correct digits = 6 Radius of convergence (given) for eq 1 = 2.343 Order of pole (given) = 0.5 0 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 0.2403 0.691 h = 0.0001 0.004 y[1] (numeric) = 2.8235081789 0.743704123159 y[1] (closed_form) = 2.82350799658 0.743694901062 absolute error = 9.224e-06 relative error = 0.0003159 % Correct digits = 6 Radius of convergence (given) for eq 1 = 2.344 Order of pole (given) = 0.5 0 NO 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=1478.5MB, alloc=52.3MB, time=18.02 x[1] = 0.2404 0.695 h = 0.003 0.006 y[1] (numeric) = 2.82394426462 0.747989005149 y[1] (closed_form) = 2.82394434175 0.747979961466 absolute error = 9.044e-06 relative error = 0.0003096 % Correct digits = 6 Radius of convergence (given) for eq 1 = 2.346 Order of pole (given) = 0.5 0 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 0.2434 0.701 h = 0.0001 0.005 y[1] (numeric) = 2.82766034937 0.754180415813 y[1] (closed_form) = 2.8276604735 0.754169991565 absolute error = 1.042e-05 relative error = 0.0003562 % Correct digits = 5 Radius of convergence (given) for eq 1 = 2.35 Order of pole (given) = 0.5 0 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 0.2435 0.706 h = 0.0001 0.003 y[1] (numeric) = 2.8281849926 0.759535350145 y[1] (closed_form) = 2.82818493433 0.759525803297 absolute error = 9.547e-06 relative error = 0.000326 % Correct digits = 5 Radius of convergence (given) for eq 1 = 2.352 Order of pole (given) = 0.5 0 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 0.2436 0.709 h = 0.001 0.001 y[1] (numeric) = 2.82854431349 0.762745219637 y[1] (closed_form) = 2.8285439081 0.762735722061 absolute error = 9.506e-06 relative error = 0.0003245 % Correct digits = 5 Radius of convergence (given) for eq 1 = 2.353 Order of pole (given) = 0.5 0 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 0.2446 0.71 h = 0.001 0.003 y[1] (numeric) = 2.82970127989 0.763733693933 y[1] (closed_form) = 2.82970071306 0.763724278414 absolute error = 9.433e-06 relative error = 0.0003218 % Correct digits = 5 Radius of convergence (given) for eq 1 = 2.354 Order of pole (given) = 0.5 0 NO 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=1523.8MB, alloc=52.3MB, time=18.57 x[1] = 0.2456 0.713 h = 0.0001 0.004 y[1] (numeric) = 2.83102651552 0.766867122146 y[1] (closed_form) = 2.83102628437 0.766857552911 absolute error = 9.572e-06 relative error = 0.0003264 % Correct digits = 5 Radius of convergence (given) for eq 1 = 2.356 Order of pole (given) = 0.5 0 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 0.2457 0.717 h = 0.003 0.006 y[1] (numeric) = 2.83147247219 0.771148197047 y[1] (closed_form) = 2.8314725004 0.771138805126 absolute error = 9.392e-06 relative error = 0.00032 % Correct digits = 5 Radius of convergence (given) for eq 1 = 2.357 Order of pole (given) = 0.5 0 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 0.2487 0.723 h = 0.0001 0.005 y[1] (numeric) = 2.83520081669 0.777326796065 y[1] (closed_form) = 2.83520088809 0.777316026592 absolute error = 1.077e-05 relative error = 0.0003663 % Correct digits = 5 Radius of convergence (given) for eq 1 = 2.362 Order of pole (given) = 0.5 0 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 0.2488 0.728 h = 0.0001 0.003 y[1] (numeric) = 2.83573779779 0.782677024093 y[1] (closed_form) = 2.83573768953 0.782667130507 absolute error = 9.894e-06 relative error = 0.0003363 % Correct digits = 5 Radius of convergence (given) for eq 1 = 2.364 Order of pole (given) = 0.5 0 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 0.2489 0.731 h = 0.001 0.001 y[1] (numeric) = 2.83610448268 0.785883965493 y[1] (closed_form) = 2.83610402823 0.785874121988 absolute error = 9.854e-06 relative error = 0.0003348 % Correct digits = 5 Radius of convergence (given) for eq 1 = 2.365 Order of pole (given) = 0.5 0 NO 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=1568.9MB, alloc=52.3MB, time=19.12 x[1] = 0.2499 0.732 h = 0.0001 0.004 y[1] (numeric) = 2.83726303916 0.786869062227 y[1] (closed_form) = 2.83726242385 0.786859301019 absolute error = 9.781e-06 relative error = 0.0003322 % Correct digits = 5 Radius of convergence (given) for eq 1 = 2.366 Order of pole (given) = 0.5 0 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 0.25 0.736 h = 0.003 0.006 y[1] (numeric) = 2.83771705014 0.791147025957 y[1] (closed_form) = 2.83771715589 0.791137378206 absolute error = 9.648e-06 relative error = 0.0003275 % Correct digits = 5 Radius of convergence (given) for eq 1 = 2.367 Order of pole (given) = 0.5 0 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 0.253 0.742 h = 0.0001 0.005 y[1] (numeric) = 2.84145605038 0.797314739502 y[1] (closed_form) = 2.84145619607 0.797303716779 absolute error = 1.102e-05 relative error = 0.0003735 % Correct digits = 5 Radius of convergence (given) for eq 1 = 2.372 Order of pole (given) = 0.5 0 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 0.2531 0.747 h = 0.0001 0.003 y[1] (numeric) = 2.84200367537 0.802661045336 y[1] (closed_form) = 2.84200364376 0.802650897203 absolute error = 1.015e-05 relative error = 0.0003436 % Correct digits = 5 Radius of convergence (given) for eq 1 = 2.374 Order of pole (given) = 0.5 0 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 0.2532 0.75 h = 0.001 0.001 y[1] (numeric) = 2.84237671431 0.805865543491 y[1] (closed_form) = 2.8423763373 0.805855446131 absolute error = 1.010e-05 relative error = 0.000342 % Correct digits = 5 Radius of convergence (given) for eq 1 = 2.375 Order of pole (given) = 0.5 0 NO 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=1614.3MB, alloc=52.3MB, time=19.67 x[1] = 0.2542 0.751 h = 0.001 0.003 y[1] (numeric) = 2.84353666959 0.806847754537 y[1] (closed_form) = 2.84353613223 0.806837739678 absolute error = 1.003e-05 relative error = 0.0003393 % Correct digits = 5 Radius of convergence (given) for eq 1 = 2.376 Order of pole (given) = 0.5 0 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 0.2552 0.754 h = 0.0001 0.004 y[1] (numeric) = 2.84487414478 0.809971648289 y[1] (closed_form) = 2.84487394092 0.80996147872 absolute error = 1.017e-05 relative error = 0.0003439 % Correct digits = 5 Radius of convergence (given) for eq 1 = 2.378 Order of pole (given) = 0.5 0 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 0.2553 0.758 h = 0.0001 0.004 y[1] (numeric) = 2.84533842798 0.814245709366 y[1] (closed_form) = 2.84533848324 0.814235715086 absolute error = 9.994e-06 relative error = 0.0003377 % Correct digits = 5 Radius of convergence (given) for eq 1 = 2.379 Order of pole (given) = 0.5 0 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 0.2554 0.762 h = 0.003 0.006 y[1] (numeric) = 2.84580480592 0.818519643153 y[1] (closed_form) = 2.84580486118 0.818509648952 absolute error = 9.994e-06 relative error = 0.0003375 % Correct digits = 5 Radius of convergence (given) for eq 1 = 2.381 Order of pole (given) = 0.5 0 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 0.2584 0.768 h = 0.0001 0.005 y[1] (numeric) = 2.84955851975 0.824672771978 y[1] (closed_form) = 2.84955861055 0.824661406294 absolute error = 1.137e-05 relative error = 0.0003831 % Correct digits = 5 Radius of convergence (given) for eq 1 = 2.385 Order of pole (given) = 0.5 0 NO 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=1659.5MB, alloc=52.3MB, time=20.21 x[1] = 0.2585 0.773 h = 0.0001 0.003 y[1] (numeric) = 2.8501206996 0.830013962397 y[1] (closed_form) = 2.85012061628 0.830003469552 absolute error = 1.049e-05 relative error = 0.0003535 % Correct digits = 5 Radius of convergence (given) for eq 1 = 2.387 Order of pole (given) = 0.5 0 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 0.2586 0.776 h = 0.001 0.001 y[1] (numeric) = 2.85050242934 0.83321526842 y[1] (closed_form) = 2.85050200169 0.833204827286 absolute error = 1.045e-05 relative error = 0.0003519 % Correct digits = 5 Radius of convergence (given) for eq 1 = 2.388 Order of pole (given) = 0.5 0 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 0.2596 0.777 h = 0.001 0.003 y[1] (numeric) = 2.85166434602 0.834193584025 y[1] (closed_form) = 2.8516637587 0.834183225671 absolute error = 1.037e-05 relative error = 0.0003492 % Correct digits = 5 Radius of convergence (given) for eq 1 = 2.389 Order of pole (given) = 0.5 0 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 0.2606 0.78 h = 0.0001 0.004 y[1] (numeric) = 2.85300963855 0.837311650271 y[1] (closed_form) = 2.85300938337 0.837301136582 absolute error = 1.052e-05 relative error = 0.0003537 % Correct digits = 5 Radius of convergence (given) for eq 1 = 2.391 Order of pole (given) = 0.5 0 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 0.2607 0.784 h = 0.003 0.006 y[1] (numeric) = 2.85348552999 0.841581548872 y[1] (closed_form) = 2.85348553378 0.841571209209 absolute error = 1.034e-05 relative error = 0.0003476 % Correct digits = 5 Radius of convergence (given) for eq 1 = 2.393 Order of pole (given) = 0.5 0 NO 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=1704.7MB, alloc=52.3MB, time=20.77 x[1] = 0.2637 0.79 h = 0.0001 0.005 y[1] (numeric) = 2.85725131653 0.847721856148 y[1] (closed_form) = 2.85725135229 0.847710148133 absolute error = 1.171e-05 relative error = 0.0003928 % Correct digits = 5 Radius of convergence (given) for eq 1 = 2.398 Order of pole (given) = 0.5 0 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 0.2638 0.795 h = 0.0001 0.003 y[1] (numeric) = 2.8578257117 0.853058274599 y[1] (closed_form) = 2.85782557596 0.853047437811 absolute error = 1.084e-05 relative error = 0.0003634 % Correct digits = 5 Radius of convergence (given) for eq 1 = 2.399 Order of pole (given) = 0.5 0 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 0.2639 0.798 h = 0.001 0.001 y[1] (numeric) = 2.8582147312 0.856256614346 y[1] (closed_form) = 2.85821425207 0.856245830017 absolute error = 1.079e-05 relative error = 0.0003618 % Correct digits = 5 Radius of convergence (given) for eq 1 = 2.4 Order of pole (given) = 0.5 0 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 0.2649 0.799 h = 0.001 0.003 y[1] (numeric) = 2.85937820015 0.8572315632 y[1] (closed_form) = 2.85937756193 0.857220861859 absolute error = 1.072e-05 relative error = 0.0003591 % Correct digits = 5 Radius of convergence (given) for eq 1 = 2.402 Order of pole (given) = 0.5 0 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 0.2659 0.802 h = 0.0001 0.004 y[1] (numeric) = 2.86072996327 0.860344449915 y[1] (closed_form) = 2.86072965603 0.860333592769 absolute error = 1.086e-05 relative error = 0.0003636 % Correct digits = 5 Radius of convergence (given) for eq 1 = 2.404 Order of pole (given) = 0.5 0 NO 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=1750.0MB, alloc=52.3MB, time=21.32 x[1] = 0.266 0.806 h = 0.003 0.006 y[1] (numeric) = 2.86121559456 0.864610472641 y[1] (closed_form) = 2.86121554611 0.864599788457 absolute error = 1.068e-05 relative error = 0.0003575 % Correct digits = 5 Radius of convergence (given) for eq 1 = 2.405 Order of pole (given) = 0.5 0 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 0.269 0.812 h = 0.0001 0.005 y[1] (numeric) = 2.8649933929 0.870737958072 y[1] (closed_form) = 2.86499337291 0.8707259087 absolute error = 1.205e-05 relative error = 0.0004024 % Correct digits = 5 Radius of convergence (given) for eq 1 = 2.41 Order of pole (given) = 0.5 0 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 0.2691 0.817 h = 0.0001 0.003 y[1] (numeric) = 2.86557996254 0.876069585129 y[1] (closed_form) = 2.86557977363 0.876058405343 absolute error = 1.118e-05 relative error = 0.0003731 % Correct digits = 5 Radius of convergence (given) for eq 1 = 2.412 Order of pole (given) = 0.5 0 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 0.2692 0.82 h = 0.001 0.001 y[1] (numeric) = 2.86597624708 0.879264947348 y[1] (closed_form) = 2.86597571573 0.879253820751 absolute error = 1.114e-05 relative error = 0.0003716 % Correct digits = 5 Radius of convergence (given) for eq 1 = 2.413 Order of pole (given) = 0.5 0 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 0.2702 0.821 h = 0.001 0.003 y[1] (numeric) = 2.86714125618 0.880236533554 y[1] (closed_form) = 2.86714056632 0.880225490142 absolute error = 1.106e-05 relative error = 0.0003689 % Correct digits = 5 Radius of convergence (given) for eq 1 = 2.414 Order of pole (given) = 0.5 0 NO 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=1795.2MB, alloc=52.3MB, time=21.86 x[1] = 0.2712 0.824 h = 0.0001 0.004 y[1] (numeric) = 2.86849946159 0.883344236824 y[1] (closed_form) = 2.86849910153 0.883333037157 absolute error = 1.121e-05 relative error = 0.0003733 % Correct digits = 5 Radius of convergence (given) for eq 1 = 2.416 Order of pole (given) = 0.5 0 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 0.2713 0.828 h = 0.003 0.006 y[1] (numeric) = 2.86899479993 0.887606368576 y[1] (closed_form) = 2.86899469848 0.887595340819 absolute error = 1.103e-05 relative error = 0.0003672 % Correct digits = 5 Radius of convergence (given) for eq 1 = 2.418 Order of pole (given) = 0.5 0 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 0.2743 0.834 h = 0.0001 0.005 y[1] (numeric) = 2.87278454955 0.893721032806 y[1] (closed_form) = 2.87278447312 0.893708643057 absolute error = 1.239e-05 relative error = 0.0004118 % Correct digits = 5 Radius of convergence (given) for eq 1 = 2.422 Order of pole (given) = 0.5 0 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 0.2744 0.839 h = 0.0001 0.003 y[1] (numeric) = 2.8733832528 0.899047849801 y[1] (closed_form) = 2.87338300999 0.899036327969 absolute error = 1.152e-05 relative error = 0.0003828 % Correct digits = 5 Radius of convergence (given) for eq 1 = 2.424 Order of pole (given) = 0.5 0 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 0.2745 0.842 h = 0.001 0.001 y[1] (numeric) = 2.87378677766 0.902240223698 y[1] (closed_form) = 2.87378619336 0.902228755763 absolute error = 1.148e-05 relative error = 0.0003812 % Correct digits = 5 Radius of convergence (given) for eq 1 = 2.425 Order of pole (given) = 0.5 0 NO 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=1840.4MB, alloc=52.3MB, time=22.42 x[1] = 0.2755 0.843 h = 0.001 0.003 y[1] (numeric) = 2.87495331493 0.903208451513 y[1] (closed_form) = 2.87495257271 0.903197066951 absolute error = 1.141e-05 relative error = 0.0003786 % Correct digits = 5 Radius of convergence (given) for eq 1 = 2.427 Order of pole (given) = 0.5 0 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 0.2765 0.846 h = 0.0001 0.004 y[1] (numeric) = 2.87631793447 0.906310967884 y[1] (closed_form) = 2.87631752087 0.906299426639 absolute error = 1.155e-05 relative error = 0.0003829 % Correct digits = 5 Radius of convergence (given) for eq 1 = 2.429 Order of pole (given) = 0.5 0 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 0.2766 0.85 h = 0.003 0.006 y[1] (numeric) = 2.87682294705 0.910569194169 y[1] (closed_form) = 2.87682279186 0.910557823791 absolute error = 1.137e-05 relative error = 0.0003769 % Correct digits = 5 Radius of convergence (given) for eq 1 = 2.43 Order of pole (given) = 0.5 0 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 0.2796 0.856 h = 0.0001 0.005 y[1] (numeric) = 2.88062458787 0.916671038758 y[1] (closed_form) = 2.88062445434 0.916658309614 absolute error = 1.273e-05 relative error = 0.0004211 % Correct digits = 5 Radius of convergence (given) for eq 1 = 2.435 Order of pole (given) = 0.5 0 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 0.2797 0.861 h = 0.0001 0.003 y[1] (numeric) = 2.88123538385 0.921993027772 y[1] (closed_form) = 2.88123508643 0.921981164849 absolute error = 1.187e-05 relative error = 0.0003923 % Correct digits = 5 Radius of convergence (given) for eq 1 = 2.437 Order of pole (given) = 0.5 0 NO 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=1885.8MB, alloc=52.3MB, time=22.96 x[1] = 0.2798 0.864 h = 0.001 0.001 y[1] (numeric) = 2.88164612431 0.925182402999 y[1] (closed_form) = 2.88164548636 0.925170594665 absolute error = 1.183e-05 relative error = 0.0003907 % Correct digits = 5 Radius of convergence (given) for eq 1 = 2.438 Order of pole (given) = 0.5 0 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 0.2808 0.865 h = 0.0001 0.004 y[1] (numeric) = 2.88281417794 0.926147276836 y[1] (closed_form) = 2.88281338265 0.926135552051 absolute error = 1.175e-05 relative error = 0.0003881 % Correct digits = 5 Radius of convergence (given) for eq 1 = 2.439 Order of pole (given) = 0.5 0 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 0.2809 0.869 h = 0.003 0.006 y[1] (numeric) = 2.88332708396 0.930402313946 y[1] (closed_form) = 2.8833270012 0.930390690172 absolute error = 1.162e-05 relative error = 0.0003837 % Correct digits = 5 Radius of convergence (given) for eq 1 = 2.441 Order of pole (given) = 0.5 0 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 0.2839 0.875 h = 0.0001 0.005 y[1] (numeric) = 2.8871390652 0.936493266432 y[1] (closed_form) = 2.88713900123 0.936480286654 absolute error = 1.298e-05 relative error = 0.0004276 % Correct digits = 5 Radius of convergence (given) for eq 1 = 2.446 Order of pole (given) = 0.5 0 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 0.284 0.88 h = 0.0001 0.003 y[1] (numeric) = 2.88776029527 0.941811229282 y[1] (closed_form) = 2.88776006955 0.941799114273 absolute error = 1.212e-05 relative error = 0.0003989 % Correct digits = 5 Radius of convergence (given) for eq 1 = 2.448 Order of pole (given) = 0.5 0 NO 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=1931.2MB, alloc=52.3MB, time=23.52 x[1] = 0.2841 0.883 h = 0.001 0.001 y[1] (numeric) = 2.88817726278 0.94499810096 y[1] (closed_form) = 2.88817669734 0.94498604113 absolute error = 1.207e-05 relative error = 0.0003973 % Correct digits = 5 Radius of convergence (given) for eq 1 = 2.449 Order of pole (given) = 0.5 0 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 0.2851 0.884 h = 0.001 0.003 y[1] (numeric) = 2.88934665215 0.945960109322 y[1] (closed_form) = 2.88934592988 0.945948133193 absolute error = 1.200e-05 relative error = 0.0003946 % Correct digits = 5 Radius of convergence (given) for eq 1 = 2.45 Order of pole (given) = 0.5 0 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 0.2861 0.887 h = 0.0001 0.004 y[1] (numeric) = 2.89072319425 0.949053042045 y[1] (closed_form) = 2.89072279842 0.949040908475 absolute error = 1.214e-05 relative error = 0.000399 % Correct digits = 5 Radius of convergence (given) for eq 1 = 2.452 Order of pole (given) = 0.5 0 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 0.2862 0.891 h = 0.003 0.006 y[1] (numeric) = 2.89124616796 0.953304078943 y[1] (closed_form) = 2.89124603012 0.953292114325 absolute error = 1.197e-05 relative error = 0.000393 % Correct digits = 5 Radius of convergence (given) for eq 1 = 2.454 Order of pole (given) = 0.5 0 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 0.2892 0.897 h = 0.0001 0.005 y[1] (numeric) = 2.89506992969 0.959382216361 y[1] (closed_form) = 2.89506980742 0.959368899017 absolute error = 1.332e-05 relative error = 0.0004367 % Correct digits = 5 Radius of convergence (given) for eq 1 = 2.459 Order of pole (given) = 0.5 0 NO 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=1976.4MB, alloc=52.3MB, time=24.07 x[1] = 0.2893 0.902 h = 0.0001 0.003 y[1] (numeric) = 2.89570317668 0.964695319357 y[1] (closed_form) = 2.89570289506 0.964682865038 absolute error = 1.246e-05 relative error = 0.0004082 % Correct digits = 5 Radius of convergence (given) for eq 1 = 2.461 Order of pole (given) = 0.5 0 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 0.2894 0.905 h = 0.001 0.001 y[1] (numeric) = 2.89612731395 0.967879173991 y[1] (closed_form) = 2.89612669358 0.967866775507 absolute error = 1.241e-05 relative error = 0.0004065 % Correct digits = 5 Radius of convergence (given) for eq 1 = 2.462 Order of pole (given) = 0.5 0 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 0.2904 0.906 h = 0.001 0.003 y[1] (numeric) = 2.89729819801 0.968837836835 y[1] (closed_form) = 2.89729742139 0.968825522211 absolute error = 1.234e-05 relative error = 0.0004039 % Correct digits = 5 Radius of convergence (given) for eq 1 = 2.463 Order of pole (given) = 0.5 0 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 0.2914 0.909 h = 0.0001 0.004 y[1] (numeric) = 2.89868107446 0.971925574904 y[1] (closed_form) = 2.89868062312 0.971913102468 absolute error = 1.248e-05 relative error = 0.0004082 % Correct digits = 5 Radius of convergence (given) for eq 1 = 2.465 Order of pole (given) = 0.5 0 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 0.2915 0.913 h = 0.003 0.006 y[1] (numeric) = 2.89921362877 0.976172667743 y[1] (closed_form) = 2.89921343517 0.976160363245 absolute error = 1.231e-05 relative error = 0.0004023 % Correct digits = 5 Radius of convergence (given) for eq 1 = 2.467 Order of pole (given) = 0.5 0 NO 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=2021.6MB, alloc=52.3MB, time=24.62 x[1] = 0.2945 0.919 h = 0.0001 0.005 y[1] (numeric) = 2.90304911218 0.98223799417 y[1] (closed_form) = 2.90304893098 0.982224340251 absolute error = 1.366e-05 relative error = 0.0004456 % Correct digits = 5 Radius of convergence (given) for eq 1 = 2.472 Order of pole (given) = 0.5 0 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 0.2946 0.924 h = 0.0001 0.003 y[1] (numeric) = 2.90369433526 0.987546221476 y[1] (closed_form) = 2.90369399709 0.987533428815 absolute error = 1.280e-05 relative error = 0.0004172 % Correct digits = 5 Radius of convergence (given) for eq 1 = 2.474 Order of pole (given) = 0.5 0 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 0.2947 0.927 h = 0.001 0.001 y[1] (numeric) = 2.90412561762 0.990727049969 y[1] (closed_form) = 2.90412494167 0.990714313779 absolute error = 1.275e-05 relative error = 0.0004157 % Correct digits = 5 Radius of convergence (given) for eq 1 = 2.475 Order of pole (given) = 0.5 0 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 0.2957 0.928 h = 0.001 0.003 y[1] (numeric) = 2.90529798497 0.991682372118 y[1] (closed_form) = 2.90529715334 0.991669719936 absolute error = 1.268e-05 relative error = 0.000413 % Correct digits = 5 Radius of convergence (given) for eq 1 = 2.476 Order of pole (given) = 0.5 0 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 0.2967 0.931 h = 0.0001 0.004 y[1] (numeric) = 2.90668716817 0.994764913771 y[1] (closed_form) = 2.90668666066 0.994752103427 absolute error = 1.282e-05 relative error = 0.0004173 % Correct digits = 5 Radius of convergence (given) for eq 1 = 2.478 Order of pole (given) = 0.5 0 NO 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=2066.9MB, alloc=52.3MB, time=25.17 x[1] = 0.2968 0.935 h = 0.003 0.006 y[1] (numeric) = 2.90722927034 0.999008050308 y[1] (closed_form) = 2.90722902032 0.998995406899 absolute error = 1.265e-05 relative error = 0.0004114 % Correct digits = 5 Radius of convergence (given) for eq 1 = 2.48 Order of pole (given) = 0.5 0 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 0.2998 0.941 h = 0.0001 0.005 y[1] (numeric) = 2.91107641706 1.00506057066 y[1] (closed_form) = 2.91107617635 1.00504658116 absolute error = 1.399e-05 relative error = 0.0004543 % Correct digits = 5 Radius of convergence (given) for eq 1 = 2.485 Order of pole (given) = 0.5 0 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 0.2999 0.946 h = 0.0001 0.003 y[1] (numeric) = 2.91173357546 1.01036390715 y[1] (closed_form) = 2.9117331801 1.01035077712 absolute error = 1.314e-05 relative error = 0.0004262 % Correct digits = 5 Radius of convergence (given) for eq 1 = 2.487 Order of pole (given) = 0.5 0 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 0.3 0.949 h = 0.001 0.001 y[1] (numeric) = 2.91217197829 1.01354170083 y[1] (closed_form) = 2.91217124612 1.01352862788 absolute error = 1.309e-05 relative error = 0.0004246 % Correct digits = 5 Radius of convergence (given) for eq 1 = 2.488 Order of pole (given) = 0.5 0 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 0.301 0.95 h = 0.001 0.003 y[1] (numeric) = 2.91334581766 1.01449368724 y[1] (closed_form) = 2.9133449304 1.01448069844 absolute error = 1.302e-05 relative error = 0.000422 % Correct digits = 5 Radius of convergence (given) for eq 1 = 2.489 Order of pole (given) = 0.5 0 NO 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=2112.2MB, alloc=52.3MB, time=25.72 x[1] = 0.302 0.953 h = 0.0001 0.004 y[1] (numeric) = 2.91474128018 1.01757103113 y[1] (closed_form) = 2.91474071586 1.01755788384 absolute error = 1.316e-05 relative error = 0.0004262 % Correct digits = 5 Radius of convergence (given) for eq 1 = 2.491 Order of pole (given) = 0.5 0 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 0.3021 0.957 h = 0.003 0.006 y[1] (numeric) = 2.91529289752 1.02181019969 y[1] (closed_form) = 2.91529259042 1.02179721834 absolute error = 1.298e-05 relative error = 0.0004203 % Correct digits = 5 Radius of convergence (given) for eq 1 = 2.493 Order of pole (given) = 0.5 0 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 0.3051 0.963 h = 0.0001 0.005 y[1] (numeric) = 2.91915164963 1.0278499197 y[1] (closed_form) = 2.91915134884 1.02783559561 absolute error = 1.433e-05 relative error = 0.0004629 % Correct digits = 5 Radius of convergence (given) for eq 1 = 2.498 Order of pole (given) = 0.5 0 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 0.3052 0.968 h = 0.0001 0.003 y[1] (numeric) = 2.91982070264 1.03314835094 y[1] (closed_form) = 2.91982024948 1.03313488451 absolute error = 1.347e-05 relative error = 0.000435 % Correct digits = 5 Radius of convergence (given) for eq 1 = 2.5 Order of pole (given) = 0.5 0 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 0.3053 0.971 h = 0.001 0.001 y[1] (numeric) = 2.92026620134 1.03632310155 y[1] (closed_form) = 2.92026541235 1.0363096928 absolute error = 1.343e-05 relative error = 0.0004335 % Correct digits = 5 Radius of convergence (given) for eq 1 = 2.501 Order of pole (given) = 0.5 0 NO 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=2157.6MB, alloc=52.3MB, time=26.27 x[1] = 0.3063 0.972 h = 0.0001 0.004 y[1] (numeric) = 2.92144150164 1.0372717573 y[1] (closed_form) = 2.92144055812 1.03725843284 absolute error = 1.336e-05 relative error = 0.0004309 % Correct digits = 5 Radius of convergence (given) for eq 1 = 2.503 Order of pole (given) = 0.5 0 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 0.3064 0.976 h = 0.003 0.006 y[1] (numeric) = 2.92200088254 1.04150768737 y[1] (closed_form) = 2.9220006441 1.04149445487 absolute error = 1.323e-05 relative error = 0.0004266 % Correct digits = 5 Radius of convergence (given) for eq 1 = 2.504 Order of pole (given) = 0.5 0 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 0.3094 0.982 h = 0.0001 0.005 y[1] (numeric) = 2.92586973057 1.04753653181 y[1] (closed_form) = 2.92586949584 1.04752195942 absolute error = 1.457e-05 relative error = 0.000469 % Correct digits = 5 Radius of convergence (given) for eq 1 = 2.51 Order of pole (given) = 0.5 0 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 0.3095 0.987 h = 0.0001 0.003 y[1] (numeric) = 2.92654904814 1.05283087076 y[1] (closed_form) = 2.92654866302 1.05281715449 absolute error = 1.372e-05 relative error = 0.0004412 % Correct digits = 5 Radius of convergence (given) for eq 1 = 2.512 Order of pole (given) = 0.5 0 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 0.3096 0.99 h = 0.001 0.001 y[1] (numeric) = 2.92700067147 1.05600307982 y[1] (closed_form) = 2.92699995133 1.05598942175 absolute error = 1.368e-05 relative error = 0.0004395 % Correct digits = 5 Radius of convergence (given) for eq 1 = 2.513 Order of pole (given) = 0.5 0 NO 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=2202.8MB, alloc=52.3MB, time=26.82 x[1] = 0.3106 0.991 h = 0.001 0.003 y[1] (numeric) = 2.92817726009 1.05694889006 y[1] (closed_form) = 2.92817638592 1.05693531637 absolute error = 1.360e-05 relative error = 0.0004369 % Correct digits = 5 Radius of convergence (given) for eq 1 = 2.514 Order of pole (given) = 0.5 0 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 0.3116 0.994 h = 0.0001 0.004 y[1] (numeric) = 2.92958439642 1.06001663397 y[1] (closed_form) = 2.92958384305 1.06000290121 absolute error = 1.374e-05 relative error = 0.0004412 % Correct digits = 5 Radius of convergence (given) for eq 1 = 2.516 Order of pole (given) = 0.5 0 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 0.3117 0.998 h = 0.003 0.006 y[1] (numeric) = 2.93015368001 1.06424850227 y[1] (closed_form) = 2.93015338334 1.06423493364 absolute error = 1.357e-05 relative error = 0.0004354 % Correct digits = 5 Radius of convergence (given) for eq 1 = 2.518 Order of pole (given) = 0.5 0 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 0.3147 1.004 h = 0.0001 0.005 y[1] (numeric) = 2.93403402689 1.07026455848 y[1] (closed_form) = 2.93403373104 1.07024965336 absolute error = 1.491e-05 relative error = 0.0004773 % Correct digits = 5 Radius of convergence (given) for eq 1 = 2.523 Order of pole (given) = 0.5 0 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 0.3148 1.009 h = 0.0001 0.003 y[1] (numeric) = 2.93472516364 1.07555396666 y[1] (closed_form) = 2.9347247196 1.07553991579 absolute error = 1.406e-05 relative error = 0.0004498 % Correct digits = 5 Radius of convergence (given) for eq 1 = 2.525 Order of pole (given) = 0.5 0 NO 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=2248.1MB, alloc=52.3MB, time=27.38 x[1] = 0.3149 1.012 h = 0.001 0.001 y[1] (numeric) = 2.93518383731 1.07872311808 y[1] (closed_form) = 2.93518305924 1.07870912598 absolute error = 1.401e-05 relative error = 0.0004481 % Correct digits = 5 Radius of convergence (given) for eq 1 = 2.526 Order of pole (given) = 0.5 0 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 0.3159 1.013 h = 0.001 0.003 y[1] (numeric) = 2.93636186652 1.07966560733 y[1] (closed_form) = 2.93636093499 1.07965169973 absolute error = 1.394e-05 relative error = 0.0004455 % Correct digits = 5 Radius of convergence (given) for eq 1 = 2.528 Order of pole (given) = 0.5 0 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 0.3169 1.016 h = 0.0001 0.004 y[1] (numeric) = 2.93777520461 1.08272815153 y[1] (closed_form) = 2.93777459271 1.08271408458 absolute error = 1.408e-05 relative error = 0.0004497 % Correct digits = 5 Radius of convergence (given) for eq 1 = 2.53 Order of pole (given) = 0.5 0 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 0.317 1.02 h = 0.003 0.006 y[1] (numeric) = 2.93835391028 1.08695602108 y[1] (closed_form) = 2.93835355477 1.08694211729 absolute error = 1.391e-05 relative error = 0.0004439 % Correct digits = 5 Radius of convergence (given) for eq 1 = 2.532 Order of pole (given) = 0.5 0 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 0.32 1.026 h = 0.0001 0.005 y[1] (numeric) = 2.94224569947 1.09295929703 y[1] (closed_form) = 2.94224534197 1.09294406016 absolute error = 1.524e-05 relative error = 0.0004856 % Correct digits = 5 Radius of convergence (given) for eq 1 = 2.537 Order of pole (given) = 0.5 0 NO 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=2293.3MB, alloc=52.3MB, time=27.93 x[1] = 0.3201 1.031 h = 0.0001 0.003 y[1] (numeric) = 2.9429486149 1.09824376194 y[1] (closed_form) = 2.94294811138 1.09822937746 absolute error = 1.439e-05 relative error = 0.0004582 % Correct digits = 5 Radius of convergence (given) for eq 1 = 2.539 Order of pole (given) = 0.5 0 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 0.3202 1.034 h = 0.001 0.001 y[1] (numeric) = 2.94341431447 1.10140984861 y[1] (closed_form) = 2.9434134779 1.10139552345 absolute error = 1.435e-05 relative error = 0.0004566 % Correct digits = 5 Radius of convergence (given) for eq 1 = 2.54 Order of pole (given) = 0.5 0 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 0.3212 1.035 h = 0.001 0.003 y[1] (numeric) = 2.94459377358 1.10234902231 y[1] (closed_form) = 2.94459278411 1.10233478176 absolute error = 1.427e-05 relative error = 0.000454 % Correct digits = 5 Radius of convergence (given) for eq 1 = 2.541 Order of pole (given) = 0.5 0 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 0.3222 1.038 h = 0.0001 0.004 y[1] (numeric) = 2.94601328665 1.10540636698 y[1] (closed_form) = 2.94601261567 1.10539196682 absolute error = 1.442e-05 relative error = 0.0004581 % Correct digits = 5 Radius of convergence (given) for eq 1 = 2.544 Order of pole (given) = 0.5 0 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 0.3223 1.042 h = 0.003 0.006 y[1] (numeric) = 2.94660138195 1.10963022819 y[1] (closed_form) = 2.94660096704 1.10961599023 absolute error = 1.424e-05 relative error = 0.0004524 % Correct digits = 5 Radius of convergence (given) for eq 1 = 2.545 Order of pole (given) = 0.5 0 NO 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=2338.6MB, alloc=52.3MB, time=28.48 x[1] = 0.3253 1.048 h = 0.0001 0.005 y[1] (numeric) = 2.95050455743 1.1156207326 y[1] (closed_form) = 2.95050413777 1.11560516499 absolute error = 1.557e-05 relative error = 0.0004937 % Correct digits = 5 Radius of convergence (given) for eq 1 = 2.551 Order of pole (given) = 0.5 0 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 0.3254 1.053 h = 0.0001 0.003 y[1] (numeric) = 2.95121921112 1.12090024239 y[1] (closed_form) = 2.95121864757 1.12088552527 absolute error = 1.473e-05 relative error = 0.0004665 % Correct digits = 5 Radius of convergence (given) for eq 1 = 2.553 Order of pole (given) = 0.5 0 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 0.3255 1.056 h = 0.001 0.001 y[1] (numeric) = 2.95169191223 1.1240632576 y[1] (closed_form) = 2.9516910166 1.12404860034 absolute error = 1.468e-05 relative error = 0.0004649 % Correct digits = 5 Radius of convergence (given) for eq 1 = 2.554 Order of pole (given) = 0.5 0 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 0.3265 1.057 h = 0.001 0.003 y[1] (numeric) = 2.9528727907 1.1249991213 y[1] (closed_form) = 2.95287174275 1.12498454874 absolute error = 1.461e-05 relative error = 0.0004624 % Correct digits = 5 Radius of convergence (given) for eq 1 = 2.555 Order of pole (given) = 0.5 0 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 0.3275 1.06 h = 0.0001 0.004 y[1] (numeric) = 2.95429845216 1.128051267 y[1] (closed_form) = 2.95429772155 1.12803653459 absolute error = 1.475e-05 relative error = 0.0004664 % Correct digits = 5 Radius of convergence (given) for eq 1 = 2.558 Order of pole (given) = 0.5 0 NO 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=2383.9MB, alloc=52.3MB, time=29.04 x[1] = 0.3276 1.064 h = 0.003 0.006 y[1] (numeric) = 2.95489590472 1.13227111078 y[1] (closed_form) = 2.95489542986 1.13225653964 absolute error = 1.458e-05 relative error = 0.0004607 % Correct digits = 5 Radius of convergence (given) for eq 1 = 2.559 Order of pole (given) = 0.5 0 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 0.3306 1.07 h = 0.0001 0.005 y[1] (numeric) = 2.95881041096 1.13824885311 y[1] (closed_form) = 2.95880992864 1.13823295574 absolute error = 1.590e-05 relative error = 0.0005017 % Correct digits = 5 Radius of convergence (given) for eq 1 = 2.564 Order of pole (given) = 0.5 0 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 0.3307 1.075 h = 0.0001 0.003 y[1] (numeric) = 2.95953676261 1.14352339656 y[1] (closed_form) = 2.9595361385 1.14350834779 absolute error = 1.506e-05 relative error = 0.0004747 % Correct digits = 5 Radius of convergence (given) for eq 1 = 2.567 Order of pole (given) = 0.5 0 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 0.3308 1.078 h = 0.001 0.001 y[1] (numeric) = 2.96001644095 1.14668333399 y[1] (closed_form) = 2.96001548574 1.14666834559 absolute error = 1.502e-05 relative error = 0.0004731 % Correct digits = 5 Radius of convergence (given) for eq 1 = 2.568 Order of pole (given) = 0.5 0 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 0.3318 1.079 h = 0.0001 0.004 y[1] (numeric) = 2.96119872841 1.14761589335 y[1] (closed_form) = 2.96119762144 1.14760098974 absolute error = 1.494e-05 relative error = 0.0004706 % Correct digits = 5 Radius of convergence (given) for eq 1 = 2.569 Order of pole (given) = 0.5 0 NO 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=2429.2MB, alloc=52.3MB, time=29.59 x[1] = 0.3319 1.083 h = 0.003 0.006 y[1] (numeric) = 2.96180381574 1.15183245987 y[1] (closed_form) = 2.96180340603 1.15181763999 absolute error = 1.483e-05 relative error = 0.0004665 % Correct digits = 5 Radius of convergence (given) for eq 1 = 2.571 Order of pole (given) = 0.5 0 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 0.3349 1.089 h = 0.0001 0.005 y[1] (numeric) = 2.96572818288 1.15779935918 y[1] (closed_form) = 2.96572776342 1.15778321602 absolute error = 1.615e-05 relative error = 0.0005072 % Correct digits = 5 Radius of convergence (given) for eq 1 = 2.576 Order of pole (given) = 0.5 0 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 0.335 1.094 h = 0.0001 0.003 y[1] (numeric) = 2.96646463089 1.16306975799 y[1] (closed_form) = 2.96646407143 1.1630544618 absolute error = 1.531e-05 relative error = 0.0004804 % Correct digits = 5 Radius of convergence (given) for eq 1 = 2.579 Order of pole (given) = 0.5 0 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 0.3351 1.097 h = 0.001 0.001 y[1] (numeric) = 2.96695033236 1.16622712411 y[1] (closed_form) = 2.96694944263 1.16621188873 absolute error = 1.526e-05 relative error = 0.0004787 % Correct digits = 5 Radius of convergence (given) for eq 1 = 2.58 Order of pole (given) = 0.5 0 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 0.3361 1.098 h = 0.001 0.003 y[1] (numeric) = 2.96813386368 1.16715686043 y[1] (closed_form) = 2.96813282267 1.16714170991 absolute error = 1.519e-05 relative error = 0.0004762 % Correct digits = 5 Radius of convergence (given) for eq 1 = 2.581 Order of pole (given) = 0.5 0 NO 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=2474.6MB, alloc=52.3MB, time=30.14 x[1] = 0.3371 1.101 h = 0.0001 0.004 y[1] (numeric) = 2.96957095761 1.17019940727 y[1] (closed_form) = 2.96957023183 1.17018409648 absolute error = 1.533e-05 relative error = 0.0004802 % Correct digits = 5 Radius of convergence (given) for eq 1 = 2.583 Order of pole (given) = 0.5 0 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 0.3372 1.105 h = 0.003 0.006 y[1] (numeric) = 2.97018578412 1.17441186372 y[1] (closed_form) = 2.97018531345 1.17439671247 absolute error = 1.516e-05 relative error = 0.0004746 % Correct digits = 5 Radius of convergence (given) for eq 1 = 2.585 Order of pole (given) = 0.5 0 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 0.3402 1.111 h = 0.0001 0.005 y[1] (numeric) = 2.97412137989 1.18036601972 y[1] (closed_form) = 2.9741208969 1.18034954865 absolute error = 1.648e-05 relative error = 0.000515 % Correct digits = 5 Radius of convergence (given) for eq 1 = 2.591 Order of pole (given) = 0.5 0 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 0.3403 1.116 h = 0.0001 0.003 y[1] (numeric) = 2.97486945131 1.18563143253 y[1] (closed_form) = 2.97486883033 1.18561580651 absolute error = 1.564e-05 relative error = 0.0004883 % Correct digits = 5 Radius of convergence (given) for eq 1 = 2.593 Order of pole (given) = 0.5 0 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 0.3404 1.119 h = 0.001 0.001 y[1] (numeric) = 2.97536208505 1.18878570981 y[1] (closed_form) = 2.97536113479 1.18877014508 absolute error = 1.559e-05 relative error = 0.0004867 % Correct digits = 5 Radius of convergence (given) for eq 1 = 2.594 Order of pole (given) = 0.5 0 NO 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=2519.8MB, alloc=52.3MB, time=30.69 x[1] = 0.3414 1.12 h = 0.001 0.003 y[1] (numeric) = 2.97654700635 1.18971215246 y[1] (closed_form) = 2.97654590537 1.18969667267 absolute error = 1.552e-05 relative error = 0.0004841 % Correct digits = 5 Radius of convergence (given) for eq 1 = 2.595 Order of pole (given) = 0.5 0 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 0.3424 1.123 h = 0.0001 0.004 y[1] (numeric) = 2.97799017361 1.1927495036 y[1] (closed_form) = 2.97798938672 1.19273386334 absolute error = 1.566e-05 relative error = 0.0004882 % Correct digits = 5 Radius of convergence (given) for eq 1 = 2.598 Order of pole (given) = 0.5 0 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 0.3425 1.127 h = 0.003 0.006 y[1] (numeric) = 2.97861426541 1.19695791907 y[1] (closed_form) = 2.97861373328 1.19694243744 absolute error = 1.549e-05 relative error = 0.0004826 % Correct digits = 5 Radius of convergence (given) for eq 1 = 2.6 Order of pole (given) = 0.5 0 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 0.3455 1.133 h = 0.0001 0.005 y[1] (numeric) = 2.98256103572 1.20289934316 y[1] (closed_form) = 2.98256048875 1.2028825452 absolute error = 1.681e-05 relative error = 0.0005226 % Correct digits = 5 Radius of convergence (given) for eq 1 = 2.605 Order of pole (given) = 0.5 0 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 0.3456 1.138 h = 0.0001 0.003 y[1] (numeric) = 2.9833206906 1.20815976056 y[1] (closed_form) = 2.98332000761 1.20814380569 absolute error = 1.597e-05 relative error = 0.0004962 % Correct digits = 5 Radius of convergence (given) for eq 1 = 2.607 Order of pole (given) = 0.5 0 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 0.3457 1.141 h = 0.001 0.001 y[1] (numeric) = 2.98382023254 1.21131094373 y[1] (closed_form) = 2.98381922125 1.21129505061 absolute error = 1.593e-05 relative error = 0.0004945 % Correct digits = 5 memory used=2565.3MB, alloc=52.3MB, time=31.24 Radius of convergence (given) for eq 1 = 2.608 Order of pole (given) = 0.5 0 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 0.3467 1.142 h = 0.001 0.003 y[1] (numeric) = 2.98500653384 1.21223409866 y[1] (closed_form) = 2.9850053724 1.21221829055 absolute error = 1.585e-05 relative error = 0.000492 % Correct digits = 5 Radius of convergence (given) for eq 1 = 2.61 Order of pole (given) = 0.5 0 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 0.3477 1.145 h = 0.0001 0.004 y[1] (numeric) = 2.98645574857 1.21526625601 y[1] (closed_form) = 2.98645490009 1.21525028726 absolute error = 1.599e-05 relative error = 0.000496 % Correct digits = 5 Radius of convergence (given) for eq 1 = 2.612 Order of pole (given) = 0.5 0 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 0.3478 1.149 h = 0.003 0.006 y[1] (numeric) = 2.98708907369 1.21947062335 y[1] (closed_form) = 2.98708847959 1.21945481233 absolute error = 1.582e-05 relative error = 0.0004904 % Correct digits = 5 Radius of convergence (given) for eq 1 = 2.614 Order of pole (given) = 0.5 0 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 0.3508 1.155 h = 0.0001 0.005 y[1] (numeric) = 2.99104696496 1.2253993276 y[1] (closed_form) = 2.99104635359 1.22538220373 absolute error = 1.713e-05 relative error = 0.0005301 % Correct digits = 5 Radius of convergence (given) for eq 1 = 2.619 Order of pole (given) = 0.5 0 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 0.3509 1.16 h = 0.0001 0.003 y[1] (numeric) = 2.99181816347 1.23065474074 y[1] (closed_form) = 2.99181741802 1.230638458 absolute error = 1.630e-05 relative error = 0.0005039 % Correct digits = 5 Radius of convergence (given) for eq 1 = 2.622 Order of pole (given) = 0.5 0 NO 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=2610.7MB, alloc=52.3MB, time=31.80 x[1] = 0.351 1.163 h = 0.001 0.001 y[1] (numeric) = 2.99232458963 1.23380282489 y[1] (closed_form) = 2.99232351686 1.23378660436 absolute error = 1.626e-05 relative error = 0.0005022 % Correct digits = 5 Radius of convergence (given) for eq 1 = 2.623 Order of pole (given) = 0.5 0 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 0.352 1.164 h = 0.001 0.003 y[1] (numeric) = 2.99351226111 1.23472269815 y[1] (closed_form) = 2.99351103874 1.23470656268 absolute error = 1.618e-05 relative error = 0.0004997 % Correct digits = 5 Radius of convergence (given) for eq 1 = 2.624 Order of pole (given) = 0.5 0 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 0.353 1.167 h = 0.0001 0.004 y[1] (numeric) = 2.99496749765 1.23774966397 y[1] (closed_form) = 2.99496658712 1.2377333677 absolute error = 1.632e-05 relative error = 0.0005037 % Correct digits = 5 Radius of convergence (given) for eq 1 = 2.626 Order of pole (given) = 0.5 0 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 0.3531 1.171 h = 0.003 0.006 y[1] (numeric) = 2.99561002422 1.24194997649 y[1] (closed_form) = 2.99560936769 1.24193383706 absolute error = 1.615e-05 relative error = 0.0004981 % Correct digits = 5 Radius of convergence (given) for eq 1 = 2.628 Order of pole (given) = 0.5 0 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 0.3561 1.177 h = 0.0001 0.005 y[1] (numeric) = 2.99957898338 1.24786597359 y[1] (closed_form) = 2.9995783072 1.24784852481 absolute error = 1.746e-05 relative error = 0.0005375 % Correct digits = 5 Radius of convergence (given) for eq 1 = 2.634 Order of pole (given) = 0.5 0 NO 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=2656.0MB, alloc=52.3MB, time=32.36 x[1] = 0.3562 1.182 h = 0.0001 0.003 y[1] (numeric) = 3.00036168586 1.25311637424 y[1] (closed_form) = 3.0003608775 1.25309976462 absolute error = 1.663e-05 relative error = 0.0005114 % Correct digits = 5 Radius of convergence (given) for eq 1 = 2.636 Order of pole (given) = 0.5 0 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 0.3563 1.185 h = 0.001 0.001 y[1] (numeric) = 3.00087497235 1.2562613548 y[1] (closed_form) = 3.00087383764 1.25624480782 absolute error = 1.659e-05 relative error = 0.0005098 % Correct digits = 5 Radius of convergence (given) for eq 1 = 2.637 Order of pole (given) = 0.5 0 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 0.3573 1.186 h = 0.0001 0.004 y[1] (numeric) = 3.00206400434 1.25717795252 y[1] (closed_form) = 3.00206272058 1.25716149065 absolute error = 1.651e-05 relative error = 0.0005073 % Correct digits = 5 Radius of convergence (given) for eq 1 = 2.639 Order of pole (given) = 0.5 0 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 0.3574 1.19 h = 0.003 0.006 y[1] (numeric) = 3.00271403869 1.2613749587 y[1] (closed_form) = 3.00271344411 1.2613585731 absolute error = 1.640e-05 relative error = 0.0005034 % Correct digits = 5 Radius of convergence (given) for eq 1 = 2.641 Order of pole (given) = 0.5 0 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 0.3604 1.196 h = 0.0001 0.005 y[1] (numeric) = 3.00669263379 1.26728015955 y[1] (closed_form) = 3.00669201751 1.26726246757 absolute error = 1.770e-05 relative error = 0.0005426 % Correct digits = 5 Radius of convergence (given) for eq 1 = 2.646 Order of pole (given) = 0.5 0 NO 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=2701.3MB, alloc=52.3MB, time=32.91 x[1] = 0.3605 1.201 h = 0.0001 0.003 y[1] (numeric) = 3.00748526668 1.27252637583 y[1] (closed_form) = 3.00748451985 1.27250952133 absolute error = 1.687e-05 relative error = 0.0005166 % Correct digits = 5 Radius of convergence (given) for eq 1 = 2.648 Order of pole (given) = 0.5 0 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 0.3606 1.204 h = 0.001 0.001 y[1] (numeric) = 3.00800447628 1.27566876288 y[1] (closed_form) = 3.00800340394 1.2756519714 absolute error = 1.683e-05 relative error = 0.000515 % Correct digits = 5 Radius of convergence (given) for eq 1 = 2.65 Order of pole (given) = 0.5 0 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 0.3616 1.205 h = 0.001 0.003 y[1] (numeric) = 3.00919471063 1.27658256215 y[1] (closed_form) = 3.0091934897 1.27656585582 absolute error = 1.675e-05 relative error = 0.0005125 % Correct digits = 5 Radius of convergence (given) for eq 1 = 2.651 Order of pole (given) = 0.5 0 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 0.3626 1.208 h = 0.0001 0.004 y[1] (numeric) = 3.01066114649 1.27959994587 y[1] (closed_form) = 3.01066023533 1.27958307847 absolute error = 1.689e-05 relative error = 0.0005164 % Correct digits = 5 Radius of convergence (given) for eq 1 = 2.654 Order of pole (given) = 0.5 0 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 0.3627 1.212 h = 0.003 0.006 y[1] (numeric) = 3.01132075889 1.28379280583 y[1] (closed_form) = 3.01132010103 1.28377609365 absolute error = 1.673e-05 relative error = 0.0005109 % Correct digits = 5 Radius of convergence (given) for eq 1 = 2.655 Order of pole (given) = 0.5 0 NO 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=2746.7MB, alloc=52.3MB, time=33.46 x[1] = 0.3657 1.218 h = 0.0001 0.005 y[1] (numeric) = 3.01531032437 1.28968532416 y[1] (closed_form) = 3.01530964254 1.28966730912 absolute error = 1.803e-05 relative error = 0.0005497 % Correct digits = 5 Radius of convergence (given) for eq 1 = 2.661 Order of pole (given) = 0.5 0 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 0.3658 1.223 h = 0.0001 0.003 y[1] (numeric) = 3.0161143879 1.29492651366 y[1] (closed_form) = 3.01611357735 1.2949093341 absolute error = 1.720e-05 relative error = 0.000524 % Correct digits = 5 Radius of convergence (given) for eq 1 = 2.663 Order of pole (given) = 0.5 0 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 0.3659 1.226 h = 0.001 0.001 y[1] (numeric) = 3.01664041367 1.29806578927 y[1] (closed_form) = 3.01663927858 1.29804867313 absolute error = 1.715e-05 relative error = 0.0005223 % Correct digits = 5 Radius of convergence (given) for eq 1 = 2.665 Order of pole (given) = 0.5 0 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 0.3669 1.227 h = 0.001 0.003 y[1] (numeric) = 3.01783199083 1.29897632453 y[1] (closed_form) = 3.0178307077 1.29895929357 absolute error = 1.708e-05 relative error = 0.0005198 % Correct digits = 5 Radius of convergence (given) for eq 1 = 2.666 Order of pole (given) = 0.5 0 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 0.3679 1.23 h = 0.0001 0.004 y[1] (numeric) = 3.01930437616 1.30198852462 y[1] (closed_form) = 3.01930340169 1.30197133249 absolute error = 1.722e-05 relative error = 0.0005237 % Correct digits = 5 Radius of convergence (given) for eq 1 = 2.668 Order of pole (given) = 0.5 0 NO 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=2792.1MB, alloc=52.3MB, time=34.01 x[1] = 0.368 1.234 h = 0.003 0.006 y[1] (numeric) = 3.0199730996 1.30617731282 y[1] (closed_form) = 3.01997237803 1.30616027504 absolute error = 1.705e-05 relative error = 0.0005183 % Correct digits = 5 Radius of convergence (given) for eq 1 = 2.67 Order of pole (given) = 0.5 0 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 0.371 1.24 h = 0.0001 0.005 y[1] (numeric) = 3.02397358387 1.31205716305 y[1] (closed_form) = 3.02397283612 1.31203882593 absolute error = 1.835e-05 relative error = 0.0005567 % Correct digits = 5 Radius of convergence (given) for eq 1 = 2.676 Order of pole (given) = 0.5 0 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 0.3711 1.245 h = 0.0001 0.003 y[1] (numeric) = 3.02478903883 1.31729331913 y[1] (closed_form) = 3.02478816414 1.31727581549 absolute error = 1.753e-05 relative error = 0.0005312 % Correct digits = 5 Radius of convergence (given) for eq 1 = 2.678 Order of pole (given) = 0.5 0 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 0.3712 1.248 h = 0.001 0.001 y[1] (numeric) = 3.02532185716 1.32042947971 y[1] (closed_form) = 3.02532065892 1.32041203988 absolute error = 1.748e-05 relative error = 0.0005296 % Correct digits = 5 Radius of convergence (given) for eq 1 = 2.68 Order of pole (given) = 0.5 0 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 0.3722 1.249 h = 0.001 0.003 y[1] (numeric) = 3.02651476786 1.32133675732 y[1] (closed_form) = 3.02651342212 1.3213194027 absolute error = 1.741e-05 relative error = 0.0005271 % Correct digits = 5 Radius of convergence (given) for eq 1 = 2.681 Order of pole (given) = 0.5 0 NO 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=2837.5MB, alloc=52.3MB, time=34.56 x[1] = 0.3732 1.252 h = 0.0001 0.004 y[1] (numeric) = 3.02799307776 1.32434377727 y[1] (closed_form) = 3.02799203958 1.32432626136 absolute error = 1.755e-05 relative error = 0.0005309 % Correct digits = 5 Radius of convergence (given) for eq 1 = 2.683 Order of pole (given) = 0.5 0 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 0.3733 1.256 h = 0.003 0.006 y[1] (numeric) = 3.02867088089 1.32852848875 y[1] (closed_form) = 3.02867009519 1.32851112636 absolute error = 1.738e-05 relative error = 0.0005255 % Correct digits = 5 Radius of convergence (given) for eq 1 = 2.685 Order of pole (given) = 0.5 0 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 0.3763 1.262 h = 0.0001 0.005 y[1] (numeric) = 3.03268223289 1.33439568587 y[1] (closed_form) = 3.03268141887 1.33437702766 absolute error = 1.868e-05 relative error = 0.0005637 % Correct digits = 5 Radius of convergence (given) for eq 1 = 2.691 Order of pole (given) = 0.5 0 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 0.3764 1.267 h = 0.0001 0.003 y[1] (numeric) = 3.03350904022 1.33962680245 y[1] (closed_form) = 3.03350810102 1.3396089757 absolute error = 1.785e-05 relative error = 0.0005383 % Correct digits = 5 Radius of convergence (given) for eq 1 = 2.693 Order of pole (given) = 0.5 0 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 0.3765 1.27 h = 0.001 0.001 y[1] (numeric) = 3.03404862761 1.34275984473 y[1] (closed_form) = 3.03404736583 1.34274208216 absolute error = 1.781e-05 relative error = 0.0005367 % Correct digits = 5 Radius of convergence (given) for eq 1 = 2.695 Order of pole (given) = 0.5 0 NO 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=2882.8MB, alloc=52.3MB, time=35.12 x[1] = 0.3775 1.271 h = 0.001 0.003 y[1] (numeric) = 3.03524286272 1.34366387114 y[1] (closed_form) = 3.03524145398 1.34364619381 absolute error = 1.773e-05 relative error = 0.0005342 % Correct digits = 5 Radius of convergence (given) for eq 1 = 2.696 Order of pole (given) = 0.5 0 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 0.3785 1.274 h = 0.0001 0.004 y[1] (numeric) = 3.03672707252 1.3466657147 y[1] (closed_form) = 3.03672597024 1.34664787599 absolute error = 1.787e-05 relative error = 0.000538 % Correct digits = 5 Radius of convergence (given) for eq 1 = 2.698 Order of pole (given) = 0.5 0 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 0.3786 1.278 h = 0.003 0.006 y[1] (numeric) = 3.0374139241 1.35084634497 y[1] (closed_form) = 3.03741307388 1.35082865895 absolute error = 1.771e-05 relative error = 0.0005326 % Correct digits = 5 Radius of convergence (given) for eq 1 = 2.7 Order of pole (given) = 0.5 0 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 0.3816 1.284 h = 0.0001 0.005 y[1] (numeric) = 3.0414360933 1.35670090451 y[1] (closed_form) = 3.04143521267 1.35668192619 absolute error = 1.900e-05 relative error = 0.0005705 % Correct digits = 5 Radius of convergence (given) for eq 1 = 2.706 Order of pole (given) = 0.5 0 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 0.3817 1.289 h = 0.0001 0.003 y[1] (numeric) = 3.04227421413 1.36192697604 y[1] (closed_form) = 3.04227321002 1.36190882716 absolute error = 1.818e-05 relative error = 0.0005453 % Correct digits = 5 Radius of convergence (given) for eq 1 = 2.708 Order of pole (given) = 0.5 0 NO 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=2928.1MB, alloc=52.3MB, time=35.67 x[1] = 0.3818 1.292 h = 0.001 0.001 y[1] (numeric) = 3.04282054719 1.36505689705 y[1] (closed_form) = 3.04281922148 1.36503881272 absolute error = 1.813e-05 relative error = 0.0005437 % Correct digits = 5 Radius of convergence (given) for eq 1 = 2.71 Order of pole (given) = 0.5 0 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 0.3828 1.293 h = 0.0001 0.004 y[1] (numeric) = 3.04401609773 1.36595767879 y[1] (closed_form) = 3.0440146256 1.36593967971 absolute error = 1.806e-05 relative error = 0.0005413 % Correct digits = 5 Radius of convergence (given) for eq 1 = 2.711 Order of pole (given) = 0.5 0 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 0.3829 1.297 h = 0.003 0.006 y[1] (numeric) = 3.0447103325 1.37013498248 y[1] (closed_form) = 3.04470954128 1.37011705297 absolute error = 1.795e-05 relative error = 0.0005375 % Correct digits = 5 Radius of convergence (given) for eq 1 = 2.713 Order of pole (given) = 0.5 0 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 0.3859 1.303 h = 0.0001 0.005 y[1] (numeric) = 3.04874192298 1.37597880491 y[1] (closed_form) = 3.04874109955 1.37595958611 absolute error = 1.924e-05 relative error = 0.0005751 % Correct digits = 5 Radius of convergence (given) for eq 1 = 2.719 Order of pole (given) = 0.5 0 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 0.386 1.308 h = 0.0001 0.003 y[1] (numeric) = 3.04958981127 1.38120066392 y[1] (closed_form) = 3.04958886585 1.38118227283 absolute error = 1.842e-05 relative error = 0.0005501 % Correct digits = 5 Radius of convergence (given) for eq 1 = 2.721 Order of pole (given) = 0.5 0 NO 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=2973.3MB, alloc=52.3MB, time=36.22 x[1] = 0.3861 1.311 h = 0.001 0.001 y[1] (numeric) = 3.05014196937 1.38432797611 y[1] (closed_form) = 3.05014070317 1.38430964988 absolute error = 1.837e-05 relative error = 0.0005484 % Correct digits = 5 Radius of convergence (given) for eq 1 = 2.723 Order of pole (given) = 0.5 0 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 0.3871 1.312 h = 0.001 0.003 y[1] (numeric) = 3.05133868363 1.38522598574 y[1] (closed_form) = 3.05133727147 1.38520774477 absolute error = 1.830e-05 relative error = 0.000546 % Correct digits = 5 Radius of convergence (given) for eq 1 = 2.724 Order of pole (given) = 0.5 0 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 0.3881 1.315 h = 0.0001 0.004 y[1] (numeric) = 3.05283386833 1.38821827781 y[1] (closed_form) = 3.0528327606 1.38819987533 absolute error = 1.844e-05 relative error = 0.0005497 % Correct digits = 5 Radius of convergence (given) for eq 1 = 2.726 Order of pole (given) = 0.5 0 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 0.3882 1.319 h = 0.003 0.006 y[1] (numeric) = 3.05353752308 1.39239141026 y[1] (closed_form) = 3.05353666662 1.39237315893 absolute error = 1.827e-05 relative error = 0.0005444 % Correct digits = 5 Radius of convergence (given) for eq 1 = 2.728 Order of pole (given) = 0.5 0 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 0.3912 1.325 h = 0.0001 0.005 y[1] (numeric) = 3.0575798379 1.39822262482 y[1] (closed_form) = 3.05757894726 1.39820308774 absolute error = 1.956e-05 relative error = 0.0005817 % Correct digits = 5 Radius of convergence (given) for eq 1 = 2.734 Order of pole (given) = 0.5 0 NO 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=3018.6MB, alloc=52.3MB, time=36.77 x[1] = 0.3913 1.33 h = 0.0001 0.003 y[1] (numeric) = 3.05843896789 1.40343942937 y[1] (closed_form) = 3.05843795689 1.40342071796 absolute error = 1.874e-05 relative error = 0.0005569 % Correct digits = 5 Radius of convergence (given) for eq 1 = 2.736 Order of pole (given) = 0.5 0 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 0.3914 1.333 h = 0.001 0.001 y[1] (numeric) = 3.05899782847 1.40656361536 y[1] (closed_form) = 3.05899649767 1.40654496915 absolute error = 1.869e-05 relative error = 0.0005552 % Correct digits = 5 Radius of convergence (given) for eq 1 = 2.738 Order of pole (given) = 0.5 0 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 0.3924 1.334 h = 0.001 0.003 y[1] (numeric) = 3.06019584173 1.40745839253 y[1] (closed_form) = 3.0601943655 1.40743983157 absolute error = 1.862e-05 relative error = 0.0005528 % Correct digits = 5 Radius of convergence (given) for eq 1 = 2.739 Order of pole (given) = 0.5 0 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 0.3934 1.337 h = 0.0001 0.004 y[1] (numeric) = 3.0616968568 1.41044552023 y[1] (closed_form) = 3.06169568393 1.41042679773 absolute error = 1.876e-05 relative error = 0.0005565 % Correct digits = 5 Radius of convergence (given) for eq 1 = 2.742 Order of pole (given) = 0.5 0 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 0.3935 1.341 h = 0.003 0.006 y[1] (numeric) = 3.06240947153 1.41461456051 y[1] (closed_form) = 3.06240854949 1.41459598835 absolute error = 1.860e-05 relative error = 0.0005512 % Correct digits = 5 Radius of convergence (given) for eq 1 = 2.744 Order of pole (given) = 0.5 0 NO 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=3063.9MB, alloc=52.3MB, time=37.32 x[1] = 0.3965 1.347 h = 0.0001 0.005 y[1] (numeric) = 3.06646246164 1.42043318424 y[1] (closed_form) = 3.06646150348 1.42041332986 absolute error = 1.988e-05 relative error = 0.0005882 % Correct digits = 5 Radius of convergence (given) for eq 1 = 2.749 Order of pole (given) = 0.5 0 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 0.3966 1.352 h = 0.0001 0.003 y[1] (numeric) = 3.06733279497 1.42564493024 y[1] (closed_form) = 3.06733171808 1.42562589949 absolute error = 1.906e-05 relative error = 0.0005635 % Correct digits = 5 Radius of convergence (given) for eq 1 = 2.752 Order of pole (given) = 0.5 0 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 0.3967 1.355 h = 0.001 0.001 y[1] (numeric) = 3.06789833498 1.42876598795 y[1] (closed_form) = 3.06789693925 1.42874702271 absolute error = 1.902e-05 relative error = 0.0005619 % Correct digits = 5 Radius of convergence (given) for eq 1 = 2.753 Order of pole (given) = 0.5 0 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 0.3977 1.356 h = 0.001 0.003 y[1] (numeric) = 3.06909763864 1.42965753937 y[1] (closed_form) = 3.069096098 1.42963865938 absolute error = 1.894e-05 relative error = 0.0005595 % Correct digits = 5 Radius of convergence (given) for eq 1 = 2.755 Order of pole (given) = 0.5 0 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 0.3987 1.359 h = 0.0001 0.004 y[1] (numeric) = 3.07060446022 1.43263950753 y[1] (closed_form) = 3.07060322187 1.43262046596 absolute error = 1.908e-05 relative error = 0.0005632 % Correct digits = 5 Radius of convergence (given) for eq 1 = 2.757 Order of pole (given) = 0.5 0 NO 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=3109.2MB, alloc=52.3MB, time=37.86 x[1] = 0.3988 1.363 h = 0.003 0.006 y[1] (numeric) = 3.07132600427 1.43680445271 y[1] (closed_form) = 3.0713250163 1.43678556069 absolute error = 1.892e-05 relative error = 0.0005579 % Correct digits = 5 Radius of convergence (given) for eq 1 = 2.759 Order of pole (given) = 0.5 0 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 0.4018 1.369 h = 0.0001 0.005 y[1] (numeric) = 3.07538962113 1.44261050311 y[1] (closed_form) = 3.07538859517 1.44259033241 absolute error = 2.020e-05 relative error = 0.0005946 % Correct digits = 5 Radius of convergence (given) for eq 1 = 2.765 Order of pole (given) = 0.5 0 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 0.4019 1.374 h = 0.0001 0.003 y[1] (numeric) = 3.07627111965 1.44781718698 y[1] (closed_form) = 3.07626997654 1.44779783785 absolute error = 1.938e-05 relative error = 0.0005701 % Correct digits = 5 Radius of convergence (given) for eq 1 = 2.767 Order of pole (given) = 0.5 0 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 0.402 1.377 h = 0.001 0.001 y[1] (numeric) = 3.07684331615 1.45093511461 y[1] (closed_form) = 3.07684185516 1.45091583131 absolute error = 1.934e-05 relative error = 0.0005685 % Correct digits = 5 Radius of convergence (given) for eq 1 = 2.769 Order of pole (given) = 0.5 0 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 0.403 1.378 h = 0.001 0.003 y[1] (numeric) = 3.07804390176 1.45182344706 y[1] (closed_form) = 3.07804229639 1.45180424899 absolute error = 1.927e-05 relative error = 0.0005661 % Correct digits = 5 Radius of convergence (given) for eq 1 = 2.77 Order of pole (given) = 0.5 0 NO 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=3154.5MB, alloc=52.3MB, time=38.42 x[1] = 0.404 1.381 h = 0.0001 0.004 y[1] (numeric) = 3.07955650617 1.45480026077 y[1] (closed_form) = 3.07955520202 1.4547809011 absolute error = 1.940e-05 relative error = 0.0005697 % Correct digits = 5 Radius of convergence (given) for eq 1 = 2.772 Order of pole (given) = 0.5 0 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 0.4041 1.385 h = 0.003 0.006 y[1] (numeric) = 3.08028694905 1.45896110832 y[1] (closed_form) = 3.08028589483 1.45894189742 absolute error = 1.924e-05 relative error = 0.0005645 % Correct digits = 5 Radius of convergence (given) for eq 1 = 2.775 Order of pole (given) = 0.5 0 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 0.4071 1.391 h = 0.0001 0.005 y[1] (numeric) = 3.08436114466 1.46475460338 y[1] (closed_form) = 3.08436005063 1.46473411733 absolute error = 2.052e-05 relative error = 0.0006008 % Correct digits = 5 Radius of convergence (given) for eq 1 = 2.78 Order of pole (given) = 0.5 0 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 0.4072 1.396 h = 0.0001 0.003 y[1] (numeric) = 3.08525377041 1.469956222 y[1] (closed_form) = 3.08525256076 1.46993655546 absolute error = 1.970e-05 relative error = 0.0005765 % Correct digits = 5 Radius of convergence (given) for eq 1 = 2.783 Order of pole (given) = 0.5 0 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 0.4073 1.399 h = 0.001 0.001 y[1] (numeric) = 3.08583260058 1.47307101806 y[1] (closed_form) = 3.08583107403 1.47305141763 absolute error = 1.966e-05 relative error = 0.0005749 % Correct digits = 5 Radius of convergence (given) for eq 1 = 2.784 Order of pole (given) = 0.5 0 NO 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=3199.7MB, alloc=52.3MB, time=38.97 x[1] = 0.4083 1.4 h = 0.003 0.006 y[1] (numeric) = 3.08703445981 1.47395613836 y[1] (closed_form) = 3.0870327894 1.47393662316 absolute error = 1.959e-05 relative error = 0.0005726 % Correct digits = 5 Radius of convergence (given) for eq 1 = 2.786 Order of pole (given) = 0.5 0 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 0.4113 1.406 h = 0.0001 0.005 y[1] (numeric) = 3.09111452315 1.47974112486 y[1] (closed_form) = 3.09111387772 1.4797199545 absolute error = 2.118e-05 relative error = 0.000618 % Correct digits = 5 Radius of convergence (given) for eq 1 = 2.791 Order of pole (given) = 0.5 0 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 0.4114 1.411 h = 0.0001 0.003 y[1] (numeric) = 3.09201465358 1.48493897841 y[1] (closed_form) = 3.09201389353 1.48491862611 absolute error = 2.037e-05 relative error = 0.0005938 % Correct digits = 5 Radius of convergence (given) for eq 1 = 2.794 Order of pole (given) = 0.5 0 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 0.4115 1.414 h = 0.001 0.001 y[1] (numeric) = 3.09259795488 1.48805145315 y[1] (closed_form) = 3.09259687858 1.48803116713 absolute error = 2.031e-05 relative error = 0.0005919 % Correct digits = 5 Radius of convergence (given) for eq 1 = 2.795 Order of pole (given) = 0.5 0 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 0.4125 1.415 h = 0.001 0.003 y[1] (numeric) = 3.09380060474 1.48893433602 y[1] (closed_form) = 3.09379938494 1.4889141352 absolute error = 2.024e-05 relative error = 0.0005894 % Correct digits = 5 Radius of convergence (given) for eq 1 = 2.797 Order of pole (given) = 0.5 0 NO 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=3245.0MB, alloc=52.3MB, time=39.52 x[1] = 0.4135 1.418 h = 0.0001 0.004 y[1] (numeric) = 3.09532278729 1.49190231743 y[1] (closed_form) = 3.09532186693 1.49188195503 absolute error = 2.038e-05 relative error = 0.0005932 % Correct digits = 5 Radius of convergence (given) for eq 1 = 2.799 Order of pole (given) = 0.5 0 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 0.4136 1.422 h = 0.003 0.006 y[1] (numeric) = 3.09606807836 1.49605602146 y[1] (closed_form) = 3.09606740712 1.49603580653 absolute error = 2.023e-05 relative error = 0.0005882 % Correct digits = 5 Radius of convergence (given) for eq 1 = 2.801 Order of pole (given) = 0.5 0 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 0.4166 1.428 h = 0.0001 0.005 y[1] (numeric) = 3.10015970697 1.50182810269 y[1] (closed_form) = 3.10015899306 1.50180661862 absolute error = 2.150e-05 relative error = 0.000624 % Correct digits = 5 Radius of convergence (given) for eq 1 = 2.807 Order of pole (given) = 0.5 0 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 0.4167 1.433 h = 0.0001 0.003 y[1] (numeric) = 3.10107090097 1.50702088774 y[1] (closed_form) = 3.10107007392 1.50700021966 absolute error = 2.068e-05 relative error = 0.0005999 % Correct digits = 5 Radius of convergence (given) for eq 1 = 2.81 Order of pole (given) = 0.5 0 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 0.4168 1.436 h = 0.001 0.001 y[1] (numeric) = 3.1016607977 1.51013022957 y[1] (closed_form) = 3.10165965537 1.51010962805 absolute error = 2.063e-05 relative error = 0.0005981 % Correct digits = 5 Radius of convergence (given) for eq 1 = 2.811 Order of pole (given) = 0.5 0 NO 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=3290.4MB, alloc=52.3MB, time=40.07 x[1] = 0.4178 1.437 h = 0.001 0.003 y[1] (numeric) = 3.10286470762 1.51100991216 y[1] (closed_form) = 3.1028634223 1.51098939581 absolute error = 2.056e-05 relative error = 0.0005956 % Correct digits = 5 Radius of convergence (given) for eq 1 = 2.813 Order of pole (given) = 0.5 0 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 0.4188 1.44 h = 0.0001 0.004 y[1] (numeric) = 3.10439261057 1.51397275459 y[1] (closed_form) = 3.10439162364 1.51395207667 absolute error = 2.070e-05 relative error = 0.0005994 % Correct digits = 5 Radius of convergence (given) for eq 1 = 2.815 Order of pole (given) = 0.5 0 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 0.4189 1.444 h = 0.003 0.006 y[1] (numeric) = 3.1051467193 1.51812235678 y[1] (closed_form) = 3.10514598102 1.51810182558 absolute error = 2.054e-05 relative error = 0.0005944 % Correct digits = 5 Radius of convergence (given) for eq 1 = 2.817 Order of pole (given) = 0.5 0 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 0.4219 1.45 h = 0.0001 0.005 y[1] (numeric) = 3.10924880063 1.52388193441 y[1] (closed_form) = 3.10924801801 1.5238601376 absolute error = 2.181e-05 relative error = 0.0006299 % Correct digits = 5 Radius of convergence (given) for eq 1 = 2.823 Order of pole (given) = 0.5 0 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 0.422 1.455 h = 0.0001 0.003 y[1] (numeric) = 3.1101710208 1.52906964908 y[1] (closed_form) = 3.11017012649 1.52904866619 absolute error = 2.100e-05 relative error = 0.000606 % Correct digits = 5 Radius of convergence (given) for eq 1 = 2.825 Order of pole (given) = 0.5 0 NO 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=3335.7MB, alloc=52.3MB, time=40.62 x[1] = 0.4221 1.458 h = 0.001 0.001 y[1] (numeric) = 3.11076749049 1.53217585723 y[1] (closed_form) = 3.11076628186 1.53215494116 absolute error = 2.095e-05 relative error = 0.0006042 % Correct digits = 5 Radius of convergence (given) for eq 1 = 2.827 Order of pole (given) = 0.5 0 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 0.4231 1.459 h = 0.001 0.003 y[1] (numeric) = 3.1119726525 1.53305234652 y[1] (closed_form) = 3.11197130139 1.53303151558 absolute error = 2.087e-05 relative error = 0.0006017 % Correct digits = 5 Radius of convergence (given) for eq 1 = 2.828 Order of pole (given) = 0.5 0 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 0.4241 1.462 h = 0.0001 0.004 y[1] (numeric) = 3.11350625298 1.53601005593 y[1] (closed_form) = 3.11350519921 1.53598906345 absolute error = 2.102e-05 relative error = 0.0006054 % Correct digits = 5 Radius of convergence (given) for eq 1 = 2.831 Order of pole (given) = 0.5 0 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 0.4242 1.466 h = 0.003 0.006 y[1] (numeric) = 3.11426914949 1.54015555512 y[1] (closed_form) = 3.1142683439 1.54013470861 absolute error = 2.086e-05 relative error = 0.0006005 % Correct digits = 5 Radius of convergence (given) for eq 1 = 2.833 Order of pole (given) = 0.5 0 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 0.4272 1.472 h = 0.0001 0.005 y[1] (numeric) = 3.11838163744 1.54590264873 y[1] (closed_form) = 3.11838078588 1.54588054014 absolute error = 2.212e-05 relative error = 0.0006357 % Correct digits = 5 Radius of convergence (given) for eq 1 = 2.839 Order of pole (given) = 0.5 0 NO 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=3381.1MB, alloc=52.3MB, time=41.17 x[1] = 0.4273 1.477 h = 0.0001 0.003 y[1] (numeric) = 3.11931484658 1.55108529158 y[1] (closed_form) = 3.11931388476 1.55106399483 absolute error = 2.132e-05 relative error = 0.000612 % Correct digits = 5 Radius of convergence (given) for eq 1 = 2.841 Order of pole (given) = 0.5 0 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 0.4274 1.48 h = 0.001 0.001 y[1] (numeric) = 3.11991786692 1.55418836556 y[1] (closed_form) = 3.11991659172 1.55416713587 absolute error = 2.127e-05 relative error = 0.0006102 % Correct digits = 5 Radius of convergence (given) for eq 1 = 2.843 Order of pole (given) = 0.5 0 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 0.4284 1.481 h = 0.0001 0.004 y[1] (numeric) = 3.12112427318 1.55506166856 y[1] (closed_form) = 3.12112285601 1.55504052397 absolute error = 2.119e-05 relative error = 0.0006077 % Correct digits = 5 Radius of convergence (given) for eq 1 = 2.844 Order of pole (given) = 0.5 0 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 0.4285 1.485 h = 0.003 0.006 y[1] (numeric) = 3.12189434075 1.55920382536 y[1] (closed_form) = 3.12189358962 1.55918274028 absolute error = 2.110e-05 relative error = 0.0006046 % Correct digits = 5 Radius of convergence (given) for eq 1 = 2.847 Order of pole (given) = 0.5 0 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 0.4315 1.491 h = 0.0001 0.005 y[1] (numeric) = 3.12601589824 1.56494031237 y[1] (closed_form) = 3.12601509972 1.56491796822 absolute error = 2.236e-05 relative error = 0.0006396 % Correct digits = 5 Radius of convergence (given) for eq 1 = 2.852 Order of pole (given) = 0.5 0 NO 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=3426.5MB, alloc=52.3MB, time=41.73 x[1] = 0.4316 1.496 h = 0.0001 0.003 y[1] (numeric) = 3.12695859714 1.57011871905 y[1] (closed_form) = 3.12695768958 1.57009718498 absolute error = 2.155e-05 relative error = 0.000616 % Correct digits = 5 Radius of convergence (given) for eq 1 = 2.855 Order of pole (given) = 0.5 0 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 0.4317 1.499 h = 0.001 0.001 y[1] (numeric) = 3.12756727559 1.57321917269 y[1] (closed_form) = 3.12756605548 1.57319770589 absolute error = 2.150e-05 relative error = 0.0006142 % Correct digits = 5 Radius of convergence (given) for eq 1 = 2.857 Order of pole (given) = 0.5 0 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 0.4327 1.5 h = 0.001 0.003 y[1] (numeric) = 3.12877478452 1.5740897534 y[1] (closed_form) = 3.12877342287 1.57406837166 absolute error = 2.143e-05 relative error = 0.0006117 % Correct digits = 5 Radius of convergence (given) for eq 1 = 2.858 Order of pole (given) = 0.5 0 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 0.4337 1.503 h = 0.0001 0.004 y[1] (numeric) = 3.13031898752 1.57703799536 y[1] (closed_form) = 3.1303179213 1.57701645215 absolute error = 2.157e-05 relative error = 0.0006154 % Correct digits = 5 Radius of convergence (given) for eq 1 = 2.86 Order of pole (given) = 0.5 0 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 0.4338 1.507 h = 0.003 0.006 y[1] (numeric) = 3.13109820602 1.58117596172 y[1] (closed_form) = 3.13109738708 1.58115456311 absolute error = 2.141e-05 relative error = 0.0006105 % Correct digits = 5 Radius of convergence (given) for eq 1 = 2.863 Order of pole (given) = 0.5 0 NO 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=3471.9MB, alloc=52.3MB, time=42.28 x[1] = 0.4368 1.513 h = 0.0001 0.005 y[1] (numeric) = 3.13523008544 1.5869000017 y[1] (closed_form) = 3.13522921759 1.58687734755 absolute error = 2.267e-05 relative error = 0.0006452 % Correct digits = 5 Radius of convergence (given) for eq 1 = 2.868 Order of pole (given) = 0.5 0 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 0.4369 1.518 h = 0.0001 0.003 y[1] (numeric) = 3.13618370469 1.5920733346 y[1] (closed_form) = 3.13618272916 1.59205148844 absolute error = 2.187e-05 relative error = 0.0006218 % Correct digits = 5 Radius of convergence (given) for eq 1 = 2.871 Order of pole (given) = 0.5 0 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 0.437 1.521 h = 0.001 0.001 y[1] (numeric) = 3.13679889257 1.59517065354 y[1] (closed_form) = 3.13679760543 1.59514887488 absolute error = 2.182e-05 relative error = 0.00062 % Correct digits = 5 Radius of convergence (given) for eq 1 = 2.873 Order of pole (given) = 0.5 0 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 0.438 1.522 h = 0.001 0.003 y[1] (numeric) = 3.13800763143 1.59603806105 y[1] (closed_form) = 3.13800620325 1.59601636741 absolute error = 2.174e-05 relative error = 0.0006175 % Correct digits = 5 Radius of convergence (given) for eq 1 = 2.874 Order of pole (given) = 0.5 0 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 0.439 1.525 h = 0.0001 0.004 y[1] (numeric) = 3.13955746755 1.59898118804 y[1] (closed_form) = 3.13955633378 1.59895933298 absolute error = 2.188e-05 relative error = 0.0006211 % Correct digits = 5 Radius of convergence (given) for eq 1 = 2.877 Order of pole (given) = 0.5 0 NO 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=3517.3MB, alloc=52.3MB, time=42.83 x[1] = 0.4391 1.529 h = 0.003 0.006 y[1] (numeric) = 3.14034538933 1.60311504957 y[1] (closed_form) = 3.14034450235 1.6030933384 absolute error = 2.173e-05 relative error = 0.0006163 % Correct digits = 5 Radius of convergence (given) for eq 1 = 2.879 Order of pole (given) = 0.5 0 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 0.4421 1.535 h = 0.0001 0.005 y[1] (numeric) = 3.14448754603 1.60882666326 y[1] (closed_form) = 3.14448660864 1.60880370005 absolute error = 2.298e-05 relative error = 0.0006507 % Correct digits = 5 Radius of convergence (given) for eq 1 = 2.884 Order of pole (given) = 0.5 0 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 0.4422 1.54 h = 0.0001 0.003 y[1] (numeric) = 3.14545204905 1.61399492215 y[1] (closed_form) = 3.14545100532 1.61397276485 absolute error = 2.218e-05 relative error = 0.0006274 % Correct digits = 5 Radius of convergence (given) for eq 1 = 2.887 Order of pole (given) = 0.5 0 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 0.4423 1.543 h = 0.001 0.001 y[1] (numeric) = 3.1460737244 1.6170891066 y[1] (closed_form) = 3.14607237 1.61706701702 absolute error = 2.213e-05 relative error = 0.0006256 % Correct digits = 5 Radius of convergence (given) for eq 1 = 2.889 Order of pole (given) = 0.5 0 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 0.4433 1.544 h = 0.001 0.003 y[1] (numeric) = 3.1472836857 1.61795334808 y[1] (closed_form) = 3.14728219076 1.61793134345 absolute error = 2.206e-05 relative error = 0.0006232 % Correct digits = 5 Radius of convergence (given) for eq 1 = 2.89 Order of pole (given) = 0.5 0 NO 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=3562.5MB, alloc=52.3MB, time=43.38 x[1] = 0.4443 1.547 h = 0.0001 0.004 y[1] (numeric) = 3.14883913287 1.62089136691 y[1] (closed_form) = 3.14883793132 1.62086920094 absolute error = 2.220e-05 relative error = 0.0006268 % Correct digits = 5 Radius of convergence (given) for eq 1 = 2.893 Order of pole (given) = 0.5 0 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 0.4444 1.551 h = 0.003 0.006 y[1] (numeric) = 3.14963572873 1.62502112374 y[1] (closed_form) = 3.14963477347 1.62499910095 absolute error = 2.204e-05 relative error = 0.000622 % Correct digits = 5 Radius of convergence (given) for eq 1 = 2.895 Order of pole (given) = 0.5 0 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 0.4474 1.557 h = 0.0001 0.005 y[1] (numeric) = 3.15378811853 1.63072033221 y[1] (closed_form) = 3.15378711144 1.6306970609 absolute error = 2.329e-05 relative error = 0.0006561 % Correct digits = 5 Radius of convergence (given) for eq 1 = 2.901 Order of pole (given) = 0.5 0 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 0.4475 1.562 h = 0.0001 0.003 y[1] (numeric) = 3.15476346896 1.63588351728 y[1] (closed_form) = 3.15476235682 1.63586104979 absolute error = 2.249e-05 relative error = 0.000633 % Correct digits = 5 Radius of convergence (given) for eq 1 = 2.903 Order of pole (given) = 0.5 0 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 0.4476 1.565 h = 0.001 0.001 y[1] (numeric) = 3.15539160996 1.63897456771 y[1] (closed_form) = 3.15539018809 1.63895216814 absolute error = 2.244e-05 relative error = 0.0006312 % Correct digits = 5 Radius of convergence (given) for eq 1 = 2.905 Order of pole (given) = 0.5 0 NO 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=3607.9MB, alloc=52.3MB, time=43.93 x[1] = 0.4486 1.566 h = 0.001 0.003 y[1] (numeric) = 3.15660278637 1.63983565033 y[1] (closed_form) = 3.15660122445 1.63981333566 absolute error = 2.237e-05 relative error = 0.0006289 % Correct digits = 5 Radius of convergence (given) for eq 1 = 2.907 Order of pole (given) = 0.5 0 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 0.4496 1.569 h = 0.0001 0.004 y[1] (numeric) = 3.15816382271 1.64276856801 y[1] (closed_form) = 3.15816255317 1.64274609207 absolute error = 2.251e-05 relative error = 0.0006324 % Correct digits = 5 Radius of convergence (given) for eq 1 = 2.909 Order of pole (given) = 0.5 0 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 0.4497 1.573 h = 0.003 0.006 y[1] (numeric) = 3.15896906361 1.6468942206 y[1] (closed_form) = 3.15896803986 1.64687188714 absolute error = 2.236e-05 relative error = 0.0006276 % Correct digits = 5 Radius of convergence (given) for eq 1 = 2.911 Order of pole (given) = 0.5 0 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 0.4527 1.579 h = 0.0001 0.005 y[1] (numeric) = 3.16313164286 1.65258104531 y[1] (closed_form) = 3.16313056589 1.65255746684 absolute error = 2.360e-05 relative error = 0.0006614 % Correct digits = 5 Radius of convergence (given) for eq 1 = 2.917 Order of pole (given) = 0.5 0 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 0.4528 1.584 h = 0.0001 0.003 y[1] (numeric) = 3.16411780456 1.65773915714 y[1] (closed_form) = 3.16411662381 1.6577163804 absolute error = 2.281e-05 relative error = 0.0006385 % Correct digits = 5 Radius of convergence (given) for eq 1 = 2.92 Order of pole (given) = 0.5 0 NO 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=3653.2MB, alloc=52.3MB, time=44.48 x[1] = 0.4529 1.587 h = 0.001 0.001 y[1] (numeric) = 3.16475238952 1.66082707424 y[1] (closed_form) = 3.16475089998 1.6608043656 absolute error = 2.276e-05 relative error = 0.0006367 % Correct digits = 5 Radius of convergence (given) for eq 1 = 2.922 Order of pole (given) = 0.5 0 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 0.4539 1.588 h = 0.0001 0.004 y[1] (numeric) = 3.1659647738 1.66168500522 y[1] (closed_form) = 3.16596314469 1.66166238142 absolute error = 2.268e-05 relative error = 0.0006344 % Correct digits = 5 Radius of convergence (given) for eq 1 = 2.923 Order of pole (given) = 0.5 0 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 0.454 1.592 h = 0.003 0.006 y[1] (numeric) = 3.16677706967 1.66580731537 y[1] (closed_form) = 3.1667760981 1.6657847462 absolute error = 2.259e-05 relative error = 0.0006313 % Correct digits = 5 Radius of convergence (given) for eq 1 = 2.925 Order of pole (given) = 0.5 0 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 0.457 1.598 h = 0.0001 0.005 y[1] (numeric) = 3.17094853223 1.67148361867 y[1] (closed_form) = 3.17094750623 1.67145980748 absolute error = 2.383e-05 relative error = 0.0006649 % Correct digits = 5 Radius of convergence (given) for eq 1 = 2.931 Order of pole (given) = 0.5 0 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 0.4571 1.603 h = 0.0001 0.003 y[1] (numeric) = 3.17194403155 1.67663749258 y[1] (closed_form) = 3.17194290287 1.67661448134 absolute error = 2.304e-05 relative error = 0.0006421 % Correct digits = 5 Radius of convergence (given) for eq 1 = 2.934 Order of pole (given) = 0.5 0 NO 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=3698.6MB, alloc=52.3MB, time=45.04 x[1] = 0.4572 1.606 h = 0.001 0.001 y[1] (numeric) = 3.1725841833 1.67972278975 y[1] (closed_form) = 3.17258274664 1.67969984678 absolute error = 2.299e-05 relative error = 0.0006404 % Correct digits = 5 Radius of convergence (given) for eq 1 = 2.935 Order of pole (given) = 0.5 0 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 0.4582 1.607 h = 0.001 0.003 y[1] (numeric) = 3.17379763901 1.680578028 y[1] (closed_form) = 3.1737960632 1.68055516981 absolute error = 2.291e-05 relative error = 0.000638 % Correct digits = 5 Radius of convergence (given) for eq 1 = 2.937 Order of pole (given) = 0.5 0 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 0.4592 1.61 h = 0.0001 0.004 y[1] (numeric) = 3.17536907855 1.68350153893 y[1] (closed_form) = 3.17536779326 1.68347851965 absolute error = 2.306e-05 relative error = 0.0006415 % Correct digits = 5 Radius of convergence (given) for eq 1 = 2.939 Order of pole (given) = 0.5 0 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 0.4593 1.614 h = 0.003 0.006 y[1] (numeric) = 3.17619037809 1.68761965891 y[1] (closed_form) = 3.17618933765 1.68759678083 absolute error = 2.290e-05 relative error = 0.0006367 % Correct digits = 5 Radius of convergence (given) for eq 1 = 2.942 Order of pole (given) = 0.5 0 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 0.4623 1.62 h = 0.0001 0.005 y[1] (numeric) = 3.18037194989 1.69328361876 y[1] (closed_form) = 3.18037085372 1.69325950215 absolute error = 2.414e-05 relative error = 0.00067 % Correct digits = 5 Radius of convergence (given) for eq 1 = 2.947 Order of pole (given) = 0.5 0 NO 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=3743.9MB, alloc=52.3MB, time=45.59 x[1] = 0.4624 1.625 h = 0.0001 0.003 y[1] (numeric) = 3.18137819381 1.6984324211 y[1] (closed_form) = 3.18137699617 1.69840910236 absolute error = 2.335e-05 relative error = 0.0006475 % Correct digits = 5 Radius of convergence (given) for eq 1 = 2.95 Order of pole (given) = 0.5 0 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 0.4625 1.628 h = 0.001 0.001 y[1] (numeric) = 3.18202474952 1.70151458658 y[1] (closed_form) = 3.18202324482 1.70149133627 absolute error = 2.330e-05 relative error = 0.0006457 % Correct digits = 5 Radius of convergence (given) for eq 1 = 2.952 Order of pole (given) = 0.5 0 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 0.4635 1.629 h = 0.001 0.003 y[1] (numeric) = 3.18323939988 1.70236668664 y[1] (closed_form) = 3.18323775652 1.70234352105 absolute error = 2.322e-05 relative error = 0.0006433 % Correct digits = 5 Radius of convergence (given) for eq 1 = 2.953 Order of pole (given) = 0.5 0 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 0.4645 1.632 h = 0.0001 0.004 y[1] (numeric) = 3.18481636707 1.7052851173 y[1] (closed_form) = 3.18481501324 1.70526179072 absolute error = 2.337e-05 relative error = 0.0006468 % Correct digits = 5 Radius of convergence (given) for eq 1 = 2.956 Order of pole (given) = 0.5 0 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 0.4646 1.636 h = 0.003 0.006 y[1] (numeric) = 3.1856462296 1.70939913568 y[1] (closed_form) = 3.18564512011 1.70937594962 absolute error = 2.321e-05 relative error = 0.0006421 % Correct digits = 5 Radius of convergence (given) for eq 1 = 2.958 Order of pole (given) = 0.5 0 NO 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=3789.2MB, alloc=52.3MB, time=46.14 x[1] = 0.4676 1.642 h = 0.0001 0.005 y[1] (numeric) = 3.18983786838 1.71505077448 y[1] (closed_form) = 3.1898367019 1.71502635339 absolute error = 2.445e-05 relative error = 0.0006751 % Correct digits = 5 Radius of convergence (given) for eq 1 = 2.964 Order of pole (given) = 0.5 0 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 0.4677 1.647 h = 0.0001 0.003 y[1] (numeric) = 3.19085482139 1.72019450692 y[1] (closed_form) = 3.19085355462 1.72017088161 absolute error = 2.366e-05 relative error = 0.0006527 % Correct digits = 5 Radius of convergence (given) for eq 1 = 2.967 Order of pole (given) = 0.5 0 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 0.4678 1.65 h = 0.001 0.001 y[1] (numeric) = 3.19150775977 1.72327354204 y[1] (closed_form) = 3.19150618686 1.72324998532 absolute error = 2.361e-05 relative error = 0.0006509 % Correct digits = 5 Radius of convergence (given) for eq 1 = 2.969 Order of pole (given) = 0.5 0 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 0.4688 1.651 h = 0.001 0.003 y[1] (numeric) = 3.19272359789 1.72412251124 y[1] (closed_form) = 3.19272188681 1.72409903915 absolute error = 2.353e-05 relative error = 0.0006486 % Correct digits = 5 Radius of convergence (given) for eq 1 = 2.97 Order of pole (given) = 0.5 0 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 0.4698 1.654 h = 0.0001 0.004 y[1] (numeric) = 3.19430607166 1.72703586936 y[1] (closed_form) = 3.19430464912 1.7270122364 absolute error = 2.368e-05 relative error = 0.000652 % Correct digits = 5 Radius of convergence (given) for eq 1 = 2.972 Order of pole (given) = 0.5 0 NO 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=3834.5MB, alloc=52.3MB, time=46.69 x[1] = 0.4699 1.658 h = 0.003 0.006 y[1] (numeric) = 3.19514446884 1.73114578776 y[1] (closed_form) = 3.19514329012 1.73112229466 absolute error = 2.352e-05 relative error = 0.0006473 % Correct digits = 5 Radius of convergence (given) for eq 1 = 2.975 Order of pole (given) = 0.5 0 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 0.4729 1.664 h = 0.0001 0.005 y[1] (numeric) = 3.19934613282 1.73678512824 y[1] (closed_form) = 3.19934489589 1.73676040359 absolute error = 2.476e-05 relative error = 0.00068 % Correct digits = 5 Radius of convergence (given) for eq 1 = 2.981 Order of pole (given) = 0.5 0 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 0.473 1.669 h = 0.0001 0.003 y[1] (numeric) = 3.20037375963 1.7419237928 y[1] (closed_form) = 3.20037242357 1.74189986183 absolute error = 2.397e-05 relative error = 0.0006578 % Correct digits = 5 Radius of convergence (given) for eq 1 = 2.984 Order of pole (given) = 0.5 0 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 0.4731 1.672 h = 0.001 0.001 y[1] (numeric) = 3.20103305952 1.74499969911 y[1] (closed_form) = 3.20103141825 1.74497583688 absolute error = 2.392e-05 relative error = 0.0006561 % Correct digits = 5 Radius of convergence (given) for eq 1 = 2.985 Order of pole (given) = 0.5 0 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 0.4741 1.673 h = 0.001 0.003 y[1] (numeric) = 3.20225007864 1.74584554479 y[1] (closed_form) = 3.20224829967 1.74582176711 absolute error = 2.384e-05 relative error = 0.0006538 % Correct digits = 5 Radius of convergence (given) for eq 1 = 2.987 Order of pole (given) = 0.5 0 NO 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=3879.9MB, alloc=52.3MB, time=47.24 x[1] = 0.4751 1.676 h = 0.0001 0.004 y[1] (numeric) = 3.20383803811 1.74875383828 y[1] (closed_form) = 3.20383654671 1.74872989986 absolute error = 2.398e-05 relative error = 0.0006571 % Correct digits = 5 Radius of convergence (given) for eq 1 = 2.989 Order of pole (given) = 0.5 0 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 0.4752 1.68 h = 0.003 0.006 y[1] (numeric) = 3.20468494178 1.75285965861 y[1] (closed_form) = 3.20468369368 1.7528358594 absolute error = 2.383e-05 relative error = 0.0006524 % Correct digits = 5 Radius of convergence (given) for eq 1 = 2.991 Order of pole (given) = 0.5 0 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 0.4782 1.686 h = 0.0001 0.005 y[1] (numeric) = 3.20889658966 1.75848672377 y[1] (closed_form) = 3.20889528217 1.75846169649 absolute error = 2.506e-05 relative error = 0.0006849 % Correct digits = 5 Radius of convergence (given) for eq 1 = 2.997 Order of pole (given) = 0.5 0 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 0.4783 1.691 h = 0.0001 0.003 y[1] (numeric) = 3.20993485522 1.76362032283 y[1] (closed_form) = 3.20993344973 1.76359608714 absolute error = 2.428e-05 relative error = 0.0006628 % Correct digits = 5 Radius of convergence (given) for eq 1 = 3 Order of pole (given) = 0.5 0 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 0.4784 1.694 h = 0.001 0.001 y[1] (numeric) = 3.2106004956 1.76669310209 y[1] (closed_form) = 3.21059878582 1.76666893528 absolute error = 2.423e-05 relative error = 0.0006611 % Correct digits = 5 Radius of convergence (given) for eq 1 = 3.002 Order of pole (given) = 0.5 0 NO 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=3925.1MB, alloc=52.3MB, time=47.79 x[1] = 0.4794 1.695 h = 0.0001 0.004 y[1] (numeric) = 3.21181868907 1.76753583163 y[1] (closed_form) = 3.21181684205 1.76751174927 absolute error = 2.415e-05 relative error = 0.0006588 % Correct digits = 5 Radius of convergence (given) for eq 1 = 3.003 Order of pole (given) = 0.5 0 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 0.4795 1.699 h = 0.003 0.006 y[1] (numeric) = 3.21267253504 1.7716383154 y[1] (closed_form) = 3.21267133706 1.77161428337 absolute error = 2.406e-05 relative error = 0.0006559 % Correct digits = 5 Radius of convergence (given) for eq 1 = 3.006 Order of pole (given) = 0.5 0 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 0.4825 1.705 h = 0.0001 0.005 y[1] (numeric) = 3.21689288986 1.7772549513 y[1] (closed_form) = 3.21689163148 1.77722969418 absolute error = 2.529e-05 relative error = 0.0006881 % Correct digits = 5 Radius of convergence (given) for eq 1 = 3.012 Order of pole (given) = 0.5 0 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 0.4826 1.71 h = 0.0001 0.003 y[1] (numeric) = 3.2179403453 1.78238431848 y[1] (closed_form) = 3.21793898989 1.78235985116 absolute error = 2.450e-05 relative error = 0.0006661 % Correct digits = 5 Radius of convergence (given) for eq 1 = 3.015 Order of pole (given) = 0.5 0 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 0.4827 1.713 h = 0.001 0.001 y[1] (numeric) = 3.21861146386 1.78545448283 y[1] (closed_form) = 3.21860980494 1.78543008451 absolute error = 2.445e-05 relative error = 0.0006644 % Correct digits = 5 Radius of convergence (given) for eq 1 = 3.016 Order of pole (given) = 0.5 0 NO 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=3970.3MB, alloc=52.3MB, time=48.34 x[1] = 0.4837 1.714 h = 0.001 0.003 y[1] (numeric) = 3.21983069992 1.7862945499 y[1] (closed_form) = 3.21982890417 1.78627023596 absolute error = 2.438e-05 relative error = 0.0006621 % Correct digits = 5 Radius of convergence (given) for eq 1 = 3.018 Order of pole (given) = 0.5 0 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 0.4847 1.717 h = 0.0001 0.004 y[1] (numeric) = 3.22142887223 1.7891935057 y[1] (closed_form) = 3.22142736226 1.78916903128 absolute error = 2.452e-05 relative error = 0.0006654 % Correct digits = 5 Radius of convergence (given) for eq 1 = 3.02 Order of pole (given) = 0.5 0 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 0.4848 1.721 h = 0.003 0.006 y[1] (numeric) = 3.22229157896 1.79329180702 y[1] (closed_form) = 3.22229031132 1.7932674706 absolute error = 2.437e-05 relative error = 0.0006608 % Correct digits = 5 Radius of convergence (given) for eq 1 = 3.023 Order of pole (given) = 0.5 0 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 0.4878 1.727 h = 0.0001 0.005 y[1] (numeric) = 3.22652184181 1.79889621073 y[1] (closed_form) = 3.22652051266 1.79887065268 absolute error = 2.559e-05 relative error = 0.0006928 % Correct digits = 5 Radius of convergence (given) for eq 1 = 3.028 Order of pole (given) = 0.5 0 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 0.4879 1.732 h = 0.0001 0.003 y[1] (numeric) = 3.22757987133 1.80402051732 y[1] (closed_form) = 3.22757844623 1.80399574698 absolute error = 2.481e-05 relative error = 0.000671 % Correct digits = 5 Radius of convergence (given) for eq 1 = 3.031 Order of pole (given) = 0.5 0 NO 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=4015.6MB, alloc=52.3MB, time=48.89 x[1] = 0.488 1.735 h = 0.001 0.001 y[1] (numeric) = 3.22825729162 1.80708755819 y[1] (closed_form) = 3.22825556393 1.80706285697 absolute error = 2.476e-05 relative error = 0.0006693 % Correct digits = 5 Radius of convergence (given) for eq 1 = 3.033 Order of pole (given) = 0.5 0 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 0.489 1.736 h = 0.001 0.003 y[1] (numeric) = 3.22947768985 1.80792452282 y[1] (closed_form) = 3.2294758258 1.80789990589 absolute error = 2.469e-05 relative error = 0.000667 % Correct digits = 5 Radius of convergence (given) for eq 1 = 3.035 Order of pole (given) = 0.5 0 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 0.49 1.739 h = 0.0001 0.004 y[1] (numeric) = 3.23108128917 1.8108184373 y[1] (closed_form) = 3.23107970993 1.81079366004 absolute error = 2.483e-05 relative error = 0.0006703 % Correct digits = 5 Radius of convergence (given) for eq 1 = 3.037 Order of pole (given) = 0.5 0 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 0.4901 1.743 h = 0.003 0.006 y[1] (numeric) = 3.23195242284 1.81491264716 y[1] (closed_form) = 3.2319510854 1.81488800728 absolute error = 2.468e-05 relative error = 0.0006657 % Correct digits = 5 Radius of convergence (given) for eq 1 = 3.04 Order of pole (given) = 0.5 0 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 0.4931 1.749 h = 0.0001 0.005 y[1] (numeric) = 3.23619255375 1.8205048425 y[1] (closed_form) = 3.23619115375 1.82047898443 absolute error = 2.590e-05 relative error = 0.0006974 % Correct digits = 5 Radius of convergence (given) for eq 1 = 3.045 Order of pole (given) = 0.5 0 NO 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=4061.0MB, alloc=52.3MB, time=49.44 x[1] = 0.4932 1.754 h = 0.0001 0.003 y[1] (numeric) = 3.23726112296 1.82562409185 y[1] (closed_form) = 3.23725962805 1.82559901941 absolute error = 2.512e-05 relative error = 0.0006758 % Correct digits = 5 Radius of convergence (given) for eq 1 = 3.048 Order of pole (given) = 0.5 0 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 0.4933 1.757 h = 0.001 0.001 y[1] (numeric) = 3.23794482436 1.82868801156 y[1] (closed_form) = 3.23794302777 1.82866300834 absolute error = 2.507e-05 relative error = 0.0006741 % Correct digits = 5 Radius of convergence (given) for eq 1 = 3.05 Order of pole (given) = 0.5 0 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 0.4943 1.758 h = 0.001 0.003 y[1] (numeric) = 3.23916637842 1.82952188119 y[1] (closed_form) = 3.23916444593 1.82949696217 absolute error = 2.499e-05 relative error = 0.0006719 % Correct digits = 5 Radius of convergence (given) for eq 1 = 3.052 Order of pole (given) = 0.5 0 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 0.4953 1.761 h = 0.0001 0.004 y[1] (numeric) = 3.24077538464 1.8324107629 y[1] (closed_form) = 3.24077373602 1.8323856837 absolute error = 2.513e-05 relative error = 0.0006751 % Correct digits = 5 Radius of convergence (given) for eq 1 = 3.054 Order of pole (given) = 0.5 0 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 0.4954 1.765 h = 0.003 0.006 y[1] (numeric) = 3.24165491781 1.83650088424 y[1] (closed_form) = 3.24165351045 1.83647594182 absolute error = 2.498e-05 relative error = 0.0006705 % Correct digits = 5 Radius of convergence (given) for eq 1 = 3.057 Order of pole (given) = 0.5 0 NO 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=4106.4MB, alloc=52.3MB, time=49.99 x[1] = 0.4984 1.771 h = 0.0001 0.005 y[1] (numeric) = 3.2459048773 1.84208089529 y[1] (closed_form) = 3.24590340636 1.84205473811 absolute error = 2.620e-05 relative error = 0.000702 % Correct digits = 5 Radius of convergence (given) for eq 1 = 3.062 Order of pole (given) = 0.5 0 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 0.4985 1.776 h = 0.0001 0.003 y[1] (numeric) = 3.246983952 1.84719509105 y[1] (closed_form) = 3.24698238718 1.84716971742 absolute error = 2.542e-05 relative error = 0.0006805 % Correct digits = 5 Radius of convergence (given) for eq 1 = 3.065 Order of pole (given) = 0.5 0 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 0.4986 1.779 h = 0.001 0.001 y[1] (numeric) = 3.24767391404 1.85025589213 y[1] (closed_form) = 3.24767204844 1.85023058781 absolute error = 2.537e-05 relative error = 0.0006788 % Correct digits = 5 Radius of convergence (given) for eq 1 = 3.067 Order of pole (given) = 0.5 0 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 0.4996 1.78 h = 0.001 0.003 y[1] (numeric) = 3.24889661771 1.85108667422 y[1] (closed_form) = 3.24889461667 1.851061454 absolute error = 2.530e-05 relative error = 0.0006766 % Correct digits = 5 Radius of convergence (given) for eq 1 = 3.069 Order of pole (given) = 0.5 0 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 0.5006 1.783 h = 0.0001 0.004 y[1] (numeric) = 3.25051101092 1.85397053183 y[1] (closed_form) = 3.25050929281 1.85394515161 absolute error = 2.544e-05 relative error = 0.0006798 % Correct digits = 5 Radius of convergence (given) for eq 1 = 3.071 Order of pole (given) = 0.5 0 NO 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=4151.7MB, alloc=52.3MB, time=50.55 x[1] = 0.5007 1.787 h = 0.003 0.006 y[1] (numeric) = 3.25139891633 1.85805656785 y[1] (closed_form) = 3.25139743893 1.85803132379 absolute error = 2.529e-05 relative error = 0.0006753 % Correct digits = 5 Radius of convergence (given) for eq 1 = 3.074 Order of pole (given) = 0.5 0 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 0.5037 1.793 h = 0.0001 0.005 y[1] (numeric) = 3.25565866536 1.86362441894 y[1] (closed_form) = 3.25565712341 1.86359796356 absolute error = 2.650e-05 relative error = 0.0007064 % Correct digits = 5 Radius of convergence (given) for eq 1 = 3.08 Order of pole (given) = 0.5 0 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 0.5038 1.798 h = 0.0001 0.003 y[1] (numeric) = 3.25674821161 1.86873356509 y[1] (closed_form) = 3.25674657678 1.86870789116 absolute error = 2.573e-05 relative error = 0.0006851 % Correct digits = 5 Radius of convergence (given) for eq 1 = 3.083 Order of pole (given) = 0.5 0 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 0.5039 1.801 h = 0.001 0.001 y[1] (numeric) = 3.25744441394 1.87179125023 y[1] (closed_form) = 3.25744247923 1.87176564571 absolute error = 2.568e-05 relative error = 0.0006835 % Correct digits = 5 Radius of convergence (given) for eq 1 = 3.084 Order of pole (given) = 0.5 0 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 0.5049 1.802 h = 0.0001 0.004 y[1] (numeric) = 3.2586682611 1.87261895227 y[1] (closed_form) = 3.2586661914 1.87259343174 absolute error = 2.560e-05 relative error = 0.0006813 % Correct digits = 5 Radius of convergence (given) for eq 1 = 3.086 Order of pole (given) = 0.5 0 NO 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=4197.0MB, alloc=52.3MB, time=51.10 x[1] = 0.505 1.806 h = 0.003 0.006 y[1] (numeric) = 3.25956299965 1.87670166289 y[1] (closed_form) = 3.25956157052 1.87667618892 absolute error = 2.551e-05 relative error = 0.0006783 % Correct digits = 5 Radius of convergence (given) for eq 1 = 3.088 Order of pole (given) = 0.5 0 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 0.508 1.812 h = 0.0001 0.005 y[1] (numeric) = 3.26383128873 1.88225918275 y[1] (closed_form) = 3.2638297942 1.88223250039 absolute error = 2.672e-05 relative error = 0.0007093 % Correct digits = 5 Radius of convergence (given) for eq 1 = 3.094 Order of pole (given) = 0.5 0 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 0.5081 1.817 h = 0.0001 0.003 y[1] (numeric) = 3.2649298816 1.88736410996 y[1] (closed_form) = 3.26492829506 1.88733820728 absolute error = 2.595e-05 relative error = 0.0006881 % Correct digits = 5 Radius of convergence (given) for eq 1 = 3.097 Order of pole (given) = 0.5 0 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 0.5082 1.82 h = 0.001 0.001 y[1] (numeric) = 3.26563147626 1.89041918931 y[1] (closed_form) = 3.26562959061 1.89039335612 absolute error = 2.590e-05 relative error = 0.0006864 % Correct digits = 5 Radius of convergence (given) for eq 1 = 3.099 Order of pole (given) = 0.5 0 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 0.5092 1.821 h = 0.001 0.003 y[1] (numeric) = 3.26685633945 1.89124425967 y[1] (closed_form) = 3.26685431919 1.89121851038 absolute error = 2.583e-05 relative error = 0.0006842 % Correct digits = 5 Radius of convergence (given) for eq 1 = 3.1 Order of pole (given) = 0.5 0 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 0.5102 1.824 h = 0.0001 0.004 y[1] (numeric) = 3.2684807639 1.89411885584 memory used=4242.4MB, alloc=52.3MB, time=51.65 y[1] (closed_form) = 3.26847902484 1.89409294688 absolute error = 2.597e-05 relative error = 0.0006874 % Correct digits = 5 Radius of convergence (given) for eq 1 = 3.103 Order of pole (given) = 0.5 0 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 0.5103 1.828 h = 0.003 0.006 y[1] (numeric) = 3.26938422472 1.89819739833 y[1] (closed_form) = 3.26938272537 1.89817162441 absolute error = 2.582e-05 relative error = 0.0006829 % Correct digits = 5 Radius of convergence (given) for eq 1 = 3.105 Order of pole (given) = 0.5 0 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 0.5133 1.834 h = 0.0001 0.005 y[1] (numeric) = 3.27366223162 1.90374280368 y[1] (closed_form) = 3.27366066597 1.90371582478 absolute error = 2.702e-05 relative error = 0.0007136 % Correct digits = 5 Radius of convergence (given) for eq 1 = 3.111 Order of pole (given) = 0.5 0 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 0.5134 1.839 h = 0.0001 0.003 y[1] (numeric) = 3.27477123342 1.90884268907 y[1] (closed_form) = 3.27476957669 1.90881648778 absolute error = 2.625e-05 relative error = 0.0006926 % Correct digits = 5 Radius of convergence (given) for eq 1 = 3.114 Order of pole (given) = 0.5 0 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 0.5135 1.842 h = 0.001 0.001 y[1] (numeric) = 3.27547903086 1.91189465776 y[1] (closed_form) = 3.27547707592 1.91186852602 absolute error = 2.620e-05 relative error = 0.0006909 % Correct digits = 5 Radius of convergence (given) for eq 1 = 3.116 Order of pole (given) = 0.5 0 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 0.5145 1.843 h = 0.001 0.003 y[1] (numeric) = 3.27670502634 1.91271666196 y[1] (closed_form) = 3.27670293724 1.912690614 absolute error = 2.613e-05 relative error = 0.0006887 % Correct digits = 5 memory used=4287.8MB, alloc=52.3MB, time=52.20 Radius of convergence (given) for eq 1 = 3.118 Order of pole (given) = 0.5 0 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 0.5155 1.846 h = 0.0001 0.004 y[1] (numeric) = 3.27833478183 1.91558625943 y[1] (closed_form) = 3.27833297301 1.915560052 absolute error = 2.627e-05 relative error = 0.0006919 % Correct digits = 5 Radius of convergence (given) for eq 1 = 3.12 Order of pole (given) = 0.5 0 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 0.5156 1.85 h = 0.003 0.006 y[1] (numeric) = 3.27924653786 1.91966072674 y[1] (closed_form) = 3.27924496821 1.91963465377 absolute error = 2.612e-05 relative error = 0.0006874 % Correct digits = 5 Radius of convergence (given) for eq 1 = 3.123 Order of pole (given) = 0.5 0 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 0.5186 1.856 h = 0.0001 0.005 y[1] (numeric) = 3.28353422484 1.92519404257 y[1] (closed_form) = 3.283532588 1.92516676803 absolute error = 2.732e-05 relative error = 0.0007179 % Correct digits = 5 Radius of convergence (given) for eq 1 = 3.129 Order of pole (given) = 0.5 0 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 0.5187 1.861 h = 0.0001 0.003 y[1] (numeric) = 3.28465360225 1.93028889098 y[1] (closed_form) = 3.28465187527 1.93026239196 absolute error = 2.656e-05 relative error = 0.000697 % Correct digits = 5 Radius of convergence (given) for eq 1 = 3.132 Order of pole (given) = 0.5 0 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 0.5188 1.864 h = 0.001 0.001 y[1] (numeric) = 3.28536758253 1.9333377522 y[1] (closed_form) = 3.28536555822 1.93331132281 absolute error = 2.651e-05 relative error = 0.0006954 % Correct digits = 5 Radius of convergence (given) for eq 1 = 3.134 Order of pole (given) = 0.5 0 NO 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=4333.1MB, alloc=52.3MB, time=52.75 x[1] = 0.5198 1.865 h = 0.001 0.003 y[1] (numeric) = 3.28659470448 1.93415669776 y[1] (closed_form) = 3.28659254647 1.93413035203 absolute error = 2.643e-05 relative error = 0.0006932 % Correct digits = 5 Radius of convergence (given) for eq 1 = 3.135 Order of pole (given) = 0.5 0 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 0.5208 1.868 h = 0.0001 0.004 y[1] (numeric) = 3.28822977185 1.93702130575 y[1] (closed_form) = 3.28822789319 1.93699480075 absolute error = 2.657e-05 relative error = 0.0006963 % Correct digits = 5 Radius of convergence (given) for eq 1 = 3.137 Order of pole (given) = 0.5 0 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 0.5209 1.872 h = 0.003 0.006 y[1] (numeric) = 3.28914979655 1.94109170201 y[1] (closed_form) = 3.28914815651 1.94106533088 absolute error = 2.642e-05 relative error = 0.0006918 % Correct digits = 5 Radius of convergence (given) for eq 1 = 3.14 Order of pole (given) = 0.5 0 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 0.5239 1.878 h = 0.0001 0.005 y[1] (numeric) = 3.29344712628 1.94661295354 y[1] (closed_form) = 3.29344541823 1.94658538423 absolute error = 2.762e-05 relative error = 0.000722 % Correct digits = 5 Radius of convergence (given) for eq 1 = 3.146 Order of pole (given) = 0.5 0 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 0.524 1.883 h = 0.0001 0.003 y[1] (numeric) = 3.29457684623 1.95170277006 y[1] (closed_form) = 3.29457504894 1.9516759742 absolute error = 2.686e-05 relative error = 0.0007013 % Correct digits = 5 Radius of convergence (given) for eq 1 = 3.149 Order of pole (given) = 0.5 0 NO 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=4378.6MB, alloc=52.3MB, time=53.30 x[1] = 0.5241 1.886 h = 0.001 0.001 y[1] (numeric) = 3.29529698956 1.95474852719 y[1] (closed_form) = 3.29529489582 1.95472180101 absolute error = 2.681e-05 relative error = 0.0006997 % Correct digits = 5 Radius of convergence (given) for eq 1 = 3.151 Order of pole (given) = 0.5 0 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 0.5251 1.887 h = 0.001 0.003 y[1] (numeric) = 3.29652523227 1.95556442165 y[1] (closed_form) = 3.29652300526 1.95553777902 absolute error = 2.674e-05 relative error = 0.0006975 % Correct digits = 5 Radius of convergence (given) for eq 1 = 3.152 Order of pole (given) = 0.5 0 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 0.5261 1.89 h = 0.0001 0.004 y[1] (numeric) = 3.29816559255 1.95842404951 y[1] (closed_form) = 3.29816364399 1.95839724782 absolute error = 2.687e-05 relative error = 0.0007006 % Correct digits = 5 Radius of convergence (given) for eq 1 = 3.155 Order of pole (given) = 0.5 0 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 0.5262 1.894 h = 0.003 0.006 y[1] (numeric) = 3.29909385953 1.96249037903 y[1] (closed_form) = 3.29909214904 1.96246371064 absolute error = 2.672e-05 relative error = 0.0006962 % Correct digits = 5 Radius of convergence (given) for eq 1 = 3.157 Order of pole (given) = 0.5 0 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 0.5292 1.9 h = 0.0001 0.005 y[1] (numeric) = 3.30340079516 1.96799959168 y[1] (closed_form) = 3.30339901586 1.96797172849 absolute error = 2.792e-05 relative error = 0.0007261 % Correct digits = 5 Radius of convergence (given) for eq 1 = 3.163 Order of pole (given) = 0.5 0 NO 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=4423.9MB, alloc=52.3MB, time=53.86 x[1] = 0.5293 1.905 h = 0.0001 0.003 y[1] (numeric) = 3.30454082481 1.9730843817 y[1] (closed_form) = 3.30453895714 1.97305728989 absolute error = 2.716e-05 relative error = 0.0007056 % Correct digits = 5 Radius of convergence (given) for eq 1 = 3.166 Order of pole (given) = 0.5 0 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 0.5294 1.908 h = 0.001 0.001 y[1] (numeric) = 3.30526711151 1.97612703827 y[1] (closed_form) = 3.30526494827 1.9761000162 absolute error = 2.711e-05 relative error = 0.0007039 % Correct digits = 5 Radius of convergence (given) for eq 1 = 3.168 Order of pole (given) = 0.5 0 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 0.5304 1.909 h = 0.0001 0.004 y[1] (numeric) = 3.30649646935 1.97693988918 y[1] (closed_form) = 3.30649417328 1.97691295052 absolute error = 2.704e-05 relative error = 0.0007018 % Correct digits = 5 Radius of convergence (given) for eq 1 = 3.17 Order of pole (given) = 0.5 0 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 0.5305 1.913 h = 0.003 0.006 y[1] (numeric) = 3.30743146383 1.98100290913 y[1] (closed_form) = 3.30742979995 1.98097601374 absolute error = 2.695e-05 relative error = 0.000699 % Correct digits = 5 Radius of convergence (given) for eq 1 = 3.172 Order of pole (given) = 0.5 0 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 0.5335 1.919 h = 0.0001 0.005 y[1] (numeric) = 3.31174678169 1.98650189344 y[1] (closed_form) = 3.31174504829 1.98647380615 absolute error = 2.814e-05 relative error = 0.0007287 % Correct digits = 5 Radius of convergence (given) for eq 1 = 3.178 Order of pole (given) = 0.5 0 NO 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=4469.3MB, alloc=52.3MB, time=54.41 x[1] = 0.5336 1.924 h = 0.0001 0.003 y[1] (numeric) = 3.31289571922 1.99158248362 y[1] (closed_form) = 3.31289389823 1.99155516593 absolute error = 2.738e-05 relative error = 0.0007083 % Correct digits = 5 Radius of convergence (given) for eq 1 = 3.181 Order of pole (given) = 0.5 0 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 0.5337 1.927 h = 0.001 0.001 y[1] (numeric) = 3.31362731517 1.99462254716 y[1] (closed_form) = 3.31362519936 1.99459529924 absolute error = 2.733e-05 relative error = 0.0007066 % Correct digits = 5 Radius of convergence (given) for eq 1 = 3.183 Order of pole (given) = 0.5 0 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 0.5347 1.928 h = 0.001 0.003 y[1] (numeric) = 3.31485766459 1.99543279752 y[1] (closed_form) = 3.31485541633 1.99540563292 absolute error = 2.726e-05 relative error = 0.0007045 % Correct digits = 5 Radius of convergence (given) for eq 1 = 3.185 Order of pole (given) = 0.5 0 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 0.5357 1.931 h = 0.0001 0.004 y[1] (numeric) = 3.31650788297 1.99828324633 y[1] (closed_form) = 3.31650591149 1.99825592307 absolute error = 2.739e-05 relative error = 0.0007075 % Correct digits = 5 Radius of convergence (given) for eq 1 = 3.187 Order of pole (given) = 0.5 0 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 0.5358 1.935 h = 0.003 0.006 y[1] (numeric) = 3.31745146569 2.00234211832 y[1] (closed_form) = 3.31744973125 2.00231492732 absolute error = 2.725e-05 relative error = 0.0007032 % Correct digits = 5 Radius of convergence (given) for eq 1 = 3.19 Order of pole (given) = 0.5 0 NO 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=4514.6MB, alloc=52.3MB, time=54.96 x[1] = 0.5388 1.941 h = 0.0001 0.005 y[1] (numeric) = 3.32177632167 2.00782911114 y[1] (closed_form) = 3.32177451698 2.0078007316 absolute error = 2.844e-05 relative error = 0.0007326 % Correct digits = 5 Radius of convergence (given) for eq 1 = 3.196 Order of pole (given) = 0.5 0 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 0.5389 1.946 h = 0.0001 0.003 y[1] (numeric) = 3.3229355083 2.01290468515 y[1] (closed_form) = 3.32293361684 2.01287707315 absolute error = 2.768e-05 relative error = 0.0007124 % Correct digits = 5 Radius of convergence (given) for eq 1 = 3.199 Order of pole (given) = 0.5 0 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 0.539 1.949 h = 0.001 0.001 y[1] (numeric) = 3.32367321136 2.01594165491 y[1] (closed_form) = 3.32367102596 2.01591411271 absolute error = 2.763e-05 relative error = 0.0007108 % Correct digits = 5 Radius of convergence (given) for eq 1 = 3.201 Order of pole (given) = 0.5 0 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 0.54 1.95 h = 0.001 0.003 y[1] (numeric) = 3.32490466563 2.01674887572 y[1] (closed_form) = 3.32490234821 2.01672141671 absolute error = 2.756e-05 relative error = 0.0007086 % Correct digits = 5 Radius of convergence (given) for eq 1 = 3.202 Order of pole (given) = 0.5 0 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 0.541 1.953 h = 0.0001 0.004 y[1] (numeric) = 3.3265601236 2.01959437159 y[1] (closed_form) = 3.32655808206 2.01956675414 absolute error = 2.769e-05 relative error = 0.0007116 % Correct digits = 5 Radius of convergence (given) for eq 1 = 3.205 Order of pole (given) = 0.5 0 NO 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=4559.9MB, alloc=52.3MB, time=55.51 x[1] = 0.5411 1.957 h = 0.003 0.006 y[1] (numeric) = 3.32751187411 2.0236491901 y[1] (closed_form) = 3.32751006906 2.02362170437 absolute error = 2.754e-05 relative error = 0.0007073 % Correct digits = 5 Radius of convergence (given) for eq 1 = 3.207 Order of pole (given) = 0.5 0 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 0.5441 1.963 h = 0.0001 0.005 y[1] (numeric) = 3.33184623256 2.02912421739 y[1] (closed_form) = 3.33184435656 2.02909554646 absolute error = 2.873e-05 relative error = 0.0007365 % Correct digits = 5 Radius of convergence (given) for eq 1 = 3.213 Order of pole (given) = 0.5 0 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 0.5442 1.968 h = 0.0001 0.003 y[1] (numeric) = 3.33301563608 2.03419478137 y[1] (closed_form) = 3.33301367413 2.03416687592 absolute error = 2.797e-05 relative error = 0.0007164 % Correct digits = 5 Radius of convergence (given) for eq 1 = 3.217 Order of pole (given) = 0.5 0 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 0.5443 1.971 h = 0.001 0.001 y[1] (numeric) = 3.33375942697 2.03722866132 y[1] (closed_form) = 3.33375717195 2.0372008257 absolute error = 2.793e-05 relative error = 0.0007148 % Correct digits = 5 Radius of convergence (given) for eq 1 = 3.218 Order of pole (given) = 0.5 0 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 0.5453 1.972 h = 0.001 0.003 y[1] (numeric) = 3.33499198076 2.03803286016 y[1] (closed_form) = 3.33498959414 2.0380051076 absolute error = 2.785e-05 relative error = 0.0007127 % Correct digits = 5 Radius of convergence (given) for eq 1 = 3.22 Order of pole (given) = 0.5 0 NO 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=4605.3MB, alloc=52.3MB, time=56.06 x[1] = 0.5463 1.975 h = 0.0001 0.004 y[1] (numeric) = 3.33665266006 2.04087341287 y[1] (closed_form) = 3.33665054845 2.0408455021 absolute error = 2.799e-05 relative error = 0.0007156 % Correct digits = 5 Radius of convergence (given) for eq 1 = 3.222 Order of pole (given) = 0.5 0 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 0.5464 1.979 h = 0.003 0.006 y[1] (numeric) = 3.33761255271 2.04492418306 y[1] (closed_form) = 3.33761067702 2.04489640347 absolute error = 2.784e-05 relative error = 0.0007113 % Correct digits = 5 Radius of convergence (given) for eq 1 = 3.225 Order of pole (given) = 0.5 0 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 0.5494 1.985 h = 0.0001 0.005 y[1] (numeric) = 3.34195637838 2.05038727094 y[1] (closed_form) = 3.34195443108 2.05035830949 absolute error = 2.903e-05 relative error = 0.0007403 % Correct digits = 5 Radius of convergence (given) for eq 1 = 3.231 Order of pole (given) = 0.5 0 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 0.5495 1.99 h = 0.0001 0.003 y[1] (numeric) = 3.34313596682 2.05545283128 y[1] (closed_form) = 3.34313393436 2.05542463325 absolute error = 2.827e-05 relative error = 0.0007204 % Correct digits = 5 Radius of convergence (given) for eq 1 = 3.234 Order of pole (given) = 0.5 0 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 0.5496 1.993 h = 0.001 0.001 y[1] (numeric) = 3.34388582642 2.05848362555 y[1] (closed_form) = 3.34388350174 2.05845549737 absolute error = 2.822e-05 relative error = 0.0007188 % Correct digits = 5 Radius of convergence (given) for eq 1 = 3.236 Order of pole (given) = 0.5 0 NO 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=4650.6MB, alloc=52.3MB, time=56.61 x[1] = 0.5506 1.994 h = 0.001 0.003 y[1] (numeric) = 3.34511947447 2.05928481 y[1] (closed_form) = 3.34511701862 2.05925676474 absolute error = 2.815e-05 relative error = 0.0007167 % Correct digits = 5 Radius of convergence (given) for eq 1 = 3.238 Order of pole (given) = 0.5 0 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 0.5516 1.997 h = 0.0001 0.004 y[1] (numeric) = 3.34678535704 2.06212042946 y[1] (closed_form) = 3.34678317532 2.06209222624 absolute error = 2.829e-05 relative error = 0.0007196 % Correct digits = 5 Radius of convergence (given) for eq 1 = 3.24 Order of pole (given) = 0.5 0 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 0.5517 2.001 h = 0.003 0.006 y[1] (numeric) = 3.34775336632 2.06616715665 y[1] (closed_form) = 3.34775141997 2.06613908407 absolute error = 2.814e-05 relative error = 0.0007153 % Correct digits = 5 Radius of convergence (given) for eq 1 = 3.243 Order of pole (given) = 0.5 0 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 0.5547 2.007 h = 0.0001 0.005 y[1] (numeric) = 3.35210662441 2.07161833144 y[1] (closed_form) = 3.35210460581 2.07158908033 absolute error = 2.932e-05 relative error = 0.0007441 % Correct digits = 5 Radius of convergence (given) for eq 1 = 3.249 Order of pole (given) = 0.5 0 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 0.5548 2.012 h = 0.0001 0.003 y[1] (numeric) = 3.353296366 2.07667889476 y[1] (closed_form) = 3.35329426301 2.07665040501 absolute error = 2.857e-05 relative error = 0.0007243 % Correct digits = 5 Radius of convergence (given) for eq 1 = 3.252 Order of pole (given) = 0.5 0 NO 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=4695.9MB, alloc=52.3MB, time=57.16 x[1] = 0.5549 2.015 h = 0.001 0.001 y[1] (numeric) = 3.35405227531 2.07970660762 y[1] (closed_form) = 3.35404988096 2.07967818773 absolute error = 2.852e-05 relative error = 0.0007227 % Correct digits = 5 Radius of convergence (given) for eq 1 = 3.254 Order of pole (given) = 0.5 0 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 0.5559 2.016 h = 0.0001 0.004 y[1] (numeric) = 3.35528701247 2.08050478527 y[1] (closed_form) = 3.35528448736 2.08047644816 absolute error = 2.845e-05 relative error = 0.0007206 % Correct digits = 5 Radius of convergence (given) for eq 1 = 3.255 Order of pole (given) = 0.5 0 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 0.556 2.02 h = 0.003 0.006 y[1] (numeric) = 3.3562616471 2.08454822283 y[1] (closed_form) = 3.35625974586 2.08451992615 absolute error = 2.836e-05 relative error = 0.0007178 % Correct digits = 5 Radius of convergence (given) for eq 1 = 3.258 Order of pole (given) = 0.5 0 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 0.559 2.026 h = 0.0001 0.005 y[1] (numeric) = 3.3606231382 2.08998927621 y[1] (closed_form) = 3.36062116416 2.08995980385 absolute error = 2.954e-05 relative error = 0.0007464 % Correct digits = 5 Radius of convergence (given) for eq 1 = 3.264 Order of pole (given) = 0.5 0 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 0.5591 2.031 h = 0.0001 0.003 y[1] (numeric) = 3.36182165344 2.09504566418 y[1] (closed_form) = 3.36181959567 2.09501695143 absolute error = 2.879e-05 relative error = 0.0007267 % Correct digits = 5 Radius of convergence (given) for eq 1 = 3.267 Order of pole (given) = 0.5 0 NO 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=4741.2MB, alloc=52.3MB, time=57.72 x[1] = 0.5592 2.034 h = 0.001 0.001 y[1] (numeric) = 3.36258279166 2.09807079995 y[1] (closed_form) = 3.36258044326 2.09804215707 absolute error = 2.874e-05 relative error = 0.0007251 % Correct digits = 5 Radius of convergence (given) for eq 1 = 3.269 Order of pole (given) = 0.5 0 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 0.5602 2.035 h = 0.001 0.003 y[1] (numeric) = 3.36381849792 2.09886640841 y[1] (closed_form) = 3.36381601914 2.09883784818 absolute error = 2.867e-05 relative error = 0.000723 % Correct digits = 5 Radius of convergence (given) for eq 1 = 3.27 Order of pole (given) = 0.5 0 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 0.5612 2.038 h = 0.0001 0.004 y[1] (numeric) = 3.36549407359 2.10169293642 y[1] (closed_form) = 3.36549186732 2.1016642187 absolute error = 2.880e-05 relative error = 0.0007259 % Correct digits = 5 Radius of convergence (given) for eq 1 = 3.273 Order of pole (given) = 0.5 0 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 0.5613 2.042 h = 0.003 0.006 y[1] (numeric) = 3.36647716682 2.10573225136 y[1] (closed_form) = 3.36647519487 2.10570366331 absolute error = 2.866e-05 relative error = 0.0007217 % Correct digits = 5 Radius of convergence (given) for eq 1 = 3.276 Order of pole (given) = 0.5 0 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 0.5643 2.048 h = 0.0001 0.005 y[1] (numeric) = 3.3708480263 2.11116144061 y[1] (closed_form) = 3.37084598097 2.11113168017 absolute error = 2.983e-05 relative error = 0.00075 % Correct digits = 5 Radius of convergence (given) for eq 1 = 3.282 Order of pole (given) = 0.5 0 NO 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=4786.5MB, alloc=52.3MB, time=58.26 x[1] = 0.5644 2.053 h = 0.0001 0.003 y[1] (numeric) = 3.3720566361 2.11621284414 y[1] (closed_form) = 3.37205450778 2.11618384127 absolute error = 2.908e-05 relative error = 0.0007305 % Correct digits = 5 Radius of convergence (given) for eq 1 = 3.285 Order of pole (given) = 0.5 0 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 0.5645 2.056 h = 0.001 0.001 y[1] (numeric) = 3.37282378899 2.11923490659 y[1] (closed_form) = 3.37282137089 2.11920597358 absolute error = 2.903e-05 relative error = 0.0007289 % Correct digits = 5 Radius of convergence (given) for eq 1 = 3.287 Order of pole (given) = 0.5 0 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 0.5655 2.057 h = 0.001 0.003 y[1] (numeric) = 3.37406057492 2.12002752231 y[1] (closed_form) = 3.37405802685 2.11999867181 absolute error = 2.896e-05 relative error = 0.0007268 % Correct digits = 5 Radius of convergence (given) for eq 1 = 3.288 Order of pole (given) = 0.5 0 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 0.5665 2.06 h = 0.0001 0.004 y[1] (numeric) = 3.37574130304 2.12284914575 y[1] (closed_form) = 3.37573902663 2.12282013802 absolute error = 2.910e-05 relative error = 0.0007297 % Correct digits = 5 Radius of convergence (given) for eq 1 = 3.291 Order of pole (given) = 0.5 0 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 0.5666 2.064 h = 0.003 0.006 y[1] (numeric) = 3.37673244091 2.12688443369 y[1] (closed_form) = 3.37673039826 2.12685555512 absolute error = 2.895e-05 relative error = 0.0007255 % Correct digits = 5 Radius of convergence (given) for eq 1 = 3.294 Order of pole (given) = 0.5 0 NO 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=4831.8MB, alloc=52.3MB, time=58.82 x[1] = 0.5696 2.07 h = 0.0001 0.005 y[1] (numeric) = 3.3811126351 2.13230178555 y[1] (closed_form) = 3.38111051853 2.13227173789 absolute error = 3.012e-05 relative error = 0.0007536 % Correct digits = 5 Radius of convergence (given) for eq 1 = 3.3 Order of pole (given) = 0.5 0 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 0.5697 2.075 h = 0.0001 0.003 y[1] (numeric) = 3.38233130835 2.13734821192 y[1] (closed_form) = 3.38232910948 2.13731891978 absolute error = 2.937e-05 relative error = 0.0007342 % Correct digits = 5 Radius of convergence (given) for eq 1 = 3.303 Order of pole (given) = 0.5 0 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 0.5698 2.078 h = 0.001 0.001 y[1] (numeric) = 3.38310445728 2.14036720572 y[1] (closed_form) = 3.38310196948 2.14033798343 absolute error = 2.933e-05 relative error = 0.0007326 % Correct digits = 5 Radius of convergence (given) for eq 1 = 3.305 Order of pole (given) = 0.5 0 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 0.5708 2.079 h = 0.001 0.003 y[1] (numeric) = 3.38434231799 2.14115683628 y[1] (closed_form) = 3.38433970063 2.14112769636 absolute error = 2.926e-05 relative error = 0.0007306 % Correct digits = 5 Radius of convergence (given) for eq 1 = 3.306 Order of pole (given) = 0.5 0 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 0.5718 2.082 h = 0.0001 0.004 y[1] (numeric) = 3.3860281812 2.14397356545 y[1] (closed_form) = 3.38602583465 2.14394426855 absolute error = 2.939e-05 relative error = 0.0007334 % Correct digits = 5 Radius of convergence (given) for eq 1 = 3.309 Order of pole (given) = 0.5 0 NO 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=4877.2MB, alloc=52.3MB, time=59.37 x[1] = 0.5719 2.086 h = 0.003 0.006 y[1] (numeric) = 3.3870273389 2.14800483243 y[1] (closed_form) = 3.38702522554 2.14797566419 absolute error = 2.924e-05 relative error = 0.0007292 % Correct digits = 5 Radius of convergence (given) for eq 1 = 3.312 Order of pole (given) = 0.5 0 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 0.5749 2.092 h = 0.0001 0.005 y[1] (numeric) = 3.39141683453 2.15341037378 y[1] (closed_form) = 3.39141464673 2.15338003973 absolute error = 3.041e-05 relative error = 0.000757 % Correct digits = 5 Radius of convergence (given) for eq 1 = 3.318 Order of pole (given) = 0.5 0 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 0.575 2.097 h = 0.0001 0.003 y[1] (numeric) = 3.39264554031 2.1584518305 y[1] (closed_form) = 3.3926432709 2.15842224994 absolute error = 2.967e-05 relative error = 0.0007378 % Correct digits = 5 Radius of convergence (given) for eq 1 = 3.321 Order of pole (given) = 0.5 0 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 0.5751 2.1 h = 0.001 0.001 y[1] (numeric) = 3.39342466681 2.16146776042 y[1] (closed_form) = 3.39342210932 2.16143824969 absolute error = 2.962e-05 relative error = 0.0007362 % Correct digits = 5 Radius of convergence (given) for eq 1 = 3.323 Order of pole (given) = 0.5 0 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 0.5761 2.101 h = 0.001 0.003 y[1] (numeric) = 3.39466359749 2.16225441344 y[1] (closed_form) = 3.39466091084 2.16222498492 absolute error = 2.955e-05 relative error = 0.0007342 % Correct digits = 5 Radius of convergence (given) for eq 1 = 3.324 Order of pole (given) = 0.5 0 NO 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=4922.4MB, alloc=52.3MB, time=59.92 x[1] = 0.5771 2.104 h = 0.0001 0.004 y[1] (numeric) = 3.39635457856 2.16506625869 y[1] (closed_form) = 3.39635216188 2.16503667347 absolute error = 2.968e-05 relative error = 0.000737 % Correct digits = 5 Radius of convergence (given) for eq 1 = 3.327 Order of pole (given) = 0.5 0 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 0.5772 2.108 h = 0.003 0.006 y[1] (numeric) = 3.39736173147 2.16909351093 y[1] (closed_form) = 3.39735954742 2.16906405388 absolute error = 2.954e-05 relative error = 0.0007328 % Correct digits = 5 Radius of convergence (given) for eq 1 = 3.33 Order of pole (given) = 0.5 0 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 0.5802 2.114 h = 0.0001 0.005 y[1] (numeric) = 3.40176049565 2.1744872688 y[1] (closed_form) = 3.40175823667 2.1744566492 absolute error = 3.070e-05 relative error = 0.0007605 % Correct digits = 5 Radius of convergence (given) for eq 1 = 3.336 Order of pole (given) = 0.5 0 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 0.5803 2.119 h = 0.0001 0.003 y[1] (numeric) = 3.40299920327 2.17952376358 y[1] (closed_form) = 3.40299686335 2.17949389543 absolute error = 2.996e-05 relative error = 0.0007414 % Correct digits = 5 Radius of convergence (given) for eq 1 = 3.339 Order of pole (given) = 0.5 0 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 0.5804 2.122 h = 0.001 0.001 y[1] (numeric) = 3.40378428901 2.18253663453 y[1] (closed_form) = 3.40378166184 2.18250683619 absolute error = 2.991e-05 relative error = 0.0007398 % Correct digits = 5 Radius of convergence (given) for eq 1 = 3.341 Order of pole (given) = 0.5 0 NO 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=4967.8MB, alloc=52.3MB, time=60.47 x[1] = 0.5814 2.123 h = 0.0001 0.004 y[1] (numeric) = 3.40502428493 2.18332031759 y[1] (closed_form) = 3.405021529 2.18329060132 absolute error = 2.984e-05 relative error = 0.0007378 % Correct digits = 5 Radius of convergence (given) for eq 1 = 3.342 Order of pole (given) = 0.5 0 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 0.5815 2.127 h = 0.003 0.006 y[1] (numeric) = 3.40603796447 2.18734430377 y[1] (closed_form) = 3.40603582419 2.1873146255 absolute error = 2.976e-05 relative error = 0.0007351 % Correct digits = 5 Radius of convergence (given) for eq 1 = 3.345 Order of pole (given) = 0.5 0 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 0.5845 2.133 h = 0.0001 0.005 y[1] (numeric) = 3.41044482059 2.19272805041 y[1] (closed_form) = 3.41044260495 2.19269721239 absolute error = 3.092e-05 relative error = 0.0007625 % Correct digits = 5 Radius of convergence (given) for eq 1 = 3.351 Order of pole (given) = 0.5 0 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 0.5846 2.138 h = 0.0001 0.003 y[1] (numeric) = 3.41169217203 2.1977603991 y[1] (closed_form) = 3.41168987604 2.1977303108 absolute error = 3.018e-05 relative error = 0.0007436 % Correct digits = 5 Radius of convergence (given) for eq 1 = 3.354 Order of pole (given) = 0.5 0 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 0.5847 2.141 h = 0.001 0.001 y[1] (numeric) = 3.41248240904 2.20077071172 y[1] (closed_form) = 3.41247982651 2.20074069321 absolute error = 3.013e-05 relative error = 0.000742 % Correct digits = 5 Radius of convergence (given) for eq 1 = 3.356 Order of pole (given) = 0.5 0 NO 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=5013.1MB, alloc=52.3MB, time=61.02 x[1] = 0.5857 2.142 h = 0.001 0.003 y[1] (numeric) = 3.41372335342 2.20155185704 y[1] (closed_form) = 3.41372064248 2.20152192047 absolute error = 3.006e-05 relative error = 0.00074 % Correct digits = 5 Radius of convergence (given) for eq 1 = 3.358 Order of pole (given) = 0.5 0 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 0.5867 2.145 h = 0.0001 0.004 y[1] (numeric) = 3.41542387032 2.20435470286 y[1] (closed_form) = 3.41542142781 2.20432461008 absolute error = 3.019e-05 relative error = 0.0007427 % Correct digits = 5 Radius of convergence (given) for eq 1 = 3.36 Order of pole (given) = 0.5 0 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 0.5868 2.149 h = 0.003 0.006 y[1] (numeric) = 3.41644588315 2.20837459627 y[1] (closed_form) = 3.4164436722 2.20834463075 absolute error = 3.005e-05 relative error = 0.0007386 % Correct digits = 5 Radius of convergence (given) for eq 1 = 3.363 Order of pole (given) = 0.5 0 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 0.5898 2.155 h = 0.0001 0.005 y[1] (numeric) = 3.42086194731 2.21374660965 y[1] (closed_form) = 3.42085966057 2.21371548763 absolute error = 3.121e-05 relative error = 0.0007659 % Correct digits = 5 Radius of convergence (given) for eq 1 = 3.369 Order of pole (given) = 0.5 0 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 0.5899 2.16 h = 0.0001 0.003 y[1] (numeric) = 3.42211924398 2.21877401094 y[1] (closed_form) = 3.42211687751 2.21874363661 absolute error = 3.047e-05 relative error = 0.000747 % Correct digits = 5 Radius of convergence (given) for eq 1 = 3.372 Order of pole (given) = 0.5 0 NO 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=5058.4MB, alloc=52.3MB, time=61.58 x[1] = 0.59 2.163 h = 0.001 0.001 y[1] (numeric) = 3.42291540637 2.22178127384 y[1] (closed_form) = 3.42291275419 2.22175096926 absolute error = 3.042e-05 relative error = 0.0007455 % Correct digits = 5 Radius of convergence (given) for eq 1 = 3.374 Order of pole (given) = 0.5 0 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 0.591 2.164 h = 0.001 0.003 y[1] (numeric) = 3.42415740732 2.22255946328 y[1] (closed_form) = 3.42415462714 2.22252924049 absolute error = 3.035e-05 relative error = 0.0007435 % Correct digits = 5 Radius of convergence (given) for eq 1 = 3.376 Order of pole (given) = 0.5 0 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 0.592 2.167 h = 0.0001 0.004 y[1] (numeric) = 3.42586299369 2.22535745512 y[1] (closed_form) = 3.4258604811 2.22532707642 absolute error = 3.048e-05 relative error = 0.0007462 % Correct digits = 5 Radius of convergence (given) for eq 1 = 3.379 Order of pole (given) = 0.5 0 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 0.5921 2.171 h = 0.003 0.006 y[1] (numeric) = 3.42689293216 2.2293733522 y[1] (closed_form) = 3.42689065057 2.22934310027 absolute error = 3.034e-05 relative error = 0.0007421 % Correct digits = 5 Radius of convergence (given) for eq 1 = 3.381 Order of pole (given) = 0.5 0 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 0.5951 2.177 h = 0.0001 0.005 y[1] (numeric) = 3.43131817256 2.23473365968 y[1] (closed_form) = 3.43131581477 2.23470225447 absolute error = 3.149e-05 relative error = 0.0007691 % Correct digits = 5 Radius of convergence (given) for eq 1 = 3.387 Order of pole (given) = 0.5 0 NO 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=5103.8MB, alloc=52.3MB, time=62.12 x[1] = 0.5952 2.182 h = 0.0001 0.003 y[1] (numeric) = 3.43258538437 2.23975612186 y[1] (closed_form) = 3.43258294746 2.23972546233 absolute error = 3.076e-05 relative error = 0.0007504 % Correct digits = 5 Radius of convergence (given) for eq 1 = 3.391 Order of pole (given) = 0.5 0 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 0.5953 2.185 h = 0.001 0.001 y[1] (numeric) = 3.43338745417 2.24276034029 y[1] (closed_form) = 3.43338473238 2.24272975047 absolute error = 3.071e-05 relative error = 0.0007489 % Correct digits = 5 Radius of convergence (given) for eq 1 = 3.393 Order of pole (given) = 0.5 0 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 0.5963 2.186 h = 0.001 0.003 y[1] (numeric) = 3.43463050722 2.24353558145 y[1] (closed_form) = 3.43462765783 2.24350507326 absolute error = 3.064e-05 relative error = 0.0007469 % Correct digits = 5 Radius of convergence (given) for eq 1 = 3.394 Order of pole (given) = 0.5 0 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 0.5973 2.189 h = 0.0001 0.004 y[1] (numeric) = 3.43634114649 2.24632873 y[1] (closed_form) = 3.43633856386 2.24629806619 absolute error = 3.077e-05 relative error = 0.0007496 % Correct digits = 5 Radius of convergence (given) for eq 1 = 3.397 Order of pole (given) = 0.5 0 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 0.5974 2.193 h = 0.003 0.006 y[1] (numeric) = 3.43737898664 2.25034063757 y[1] (closed_form) = 3.43737663444 2.25031010006 absolute error = 3.063e-05 relative error = 0.0007455 % Correct digits = 5 Radius of convergence (given) for eq 1 = 3.399 Order of pole (given) = 0.5 0 NO 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=5149.0MB, alloc=52.3MB, time=62.68 x[1] = 0.6004 2.199 h = 0.0001 0.005 y[1] (numeric) = 3.44181337186 2.25568926663 y[1] (closed_form) = 3.44181094307 2.25565757906 absolute error = 3.178e-05 relative error = 0.0007723 % Correct digits = 5 Radius of convergence (given) for eq 1 = 3.406 Order of pole (given) = 0.5 0 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 0.6005 2.204 h = 0.0001 0.003 y[1] (numeric) = 3.44309046895 2.26070679818 y[1] (closed_form) = 3.44308796165 2.26067585428 absolute error = 3.105e-05 relative error = 0.0007537 % Correct digits = 5 Radius of convergence (given) for eq 1 = 3.409 Order of pole (given) = 0.5 0 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 0.6006 2.207 h = 0.001 0.001 y[1] (numeric) = 3.44389842831 2.26370797751 y[1] (closed_form) = 3.44389563695 2.26367710327 absolute error = 3.100e-05 relative error = 0.0007522 % Correct digits = 5 Radius of convergence (given) for eq 1 = 3.411 Order of pole (given) = 0.5 0 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 0.6016 2.208 h = 0.001 0.003 y[1] (numeric) = 3.44514252906 2.26448027797 y[1] (closed_form) = 3.44513961048 2.26444948519 absolute error = 3.093e-05 relative error = 0.0007503 % Correct digits = 5 Radius of convergence (given) for eq 1 = 3.412 Order of pole (given) = 0.5 0 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 0.6026 2.211 h = 0.0001 0.004 y[1] (numeric) = 3.44685820483 2.267268594 y[1] (closed_form) = 3.44685555221 2.2672376459 absolute error = 3.106e-05 relative error = 0.0007529 % Correct digits = 5 Radius of convergence (given) for eq 1 = 3.415 Order of pole (given) = 0.5 0 NO 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=5194.4MB, alloc=52.3MB, time=63.23 x[1] = 0.6027 2.215 h = 0.003 0.006 y[1] (numeric) = 3.44790392288 2.27127651904 y[1] (closed_form) = 3.44790150012 2.27124569679 absolute error = 3.092e-05 relative error = 0.0007488 % Correct digits = 5 Radius of convergence (given) for eq 1 = 3.418 Order of pole (given) = 0.5 0 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 0.6057 2.221 h = 0.0001 0.005 y[1] (numeric) = 3.45234742184 2.27661349726 y[1] (closed_form) = 3.45234492213 2.27658152815 absolute error = 3.207e-05 relative error = 0.0007754 % Correct digits = 5 Radius of convergence (given) for eq 1 = 3.424 Order of pole (given) = 0.5 0 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 0.6058 2.226 h = 0.0001 0.003 y[1] (numeric) = 3.45363437456 2.28162610686 y[1] (closed_form) = 3.45363179691 2.2815948794 absolute error = 3.133e-05 relative error = 0.000757 % Correct digits = 5 Radius of convergence (given) for eq 1 = 3.427 Order of pole (given) = 0.5 0 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 0.6059 2.229 h = 0.001 0.001 y[1] (numeric) = 3.45444820577 2.28462425255 y[1] (closed_form) = 3.45444534488 2.28459309469 absolute error = 3.129e-05 relative error = 0.0007555 % Correct digits = 5 Radius of convergence (given) for eq 1 = 3.429 Order of pole (given) = 0.5 0 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 0.6069 2.23 h = 0.0001 0.004 y[1] (numeric) = 3.45569334988 2.2853936199 y[1] (closed_form) = 3.45569036217 2.28536254335 absolute error = 3.122e-05 relative error = 0.0007536 % Correct digits = 5 Radius of convergence (given) for eq 1 = 3.431 Order of pole (given) = 0.5 0 NO 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=5239.7MB, alloc=52.3MB, time=63.78 x[1] = 0.607 2.234 h = 0.003 0.006 y[1] (numeric) = 3.4567454992 2.28939830559 y[1] (closed_form) = 3.45674311902 2.28936726498 absolute error = 3.113e-05 relative error = 0.0007509 % Correct digits = 5 Radius of convergence (given) for eq 1 = 3.433 Order of pole (given) = 0.5 0 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 0.61 2.24 h = 0.0001 0.005 y[1] (numeric) = 3.46119695669 2.29472538537 y[1] (closed_form) = 3.46119449925 2.29469320065 absolute error = 3.228e-05 relative error = 0.0007773 % Correct digits = 5 Radius of convergence (given) for eq 1 = 3.439 Order of pole (given) = 0.5 0 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 0.6101 2.245 h = 0.0001 0.003 y[1] (numeric) = 3.46249242772 2.29973388231 y[1] (closed_form) = 3.46248989284 2.29970243752 absolute error = 3.155e-05 relative error = 0.000759 % Correct digits = 5 Radius of convergence (given) for eq 1 = 3.443 Order of pole (given) = 0.5 0 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 0.6102 2.248 h = 0.001 0.001 y[1] (numeric) = 3.46331133519 2.30272949087 y[1] (closed_form) = 3.46330851777 2.30269811565 absolute error = 3.150e-05 relative error = 0.0007574 % Correct digits = 5 Radius of convergence (given) for eq 1 = 3.445 Order of pole (given) = 0.5 0 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 0.6112 2.249 h = 0.001 0.003 y[1] (numeric) = 3.4645574088 2.30349635192 y[1] (closed_form) = 3.46455446489 2.30346505787 absolute error = 3.143e-05 relative error = 0.0007555 % Correct digits = 5 Radius of convergence (given) for eq 1 = 3.446 Order of pole (given) = 0.5 0 NO 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=5284.9MB, alloc=52.3MB, time=64.33 x[1] = 0.6122 2.252 h = 0.0001 0.004 y[1] (numeric) = 3.46628247052 2.30627576418 y[1] (closed_form) = 3.46627979107 2.30624431535 absolute error = 3.156e-05 relative error = 0.0007581 % Correct digits = 5 Radius of convergence (given) for eq 1 = 3.449 Order of pole (given) = 0.5 0 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 0.6123 2.256 h = 0.003 0.006 y[1] (numeric) = 3.467342832 2.31027639094 y[1] (closed_form) = 3.46734038135 2.3102450671 absolute error = 3.142e-05 relative error = 0.0007541 % Correct digits = 5 Radius of convergence (given) for eq 1 = 3.452 Order of pole (given) = 0.5 0 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 0.6153 2.262 h = 0.0001 0.005 y[1] (numeric) = 3.47180334605 2.31559187109 y[1] (closed_form) = 3.47180081783 2.31555940633 absolute error = 3.256e-05 relative error = 0.0007803 % Correct digits = 5 Radius of convergence (given) for eq 1 = 3.458 Order of pole (given) = 0.5 0 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 0.6154 2.267 h = 0.0001 0.003 y[1] (numeric) = 3.47310861799 2.32059546232 y[1] (closed_form) = 3.47310601287 2.32056373549 absolute error = 3.183e-05 relative error = 0.0007621 % Correct digits = 5 Radius of convergence (given) for eq 1 = 3.461 Order of pole (given) = 0.5 0 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 0.6155 2.27 h = 0.001 0.001 y[1] (numeric) = 3.47393336462 2.3235880475 y[1] (closed_form) = 3.47393047776 2.32355639017 absolute error = 3.179e-05 relative error = 0.0007606 % Correct digits = 5 Radius of convergence (given) for eq 1 = 3.463 Order of pole (given) = 0.5 0 NO 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=5330.3MB, alloc=52.3MB, time=64.88 x[1] = 0.6165 2.271 h = 0.001 0.003 y[1] (numeric) = 3.47518047367 2.32435198949 y[1] (closed_form) = 3.4751774607 2.32432041316 absolute error = 3.172e-05 relative error = 0.0007587 % Correct digits = 5 Radius of convergence (given) for eq 1 = 3.465 Order of pole (given) = 0.5 0 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 0.6175 2.274 h = 0.0001 0.004 y[1] (numeric) = 3.47691052575 2.32712660021 y[1] (closed_form) = 3.47690777645 2.32709486941 absolute error = 3.185e-05 relative error = 0.0007613 % Correct digits = 5 Radius of convergence (given) for eq 1 = 3.467 Order of pole (given) = 0.5 0 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 0.6176 2.278 h = 0.003 0.006 y[1] (numeric) = 3.47797869793 2.33112326493 y[1] (closed_form) = 3.47797617685 2.33109165869 absolute error = 3.171e-05 relative error = 0.0007573 % Correct digits = 5 Radius of convergence (given) for eq 1 = 3.47 Order of pole (given) = 0.5 0 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 0.6206 2.284 h = 0.0001 0.005 y[1] (numeric) = 3.48244823848 2.3364271733 y[1] (closed_form) = 3.48244563954 2.3363944293 absolute error = 3.285e-05 relative error = 0.0007833 % Correct digits = 5 Radius of convergence (given) for eq 1 = 3.476 Order of pole (given) = 0.5 0 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 0.6207 2.289 h = 0.0001 0.003 y[1] (numeric) = 3.48376328227 2.34142586799 y[1] (closed_form) = 3.48376060697 2.34139385993 absolute error = 3.212e-05 relative error = 0.0007652 % Correct digits = 5 Radius of convergence (given) for eq 1 = 3.48 Order of pole (given) = 0.5 0 NO 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=5375.6MB, alloc=52.3MB, time=65.44 x[1] = 0.6208 2.292 h = 0.001 0.001 y[1] (numeric) = 3.48459385071 2.34441543555 y[1] (closed_form) = 3.48459089447 2.34438349692 absolute error = 3.208e-05 relative error = 0.0007637 % Correct digits = 5 Radius of convergence (given) for eq 1 = 3.482 Order of pole (given) = 0.5 0 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 0.6218 2.293 h = 0.001 0.003 y[1] (numeric) = 3.48584199108 2.34517646605 y[1] (closed_form) = 3.48583890911 2.34514460825 absolute error = 3.201e-05 relative error = 0.0007618 % Correct digits = 5 Radius of convergence (given) for eq 1 = 3.483 Order of pole (given) = 0.5 0 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 0.6228 2.296 h = 0.0001 0.004 y[1] (numeric) = 3.48757701775 2.34794628625 y[1] (closed_form) = 3.48757419866 2.3479142743 absolute error = 3.214e-05 relative error = 0.0007644 % Correct digits = 5 Radius of convergence (given) for eq 1 = 3.486 Order of pole (given) = 0.5 0 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 0.6229 2.3 h = 0.003 0.006 y[1] (numeric) = 3.48865297747 2.35193899645 y[1] (closed_form) = 3.48865038604 2.35190710862 absolute error = 3.199e-05 relative error = 0.0007604 % Correct digits = 5 Radius of convergence (given) for eq 1 = 3.488 Order of pole (given) = 0.5 0 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 0.6259 2.306 h = 0.0001 0.005 y[1] (numeric) = 3.49313151482 2.35723136098 y[1] (closed_form) = 3.49312884527 2.35719833854 absolute error = 3.313e-05 relative error = 0.0007862 % Correct digits = 5 Radius of convergence (given) for eq 1 = 3.495 Order of pole (given) = 0.5 0 NO 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=5421.0MB, alloc=52.3MB, time=65.99 x[1] = 0.626 2.311 h = 0.0001 0.003 y[1] (numeric) = 3.49445630162 2.36222516846 y[1] (closed_form) = 3.49445355621 2.36219287997 absolute error = 3.240e-05 relative error = 0.0007683 % Correct digits = 5 Radius of convergence (given) for eq 1 = 3.498 Order of pole (given) = 0.5 0 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 0.6261 2.314 h = 0.001 0.001 y[1] (numeric) = 3.49529267464 2.36521172426 y[1] (closed_form) = 3.4952896491 2.36517950513 absolute error = 3.236e-05 relative error = 0.0007668 % Correct digits = 5 Radius of convergence (given) for eq 1 = 3.5 Order of pole (given) = 0.5 0 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 0.6271 2.315 h = 0.001 0.003 y[1] (numeric) = 3.49654184229 2.36596985083 y[1] (closed_form) = 3.4965386914 2.36593771236 absolute error = 3.229e-05 relative error = 0.0007649 % Correct digits = 5 Radius of convergence (given) for eq 1 = 3.502 Order of pole (given) = 0.5 0 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 0.6281 2.318 h = 0.0001 0.004 y[1] (numeric) = 3.49828182793 2.3687348916 y[1] (closed_form) = 3.49827893913 2.36870259929 absolute error = 3.242e-05 relative error = 0.0007674 % Correct digits = 5 Radius of convergence (given) for eq 1 = 3.504 Order of pole (given) = 0.5 0 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 0.6282 2.322 h = 0.003 0.006 y[1] (numeric) = 3.49936555223 2.37272365494 y[1] (closed_form) = 3.49936289051 2.37269148632 absolute error = 3.228e-05 relative error = 0.0007635 % Correct digits = 5 Radius of convergence (given) for eq 1 = 3.507 Order of pole (given) = 0.5 0 NO 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=5466.5MB, alloc=52.3MB, time=66.54 x[1] = 0.6312 2.328 h = 0.0001 0.005 y[1] (numeric) = 3.50385305701 2.37800450363 y[1] (closed_form) = 3.50385031693 2.37797120353 absolute error = 3.341e-05 relative error = 0.000789 % Correct digits = 5 Radius of convergence (given) for eq 1 = 3.513 Order of pole (given) = 0.5 0 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 0.6313 2.333 h = 0.0001 0.003 y[1] (numeric) = 3.50518755816 2.38299343339 y[1] (closed_form) = 3.50518474273 2.38296086528 absolute error = 3.269e-05 relative error = 0.0007713 % Correct digits = 5 Radius of convergence (given) for eq 1 = 3.517 Order of pole (given) = 0.5 0 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 0.6314 2.336 h = 0.001 0.001 y[1] (numeric) = 3.50602971867 2.38597698339 y[1] (closed_form) = 3.50602662389 2.38594448455 absolute error = 3.265e-05 relative error = 0.0007698 % Correct digits = 5 Radius of convergence (given) for eq 1 = 3.519 Order of pole (given) = 0.5 0 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 0.6324 2.337 h = 0.0001 0.004 y[1] (numeric) = 3.50727990965 2.38673221359 y[1] (closed_form) = 3.50727668989 2.38669979523 absolute error = 3.258e-05 relative error = 0.0007679 % Correct digits = 5 Radius of convergence (given) for eq 1 = 3.52 Order of pole (given) = 0.5 0 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 0.6325 2.341 h = 0.003 0.006 y[1] (numeric) = 3.50836997308 2.39071776706 y[1] (closed_form) = 3.50836735288 2.39068538291 absolute error = 3.249e-05 relative error = 0.0007653 % Correct digits = 5 Radius of convergence (given) for eq 1 = 3.523 Order of pole (given) = 0.5 0 NO 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=5511.7MB, alloc=52.3MB, time=67.09 x[1] = 0.6355 2.347 h = 0.0001 0.005 y[1] (numeric) = 3.51286531018 2.39598883213 y[1] (closed_form) = 3.51286261142 2.3959553192 absolute error = 3.362e-05 relative error = 0.0007907 % Correct digits = 5 Radius of convergence (given) for eq 1 = 3.529 Order of pole (given) = 0.5 0 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 0.6356 2.352 h = 0.0001 0.003 y[1] (numeric) = 3.5142082083 2.4009736863 y[1] (closed_form) = 3.51420543461 2.40094090366 absolute error = 3.290e-05 relative error = 0.000773 % Correct digits = 5 Radius of convergence (given) for eq 1 = 3.532 Order of pole (given) = 0.5 0 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 0.6357 2.355 h = 0.001 0.001 y[1] (numeric) = 3.51505537257 2.40395472251 y[1] (closed_form) = 3.51505232022 2.40392200908 absolute error = 3.286e-05 relative error = 0.0007715 % Correct digits = 5 Radius of convergence (given) for eq 1 = 3.535 Order of pole (given) = 0.5 0 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 0.6367 2.356 h = 0.001 0.003 y[1] (numeric) = 3.51630647566 2.40470747778 y[1] (closed_form) = 3.51630329865 2.40467484468 absolute error = 3.279e-05 relative error = 0.0007697 % Correct digits = 5 Radius of convergence (given) for eq 1 = 3.536 Order of pole (given) = 0.5 0 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 0.6377 2.359 h = 0.0001 0.004 y[1] (numeric) = 3.51805570433 2.40746371346 y[1] (closed_form) = 3.51805278797 2.40743092711 absolute error = 3.292e-05 relative error = 0.0007721 % Correct digits = 5 Radius of convergence (given) for eq 1 = 3.539 Order of pole (given) = 0.5 0 NO 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=5557.1MB, alloc=52.3MB, time=67.64 x[1] = 0.6378 2.363 h = 0.003 0.006 y[1] (numeric) = 3.51915386289 2.41144524526 y[1] (closed_form) = 3.51915117255 2.41141258181 absolute error = 3.277e-05 relative error = 0.0007682 % Correct digits = 5 Radius of convergence (given) for eq 1 = 3.541 Order of pole (given) = 0.5 0 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 0.6408 2.369 h = 0.0001 0.005 y[1] (numeric) = 3.52365811334 2.41670484646 y[1] (closed_form) = 3.52365534423 2.41667105735 absolute error = 3.390e-05 relative error = 0.0007935 % Correct digits = 5 Radius of convergence (given) for eq 1 = 3.548 Order of pole (given) = 0.5 0 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 0.6409 2.374 h = 0.0001 0.003 y[1] (numeric) = 3.52501067294 2.42168484065 y[1] (closed_form) = 3.52500782937 2.42165177986 absolute error = 3.318e-05 relative error = 0.0007759 % Correct digits = 5 Radius of convergence (given) for eq 1 = 3.551 Order of pole (given) = 0.5 0 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 0.641 2.377 h = 0.001 0.001 y[1] (numeric) = 3.52586359312 2.42466288219 y[1] (closed_form) = 3.52586047167 2.42462989051 absolute error = 3.314e-05 relative error = 0.0007744 % Correct digits = 5 Radius of convergence (given) for eq 1 = 3.553 Order of pole (given) = 0.5 0 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 0.642 2.378 h = 0.001 0.003 y[1] (numeric) = 3.52711571226 2.42541275507 y[1] (closed_form) = 3.52711246653 2.42537984356 absolute error = 3.307e-05 relative error = 0.0007726 % Correct digits = 5 Radius of convergence (given) for eq 1 = 3.555 Order of pole (given) = 0.5 0 NO 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=5602.5MB, alloc=52.3MB, time=68.19 x[1] = 0.643 2.381 h = 0.0001 0.004 y[1] (numeric) = 3.5288698559 2.42816424315 y[1] (closed_form) = 3.52886687004 2.42813117871 absolute error = 3.320e-05 relative error = 0.000775 % Correct digits = 5 Radius of convergence (given) for eq 1 = 3.557 Order of pole (given) = 0.5 0 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 0.6431 2.385 h = 0.003 0.006 y[1] (numeric) = 3.52997571411 2.43214185039 y[1] (closed_form) = 3.52997295369 2.43210890844 absolute error = 3.306e-05 relative error = 0.0007712 % Correct digits = 5 Radius of convergence (given) for eq 1 = 3.56 Order of pole (given) = 0.5 0 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 0.6461 2.391 h = 0.0001 0.005 y[1] (numeric) = 3.53448884949 2.43739001593 y[1] (closed_form) = 3.53448601014 2.43735595141 absolute error = 3.418e-05 relative error = 0.0007962 % Correct digits = 5 Radius of convergence (given) for eq 1 = 3.566 Order of pole (given) = 0.5 0 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 0.6462 2.396 h = 0.0001 0.003 y[1] (numeric) = 3.53585104249 2.44236516008 y[1] (closed_form) = 3.53584812913 2.44233182192 absolute error = 3.347e-05 relative error = 0.0007787 % Correct digits = 5 Radius of convergence (given) for eq 1 = 3.57 Order of pole (given) = 0.5 0 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 0.6463 2.399 h = 0.001 0.001 y[1] (numeric) = 3.53670970182 2.44534021315 y[1] (closed_form) = 3.53670651136 2.44530694401 absolute error = 3.342e-05 relative error = 0.0007773 % Correct digits = 5 Radius of convergence (given) for eq 1 = 3.572 Order of pole (given) = 0.5 0 NO 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=5647.9MB, alloc=52.3MB, time=68.74 x[1] = 0.6473 2.4 h = 0.001 0.003 y[1] (numeric) = 3.53796283326 2.44608721118 y[1] (closed_form) = 3.53795951888 2.44605402203 absolute error = 3.335e-05 relative error = 0.0007755 % Correct digits = 5 Radius of convergence (given) for eq 1 = 3.573 Order of pole (given) = 0.5 0 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 0.6483 2.403 h = 0.0001 0.004 y[1] (numeric) = 3.53972187681 2.44883396295 y[1] (closed_form) = 3.53971882156 2.4488006212 absolute error = 3.348e-05 relative error = 0.0007779 % Correct digits = 5 Radius of convergence (given) for eq 1 = 3.576 Order of pole (given) = 0.5 0 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 0.6484 2.407 h = 0.003 0.006 y[1] (numeric) = 3.54083541232 2.45280765375 y[1] (closed_form) = 3.54083258193 2.45277443408 absolute error = 3.334e-05 relative error = 0.000774 % Correct digits = 5 Radius of convergence (given) for eq 1 = 3.579 Order of pole (given) = 0.5 0 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 0.6514 2.413 h = 0.0001 0.005 y[1] (numeric) = 3.54535740454 2.45804441189 y[1] (closed_form) = 3.54535449507 2.45801007275 absolute error = 3.446e-05 relative error = 0.0007988 % Correct digits = 5 Radius of convergence (given) for eq 1 = 3.585 Order of pole (given) = 0.5 0 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 0.6515 2.418 h = 0.0001 0.003 y[1] (numeric) = 3.54672920307 2.46301471608 y[1] (closed_form) = 3.54672622001 2.46298110133 absolute error = 3.375e-05 relative error = 0.0007815 % Correct digits = 5 Radius of convergence (given) for eq 1 = 3.588 Order of pole (given) = 0.5 0 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 0.6516 2.421 h = 0.001 0.001 y[1] (numeric) = 3.54759358491 2.46598678697 y[1] (closed_form) = 3.54759032554 2.46595324115 absolute error = 3.370e-05 relative error = 0.0007801 % Correct digits = 5 memory used=5693.3MB, alloc=52.3MB, time=69.30 Radius of convergence (given) for eq 1 = 3.591 Order of pole (given) = 0.5 0 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 0.6526 2.422 h = 0.001 0.003 y[1] (numeric) = 3.54884772495 2.46673091767 y[1] (closed_form) = 3.54884434202 2.46669745165 absolute error = 3.364e-05 relative error = 0.0007783 % Correct digits = 5 Radius of convergence (given) for eq 1 = 3.592 Order of pole (given) = 0.5 0 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 0.6536 2.425 h = 0.0001 0.004 y[1] (numeric) = 3.55061165353 2.46947294447 y[1] (closed_form) = 3.55060852897 2.46943932619 absolute error = 3.376e-05 relative error = 0.0007807 % Correct digits = 5 Radius of convergence (given) for eq 1 = 3.595 Order of pole (given) = 0.5 0 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 0.6537 2.429 h = 0.003 0.006 y[1] (numeric) = 3.55173284414 2.47344272706 y[1] (closed_form) = 3.55172994387 2.47340923045 absolute error = 3.362e-05 relative error = 0.0007768 % Correct digits = 5 Radius of convergence (given) for eq 1 = 3.598 Order of pole (given) = 0.5 0 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 0.6567 2.435 h = 0.0001 0.005 y[1] (numeric) = 3.55626366543 2.47866810614 y[1] (closed_form) = 3.55626068595 2.47863349314 absolute error = 3.474e-05 relative error = 0.0008014 % Correct digits = 5 Radius of convergence (given) for eq 1 = 3.604 Order of pole (given) = 0.5 0 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 0.6568 2.44 h = 0.0001 0.003 y[1] (numeric) = 3.5576450418 2.48363358056 y[1] (closed_form) = 3.55764198916 2.48359969001 absolute error = 3.403e-05 relative error = 0.0007843 % Correct digits = 5 Radius of convergence (given) for eq 1 = 3.607 Order of pole (given) = 0.5 0 NO 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=5738.8MB, alloc=52.3MB, time=69.85 x[1] = 0.6569 2.443 h = 0.001 0.001 y[1] (numeric) = 3.55851512964 2.48660267566 y[1] (closed_form) = 3.55851180145 2.48656885392 absolute error = 3.399e-05 relative error = 0.0007829 % Correct digits = 5 Radius of convergence (given) for eq 1 = 3.609 Order of pole (given) = 0.5 0 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 0.6579 2.444 h = 0.0001 0.004 y[1] (numeric) = 3.55977027466 2.48734394653 y[1] (closed_form) = 3.55976682327 2.48731020442 absolute error = 3.392e-05 relative error = 0.000781 % Correct digits = 5 Radius of convergence (given) for eq 1 = 3.611 Order of pole (given) = 0.5 0 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 0.658 2.448 h = 0.003 0.006 y[1] (numeric) = 3.56089771537 2.4913105511 y[1] (closed_form) = 3.56089485569 2.49127684177 absolute error = 3.383e-05 relative error = 0.0007785 % Correct digits = 5 Radius of convergence (given) for eq 1 = 3.614 Order of pole (given) = 0.5 0 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 0.661 2.454 h = 0.0001 0.005 y[1] (numeric) = 3.56543624952 2.49652626291 y[1] (closed_form) = 3.56543331049 2.49649143983 absolute error = 3.495e-05 relative error = 0.0008029 % Correct digits = 5 Radius of convergence (given) for eq 1 = 3.62 Order of pole (given) = 0.5 0 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 0.6611 2.459 h = 0.0001 0.003 y[1] (numeric) = 3.56682590553 2.50148770195 y[1] (closed_form) = 3.56682289371 2.50145359964 absolute error = 3.424e-05 relative error = 0.0007858 % Correct digits = 5 Radius of convergence (given) for eq 1 = 3.623 Order of pole (given) = 0.5 0 NO 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=5784.1MB, alloc=52.3MB, time=70.40 x[1] = 0.6612 2.462 h = 0.001 0.001 y[1] (numeric) = 3.5677009271 2.50445430846 y[1] (closed_form) = 3.5676976404 2.50442027488 absolute error = 3.419e-05 relative error = 0.0007844 % Correct digits = 5 Radius of convergence (given) for eq 1 = 3.625 Order of pole (given) = 0.5 0 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 0.6622 2.463 h = 0.001 0.003 y[1] (numeric) = 3.56895696826 2.50519313561 y[1] (closed_form) = 3.56895355868 2.5051591815 absolute error = 3.412e-05 relative error = 0.0007826 % Correct digits = 5 Radius of convergence (given) for eq 1 = 3.627 Order of pole (given) = 0.5 0 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 0.6632 2.466 h = 0.0001 0.004 y[1] (numeric) = 3.57073000353 2.50792645846 y[1] (closed_form) = 3.57072685092 2.50789235272 absolute error = 3.425e-05 relative error = 0.000785 % Correct digits = 5 Radius of convergence (given) for eq 1 = 3.63 Order of pole (given) = 0.5 0 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 0.6633 2.47 h = 0.003 0.006 y[1] (numeric) = 3.57186542627 2.51188908162 y[1] (closed_form) = 3.57186249688 2.51185509681 absolute error = 3.411e-05 relative error = 0.0007812 % Correct digits = 5 Radius of convergence (given) for eq 1 = 3.632 Order of pole (given) = 0.5 0 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 0.6663 2.476 h = 0.0001 0.005 y[1] (numeric) = 3.57641273829 2.51709346688 y[1] (closed_form) = 3.57640972948 2.51705837137 absolute error = 3.522e-05 relative error = 0.0008054 % Correct digits = 5 Radius of convergence (given) for eq 1 = 3.639 Order of pole (given) = 0.5 0 NO 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=5829.5MB, alloc=52.3MB, time=70.96 x[1] = 0.6664 2.481 h = 0.0001 0.003 y[1] (numeric) = 3.57781192103 2.52205009519 y[1] (closed_form) = 3.57780883982 2.52201571851 absolute error = 3.451e-05 relative error = 0.0007885 % Correct digits = 5 Radius of convergence (given) for eq 1 = 3.642 Order of pole (given) = 0.5 0 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 0.6665 2.484 h = 0.001 0.001 y[1] (numeric) = 3.5786926181 2.52501373778 y[1] (closed_form) = 3.57868926277 2.52497942971 absolute error = 3.447e-05 relative error = 0.0007871 % Correct digits = 5 Radius of convergence (given) for eq 1 = 3.644 Order of pole (given) = 0.5 0 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 0.6675 2.485 h = 0.001 0.003 y[1] (numeric) = 3.57994965758 2.52574971901 y[1] (closed_form) = 3.57994617971 2.52571549024 absolute error = 3.441e-05 relative error = 0.0007853 % Correct digits = 5 Radius of convergence (given) for eq 1 = 3.646 Order of pole (given) = 0.5 0 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 0.6685 2.488 h = 0.0001 0.004 y[1] (numeric) = 3.58172753589 2.52847834941 y[1] (closed_form) = 3.58172431427 2.52844396935 absolute error = 3.453e-05 relative error = 0.0007876 % Correct digits = 5 Radius of convergence (given) for eq 1 = 3.648 Order of pole (given) = 0.5 0 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 0.6686 2.492 h = 0.003 0.006 y[1] (numeric) = 3.58287055099 2.53243708823 y[1] (closed_form) = 3.58286755201 2.53240282872 absolute error = 3.439e-05 relative error = 0.0007838 % Correct digits = 5 Radius of convergence (given) for eq 1 = 3.651 Order of pole (given) = 0.5 0 NO 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=5874.9MB, alloc=52.3MB, time=71.50 x[1] = 0.6716 2.498 h = 0.0001 0.005 y[1] (numeric) = 3.58742661401 2.53763017541 y[1] (closed_form) = 3.58742353554 2.53759480823 absolute error = 3.550e-05 relative error = 0.0008079 % Correct digits = 5 Radius of convergence (given) for eq 1 = 3.658 Order of pole (given) = 0.5 0 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 0.6717 2.503 h = 0.0001 0.003 y[1] (numeric) = 3.58883529635 2.54258200357 y[1] (closed_form) = 3.58883214586 2.54254735329 absolute error = 3.479e-05 relative error = 0.0007911 % Correct digits = 5 Radius of convergence (given) for eq 1 = 3.661 Order of pole (given) = 0.5 0 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 0.6718 2.506 h = 0.001 0.001 y[1] (numeric) = 3.58972165272 2.54554268883 y[1] (closed_form) = 3.58971822887 2.54550810704 absolute error = 3.475e-05 relative error = 0.0007897 % Correct digits = 5 Radius of convergence (given) for eq 1 = 3.663 Order of pole (given) = 0.5 0 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 0.6728 2.507 h = 0.001 0.003 y[1] (numeric) = 3.59097968708 2.54627583162 y[1] (closed_form) = 3.59097614104 2.54624132894 absolute error = 3.468e-05 relative error = 0.0007879 % Correct digits = 5 Radius of convergence (given) for eq 1 = 3.665 Order of pole (given) = 0.5 0 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 0.6738 2.51 h = 0.0001 0.004 y[1] (numeric) = 3.59276239409 2.54899978108 y[1] (closed_form) = 3.59275910356 2.54896512746 absolute error = 3.481e-05 relative error = 0.0007902 % Correct digits = 5 Radius of convergence (given) for eq 1 = 3.667 Order of pole (given) = 0.5 0 NO 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=5920.2MB, alloc=52.3MB, time=72.06 x[1] = 0.6739 2.514 h = 0.003 0.006 y[1] (numeric) = 3.59391297994 2.55295464419 y[1] (closed_form) = 3.59390991148 2.55292011073 absolute error = 3.467e-05 relative error = 0.0007865 % Correct digits = 5 Radius of convergence (given) for eq 1 = 3.67 Order of pole (given) = 0.5 0 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 0.6769 2.52 h = 0.0001 0.005 y[1] (numeric) = 3.59847776738 2.5581364618 y[1] (closed_form) = 3.59847461938 2.5581008237 absolute error = 3.578e-05 relative error = 0.0008103 % Correct digits = 5 Radius of convergence (given) for eq 1 = 3.676 Order of pole (given) = 0.5 0 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 0.677 2.525 h = 0.0001 0.003 y[1] (numeric) = 3.59989592238 2.5630835005 y[1] (closed_form) = 3.59989270271 2.56304857738 absolute error = 3.507e-05 relative error = 0.0007936 % Correct digits = 5 Radius of convergence (given) for eq 1 = 3.68 Order of pole (given) = 0.5 0 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 0.6771 2.528 h = 0.001 0.001 y[1] (numeric) = 3.60078792198 2.5660412351 y[1] (closed_form) = 3.60078442972 2.56600638035 absolute error = 3.503e-05 relative error = 0.0007922 % Correct digits = 5 Radius of convergence (given) for eq 1 = 3.682 Order of pole (given) = 0.5 0 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 0.6781 2.529 h = 0.001 0.003 y[1] (numeric) = 3.60204694783 2.56677154692 y[1] (closed_form) = 3.60204333374 2.56673677109 absolute error = 3.496e-05 relative error = 0.0007905 % Correct digits = 5 Radius of convergence (given) for eq 1 = 3.683 Order of pole (given) = 0.5 0 NO 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=5965.5MB, alloc=52.3MB, time=72.61 x[1] = 0.6791 2.532 h = 0.0001 0.004 y[1] (numeric) = 3.60383446932 2.56949082699 y[1] (closed_form) = 3.60383111 2.56945590057 absolute error = 3.509e-05 relative error = 0.0007928 % Correct digits = 5 Radius of convergence (given) for eq 1 = 3.686 Order of pole (given) = 0.5 0 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 0.6792 2.536 h = 0.003 0.006 y[1] (numeric) = 3.60499260448 2.57344182311 y[1] (closed_form) = 3.60498946666 2.57340701648 absolute error = 3.495e-05 relative error = 0.000789 % Correct digits = 5 Radius of convergence (given) for eq 1 = 3.689 Order of pole (given) = 0.5 0 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 0.6822 2.542 h = 0.0001 0.005 y[1] (numeric) = 3.60956609005 2.57861239969 y[1] (closed_form) = 3.60956287265 2.57857649142 absolute error = 3.605e-05 relative error = 0.0008127 % Correct digits = 5 Radius of convergence (given) for eq 1 = 3.695 Order of pole (given) = 0.5 0 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 0.6823 2.547 h = 0.0001 0.003 y[1] (numeric) = 3.61099369094 2.58355465977 y[1] (closed_form) = 3.61099040223 2.58351946457 absolute error = 3.535e-05 relative error = 0.0007961 % Correct digits = 5 Radius of convergence (given) for eq 1 = 3.699 Order of pole (given) = 0.5 0 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 0.6824 2.55 h = 0.001 0.001 y[1] (numeric) = 3.61189131782 2.58650945045 y[1] (closed_form) = 3.61188775727 2.58647432349 absolute error = 3.531e-05 relative error = 0.0007948 % Correct digits = 5 Radius of convergence (given) for eq 1 = 3.701 Order of pole (given) = 0.5 0 NO 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=6010.9MB, alloc=52.3MB, time=73.16 x[1] = 0.6834 2.551 h = 0.0001 0.004 y[1] (numeric) = 3.61315133185 2.58723693875 y[1] (closed_form) = 3.61314764981 2.58720189052 absolute error = 3.524e-05 relative error = 0.000793 % Correct digits = 5 Radius of convergence (given) for eq 1 = 3.702 Order of pole (given) = 0.5 0 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 0.6835 2.555 h = 0.003 0.006 y[1] (numeric) = 3.61431563109 2.59118479076 y[1] (closed_form) = 3.61431253303 2.59114977417 absolute error = 3.515e-05 relative error = 0.0007905 % Correct digits = 5 Radius of convergence (given) for eq 1 = 3.705 Order of pole (given) = 0.5 0 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 0.6865 2.561 h = 0.0001 0.005 y[1] (numeric) = 3.61889671632 2.5963458175 y[1] (closed_form) = 3.61889353864 2.59630970187 absolute error = 3.626e-05 relative error = 0.000814 % Correct digits = 5 Radius of convergence (given) for eq 1 = 3.712 Order of pole (given) = 0.5 0 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 0.6866 2.566 h = 0.0001 0.003 y[1] (numeric) = 3.6203324834 2.60128408516 y[1] (closed_form) = 3.62032923472 2.60124868093 absolute error = 3.555e-05 relative error = 0.0007975 % Correct digits = 5 Radius of convergence (given) for eq 1 = 3.715 Order of pole (given) = 0.5 0 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 0.6867 2.569 h = 0.001 0.001 y[1] (numeric) = 3.62123497632 2.60423641402 y[1] (closed_form) = 3.62123145644 2.60420107794 absolute error = 3.551e-05 relative error = 0.0007961 % Correct digits = 5 Radius of convergence (given) for eq 1 = 3.717 Order of pole (given) = 0.5 0 NO 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=6056.3MB, alloc=52.3MB, time=73.71 x[1] = 0.6877 2.57 h = 0.001 0.003 y[1] (numeric) = 3.62249587184 2.6049614896 y[1] (closed_form) = 3.62249223077 2.60492623209 absolute error = 3.545e-05 relative error = 0.0007944 % Correct digits = 5 Radius of convergence (given) for eq 1 = 3.719 Order of pole (given) = 0.5 0 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 0.6887 2.573 h = 0.0001 0.004 y[1] (numeric) = 3.62429236985 2.60767216882 y[1] (closed_form) = 3.62428898222 2.60763676137 absolute error = 3.557e-05 relative error = 0.0007966 % Correct digits = 5 Radius of convergence (given) for eq 1 = 3.721 Order of pole (given) = 0.5 0 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 0.6888 2.577 h = 0.003 0.006 y[1] (numeric) = 3.62546454176 2.61161608226 y[1] (closed_form) = 3.62546137456 2.61158079391 absolute error = 3.543e-05 relative error = 0.000793 % Correct digits = 5 Radius of convergence (given) for eq 1 = 3.724 Order of pole (given) = 0.5 0 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 0.6918 2.583 h = 0.0001 0.005 y[1] (numeric) = 3.63005427663 2.61676592086 y[1] (closed_form) = 3.63005102981 2.61672953645 absolute error = 3.653e-05 relative error = 0.0008163 % Correct digits = 5 Radius of convergence (given) for eq 1 = 3.731 Order of pole (given) = 0.5 0 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 0.6919 2.588 h = 0.0001 0.003 y[1] (numeric) = 3.63149944018 2.62169943003 y[1] (closed_form) = 3.63149612268 2.62166375512 absolute error = 3.583e-05 relative error = 0.0007999 % Correct digits = 5 Radius of convergence (given) for eq 1 = 3.734 Order of pole (given) = 0.5 0 NO 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=6101.7MB, alloc=52.3MB, time=74.26 x[1] = 0.692 2.591 h = 0.001 0.001 y[1] (numeric) = 3.6324075309 2.62464882749 y[1] (closed_form) = 3.63240394295 2.62461322059 absolute error = 3.579e-05 relative error = 0.0007986 % Correct digits = 5 Radius of convergence (given) for eq 1 = 3.736 Order of pole (given) = 0.5 0 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 0.693 2.592 h = 0.001 0.003 y[1] (numeric) = 3.6336694085 2.62537109334 y[1] (closed_form) = 3.63366569971 2.62533556483 absolute error = 3.572e-05 relative error = 0.0007969 % Correct digits = 5 Radius of convergence (given) for eq 1 = 3.738 Order of pole (given) = 0.5 0 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 0.694 2.595 h = 0.0001 0.004 y[1] (numeric) = 3.63547068091 2.62807713622 y[1] (closed_form) = 3.63546722484 2.62804145812 absolute error = 3.585e-05 relative error = 0.0007991 % Correct digits = 5 Radius of convergence (given) for eq 1 = 3.741 Order of pole (given) = 0.5 0 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 0.6941 2.599 h = 0.003 0.006 y[1] (numeric) = 3.63665034148 2.6320172079 y[1] (closed_form) = 3.63664710526 2.63198164853 absolute error = 3.571e-05 relative error = 0.0007954 % Correct digits = 5 Radius of convergence (given) for eq 1 = 3.743 Order of pole (given) = 0.5 0 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 0.6971 2.605 h = 0.0001 0.005 y[1] (numeric) = 3.64124870053 2.63715588699 y[1] (closed_form) = 3.64124538472 2.63711923453 absolute error = 3.680e-05 relative error = 0.0008186 % Correct digits = 5 Radius of convergence (given) for eq 1 = 3.75 Order of pole (given) = 0.5 0 NO 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=6147.1MB, alloc=52.3MB, time=74.81 x[1] = 0.6972 2.61 h = 0.0001 0.003 y[1] (numeric) = 3.64270323432 2.64208464881 y[1] (closed_form) = 3.64269984815 2.64204870396 absolute error = 3.610e-05 relative error = 0.0008023 % Correct digits = 5 Radius of convergence (given) for eq 1 = 3.753 Order of pole (given) = 0.5 0 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 0.6973 2.613 h = 0.001 0.001 y[1] (numeric) = 3.64361690719 2.64503112179 y[1] (closed_form) = 3.64361325131 2.64499524481 absolute error = 3.606e-05 relative error = 0.000801 % Correct digits = 5 Radius of convergence (given) for eq 1 = 3.755 Order of pole (given) = 0.5 0 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 0.6983 2.614 h = 0.001 0.003 y[1] (numeric) = 3.64487976372 2.64575058534 y[1] (closed_form) = 3.64487598734 2.64571478655 absolute error = 3.600e-05 relative error = 0.0007993 % Correct digits = 5 Radius of convergence (given) for eq 1 = 3.757 Order of pole (given) = 0.5 0 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 0.6993 2.617 h = 0.0001 0.004 y[1] (numeric) = 3.64668579683 2.64845200354 y[1] (closed_form) = 3.64668227246 2.64841605554 absolute error = 3.612e-05 relative error = 0.0008014 % Correct digits = 5 Radius of convergence (given) for eq 1 = 3.76 Order of pole (given) = 0.5 0 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 0.6994 2.621 h = 0.003 0.006 y[1] (numeric) = 3.64787292518 2.65238824252 y[1] (closed_form) = 3.64786962009 2.65235241289 absolute error = 3.598e-05 relative error = 0.0007978 % Correct digits = 5 Radius of convergence (given) for eq 1 = 3.762 Order of pole (given) = 0.5 0 NO 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=6192.5MB, alloc=52.3MB, time=75.37 x[1] = 0.7024 2.627 h = 0.0001 0.005 y[1] (numeric) = 3.65247988323 2.65751579076 y[1] (closed_form) = 3.65247649857 2.657478871 absolute error = 3.707e-05 relative error = 0.0008208 % Correct digits = 5 Radius of convergence (given) for eq 1 = 3.769 Order of pole (given) = 0.5 0 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 0.7025 2.632 h = 0.0001 0.003 y[1] (numeric) = 3.65394376121 2.66243981649 y[1] (closed_form) = 3.65394030649 2.66240360244 absolute error = 3.638e-05 relative error = 0.0008047 % Correct digits = 5 Radius of convergence (given) for eq 1 = 3.772 Order of pole (given) = 0.5 0 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 0.7026 2.635 h = 0.001 0.001 y[1] (numeric) = 3.65486300071 2.66538337197 y[1] (closed_form) = 3.65485927702 2.66534722565 absolute error = 3.634e-05 relative error = 0.0008033 % Correct digits = 5 Radius of convergence (given) for eq 1 = 3.775 Order of pole (given) = 0.5 0 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 0.7036 2.636 h = 0.001 0.003 y[1] (numeric) = 3.65612683307 2.66610004061 y[1] (closed_form) = 3.65612298922 2.66606397229 absolute error = 3.627e-05 relative error = 0.0008016 % Correct digits = 5 Radius of convergence (given) for eq 1 = 3.776 Order of pole (given) = 0.5 0 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 0.7046 2.639 h = 0.0001 0.004 y[1] (numeric) = 3.65793761329 2.66879684585 y[1] (closed_form) = 3.65793402075 2.66876062868 absolute error = 3.639e-05 relative error = 0.0008038 % Correct digits = 5 Radius of convergence (given) for eq 1 = 3.779 Order of pole (given) = 0.5 0 NO 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=6237.9MB, alloc=52.3MB, time=75.92 x[1] = 0.7047 2.643 h = 0.003 0.006 y[1] (numeric) = 3.65913218868 2.67272926129 y[1] (closed_form) = 3.65912881485 2.67269316213 absolute error = 3.626e-05 relative error = 0.0008001 % Correct digits = 5 Radius of convergence (given) for eq 1 = 3.782 Order of pole (given) = 0.5 0 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 0.7077 2.649 h = 0.0001 0.005 y[1] (numeric) = 3.66374772082 2.67784570735 y[1] (closed_form) = 3.66374426748 2.67780852102 absolute error = 3.735e-05 relative error = 0.000823 % Correct digits = 5 Radius of convergence (given) for eq 1 = 3.788 Order of pole (given) = 0.5 0 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 0.7078 2.654 h = 0.0001 0.003 y[1] (numeric) = 3.66522091712 2.68276500834 y[1] (closed_form) = 3.66521739401 2.68272852582 absolute error = 3.665e-05 relative error = 0.0008069 % Correct digits = 5 Radius of convergence (given) for eq 1 = 3.792 Order of pole (given) = 0.5 0 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 0.7079 2.657 h = 0.001 0.001 y[1] (numeric) = 3.66614570782 2.68570565335 y[1] (closed_form) = 3.66614191647 2.68566923843 absolute error = 3.661e-05 relative error = 0.0008056 % Correct digits = 5 Radius of convergence (given) for eq 1 = 3.794 Order of pole (given) = 0.5 0 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 0.7089 2.658 h = 0.0001 0.004 y[1] (numeric) = 3.66741051299 2.68641953447 y[1] (closed_form) = 3.66740660181 2.68638319735 absolute error = 3.655e-05 relative error = 0.0008039 % Correct digits = 5 Radius of convergence (given) for eq 1 = 3.795 Order of pole (given) = 0.5 0 NO 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=6283.3MB, alloc=52.3MB, time=76.47 x[1] = 0.709 2.662 h = 0.003 0.006 y[1] (numeric) = 3.66861116929 2.69034884146 y[1] (closed_form) = 3.66860783449 2.69031253508 absolute error = 3.646e-05 relative error = 0.0008014 % Correct digits = 5 Radius of convergence (given) for eq 1 = 3.798 Order of pole (given) = 0.5 0 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 0.712 2.668 h = 0.0001 0.005 y[1] (numeric) = 3.67323419377 2.69545585585 y[1] (closed_form) = 3.67323077948 2.69541846482 absolute error = 3.755e-05 relative error = 0.0008241 % Correct digits = 5 Radius of convergence (given) for eq 1 = 3.804 Order of pole (given) = 0.5 0 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 0.7121 2.673 h = 0.0001 0.003 y[1] (numeric) = 3.67471544648 2.70037120968 y[1] (closed_form) = 3.67471196268 2.70033452085 absolute error = 3.685e-05 relative error = 0.0008082 % Correct digits = 5 Radius of convergence (given) for eq 1 = 3.808 Order of pole (given) = 0.5 0 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 0.7122 2.676 h = 0.001 0.001 y[1] (numeric) = 3.67564503775 2.70330942104 y[1] (closed_form) = 3.67564128635 2.70327279967 absolute error = 3.681e-05 relative error = 0.0008068 % Correct digits = 5 Radius of convergence (given) for eq 1 = 3.81 Order of pole (given) = 0.5 0 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 0.7132 2.677 h = 0.001 0.003 y[1] (numeric) = 3.67691071097 2.70402092019 y[1] (closed_form) = 3.67690684002 2.70398437647 absolute error = 3.675e-05 relative error = 0.0008052 % Correct digits = 5 Radius of convergence (given) for eq 1 = 3.812 Order of pole (given) = 0.5 0 NO 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=6328.6MB, alloc=52.3MB, time=77.03 x[1] = 0.7142 2.68 h = 0.0001 0.004 y[1] (numeric) = 3.67873034335 2.70670922921 y[1] (closed_form) = 3.67872672242 2.7066725373 absolute error = 3.687e-05 relative error = 0.0008073 % Correct digits = 5 Radius of convergence (given) for eq 1 = 3.814 Order of pole (given) = 0.5 0 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 0.7143 2.684 h = 0.003 0.006 y[1] (numeric) = 3.67993876655 2.71063464266 y[1] (closed_form) = 3.67993536326 2.71059806814 absolute error = 3.673e-05 relative error = 0.0008037 % Correct digits = 5 Radius of convergence (given) for eq 1 = 3.817 Order of pole (given) = 0.5 0 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 0.7173 2.69 h = 0.0001 0.005 y[1] (numeric) = 3.68457031915 2.71573060798 y[1] (closed_form) = 3.68456683646 2.71569295173 absolute error = 3.782e-05 relative error = 0.0008262 % Correct digits = 5 Radius of convergence (given) for eq 1 = 3.824 Order of pole (given) = 0.5 0 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 0.7174 2.695 h = 0.0001 0.003 y[1] (numeric) = 3.68606084236 2.72064125815 y[1] (closed_form) = 3.68605729043 2.72060430222 absolute error = 3.713e-05 relative error = 0.0008104 % Correct digits = 5 Radius of convergence (given) for eq 1 = 3.827 Order of pole (given) = 0.5 0 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 0.7175 2.698 h = 0.001 0.001 y[1] (numeric) = 3.68699595633 2.72357657212 y[1] (closed_form) = 3.68699213752 2.7235396835 absolute error = 3.709e-05 relative error = 0.0008091 % Correct digits = 5 Radius of convergence (given) for eq 1 = 3.829 Order of pole (given) = 0.5 0 NO 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=6373.9MB, alloc=52.3MB, time=77.58 x[1] = 0.7185 2.699 h = 0.001 0.003 y[1] (numeric) = 3.68826259676 2.72428529742 y[1] (closed_form) = 3.68825865874 2.72424848625 absolute error = 3.702e-05 relative error = 0.0008074 % Correct digits = 5 Radius of convergence (given) for eq 1 = 3.831 Order of pole (given) = 0.5 0 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 0.7195 2.702 h = 0.0001 0.004 y[1] (numeric) = 3.69008693796 2.72696902694 y[1] (closed_form) = 3.69008324926 2.72693206796 absolute error = 3.714e-05 relative error = 0.0008095 % Correct digits = 5 Radius of convergence (given) for eq 1 = 3.834 Order of pole (given) = 0.5 0 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 0.7196 2.706 h = 0.003 0.006 y[1] (numeric) = 3.69130274954 2.73089064321 y[1] (closed_form) = 3.69129927792 2.73085380127 absolute error = 3.701e-05 relative error = 0.0008059 % Correct digits = 5 Radius of convergence (given) for eq 1 = 3.836 Order of pole (given) = 0.5 0 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 0.7226 2.712 h = 0.0001 0.005 y[1] (numeric) = 3.69594280613 2.73597558818 y[1] (closed_form) = 3.69593925521 2.73593766743 absolute error = 3.809e-05 relative error = 0.0008283 % Correct digits = 5 Radius of convergence (given) for eq 1 = 3.843 Order of pole (given) = 0.5 0 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 0.7227 2.717 h = 0.0001 0.003 y[1] (numeric) = 3.69744257447 2.74088154631 y[1] (closed_form) = 3.69743895456 2.74084432401 absolute error = 3.740e-05 relative error = 0.0008126 % Correct digits = 5 Radius of convergence (given) for eq 1 = 3.846 Order of pole (given) = 0.5 0 NO 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=6419.3MB, alloc=52.3MB, time=78.13 x[1] = 0.7228 2.72 h = 0.001 0.001 y[1] (numeric) = 3.69838319602 2.74381397009 y[1] (closed_form) = 3.69837930995 2.74377681494 absolute error = 3.736e-05 relative error = 0.0008112 % Correct digits = 5 Radius of convergence (given) for eq 1 = 3.849 Order of pole (given) = 0.5 0 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 0.7238 2.721 h = 0.001 0.003 y[1] (numeric) = 3.69965080078 2.74451992888 y[1] (closed_form) = 3.69964679582 2.74448285099 absolute error = 3.729e-05 relative error = 0.0008096 % Correct digits = 5 Radius of convergence (given) for eq 1 = 3.85 Order of pole (given) = 0.5 0 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 0.7248 2.724 h = 0.0001 0.004 y[1] (numeric) = 3.70147983769 2.74719909071 y[1] (closed_form) = 3.70147608137 2.74716186538 absolute error = 3.741e-05 relative error = 0.0008117 % Correct digits = 5 Radius of convergence (given) for eq 1 = 3.853 Order of pole (given) = 0.5 0 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 0.7249 2.728 h = 0.003 0.006 y[1] (numeric) = 3.70270301747 2.75111691924 y[1] (closed_form) = 3.70269947766 2.75107981061 absolute error = 3.728e-05 relative error = 0.0008081 % Correct digits = 5 Radius of convergence (given) for eq 1 = 3.856 Order of pole (given) = 0.5 0 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 0.7279 2.734 h = 0.0001 0.005 y[1] (numeric) = 3.70735155416 2.75619087259 y[1] (closed_form) = 3.70734793517 2.75615268805 absolute error = 3.836e-05 relative error = 0.0008303 % Correct digits = 5 Radius of convergence (given) for eq 1 = 3.862 Order of pole (given) = 0.5 0 NO 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=6464.7MB, alloc=52.3MB, time=78.68 x[1] = 0.728 2.739 h = 0.0001 0.003 y[1] (numeric) = 3.70886054243 2.76109215039 y[1] (closed_form) = 3.7088568547 2.76105466243 absolute error = 3.767e-05 relative error = 0.0008147 % Correct digits = 5 Radius of convergence (given) for eq 1 = 3.866 Order of pole (given) = 0.5 0 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 0.7281 2.742 h = 0.001 0.001 y[1] (numeric) = 3.70980665654 2.76402169122 y[1] (closed_form) = 3.70980270336 2.76398427027 absolute error = 3.763e-05 relative error = 0.0008134 % Correct digits = 5 Radius of convergence (given) for eq 1 = 3.868 Order of pole (given) = 0.5 0 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 0.7291 2.743 h = 0.001 0.003 y[1] (numeric) = 3.7110752228 2.76472489084 y[1] (closed_form) = 3.71107115106 2.76468754694 absolute error = 3.757e-05 relative error = 0.0008117 % Correct digits = 5 Radius of convergence (given) for eq 1 = 3.869 Order of pole (given) = 0.5 0 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 0.7301 2.746 h = 0.0001 0.004 y[1] (numeric) = 3.71290894243 2.76739949679 y[1] (closed_form) = 3.71290511865 2.76736200583 absolute error = 3.769e-05 relative error = 0.0008138 % Correct digits = 5 Radius of convergence (given) for eq 1 = 3.872 Order of pole (given) = 0.5 0 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 0.7302 2.75 h = 0.003 0.006 y[1] (numeric) = 3.71413947036 2.77131354709 y[1] (closed_form) = 3.71413586252 2.7712761725 absolute error = 3.755e-05 relative error = 0.0008103 % Correct digits = 5 Radius of convergence (given) for eq 1 = 3.875 Order of pole (given) = 0.5 0 NO 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=6510.1MB, alloc=52.3MB, time=79.23 x[1] = 0.7332 2.756 h = 0.0001 0.005 y[1] (numeric) = 3.71879646352 2.77637653755 y[1] (closed_form) = 3.71879277663 2.77633808993 absolute error = 3.862e-05 relative error = 0.0008323 % Correct digits = 5 Radius of convergence (given) for eq 1 = 3.881 Order of pole (given) = 0.5 0 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 0.7333 2.761 h = 0.0001 0.003 y[1] (numeric) = 3.72031464669 2.78127314681 y[1] (closed_form) = 3.72031089129 2.78123539393 absolute error = 3.794e-05 relative error = 0.0008168 % Correct digits = 5 Radius of convergence (given) for eq 1 = 3.885 Order of pole (given) = 0.5 0 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 0.7334 2.764 h = 0.001 0.001 y[1] (numeric) = 3.72126623844 2.78419981201 y[1] (closed_form) = 3.72126221831 2.78416212596 absolute error = 3.790e-05 relative error = 0.0008155 % Correct digits = 5 Radius of convergence (given) for eq 1 = 3.887 Order of pole (given) = 0.5 0 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 0.7344 2.765 h = 0.0001 0.004 y[1] (numeric) = 3.72253576342 2.78490025976 y[1] (closed_form) = 3.72253162505 2.78486265057 absolute error = 3.784e-05 relative error = 0.0008139 % Correct digits = 5 Radius of convergence (given) for eq 1 = 3.889 Order of pole (given) = 0.5 0 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 0.7345 2.769 h = 0.003 0.006 y[1] (numeric) = 3.7237722918 2.78881123878 y[1] (closed_form) = 3.72376872235 2.78877365965 absolute error = 3.775e-05 relative error = 0.0008114 % Correct digits = 5 Radius of convergence (given) for eq 1 = 3.892 Order of pole (given) = 0.5 0 NO 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=6555.5MB, alloc=52.3MB, time=79.78 x[1] = 0.7375 2.775 h = 0.0001 0.005 y[1] (numeric) = 3.72843667542 2.79386491613 y[1] (closed_form) = 3.72843302701 2.79382626644 absolute error = 3.882e-05 relative error = 0.0008333 % Correct digits = 5 Radius of convergence (given) for eq 1 = 3.898 Order of pole (given) = 0.5 0 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 0.7376 2.78 h = 0.0001 0.003 y[1] (numeric) = 3.72996280875 2.79875762551 y[1] (closed_form) = 3.72995909204 2.79871966897 absolute error = 3.814e-05 relative error = 0.0008179 % Correct digits = 5 Radius of convergence (given) for eq 1 = 3.902 Order of pole (given) = 0.5 0 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 0.7377 2.783 h = 0.001 0.001 y[1] (numeric) = 3.73091913774 2.80168188634 y[1] (closed_form) = 3.73091515692 2.80164399651 absolute error = 3.810e-05 relative error = 0.0008166 % Correct digits = 5 Radius of convergence (given) for eq 1 = 3.904 Order of pole (given) = 0.5 0 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 0.7387 2.784 h = 0.001 0.003 y[1] (numeric) = 3.73218951844 2.80237998259 y[1] (closed_form) = 3.73218541965 2.80234216945 absolute error = 3.803e-05 relative error = 0.0008149 % Correct digits = 5 Radius of convergence (given) for eq 1 = 3.905 Order of pole (given) = 0.5 0 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 0.7397 2.787 h = 0.0001 0.004 y[1] (numeric) = 3.73403197131 2.80504619806 y[1] (closed_form) = 3.73402811924 2.80500823855 absolute error = 3.815e-05 relative error = 0.000817 % Correct digits = 5 Radius of convergence (given) for eq 1 = 3.908 Order of pole (given) = 0.5 0 NO 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=6600.8MB, alloc=52.3MB, time=80.34 x[1] = 0.7398 2.791 h = 0.003 0.006 y[1] (numeric) = 3.73527616423 2.80895333046 y[1] (closed_form) = 3.73527252704 2.80891548671 absolute error = 3.802e-05 relative error = 0.0008135 % Correct digits = 5 Radius of convergence (given) for eq 1 = 3.911 Order of pole (given) = 0.5 0 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 0.7428 2.797 h = 0.0001 0.005 y[1] (numeric) = 3.7399489607 2.81399609812 y[1] (closed_form) = 3.7399452447 2.81395718668 absolute error = 3.909e-05 relative error = 0.0008352 % Correct digits = 5 Radius of convergence (given) for eq 1 = 3.917 Order of pole (given) = 0.5 0 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 0.7429 2.802 h = 0.0001 0.003 y[1] (numeric) = 3.74148424264 2.81888416085 y[1] (closed_form) = 3.74148045856 2.8188459407 absolute error = 3.841e-05 relative error = 0.0008199 % Correct digits = 5 Radius of convergence (given) for eq 1 = 3.921 Order of pole (given) = 0.5 0 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 0.743 2.805 h = 0.001 0.001 y[1] (numeric) = 3.7424460217 2.82180555957 y[1] (closed_form) = 3.74244197421 2.82176740596 absolute error = 3.837e-05 relative error = 0.0008186 % Correct digits = 5 Radius of convergence (given) for eq 1 = 3.923 Order of pole (given) = 0.5 0 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 0.744 2.806 h = 0.001 0.003 y[1] (numeric) = 3.74371735599 2.82250091749 y[1] (closed_form) = 3.74371319086 2.82246284037 absolute error = 3.830e-05 relative error = 0.000817 % Correct digits = 5 Radius of convergence (given) for eq 1 = 3.925 Order of pole (given) = 0.5 0 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 0.745 2.809 h = 0.0001 0.004 y[1] (numeric) = 3.74556445495 2.82516261084 y[1] (closed_form) = 3.74556053587 2.82512438774 absolute error = 3.842e-05 relative error = 0.000819 % Correct digits = 5 memory used=6646.3MB, alloc=52.3MB, time=80.89 Radius of convergence (given) for eq 1 = 3.928 Order of pole (given) = 0.5 0 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 0.7451 2.813 h = 0.003 0.006 y[1] (numeric) = 3.74681593926 2.82906599234 y[1] (closed_form) = 3.74681223449 2.82902788469 absolute error = 3.829e-05 relative error = 0.0008155 % Correct digits = 5 Radius of convergence (given) for eq 1 = 3.93 Order of pole (given) = 0.5 0 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 0.7481 2.819 h = 0.0001 0.005 y[1] (numeric) = 3.75149712567 2.83409787906 y[1] (closed_form) = 3.75149334226 2.83405870655 absolute error = 3.935e-05 relative error = 0.000837 % Correct digits = 5 Radius of convergence (given) for eq 1 = 3.937 Order of pole (given) = 0.5 0 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 0.7482 2.824 h = 0.0001 0.003 y[1] (numeric) = 3.75304153167 2.83898130715 y[1] (closed_form) = 3.75303768039 2.8389428241 absolute error = 3.868e-05 relative error = 0.0008219 % Correct digits = 5 Radius of convergence (given) for eq 1 = 3.941 Order of pole (given) = 0.5 0 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 0.7483 2.827 h = 0.001 0.001 y[1] (numeric) = 3.75400874617 2.8418998512 y[1] (closed_form) = 3.75400463218 2.84186143452 absolute error = 3.864e-05 relative error = 0.0008206 % Correct digits = 5 Radius of convergence (given) for eq 1 = 3.943 Order of pole (given) = 0.5 0 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 0.7493 2.828 h = 0.001 0.003 y[1] (numeric) = 3.75528103143 2.84259247804 y[1] (closed_form) = 3.75527680011 2.84255413765 absolute error = 3.857e-05 relative error = 0.000819 % Correct digits = 5 Radius of convergence (given) for eq 1 = 3.944 Order of pole (given) = 0.5 0 NO 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=6691.6MB, alloc=52.3MB, time=81.44 x[1] = 0.7503 2.831 h = 0.0001 0.004 y[1] (numeric) = 3.75713276394 2.84524966117 y[1] (closed_form) = 3.75712877801 2.84521117518 absolute error = 3.869e-05 relative error = 0.000821 % Correct digits = 5 Radius of convergence (given) for eq 1 = 3.947 Order of pole (given) = 0.5 0 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 0.7504 2.835 h = 0.003 0.006 y[1] (numeric) = 3.75839152009 2.84914930153 y[1] (closed_form) = 3.75838774791 2.84911093067 absolute error = 3.856e-05 relative error = 0.0008175 % Correct digits = 5 Radius of convergence (given) for eq 1 = 3.95 Order of pole (given) = 0.5 0 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 0.7534 2.841 h = 0.0001 0.005 y[1] (numeric) = 3.76308107376 2.85417033603 y[1] (closed_form) = 3.76307722313 2.85413090316 absolute error = 3.962e-05 relative error = 0.0008389 % Correct digits = 5 Radius of convergence (given) for eq 1 = 3.956 Order of pole (given) = 0.5 0 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 0.7535 2.846 h = 0.0001 0.003 y[1] (numeric) = 3.76463457943 2.85904914158 y[1] (closed_form) = 3.76463066111 2.85901039634 absolute error = 3.894e-05 relative error = 0.0008238 % Correct digits = 5 Radius of convergence (given) for eq 1 = 3.96 Order of pole (given) = 0.5 0 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 0.7536 2.849 h = 0.001 0.001 y[1] (numeric) = 3.76560721483 2.86196483844 y[1] (closed_form) = 3.7656030345 2.86192615939 absolute error = 3.890e-05 relative error = 0.0008225 % Correct digits = 5 Radius of convergence (given) for eq 1 = 3.962 Order of pole (given) = 0.5 0 NO 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=6737.0MB, alloc=52.3MB, time=81.99 x[1] = 0.7546 2.85 h = 0.001 0.003 y[1] (numeric) = 3.76688044846 2.86265474146 y[1] (closed_form) = 3.76687615112 2.8626161385 absolute error = 3.884e-05 relative error = 0.000821 % Correct digits = 5 Radius of convergence (given) for eq 1 = 3.964 Order of pole (given) = 0.5 0 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 0.7556 2.853 h = 0.0001 0.004 y[1] (numeric) = 3.7687368021 2.86530742626 y[1] (closed_form) = 3.7687327495 2.86526867809 absolute error = 3.896e-05 relative error = 0.0008229 % Correct digits = 5 Radius of convergence (given) for eq 1 = 3.966 Order of pole (given) = 0.5 0 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 0.7557 2.857 h = 0.003 0.006 y[1] (numeric) = 3.77000281069 2.86920333528 y[1] (closed_form) = 3.76999897126 2.86916470193 absolute error = 3.882e-05 relative error = 0.0008195 % Correct digits = 5 Radius of convergence (given) for eq 1 = 3.969 Order of pole (given) = 0.5 0 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 0.7587 2.863 h = 0.0001 0.005 y[1] (numeric) = 3.77470070919 2.8742135463 y[1] (closed_form) = 3.77469679151 2.87417385376 absolute error = 3.989e-05 relative error = 0.0008407 % Correct digits = 5 Radius of convergence (given) for eq 1 = 3.976 Order of pole (given) = 0.5 0 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 0.7588 2.868 h = 0.0001 0.003 y[1] (numeric) = 3.77626329029 2.8790877415 y[1] (closed_form) = 3.7762593051 2.87904873476 absolute error = 3.921e-05 relative error = 0.0008257 % Correct digits = 5 Radius of convergence (given) for eq 1 = 3.979 Order of pole (given) = 0.5 0 NO 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=6782.4MB, alloc=52.3MB, time=82.54 x[1] = 0.7589 2.871 h = 0.001 0.001 y[1] (numeric) = 3.77724133216 2.88200059867 y[1] (closed_form) = 3.77723708566 2.88196165795 absolute error = 3.917e-05 relative error = 0.0008245 % Correct digits = 5 Radius of convergence (given) for eq 1 = 3.982 Order of pole (given) = 0.5 0 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 0.7599 2.872 h = 0.001 0.003 y[1] (numeric) = 3.77851551162 2.88268778509 y[1] (closed_form) = 3.77851114842 2.88264892026 absolute error = 3.911e-05 relative error = 0.0008229 % Correct digits = 5 Radius of convergence (given) for eq 1 = 3.983 Order of pole (given) = 0.5 0 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 Finished! diff ( y , x , 1 ) = arccos ( sqrt ( 0.1 * x + 0.2 ) ) ; Iterations = 754 Total Elapsed Time = 1 Minutes 22 Seconds Expected Time Remaining = 0 Seconds Optimized Time Remaining = 0 Seconds Expected Total Time = 1 Minutes 22 Seconds > quit memory used=6808.4MB, alloc=52.3MB, time=82.84