|\^/| Maple 2016 (X86 64 LINUX) ._|\| |/|_. Copyright (c) Maplesoft, a division of Waterloo Maple Inc. 2016 \ MAPLE / All rights reserved. Maple is a trademark of <____ ____> Waterloo Maple Inc. | Type ? for help. #BEGIN OUTFILE1 # before write maple top matter # before write_ats library and user def block #BEGIN ATS LIBRARY BLOCK # Begin Function number 2 > omniout_str := proc(iolevel,str) > global glob_iolevel; > if (glob_iolevel >= iolevel) then # if number 1 > printf("%s\n",str); > fi;# end if 1; > end; omniout_str := proc(iolevel, str) global glob_iolevel; if iolevel <= glob_iolevel then printf("%s\n", str) end if end proc # End Function number 2 # Begin Function number 3 > omniout_str_noeol := proc(iolevel,str) > global glob_iolevel; > if (glob_iolevel >= iolevel) then # if number 1 > printf("%s",str); > fi;# end if 1; > end; omniout_str_noeol := proc(iolevel, str) global glob_iolevel; if iolevel <= glob_iolevel then printf("%s", str) end if end proc # End Function number 3 # Begin Function number 4 > omniout_labstr := proc(iolevel,label,str) > global glob_iolevel; > if (glob_iolevel >= iolevel) then # if number 1 > print(label,str); > fi;# end if 1; > end; omniout_labstr := proc(iolevel, label, str) global glob_iolevel; if iolevel <= glob_iolevel then print(label, str) end if end proc # End Function number 4 # Begin Function number 5 > omniout_float := proc(iolevel,prelabel,prelen,value,vallen,postlabel) > global glob_iolevel; > if (glob_iolevel >= iolevel) then # if number 1 > if vallen = 4 then > printf("%-30s = %-42.4g %s \n",prelabel,value, postlabel); > else > printf("%-30s = %-42.32g %s \n",prelabel,value, postlabel); > fi;# end if 1; > fi;# end if 0; > end; omniout_float := proc(iolevel, prelabel, prelen, value, vallen, postlabel) global glob_iolevel; if iolevel <= glob_iolevel then if vallen = 4 then printf("%-30s = %-42.4g %s \n", prelabel, value, postlabel) else printf("%-30s = %-42.32g %s \n", prelabel, value, postlabel) end if end if end proc # End Function number 5 # Begin Function number 6 > omniout_complex := proc(iolevel,prelabel,prelen,value,vallen,postlabel) > global glob_iolevel; > if (glob_iolevel >= iolevel) then # if number 0 > if vallen = 4 then > printf("%-30s = %-20.4g %-20g %s \n",prelabel,Re(value), Im(value), postlabel); > else > printf("%-30s = %-20.12g %-20.12g %s \n",prelabel,Re(value),Im(value), postlabel); > fi;# end if 0; > fi;# end if -1; > end; omniout_complex := proc(iolevel, prelabel, prelen, value, vallen, postlabel) global glob_iolevel; if iolevel <= glob_iolevel then if vallen = 4 then printf("%-30s = %-20.4g %-20g %s \n", prelabel, Re(value), Im(value), postlabel) else printf("%-30s = %-20.12g %-20.12g %s \n", prelabel, Re(value), Im(value), postlabel) end if end if end proc # End Function number 6 # Begin Function number 7 > omniout_int := proc(iolevel,prelabel,prelen,value,vallen,postlabel) > global glob_iolevel; > if (glob_iolevel >= iolevel) then # if number -1 > if vallen = 5 then # if number 0 > printf("%-30s = %-32d %s\n",prelabel,value, postlabel); > else > printf("%-30s = %-32d %s \n",prelabel,value, postlabel); > fi;# end if 0; > fi;# end if -1; > end; omniout_int := proc(iolevel, prelabel, prelen, value, vallen, postlabel) global glob_iolevel; if iolevel <= glob_iolevel then if vallen = 5 then printf("%-30s = %-32d %s\n", prelabel, value, postlabel) else printf("%-30s = %-32d %s \n", prelabel, value, postlabel) end if end if end proc # End Function number 7 # Begin Function number 8 > logitem_time := proc(fd,secs_in) > global glob_sec_in_day, glob_sec_in_hour, glob_sec_in_minute, glob_sec_in_year; > local days_int, hours_int,minutes_int, sec_int, sec_temp, years_int; > fprintf(fd,""); > if (secs_in >= 0) then # if number -1 > years_int := int_trunc(secs_in / glob_sec_in_year); > sec_temp := int_trunc(secs_in) mod int_trunc(glob_sec_in_year); > days_int := int_trunc(sec_temp / glob_sec_in_day) ; > sec_temp := sec_temp mod int_trunc(glob_sec_in_day) ; > hours_int := int_trunc(sec_temp / glob_sec_in_hour); > sec_temp := sec_temp mod int_trunc(glob_sec_in_hour); > minutes_int := int_trunc(sec_temp / glob_sec_in_minute); > sec_int := sec_temp mod int_trunc(glob_sec_in_minute); > if (years_int > 0) then # if number 0 > fprintf(fd,"%d Years %d Days %d Hours %d Minutes %d Seconds",years_int,days_int,hours_int,minutes_int,sec_int); > elif > (days_int > 0) then # if number 1 > fprintf(fd,"%d Days %d Hours %d Minutes %d Seconds",days_int,hours_int,minutes_int,sec_int); > elif > (hours_int > 0) then # if number 2 > fprintf(fd,"%d Hours %d Minutes %d Seconds",hours_int,minutes_int,sec_int); > elif > (minutes_int > 0) then # if number 3 > fprintf(fd,"%d Minutes %d Seconds",minutes_int,sec_int); > else > fprintf(fd,"%d Seconds",sec_int); > fi;# end if 3 > else > fprintf(fd," 0.0 Seconds"); > fi;# end if 2 > fprintf(fd,"\n"); > end; logitem_time := proc(fd, secs_in) local days_int, hours_int, minutes_int, sec_int, sec_temp, years_int; global glob_sec_in_day, glob_sec_in_hour, glob_sec_in_minute, glob_sec_in_year; fprintf(fd, ""); if 0 <= secs_in then years_int := int_trunc(secs_in/glob_sec_in_year); sec_temp := int_trunc(secs_in) mod int_trunc(glob_sec_in_year); days_int := int_trunc(sec_temp/glob_sec_in_day); sec_temp := sec_temp mod int_trunc(glob_sec_in_day); hours_int := int_trunc(sec_temp/glob_sec_in_hour); sec_temp := sec_temp mod int_trunc(glob_sec_in_hour); minutes_int := int_trunc(sec_temp/glob_sec_in_minute); sec_int := sec_temp mod int_trunc(glob_sec_in_minute); if 0 < years_int then fprintf(fd, "%d Years %d Days %d Hours %d Minutes %d Seconds", years_int, days_int, hours_int, minutes_int, sec_int) elif 0 < days_int then fprintf(fd, "%d Days %d Hours %d Minutes %d Seconds", days_int, hours_int, minutes_int, sec_int) elif 0 < hours_int then fprintf(fd, "%d Hours %d Minutes %d Seconds", hours_int, minutes_int, sec_int) elif 0 < minutes_int then fprintf(fd, "%d Minutes %d Seconds", minutes_int, sec_int) else fprintf(fd, "%d Seconds", sec_int) end if else fprintf(fd, " 0.0 Seconds") end if; fprintf(fd, "\n") end proc # End Function number 8 # Begin Function number 9 > omniout_timestr := proc(secs_in) > global glob_sec_in_day, glob_sec_in_hour, glob_sec_in_minute, glob_sec_in_year; > local days_int, hours_int,minutes_int, sec_int, sec_temp, years_int; > if (secs_in >= 0) then # if number 2 > years_int := int_trunc(secs_in / glob_sec_in_year); > sec_temp := (int_trunc(secs_in) mod int_trunc(glob_sec_in_year)); > days_int := int_trunc(sec_temp / glob_sec_in_day) ; > sec_temp := (sec_temp mod int_trunc(glob_sec_in_day)) ; > hours_int := int_trunc(sec_temp / glob_sec_in_hour); > sec_temp := (sec_temp mod int_trunc(glob_sec_in_hour)); > minutes_int := int_trunc(sec_temp / glob_sec_in_minute); > sec_int := (sec_temp mod int_trunc(glob_sec_in_minute)); > if (years_int > 0) then # if number 3 > printf(" = %d Years %d Days %d Hours %d Minutes %d Seconds\n",years_int,days_int,hours_int,minutes_int,sec_int); > elif > (days_int > 0) then # if number 4 > printf(" = %d Days %d Hours %d Minutes %d Seconds\n",days_int,hours_int,minutes_int,sec_int); > elif > (hours_int > 0) then # if number 5 > printf(" = %d Hours %d Minutes %d Seconds\n",hours_int,minutes_int,sec_int); > elif > (minutes_int > 0) then # if number 6 > printf(" = %d Minutes %d Seconds\n",minutes_int,sec_int); > else > printf(" = %d Seconds\n",sec_int); > fi;# end if 6 > else > printf(" 0.0 Seconds\n"); > fi;# end if 5 > end; omniout_timestr := proc(secs_in) local days_int, hours_int, minutes_int, sec_int, sec_temp, years_int; global glob_sec_in_day, glob_sec_in_hour, glob_sec_in_minute, glob_sec_in_year; if 0 <= secs_in then years_int := int_trunc(secs_in/glob_sec_in_year); sec_temp := int_trunc(secs_in) mod int_trunc(glob_sec_in_year); days_int := int_trunc(sec_temp/glob_sec_in_day); sec_temp := sec_temp mod int_trunc(glob_sec_in_day); hours_int := int_trunc(sec_temp/glob_sec_in_hour); sec_temp := sec_temp mod int_trunc(glob_sec_in_hour); minutes_int := int_trunc(sec_temp/glob_sec_in_minute); sec_int := sec_temp mod int_trunc(glob_sec_in_minute); if 0 < years_int then printf( " = %d Years %d Days %d Hours %d Minutes %d Seconds\n", years_int, days_int, hours_int, minutes_int, sec_int) elif 0 < days_int then printf( " = %d Days %d Hours %d Minutes %d Seconds\n", days_int, hours_int, minutes_int, sec_int) elif 0 < hours_int then printf( " = %d Hours %d Minutes %d Seconds\n", hours_int, minutes_int, sec_int) elif 0 < minutes_int then printf(" = %d Minutes %d Seconds\n", minutes_int, sec_int) else printf(" = %d Seconds\n", sec_int) end if else printf(" 0.0 Seconds\n") end if end proc # End Function number 9 # Begin Function number 10 > zero_ats_ar := proc(arr_a) > global ATS_MAX_TERMS; > local iii; > iii := 1; > while (iii <= ATS_MAX_TERMS) do # do number 1 > arr_a [iii] := glob__0; > iii := iii + 1; > od;# end do number 1 > end; zero_ats_ar := proc(arr_a) local iii; global ATS_MAX_TERMS; iii := 1; while iii <= ATS_MAX_TERMS do arr_a[iii] := glob__0; iii := iii + 1 end do end proc # End Function number 10 # Begin Function number 11 > ats := proc(mmm_ats,arr_a,arr_b,jjj_ats) > global ATS_MAX_TERMS; > local iii_ats, lll_ats,ma_ats, ret_ats; > ret_ats := glob__0; > if (jjj_ats <= mmm_ats) then # if number 5 > ma_ats := mmm_ats + 1; > iii_ats := jjj_ats; > while (iii_ats <= mmm_ats) do # do number 1 > lll_ats := ma_ats - iii_ats; > if ((lll_ats <= ATS_MAX_TERMS and (iii_ats <= ATS_MAX_TERMS) )) then # if number 6 > ret_ats := ret_ats + c(arr_a[iii_ats])*c(arr_b[lll_ats]); > fi;# end if 6; > iii_ats := iii_ats + 1; > od;# end do number 1 > fi;# end if 5; > ret_ats; > end; ats := proc(mmm_ats, arr_a, arr_b, jjj_ats) local iii_ats, lll_ats, ma_ats, ret_ats; global ATS_MAX_TERMS; ret_ats := glob__0; if jjj_ats <= mmm_ats then ma_ats := mmm_ats + 1; iii_ats := jjj_ats; while iii_ats <= mmm_ats do lll_ats := ma_ats - iii_ats; if lll_ats <= ATS_MAX_TERMS and iii_ats <= ATS_MAX_TERMS then ret_ats := ret_ats + c(arr_a[iii_ats])*c(arr_b[lll_ats]) end if; iii_ats := iii_ats + 1 end do end if; ret_ats end proc # End Function number 11 # Begin Function number 12 > att := proc(mmm_att,arr_aa,arr_bb,jjj_att) > global ATS_MAX_TERMS; > local al_att, iii_att,lll_att, ma_att, ret_att; > ret_att := glob__0; > if (jjj_att < mmm_att) then # if number 5 > ma_att := mmm_att + 2; > iii_att := jjj_att; > while ((iii_att < mmm_att) and (iii_att <= ATS_MAX_TERMS) ) do # do number 1 > lll_att := ma_att - iii_att; > al_att := (lll_att - 1); > if ((lll_att <= ATS_MAX_TERMS and (iii_att <= ATS_MAX_TERMS) )) then # if number 6 > ret_att := ret_att + c(arr_aa[iii_att])*c(arr_bb[lll_att])* c(al_att); > fi;# end if 6; > iii_att := iii_att + 1; > od;# end do number 1; > ret_att := ret_att / c(mmm_att) ; > fi;# end if 5; > ret_att; > end; att := proc(mmm_att, arr_aa, arr_bb, jjj_att) local al_att, iii_att, lll_att, ma_att, ret_att; global ATS_MAX_TERMS; ret_att := glob__0; if jjj_att < mmm_att then ma_att := mmm_att + 2; iii_att := jjj_att; while iii_att < mmm_att and iii_att <= ATS_MAX_TERMS do lll_att := ma_att - iii_att; al_att := lll_att - 1; if lll_att <= ATS_MAX_TERMS and iii_att <= ATS_MAX_TERMS then ret_att := ret_att + c(arr_aa[iii_att])*c(arr_bb[lll_att])*c(al_att) end if; iii_att := iii_att + 1 end do; ret_att := ret_att/c(mmm_att) end if; ret_att end proc # End Function number 12 # Begin Function number 13 > logditto := proc(file) > fprintf(file,""); > fprintf(file,"ditto"); > fprintf(file,""); > end; logditto := proc(file) fprintf(file, ""); fprintf(file, "ditto"); fprintf(file, "") end proc # End Function number 13 # Begin Function number 14 > logitem_integer := proc(file,n) > fprintf(file,""); > fprintf(file,"%d",n); > fprintf(file,""); > end; logitem_integer := proc(file, n) fprintf(file, ""); fprintf(file, "%d", n); fprintf(file, "") end proc # End Function number 14 # Begin Function number 15 > logitem_str := proc(file,str) > fprintf(file,""); > fprintf(file,str); > fprintf(file,""); > end; logitem_str := proc(file, str) fprintf(file, ""); fprintf(file, str); fprintf(file, "") end proc # End Function number 15 # Begin Function number 16 > logitem_good_digits := proc(file,rel_error) > global glob_small_float,glob_prec; > local good_digits; > fprintf(file,""); > fprintf(file,"%d",glob_min_good_digits); > fprintf(file,""); > end; logitem_good_digits := proc(file, rel_error) local good_digits; global glob_small_float, glob_prec; fprintf(file, ""); fprintf(file, "%d", glob_min_good_digits); fprintf(file, "") end proc # End Function number 16 # Begin Function number 17 > log_revs := proc(file,revs) > fprintf(file,revs); > end; log_revs := proc(file, revs) fprintf(file, revs) end proc # End Function number 17 # Begin Function number 18 > logitem_float := proc(file,x) > fprintf(file,""); > fprintf(file,"%g",x); > fprintf(file,""); > end; logitem_float := proc(file, x) fprintf(file, ""); fprintf(file, "%g", x); fprintf(file, "") end proc # End Function number 18 # Begin Function number 19 > logitem_complex := proc(file,x) > fprintf(file,""); > fprintf(file,"%g + %g I",Re(x),Im(x)); > fprintf(file,""); > end; logitem_complex := proc(file, x) fprintf(file, ""); fprintf(file, "%g + %g I", Re(x), Im(x)); fprintf(file, "") end proc # End Function number 19 # Begin Function number 20 > logitem_h_reason := proc(file) > global glob_h_reason; > fprintf(file,""); > if (glob_h_reason = 1) then # if number 5 > fprintf(file,"Max H"); > elif > (glob_h_reason = 2) then # if number 6 > fprintf(file,"Display Interval"); > elif > (glob_h_reason = 3) then # if number 7 > fprintf(file,"Optimal"); > elif > (glob_h_reason = 4) then # if number 8 > fprintf(file,"Pole Accuracy"); > elif > (glob_h_reason = 5) then # if number 9 > fprintf(file,"Min H (Pole)"); > elif > (glob_h_reason = 6) then # if number 10 > fprintf(file,"Pole"); > elif > (glob_h_reason = 7) then # if number 11 > fprintf(file,"Opt Iter"); > else > fprintf(file,"Impossible"); > fi;# end if 11 > fprintf(file,""); > end; logitem_h_reason := proc(file) global glob_h_reason; fprintf(file, ""); if glob_h_reason = 1 then fprintf(file, "Max H") elif glob_h_reason = 2 then fprintf(file, "Display Interval") elif glob_h_reason = 3 then fprintf(file, "Optimal") elif glob_h_reason = 4 then fprintf(file, "Pole Accuracy") elif glob_h_reason = 5 then fprintf(file, "Min H (Pole)") elif glob_h_reason = 6 then fprintf(file, "Pole") elif glob_h_reason = 7 then fprintf(file, "Opt Iter") else fprintf(file, "Impossible") end if; fprintf(file, "") end proc # End Function number 20 # Begin Function number 21 > logstart := proc(file) > fprintf(file,""); > end; logstart := proc(file) fprintf(file, "") end proc # End Function number 21 # Begin Function number 22 > logend := proc(file) > fprintf(file,"\n"); > end; logend := proc(file) fprintf(file, "\n") end proc # End Function number 22 # Begin Function number 23 > chk_data := proc() > global glob_max_iter,ALWAYS, ATS_MAX_TERMS; > local errflag; > errflag := false; > if (glob_max_iter < 2) then # if number 11 > omniout_str(ALWAYS,"Illegal max_iter"); > errflag := true; > fi;# end if 11; > if (errflag) then # if number 11 > quit; > fi;# end if 11 > end; chk_data := proc() local errflag; global glob_max_iter, ALWAYS, ATS_MAX_TERMS; errflag := false; if glob_max_iter < 2 then omniout_str(ALWAYS, "Illegal max_iter"); errflag := true end if; if errflag then quit end if end proc # End Function number 23 # Begin Function number 24 > comp_expect_sec := proc(t_end2,t_start2,t2,clock_sec2) > global glob_small_float; > local ms2, rrr, sec_left, sub1, sub2; > ; > ms2 := c(clock_sec2); > sub1 := c(t_end2-t_start2); > sub2 := c(t2-t_start2); > if (sub1 = glob__0) then # if number 11 > sec_left := glob__0; > else > if (sub2 > glob__0) then # if number 12 > rrr := (sub1/sub2); > sec_left := rrr * c(ms2) - c(ms2); > else > sec_left := glob__0; > fi;# end if 12 > fi;# end if 11; > sec_left; > end; comp_expect_sec := proc(t_end2, t_start2, t2, clock_sec2) local ms2, rrr, sec_left, sub1, sub2; global glob_small_float; ms2 := c(clock_sec2); sub1 := c(t_end2 - t_start2); sub2 := c(t2 - t_start2); if sub1 = glob__0 then sec_left := glob__0 else if glob__0 < sub2 then rrr := sub1/sub2; sec_left := rrr*c(ms2) - c(ms2) else sec_left := glob__0 end if end if; sec_left end proc # End Function number 24 # Begin Function number 25 > comp_percent := proc(t_end2,t_start2, t2) > global glob_small_float; > local rrr, sub1, sub2; > sub1 := (t_end2-t_start2); > sub2 := (t2-t_start2); > if (sub2 > glob_small_float) then # if number 11 > rrr := (glob__100*sub2)/sub1; > else > rrr := 0.0; > fi;# end if 11; > rrr; > end; comp_percent := proc(t_end2, t_start2, t2) local rrr, sub1, sub2; global glob_small_float; sub1 := t_end2 - t_start2; sub2 := t2 - t_start2; if glob_small_float < sub2 then rrr := glob__100*sub2/sub1 else rrr := 0. end if; rrr end proc # End Function number 25 # Begin Function number 26 > comp_rad_from_ratio := proc(term1,term2,last_no) > #TOP TWO TERM RADIUS ANALYSIS > global glob_h,glob_larger_float; > local ret; > if (float_abs(term2) > glob__0) then # if number 11 > ret := float_abs(term1 * glob_h / term2); > else > ret := glob_larger_float; > fi;# end if 11; > ret; > #BOTTOM TWO TERM RADIUS ANALYSIS > end; comp_rad_from_ratio := proc(term1, term2, last_no) local ret; global glob_h, glob_larger_float; if glob__0 < float_abs(term2) then ret := float_abs(term1*glob_h/term2) else ret := glob_larger_float end if; ret end proc # End Function number 26 # Begin Function number 27 > comp_ord_from_ratio := proc(term1,term2,last_no) > #TOP TWO TERM ORDER ANALYSIS > global glob_h,glob_larger_float; > local ret; > if (float_abs(term2) > glob__0) then # if number 11 > ret := glob__1 + float_abs(term2) * c(last_no) * ln(float_abs(term1 * glob_h / term2))/ln(c(last_no)); > else > ret := glob_larger_float; > fi;# end if 11; > ret; > #BOTTOM TWO TERM ORDER ANALYSIS > end; comp_ord_from_ratio := proc(term1, term2, last_no) local ret; global glob_h, glob_larger_float; if glob__0 < float_abs(term2) then ret := glob__1 + float_abs(term2)* c(last_no)*ln(float_abs(term1*glob_h/term2))/ln(c(last_no)) else ret := glob_larger_float end if; ret end proc # End Function number 27 # Begin Function number 28 > c := proc(in_val) > #To Force Conversion when needed > local ret; > ret := evalc(in_val); > ret; > #End Conversion > end; c := proc(in_val) local ret; ret := evalc(in_val); ret end proc # End Function number 28 # Begin Function number 29 > comp_rad_from_three_terms := proc(term1,term2,term3,last_no) > #TOP THREE TERM RADIUS ANALYSIS > global glob_h,glob_larger_float; > local ret,temp; > temp := float_abs(term2*term2*c(last_no)+glob__m2*term2*term2-term1*term3*c(last_no)+term1*term3); > if (float_abs(temp) > glob__0) then # if number 11 > ret := float_abs((term2*glob_h*term1)/(temp)); > else > ret := glob_larger_float; > fi;# end if 11; > ret; > #BOTTOM THREE TERM RADIUS ANALYSIS > end; comp_rad_from_three_terms := proc(term1, term2, term3, last_no) local ret, temp; global glob_h, glob_larger_float; temp := float_abs(term2*term2*c(last_no) + glob__m2*term2*term2 - term1*term3*c(last_no) + term1*term3); if glob__0 < float_abs(temp) then ret := float_abs(term2*glob_h*term1/temp) else ret := glob_larger_float end if; ret end proc # End Function number 29 # Begin Function number 30 > comp_ord_from_three_terms := proc(term1,term2,term3,last_no) > #TOP THREE TERM ORDER ANALYSIS > local ret; > ret := float_abs((glob__4*term1*term3*c(last_no)-glob__3*term1*term3-glob__4*term2*term2*c(last_no)+glob__4*term2*term2+term2*term2*c(last_no*last_no)-term1*term3*c(last_no*last_no))/(term2*term2*c(last_no)-glob__2*term2*term2-term1*term3*c(last_no)+term1*term3)); > ret; > #TOP THREE TERM ORDER ANALYSIS > end; comp_ord_from_three_terms := proc(term1, term2, term3, last_no) local ret; ret := float_abs((glob__4*term1*term3*c(last_no) - glob__3*term1*term3 - glob__4*term2*term2*c(last_no) + glob__4*term2*term2 + term2*term2*c(last_no*last_no) - term1*term3*c(last_no*last_no)) /(term2*term2*c(last_no) - glob__2*term2*term2 - term1*term3*c(last_no) + term1*term3)); ret end proc # End Function number 30 # Begin Function number 31 > comp_rad_from_six_terms := proc(term1,term2,term3,term4,term5,term6,last_no) > #TOP SIX TERM RADIUS ANALYSIS > global glob_h,glob_larger_float,glob_six_term_ord_save; > local ret,rm0,rm1,rm2,rm3,rm4,nr1,nr2,dr1,dr2,ds2,rad_c,ord_no,ds1,rcs; > if ((term5 <> glob__0) and (term4 <> glob__0) and (term3 <> glob__0) and (term2 <> glob__0) and (term1 <> glob__0)) then # if number 11 > rm0 := term6/term5; > rm1 := term5/term4; > rm2 := term4/term3; > rm3 := term3/term2; > rm4 := term2/term1; > nr1 := c(last_no-1)*rm0 - glob__2*c(last_no-2)*rm1 + c(last_no-3)*rm2; > nr2 := c(last_no-2)*rm1 - glob__2*c(last_no-3)*rm2 + c(last_no-4)*rm3; > dr1 := glob__m1/rm1 + glob__2/rm2 - glob__1/rm3; > dr2 := glob__m1/rm2 + glob__2/rm3 - glob__1/rm4; > ds1 := glob__3/rm1 - glob__8/rm2 + glob__5/rm3; > ds2 := glob__3/rm2 - glob__8/rm3 + glob__5/rm4; > if ((float_abs(nr1 * dr2 - nr2 * dr1) = glob__0) or (float_abs(dr1) = glob__0)) then # if number 12 > rad_c := glob_larger_float; > ord_no := glob_larger_float; > else > if (float_abs(nr1*dr2 - nr2 * dr1) > glob__0) then # if number 13 > rcs := ((ds1*dr2 - ds2*dr1 +dr1*dr2)/(nr1*dr2 - nr2 * dr1)); > #(Manuels) rcs := (ds1*dr2 - ds2*dr1)/(nr1*dr2 - nr2 * dr1) > ord_no := (rcs*nr1 - ds1)/(glob__2*dr1) -c(last_no)/glob__2; > if (float_abs(rcs) <> glob__0) then # if number 14 > if (rcs > glob__0) then # if number 15 > rad_c := float_abs( sqrt(rcs) * float_abs(glob_h)); > else > rad_c := glob_larger_float; > ord_no := glob_larger_float; > fi;# end if 15 > else > rad_c := glob_larger_float; > ord_no := glob_larger_float; > fi;# end if 14 > else > rad_c := glob_larger_float; > ord_no := glob_larger_float; > fi;# end if 13 > fi;# end if 12 > else > rad_c := glob_larger_float; > ord_no := glob_larger_float; > fi;# end if 11; > glob_six_term_ord_save := ord_no; > rad_c; > #BOTTOM SIX TERM RADIUS ANALYSIS > end; comp_rad_from_six_terms := proc( term1, term2, term3, term4, term5, term6, last_no) local ret, rm0, rm1, rm2, rm3, rm4, nr1, nr2, dr1, dr2, ds2, rad_c, ord_no, ds1, rcs; global glob_h, glob_larger_float, glob_six_term_ord_save; if term5 <> glob__0 and term4 <> glob__0 and term3 <> glob__0 and term2 <> glob__0 and term1 <> glob__0 then rm0 := term6/term5; rm1 := term5/term4; rm2 := term4/term3; rm3 := term3/term2; rm4 := term2/term1; nr1 := c(last_no - 1)*rm0 - glob__2*c(last_no - 2)*rm1 + c(last_no - 3)*rm2; nr2 := c(last_no - 2)*rm1 - glob__2*c(last_no - 3)*rm2 + c(last_no - 4)*rm3; dr1 := glob__m1/rm1 + glob__2/rm2 - glob__1/rm3; dr2 := glob__m1/rm2 + glob__2/rm3 - glob__1/rm4; ds1 := glob__3/rm1 - glob__8/rm2 + glob__5/rm3; ds2 := glob__3/rm2 - glob__8/rm3 + glob__5/rm4; if float_abs(nr1*dr2 - nr2*dr1) = glob__0 or float_abs(dr1) = glob__0 then rad_c := glob_larger_float; ord_no := glob_larger_float else if glob__0 < float_abs(nr1*dr2 - nr2*dr1) then rcs := (ds1*dr2 - ds2*dr1 + dr1*dr2)/(nr1*dr2 - nr2*dr1); ord_no := (rcs*nr1 - ds1)/(glob__2*dr1) - c(last_no)/glob__2; if float_abs(rcs) <> glob__0 then if glob__0 < rcs then rad_c := float_abs(sqrt(rcs)*float_abs(glob_h)) else rad_c := glob_larger_float; ord_no := glob_larger_float end if else rad_c := glob_larger_float; ord_no := glob_larger_float end if else rad_c := glob_larger_float; ord_no := glob_larger_float end if end if else rad_c := glob_larger_float; ord_no := glob_larger_float end if; glob_six_term_ord_save := ord_no; rad_c end proc # End Function number 31 # Begin Function number 32 > comp_ord_from_six_terms := proc(term1,term2,term3,term4,term5,term6,last_no) > global glob_six_term_ord_save; > #TOP SIX TERM ORDER ANALYSIS > #TOP SAVED FROM SIX TERM RADIUS ANALYSIS > glob_six_term_ord_save; > #BOTTOM SIX TERM ORDER ANALYSIS > end; comp_ord_from_six_terms := proc( term1, term2, term3, term4, term5, term6, last_no) global glob_six_term_ord_save; glob_six_term_ord_save end proc # End Function number 32 # Begin Function number 33 > factorial_2 := proc(nnn) > ret := nnn!; > ret;; > end; Warning, `ret` is implicitly declared local to procedure `factorial_2` factorial_2 := proc(nnn) local ret; ret := nnn!; ret end proc # End Function number 33 # Begin Function number 34 > factorial_1 := proc(nnn) > global ATS_MAX_TERMS,array_fact_1; > local ret; > if (nnn <= ATS_MAX_TERMS) then # if number 11 > if (array_fact_1[nnn] = 0) then # if number 12 > ret := factorial_2(nnn); > array_fact_1[nnn] := ret; > else > ret := array_fact_1[nnn]; > fi;# end if 12; > else > ret := factorial_2(nnn); > fi;# end if 11; > ret; > end; factorial_1 := proc(nnn) local ret; global ATS_MAX_TERMS, array_fact_1; if nnn <= ATS_MAX_TERMS then if array_fact_1[nnn] = 0 then ret := factorial_2(nnn); array_fact_1[nnn] := ret else ret := array_fact_1[nnn] end if else ret := factorial_2(nnn) end if; ret end proc # End Function number 34 # Begin Function number 35 > factorial_3 := proc(mmm,nnn) > global ATS_MAX_TERMS,array_fact_2; > local ret; > if ((nnn <= ATS_MAX_TERMS) and (mmm <= ATS_MAX_TERMS)) then # if number 11 > if (array_fact_2[mmm,nnn] = 0) then # if number 12 > ret := factorial_1(mmm)/factorial_1(nnn); > array_fact_2[mmm,nnn] := ret; > else > ret := array_fact_2[mmm,nnn]; > fi;# end if 12; > else > ret := factorial_2(mmm)/factorial_2(nnn); > fi;# end if 11; > ret; > end; factorial_3 := proc(mmm, nnn) local ret; global ATS_MAX_TERMS, array_fact_2; if nnn <= ATS_MAX_TERMS and mmm <= ATS_MAX_TERMS then if array_fact_2[mmm, nnn] = 0 then ret := factorial_1(mmm)/factorial_1(nnn); array_fact_2[mmm, nnn] := ret else ret := array_fact_2[mmm, nnn] end if else ret := factorial_2(mmm)/factorial_2(nnn) end if; ret end proc # End Function number 35 # Begin Function number 36 > convfloat := proc(mmm) > (mmm); > end; convfloat := proc(mmm) mmm end proc # End Function number 36 # Begin Function number 37 > elapsed_time_seconds := proc() > time(); > end; elapsed_time_seconds := proc() time() end proc # End Function number 37 # Begin Function number 38 > float_abs := proc(x) > abs(x); > end; float_abs := proc(x) abs(x) end proc # End Function number 38 # Begin Function number 39 > expt := proc(x,y) > x^y; > end; expt := proc(x, y) x^y end proc # End Function number 39 # Begin Function number 40 > neg := proc(x) > -x; > end; neg := proc(x) -x end proc # End Function number 40 # Begin Function number 41 > int_trunc := proc(x) > trunc(x); > end; int_trunc := proc(x) trunc(x) end proc # End Function number 41 # Begin Function number 42 > estimated_needed_step_error := proc(x_start,x_end,estimated_h,estimated_answer) > local desired_abs_gbl_error,range,estimated_steps,step_error; > global glob_desired_digits_correct,ALWAYS,ATS_MAX_TERMS; > omniout_float(ALWAYS,"glob_desired_digits_correct",32,glob_desired_digits_correct,32,""); > desired_abs_gbl_error := expt(glob__10,c( -glob_desired_digits_correct)) * c(float_abs(c(estimated_answer))); > omniout_float(ALWAYS,"estimated_h",32,estimated_h,32,""); > omniout_float(ALWAYS,"estimated_answer",32,estimated_answer,32,""); > omniout_float(ALWAYS,"desired_abs_gbl_error",32,desired_abs_gbl_error,32,""); > range := (x_end - x_start); > omniout_float(ALWAYS,"range",32,range,32,""); > estimated_steps := range / estimated_h; > omniout_float(ALWAYS,"estimated_steps",32,estimated_steps,32,""); > step_error := (c(float_abs(desired_abs_gbl_error) /sqrt(c( estimated_steps))/c(ATS_MAX_TERMS))); > omniout_float(ALWAYS,"step_error",32,step_error,32,""); > (step_error);; > end; estimated_needed_step_error := proc( x_start, x_end, estimated_h, estimated_answer) local desired_abs_gbl_error, range, estimated_steps, step_error; global glob_desired_digits_correct, ALWAYS, ATS_MAX_TERMS; omniout_float(ALWAYS, "glob_desired_digits_correct", 32, glob_desired_digits_correct, 32, ""); desired_abs_gbl_error := expt(glob__10, c(-glob_desired_digits_correct))* c(float_abs(c(estimated_answer))); omniout_float(ALWAYS, "estimated_h", 32, estimated_h, 32, ""); omniout_float(ALWAYS, "estimated_answer", 32, estimated_answer, 32, "") ; omniout_float(ALWAYS, "desired_abs_gbl_error", 32, desired_abs_gbl_error, 32, ""); range := x_end - x_start; omniout_float(ALWAYS, "range", 32, range, 32, ""); estimated_steps := range/estimated_h; omniout_float(ALWAYS, "estimated_steps", 32, estimated_steps, 32, ""); step_error := c(float_abs(desired_abs_gbl_error)/( sqrt(c(estimated_steps))*c(ATS_MAX_TERMS))); omniout_float(ALWAYS, "step_error", 32, step_error, 32, ""); step_error end proc # End Function number 42 #END ATS LIBRARY BLOCK #BEGIN USER FUNCTION BLOCK #BEGIN BLOCK 3 #BEGIN USER DEF BLOCK > exact_soln_y := proc(x) > return(c(0.0)); > end; exact_soln_y := proc(x) return c(0.) end proc > next_delta := proc() > global glob_nxt, x_delta; > x_delta := [ 0.001 + 0.00004 * I, > 0.0001 + 0.004 * I, > 0.003 + 0.006 * I, > 0.0001 + 0.005 * I, > 0.0001 + 0.003 * I, > 0.001 + 0.001 * I, > 0.001 + 0.003 * I, > 0.0001 + 0.004 * I, > 0.003 + 0.006 * I, > 0.0001 + 0.005 * I, > 0.0001 + 0.003 * I, > 0.001 + 0.001 * I, > 0.001 + 0.003 * I, > 0.0001 + 0.004 * I, > 0.003 + 0.006 * I, > 0.0001 + 0.005 * I, > 0.0001 + 0.003 * I, > 0.001 + 0.001 * I, > 0.001 + 0.003 * I, > 0.0001 + 0.004 * I, > 0.003 + 0.006 * I, > 0.0001 + 0.005 * I, > 0.0001 + 0.003 * I, > 0.001 + 0.001 * I, > 0.001 + 0.003 * I, > 0.0001 + 0.004 * I, > 0.003 + 0.006 * I, > 0.0001 + 0.005 * I, > 0.0001 + 0.003 * I, > 0.001 + 0.001 * I, > 0.0001 + 0.004 * I, > 0.003 + 0.006 * I, > 0.0001 + 0.005 * I, > 0.0001 + 0.003 * I, > 0.001 + 0.001 * I, > 0.001 + 0.003 * I, > 0.0001 + 0.004 * I, > 0.003 + 0.006 * I, > 0.0001 + 0.005 * I, > 0.0001 + 0.003 * I, > 0.001 + 0.001 * I, > 0.001 + 0.003 * I, > 0.0001 + 0.004 * I, > 0.003 + 0.006 * I, > 0.0001 + 0.005 * I, > 0.0001 + 0.003 * I, > 0.001 + 0.001 * I, > 0.001 + 0.003 * I, > 0.0001 + 0.004 * I, > 0.003 + 0.006 * I, > 0.0001 + 0.005 * I, > 0.0001 + 0.003 * I, > 0.001 + 0.001 * I, > 0.001 + 0.003 * I, > 0.0001 + 0.004 * I, > 0.003 + 0.006 * I, > 0.0001 + 0.005 * I, > 0.0001 + 0.003 * I, > 0.001 + 0.001 * I, > 0.0001 + 0.004 * I, > 0.003 + 0.006 * I, > 0.0001 + 0.005 * I, > 0.0001 + 0.003 * I, > 0.001 + 0.001 * I, > 0.001 + 0.003 * I, > 0.0001 + 0.004 * I, > 0.003 + 0.006 * I, > 0.0001 + 0.005 * I, > 0.0001 + 0.003 * I, > 0.001 + 0.001 * I, > 0.001 + 0.003 * I, > 0.0001 + 0.004 * I, > 0.003 + 0.006 * I, > 0.0001 + 0.005 * I, > 0.0001 + 0.003 * I, > 0.001 + 0.001 * I, > 0.001 + 0.003 * I, > 0.0001 + 0.004 * I, > 0.003 + 0.006 * I, > 0.0001 + 0.005 * I, > 0.0001 + 0.003 * I, > 0.001 + 0.001 * I, > 0.001 + 0.003 * I, > 0.0001 + 0.004 * I, > 0.003 + 0.006 * I, > 0.0001 + 0.005 * I, > 0.0001 + 0.003 * I, > 0.001 + 0.001 * I, > 0.0001 + 0.004 * I, > 0.003 + 0.006 * I, > 0.0001 + 0.005 * I, > 0.0001 + 0.003 * I, > 0.001 + 0.001 * I, > 0.001 + 0.003 * I, > 0.0001 + 0.004 * I, > 0.003 + 0.006 * I, > 0.0001 + 0.005 * I, > 0.0001 + 0.003 * I, > 0.001 + 0.001 * I, > 0.001 + 0.003 * I, > 0.0001 + 0.004 * I, > 0.003 + 0.006 * I, > 0.0001 + 0.005 * I, > 0.0001 + 0.003 * I, > 0.001 + 0.001 * I, > 0.001 + 0.003 * I, > 0.0001 + 0.004 * I, > 0.003 + 0.006 * I, > 0.0001 + 0.005 * I, > 0.0001 + 0.003 * I, > 0.001 + 0.001 * I, > 0.001 + 0.003 * I, > 0.0001 + 0.004 * I, > 0.003 + 0.006 * I, > 0.0001 + 0.005 * I, > 0.0001 + 0.003 * I, > 0.001 + 0.001 * I, > 0.0001 + 0.004 * I, > 0.003 + 0.006 * I, > 0.0001 + 0.005 * I, > 0.0001 + 0.003 * I, > 0.001 + 0.001 * I, > 0.001 + 0.003 * I, > 0.0001 + 0.004 * I, > 0.003 + 0.006 * I, > 0.0001 + 0.005 * I, > 0.0001 + 0.003 * I, > 0.001 + 0.001 * I, > 0.001 + 0.003 * I, > 0.0001 + 0.004 * I, > 0.003 + 0.006 * I, > 0.0001 + 0.005 * I, > 0.0001 + 0.003 * I, > 0.001 + 0.001 * I, > 0.001 + 0.003 * I, > 0.0001 + 0.004 * I, > 0.003 + 0.006 * I, > 0.0001 + 0.005 * I, > 0.0001 + 0.003 * I, > 0.001 + 0.001 * I, > 0.001 + 0.003 * I, > 0.0001 + 0.004 * I, > 0.003 + 0.006 * I, > 0.0001 + 0.005 * I, > 0.0001 + 0.003 * I, > 0.001 + 0.001 * I, > 0.0001 + 0.004 * I, > 0.003 + 0.006 * I, > 0.0001 + 0.005 * I, > 0.0001 + 0.003 * I, > 0.001 + 0.001 * I, > 0.001 + 0.003 * I, > 0.0001 + 0.004 * I, > 0.003 + 0.006 * I, > 0.0001 + 0.005 * I, > 0.0001 + 0.003 * I, > 0.001 + 0.001 * I, > 0.001 + 0.003 * I, > 0.0001 + 0.004 * I, > 0.003 + 0.006 * I, > 0.0001 + 0.005 * I, > 0.0001 + 0.003 * I, > 0.001 + 0.001 * I, > 0.001 + 0.003 * I, > 0.0001 + 0.004 * I, > 0.003 + 0.006 * I, > 0.0001 + 0.005 * I, > 0.0001 + 0.003 * I, > 0.001 + 0.001 * I, > 0.001 + 0.003 * I, > 0.0001 + 0.004 * I, > 0.003 + 0.006 * I, > 0.0001 + 0.005 * I, > 0.0001 + 0.003 * I, > 0.001 + 0.001 * I, > 0.0001 + 0.004 * I, > 0.003 + 0.006 * I, > 0.0001 + 0.005 * I, > 0.0001 + 0.003 * I, > 0.001 + 0.001 * I, > 0.001 + 0.003 * I, > 0.0001 + 0.004 * I, > 0.0001 + 0.004 * I, > 0.003 + 0.006 * I, > 0.0001 + 0.005 * I, > 0.0001 + 0.003 * I, > 0.001 + 0.001 * I, > 0.001 + 0.003 * I, > 0.0001 + 0.004 * I, > 0.003 + 0.006 * I, > 0.0001 + 0.005 * I, > 0.0001 + 0.003 * I, > 0.001 + 0.001 * I, > 0.001 + 0.003 * I, > 0.0001 + 0.004 * I, > 0.003 + 0.006 * I, > 0.0001 + 0.005 * I, > 0.0001 + 0.003 * I, > 0.001 + 0.001 * I, > 0.001 + 0.003 * I, > 0.0001 + 0.004 * I, > 0.003 + 0.006 * I, > 0.0001 + 0.005 * I, > 0.0001 + 0.003 * I, > 0.001 + 0.001 * I, > 0.001 + 0.003 * I, > 0.0001 + 0.004 * I, > 0.003 + 0.006 * I, > 0.0001 + 0.005 * I, > 0.0001 + 0.003 * I, > 0.001 + 0.001 * I, > 0.0001 + 0.004 * I, > 0.003 + 0.006 * I, > 0.0001 + 0.005 * I, > 0.0001 + 0.003 * I, > 0.001 + 0.001 * I, > 0.001 + 0.003 * I, > 0.0001 + 0.004 * I, > 0.003 + 0.006 * I, > 0.0001 + 0.005 * I, > 0.0001 + 0.003 * I, > 0.001 + 0.001 * I, > 0.001 + 0.003 * I, > 0.0001 + 0.004 * I, > 0.003 + 0.006 * I, > 0.0001 + 0.005 * I, > 0.0001 + 0.003 * I, > 0.001 + 0.001 * I, > 0.001 + 0.003 * I, > 0.0001 + 0.004 * I, > 0.003 + 0.006 * I, > 0.0001 + 0.005 * I, > 0.0001 + 0.003 * I, > 0.001 + 0.001 * I, > 0.001 + 0.003 * I, > 0.0001 + 0.004 * I, > 0.003 + 0.006 * I, > 0.0001 + 0.005 * I, > 0.0001 + 0.003 * I, > 0.001 + 0.001 * I, > 0.0001 + 0.004 * I, > 0.003 + 0.006 * I, > 0.0001 + 0.005 * I, > 0.0001 + 0.003 * I, > 0.001 + 0.001 * I, > 0.001 + 0.003 * I, > 0.0001 + 0.004 * I, > 0.003 + 0.006 * I, > 0.0001 + 0.005 * I, > 0.0001 + 0.003 * I, > 0.001 + 0.001 * I, > 0.001 + 0.003 * I, > 0.0001 + 0.004 * I, > 0.003 + 0.006 * I, > 0.0001 + 0.005 * I, > 0.0001 + 0.003 * I, > 0.001 + 0.001 * I, > 0.001 + 0.003 * I, > 0.0001 + 0.004 * I, > 0.003 + 0.006 * I, > 0.0001 + 0.005 * I, > 0.0001 + 0.003 * I, > 0.001 + 0.001 * I, > 0.001 + 0.003 * I, > 0.0001 + 0.004 * I, > 0.003 + 0.006 * I, > 0.0001 + 0.005 * I, > 0.0001 + 0.003 * I, > 0.001 + 0.001 * I, > 0.0001 + 0.004 * I, > 0.003 + 0.006 * I, > 0.0001 + 0.005 * I, > 0.0001 + 0.003 * I, > 0.001 + 0.001 * I, > 0.001 + 0.003 * I, > 0.0001 + 0.004 * I, > 0.003 + 0.006 * I, > 0.0001 + 0.005 * I, > 0.0001 + 0.003 * I, > 0.001 + 0.001 * I, > 0.001 + 0.003 * I, > 0.0001 + 0.004 * I, > 0.003 + 0.006 * I, > 0.0001 + 0.005 * I, > 0.0001 + 0.003 * I, > 0.001 + 0.001 * I, > 0.001 + 0.003 * I, > 0.0001 + 0.004 * I, > 0.003 + 0.006 * I, > 0.0001 + 0.005 * I, > 0.0001 + 0.003 * I, > 0.001 + 0.001 * I, > 0.001 + 0.003 * I, > 0.0001 + 0.004 * I, > 0.003 + 0.006 * I, > 0.0001 + 0.005 * I, > 0.0001 + 0.003 * I, > 0.001 + 0.001 * I, > 0.0001 + 0.004 * I, > 0.003 + 0.006 * I, > 0.0001 + 0.005 * I, > 0.0001 + 0.003 * I, > 0.001 + 0.001 * I, > 0.001 + 0.003 * I, > 0.0001 + 0.004 * I, > 0.003 + 0.006 * I, > 0.0001 + 0.005 * I, > 0.0001 + 0.003 * I, > 0.001 + 0.001 * I, > 0.001 + 0.003 * I, > 0.0001 + 0.004 * I, > 0.003 + 0.006 * I, > 0.0001 + 0.005 * I, > 0.0001 + 0.003 * I, > 0.001 + 0.001 * I, > 0.001 + 0.003 * I, > 0.0001 + 0.004 * I, > 0.003 + 0.006 * I, > 0.0001 + 0.005 * I, > 0.0001 + 0.003 * I, > 0.001 + 0.001 * I, > 0.001 + 0.003 * I, > 0.0001 + 0.004 * I, > 0.003 + 0.006 * I, > 0.0001 + 0.005 * I, > 0.0001 + 0.003 * I, > 0.001 + 0.001 * I, > 0.0001 + 0.004 * I, > 0.003 + 0.006 * I, > 0.0001 + 0.005 * I, > 0.0001 + 0.003 * I, > 0.001 + 0.001 * I, > 0.001 + 0.003 * I, > 0.0001 + 0.004 * I, > 0.003 + 0.006 * I, > 0.0001 + 0.005 * I, > 0.0001 + 0.003 * I, > 0.001 + 0.001 * I, > 0.001 + 0.003 * I, > 0.0001 + 0.004 * I, > 0.003 + 0.006 * I, > 0.0001 + 0.005 * I, > 0.0001 + 0.003 * I, > 0.001 + 0.001 * I, > 0.001 + 0.003 * I, > 0.0001 + 0.004 * I, > 0.003 + 0.006 * I, > 0.0001 + 0.005 * I, > 0.0001 + 0.003 * I, > 0.001 + 0.001 * I, > 0.001 + 0.003 * I, > 0.0001 + 0.004 * I, > 0.003 + 0.006 * I, > 0.0001 + 0.005 * I, > 0.0001 + 0.003 * I, > 0.001 + 0.001 * I, > 0.003 + 0.006 * I, > 0.0001 + 0.005 * I, > 0.0001 + 0.003 * I, > 0.001 + 0.001 * I, > 0.001 + 0.003 * I, > 0.0001 + 0.004 * I, > 0.003 + 0.006 * I, > 0.0001 + 0.005 * I, > 0.0001 + 0.003 * I, > 0.001 + 0.001 * I, > 0.001 + 0.003 * I, > 0.0001 + 0.004 * I, > 0.003 + 0.006 * I, > 0.0001 + 0.005 * I, > 0.0001 + 0.003 * I, > 0.001 + 0.001 * I, > 0.001 + 0.003 * I, > 0.0001 + 0.004 * I, > 0.003 + 0.006 * I, > 0.0001 + 0.005 * I, > 0.0001 + 0.003 * I, > 0.001 + 0.001 * I, > 0.0001 + 0.004 * I, > 0.003 + 0.006 * I, > 0.0001 + 0.005 * I, > 0.0001 + 0.003 * I, > 0.001 + 0.001 * I, > 0.001 + 0.003 * I, > 0.0001 + 0.004 * I, > 0.003 + 0.006 * I, > 0.0001 + 0.005 * I, > 0.0001 + 0.003 * I, > 0.001 + 0.001 * I, > 0.001 + 0.003 * I, > 0.0001 + 0.004 * I, > 0.003 + 0.006 * I, > 0.0001 + 0.005 * I, > 0.0001 + 0.003 * I, > 0.001 + 0.001 * I, > 0.001 + 0.003 * I, > 0.0001 + 0.004 * I, > 0.003 + 0.006 * I, > 0.0001 + 0.005 * I, > 0.0001 + 0.003 * I, > 0.001 + 0.001 * I, > 0.001 + 0.003 * I, > 0.0001 + 0.004 * I, > 0.003 + 0.006 * I, > 0.0001 + 0.005 * I, > 0.0001 + 0.003 * I, > 0.001 + 0.001 * I, > 0.0001 + 0.004 * I, > 0.003 + 0.006 * I, > 0.0001 + 0.005 * I, > 0.0001 + 0.003 * I, > 0.001 + 0.001 * I, > 0.001 + 0.003 * I, > 0.0001 + 0.004 * I, > 0.003 + 0.006 * I, > 0.0001 + 0.005 * I, > 0.0001 + 0.003 * I, > 0.001 + 0.001 * I, > 0.001 + 0.003 * I, > 0.0001 + 0.004 * I, > 0.003 + 0.006 * I, > 0.0001 + 0.005 * I, > 0.0001 + 0.003 * I, > 0.001 + 0.001 * I, > 0.001 + 0.003 * I, > 0.0001 + 0.004 * I, > 0.003 + 0.006 * I, > 0.0001 + 0.005 * I, > 0.0001 + 0.003 * I, > 0.001 + 0.001 * I, > 0.001 + 0.003 * I, > 0.0001 + 0.004 * I, > 0.003 + 0.006 * I, > 0.0001 + 0.005 * I, > 0.0001 + 0.003 * I, > 0.001 + 0.001 * I, > 0.0001 + 0.004 * I, > 0.003 + 0.006 * I, > 0.0001 + 0.005 * I, > 0.0001 + 0.003 * I, > 0.001 + 0.001 * I, > 0.001 + 0.003 * I, > 0.0001 + 0.004 * I, > 0.003 + 0.006 * I, > 0.0001 + 0.005 * I, > 0.0001 + 0.003 * I, > 0.001 + 0.001 * I, > 0.001 + 0.003 * I, > 0.0001 + 0.004 * I, > 0.003 + 0.006 * I, > 0.0001 + 0.005 * I, > 0.0001 + 0.003 * I, > 0.001 + 0.001 * I, > 0.001 + 0.003 * I, > 0.0001 + 0.004 * I, > 0.003 + 0.006 * I, > 0.0001 + 0.005 * I, > 0.0001 + 0.003 * I, > 0.001 + 0.001 * I, > 0.001 + 0.003 * I, > 0.0001 + 0.004 * I, > 0.003 + 0.006 * I, > 0.0001 + 0.005 * I, > 0.0001 + 0.003 * I, > 0.001 + 0.001 * I, > 0.0001 + 0.004 * I, > 0.003 + 0.006 * I, > 0.0001 + 0.005 * I, > 0.0001 + 0.003 * I, > 0.001 + 0.001 * I, > 0.001 + 0.003 * I, > 0.0001 + 0.004 * I, > 0.003 + 0.006 * I, > 0.0001 + 0.005 * I, > 0.0001 + 0.003 * I, > 0.001 + 0.001 * I, > 0.001 + 0.003 * I, > 0.0001 + 0.004 * I, > 0.003 + 0.006 * I, > 0.0001 + 0.005 * I, > 0.0001 + 0.003 * I, > 0.001 + 0.001 * I, > 0.001 + 0.003 * I, > 0.0001 + 0.004 * I, > 0.003 + 0.006 * I, > 0.0001 + 0.005 * I, > 0.0001 + 0.003 * I, > 0.001 + 0.001 * I, > 0.001 + 0.003 * I, > 0.0001 + 0.004 * I, > 0.003 + 0.006 * I, > 0.0001 + 0.005 * I, > 0.0001 + 0.003 * I, > 0.001 + 0.001 * I, > 0.0001 + 0.004 * I, > 0.003 + 0.006 * I, > 0.0001 + 0.005 * I, > 0.0001 + 0.003 * I, > 0.001 + 0.001 * I, > 0.001 + 0.003 * I, > 0.0001 + 0.004 * I, > 0.003 + 0.006 * I, > 0.0001 + 0.005 * I, > 0.0001 + 0.003 * I, > 0.001 + 0.001 * I, > 0.001 + 0.003 * I, > 0.0001 + 0.004 * I, > 0.003 + 0.006 * I, > 0.0001 + 0.005 * I, > 0.0001 + 0.003 * I, > 0.001 + 0.001 * I, > 0.001 + 0.003 * I, > 0.0001 + 0.004 * I, > 0.003 + 0.006 * I, > 0.0001 + 0.005 * I, > 0.0001 + 0.003 * I, > 0.001 + 0.001 * I, > 0.001 + 0.003 * I, > 0.0001 + 0.004 * I, > 0.003 + 0.006 * I, > 0.0001 + 0.005 * I, > 0.0001 + 0.003 * I, > 0.001 + 0.001 * I, > 0.0001 + 0.004 * I, > 0.003 + 0.006 * I, > 0.0001 + 0.005 * I, > 0.0001 + 0.003 * I, > 0.001 + 0.001 * I, > 0.001 + 0.003 * I, > 0.0001 + 0.004 * I, > 0.003 + 0.006 * I, > 0.0001 + 0.005 * I, > 0.0001 + 0.003 * I, > 0.001 + 0.001 * I, > 0.001 + 0.003 * I, > 0.0001 + 0.004 * I, > 0.003 + 0.006 * I, > 0.0001 + 0.005 * I, > 0.0001 + 0.003 * I, > 0.001 + 0.001 * I, > 0.001 + 0.003 * I, > 0.0001 + 0.004 * I, > 0.003 + 0.006 * I, > 0.0001 + 0.005 * I, > 0.0001 + 0.003 * I, > 0.001 + 0.001 * I, > 0.001 + 0.003 * I, > 0.0001 + 0.004 * I, > 0.003 + 0.006 * I, > 0.0001 + 0.005 * I, > 0.0001 + 0.003 * I, > 0.001 + 0.001 * I, > 0.0001 + 0.004 * I, > 0.003 + 0.006 * I, > 0.0001 + 0.005 * I, > 0.0001 + 0.003 * I, > 0.001 + 0.001 * I, > 0.001 + 0.003 * I, > 0.0001 + 0.004 * I, > 0.003 + 0.006 * I, > 0.0001 + 0.005 * I, > 0.0001 + 0.003 * I, > 0.001 + 0.001 * I, > 0.001 + 0.003 * I, > 0.0001 + 0.004 * I, > 0.003 + 0.006 * I, > 0.0001 + 0.005 * I, > 0.0001 + 0.003 * I, > 0.001 + 0.001 * I, > 0.001 + 0.003 * I, > 0.0001 + 0.004 * I, > 0.003 + 0.006 * I, > 0.0001 + 0.005 * I, > 0.0001 + 0.003 * I, > 0.001 + 0.001 * I, > 0.001 + 0.003 * I, > 0.0001 + 0.004 * I, > 0.003 + 0.006 * I, > 0.0001 + 0.005 * I, > 0.0001 + 0.003 * I, > 0.001 + 0.001 * I, > 0.0001 + 0.004 * I, > 0.003 + 0.006 * I, > 0.0001 + 0.005 * I, > 0.0001 + 0.003 * I, > 0.001 + 0.001 * I, > 0.001 + 0.003 * I, > 0.0001 + 0.004 * I, > 0.003 + 0.006 * I, > 0.0001 + 0.005 * I, > 0.0001 + 0.003 * I, > 0.001 + 0.001 * I, > 0.001 + 0.003 * I, > 0.0001 + 0.004 * I, > 0.003 + 0.006 * I, > 0.0001 + 0.005 * I, > 0.0001 + 0.003 * I, > 0.001 + 0.001 * I, > 0.001 + 0.003 * I, > 0.0001 + 0.004 * I, > 0.003 + 0.006 * I, > 0.0001 + 0.005 * I, > 0.0001 + 0.003 * I, > 0.001 + 0.001 * I, > 0.001 + 0.003 * I, > 0.0001 + 0.004 * I, > 0.003 + 0.006 * I, > 0.0001 + 0.005 * I, > 0.0001 + 0.003 * I, > 0.001 + 0.001 * I, > 0.0001 + 0.004 * I, > 0.003 + 0.006 * I, > 0.0001 + 0.005 * I, > 0.0001 + 0.003 * I, > 0.001 + 0.001 * I, > 0.001 + 0.003 * I, > 0.0001 + 0.004 * I, > 0.003 + 0.006 * I, > 0.0001 + 0.005 * I, > 0.0001 + 0.003 * I, > 0.001 + 0.001 * I, > 0.001 + 0.003 * I, > 0.0001 + 0.004 * I, > 0.003 + 0.006 * I, > 0.0001 + 0.005 * I, > 0.0001 + 0.003 * I, > 0.001 + 0.001 * I, > 0.001 + 0.003 * I, > 0.0001 + 0.004 * I, > 0.003 + 0.006 * I, > 0.0001 + 0.005 * I, > 0.0001 + 0.003 * I, > 0.001 + 0.001 * I, > 0.001 + 0.003 * I, > 0.0001 + 0.004 * I, > 0.003 + 0.006 * I, > 0.0001 + 0.005 * I, > 0.0001 + 0.003 * I, > 0.001 + 0.001 * I, > 0.0001 + 0.004 * I, > 0.003 + 0.006 * I, > 0.0001 + 0.005 * I, > 0.0001 + 0.003 * I, > 0.001 + 0.001 * I, > 0.001 + 0.003 * I, > 0.0001 + 0.004 * I, > 0.003 + 0.006 * I, > 0.0001 + 0.005 * I, > 0.0001 + 0.003 * I, > 0.001 + 0.001 * I, > 0.001 + 0.003 * I, > 0.0001 + 0.004 * I, > 0.003 + 0.006 * I, > 0.0001 + 0.005 * I, > 0.0001 + 0.003 * I, > 0.001 + 0.001 * I, > 0.001 + 0.003 * I, > 0.0001 + 0.004 * I, > 0.003 + 0.006 * I, > 0.0001 + 0.005 * I, > 0.0001 + 0.003 * I, > 0.001 + 0.001 * I, > 0.001 + 0.003 * I, > 0.0001 + 0.004 * I, > 0.003 + 0.006 * I, > 0.0001 + 0.005 * I, > 0.0001 + 0.003 * I, > 0.001 + 0.001 * I, > 0.0001 + 0.004 * I, > 0.003 + 0.006 * I, > 0.0001 + 0.005 * I, > 0.0001 + 0.003 * I, > 0.001 + 0.001 * I, > 0.001 + 0.003 * I, > 0.0001 + 0.004 * I, > 0.003 + 0.006 * I, > 0.0001 + 0.005 * I, > 0.0001 + 0.003 * I, > 0.001 + 0.001 * I, > 0.001 + 0.003 * I, > 0.0001 + 0.004 * I, > 0.003 + 0.006 * I, > 0.0001 + 0.005 * I, > 0.0001 + 0.003 * I, > 0.001 + 0.001 * I, > 0.001 + 0.003 * I, > 0.0001 + 0.004 * I, > 0.003 + 0.006 * I, > 0.0001 + 0.005 * I, > 0.0001 + 0.003 * I, > 0.001 + 0.001 * I, > 0.001 + 0.003 * I, > 0.0001 + 0.004 * I, > 0.003 + 0.006 * I, > 0.0001 + 0.005 * I, > 0.0001 + 0.003 * I, > 0.001 + 0.001 * I, > 0.0001 + 0.004 * I, > 0.003 + 0.006 * I, > 0.0001 + 0.005 * I, > 0.0001 + 0.003 * I, > 0.001 + 0.001 * I, > 0.001 + 0.003 * I, > 0.0001 + 0.004 * I, > 0.003 + 0.006 * I, > 0.0001 + 0.005 * I, > 0.0001 + 0.003 * I, > 0.001 + 0.001 * I, > 0.001 + 0.003 * I, > 0.0001 + 0.004 * I, > 0.003 + 0.006 * I, > 0.0001 + 0.005 * I, > 0.0001 + 0.003 * I, > 0.001 + 0.001 * I, > 0.001 + 0.003 * I, > 0.0001 + 0.004 * I, > 0.003 + 0.006 * I, > 0.0001 + 0.005 * I, > 0.0001 + 0.003 * I, > 0.001 + 0.001 * I, > 0.001 + 0.003 * I, > 0.0001 + 0.004 * I, > 0.003 + 0.006 * I, > 0.0001 + 0.005 * I, > 0.0001 + 0.003 * I, > 0.001 + 0.001 * I, > 0.0001 + 0.004 * I, > 0.003 + 0.006 * I, > 0.0001 + 0.005 * I, > 0.0001 + 0.003 * I, > 0.001 + 0.001 * I, > 0.001 + 0.003 * I, > 0.0001 + 0.004 * I, > 0.003 + 0.006 * I, > 0.0001 + 0.005 * I, > 0.0001 + 0.003 * I, > 0.001 + 0.001 * I, > 0.001 + 0.003 * I, > 0.0001 + 0.004 * I, > 0.003 + 0.006 * I, > 0.0001 + 0.005 * I, > 0.0001 + 0.003 * I, > 0.001 + 0.001 * I, > 0.001 + 0.003 * I, > 0.0001 + 0.004 * I, > 0.003 + 0.006 * I, > 0.0001 + 0.005 * I, > 0.0001 + 0.003 * I, > 0.001 + 0.001 * I, > 0.001 + 0.003 * I, > 0.0001 + 0.004 * I, > 0.003 + 0.006 * I, > 0.0001 + 0.005 * I, > 0.0001 + 0.003 * I, > 0.001 + 0.001 * I, > 0.001 + 0.003 * I, > 0.000 + 0.000 * I ]; > glob_nxt := glob_nxt + 1; > it := x_delta[glob_nxt]; > return it; > end; Warning, `it` is implicitly declared local to procedure `next_delta` next_delta := proc() local it; global glob_nxt, x_delta; x_delta := [0.001 + 0.00004*I, 0.0001 + 0.004*I, 0.003 + 0.006*I, 0.0001 + 0.005*I, 0.0001 + 0.003*I, 0.001 + 0.001*I, 0.001 + 0.003*I, 0.0001 + 0.004*I, 0.003 + 0.006*I, 0.0001 + 0.005*I, 0.0001 + 0.003*I, 0.001 + 0.001*I, 0.001 + 0.003*I, 0.0001 + 0.004*I, 0.003 + 0.006*I, 0.0001 + 0.005*I, 0.0001 + 0.003*I, 0.001 + 0.001*I, 0.001 + 0.003*I, 0.0001 + 0.004*I, 0.003 + 0.006*I, 0.0001 + 0.005*I, 0.0001 + 0.003*I, 0.001 + 0.001*I, 0.001 + 0.003*I, 0.0001 + 0.004*I, 0.003 + 0.006*I, 0.0001 + 0.005*I, 0.0001 + 0.003*I, 0.001 + 0.001*I, 0.0001 + 0.004*I, 0.003 + 0.006*I, 0.0001 + 0.005*I, 0.0001 + 0.003*I, 0.001 + 0.001*I, 0.001 + 0.003*I, 0.0001 + 0.004*I, 0.003 + 0.006*I, 0.0001 + 0.005*I, 0.0001 + 0.003*I, 0.001 + 0.001*I, 0.001 + 0.003*I, 0.0001 + 0.004*I, 0.003 + 0.006*I, 0.0001 + 0.005*I, 0.0001 + 0.003*I, 0.001 + 0.001*I, 0.001 + 0.003*I, 0.0001 + 0.004*I, 0.003 + 0.006*I, 0.0001 + 0.005*I, 0.0001 + 0.003*I, 0.001 + 0.001*I, 0.001 + 0.003*I, 0.0001 + 0.004*I, 0.003 + 0.006*I, 0.0001 + 0.005*I, 0.0001 + 0.003*I, 0.001 + 0.001*I, 0.0001 + 0.004*I, 0.003 + 0.006*I, 0.0001 + 0.005*I, 0.0001 + 0.003*I, 0.001 + 0.001*I, 0.001 + 0.003*I, 0.0001 + 0.004*I, 0.003 + 0.006*I, 0.0001 + 0.005*I, 0.0001 + 0.003*I, 0.001 + 0.001*I, 0.001 + 0.003*I, 0.0001 + 0.004*I, 0.003 + 0.006*I, 0.0001 + 0.005*I, 0.0001 + 0.003*I, 0.001 + 0.001*I, 0.001 + 0.003*I, 0.0001 + 0.004*I, 0.003 + 0.006*I, 0.0001 + 0.005*I, 0.0001 + 0.003*I, 0.001 + 0.001*I, 0.001 + 0.003*I, 0.0001 + 0.004*I, 0.003 + 0.006*I, 0.0001 + 0.005*I, 0.0001 + 0.003*I, 0.001 + 0.001*I, 0.0001 + 0.004*I, 0.003 + 0.006*I, 0.0001 + 0.005*I, 0.0001 + 0.003*I, 0.001 + 0.001*I, 0.001 + 0.003*I, 0.0001 + 0.004*I, 0.003 + 0.006*I, 0.0001 + 0.005*I, 0.0001 + 0.003*I, 0.001 + 0.001*I, 0.001 + 0.003*I, 0.0001 + 0.004*I, 0.003 + 0.006*I, 0.0001 + 0.005*I, 0.0001 + 0.003*I, 0.001 + 0.001*I, 0.001 + 0.003*I, 0.0001 + 0.004*I, 0.003 + 0.006*I, 0.0001 + 0.005*I, 0.0001 + 0.003*I, 0.001 + 0.001*I, 0.001 + 0.003*I, 0.0001 + 0.004*I, 0.003 + 0.006*I, 0.0001 + 0.005*I, 0.0001 + 0.003*I, 0.001 + 0.001*I, 0.0001 + 0.004*I, 0.003 + 0.006*I, 0.0001 + 0.005*I, 0.0001 + 0.003*I, 0.001 + 0.001*I, 0.001 + 0.003*I, 0.0001 + 0.004*I, 0.003 + 0.006*I, 0.0001 + 0.005*I, 0.0001 + 0.003*I, 0.001 + 0.001*I, 0.001 + 0.003*I, 0.0001 + 0.004*I, 0.003 + 0.006*I, 0.0001 + 0.005*I, 0.0001 + 0.003*I, 0.001 + 0.001*I, 0.001 + 0.003*I, 0.0001 + 0.004*I, 0.003 + 0.006*I, 0.0001 + 0.005*I, 0.0001 + 0.003*I, 0.001 + 0.001*I, 0.001 + 0.003*I, 0.0001 + 0.004*I, 0.003 + 0.006*I, 0.0001 + 0.005*I, 0.0001 + 0.003*I, 0.001 + 0.001*I, 0.0001 + 0.004*I, 0.003 + 0.006*I, 0.0001 + 0.005*I, 0.0001 + 0.003*I, 0.001 + 0.001*I, 0.001 + 0.003*I, 0.0001 + 0.004*I, 0.003 + 0.006*I, 0.0001 + 0.005*I, 0.0001 + 0.003*I, 0.001 + 0.001*I, 0.001 + 0.003*I, 0.0001 + 0.004*I, 0.003 + 0.006*I, 0.0001 + 0.005*I, 0.0001 + 0.003*I, 0.001 + 0.001*I, 0.001 + 0.003*I, 0.0001 + 0.004*I, 0.003 + 0.006*I, 0.0001 + 0.005*I, 0.0001 + 0.003*I, 0.001 + 0.001*I, 0.001 + 0.003*I, 0.0001 + 0.004*I, 0.003 + 0.006*I, 0.0001 + 0.005*I, 0.0001 + 0.003*I, 0.001 + 0.001*I, 0.0001 + 0.004*I, 0.003 + 0.006*I, 0.0001 + 0.005*I, 0.0001 + 0.003*I, 0.001 + 0.001*I, 0.001 + 0.003*I, 0.0001 + 0.004*I, 0.0001 + 0.004*I, 0.003 + 0.006*I, 0.0001 + 0.005*I, 0.0001 + 0.003*I, 0.001 + 0.001*I, 0.001 + 0.003*I, 0.0001 + 0.004*I, 0.003 + 0.006*I, 0.0001 + 0.005*I, 0.0001 + 0.003*I, 0.001 + 0.001*I, 0.001 + 0.003*I, 0.0001 + 0.004*I, 0.003 + 0.006*I, 0.0001 + 0.005*I, 0.0001 + 0.003*I, 0.001 + 0.001*I, 0.001 + 0.003*I, 0.0001 + 0.004*I, 0.003 + 0.006*I, 0.0001 + 0.005*I, 0.0001 + 0.003*I, 0.001 + 0.001*I, 0.001 + 0.003*I, 0.0001 + 0.004*I, 0.003 + 0.006*I, 0.0001 + 0.005*I, 0.0001 + 0.003*I, 0.001 + 0.001*I, 0.0001 + 0.004*I, 0.003 + 0.006*I, 0.0001 + 0.005*I, 0.0001 + 0.003*I, 0.001 + 0.001*I, 0.001 + 0.003*I, 0.0001 + 0.004*I, 0.003 + 0.006*I, 0.0001 + 0.005*I, 0.0001 + 0.003*I, 0.001 + 0.001*I, 0.001 + 0.003*I, 0.0001 + 0.004*I, 0.003 + 0.006*I, 0.0001 + 0.005*I, 0.0001 + 0.003*I, 0.001 + 0.001*I, 0.001 + 0.003*I, 0.0001 + 0.004*I, 0.003 + 0.006*I, 0.0001 + 0.005*I, 0.0001 + 0.003*I, 0.001 + 0.001*I, 0.001 + 0.003*I, 0.0001 + 0.004*I, 0.003 + 0.006*I, 0.0001 + 0.005*I, 0.0001 + 0.003*I, 0.001 + 0.001*I, 0.0001 + 0.004*I, 0.003 + 0.006*I, 0.0001 + 0.005*I, 0.0001 + 0.003*I, 0.001 + 0.001*I, 0.001 + 0.003*I, 0.0001 + 0.004*I, 0.003 + 0.006*I, 0.0001 + 0.005*I, 0.0001 + 0.003*I, 0.001 + 0.001*I, 0.001 + 0.003*I, 0.0001 + 0.004*I, 0.003 + 0.006*I, 0.0001 + 0.005*I, 0.0001 + 0.003*I, 0.001 + 0.001*I, 0.001 + 0.003*I, 0.0001 + 0.004*I, 0.003 + 0.006*I, 0.0001 + 0.005*I, 0.0001 + 0.003*I, 0.001 + 0.001*I, 0.001 + 0.003*I, 0.0001 + 0.004*I, 0.003 + 0.006*I, 0.0001 + 0.005*I, 0.0001 + 0.003*I, 0.001 + 0.001*I, 0.0001 + 0.004*I, 0.003 + 0.006*I, 0.0001 + 0.005*I, 0.0001 + 0.003*I, 0.001 + 0.001*I, 0.001 + 0.003*I, 0.0001 + 0.004*I, 0.003 + 0.006*I, 0.0001 + 0.005*I, 0.0001 + 0.003*I, 0.001 + 0.001*I, 0.001 + 0.003*I, 0.0001 + 0.004*I, 0.003 + 0.006*I, 0.0001 + 0.005*I, 0.0001 + 0.003*I, 0.001 + 0.001*I, 0.001 + 0.003*I, 0.0001 + 0.004*I, 0.003 + 0.006*I, 0.0001 + 0.005*I, 0.0001 + 0.003*I, 0.001 + 0.001*I, 0.001 + 0.003*I, 0.0001 + 0.004*I, 0.003 + 0.006*I, 0.0001 + 0.005*I, 0.0001 + 0.003*I, 0.001 + 0.001*I, 0.0001 + 0.004*I, 0.003 + 0.006*I, 0.0001 + 0.005*I, 0.0001 + 0.003*I, 0.001 + 0.001*I, 0.001 + 0.003*I, 0.0001 + 0.004*I, 0.003 + 0.006*I, 0.0001 + 0.005*I, 0.0001 + 0.003*I, 0.001 + 0.001*I, 0.001 + 0.003*I, 0.0001 + 0.004*I, 0.003 + 0.006*I, 0.0001 + 0.005*I, 0.0001 + 0.003*I, 0.001 + 0.001*I, 0.001 + 0.003*I, 0.0001 + 0.004*I, 0.003 + 0.006*I, 0.0001 + 0.005*I, 0.0001 + 0.003*I, 0.001 + 0.001*I, 0.001 + 0.003*I, 0.0001 + 0.004*I, 0.003 + 0.006*I, 0.0001 + 0.005*I, 0.0001 + 0.003*I, 0.001 + 0.001*I, 0.0001 + 0.004*I, 0.003 + 0.006*I, 0.0001 + 0.005*I, 0.0001 + 0.003*I, 0.001 + 0.001*I, 0.001 + 0.003*I, 0.0001 + 0.004*I, 0.003 + 0.006*I, 0.0001 + 0.005*I, 0.0001 + 0.003*I, 0.001 + 0.001*I, 0.001 + 0.003*I, 0.0001 + 0.004*I, 0.003 + 0.006*I, 0.0001 + 0.005*I, 0.0001 + 0.003*I, 0.001 + 0.001*I, 0.001 + 0.003*I, 0.0001 + 0.004*I, 0.003 + 0.006*I, 0.0001 + 0.005*I, 0.0001 + 0.003*I, 0.001 + 0.001*I, 0.001 + 0.003*I, 0.0001 + 0.004*I, 0.003 + 0.006*I, 0.0001 + 0.005*I, 0.0001 + 0.003*I, 0.001 + 0.001*I, 0.003 + 0.006*I, 0.0001 + 0.005*I, 0.0001 + 0.003*I, 0.001 + 0.001*I, 0.001 + 0.003*I, 0.0001 + 0.004*I, 0.003 + 0.006*I, 0.0001 + 0.005*I, 0.0001 + 0.003*I, 0.001 + 0.001*I, 0.001 + 0.003*I, 0.0001 + 0.004*I, 0.003 + 0.006*I, 0.0001 + 0.005*I, 0.0001 + 0.003*I, 0.001 + 0.001*I, 0.001 + 0.003*I, 0.0001 + 0.004*I, 0.003 + 0.006*I, 0.0001 + 0.005*I, 0.0001 + 0.003*I, 0.001 + 0.001*I, 0.0001 + 0.004*I, 0.003 + 0.006*I, 0.0001 + 0.005*I, 0.0001 + 0.003*I, 0.001 + 0.001*I, 0.001 + 0.003*I, 0.0001 + 0.004*I, 0.003 + 0.006*I, 0.0001 + 0.005*I, 0.0001 + 0.003*I, 0.001 + 0.001*I, 0.001 + 0.003*I, 0.0001 + 0.004*I, 0.003 + 0.006*I, 0.0001 + 0.005*I, 0.0001 + 0.003*I, 0.001 + 0.001*I, 0.001 + 0.003*I, 0.0001 + 0.004*I, 0.003 + 0.006*I, 0.0001 + 0.005*I, 0.0001 + 0.003*I, 0.001 + 0.001*I, 0.001 + 0.003*I, 0.0001 + 0.004*I, 0.003 + 0.006*I, 0.0001 + 0.005*I, 0.0001 + 0.003*I, 0.001 + 0.001*I, 0.0001 + 0.004*I, 0.003 + 0.006*I, 0.0001 + 0.005*I, 0.0001 + 0.003*I, 0.001 + 0.001*I, 0.001 + 0.003*I, 0.0001 + 0.004*I, 0.003 + 0.006*I, 0.0001 + 0.005*I, 0.0001 + 0.003*I, 0.001 + 0.001*I, 0.001 + 0.003*I, 0.0001 + 0.004*I, 0.003 + 0.006*I, 0.0001 + 0.005*I, 0.0001 + 0.003*I, 0.001 + 0.001*I, 0.001 + 0.003*I, 0.0001 + 0.004*I, 0.003 + 0.006*I, 0.0001 + 0.005*I, 0.0001 + 0.003*I, 0.001 + 0.001*I, 0.001 + 0.003*I, 0.0001 + 0.004*I, 0.003 + 0.006*I, 0.0001 + 0.005*I, 0.0001 + 0.003*I, 0.001 + 0.001*I, 0.0001 + 0.004*I, 0.003 + 0.006*I, 0.0001 + 0.005*I, 0.0001 + 0.003*I, 0.001 + 0.001*I, 0.001 + 0.003*I, 0.0001 + 0.004*I, 0.003 + 0.006*I, 0.0001 + 0.005*I, 0.0001 + 0.003*I, 0.001 + 0.001*I, 0.001 + 0.003*I, 0.0001 + 0.004*I, 0.003 + 0.006*I, 0.0001 + 0.005*I, 0.0001 + 0.003*I, 0.001 + 0.001*I, 0.001 + 0.003*I, 0.0001 + 0.004*I, 0.003 + 0.006*I, 0.0001 + 0.005*I, 0.0001 + 0.003*I, 0.001 + 0.001*I, 0.001 + 0.003*I, 0.0001 + 0.004*I, 0.003 + 0.006*I, 0.0001 + 0.005*I, 0.0001 + 0.003*I, 0.001 + 0.001*I, 0.0001 + 0.004*I, 0.003 + 0.006*I, 0.0001 + 0.005*I, 0.0001 + 0.003*I, 0.001 + 0.001*I, 0.001 + 0.003*I, 0.0001 + 0.004*I, 0.003 + 0.006*I, 0.0001 + 0.005*I, 0.0001 + 0.003*I, 0.001 + 0.001*I, 0.001 + 0.003*I, 0.0001 + 0.004*I, 0.003 + 0.006*I, 0.0001 + 0.005*I, 0.0001 + 0.003*I, 0.001 + 0.001*I, 0.001 + 0.003*I, 0.0001 + 0.004*I, 0.003 + 0.006*I, 0.0001 + 0.005*I, 0.0001 + 0.003*I, 0.001 + 0.001*I, 0.001 + 0.003*I, 0.0001 + 0.004*I, 0.003 + 0.006*I, 0.0001 + 0.005*I, 0.0001 + 0.003*I, 0.001 + 0.001*I, 0.0001 + 0.004*I, 0.003 + 0.006*I, 0.0001 + 0.005*I, 0.0001 + 0.003*I, 0.001 + 0.001*I, 0.001 + 0.003*I, 0.0001 + 0.004*I, 0.003 + 0.006*I, 0.0001 + 0.005*I, 0.0001 + 0.003*I, 0.001 + 0.001*I, 0.001 + 0.003*I, 0.0001 + 0.004*I, 0.003 + 0.006*I, 0.0001 + 0.005*I, 0.0001 + 0.003*I, 0.001 + 0.001*I, 0.001 + 0.003*I, 0.0001 + 0.004*I, 0.003 + 0.006*I, 0.0001 + 0.005*I, 0.0001 + 0.003*I, 0.001 + 0.001*I, 0.001 + 0.003*I, 0.0001 + 0.004*I, 0.003 + 0.006*I, 0.0001 + 0.005*I, 0.0001 + 0.003*I, 0.001 + 0.001*I, 0.0001 + 0.004*I, 0.003 + 0.006*I, 0.0001 + 0.005*I, 0.0001 + 0.003*I, 0.001 + 0.001*I, 0.001 + 0.003*I, 0.0001 + 0.004*I, 0.003 + 0.006*I, 0.0001 + 0.005*I, 0.0001 + 0.003*I, 0.001 + 0.001*I, 0.001 + 0.003*I, 0.0001 + 0.004*I, 0.003 + 0.006*I, 0.0001 + 0.005*I, 0.0001 + 0.003*I, 0.001 + 0.001*I, 0.001 + 0.003*I, 0.0001 + 0.004*I, 0.003 + 0.006*I, 0.0001 + 0.005*I, 0.0001 + 0.003*I, 0.001 + 0.001*I, 0.001 + 0.003*I, 0.0001 + 0.004*I, 0.003 + 0.006*I, 0.0001 + 0.005*I, 0.0001 + 0.003*I, 0.001 + 0.001*I, 0.0001 + 0.004*I, 0.003 + 0.006*I, 0.0001 + 0.005*I, 0.0001 + 0.003*I, 0.001 + 0.001*I, 0.001 + 0.003*I, 0.0001 + 0.004*I, 0.003 + 0.006*I, 0.0001 + 0.005*I, 0.0001 + 0.003*I, 0.001 + 0.001*I, 0.001 + 0.003*I, 0.0001 + 0.004*I, 0.003 + 0.006*I, 0.0001 + 0.005*I, 0.0001 + 0.003*I, 0.001 + 0.001*I, 0.001 + 0.003*I, 0.0001 + 0.004*I, 0.003 + 0.006*I, 0.0001 + 0.005*I, 0.0001 + 0.003*I, 0.001 + 0.001*I, 0.001 + 0.003*I, 0.0001 + 0.004*I, 0.003 + 0.006*I, 0.0001 + 0.005*I, 0.0001 + 0.003*I, 0.001 + 0.001*I, 0.0001 + 0.004*I, 0.003 + 0.006*I, 0.0001 + 0.005*I, 0.0001 + 0.003*I, 0.001 + 0.001*I, 0.001 + 0.003*I, 0.0001 + 0.004*I, 0.003 + 0.006*I, 0.0001 + 0.005*I, 0.0001 + 0.003*I, 0.001 + 0.001*I, 0.001 + 0.003*I, 0.0001 + 0.004*I, 0.003 + 0.006*I, 0.0001 + 0.005*I, 0.0001 + 0.003*I, 0.001 + 0.001*I, 0.001 + 0.003*I, 0.0001 + 0.004*I, 0.003 + 0.006*I, 0.0001 + 0.005*I, 0.0001 + 0.003*I, 0.001 + 0.001*I, 0.001 + 0.003*I, 0.0001 + 0.004*I, 0.003 + 0.006*I, 0.0001 + 0.005*I, 0.0001 + 0.003*I, 0.001 + 0.001*I, 0.0001 + 0.004*I, 0.003 + 0.006*I, 0.0001 + 0.005*I, 0.0001 + 0.003*I, 0.001 + 0.001*I, 0.001 + 0.003*I, 0.0001 + 0.004*I, 0.003 + 0.006*I, 0.0001 + 0.005*I, 0.0001 + 0.003*I, 0.001 + 0.001*I, 0.001 + 0.003*I, 0.0001 + 0.004*I, 0.003 + 0.006*I, 0.0001 + 0.005*I, 0.0001 + 0.003*I, 0.001 + 0.001*I, 0.001 + 0.003*I, 0.0001 + 0.004*I, 0.003 + 0.006*I, 0.0001 + 0.005*I, 0.0001 + 0.003*I, 0.001 + 0.001*I, 0.001 + 0.003*I, 0.0001 + 0.004*I, 0.003 + 0.006*I, 0.0001 + 0.005*I, 0.0001 + 0.003*I, 0.001 + 0.001*I, 0.0001 + 0.004*I, 0.003 + 0.006*I, 0.0001 + 0.005*I, 0.0001 + 0.003*I, 0.001 + 0.001*I, 0.001 + 0.003*I, 0.0001 + 0.004*I, 0.003 + 0.006*I, 0.0001 + 0.005*I, 0.0001 + 0.003*I, 0.001 + 0.001*I, 0.001 + 0.003*I, 0.0001 + 0.004*I, 0.003 + 0.006*I, 0.0001 + 0.005*I, 0.0001 + 0.003*I, 0.001 + 0.001*I, 0.001 + 0.003*I, 0.0001 + 0.004*I, 0.003 + 0.006*I, 0.0001 + 0.005*I, 0.0001 + 0.003*I, 0.001 + 0.001*I, 0.001 + 0.003*I, 0.0001 + 0.004*I, 0.003 + 0.006*I, 0.0001 + 0.005*I, 0.0001 + 0.003*I, 0.001 + 0.001*I, 0.0001 + 0.004*I, 0.003 + 0.006*I, 0.0001 + 0.005*I, 0.0001 + 0.003*I, 0.001 + 0.001*I, 0.001 + 0.003*I, 0.0001 + 0.004*I, 0.003 + 0.006*I, 0.0001 + 0.005*I, 0.0001 + 0.003*I, 0.001 + 0.001*I, 0.001 + 0.003*I, 0.0001 + 0.004*I, 0.003 + 0.006*I, 0.0001 + 0.005*I, 0.0001 + 0.003*I, 0.001 + 0.001*I, 0.001 + 0.003*I, 0.0001 + 0.004*I, 0.003 + 0.006*I, 0.0001 + 0.005*I, 0.0001 + 0.003*I, 0.001 + 0.001*I, 0.001 + 0.003*I, 0.0001 + 0.004*I, 0.003 + 0.006*I, 0.0001 + 0.005*I, 0.0001 + 0.003*I, 0.001 + 0.001*I, 0.0001 + 0.004*I, 0.003 + 0.006*I, 0.0001 + 0.005*I, 0.0001 + 0.003*I, 0.001 + 0.001*I, 0.001 + 0.003*I, 0.0001 + 0.004*I, 0.003 + 0.006*I, 0.0001 + 0.005*I, 0.0001 + 0.003*I, 0.001 + 0.001*I, 0.001 + 0.003*I, 0.0001 + 0.004*I, 0.003 + 0.006*I, 0.0001 + 0.005*I, 0.0001 + 0.003*I, 0.001 + 0.001*I, 0.001 + 0.003*I, 0.0001 + 0.004*I, 0.003 + 0.006*I, 0.0001 + 0.005*I, 0.0001 + 0.003*I, 0.001 + 0.001*I, 0.001 + 0.003*I, 0.0001 + 0.004*I, 0.003 + 0.006*I, 0.0001 + 0.005*I, 0.0001 + 0.003*I, 0.001 + 0.001*I, 0.0001 + 0.004*I, 0.003 + 0.006*I, 0.0001 + 0.005*I, 0.0001 + 0.003*I, 0.001 + 0.001*I, 0.001 + 0.003*I, 0.0001 + 0.004*I, 0.003 + 0.006*I, 0.0001 + 0.005*I, 0.0001 + 0.003*I, 0.001 + 0.001*I, 0.001 + 0.003*I, 0.0001 + 0.004*I, 0.003 + 0.006*I, 0.0001 + 0.005*I, 0.0001 + 0.003*I, 0.001 + 0.001*I, 0.001 + 0.003*I, 0.0001 + 0.004*I, 0.003 + 0.006*I, 0.0001 + 0.005*I, 0.0001 + 0.003*I, 0.001 + 0.001*I, 0.001 + 0.003*I, 0.0001 + 0.004*I, 0.003 + 0.006*I, 0.0001 + 0.005*I, 0.0001 + 0.003*I, 0.001 + 0.001*I, 0.001 + 0.003*I, 0. + 0.*I]; glob_nxt := glob_nxt + 1; it := x_delta[glob_nxt]; return it end proc #END USER DEF BLOCK #END BLOCK 3 #END USER FUNCTION BLOCK # before write_aux functions # Begin Function number 2 > display_poles := proc() > local rad_given; > global ALWAYS,glob_display_flag,glob_larger_float, glob_large_float, glob_diff_ord_fm, glob_diff_ord_fmm1, glob_diff_ord_fmm2, glob_diff_rc_fm, glob_diff_rc_fmm1, glob_diff_rc_fmm2, glob_guess_error_ord, glob_guess_error_rc, glob_type_given_pole,array_given_rad_poles,array_given_ord_poles,array_rad_test_poles,array_ord_test_poles,glob_least_3_sing,glob_least_6_sing,glob_least_given_sing,glob_least_ratio_sing,array_x ; > if ((glob_type_given_pole = 1) or (glob_type_given_pole = 2)) then # if number 1 > rad_given := float_abs(array_x[1] - (array_given_rad_poles[1,1] + array_given_rad_poles[1,2] * I )); > omniout_float(ALWAYS,"Radius of convergence (given) for eq 1 ",4,rad_given,4," "); > omniout_complex(ALWAYS,"Order of pole (given) ",4,array_given_ord_poles[1,1],4," "); > if ((float_abs(rad_given) < float_abs(glob_least_given_sing)) and > (float_abs(rad_given) > 0.0)) then # if number 2 > glob_least_given_sing := rad_given; > fi;# end if 2; > elif > (glob_type_given_pole = 3) then # if number 2 > omniout_str(ALWAYS,"NO POLE (given) for Equation 1"); > elif > (glob_type_given_pole = 5) then # if number 3 > omniout_str(ALWAYS,"SOME POLE (given) for Equation 1"); > else > omniout_str(ALWAYS,"NO INFO (given) for Equation 1"); > fi;# end if 3; > if (array_rad_test_poles[1,1] < glob_large_float) then # if number 3 > omniout_float(ALWAYS,"Radius of convergence (ratio test) for eq 1 ",4,array_rad_test_poles[1,1],4," "); > if ((float_abs(array_rad_test_poles[1,1]) < glob_least_ratio_sing)) then # if number 4 > glob_least_ratio_sing := array_rad_test_poles[1,1]; > fi;# end if 4; > omniout_complex(ALWAYS,"Order of pole (ratio test) ",4, array_ord_test_poles[1,1],4," "); > else > omniout_str(ALWAYS,"NO POLE (ratio test) for Equation 1"); > fi;# end if 3; > if ((array_rad_test_poles[1,2] > glob__small) and (array_rad_test_poles[1,2] < glob_large_float)) then # if number 3 > omniout_float(ALWAYS,"Radius of convergence (three term test) for eq 1 ",4,array_rad_test_poles[1,2],4," "); > if ((float_abs(array_rad_test_poles[1,2]) < glob_least_3_sing)) then # if number 4 > glob_least_3_sing := array_rad_test_poles[1,2]; > fi;# end if 4; > omniout_complex(ALWAYS,"Order of pole (three term test) ",4, array_ord_test_poles[1,2],4," "); > else > omniout_str(ALWAYS,"NO REAL POLE (three term test) for Equation 1"); > fi;# end if 3; > if ((array_rad_test_poles[1,3] > glob__small) and (array_rad_test_poles[1,3] < glob_large_float)) then # if number 3 > omniout_float(ALWAYS,"Radius of convergence (six term test) for eq 1 ",4,array_rad_test_poles[1,3],4," "); > if ((float_abs(array_rad_test_poles[1,3]) < glob_least_6_sing)) then # if number 4 > glob_least_6_sing := array_rad_test_poles[1,3]; > fi;# end if 4; > omniout_complex(ALWAYS,"Order of pole (six term test) ",4, array_ord_test_poles[1,3],4," "); > else > omniout_str(ALWAYS,"NO COMPLEX POLE (six term test) for Equation 1"); > fi;# end if 3 > ; > end; display_poles := proc() local rad_given; global ALWAYS, glob_display_flag, glob_larger_float, glob_large_float, glob_diff_ord_fm, glob_diff_ord_fmm1, glob_diff_ord_fmm2, glob_diff_rc_fm, glob_diff_rc_fmm1, glob_diff_rc_fmm2, glob_guess_error_ord, glob_guess_error_rc, glob_type_given_pole, array_given_rad_poles, array_given_ord_poles, array_rad_test_poles, array_ord_test_poles, glob_least_3_sing, glob_least_6_sing, glob_least_given_sing, glob_least_ratio_sing, array_x; if glob_type_given_pole = 1 or glob_type_given_pole = 2 then rad_given := float_abs(array_x[1] - array_given_rad_poles[1, 1] - array_given_rad_poles[1, 2]*I); omniout_float(ALWAYS, "Radius of convergence (given) for eq 1 ", 4, rad_given, 4, " "); omniout_complex(ALWAYS, "Order of pole (given) ", 4, array_given_ord_poles[1, 1], 4, " "); if float_abs(rad_given) < float_abs(glob_least_given_sing) and 0. < float_abs(rad_given) then glob_least_given_sing := rad_given end if elif glob_type_given_pole = 3 then omniout_str(ALWAYS, "NO POLE (given) for Equation 1") elif glob_type_given_pole = 5 then omniout_str(ALWAYS, "SOME POLE (given) for Equation 1") else omniout_str(ALWAYS, "NO INFO (given) for Equation 1") end if; if array_rad_test_poles[1, 1] < glob_large_float then omniout_float(ALWAYS, "Radius of convergence (ratio test) for eq 1 ", 4, array_rad_test_poles[1, 1], 4, " "); if float_abs(array_rad_test_poles[1, 1]) < glob_least_ratio_sing then glob_least_ratio_sing := array_rad_test_poles[1, 1] end if; omniout_complex(ALWAYS, "Order of pole (ratio test) ", 4, array_ord_test_poles[1, 1], 4, " ") else omniout_str(ALWAYS, "NO POLE (ratio test) for Equation 1") end if; if glob__small < array_rad_test_poles[1, 2] and array_rad_test_poles[1, 2] < glob_large_float then omniout_float(ALWAYS, "Radius of convergence (three term test) for eq 1 ", 4, array_rad_test_poles[1, 2], 4, " "); if float_abs(array_rad_test_poles[1, 2]) < glob_least_3_sing then glob_least_3_sing := array_rad_test_poles[1, 2] end if; omniout_complex(ALWAYS, "Order of pole (three term test) ", 4, array_ord_test_poles[1, 2], 4, " ") else omniout_str(ALWAYS, "NO REAL POLE (three term test) for Equation 1") end if; if glob__small < array_rad_test_poles[1, 3] and array_rad_test_poles[1, 3] < glob_large_float then omniout_float(ALWAYS, "Radius of convergence (six term test) for eq 1 ", 4, array_rad_test_poles[1, 3], 4, " "); if float_abs(array_rad_test_poles[1, 3]) < glob_least_6_sing then glob_least_6_sing := array_rad_test_poles[1, 3] end if; omniout_complex(ALWAYS, "Order of pole (six term test) ", 4, array_ord_test_poles[1, 3], 4, " ") else omniout_str(ALWAYS, "NO COMPLEX POLE (six term test) for Equation 1") end if end proc # End Function number 2 # Begin Function number 3 > my_check_sign := proc( x0 ,xf) > local ret; > if (xf > x0) then # if number 3 > ret := glob__1; > else > ret := glob__m1; > fi;# end if 3; > ret;; > end; my_check_sign := proc(x0, xf) local ret; if x0 < xf then ret := glob__1 else ret := glob__m1 end if; ret end proc # End Function number 3 # Begin Function number 4 > est_size_answer := proc() > global > ALWAYS, > INFO, > DEBUGL, > DEBUGMASSIVE, > glob_iolevel, > glob_yes_pole, > glob_no_pole, > glob_not_given, > glob_no_sing_tests, > glob_ratio_test, > glob_three_term_test, > glob_six_term_test, > glob_log_10, #Top Generate Globals Decl > MAX_UNCHANGED, > glob__small, > glob_small_float, > glob_smallish_float, > glob_large_float, > glob_larger_float, > glob__m2, > glob__m1, > glob__0, > glob__1, > glob__2, > glob__3, > glob__4, > glob__5, > glob__8, > glob__10, > glob__100, > glob__pi, > glob__0_5, > glob__0_8, > glob__m0_8, > glob__0_25, > glob__0_125, > glob_h, > glob_nxt, > glob_prec, > glob_check_sign, > glob_desired_digits_correct, > glob_max_estimated_step_error, > glob_ratio_of_radius, > glob_percent_done, > glob_total_exp_sec, > glob_optimal_expect_sec, > glob_estimated_size_answer, > glob_almost_1, > glob_clock_sec, > glob_clock_start_sec, > glob_disp_incr, > glob_diff_rc_fm, > glob_diff_rc_fmm1, > glob_diff_rc_fmm2, > glob_diff_ord_fm, > glob_diff_ord_fmm1, > glob_diff_ord_fmm2, > glob_six_term_ord_save, > glob_guess_error_rc, > glob_guess_error_ord, > glob_least_given_sing, > glob_least_ratio_sing, > glob_least_3_sing, > glob_least_6_sing, > glob_last_good_h, > glob_max_h, > glob_min_h, > glob_display_interval, > glob_abserr, > glob_relerr, > glob_min_pole_est, > glob_max_rel_trunc_err, > glob_max_trunc_err, > glob_max_hours, > glob_optimal_clock_start_sec, > glob_optimal_start, > glob_upper_ratio_limit, > glob_lower_ratio_limit, > glob_max_sec, > glob_orig_start_sec, > glob_normmax, > glob_max_minutes, > glob_next_display, > glob_est_digits, > glob_subiter_method, > glob_html_log, > glob_min_good_digits, > glob_good_digits, > glob_min_apfp_est_good_digits, > glob_apfp_est_good_digits, > glob_max_opt_iter, > glob_dump, > glob_djd_debug, > glob_display_flag, > glob_djd_debug2, > glob_h_reason, > glob_sec_in_minute, > glob_min_in_hour, > glob_hours_in_day, > glob_days_in_year, > glob_sec_in_hour, > glob_sec_in_day, > glob_sec_in_year, > glob_not_yet_finished, > glob_initial_pass, > glob_not_yet_start_msg, > glob_reached_optimal_h, > glob_optimal_done, > glob_type_given_pole, > glob_optimize, > glob_look_poles, > glob_dump_closed_form, > glob_max_iter, > glob_no_eqs, > glob_unchanged_h_cnt, > glob_warned, > glob_warned2, > glob_start, > glob_iter, #Bottom Generate Globals Decl #BEGIN CONST > array_const_1, > array_const_0D0, > array_const_2D0, > array_const_3D0, #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_g, > array_tmp4_a1, > array_tmp4_a2, > 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_2D0, array_const_3D0, 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_g, array_tmp4_a1, array_tmp4_a2, 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_2D0, > array_const_3D0, #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_g, > array_tmp4_a1, > array_tmp4_a2, > 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_2D0, array_const_3D0, 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_g, array_tmp4_a1, array_tmp4_a2, 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_2D0, > array_const_3D0, #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_g, > array_tmp4_a1, > array_tmp4_a2, > 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_2D0, array_const_3D0, 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_g, array_tmp4_a1, array_tmp4_a2, 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_2D0, > array_const_3D0, #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_g, > array_tmp4_a1, > array_tmp4_a2, > 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_2D0, array_const_3D0, 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_g, array_tmp4_a1, array_tmp4_a2, 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_2D0, > array_const_3D0, #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_g, > array_tmp4_a1, > array_tmp4_a2, > 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_2D0, array_const_3D0, 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_g, array_tmp4_a1, array_tmp4_a2, 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_2D0, > array_const_3D0, #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_g, > array_tmp4_a1, > array_tmp4_a2, > 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_2D0, array_const_3D0, 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_g, array_tmp4_a1, array_tmp4_a2, 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_2D0, > array_const_3D0, #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_g, > array_tmp4_a1, > array_tmp4_a2, > 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_2D0, array_const_3D0, 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_g, array_tmp4_a1, array_tmp4_a2, 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_2D0, > array_const_3D0, #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_g, > array_tmp4_a1, > array_tmp4_a2, > 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_2D0[1] * array_x[1]; > #emit pre add LINEAR - CONST $eq_no = 1 i = 1 > array_tmp2[1] := array_tmp1[1] + array_const_3D0[1]; > #emit pre sqrt 1 $eq_no = 1 > array_tmp3[1] := sqrt(array_tmp2[1]); > #emit pre tanh $eq_no = 1 > array_tmp4_a1[1] := sinh(array_tmp3[1]); > array_tmp4_a2[1] := cosh(array_tmp3[1]); > array_tmp4[1] := (array_tmp4_a1[1] / array_tmp4_a2[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_2D0[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 tanh $eq_no = 1 > array_tmp4_a1[2] := att(1,array_tmp4_a2,array_tmp3,1); > array_tmp4_a2[2] := att(1,array_tmp4_a1,array_tmp3,1); > array_tmp4[2] := (array_tmp4_a1[2] - ats(2,array_tmp4_a2,array_tmp4,2)) / array_tmp4_a2[1]; > #emit pre add CONST FULL $eq_no = 1 i = 2 > array_tmp5[2] := array_tmp4[2]; > #emit pre assign xxx $eq_no = 1 i = 2 $min_hdrs = 5 > if ( not array_y_set_initial[1,3]) then # if number 1 > if (2 <= ATS_MAX_TERMS) then # if number 2 > temporary := c(array_tmp5[2]) * (expt((glob_h) , c(1))) * c(factorial_3(1,2)); > if (3 <= ATS_MAX_TERMS) then # if number 3 > array_y[3] := temporary; > array_y_higher[1,3] := temporary; > fi;# end if 3; > temporary := c(temporary) / c(glob_h) * c(2); > array_y_higher[2,2] := c(temporary); > fi;# end if 2; > fi;# end if 1; > kkk := 3; > #END ATOMHDR2 > #BEGIN ATOMHDR3 > #emit pre 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 tanh $eq_no = 1 > array_tmp4_a1[3] := att(2,array_tmp4_a2,array_tmp3,1); > array_tmp4_a2[3] := att(2,array_tmp4_a1,array_tmp3,1); > array_tmp4[3] := (array_tmp4_a1[3] - ats(3,array_tmp4_a2,array_tmp4,2)) / array_tmp4_a2[1]; > #emit pre add CONST FULL $eq_no = 1 i = 3 > array_tmp5[3] := array_tmp4[3]; > #emit pre assign xxx $eq_no = 1 i = 3 $min_hdrs = 5 > if ( not array_y_set_initial[1,4]) then # if number 1 > if (3 <= ATS_MAX_TERMS) then # if number 2 > temporary := c(array_tmp5[3]) * (expt((glob_h) , c(1))) * c(factorial_3(2,3)); > if (4 <= ATS_MAX_TERMS) then # if number 3 > array_y[4] := temporary; > array_y_higher[1,4] := temporary; > fi;# end if 3; > temporary := c(temporary) / c(glob_h) * c(3); > array_y_higher[2,3] := c(temporary); > fi;# end if 2; > fi;# end if 1; > kkk := 4; > #END ATOMHDR3 > #BEGIN ATOMHDR4 > #emit pre 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 tanh $eq_no = 1 > array_tmp4_a1[4] := att(3,array_tmp4_a2,array_tmp3,1); > array_tmp4_a2[4] := att(3,array_tmp4_a1,array_tmp3,1); > array_tmp4[4] := (array_tmp4_a1[4] - ats(4,array_tmp4_a2,array_tmp4,2)) / array_tmp4_a2[1]; > #emit pre add CONST FULL $eq_no = 1 i = 4 > array_tmp5[4] := array_tmp4[4]; > #emit pre assign xxx $eq_no = 1 i = 4 $min_hdrs = 5 > if ( not array_y_set_initial[1,5]) then # if number 1 > if (4 <= ATS_MAX_TERMS) then # if number 2 > temporary := c(array_tmp5[4]) * (expt((glob_h) , c(1))) * c(factorial_3(3,4)); > if (5 <= ATS_MAX_TERMS) then # if number 3 > array_y[5] := temporary; > array_y_higher[1,5] := temporary; > fi;# end if 3; > temporary := c(temporary) / c(glob_h) * c(4); > array_y_higher[2,4] := c(temporary); > fi;# end if 2; > fi;# end if 1; > kkk := 5; > #END ATOMHDR4 > #BEGIN ATOMHDR5 > #emit pre 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 tanh $eq_no = 1 > array_tmp4_a1[5] := att(4,array_tmp4_a2,array_tmp3,1); > array_tmp4_a2[5] := att(4,array_tmp4_a1,array_tmp3,1); > array_tmp4[5] := (array_tmp4_a1[5] - ats(5,array_tmp4_a2,array_tmp4,2)) / array_tmp4_a2[1]; > #emit pre add CONST FULL $eq_no = 1 i = 5 > array_tmp5[5] := array_tmp4[5]; > #emit pre assign xxx $eq_no = 1 i = 5 $min_hdrs = 5 > if ( not array_y_set_initial[1,6]) then # if number 1 > if (5 <= ATS_MAX_TERMS) then # if number 2 > temporary := c(array_tmp5[5]) * (expt((glob_h) , c(1))) * c(factorial_3(4,5)); > if (6 <= ATS_MAX_TERMS) then # if number 3 > array_y[6] := temporary; > array_y_higher[1,6] := temporary; > fi;# end if 3; > temporary := c(temporary) / c(glob_h) * c(5); > array_y_higher[2,5] := c(temporary); > fi;# end if 2; > fi;# end if 1; > kkk := 6; > #END ATOMHDR5 > #BEGIN OUTFILE3 > #Top Atomall While Loop-- outfile3 > while (kkk <= ATS_MAX_TERMS) do # do number 1 > #END OUTFILE3 > #BEGIN OUTFILE4 > #emit 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; > array_tmp4_a1[kkk] := att(kkk-1 ,array_tmp4_a2,array_tmp3,1); > array_tmp4_a2[kkk] := att(kkk-1,array_tmp4_a1,array_tmp3,1); > array_tmp4[kkk] := (array_tmp4_a1[kkk] - ats(kkk ,array_tmp4_a2,array_tmp4,2)) / array_tmp4_a2[1]; > #emit NOT FULL - FULL add $eq_no = 1 > array_tmp5[kkk] := array_tmp4[kkk]; > #emit assign $eq_no = 1 > order_d := 1; > if (kkk + order_d <= ATS_MAX_TERMS) then # if number 1 > if ( not array_y_set_initial[1,kkk + order_d]) then # if number 2 > temporary := c(array_tmp5[kkk]) * expt((glob_h) , c(order_d)) * c(factorial_3((kkk - 1),(kkk + order_d - 1))); > array_y[kkk + order_d] := c(temporary); > array_y_higher[1,kkk + order_d] := c(temporary); > term := kkk + order_d - 1; > adj2 := kkk + order_d - 1; > adj3 := 2; > while ((term >= 1) and (term <= ATS_MAX_TERMS) and (adj3 < order_d + 1)) do # do number 1 > if (adj3 <= order_d + 1) then # if number 3 > if (adj2 > 0) then # if number 4 > temporary := c(temporary) / c(glob_h) * c(adj2); > else > temporary := c(temporary); > fi;# end if 4; > array_y_higher[adj3,term] := c(temporary); > fi;# end if 3; > term := term - 1; > adj2 := adj2 - 1; > adj3 := adj3 + 1; > od;# end do number 1 > fi;# end if 2 > fi;# end if 1; > kkk := kkk + 1; > od;# end do number 1; > #BOTTOM ATOMALL > #END OUTFILE4 > #BEGIN OUTFILE5 > #BOTTOM ATOMALL ??? > end; atomall := proc() local kkk, order_d, adj2, adj3, temporary, term; global ALWAYS, INFO, DEBUGL, DEBUGMASSIVE, glob_iolevel, glob_yes_pole, glob_no_pole, glob_not_given, glob_no_sing_tests, glob_ratio_test, glob_three_term_test, glob_six_term_test, glob_log_10, MAX_UNCHANGED, glob__small, glob_small_float, glob_smallish_float, glob_large_float, glob_larger_float, glob__m2, glob__m1, glob__0, glob__1, glob__2, glob__3, glob__4, glob__5, glob__8, glob__10, glob__100, glob__pi, glob__0_5, glob__0_8, glob__m0_8, glob__0_25, glob__0_125, glob_h, glob_nxt, glob_prec, glob_check_sign, glob_desired_digits_correct, glob_max_estimated_step_error, glob_ratio_of_radius, glob_percent_done, glob_total_exp_sec, glob_optimal_expect_sec, glob_estimated_size_answer, glob_almost_1, glob_clock_sec, glob_clock_start_sec, glob_disp_incr, glob_diff_rc_fm, glob_diff_rc_fmm1, glob_diff_rc_fmm2, glob_diff_ord_fm, glob_diff_ord_fmm1, glob_diff_ord_fmm2, glob_six_term_ord_save, glob_guess_error_rc, glob_guess_error_ord, glob_least_given_sing, glob_least_ratio_sing, glob_least_3_sing, glob_least_6_sing, glob_last_good_h, glob_max_h, glob_min_h, glob_display_interval, glob_abserr, glob_relerr, glob_min_pole_est, glob_max_rel_trunc_err, glob_max_trunc_err, glob_max_hours, glob_optimal_clock_start_sec, glob_optimal_start, glob_upper_ratio_limit, glob_lower_ratio_limit, glob_max_sec, glob_orig_start_sec, glob_normmax, glob_max_minutes, glob_next_display, glob_est_digits, glob_subiter_method, glob_html_log, glob_min_good_digits, glob_good_digits, glob_min_apfp_est_good_digits, glob_apfp_est_good_digits, glob_max_opt_iter, glob_dump, glob_djd_debug, glob_display_flag, glob_djd_debug2, glob_h_reason, glob_sec_in_minute, glob_min_in_hour, glob_hours_in_day, glob_days_in_year, glob_sec_in_hour, glob_sec_in_day, glob_sec_in_year, glob_not_yet_finished, glob_initial_pass, glob_not_yet_start_msg, glob_reached_optimal_h, glob_optimal_done, glob_type_given_pole, glob_optimize, glob_look_poles, glob_dump_closed_form, glob_max_iter, glob_no_eqs, glob_unchanged_h_cnt, glob_warned, glob_warned2, glob_start, glob_iter, array_const_1, array_const_0D0, array_const_2D0, array_const_3D0, 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_g, array_tmp4_a1, array_tmp4_a2, 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_2D0[1]*array_x[1]; array_tmp2[1] := array_tmp1[1] + array_const_3D0[1]; array_tmp3[1] := sqrt(array_tmp2[1]); array_tmp4_a1[1] := sinh(array_tmp3[1]); array_tmp4_a2[1] := cosh(array_tmp3[1]); array_tmp4[1] := array_tmp4_a1[1]/array_tmp4_a2[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_2D0[1]*array_x[2]; array_tmp2[2] := array_tmp1[2]; array_tmp3[2] := array_tmp2[2]/(array_tmp3[1]*glob__2); array_tmp4_a1[2] := att(1, array_tmp4_a2, array_tmp3, 1); array_tmp4_a2[2] := att(1, array_tmp4_a1, array_tmp3, 1); array_tmp4[2] := ( array_tmp4_a1[2] - ats(2, array_tmp4_a2, array_tmp4, 2))/ array_tmp4_a2[1]; array_tmp5[2] := array_tmp4[2]; if not array_y_set_initial[1, 3] then if 2 <= ATS_MAX_TERMS then temporary := c(array_tmp5[2])*expt(glob_h, c(1))*c(factorial_3(1, 2)); if 3 <= ATS_MAX_TERMS then array_y[3] := temporary; array_y_higher[1, 3] := temporary end if; temporary := c(temporary)*c(2)/c(glob_h); array_y_higher[2, 2] := c(temporary) end if end if; kkk := 3; array_tmp3[3] := 0; array_tmp3[3] := neg(ats(3, array_tmp3, array_tmp3, 2))/(array_tmp3[1]*glob__2); array_tmp4_a1[3] := att(2, array_tmp4_a2, array_tmp3, 1); array_tmp4_a2[3] := att(2, array_tmp4_a1, array_tmp3, 1); array_tmp4[3] := ( array_tmp4_a1[3] - ats(3, array_tmp4_a2, array_tmp4, 2))/ array_tmp4_a2[1]; 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); array_tmp4_a1[4] := att(3, array_tmp4_a2, array_tmp3, 1); array_tmp4_a2[4] := att(3, array_tmp4_a1, array_tmp3, 1); array_tmp4[4] := ( array_tmp4_a1[4] - ats(4, array_tmp4_a2, array_tmp4, 2))/ array_tmp4_a2[1]; 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); array_tmp4_a1[5] := att(4, array_tmp4_a2, array_tmp3, 1); array_tmp4_a2[5] := att(4, array_tmp4_a1, array_tmp3, 1); array_tmp4[5] := ( array_tmp4_a1[5] - ats(5, array_tmp4_a2, array_tmp4, 2))/ array_tmp4_a2[1]; 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); array_tmp4_a1[kkk] := att(kkk - 1, array_tmp4_a2, array_tmp3, 1); array_tmp4_a2[kkk] := att(kkk - 1, array_tmp4_a1, array_tmp3, 1); array_tmp4[kkk] := ( array_tmp4_a1[kkk] - ats(kkk, array_tmp4_a2, array_tmp4, 2))/ array_tmp4_a2[1]; array_tmp5[kkk] := array_tmp4[kkk]; order_d := 1; if kkk + order_d <= ATS_MAX_TERMS then if not array_y_set_initial[1, kkk + order_d] then temporary := c(array_tmp5[kkk])*expt(glob_h, c(order_d))* c(factorial_3(kkk - 1, kkk + order_d - 1)); array_y[kkk + order_d] := c(temporary); array_y_higher[1, kkk + order_d] := c(temporary); term := kkk + order_d - 1; adj2 := kkk + order_d - 1; adj3 := 2; while 1 <= term and term <= ATS_MAX_TERMS and adj3 < order_d + 1 do if adj3 <= order_d + 1 then if 0 < adj2 then temporary := c(temporary)*c(adj2)/c(glob_h) else temporary := c(temporary) end if; array_y_higher[adj3, term] := c(temporary) end if; term := term - 1; adj2 := adj2 - 1; adj3 := adj3 + 1 end do end if end if; kkk := kkk + 1 end do end proc # End Function number 12 #END OUTFILE5 # Begin Function number 12 > main := proc() > #BEGIN OUTFIEMAIN > local d1,d2,d3,d4,est_err_2,niii,done_once,max_terms,display_max, > term,ord,order_diff,term_no,html_log_file,iiif,jjjf, > rows,r_order,sub_iter,calc_term,iii,temp_sum,current_iter, > x_start,x_end > ,it,last_min_pole_est, opt_iter, tmp,subiter, est_needed_step_err,estimated_step_error,min_value,est_answer,found_h,repeat_it; > global > ALWAYS, > INFO, > DEBUGL, > DEBUGMASSIVE, > glob_iolevel, > glob_yes_pole, > glob_no_pole, > glob_not_given, > glob_no_sing_tests, > glob_ratio_test, > glob_three_term_test, > glob_six_term_test, > glob_log_10, > #Top Generate Globals Decl > MAX_UNCHANGED, > glob__small, > glob_small_float, > glob_smallish_float, > glob_large_float, > glob_larger_float, > glob__m2, > glob__m1, > glob__0, > glob__1, > glob__2, > glob__3, > glob__4, > glob__5, > glob__8, > glob__10, > glob__100, > glob__pi, > glob__0_5, > glob__0_8, > glob__m0_8, > glob__0_25, > glob__0_125, > glob_h, > glob_nxt, > glob_prec, > glob_check_sign, > glob_desired_digits_correct, > glob_max_estimated_step_error, > glob_ratio_of_radius, > glob_percent_done, > glob_total_exp_sec, > glob_optimal_expect_sec, > glob_estimated_size_answer, > glob_almost_1, > glob_clock_sec, > glob_clock_start_sec, > glob_disp_incr, > glob_diff_rc_fm, > glob_diff_rc_fmm1, > glob_diff_rc_fmm2, > glob_diff_ord_fm, > glob_diff_ord_fmm1, > glob_diff_ord_fmm2, > glob_six_term_ord_save, > glob_guess_error_rc, > glob_guess_error_ord, > glob_least_given_sing, > glob_least_ratio_sing, > glob_least_3_sing, > glob_least_6_sing, > glob_last_good_h, > glob_max_h, > glob_min_h, > glob_display_interval, > glob_abserr, > glob_relerr, > glob_min_pole_est, > glob_max_rel_trunc_err, > glob_max_trunc_err, > glob_max_hours, > glob_optimal_clock_start_sec, > glob_optimal_start, > glob_upper_ratio_limit, > glob_lower_ratio_limit, > glob_max_sec, > glob_orig_start_sec, > glob_normmax, > glob_max_minutes, > glob_next_display, > glob_est_digits, > glob_subiter_method, > glob_html_log, > glob_min_good_digits, > glob_good_digits, > glob_min_apfp_est_good_digits, > glob_apfp_est_good_digits, > glob_max_opt_iter, > glob_dump, > glob_djd_debug, > glob_display_flag, > glob_djd_debug2, > glob_h_reason, > glob_sec_in_minute, > glob_min_in_hour, > glob_hours_in_day, > glob_days_in_year, > glob_sec_in_hour, > glob_sec_in_day, > glob_sec_in_year, > glob_not_yet_finished, > glob_initial_pass, > glob_not_yet_start_msg, > glob_reached_optimal_h, > glob_optimal_done, > glob_type_given_pole, > glob_optimize, > glob_look_poles, > glob_dump_closed_form, > glob_max_iter, > glob_no_eqs, > glob_unchanged_h_cnt, > glob_warned, > glob_warned2, > glob_start, > glob_iter, > #Bottom Generate Globals Decl > #BEGIN CONST > array_const_1, > array_const_0D0, > array_const_2D0, > array_const_3D0, > #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_g, > array_tmp4_a1, > array_tmp4_a2, > 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_g:= Array(0..(30),[]); > array_tmp4_a1:= Array(0..(30),[]); > array_tmp4_a2:= 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_g[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_a2[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_g); > zero_ats_ar(array_tmp4_a1); > zero_ats_ar(array_tmp4_a2); > 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_2D0); > array_const_2D0[1] := c(2.0); > zero_ats_ar(array_const_3D0); > array_const_3D0[1] := c(3.0); > zero_ats_ar(array_m1); > array_m1[1] := glob__m1; > #END SYMBOLS INITIALIZATED > # before generate factorials init > #Initing Factorial Tables > iiif := 0; > while (iiif <= ATS_MAX_TERMS) do # do number 1 > jjjf := 0; > while (jjjf <= ATS_MAX_TERMS) do # do number 2 > array_fact_1[iiif] := 0; > array_fact_2[iiif,jjjf] := 0; > jjjf := jjjf + 1; > od;# end do number 2; > iiif := iiif + 1; > od;# end do number 1; > #Done Initing Factorial Table > ALWAYS := 1; > INFO := 2; > DEBUGL := 3; > DEBUGMASSIVE := 4; > glob_iolevel := 5; > glob_yes_pole := 4; > glob_no_pole := 3; > glob_not_given := 0; > glob_no_sing_tests := 4; > glob_ratio_test := 1; > glob_three_term_test := 2; > glob_six_term_test := 3; > glob_log_10 := log(c(10.0)); > MAX_UNCHANGED := 10; > glob__small := c(0.1e-50); > glob_small_float := c(0.1e-50); > glob_smallish_float := c(0.1e-60); > glob_large_float := c(1.0e100); > glob_larger_float := c(1.1e100); > glob__m2 := c(-2); > glob__m1 := c(-1); > glob__0 := c(0); > glob__1 := c(1); > glob__2 := c(2); > glob__3 := c(3); > glob__4 := c(4); > glob__5 := c(5); > glob__8 := c(8); > glob__10 := c(10); > glob__100 := c(100); > glob__pi := c(0.0); > glob__0_5 := c(0.5); > glob__0_8 := c(0.8); > glob__m0_8 := c(-0.8); > glob__0_25 := c(0.25); > glob__0_125 := c(0.125); > glob_h := 0.1; > glob_nxt := 1; > glob_prec := c(1.0e-16); > glob_check_sign := c(1.0); > glob_desired_digits_correct := c(8.0); > glob_max_estimated_step_error := c(0.0); > glob_ratio_of_radius := c(0.1); > glob_percent_done := c(0.0); > glob_total_exp_sec := c(0.1); > glob_optimal_expect_sec := c(0.1); > glob_estimated_size_answer := c(100.0); > glob_almost_1 := c(0.9990); > glob_clock_sec := c(0.0); > glob_clock_start_sec := c(0.0); > glob_disp_incr := c(0.1); > glob_diff_rc_fm := c(0.1); > glob_diff_rc_fmm1 := c(0.1); > glob_diff_rc_fmm2 := c(0.1); > glob_diff_ord_fm := c(0.1); > glob_diff_ord_fmm1 := c(0.1); > glob_diff_ord_fmm2 := c(0.1); > glob_six_term_ord_save := c(0.1); > glob_guess_error_rc := c(0.1); > glob_guess_error_ord := c(0.1); > glob_least_given_sing := c(9.9e200); > glob_least_ratio_sing := c(9.9e200); > glob_least_3_sing := c(9.9e100); > glob_least_6_sing := c(9.9e100); > glob_last_good_h := c(0.1); > glob_max_h := c(0.1); > glob_min_h := c(0.000001); > glob_display_interval := c(0.1); > glob_abserr := c(0.1e-10); > glob_relerr := c(0.1e-10); > glob_min_pole_est := c(0.1e+10); > glob_max_rel_trunc_err := c(0.1e-10); > glob_max_trunc_err := c(0.1e-10); > glob_max_hours := c(0.0); > glob_optimal_clock_start_sec := c(0.0); > glob_optimal_start := c(0.0); > glob_upper_ratio_limit := c(1.0001); > glob_lower_ratio_limit := c(0.9999); > glob_max_sec := c(10000.0); > glob_orig_start_sec := c(0.0); > glob_normmax := c(0.0); > glob_max_minutes := c(0.0); > glob_next_display := c(0.0); > glob_est_digits := 1; > glob_subiter_method := 3; > glob_html_log := true; > glob_min_good_digits := 99999; > glob_good_digits := 0; > glob_min_apfp_est_good_digits := 99999; > glob_apfp_est_good_digits := 0; > glob_max_opt_iter := 10; > glob_dump := false; > glob_djd_debug := true; > glob_display_flag := true; > glob_djd_debug2 := true; > glob_h_reason := 0; > glob_sec_in_minute := 60 ; > glob_min_in_hour := 60; > glob_hours_in_day := 24; > glob_days_in_year := 365; > glob_sec_in_hour := 3600; > glob_sec_in_day := 86400; > glob_sec_in_year := 31536000; > glob_not_yet_finished := true; > glob_initial_pass := true; > glob_not_yet_start_msg := true; > glob_reached_optimal_h := false; > glob_optimal_done := false; > glob_type_given_pole := 0; > glob_optimize := false; > glob_look_poles := false; > glob_dump_closed_form := false; > glob_max_iter := 10000; > glob_no_eqs := 0; > glob_unchanged_h_cnt := 0; > glob_warned := false; > glob_warned2 := false; > glob_start := 0; > glob_iter := 0; > # before generate set diff initial > array_y_set_initial[1,1] := true; > array_y_set_initial[1,2] := false; > array_y_set_initial[1,3] := false; > array_y_set_initial[1,4] := false; > array_y_set_initial[1,5] := false; > array_y_set_initial[1,6] := false; > array_y_set_initial[1,7] := false; > array_y_set_initial[1,8] := false; > array_y_set_initial[1,9] := false; > array_y_set_initial[1,10] := false; > array_y_set_initial[1,11] := false; > array_y_set_initial[1,12] := false; > array_y_set_initial[1,13] := false; > array_y_set_initial[1,14] := false; > array_y_set_initial[1,15] := false; > array_y_set_initial[1,16] := false; > array_y_set_initial[1,17] := false; > array_y_set_initial[1,18] := false; > array_y_set_initial[1,19] := false; > array_y_set_initial[1,20] := false; > array_y_set_initial[1,21] := false; > array_y_set_initial[1,22] := false; > array_y_set_initial[1,23] := false; > array_y_set_initial[1,24] := false; > array_y_set_initial[1,25] := false; > array_y_set_initial[1,26] := false; > array_y_set_initial[1,27] := false; > array_y_set_initial[1,28] := false; > array_y_set_initial[1,29] := false; > array_y_set_initial[1,30] := false; > # before generate init omniout const > ALWAYS := 1; > INFO := 2; > DEBUGL := 3; > DEBUGMASSIVE := 4; > ATS_MAX_TERMS := 30; > glob_iolevel := INFO; > # set default block > #Write Set Defaults > glob_orig_start_sec := elapsed_time_seconds(); > glob_display_flag := true; > glob_no_eqs := 1; > glob_iter := -1; > opt_iter := -1; > glob_max_iter := 10000; > glob_max_hours := (0.0); > glob_max_minutes := (15.0); > omniout_str(ALWAYS,"##############ECHO OF PROBLEM#################"); > omniout_str(ALWAYS,"##############temp/tanh_sqrtpostcpx.cpx#################"); > omniout_str(ALWAYS,"diff ( y , x , 1 ) = tanh ( sqrt ( 2.0 * x + 3.0 ) ) ; "); > omniout_str(ALWAYS,"!"); > omniout_str(ALWAYS,"#BEGIN FIRST INPUT BLOCK"); > omniout_str(ALWAYS,"Digits:=32;"); > omniout_str(ALWAYS,"max_terms:=30;"); > omniout_str(ALWAYS,"!"); > omniout_str(ALWAYS,"#END FIRST INPUT BLOCK"); > omniout_str(ALWAYS,"#BEGIN SECOND INPUT BLOCK"); > omniout_str(ALWAYS,"x_start := 0.1 + 0.1 * I;"); > omniout_str(ALWAYS,"x_end := 99.0 + 99.0 * I;"); > omniout_str(ALWAYS,"array_y_init[0 + 1] := exact_soln_y(x_start);"); > omniout_str(ALWAYS,"glob_look_poles := true;"); > omniout_str(ALWAYS,"glob_max_h := 0.1;"); > 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(-1.5);"); > 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,"#END SECOND INPUT BLOCK"); > omniout_str(ALWAYS,"#BEGIN OVERRIDE BLOCK"); > omniout_str(ALWAYS,"glob_desired_digits_correct:=8;"); > omniout_str(ALWAYS,"glob_max_minutes:=(3.0);"); > omniout_str(ALWAYS,"glob_subiter_method:=3;"); > omniout_str(ALWAYS,"glob_max_iter:=10000;"); > omniout_str(ALWAYS,"glob_upper_ratio_limit:=c(1.000001);"); > omniout_str(ALWAYS,"glob_lower_ratio_limit:=c(0.999999);"); > omniout_str(ALWAYS,"glob_look_poles:=true;"); > omniout_str(ALWAYS,"glob_h:=c(0.001);"); > omniout_str(ALWAYS,"glob_display_interval:=c(0.01);"); > omniout_str(ALWAYS,"#END OVERRIDE BLOCK"); > omniout_str(ALWAYS,"!"); > omniout_str(ALWAYS,"#BEGIN USER DEF BLOCK"); > omniout_str(ALWAYS,"exact_soln_y := proc(x)"); > omniout_str(ALWAYS,"return(c(0.0));"); > omniout_str(ALWAYS,"end;"); > omniout_str(ALWAYS,"next_delta := proc()"); > omniout_str(ALWAYS,"global glob_nxt, x_delta;"); > omniout_str(ALWAYS,""); > omniout_str(ALWAYS,"x_delta := [ 0.001 + 0.00004 * I,"); > omniout_str(ALWAYS,"0.0001 + 0.004 * I,"); > omniout_str(ALWAYS,"0.003 + 0.006 * I,"); > omniout_str(ALWAYS,"0.0001 + 0.005 * I,"); > omniout_str(ALWAYS,"0.0001 + 0.003 * I,"); > omniout_str(ALWAYS,"0.001 + 0.001 * I,"); > omniout_str(ALWAYS,"0.001 + 0.003 * I,"); > omniout_str(ALWAYS,"0.0001 + 0.004 * I,"); > omniout_str(ALWAYS,"0.003 + 0.006 * I,"); > omniout_str(ALWAYS,"0.0001 + 0.005 * I,"); > omniout_str(ALWAYS,"0.0001 + 0.003 * I,"); > omniout_str(ALWAYS,"0.001 + 0.001 * I,"); > omniout_str(ALWAYS,"0.001 + 0.003 * I,"); > omniout_str(ALWAYS,"0.0001 + 0.004 * I,"); > omniout_str(ALWAYS,"0.003 + 0.006 * I,"); > omniout_str(ALWAYS,"0.0001 + 0.005 * I,"); > omniout_str(ALWAYS,"0.0001 + 0.003 * I,"); > omniout_str(ALWAYS,"0.001 + 0.001 * I,"); > omniout_str(ALWAYS,"0.001 + 0.003 * I,"); > omniout_str(ALWAYS,"0.0001 + 0.004 * I,"); > omniout_str(ALWAYS,"0.003 + 0.006 * I,"); > omniout_str(ALWAYS,"0.0001 + 0.005 * I,"); > omniout_str(ALWAYS,"0.0001 + 0.003 * I,"); > omniout_str(ALWAYS,"0.001 + 0.001 * I,"); > omniout_str(ALWAYS,"0.001 + 0.003 * I,"); > omniout_str(ALWAYS,"0.0001 + 0.004 * I,"); > omniout_str(ALWAYS,"0.003 + 0.006 * I,"); > omniout_str(ALWAYS,"0.0001 + 0.005 * I,"); > omniout_str(ALWAYS,"0.0001 + 0.003 * I,"); > omniout_str(ALWAYS,"0.001 + 0.001 * I,"); > omniout_str(ALWAYS,"0.0001 + 0.004 * I,"); > omniout_str(ALWAYS,"0.003 + 0.006 * I,"); > omniout_str(ALWAYS,"0.0001 + 0.005 * I,"); > omniout_str(ALWAYS,"0.0001 + 0.003 * I,"); > omniout_str(ALWAYS,"0.001 + 0.001 * I,"); > omniout_str(ALWAYS,"0.001 + 0.003 * I,"); > omniout_str(ALWAYS,"0.0001 + 0.004 * I,"); > omniout_str(ALWAYS,"0.003 + 0.006 * I,"); > omniout_str(ALWAYS,"0.0001 + 0.005 * I,"); > omniout_str(ALWAYS,"0.0001 + 0.003 * I,"); > omniout_str(ALWAYS,"0.001 + 0.001 * I,"); > omniout_str(ALWAYS,"0.001 + 0.003 * I,"); > omniout_str(ALWAYS,"0.0001 + 0.004 * I,"); > omniout_str(ALWAYS,"0.003 + 0.006 * I,"); > omniout_str(ALWAYS,"0.0001 + 0.005 * I,"); > omniout_str(ALWAYS,"0.0001 + 0.003 * I,"); > omniout_str(ALWAYS,"0.001 + 0.001 * I,"); > omniout_str(ALWAYS,"0.001 + 0.003 * I,"); > omniout_str(ALWAYS,"0.0001 + 0.004 * I,"); > omniout_str(ALWAYS,"0.003 + 0.006 * I,"); > omniout_str(ALWAYS,"0.0001 + 0.005 * I,"); > omniout_str(ALWAYS,"0.0001 + 0.003 * I,"); > omniout_str(ALWAYS,"0.001 + 0.001 * I,"); > omniout_str(ALWAYS,"0.001 + 0.003 * I,"); > omniout_str(ALWAYS,"0.0001 + 0.004 * I,"); > omniout_str(ALWAYS,"0.003 + 0.006 * I,"); > omniout_str(ALWAYS,"0.0001 + 0.005 * I,"); > omniout_str(ALWAYS,"0.0001 + 0.003 * I,"); > omniout_str(ALWAYS,"0.001 + 0.001 * I,"); > omniout_str(ALWAYS,"0.0001 + 0.004 * I,"); > omniout_str(ALWAYS,"0.003 + 0.006 * I,"); > omniout_str(ALWAYS,"0.0001 + 0.005 * I,"); > omniout_str(ALWAYS,"0.0001 + 0.003 * I,"); > omniout_str(ALWAYS,"0.001 + 0.001 * I,"); > omniout_str(ALWAYS,"0.001 + 0.003 * I,"); > omniout_str(ALWAYS,"0.0001 + 0.004 * I,"); > omniout_str(ALWAYS,"0.003 + 0.006 * I,"); > omniout_str(ALWAYS,"0.0001 + 0.005 * I,"); > omniout_str(ALWAYS,"0.0001 + 0.003 * I,"); > omniout_str(ALWAYS,"0.001 + 0.001 * I,"); > omniout_str(ALWAYS,"0.001 + 0.003 * I,"); > omniout_str(ALWAYS,"0.0001 + 0.004 * I,"); > omniout_str(ALWAYS,"0.003 + 0.006 * I,"); > omniout_str(ALWAYS,"0.0001 + 0.005 * I,"); > omniout_str(ALWAYS,"0.0001 + 0.003 * I,"); > omniout_str(ALWAYS,"0.001 + 0.001 * I,"); > omniout_str(ALWAYS,"0.001 + 0.003 * I,"); > omniout_str(ALWAYS,"0.0001 + 0.004 * I,"); > omniout_str(ALWAYS,"0.003 + 0.006 * I,"); > omniout_str(ALWAYS,"0.0001 + 0.005 * I,"); > omniout_str(ALWAYS,"0.0001 + 0.003 * I,"); > omniout_str(ALWAYS,"0.001 + 0.001 * I,"); > omniout_str(ALWAYS,"0.001 + 0.003 * I,"); > omniout_str(ALWAYS,"0.0001 + 0.004 * I,"); > omniout_str(ALWAYS,"0.003 + 0.006 * I,"); > omniout_str(ALWAYS,"0.0001 + 0.005 * I,"); > omniout_str(ALWAYS,"0.0001 + 0.003 * I,"); > omniout_str(ALWAYS,"0.001 + 0.001 * I,"); > omniout_str(ALWAYS,"0.0001 + 0.004 * I,"); > omniout_str(ALWAYS,"0.003 + 0.006 * I,"); > omniout_str(ALWAYS,"0.0001 + 0.005 * I,"); > omniout_str(ALWAYS,"0.0001 + 0.003 * I,"); > omniout_str(ALWAYS,"0.001 + 0.001 * I,"); > omniout_str(ALWAYS,"0.001 + 0.003 * I,"); > omniout_str(ALWAYS,"0.0001 + 0.004 * I,"); > omniout_str(ALWAYS,"0.003 + 0.006 * I,"); > omniout_str(ALWAYS,"0.0001 + 0.005 * I,"); > omniout_str(ALWAYS,"0.0001 + 0.003 * I,"); > omniout_str(ALWAYS,"0.001 + 0.001 * I,"); > omniout_str(ALWAYS,"0.001 + 0.003 * I,"); > omniout_str(ALWAYS,"0.0001 + 0.004 * I,"); > omniout_str(ALWAYS,"0.003 + 0.006 * I,"); > omniout_str(ALWAYS,"0.0001 + 0.005 * I,"); > omniout_str(ALWAYS,"0.0001 + 0.003 * I,"); > omniout_str(ALWAYS,"0.001 + 0.001 * I,"); > omniout_str(ALWAYS,"0.001 + 0.003 * I,"); > omniout_str(ALWAYS,"0.0001 + 0.004 * I,"); > omniout_str(ALWAYS,"0.003 + 0.006 * I,"); > omniout_str(ALWAYS,"0.0001 + 0.005 * I,"); > omniout_str(ALWAYS,"0.0001 + 0.003 * I,"); > omniout_str(ALWAYS,"0.001 + 0.001 * I,"); > omniout_str(ALWAYS,"0.001 + 0.003 * I,"); > omniout_str(ALWAYS,"0.0001 + 0.004 * I,"); > omniout_str(ALWAYS,"0.003 + 0.006 * I,"); > omniout_str(ALWAYS,"0.0001 + 0.005 * I,"); > omniout_str(ALWAYS,"0.0001 + 0.003 * I,"); > omniout_str(ALWAYS,"0.001 + 0.001 * I,"); > omniout_str(ALWAYS,"0.0001 + 0.004 * I,"); > omniout_str(ALWAYS,"0.003 + 0.006 * I,"); > omniout_str(ALWAYS,"0.0001 + 0.005 * I,"); > omniout_str(ALWAYS,"0.0001 + 0.003 * I,"); > omniout_str(ALWAYS,"0.001 + 0.001 * I,"); > omniout_str(ALWAYS,"0.001 + 0.003 * I,"); > omniout_str(ALWAYS,"0.0001 + 0.004 * I,"); > omniout_str(ALWAYS,"0.003 + 0.006 * I,"); > omniout_str(ALWAYS,"0.0001 + 0.005 * I,"); > omniout_str(ALWAYS,"0.0001 + 0.003 * I,"); > omniout_str(ALWAYS,"0.001 + 0.001 * I,"); > omniout_str(ALWAYS,"0.001 + 0.003 * I,"); > omniout_str(ALWAYS,"0.0001 + 0.004 * I,"); > omniout_str(ALWAYS,"0.003 + 0.006 * I,"); > omniout_str(ALWAYS,"0.0001 + 0.005 * I,"); > omniout_str(ALWAYS,"0.0001 + 0.003 * I,"); > omniout_str(ALWAYS,"0.001 + 0.001 * I,"); > omniout_str(ALWAYS,"0.001 + 0.003 * I,"); > omniout_str(ALWAYS,"0.0001 + 0.004 * I,"); > omniout_str(ALWAYS,"0.003 + 0.006 * I,"); > omniout_str(ALWAYS,"0.0001 + 0.005 * I,"); > omniout_str(ALWAYS,"0.0001 + 0.003 * I,"); > omniout_str(ALWAYS,"0.001 + 0.001 * I,"); > omniout_str(ALWAYS,"0.001 + 0.003 * I,"); > omniout_str(ALWAYS,"0.0001 + 0.004 * I,"); > omniout_str(ALWAYS,"0.003 + 0.006 * I,"); > omniout_str(ALWAYS,"0.0001 + 0.005 * I,"); > omniout_str(ALWAYS,"0.0001 + 0.003 * I,"); > omniout_str(ALWAYS,"0.001 + 0.001 * I,"); > omniout_str(ALWAYS,"0.0001 + 0.004 * I,"); > omniout_str(ALWAYS,"0.003 + 0.006 * I,"); > omniout_str(ALWAYS,"0.0001 + 0.005 * I,"); > omniout_str(ALWAYS,"0.0001 + 0.003 * I,"); > omniout_str(ALWAYS,"0.001 + 0.001 * I,"); > omniout_str(ALWAYS,"0.001 + 0.003 * I,"); > omniout_str(ALWAYS,"0.0001 + 0.004 * I,"); > omniout_str(ALWAYS,"0.003 + 0.006 * I,"); > omniout_str(ALWAYS,"0.0001 + 0.005 * I,"); > omniout_str(ALWAYS,"0.0001 + 0.003 * I,"); > omniout_str(ALWAYS,"0.001 + 0.001 * I,"); > omniout_str(ALWAYS,"0.001 + 0.003 * I,"); > omniout_str(ALWAYS,"0.0001 + 0.004 * I,"); > omniout_str(ALWAYS,"0.003 + 0.006 * I,"); > omniout_str(ALWAYS,"0.0001 + 0.005 * I,"); > omniout_str(ALWAYS,"0.0001 + 0.003 * I,"); > omniout_str(ALWAYS,"0.001 + 0.001 * I,"); > omniout_str(ALWAYS,"0.001 + 0.003 * I,"); > omniout_str(ALWAYS,"0.0001 + 0.004 * I,"); > omniout_str(ALWAYS,"0.003 + 0.006 * I,"); > omniout_str(ALWAYS,"0.0001 + 0.005 * I,"); > omniout_str(ALWAYS,"0.0001 + 0.003 * I,"); > omniout_str(ALWAYS,"0.001 + 0.001 * I,"); > omniout_str(ALWAYS,"0.001 + 0.003 * I,"); > omniout_str(ALWAYS,"0.0001 + 0.004 * I,"); > omniout_str(ALWAYS,"0.003 + 0.006 * I,"); > omniout_str(ALWAYS,"0.0001 + 0.005 * I,"); > omniout_str(ALWAYS,"0.0001 + 0.003 * I,"); > omniout_str(ALWAYS,"0.001 + 0.001 * I,"); > omniout_str(ALWAYS,"0.0001 + 0.004 * I,"); > omniout_str(ALWAYS,"0.003 + 0.006 * I,"); > omniout_str(ALWAYS,"0.0001 + 0.005 * I,"); > omniout_str(ALWAYS,"0.0001 + 0.003 * I,"); > omniout_str(ALWAYS,"0.001 + 0.001 * I,"); > omniout_str(ALWAYS,"0.001 + 0.003 * I,"); > omniout_str(ALWAYS,"0.0001 + 0.004 * I,"); > omniout_str(ALWAYS,"0.0001 + 0.004 * I,"); > omniout_str(ALWAYS,"0.003 + 0.006 * I,"); > omniout_str(ALWAYS,"0.0001 + 0.005 * I,"); > omniout_str(ALWAYS,"0.0001 + 0.003 * I,"); > omniout_str(ALWAYS,"0.001 + 0.001 * I,"); > omniout_str(ALWAYS,"0.001 + 0.003 * I,"); > omniout_str(ALWAYS,"0.0001 + 0.004 * I,"); > omniout_str(ALWAYS,"0.003 + 0.006 * I,"); > omniout_str(ALWAYS,"0.0001 + 0.005 * I,"); > omniout_str(ALWAYS,"0.0001 + 0.003 * I,"); > omniout_str(ALWAYS,"0.001 + 0.001 * I,"); > omniout_str(ALWAYS,"0.001 + 0.003 * I,"); > omniout_str(ALWAYS,"0.0001 + 0.004 * I,"); > omniout_str(ALWAYS,"0.003 + 0.006 * I,"); > omniout_str(ALWAYS,"0.0001 + 0.005 * I,"); > omniout_str(ALWAYS,"0.0001 + 0.003 * I,"); > omniout_str(ALWAYS,"0.001 + 0.001 * I,"); > omniout_str(ALWAYS,"0.001 + 0.003 * I,"); > omniout_str(ALWAYS,"0.0001 + 0.004 * I,"); > omniout_str(ALWAYS,"0.003 + 0.006 * I,"); > omniout_str(ALWAYS,"0.0001 + 0.005 * I,"); > omniout_str(ALWAYS,"0.0001 + 0.003 * I,"); > omniout_str(ALWAYS,"0.001 + 0.001 * I,"); > omniout_str(ALWAYS,"0.001 + 0.003 * I,"); > omniout_str(ALWAYS,"0.0001 + 0.004 * I,"); > omniout_str(ALWAYS,"0.003 + 0.006 * I,"); > omniout_str(ALWAYS,"0.0001 + 0.005 * I,"); > omniout_str(ALWAYS,"0.0001 + 0.003 * I,"); > omniout_str(ALWAYS,"0.001 + 0.001 * I,"); > omniout_str(ALWAYS,"0.0001 + 0.004 * I,"); > omniout_str(ALWAYS,"0.003 + 0.006 * I,"); > omniout_str(ALWAYS,"0.0001 + 0.005 * I,"); > omniout_str(ALWAYS,"0.0001 + 0.003 * I,"); > omniout_str(ALWAYS,"0.001 + 0.001 * I,"); > omniout_str(ALWAYS,"0.001 + 0.003 * I,"); > omniout_str(ALWAYS,"0.0001 + 0.004 * I,"); > omniout_str(ALWAYS,"0.003 + 0.006 * I,"); > omniout_str(ALWAYS,"0.0001 + 0.005 * I,"); > omniout_str(ALWAYS,"0.0001 + 0.003 * I,"); > omniout_str(ALWAYS,"0.001 + 0.001 * I,"); > omniout_str(ALWAYS,"0.001 + 0.003 * I,"); > omniout_str(ALWAYS,"0.0001 + 0.004 * I,"); > omniout_str(ALWAYS,"0.003 + 0.006 * I,"); > omniout_str(ALWAYS,"0.0001 + 0.005 * I,"); > omniout_str(ALWAYS,"0.0001 + 0.003 * I,"); > omniout_str(ALWAYS,"0.001 + 0.001 * I,"); > omniout_str(ALWAYS,"0.001 + 0.003 * I,"); > omniout_str(ALWAYS,"0.0001 + 0.004 * I,"); > omniout_str(ALWAYS,"0.003 + 0.006 * I,"); > omniout_str(ALWAYS,"0.0001 + 0.005 * I,"); > omniout_str(ALWAYS,"0.0001 + 0.003 * I,"); > omniout_str(ALWAYS,"0.001 + 0.001 * I,"); > omniout_str(ALWAYS,"0.001 + 0.003 * I,"); > omniout_str(ALWAYS,"0.0001 + 0.004 * I,"); > omniout_str(ALWAYS,"0.003 + 0.006 * I,"); > omniout_str(ALWAYS,"0.0001 + 0.005 * I,"); > omniout_str(ALWAYS,"0.0001 + 0.003 * I,"); > omniout_str(ALWAYS,"0.001 + 0.001 * I,"); > omniout_str(ALWAYS,"0.0001 + 0.004 * I,"); > omniout_str(ALWAYS,"0.003 + 0.006 * I,"); > omniout_str(ALWAYS,"0.0001 + 0.005 * I,"); > omniout_str(ALWAYS,"0.0001 + 0.003 * I,"); > omniout_str(ALWAYS,"0.001 + 0.001 * I,"); > omniout_str(ALWAYS,"0.001 + 0.003 * I,"); > omniout_str(ALWAYS,"0.0001 + 0.004 * I,"); > omniout_str(ALWAYS,"0.003 + 0.006 * I,"); > omniout_str(ALWAYS,"0.0001 + 0.005 * I,"); > omniout_str(ALWAYS,"0.0001 + 0.003 * I,"); > omniout_str(ALWAYS,"0.001 + 0.001 * I,"); > omniout_str(ALWAYS,"0.001 + 0.003 * I,"); > omniout_str(ALWAYS,"0.0001 + 0.004 * I,"); > omniout_str(ALWAYS,"0.003 + 0.006 * I,"); > omniout_str(ALWAYS,"0.0001 + 0.005 * I,"); > omniout_str(ALWAYS,"0.0001 + 0.003 * I,"); > omniout_str(ALWAYS,"0.001 + 0.001 * I,"); > omniout_str(ALWAYS,"0.001 + 0.003 * I,"); > omniout_str(ALWAYS,"0.0001 + 0.004 * I,"); > omniout_str(ALWAYS,"0.003 + 0.006 * I,"); > omniout_str(ALWAYS,"0.0001 + 0.005 * I,"); > omniout_str(ALWAYS,"0.0001 + 0.003 * I,"); > omniout_str(ALWAYS,"0.001 + 0.001 * I,"); > omniout_str(ALWAYS,"0.001 + 0.003 * I,"); > omniout_str(ALWAYS,"0.0001 + 0.004 * I,"); > omniout_str(ALWAYS,"0.003 + 0.006 * I,"); > omniout_str(ALWAYS,"0.0001 + 0.005 * I,"); > omniout_str(ALWAYS,"0.0001 + 0.003 * I,"); > omniout_str(ALWAYS,"0.001 + 0.001 * I,"); > omniout_str(ALWAYS,"0.0001 + 0.004 * I,"); > omniout_str(ALWAYS,"0.003 + 0.006 * I,"); > omniout_str(ALWAYS,"0.0001 + 0.005 * I,"); > omniout_str(ALWAYS,"0.0001 + 0.003 * I,"); > omniout_str(ALWAYS,"0.001 + 0.001 * I,"); > omniout_str(ALWAYS,"0.001 + 0.003 * I,"); > omniout_str(ALWAYS,"0.0001 + 0.004 * I,"); > omniout_str(ALWAYS,"0.003 + 0.006 * I,"); > omniout_str(ALWAYS,"0.0001 + 0.005 * I,"); > omniout_str(ALWAYS,"0.0001 + 0.003 * I,"); > omniout_str(ALWAYS,"0.001 + 0.001 * I,"); > omniout_str(ALWAYS,"0.001 + 0.003 * I,"); > omniout_str(ALWAYS,"0.0001 + 0.004 * I,"); > omniout_str(ALWAYS,"0.003 + 0.006 * I,"); > omniout_str(ALWAYS,"0.0001 + 0.005 * I,"); > omniout_str(ALWAYS,"0.0001 + 0.003 * I,"); > omniout_str(ALWAYS,"0.001 + 0.001 * I,"); > omniout_str(ALWAYS,"0.001 + 0.003 * I,"); > omniout_str(ALWAYS,"0.0001 + 0.004 * I,"); > omniout_str(ALWAYS,"0.003 + 0.006 * I,"); > omniout_str(ALWAYS,"0.0001 + 0.005 * I,"); > omniout_str(ALWAYS,"0.0001 + 0.003 * I,"); > omniout_str(ALWAYS,"0.001 + 0.001 * I,"); > omniout_str(ALWAYS,"0.001 + 0.003 * I,"); > omniout_str(ALWAYS,"0.0001 + 0.004 * I,"); > omniout_str(ALWAYS,"0.003 + 0.006 * I,"); > omniout_str(ALWAYS,"0.0001 + 0.005 * I,"); > omniout_str(ALWAYS,"0.0001 + 0.003 * I,"); > omniout_str(ALWAYS,"0.001 + 0.001 * I,"); > omniout_str(ALWAYS,"0.0001 + 0.004 * I,"); > omniout_str(ALWAYS,"0.003 + 0.006 * I,"); > omniout_str(ALWAYS,"0.0001 + 0.005 * I,"); > omniout_str(ALWAYS,"0.0001 + 0.003 * I,"); > omniout_str(ALWAYS,"0.001 + 0.001 * I,"); > omniout_str(ALWAYS,"0.001 + 0.003 * I,"); > omniout_str(ALWAYS,"0.0001 + 0.004 * I,"); > omniout_str(ALWAYS,"0.003 + 0.006 * I,"); > omniout_str(ALWAYS,"0.0001 + 0.005 * I,"); > omniout_str(ALWAYS,"0.0001 + 0.003 * I,"); > omniout_str(ALWAYS,"0.001 + 0.001 * I,"); > omniout_str(ALWAYS,"0.001 + 0.003 * I,"); > omniout_str(ALWAYS,"0.0001 + 0.004 * I,"); > omniout_str(ALWAYS,"0.003 + 0.006 * I,"); > omniout_str(ALWAYS,"0.0001 + 0.005 * I,"); > omniout_str(ALWAYS,"0.0001 + 0.003 * I,"); > omniout_str(ALWAYS,"0.001 + 0.001 * I,"); > omniout_str(ALWAYS,"0.001 + 0.003 * I,"); > omniout_str(ALWAYS,"0.0001 + 0.004 * I,"); > omniout_str(ALWAYS,"0.003 + 0.006 * I,"); > omniout_str(ALWAYS,"0.0001 + 0.005 * I,"); > omniout_str(ALWAYS,"0.0001 + 0.003 * I,"); > omniout_str(ALWAYS,"0.001 + 0.001 * I,"); > omniout_str(ALWAYS,"0.001 + 0.003 * I,"); > omniout_str(ALWAYS,"0.0001 + 0.004 * I,"); > omniout_str(ALWAYS,"0.003 + 0.006 * I,"); > omniout_str(ALWAYS,"0.0001 + 0.005 * I,"); > omniout_str(ALWAYS,"0.0001 + 0.003 * I,"); > omniout_str(ALWAYS,"0.001 + 0.001 * I,"); > omniout_str(ALWAYS,"0.0001 + 0.004 * I,"); > omniout_str(ALWAYS,"0.003 + 0.006 * I,"); > omniout_str(ALWAYS,"0.0001 + 0.005 * I,"); > omniout_str(ALWAYS,"0.0001 + 0.003 * I,"); > omniout_str(ALWAYS,"0.001 + 0.001 * I,"); > omniout_str(ALWAYS,"0.001 + 0.003 * I,"); > omniout_str(ALWAYS,"0.0001 + 0.004 * I,"); > omniout_str(ALWAYS,"0.003 + 0.006 * I,"); > omniout_str(ALWAYS,"0.0001 + 0.005 * I,"); > omniout_str(ALWAYS,"0.0001 + 0.003 * I,"); > omniout_str(ALWAYS,"0.001 + 0.001 * I,"); > omniout_str(ALWAYS,"0.001 + 0.003 * I,"); > omniout_str(ALWAYS,"0.0001 + 0.004 * I,"); > omniout_str(ALWAYS,"0.003 + 0.006 * I,"); > omniout_str(ALWAYS,"0.0001 + 0.005 * I,"); > omniout_str(ALWAYS,"0.0001 + 0.003 * I,"); > omniout_str(ALWAYS,"0.001 + 0.001 * I,"); > omniout_str(ALWAYS,"0.001 + 0.003 * I,"); > omniout_str(ALWAYS,"0.0001 + 0.004 * I,"); > omniout_str(ALWAYS,"0.003 + 0.006 * I,"); > omniout_str(ALWAYS,"0.0001 + 0.005 * I,"); > omniout_str(ALWAYS,"0.0001 + 0.003 * I,"); > omniout_str(ALWAYS,"0.001 + 0.001 * I,"); > omniout_str(ALWAYS,"0.001 + 0.003 * I,"); > omniout_str(ALWAYS,"0.0001 + 0.004 * I,"); > omniout_str(ALWAYS,"0.003 + 0.006 * I,"); > omniout_str(ALWAYS,"0.0001 + 0.005 * I,"); > omniout_str(ALWAYS,"0.0001 + 0.003 * I,"); > omniout_str(ALWAYS,"0.001 + 0.001 * I,"); > omniout_str(ALWAYS,"0.003 + 0.006 * I,"); > omniout_str(ALWAYS,"0.0001 + 0.005 * I,"); > omniout_str(ALWAYS,"0.0001 + 0.003 * I,"); > omniout_str(ALWAYS,"0.001 + 0.001 * I,"); > omniout_str(ALWAYS,"0.001 + 0.003 * I,"); > omniout_str(ALWAYS,"0.0001 + 0.004 * I,"); > omniout_str(ALWAYS,"0.003 + 0.006 * I,"); > omniout_str(ALWAYS,"0.0001 + 0.005 * I,"); > omniout_str(ALWAYS,"0.0001 + 0.003 * I,"); > omniout_str(ALWAYS,"0.001 + 0.001 * I,"); > omniout_str(ALWAYS,"0.001 + 0.003 * I,"); > omniout_str(ALWAYS,"0.0001 + 0.004 * I,"); > omniout_str(ALWAYS,"0.003 + 0.006 * I,"); > omniout_str(ALWAYS,"0.0001 + 0.005 * I,"); > omniout_str(ALWAYS,"0.0001 + 0.003 * I,"); > omniout_str(ALWAYS,"0.001 + 0.001 * I,"); > omniout_str(ALWAYS,"0.001 + 0.003 * I,"); > omniout_str(ALWAYS,"0.0001 + 0.004 * I,"); > omniout_str(ALWAYS,"0.003 + 0.006 * I,"); > omniout_str(ALWAYS,"0.0001 + 0.005 * I,"); > omniout_str(ALWAYS,"0.0001 + 0.003 * I,"); > omniout_str(ALWAYS,"0.001 + 0.001 * I,"); > omniout_str(ALWAYS,"0.0001 + 0.004 * I,"); > omniout_str(ALWAYS,"0.003 + 0.006 * I,"); > omniout_str(ALWAYS,"0.0001 + 0.005 * I,"); > omniout_str(ALWAYS,"0.0001 + 0.003 * I,"); > omniout_str(ALWAYS,"0.001 + 0.001 * I,"); > omniout_str(ALWAYS,"0.001 + 0.003 * I,"); > omniout_str(ALWAYS,"0.0001 + 0.004 * I,"); > omniout_str(ALWAYS,"0.003 + 0.006 * I,"); > omniout_str(ALWAYS,"0.0001 + 0.005 * I,"); > omniout_str(ALWAYS,"0.0001 + 0.003 * I,"); > omniout_str(ALWAYS,"0.001 + 0.001 * I,"); > omniout_str(ALWAYS,"0.001 + 0.003 * I,"); > omniout_str(ALWAYS,"0.0001 + 0.004 * I,"); > omniout_str(ALWAYS,"0.003 + 0.006 * I,"); > omniout_str(ALWAYS,"0.0001 + 0.005 * I,"); > omniout_str(ALWAYS,"0.0001 + 0.003 * I,"); > omniout_str(ALWAYS,"0.001 + 0.001 * I,"); > omniout_str(ALWAYS,"0.001 + 0.003 * I,"); > omniout_str(ALWAYS,"0.0001 + 0.004 * I,"); > omniout_str(ALWAYS,"0.003 + 0.006 * I,"); > omniout_str(ALWAYS,"0.0001 + 0.005 * I,"); > omniout_str(ALWAYS,"0.0001 + 0.003 * I,"); > omniout_str(ALWAYS,"0.001 + 0.001 * I,"); > omniout_str(ALWAYS,"0.001 + 0.003 * I,"); > omniout_str(ALWAYS,"0.0001 + 0.004 * I,"); > omniout_str(ALWAYS,"0.003 + 0.006 * I,"); > omniout_str(ALWAYS,"0.0001 + 0.005 * I,"); > omniout_str(ALWAYS,"0.0001 + 0.003 * I,"); > omniout_str(ALWAYS,"0.001 + 0.001 * I,"); > omniout_str(ALWAYS,"0.0001 + 0.004 * I,"); > omniout_str(ALWAYS,"0.003 + 0.006 * I,"); > omniout_str(ALWAYS,"0.0001 + 0.005 * I,"); > omniout_str(ALWAYS,"0.0001 + 0.003 * I,"); > omniout_str(ALWAYS,"0.001 + 0.001 * I,"); > omniout_str(ALWAYS,"0.001 + 0.003 * I,"); > omniout_str(ALWAYS,"0.0001 + 0.004 * I,"); > omniout_str(ALWAYS,"0.003 + 0.006 * I,"); > omniout_str(ALWAYS,"0.0001 + 0.005 * I,"); > omniout_str(ALWAYS,"0.0001 + 0.003 * I,"); > omniout_str(ALWAYS,"0.001 + 0.001 * I,"); > omniout_str(ALWAYS,"0.001 + 0.003 * I,"); > omniout_str(ALWAYS,"0.0001 + 0.004 * I,"); > omniout_str(ALWAYS,"0.003 + 0.006 * I,"); > omniout_str(ALWAYS,"0.0001 + 0.005 * I,"); > omniout_str(ALWAYS,"0.0001 + 0.003 * I,"); > omniout_str(ALWAYS,"0.001 + 0.001 * I,"); > omniout_str(ALWAYS,"0.001 + 0.003 * I,"); > omniout_str(ALWAYS,"0.0001 + 0.004 * I,"); > omniout_str(ALWAYS,"0.003 + 0.006 * I,"); > omniout_str(ALWAYS,"0.0001 + 0.005 * I,"); > omniout_str(ALWAYS,"0.0001 + 0.003 * I,"); > omniout_str(ALWAYS,"0.001 + 0.001 * I,"); > omniout_str(ALWAYS,"0.001 + 0.003 * I,"); > omniout_str(ALWAYS,"0.0001 + 0.004 * I,"); > omniout_str(ALWAYS,"0.003 + 0.006 * I,"); > omniout_str(ALWAYS,"0.0001 + 0.005 * I,"); > omniout_str(ALWAYS,"0.0001 + 0.003 * I,"); > omniout_str(ALWAYS,"0.001 + 0.001 * I,"); > omniout_str(ALWAYS,"0.0001 + 0.004 * I,"); > omniout_str(ALWAYS,"0.003 + 0.006 * I,"); > omniout_str(ALWAYS,"0.0001 + 0.005 * I,"); > omniout_str(ALWAYS,"0.0001 + 0.003 * I,"); > omniout_str(ALWAYS,"0.001 + 0.001 * I,"); > omniout_str(ALWAYS,"0.001 + 0.003 * I,"); > omniout_str(ALWAYS,"0.0001 + 0.004 * I,"); > omniout_str(ALWAYS,"0.003 + 0.006 * I,"); > omniout_str(ALWAYS,"0.0001 + 0.005 * I,"); > omniout_str(ALWAYS,"0.0001 + 0.003 * I,"); > omniout_str(ALWAYS,"0.001 + 0.001 * I,"); > omniout_str(ALWAYS,"0.001 + 0.003 * I,"); > omniout_str(ALWAYS,"0.0001 + 0.004 * I,"); > omniout_str(ALWAYS,"0.003 + 0.006 * I,"); > omniout_str(ALWAYS,"0.0001 + 0.005 * I,"); > omniout_str(ALWAYS,"0.0001 + 0.003 * I,"); > omniout_str(ALWAYS,"0.001 + 0.001 * I,"); > omniout_str(ALWAYS,"0.001 + 0.003 * I,"); > omniout_str(ALWAYS,"0.0001 + 0.004 * I,"); > omniout_str(ALWAYS,"0.003 + 0.006 * I,"); > omniout_str(ALWAYS,"0.0001 + 0.005 * I,"); > omniout_str(ALWAYS,"0.0001 + 0.003 * I,"); > omniout_str(ALWAYS,"0.001 + 0.001 * I,"); > omniout_str(ALWAYS,"0.001 + 0.003 * I,"); > omniout_str(ALWAYS,"0.0001 + 0.004 * I,"); > omniout_str(ALWAYS,"0.003 + 0.006 * I,"); > omniout_str(ALWAYS,"0.0001 + 0.005 * I,"); > omniout_str(ALWAYS,"0.0001 + 0.003 * I,"); > omniout_str(ALWAYS,"0.001 + 0.001 * I,"); > omniout_str(ALWAYS,"0.0001 + 0.004 * I,"); > omniout_str(ALWAYS,"0.003 + 0.006 * I,"); > omniout_str(ALWAYS,"0.0001 + 0.005 * I,"); > omniout_str(ALWAYS,"0.0001 + 0.003 * I,"); > omniout_str(ALWAYS,"0.001 + 0.001 * I,"); > omniout_str(ALWAYS,"0.001 + 0.003 * I,"); > omniout_str(ALWAYS,"0.0001 + 0.004 * I,"); > omniout_str(ALWAYS,"0.003 + 0.006 * I,"); > omniout_str(ALWAYS,"0.0001 + 0.005 * I,"); > omniout_str(ALWAYS,"0.0001 + 0.003 * I,"); > omniout_str(ALWAYS,"0.001 + 0.001 * I,"); > omniout_str(ALWAYS,"0.001 + 0.003 * I,"); > omniout_str(ALWAYS,"0.0001 + 0.004 * I,"); > omniout_str(ALWAYS,"0.003 + 0.006 * I,"); > omniout_str(ALWAYS,"0.0001 + 0.005 * I,"); > omniout_str(ALWAYS,"0.0001 + 0.003 * I,"); > omniout_str(ALWAYS,"0.001 + 0.001 * I,"); > omniout_str(ALWAYS,"0.001 + 0.003 * I,"); > omniout_str(ALWAYS,"0.0001 + 0.004 * I,"); > omniout_str(ALWAYS,"0.003 + 0.006 * I,"); > omniout_str(ALWAYS,"0.0001 + 0.005 * I,"); > omniout_str(ALWAYS,"0.0001 + 0.003 * I,"); > omniout_str(ALWAYS,"0.001 + 0.001 * I,"); > omniout_str(ALWAYS,"0.001 + 0.003 * I,"); > omniout_str(ALWAYS,"0.0001 + 0.004 * I,"); > omniout_str(ALWAYS,"0.003 + 0.006 * I,"); > omniout_str(ALWAYS,"0.0001 + 0.005 * I,"); > omniout_str(ALWAYS,"0.0001 + 0.003 * I,"); > omniout_str(ALWAYS,"0.001 + 0.001 * I,"); > omniout_str(ALWAYS,"0.0001 + 0.004 * I,"); > omniout_str(ALWAYS,"0.003 + 0.006 * I,"); > omniout_str(ALWAYS,"0.0001 + 0.005 * I,"); > omniout_str(ALWAYS,"0.0001 + 0.003 * I,"); > omniout_str(ALWAYS,"0.001 + 0.001 * I,"); > omniout_str(ALWAYS,"0.001 + 0.003 * I,"); > omniout_str(ALWAYS,"0.0001 + 0.004 * I,"); > omniout_str(ALWAYS,"0.003 + 0.006 * I,"); > omniout_str(ALWAYS,"0.0001 + 0.005 * I,"); > omniout_str(ALWAYS,"0.0001 + 0.003 * I,"); > omniout_str(ALWAYS,"0.001 + 0.001 * I,"); > omniout_str(ALWAYS,"0.001 + 0.003 * I,"); > omniout_str(ALWAYS,"0.0001 + 0.004 * I,"); > omniout_str(ALWAYS,"0.003 + 0.006 * I,"); > omniout_str(ALWAYS,"0.0001 + 0.005 * I,"); > omniout_str(ALWAYS,"0.0001 + 0.003 * I,"); > omniout_str(ALWAYS,"0.001 + 0.001 * I,"); > omniout_str(ALWAYS,"0.001 + 0.003 * I,"); > omniout_str(ALWAYS,"0.0001 + 0.004 * I,"); > omniout_str(ALWAYS,"0.003 + 0.006 * I,"); > omniout_str(ALWAYS,"0.0001 + 0.005 * I,"); > omniout_str(ALWAYS,"0.0001 + 0.003 * I,"); > omniout_str(ALWAYS,"0.001 + 0.001 * I,"); > omniout_str(ALWAYS,"0.001 + 0.003 * I,"); > omniout_str(ALWAYS,"0.0001 + 0.004 * I,"); > omniout_str(ALWAYS,"0.003 + 0.006 * I,"); > omniout_str(ALWAYS,"0.0001 + 0.005 * I,"); > omniout_str(ALWAYS,"0.0001 + 0.003 * I,"); > omniout_str(ALWAYS,"0.001 + 0.001 * I,"); > omniout_str(ALWAYS,"0.0001 + 0.004 * I,"); > omniout_str(ALWAYS,"0.003 + 0.006 * I,"); > omniout_str(ALWAYS,"0.0001 + 0.005 * I,"); > omniout_str(ALWAYS,"0.0001 + 0.003 * I,"); > omniout_str(ALWAYS,"0.001 + 0.001 * I,"); > omniout_str(ALWAYS,"0.001 + 0.003 * I,"); > omniout_str(ALWAYS,"0.0001 + 0.004 * I,"); > omniout_str(ALWAYS,"0.003 + 0.006 * I,"); > omniout_str(ALWAYS,"0.0001 + 0.005 * I,"); > omniout_str(ALWAYS,"0.0001 + 0.003 * I,"); > omniout_str(ALWAYS,"0.001 + 0.001 * I,"); > omniout_str(ALWAYS,"0.001 + 0.003 * I,"); > omniout_str(ALWAYS,"0.0001 + 0.004 * I,"); > omniout_str(ALWAYS,"0.003 + 0.006 * I,"); > omniout_str(ALWAYS,"0.0001 + 0.005 * I,"); > omniout_str(ALWAYS,"0.0001 + 0.003 * I,"); > omniout_str(ALWAYS,"0.001 + 0.001 * I,"); > omniout_str(ALWAYS,"0.001 + 0.003 * I,"); > omniout_str(ALWAYS,"0.0001 + 0.004 * I,"); > omniout_str(ALWAYS,"0.003 + 0.006 * I,"); > omniout_str(ALWAYS,"0.0001 + 0.005 * I,"); > omniout_str(ALWAYS,"0.0001 + 0.003 * I,"); > omniout_str(ALWAYS,"0.001 + 0.001 * I,"); > omniout_str(ALWAYS,"0.001 + 0.003 * I,"); > omniout_str(ALWAYS,"0.0001 + 0.004 * I,"); > omniout_str(ALWAYS,"0.003 + 0.006 * I,"); > omniout_str(ALWAYS,"0.0001 + 0.005 * I,"); > omniout_str(ALWAYS,"0.0001 + 0.003 * I,"); > omniout_str(ALWAYS,"0.001 + 0.001 * I,"); > omniout_str(ALWAYS,"0.0001 + 0.004 * I,"); > omniout_str(ALWAYS,"0.003 + 0.006 * I,"); > omniout_str(ALWAYS,"0.0001 + 0.005 * I,"); > omniout_str(ALWAYS,"0.0001 + 0.003 * I,"); > omniout_str(ALWAYS,"0.001 + 0.001 * I,"); > omniout_str(ALWAYS,"0.001 + 0.003 * I,"); > omniout_str(ALWAYS,"0.0001 + 0.004 * I,"); > omniout_str(ALWAYS,"0.003 + 0.006 * I,"); > omniout_str(ALWAYS,"0.0001 + 0.005 * I,"); > omniout_str(ALWAYS,"0.0001 + 0.003 * I,"); > omniout_str(ALWAYS,"0.001 + 0.001 * I,"); > omniout_str(ALWAYS,"0.001 + 0.003 * I,"); > omniout_str(ALWAYS,"0.0001 + 0.004 * I,"); > omniout_str(ALWAYS,"0.003 + 0.006 * I,"); > omniout_str(ALWAYS,"0.0001 + 0.005 * I,"); > omniout_str(ALWAYS,"0.0001 + 0.003 * I,"); > omniout_str(ALWAYS,"0.001 + 0.001 * I,"); > omniout_str(ALWAYS,"0.001 + 0.003 * I,"); > omniout_str(ALWAYS,"0.0001 + 0.004 * I,"); > omniout_str(ALWAYS,"0.003 + 0.006 * I,"); > omniout_str(ALWAYS,"0.0001 + 0.005 * I,"); > omniout_str(ALWAYS,"0.0001 + 0.003 * I,"); > omniout_str(ALWAYS,"0.001 + 0.001 * I,"); > omniout_str(ALWAYS,"0.001 + 0.003 * I,"); > omniout_str(ALWAYS,"0.0001 + 0.004 * I,"); > omniout_str(ALWAYS,"0.003 + 0.006 * I,"); > omniout_str(ALWAYS,"0.0001 + 0.005 * I,"); > omniout_str(ALWAYS,"0.0001 + 0.003 * I,"); > omniout_str(ALWAYS,"0.001 + 0.001 * I,"); > omniout_str(ALWAYS,"0.0001 + 0.004 * I,"); > omniout_str(ALWAYS,"0.003 + 0.006 * I,"); > omniout_str(ALWAYS,"0.0001 + 0.005 * I,"); > omniout_str(ALWAYS,"0.0001 + 0.003 * I,"); > omniout_str(ALWAYS,"0.001 + 0.001 * I,"); > omniout_str(ALWAYS,"0.001 + 0.003 * I,"); > omniout_str(ALWAYS,"0.0001 + 0.004 * I,"); > omniout_str(ALWAYS,"0.003 + 0.006 * I,"); > omniout_str(ALWAYS,"0.0001 + 0.005 * I,"); > omniout_str(ALWAYS,"0.0001 + 0.003 * I,"); > omniout_str(ALWAYS,"0.001 + 0.001 * I,"); > omniout_str(ALWAYS,"0.001 + 0.003 * I,"); > omniout_str(ALWAYS,"0.0001 + 0.004 * I,"); > omniout_str(ALWAYS,"0.003 + 0.006 * I,"); > omniout_str(ALWAYS,"0.0001 + 0.005 * I,"); > omniout_str(ALWAYS,"0.0001 + 0.003 * I,"); > omniout_str(ALWAYS,"0.001 + 0.001 * I,"); > omniout_str(ALWAYS,"0.001 + 0.003 * I,"); > omniout_str(ALWAYS,"0.0001 + 0.004 * I,"); > omniout_str(ALWAYS,"0.003 + 0.006 * I,"); > omniout_str(ALWAYS,"0.0001 + 0.005 * I,"); > omniout_str(ALWAYS,"0.0001 + 0.003 * I,"); > omniout_str(ALWAYS,"0.001 + 0.001 * I,"); > omniout_str(ALWAYS,"0.001 + 0.003 * I,"); > omniout_str(ALWAYS,"0.0001 + 0.004 * I,"); > omniout_str(ALWAYS,"0.003 + 0.006 * I,"); > omniout_str(ALWAYS,"0.0001 + 0.005 * I,"); > omniout_str(ALWAYS,"0.0001 + 0.003 * I,"); > omniout_str(ALWAYS,"0.001 + 0.001 * I,"); > omniout_str(ALWAYS,"0.0001 + 0.004 * I,"); > omniout_str(ALWAYS,"0.003 + 0.006 * I,"); > omniout_str(ALWAYS,"0.0001 + 0.005 * I,"); > omniout_str(ALWAYS,"0.0001 + 0.003 * I,"); > omniout_str(ALWAYS,"0.001 + 0.001 * I,"); > omniout_str(ALWAYS,"0.001 + 0.003 * I,"); > omniout_str(ALWAYS,"0.0001 + 0.004 * I,"); > omniout_str(ALWAYS,"0.003 + 0.006 * I,"); > omniout_str(ALWAYS,"0.0001 + 0.005 * I,"); > omniout_str(ALWAYS,"0.0001 + 0.003 * I,"); > omniout_str(ALWAYS,"0.001 + 0.001 * I,"); > omniout_str(ALWAYS,"0.001 + 0.003 * I,"); > omniout_str(ALWAYS,"0.0001 + 0.004 * I,"); > omniout_str(ALWAYS,"0.003 + 0.006 * I,"); > omniout_str(ALWAYS,"0.0001 + 0.005 * I,"); > omniout_str(ALWAYS,"0.0001 + 0.003 * I,"); > omniout_str(ALWAYS,"0.001 + 0.001 * I,"); > omniout_str(ALWAYS,"0.001 + 0.003 * I,"); > omniout_str(ALWAYS,"0.0001 + 0.004 * I,"); > omniout_str(ALWAYS,"0.003 + 0.006 * I,"); > omniout_str(ALWAYS,"0.0001 + 0.005 * I,"); > omniout_str(ALWAYS,"0.0001 + 0.003 * I,"); > omniout_str(ALWAYS,"0.001 + 0.001 * I,"); > omniout_str(ALWAYS,"0.001 + 0.003 * I,"); > omniout_str(ALWAYS,"0.0001 + 0.004 * I,"); > omniout_str(ALWAYS,"0.003 + 0.006 * I,"); > omniout_str(ALWAYS,"0.0001 + 0.005 * I,"); > omniout_str(ALWAYS,"0.0001 + 0.003 * I,"); > omniout_str(ALWAYS,"0.001 + 0.001 * I,"); > omniout_str(ALWAYS,"0.0001 + 0.004 * I,"); > omniout_str(ALWAYS,"0.003 + 0.006 * I,"); > omniout_str(ALWAYS,"0.0001 + 0.005 * I,"); > omniout_str(ALWAYS,"0.0001 + 0.003 * I,"); > omniout_str(ALWAYS,"0.001 + 0.001 * I,"); > omniout_str(ALWAYS,"0.001 + 0.003 * I,"); > omniout_str(ALWAYS,"0.0001 + 0.004 * I,"); > omniout_str(ALWAYS,"0.003 + 0.006 * I,"); > omniout_str(ALWAYS,"0.0001 + 0.005 * I,"); > omniout_str(ALWAYS,"0.0001 + 0.003 * I,"); > omniout_str(ALWAYS,"0.001 + 0.001 * I,"); > omniout_str(ALWAYS,"0.001 + 0.003 * I,"); > omniout_str(ALWAYS,"0.0001 + 0.004 * I,"); > omniout_str(ALWAYS,"0.003 + 0.006 * I,"); > omniout_str(ALWAYS,"0.0001 + 0.005 * I,"); > omniout_str(ALWAYS,"0.0001 + 0.003 * I,"); > omniout_str(ALWAYS,"0.001 + 0.001 * I,"); > omniout_str(ALWAYS,"0.001 + 0.003 * I,"); > omniout_str(ALWAYS,"0.0001 + 0.004 * I,"); > omniout_str(ALWAYS,"0.003 + 0.006 * I,"); > omniout_str(ALWAYS,"0.0001 + 0.005 * I,"); > omniout_str(ALWAYS,"0.0001 + 0.003 * I,"); > omniout_str(ALWAYS,"0.001 + 0.001 * I,"); > omniout_str(ALWAYS,"0.001 + 0.003 * I,"); > omniout_str(ALWAYS,"0.0001 + 0.004 * I,"); > omniout_str(ALWAYS,"0.003 + 0.006 * I,"); > omniout_str(ALWAYS,"0.0001 + 0.005 * I,"); > omniout_str(ALWAYS,"0.0001 + 0.003 * I,"); > omniout_str(ALWAYS,"0.001 + 0.001 * I,"); > omniout_str(ALWAYS,"0.0001 + 0.004 * I,"); > omniout_str(ALWAYS,"0.003 + 0.006 * I,"); > omniout_str(ALWAYS,"0.0001 + 0.005 * I,"); > omniout_str(ALWAYS,"0.0001 + 0.003 * I,"); > omniout_str(ALWAYS,"0.001 + 0.001 * I,"); > omniout_str(ALWAYS,"0.001 + 0.003 * I,"); > omniout_str(ALWAYS,"0.0001 + 0.004 * I,"); > omniout_str(ALWAYS,"0.003 + 0.006 * I,"); > omniout_str(ALWAYS,"0.0001 + 0.005 * I,"); > omniout_str(ALWAYS,"0.0001 + 0.003 * I,"); > omniout_str(ALWAYS,"0.001 + 0.001 * I,"); > omniout_str(ALWAYS,"0.001 + 0.003 * I,"); > omniout_str(ALWAYS,"0.0001 + 0.004 * I,"); > omniout_str(ALWAYS,"0.003 + 0.006 * I,"); > omniout_str(ALWAYS,"0.0001 + 0.005 * I,"); > omniout_str(ALWAYS,"0.0001 + 0.003 * I,"); > omniout_str(ALWAYS,"0.001 + 0.001 * I,"); > omniout_str(ALWAYS,"0.001 + 0.003 * I,"); > omniout_str(ALWAYS,"0.0001 + 0.004 * I,"); > omniout_str(ALWAYS,"0.003 + 0.006 * I,"); > omniout_str(ALWAYS,"0.0001 + 0.005 * I,"); > omniout_str(ALWAYS,"0.0001 + 0.003 * I,"); > omniout_str(ALWAYS,"0.001 + 0.001 * I,"); > omniout_str(ALWAYS,"0.001 + 0.003 * I,"); > omniout_str(ALWAYS,"0.0001 + 0.004 * I,"); > omniout_str(ALWAYS,"0.003 + 0.006 * I,"); > omniout_str(ALWAYS,"0.0001 + 0.005 * I,"); > omniout_str(ALWAYS,"0.0001 + 0.003 * I,"); > omniout_str(ALWAYS,"0.001 + 0.001 * I,"); > omniout_str(ALWAYS,"0.0001 + 0.004 * I,"); > omniout_str(ALWAYS,"0.003 + 0.006 * I,"); > omniout_str(ALWAYS,"0.0001 + 0.005 * I,"); > omniout_str(ALWAYS,"0.0001 + 0.003 * I,"); > omniout_str(ALWAYS,"0.001 + 0.001 * I,"); > omniout_str(ALWAYS,"0.001 + 0.003 * I,"); > omniout_str(ALWAYS,"0.0001 + 0.004 * I,"); > omniout_str(ALWAYS,"0.003 + 0.006 * I,"); > omniout_str(ALWAYS,"0.0001 + 0.005 * I,"); > omniout_str(ALWAYS,"0.0001 + 0.003 * I,"); > omniout_str(ALWAYS,"0.001 + 0.001 * I,"); > omniout_str(ALWAYS,"0.001 + 0.003 * I,"); > omniout_str(ALWAYS,"0.0001 + 0.004 * I,"); > omniout_str(ALWAYS,"0.003 + 0.006 * I,"); > omniout_str(ALWAYS,"0.0001 + 0.005 * I,"); > omniout_str(ALWAYS,"0.0001 + 0.003 * I,"); > omniout_str(ALWAYS,"0.001 + 0.001 * I,"); > omniout_str(ALWAYS,"0.001 + 0.003 * I,"); > omniout_str(ALWAYS,"0.0001 + 0.004 * I,"); > omniout_str(ALWAYS,"0.003 + 0.006 * I,"); > omniout_str(ALWAYS,"0.0001 + 0.005 * I,"); > omniout_str(ALWAYS,"0.0001 + 0.003 * I,"); > omniout_str(ALWAYS,"0.001 + 0.001 * I,"); > omniout_str(ALWAYS,"0.001 + 0.003 * I,"); > omniout_str(ALWAYS,"0.0001 + 0.004 * I,"); > omniout_str(ALWAYS,"0.003 + 0.006 * I,"); > omniout_str(ALWAYS,"0.0001 + 0.005 * I,"); > omniout_str(ALWAYS,"0.0001 + 0.003 * I,"); > omniout_str(ALWAYS,"0.001 + 0.001 * I,"); > omniout_str(ALWAYS,"0.0001 + 0.004 * I,"); > omniout_str(ALWAYS,"0.003 + 0.006 * I,"); > omniout_str(ALWAYS,"0.0001 + 0.005 * I,"); > omniout_str(ALWAYS,"0.0001 + 0.003 * I,"); > omniout_str(ALWAYS,"0.001 + 0.001 * I,"); > omniout_str(ALWAYS,"0.001 + 0.003 * I,"); > omniout_str(ALWAYS,"0.0001 + 0.004 * I,"); > omniout_str(ALWAYS,"0.003 + 0.006 * I,"); > omniout_str(ALWAYS,"0.0001 + 0.005 * I,"); > omniout_str(ALWAYS,"0.0001 + 0.003 * I,"); > omniout_str(ALWAYS,"0.001 + 0.001 * I,"); > omniout_str(ALWAYS,"0.001 + 0.003 * I,"); > omniout_str(ALWAYS,"0.0001 + 0.004 * I,"); > omniout_str(ALWAYS,"0.003 + 0.006 * I,"); > omniout_str(ALWAYS,"0.0001 + 0.005 * I,"); > omniout_str(ALWAYS,"0.0001 + 0.003 * I,"); > omniout_str(ALWAYS,"0.001 + 0.001 * I,"); > omniout_str(ALWAYS,"0.001 + 0.003 * I,"); > omniout_str(ALWAYS,"0.0001 + 0.004 * I,"); > omniout_str(ALWAYS,"0.003 + 0.006 * I,"); > omniout_str(ALWAYS,"0.0001 + 0.005 * I,"); > omniout_str(ALWAYS,"0.0001 + 0.003 * I,"); > omniout_str(ALWAYS,"0.001 + 0.001 * I,"); > omniout_str(ALWAYS,"0.001 + 0.003 * I,"); > omniout_str(ALWAYS,"0.0001 + 0.004 * I,"); > omniout_str(ALWAYS,"0.003 + 0.006 * I,"); > omniout_str(ALWAYS,"0.0001 + 0.005 * I,"); > omniout_str(ALWAYS,"0.0001 + 0.003 * I,"); > omniout_str(ALWAYS,"0.001 + 0.001 * I,"); > omniout_str(ALWAYS,"0.001 + 0.003 * I,"); > omniout_str(ALWAYS,"0.000 + 0.000 * I ];"); > omniout_str(ALWAYS,""); > omniout_str(ALWAYS,"glob_nxt := glob_nxt + 1;"); > omniout_str(ALWAYS,"it := x_delta[glob_nxt];"); > omniout_str(ALWAYS,"return it;"); > omniout_str(ALWAYS,"end;"); > omniout_str(ALWAYS,"#END USER DEF BLOCK"); > omniout_str(ALWAYS,"#######END OF ECHO OF PROBLEM#################"); > glob_unchanged_h_cnt := 0; > glob_warned := false; > glob_warned2 := false; > glob_small_float := glob__0; > glob_smallish_float := glob__0; > glob_large_float := c(1.0e100); > glob_larger_float := c( 1.1e100); > glob_almost_1 := c( 0.99); > # before second block > #TOP SECOND INPUT BLOCK > #BEGIN SECOND INPUT BLOCK > #BEGIN BLOCK 2 > #END FIRST INPUT BLOCK > #BEGIN SECOND INPUT BLOCK > x_start := 0.1 + 0.1 * I; > x_end := 99.0 + 99.0 * I; > array_y_init[0 + 1] := exact_soln_y(x_start); > glob_look_poles := true; > glob_max_h := 0.1; > glob_type_given_pole := 1; > array_given_rad_poles[1,1] := c(-1.5); > 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 ) = tanh ( sqrt ( 2.0 * x + 3.0 ) ) ; "); > omniout_int(INFO,"Iterations ",32,glob_iter,4," ") > ; > prog_report(x_start,x_end); > if (glob_html_log) then # if number 10 > logstart(html_log_file); > logitem_str(html_log_file,"2017-11-26T16:39:24-06:00") > ; > logitem_str(html_log_file,"Maple") > ; > logitem_str(html_log_file,"tanh_sqrt") > ; > logitem_str(html_log_file,"diff ( y , x , 1 ) = tanh ( sqrt ( 2.0 * x + 3.0 ) ) ; ") > ; > logitem_complex(html_log_file,x_start) > ; > logitem_complex(html_log_file,x_end) > ; > logitem_complex(html_log_file,array_x[1]) > ; > logitem_complex(html_log_file,glob_h) > ; > logitem_h_reason(html_log_file) > ; > logitem_integer(html_log_file,Digits) > ; > ; > glob_desired_digits_correct := 0.0; > logitem_float(html_log_file,glob_desired_digits_correct) > ; > if (array_est_digits[1] <> -16) then # if number 11 > logitem_integer(html_log_file,array_est_digits[1]) > ; > else > logitem_str(html_log_file,"Unknown") > ; > fi;# end if 11; > if (glob_min_good_digits <> -16) then # if number 11 > logitem_integer(html_log_file,glob_min_good_digits) > ; > else > logitem_str(html_log_file,"Unknown") > ; > fi;# end if 11; > if (glob_good_digits <> -16) then # if number 11 > logitem_integer(html_log_file,glob_good_digits) > ; > else > logitem_str(html_log_file,"Unknown") > ; > fi;# end if 11; > logitem_str(html_log_file,"NA") > ; > logitem_str(html_log_file,"NA") > ; > logitem_integer(html_log_file,ATS_MAX_TERMS) > ; > if (glob_type_given_pole = 0) then # if number 11 > logitem_str(html_log_file,"Not Given") > ; > logitem_str(html_log_file,"NA") > ; > elif > (glob_type_given_pole = 4) then # if number 12 > logitem_str(html_log_file,"No Solution") > ; > logitem_str(html_log_file,"NA") > ; > elif > (glob_type_given_pole = 5) then # if number 13 > logitem_str(html_log_file,"Some Pole") > ; > logitem_str(html_log_file,"????") > ; > elif > (glob_type_given_pole = 3) then # if number 14 > logitem_str(html_log_file,"No Pole") > ; > logitem_str(html_log_file,"NA") > ; > elif > (glob_type_given_pole = 1) then # if number 15 > logitem_str(html_log_file,"Real Sing") > ; > logitem_float(html_log_file,glob_least_given_sing) > ; > elif > (glob_type_given_pole = 2) then # if number 16 > logitem_str(html_log_file,"Complex Sing") > ; > logitem_float(html_log_file,glob_least_given_sing) > ; > fi;# end if 16; > if (glob_least_ratio_sing < glob_large_float) then # if number 16 > glob_least_ratio_sing := 0; > logitem_float(html_log_file,glob_least_ratio_sing) > ; > else > logitem_str(html_log_file,"NONE") > ; > fi;# end if 16; > if (glob_least_3_sing < glob_large_float) then # if number 16 > logitem_float(html_log_file,glob_least_3_sing) > ; > else > logitem_str(html_log_file,"NONE") > ; > fi;# end if 16; > if (glob_least_6_sing < glob_large_float) then # if number 16 > glob_least_6_sing := 0.0; > logitem_float(html_log_file,glob_least_6_sing) > ; > else > logitem_str(html_log_file,"NONE") > ; > fi;# end if 16; > logitem_integer(html_log_file,glob_iter) > ; > logitem_time(html_log_file,(glob_clock_sec)) > ; > if (c(glob_percent_done) < glob__100) then # if number 16 > logitem_time(html_log_file,(glob_total_exp_sec)) > ; > 0; > else > logitem_str(html_log_file,"Done") > ; > 0; > fi;# end if 16; > log_revs(html_log_file," 309 ") > ; > logitem_str(html_log_file,"tanh_sqrt diffeq.mxt") > ; > logitem_str(html_log_file,"tanh_sqrt maple results") > ; > logitem_str(html_log_file,"??") > ; > 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_2D0, array_const_3D0, 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_g, array_tmp4_a1, array_tmp4_a2, 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_g := Array(0 .. 30, []); array_tmp4_a1 := Array(0 .. 30, []); array_tmp4_a2 := 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_g[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_a2[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_g); zero_ats_ar(array_tmp4_a1); zero_ats_ar(array_tmp4_a2); 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_2D0); array_const_2D0[1] := c(2.0); zero_ats_ar(array_const_3D0); array_const_3D0[1] := c(3.0); zero_ats_ar(array_m1); array_m1[1] := glob__m1; iiif := 0; while iiif <= ATS_MAX_TERMS do jjjf := 0; while jjjf <= ATS_MAX_TERMS do array_fact_1[iiif] := 0; array_fact_2[iiif, jjjf] := 0; jjjf := jjjf + 1 end do; iiif := iiif + 1 end do; ALWAYS := 1; INFO := 2; DEBUGL := 3; DEBUGMASSIVE := 4; glob_iolevel := 5; glob_yes_pole := 4; glob_no_pole := 3; glob_not_given := 0; glob_no_sing_tests := 4; glob_ratio_test := 1; glob_three_term_test := 2; glob_six_term_test := 3; glob_log_10 := log(c(10.0)); MAX_UNCHANGED := 10; glob__small := c(0.1*10^(-50)); glob_small_float := c(0.1*10^(-50)); glob_smallish_float := c(0.1*10^(-60)); glob_large_float := c(0.10*10^101); glob_larger_float := c(0.11*10^101); glob__m2 := c(-2); glob__m1 := c(-1); glob__0 := c(0); glob__1 := c(1); glob__2 := c(2); glob__3 := c(3); glob__4 := c(4); glob__5 := c(5); glob__8 := c(8); glob__10 := c(10); glob__100 := c(100); glob__pi := c(0.); glob__0_5 := c(0.5); glob__0_8 := c(0.8); glob__m0_8 := c(-0.8); glob__0_25 := c(0.25); glob__0_125 := c(0.125); glob_h := 0.1; glob_nxt := 1; glob_prec := c(0.10*10^(-15)); glob_check_sign := c(1.0); glob_desired_digits_correct := c(8.0); glob_max_estimated_step_error := c(0.); glob_ratio_of_radius := c(0.1); glob_percent_done := c(0.); glob_total_exp_sec := c(0.1); glob_optimal_expect_sec := c(0.1); glob_estimated_size_answer := c(100.0); glob_almost_1 := c(0.9990); glob_clock_sec := c(0.); glob_clock_start_sec := c(0.); glob_disp_incr := c(0.1); glob_diff_rc_fm := c(0.1); glob_diff_rc_fmm1 := c(0.1); glob_diff_rc_fmm2 := c(0.1); glob_diff_ord_fm := c(0.1); glob_diff_ord_fmm1 := c(0.1); glob_diff_ord_fmm2 := c(0.1); glob_six_term_ord_save := c(0.1); glob_guess_error_rc := c(0.1); glob_guess_error_ord := c(0.1); glob_least_given_sing := c(0.99*10^201); glob_least_ratio_sing := c(0.99*10^201); glob_least_3_sing := c(0.99*10^101); glob_least_6_sing := c(0.99*10^101); glob_last_good_h := c(0.1); glob_max_h := c(0.1); glob_min_h := c(0.1*10^(-5)); glob_display_interval := c(0.1); glob_abserr := c(0.1*10^(-10)); glob_relerr := c(0.1*10^(-10)); glob_min_pole_est := c(0.1*10^10); glob_max_rel_trunc_err := c(0.1*10^(-10)); glob_max_trunc_err := c(0.1*10^(-10)); glob_max_hours := c(0.); glob_optimal_clock_start_sec := c(0.); glob_optimal_start := c(0.); glob_upper_ratio_limit := c(1.0001); glob_lower_ratio_limit := c(0.9999); glob_max_sec := c(10000.0); glob_orig_start_sec := c(0.); glob_normmax := c(0.); glob_max_minutes := c(0.); glob_next_display := c(0.); glob_est_digits := 1; glob_subiter_method := 3; glob_html_log := true; glob_min_good_digits := 99999; glob_good_digits := 0; glob_min_apfp_est_good_digits := 99999; glob_apfp_est_good_digits := 0; glob_max_opt_iter := 10; glob_dump := false; glob_djd_debug := true; glob_display_flag := true; glob_djd_debug2 := true; glob_h_reason := 0; glob_sec_in_minute := 60; glob_min_in_hour := 60; glob_hours_in_day := 24; glob_days_in_year := 365; glob_sec_in_hour := 3600; glob_sec_in_day := 86400; glob_sec_in_year := 31536000; glob_not_yet_finished := true; glob_initial_pass := true; glob_not_yet_start_msg := true; glob_reached_optimal_h := false; glob_optimal_done := false; glob_type_given_pole := 0; glob_optimize := false; glob_look_poles := false; glob_dump_closed_form := false; glob_max_iter := 10000; glob_no_eqs := 0; glob_unchanged_h_cnt := 0; glob_warned := false; glob_warned2 := false; glob_start := 0; glob_iter := 0; array_y_set_initial[1, 1] := true; array_y_set_initial[1, 2] := false; array_y_set_initial[1, 3] := false; array_y_set_initial[1, 4] := false; array_y_set_initial[1, 5] := false; array_y_set_initial[1, 6] := false; array_y_set_initial[1, 7] := false; array_y_set_initial[1, 8] := false; array_y_set_initial[1, 9] := false; array_y_set_initial[1, 10] := false; array_y_set_initial[1, 11] := false; array_y_set_initial[1, 12] := false; array_y_set_initial[1, 13] := false; array_y_set_initial[1, 14] := false; array_y_set_initial[1, 15] := false; array_y_set_initial[1, 16] := false; array_y_set_initial[1, 17] := false; array_y_set_initial[1, 18] := false; array_y_set_initial[1, 19] := false; array_y_set_initial[1, 20] := false; array_y_set_initial[1, 21] := false; array_y_set_initial[1, 22] := false; array_y_set_initial[1, 23] := false; array_y_set_initial[1, 24] := false; array_y_set_initial[1, 25] := false; array_y_set_initial[1, 26] := false; array_y_set_initial[1, 27] := false; array_y_set_initial[1, 28] := false; array_y_set_initial[1, 29] := false; array_y_set_initial[1, 30] := false; ALWAYS := 1; INFO := 2; DEBUGL := 3; DEBUGMASSIVE := 4; ATS_MAX_TERMS := 30; glob_iolevel := INFO; glob_orig_start_sec := elapsed_time_seconds(); glob_display_flag := true; glob_no_eqs := 1; glob_iter := -1; opt_iter := -1; glob_max_iter := 10000; glob_max_hours := 0.; glob_max_minutes := 15.0; omniout_str(ALWAYS, "##############ECHO OF PROBLEM#################"); omniout_str(ALWAYS, "##############temp/tanh_sqrtpostcpx.cpx#################"); omniout_str(ALWAYS, "diff ( y , x , 1 ) = tanh ( sqrt ( 2.0\ * x + 3.0 ) ) ; "); omniout_str(ALWAYS, "!"); omniout_str(ALWAYS, "#BEGIN FIRST INPUT BLOCK"); omniout_str(ALWAYS, "Digits:=32;"); omniout_str(ALWAYS, "max_terms:=30;"); omniout_str(ALWAYS, "!"); omniout_str(ALWAYS, "#END FIRST INPUT BLOCK"); omniout_str(ALWAYS, "#BEGIN SECOND INPUT BLOCK"); omniout_str(ALWAYS, "x_start := 0.1 + 0.1 * I;"); omniout_str(ALWAYS, "x_end := 99.0 + 99.0 * I;"); omniout_str(ALWAYS, "array_y_init[0 + 1] := exact_soln_y(x_start);"); omniout_str(ALWAYS, "glob_look_poles := true;"); omniout_str(ALWAYS, "glob_max_h := 0.1;"); 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(-1.5);"); 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, "#END SECOND INPUT BLOCK"); omniout_str(ALWAYS, "#BEGIN OVERRIDE BLOCK"); omniout_str(ALWAYS, "glob_desired_digits_correct:=8;"); omniout_str(ALWAYS, "glob_max_minutes:=(3.0);"); omniout_str(ALWAYS, "glob_subiter_method:=3;"); omniout_str(ALWAYS, "glob_max_iter:=10000;"); omniout_str(ALWAYS, "glob_upper_ratio_limit:=c(1.000001);"); omniout_str(ALWAYS, "glob_lower_ratio_limit:=c(0.999999);"); omniout_str(ALWAYS, "glob_look_poles:=true;"); omniout_str(ALWAYS, "glob_h:=c(0.001);"); omniout_str(ALWAYS, "glob_display_interval:=c(0.01);"); omniout_str(ALWAYS, "#END OVERRIDE BLOCK"); omniout_str(ALWAYS, "!"); omniout_str(ALWAYS, "#BEGIN USER DEF BLOCK"); omniout_str(ALWAYS, "exact_soln_y := proc(x)"); omniout_str(ALWAYS, "return(c(0.0));"); omniout_str(ALWAYS, "end;"); omniout_str(ALWAYS, "next_delta := proc()"); omniout_str(ALWAYS, "global glob_nxt, x_delta;"); omniout_str(ALWAYS, ""); omniout_str(ALWAYS, "x_delta := [ 0.001 + 0.00004 * I,"); omniout_str(ALWAYS, "0.0001 + 0.004 * I,"); omniout_str(ALWAYS, "0.003 + 0.006 * I,"); omniout_str(ALWAYS, "0.0001 + 0.005 * I,"); omniout_str(ALWAYS, "0.0001 + 0.003 * I,"); omniout_str(ALWAYS, "0.001 + 0.001 * I,"); omniout_str(ALWAYS, "0.001 + 0.003 * I,"); omniout_str(ALWAYS, "0.0001 + 0.004 * I,"); omniout_str(ALWAYS, "0.003 + 0.006 * I,"); omniout_str(ALWAYS, "0.0001 + 0.005 * I,"); omniout_str(ALWAYS, "0.0001 + 0.003 * I,"); omniout_str(ALWAYS, "0.001 + 0.001 * I,"); omniout_str(ALWAYS, "0.001 + 0.003 * I,"); omniout_str(ALWAYS, "0.0001 + 0.004 * I,"); omniout_str(ALWAYS, "0.003 + 0.006 * I,"); omniout_str(ALWAYS, "0.0001 + 0.005 * I,"); omniout_str(ALWAYS, "0.0001 + 0.003 * I,"); omniout_str(ALWAYS, "0.001 + 0.001 * I,"); omniout_str(ALWAYS, "0.001 + 0.003 * I,"); omniout_str(ALWAYS, "0.0001 + 0.004 * I,"); omniout_str(ALWAYS, "0.003 + 0.006 * I,"); omniout_str(ALWAYS, "0.0001 + 0.005 * I,"); omniout_str(ALWAYS, "0.0001 + 0.003 * I,"); omniout_str(ALWAYS, "0.001 + 0.001 * I,"); omniout_str(ALWAYS, "0.001 + 0.003 * I,"); omniout_str(ALWAYS, "0.0001 + 0.004 * I,"); omniout_str(ALWAYS, "0.003 + 0.006 * I,"); omniout_str(ALWAYS, "0.0001 + 0.005 * I,"); omniout_str(ALWAYS, "0.0001 + 0.003 * I,"); omniout_str(ALWAYS, "0.001 + 0.001 * I,"); omniout_str(ALWAYS, "0.0001 + 0.004 * I,"); omniout_str(ALWAYS, "0.003 + 0.006 * I,"); omniout_str(ALWAYS, "0.0001 + 0.005 * I,"); omniout_str(ALWAYS, "0.0001 + 0.003 * I,"); omniout_str(ALWAYS, "0.001 + 0.001 * I,"); omniout_str(ALWAYS, "0.001 + 0.003 * I,"); omniout_str(ALWAYS, "0.0001 + 0.004 * I,"); omniout_str(ALWAYS, "0.003 + 0.006 * I,"); omniout_str(ALWAYS, "0.0001 + 0.005 * I,"); omniout_str(ALWAYS, "0.0001 + 0.003 * I,"); omniout_str(ALWAYS, "0.001 + 0.001 * I,"); omniout_str(ALWAYS, "0.001 + 0.003 * I,"); omniout_str(ALWAYS, "0.0001 + 0.004 * I,"); omniout_str(ALWAYS, "0.003 + 0.006 * I,"); omniout_str(ALWAYS, "0.0001 + 0.005 * I,"); omniout_str(ALWAYS, "0.0001 + 0.003 * I,"); omniout_str(ALWAYS, "0.001 + 0.001 * I,"); omniout_str(ALWAYS, "0.001 + 0.003 * I,"); omniout_str(ALWAYS, "0.0001 + 0.004 * I,"); omniout_str(ALWAYS, "0.003 + 0.006 * I,"); omniout_str(ALWAYS, "0.0001 + 0.005 * I,"); omniout_str(ALWAYS, "0.0001 + 0.003 * I,"); omniout_str(ALWAYS, "0.001 + 0.001 * I,"); omniout_str(ALWAYS, "0.001 + 0.003 * I,"); omniout_str(ALWAYS, "0.0001 + 0.004 * I,"); omniout_str(ALWAYS, "0.003 + 0.006 * I,"); omniout_str(ALWAYS, "0.0001 + 0.005 * I,"); omniout_str(ALWAYS, "0.0001 + 0.003 * I,"); omniout_str(ALWAYS, "0.001 + 0.001 * I,"); omniout_str(ALWAYS, "0.0001 + 0.004 * I,"); omniout_str(ALWAYS, "0.003 + 0.006 * I,"); omniout_str(ALWAYS, "0.0001 + 0.005 * I,"); omniout_str(ALWAYS, "0.0001 + 0.003 * I,"); omniout_str(ALWAYS, "0.001 + 0.001 * I,"); omniout_str(ALWAYS, "0.001 + 0.003 * I,"); omniout_str(ALWAYS, "0.0001 + 0.004 * I,"); omniout_str(ALWAYS, "0.003 + 0.006 * I,"); omniout_str(ALWAYS, "0.0001 + 0.005 * I,"); omniout_str(ALWAYS, "0.0001 + 0.003 * I,"); omniout_str(ALWAYS, "0.001 + 0.001 * I,"); omniout_str(ALWAYS, "0.001 + 0.003 * I,"); omniout_str(ALWAYS, "0.0001 + 0.004 * I,"); omniout_str(ALWAYS, "0.003 + 0.006 * I,"); omniout_str(ALWAYS, "0.0001 + 0.005 * I,"); omniout_str(ALWAYS, "0.0001 + 0.003 * I,"); omniout_str(ALWAYS, "0.001 + 0.001 * I,"); omniout_str(ALWAYS, "0.001 + 0.003 * I,"); omniout_str(ALWAYS, "0.0001 + 0.004 * I,"); omniout_str(ALWAYS, "0.003 + 0.006 * I,"); omniout_str(ALWAYS, "0.0001 + 0.005 * I,"); omniout_str(ALWAYS, "0.0001 + 0.003 * I,"); omniout_str(ALWAYS, "0.001 + 0.001 * I,"); omniout_str(ALWAYS, "0.001 + 0.003 * I,"); omniout_str(ALWAYS, "0.0001 + 0.004 * I,"); omniout_str(ALWAYS, "0.003 + 0.006 * I,"); omniout_str(ALWAYS, "0.0001 + 0.005 * I,"); omniout_str(ALWAYS, "0.0001 + 0.003 * I,"); omniout_str(ALWAYS, "0.001 + 0.001 * I,"); omniout_str(ALWAYS, "0.0001 + 0.004 * I,"); omniout_str(ALWAYS, "0.003 + 0.006 * I,"); omniout_str(ALWAYS, "0.0001 + 0.005 * I,"); omniout_str(ALWAYS, "0.0001 + 0.003 * I,"); omniout_str(ALWAYS, "0.001 + 0.001 * I,"); omniout_str(ALWAYS, "0.001 + 0.003 * I,"); omniout_str(ALWAYS, "0.0001 + 0.004 * I,"); omniout_str(ALWAYS, "0.003 + 0.006 * I,"); omniout_str(ALWAYS, "0.0001 + 0.005 * I,"); omniout_str(ALWAYS, "0.0001 + 0.003 * I,"); omniout_str(ALWAYS, "0.001 + 0.001 * I,"); omniout_str(ALWAYS, "0.001 + 0.003 * I,"); omniout_str(ALWAYS, "0.0001 + 0.004 * I,"); omniout_str(ALWAYS, "0.003 + 0.006 * I,"); omniout_str(ALWAYS, "0.0001 + 0.005 * I,"); omniout_str(ALWAYS, "0.0001 + 0.003 * I,"); omniout_str(ALWAYS, "0.001 + 0.001 * I,"); omniout_str(ALWAYS, "0.001 + 0.003 * I,"); omniout_str(ALWAYS, "0.0001 + 0.004 * I,"); omniout_str(ALWAYS, "0.003 + 0.006 * I,"); omniout_str(ALWAYS, "0.0001 + 0.005 * I,"); omniout_str(ALWAYS, "0.0001 + 0.003 * I,"); omniout_str(ALWAYS, "0.001 + 0.001 * I,"); omniout_str(ALWAYS, "0.001 + 0.003 * I,"); omniout_str(ALWAYS, "0.0001 + 0.004 * I,"); omniout_str(ALWAYS, "0.003 + 0.006 * I,"); omniout_str(ALWAYS, "0.0001 + 0.005 * I,"); omniout_str(ALWAYS, "0.0001 + 0.003 * I,"); omniout_str(ALWAYS, "0.001 + 0.001 * I,"); omniout_str(ALWAYS, "0.0001 + 0.004 * I,"); omniout_str(ALWAYS, "0.003 + 0.006 * I,"); omniout_str(ALWAYS, "0.0001 + 0.005 * I,"); omniout_str(ALWAYS, "0.0001 + 0.003 * I,"); omniout_str(ALWAYS, "0.001 + 0.001 * I,"); omniout_str(ALWAYS, "0.001 + 0.003 * I,"); omniout_str(ALWAYS, "0.0001 + 0.004 * I,"); omniout_str(ALWAYS, "0.003 + 0.006 * I,"); omniout_str(ALWAYS, "0.0001 + 0.005 * I,"); omniout_str(ALWAYS, "0.0001 + 0.003 * I,"); omniout_str(ALWAYS, "0.001 + 0.001 * I,"); omniout_str(ALWAYS, "0.001 + 0.003 * I,"); omniout_str(ALWAYS, "0.0001 + 0.004 * I,"); omniout_str(ALWAYS, "0.003 + 0.006 * I,"); omniout_str(ALWAYS, "0.0001 + 0.005 * I,"); omniout_str(ALWAYS, "0.0001 + 0.003 * I,"); omniout_str(ALWAYS, "0.001 + 0.001 * I,"); omniout_str(ALWAYS, "0.001 + 0.003 * I,"); omniout_str(ALWAYS, "0.0001 + 0.004 * I,"); omniout_str(ALWAYS, "0.003 + 0.006 * I,"); omniout_str(ALWAYS, "0.0001 + 0.005 * I,"); omniout_str(ALWAYS, "0.0001 + 0.003 * I,"); omniout_str(ALWAYS, "0.001 + 0.001 * I,"); omniout_str(ALWAYS, "0.001 + 0.003 * I,"); omniout_str(ALWAYS, "0.0001 + 0.004 * I,"); omniout_str(ALWAYS, "0.003 + 0.006 * I,"); omniout_str(ALWAYS, "0.0001 + 0.005 * I,"); omniout_str(ALWAYS, "0.0001 + 0.003 * I,"); omniout_str(ALWAYS, "0.001 + 0.001 * I,"); omniout_str(ALWAYS, "0.0001 + 0.004 * I,"); omniout_str(ALWAYS, "0.003 + 0.006 * I,"); omniout_str(ALWAYS, "0.0001 + 0.005 * I,"); omniout_str(ALWAYS, "0.0001 + 0.003 * I,"); omniout_str(ALWAYS, "0.001 + 0.001 * I,"); omniout_str(ALWAYS, "0.001 + 0.003 * I,"); omniout_str(ALWAYS, "0.0001 + 0.004 * I,"); omniout_str(ALWAYS, "0.003 + 0.006 * I,"); omniout_str(ALWAYS, "0.0001 + 0.005 * I,"); omniout_str(ALWAYS, "0.0001 + 0.003 * I,"); omniout_str(ALWAYS, "0.001 + 0.001 * I,"); omniout_str(ALWAYS, "0.001 + 0.003 * I,"); omniout_str(ALWAYS, "0.0001 + 0.004 * I,"); omniout_str(ALWAYS, "0.003 + 0.006 * I,"); omniout_str(ALWAYS, "0.0001 + 0.005 * I,"); omniout_str(ALWAYS, "0.0001 + 0.003 * I,"); omniout_str(ALWAYS, "0.001 + 0.001 * I,"); omniout_str(ALWAYS, "0.001 + 0.003 * I,"); omniout_str(ALWAYS, "0.0001 + 0.004 * I,"); omniout_str(ALWAYS, "0.003 + 0.006 * I,"); omniout_str(ALWAYS, "0.0001 + 0.005 * I,"); omniout_str(ALWAYS, "0.0001 + 0.003 * I,"); omniout_str(ALWAYS, "0.001 + 0.001 * I,"); omniout_str(ALWAYS, "0.001 + 0.003 * I,"); omniout_str(ALWAYS, "0.0001 + 0.004 * I,"); omniout_str(ALWAYS, "0.003 + 0.006 * I,"); omniout_str(ALWAYS, "0.0001 + 0.005 * I,"); omniout_str(ALWAYS, "0.0001 + 0.003 * I,"); omniout_str(ALWAYS, "0.001 + 0.001 * I,"); omniout_str(ALWAYS, "0.0001 + 0.004 * I,"); omniout_str(ALWAYS, "0.003 + 0.006 * I,"); omniout_str(ALWAYS, "0.0001 + 0.005 * I,"); omniout_str(ALWAYS, "0.0001 + 0.003 * I,"); omniout_str(ALWAYS, "0.001 + 0.001 * I,"); omniout_str(ALWAYS, "0.001 + 0.003 * I,"); omniout_str(ALWAYS, "0.0001 + 0.004 * I,"); omniout_str(ALWAYS, "0.0001 + 0.004 * I,"); omniout_str(ALWAYS, "0.003 + 0.006 * I,"); omniout_str(ALWAYS, "0.0001 + 0.005 * I,"); omniout_str(ALWAYS, "0.0001 + 0.003 * I,"); omniout_str(ALWAYS, "0.001 + 0.001 * I,"); omniout_str(ALWAYS, "0.001 + 0.003 * I,"); omniout_str(ALWAYS, "0.0001 + 0.004 * I,"); omniout_str(ALWAYS, "0.003 + 0.006 * I,"); omniout_str(ALWAYS, "0.0001 + 0.005 * I,"); omniout_str(ALWAYS, "0.0001 + 0.003 * I,"); omniout_str(ALWAYS, "0.001 + 0.001 * I,"); omniout_str(ALWAYS, "0.001 + 0.003 * I,"); omniout_str(ALWAYS, "0.0001 + 0.004 * I,"); omniout_str(ALWAYS, "0.003 + 0.006 * I,"); omniout_str(ALWAYS, "0.0001 + 0.005 * I,"); omniout_str(ALWAYS, "0.0001 + 0.003 * I,"); omniout_str(ALWAYS, "0.001 + 0.001 * I,"); omniout_str(ALWAYS, "0.001 + 0.003 * I,"); omniout_str(ALWAYS, "0.0001 + 0.004 * I,"); omniout_str(ALWAYS, "0.003 + 0.006 * I,"); omniout_str(ALWAYS, "0.0001 + 0.005 * I,"); omniout_str(ALWAYS, "0.0001 + 0.003 * I,"); omniout_str(ALWAYS, "0.001 + 0.001 * I,"); omniout_str(ALWAYS, "0.001 + 0.003 * I,"); omniout_str(ALWAYS, "0.0001 + 0.004 * I,"); omniout_str(ALWAYS, "0.003 + 0.006 * I,"); omniout_str(ALWAYS, "0.0001 + 0.005 * I,"); omniout_str(ALWAYS, "0.0001 + 0.003 * I,"); omniout_str(ALWAYS, "0.001 + 0.001 * I,"); omniout_str(ALWAYS, "0.0001 + 0.004 * I,"); omniout_str(ALWAYS, "0.003 + 0.006 * I,"); omniout_str(ALWAYS, "0.0001 + 0.005 * I,"); omniout_str(ALWAYS, "0.0001 + 0.003 * I,"); omniout_str(ALWAYS, "0.001 + 0.001 * I,"); omniout_str(ALWAYS, "0.001 + 0.003 * I,"); omniout_str(ALWAYS, "0.0001 + 0.004 * I,"); omniout_str(ALWAYS, "0.003 + 0.006 * I,"); omniout_str(ALWAYS, "0.0001 + 0.005 * I,"); omniout_str(ALWAYS, "0.0001 + 0.003 * I,"); omniout_str(ALWAYS, "0.001 + 0.001 * I,"); omniout_str(ALWAYS, "0.001 + 0.003 * I,"); omniout_str(ALWAYS, "0.0001 + 0.004 * I,"); omniout_str(ALWAYS, "0.003 + 0.006 * I,"); omniout_str(ALWAYS, "0.0001 + 0.005 * I,"); omniout_str(ALWAYS, "0.0001 + 0.003 * I,"); omniout_str(ALWAYS, "0.001 + 0.001 * I,"); omniout_str(ALWAYS, "0.001 + 0.003 * I,"); omniout_str(ALWAYS, "0.0001 + 0.004 * I,"); omniout_str(ALWAYS, "0.003 + 0.006 * I,"); omniout_str(ALWAYS, "0.0001 + 0.005 * I,"); omniout_str(ALWAYS, "0.0001 + 0.003 * I,"); omniout_str(ALWAYS, "0.001 + 0.001 * I,"); omniout_str(ALWAYS, "0.001 + 0.003 * I,"); omniout_str(ALWAYS, "0.0001 + 0.004 * I,"); omniout_str(ALWAYS, "0.003 + 0.006 * I,"); omniout_str(ALWAYS, "0.0001 + 0.005 * I,"); omniout_str(ALWAYS, "0.0001 + 0.003 * I,"); omniout_str(ALWAYS, "0.001 + 0.001 * I,"); omniout_str(ALWAYS, "0.0001 + 0.004 * I,"); omniout_str(ALWAYS, "0.003 + 0.006 * I,"); omniout_str(ALWAYS, "0.0001 + 0.005 * I,"); omniout_str(ALWAYS, "0.0001 + 0.003 * I,"); omniout_str(ALWAYS, "0.001 + 0.001 * I,"); omniout_str(ALWAYS, "0.001 + 0.003 * I,"); omniout_str(ALWAYS, "0.0001 + 0.004 * I,"); omniout_str(ALWAYS, "0.003 + 0.006 * I,"); omniout_str(ALWAYS, "0.0001 + 0.005 * I,"); omniout_str(ALWAYS, "0.0001 + 0.003 * I,"); omniout_str(ALWAYS, "0.001 + 0.001 * I,"); omniout_str(ALWAYS, "0.001 + 0.003 * I,"); omniout_str(ALWAYS, "0.0001 + 0.004 * I,"); omniout_str(ALWAYS, "0.003 + 0.006 * I,"); omniout_str(ALWAYS, "0.0001 + 0.005 * I,"); omniout_str(ALWAYS, "0.0001 + 0.003 * I,"); omniout_str(ALWAYS, "0.001 + 0.001 * I,"); omniout_str(ALWAYS, "0.001 + 0.003 * I,"); omniout_str(ALWAYS, "0.0001 + 0.004 * I,"); omniout_str(ALWAYS, "0.003 + 0.006 * I,"); omniout_str(ALWAYS, "0.0001 + 0.005 * I,"); omniout_str(ALWAYS, "0.0001 + 0.003 * I,"); omniout_str(ALWAYS, "0.001 + 0.001 * I,"); omniout_str(ALWAYS, "0.001 + 0.003 * I,"); omniout_str(ALWAYS, "0.0001 + 0.004 * I,"); omniout_str(ALWAYS, "0.003 + 0.006 * I,"); omniout_str(ALWAYS, "0.0001 + 0.005 * I,"); omniout_str(ALWAYS, "0.0001 + 0.003 * I,"); omniout_str(ALWAYS, "0.001 + 0.001 * I,"); omniout_str(ALWAYS, "0.0001 + 0.004 * I,"); omniout_str(ALWAYS, "0.003 + 0.006 * I,"); omniout_str(ALWAYS, "0.0001 + 0.005 * I,"); omniout_str(ALWAYS, "0.0001 + 0.003 * I,"); omniout_str(ALWAYS, "0.001 + 0.001 * I,"); omniout_str(ALWAYS, "0.001 + 0.003 * I,"); omniout_str(ALWAYS, "0.0001 + 0.004 * I,"); omniout_str(ALWAYS, "0.003 + 0.006 * I,"); omniout_str(ALWAYS, "0.0001 + 0.005 * I,"); omniout_str(ALWAYS, "0.0001 + 0.003 * I,"); omniout_str(ALWAYS, "0.001 + 0.001 * I,"); omniout_str(ALWAYS, "0.001 + 0.003 * I,"); omniout_str(ALWAYS, "0.0001 + 0.004 * I,"); omniout_str(ALWAYS, "0.003 + 0.006 * I,"); omniout_str(ALWAYS, "0.0001 + 0.005 * I,"); omniout_str(ALWAYS, "0.0001 + 0.003 * I,"); omniout_str(ALWAYS, "0.001 + 0.001 * I,"); omniout_str(ALWAYS, "0.001 + 0.003 * I,"); omniout_str(ALWAYS, "0.0001 + 0.004 * I,"); omniout_str(ALWAYS, "0.003 + 0.006 * I,"); omniout_str(ALWAYS, "0.0001 + 0.005 * I,"); omniout_str(ALWAYS, "0.0001 + 0.003 * I,"); omniout_str(ALWAYS, "0.001 + 0.001 * I,"); omniout_str(ALWAYS, "0.001 + 0.003 * I,"); omniout_str(ALWAYS, "0.0001 + 0.004 * I,"); omniout_str(ALWAYS, "0.003 + 0.006 * I,"); omniout_str(ALWAYS, "0.0001 + 0.005 * I,"); omniout_str(ALWAYS, "0.0001 + 0.003 * I,"); omniout_str(ALWAYS, "0.001 + 0.001 * I,"); omniout_str(ALWAYS, "0.0001 + 0.004 * I,"); omniout_str(ALWAYS, "0.003 + 0.006 * I,"); omniout_str(ALWAYS, "0.0001 + 0.005 * I,"); omniout_str(ALWAYS, "0.0001 + 0.003 * I,"); omniout_str(ALWAYS, "0.001 + 0.001 * I,"); omniout_str(ALWAYS, "0.001 + 0.003 * I,"); omniout_str(ALWAYS, "0.0001 + 0.004 * I,"); omniout_str(ALWAYS, "0.003 + 0.006 * I,"); omniout_str(ALWAYS, "0.0001 + 0.005 * I,"); omniout_str(ALWAYS, "0.0001 + 0.003 * I,"); omniout_str(ALWAYS, "0.001 + 0.001 * I,"); omniout_str(ALWAYS, "0.001 + 0.003 * I,"); omniout_str(ALWAYS, "0.0001 + 0.004 * I,"); omniout_str(ALWAYS, "0.003 + 0.006 * I,"); omniout_str(ALWAYS, "0.0001 + 0.005 * I,"); omniout_str(ALWAYS, "0.0001 + 0.003 * I,"); omniout_str(ALWAYS, "0.001 + 0.001 * I,"); omniout_str(ALWAYS, "0.001 + 0.003 * I,"); omniout_str(ALWAYS, "0.0001 + 0.004 * I,"); omniout_str(ALWAYS, "0.003 + 0.006 * I,"); omniout_str(ALWAYS, "0.0001 + 0.005 * I,"); omniout_str(ALWAYS, "0.0001 + 0.003 * I,"); omniout_str(ALWAYS, "0.001 + 0.001 * I,"); omniout_str(ALWAYS, "0.001 + 0.003 * I,"); omniout_str(ALWAYS, "0.0001 + 0.004 * I,"); omniout_str(ALWAYS, "0.003 + 0.006 * I,"); omniout_str(ALWAYS, "0.0001 + 0.005 * I,"); omniout_str(ALWAYS, "0.0001 + 0.003 * I,"); omniout_str(ALWAYS, "0.001 + 0.001 * I,"); omniout_str(ALWAYS, "0.0001 + 0.004 * I,"); omniout_str(ALWAYS, "0.003 + 0.006 * I,"); omniout_str(ALWAYS, "0.0001 + 0.005 * I,"); omniout_str(ALWAYS, "0.0001 + 0.003 * I,"); omniout_str(ALWAYS, "0.001 + 0.001 * I,"); omniout_str(ALWAYS, "0.001 + 0.003 * I,"); omniout_str(ALWAYS, "0.0001 + 0.004 * I,"); omniout_str(ALWAYS, "0.003 + 0.006 * I,"); omniout_str(ALWAYS, "0.0001 + 0.005 * I,"); omniout_str(ALWAYS, "0.0001 + 0.003 * I,"); omniout_str(ALWAYS, "0.001 + 0.001 * I,"); omniout_str(ALWAYS, "0.001 + 0.003 * I,"); omniout_str(ALWAYS, "0.0001 + 0.004 * I,"); omniout_str(ALWAYS, "0.003 + 0.006 * I,"); omniout_str(ALWAYS, "0.0001 + 0.005 * I,"); omniout_str(ALWAYS, "0.0001 + 0.003 * I,"); omniout_str(ALWAYS, "0.001 + 0.001 * I,"); omniout_str(ALWAYS, "0.001 + 0.003 * I,"); omniout_str(ALWAYS, "0.0001 + 0.004 * I,"); omniout_str(ALWAYS, "0.003 + 0.006 * I,"); omniout_str(ALWAYS, "0.0001 + 0.005 * I,"); omniout_str(ALWAYS, "0.0001 + 0.003 * I,"); omniout_str(ALWAYS, "0.001 + 0.001 * I,"); omniout_str(ALWAYS, "0.001 + 0.003 * I,"); omniout_str(ALWAYS, "0.0001 + 0.004 * I,"); omniout_str(ALWAYS, "0.003 + 0.006 * I,"); omniout_str(ALWAYS, "0.0001 + 0.005 * I,"); omniout_str(ALWAYS, "0.0001 + 0.003 * I,"); omniout_str(ALWAYS, "0.001 + 0.001 * I,"); omniout_str(ALWAYS, "0.003 + 0.006 * I,"); omniout_str(ALWAYS, "0.0001 + 0.005 * I,"); omniout_str(ALWAYS, "0.0001 + 0.003 * I,"); omniout_str(ALWAYS, "0.001 + 0.001 * I,"); omniout_str(ALWAYS, "0.001 + 0.003 * I,"); omniout_str(ALWAYS, "0.0001 + 0.004 * I,"); omniout_str(ALWAYS, "0.003 + 0.006 * I,"); omniout_str(ALWAYS, "0.0001 + 0.005 * I,"); omniout_str(ALWAYS, "0.0001 + 0.003 * I,"); omniout_str(ALWAYS, "0.001 + 0.001 * I,"); omniout_str(ALWAYS, "0.001 + 0.003 * I,"); omniout_str(ALWAYS, "0.0001 + 0.004 * I,"); omniout_str(ALWAYS, "0.003 + 0.006 * I,"); omniout_str(ALWAYS, "0.0001 + 0.005 * I,"); omniout_str(ALWAYS, "0.0001 + 0.003 * I,"); omniout_str(ALWAYS, "0.001 + 0.001 * I,"); omniout_str(ALWAYS, "0.001 + 0.003 * I,"); omniout_str(ALWAYS, "0.0001 + 0.004 * I,"); omniout_str(ALWAYS, "0.003 + 0.006 * I,"); omniout_str(ALWAYS, "0.0001 + 0.005 * I,"); omniout_str(ALWAYS, "0.0001 + 0.003 * I,"); omniout_str(ALWAYS, "0.001 + 0.001 * I,"); omniout_str(ALWAYS, "0.0001 + 0.004 * I,"); omniout_str(ALWAYS, "0.003 + 0.006 * I,"); omniout_str(ALWAYS, "0.0001 + 0.005 * I,"); omniout_str(ALWAYS, "0.0001 + 0.003 * I,"); omniout_str(ALWAYS, "0.001 + 0.001 * I,"); omniout_str(ALWAYS, "0.001 + 0.003 * I,"); omniout_str(ALWAYS, "0.0001 + 0.004 * I,"); omniout_str(ALWAYS, "0.003 + 0.006 * I,"); omniout_str(ALWAYS, "0.0001 + 0.005 * I,"); omniout_str(ALWAYS, "0.0001 + 0.003 * I,"); omniout_str(ALWAYS, "0.001 + 0.001 * I,"); omniout_str(ALWAYS, "0.001 + 0.003 * I,"); omniout_str(ALWAYS, "0.0001 + 0.004 * I,"); omniout_str(ALWAYS, "0.003 + 0.006 * I,"); omniout_str(ALWAYS, "0.0001 + 0.005 * I,"); omniout_str(ALWAYS, "0.0001 + 0.003 * I,"); omniout_str(ALWAYS, "0.001 + 0.001 * I,"); omniout_str(ALWAYS, "0.001 + 0.003 * I,"); omniout_str(ALWAYS, "0.0001 + 0.004 * I,"); omniout_str(ALWAYS, "0.003 + 0.006 * I,"); omniout_str(ALWAYS, "0.0001 + 0.005 * I,"); omniout_str(ALWAYS, "0.0001 + 0.003 * I,"); omniout_str(ALWAYS, "0.001 + 0.001 * I,"); omniout_str(ALWAYS, "0.001 + 0.003 * I,"); omniout_str(ALWAYS, "0.0001 + 0.004 * I,"); omniout_str(ALWAYS, "0.003 + 0.006 * I,"); omniout_str(ALWAYS, "0.0001 + 0.005 * I,"); omniout_str(ALWAYS, "0.0001 + 0.003 * I,"); omniout_str(ALWAYS, "0.001 + 0.001 * I,"); omniout_str(ALWAYS, "0.0001 + 0.004 * I,"); omniout_str(ALWAYS, "0.003 + 0.006 * I,"); omniout_str(ALWAYS, "0.0001 + 0.005 * I,"); omniout_str(ALWAYS, "0.0001 + 0.003 * I,"); omniout_str(ALWAYS, "0.001 + 0.001 * I,"); omniout_str(ALWAYS, "0.001 + 0.003 * I,"); omniout_str(ALWAYS, "0.0001 + 0.004 * I,"); omniout_str(ALWAYS, "0.003 + 0.006 * I,"); omniout_str(ALWAYS, "0.0001 + 0.005 * I,"); omniout_str(ALWAYS, "0.0001 + 0.003 * I,"); omniout_str(ALWAYS, "0.001 + 0.001 * I,"); omniout_str(ALWAYS, "0.001 + 0.003 * I,"); omniout_str(ALWAYS, "0.0001 + 0.004 * I,"); omniout_str(ALWAYS, "0.003 + 0.006 * I,"); omniout_str(ALWAYS, "0.0001 + 0.005 * I,"); omniout_str(ALWAYS, "0.0001 + 0.003 * I,"); omniout_str(ALWAYS, "0.001 + 0.001 * I,"); omniout_str(ALWAYS, "0.001 + 0.003 * I,"); omniout_str(ALWAYS, "0.0001 + 0.004 * I,"); omniout_str(ALWAYS, "0.003 + 0.006 * I,"); omniout_str(ALWAYS, "0.0001 + 0.005 * I,"); omniout_str(ALWAYS, "0.0001 + 0.003 * I,"); omniout_str(ALWAYS, "0.001 + 0.001 * I,"); omniout_str(ALWAYS, "0.001 + 0.003 * I,"); omniout_str(ALWAYS, "0.0001 + 0.004 * I,"); omniout_str(ALWAYS, "0.003 + 0.006 * I,"); omniout_str(ALWAYS, "0.0001 + 0.005 * I,"); omniout_str(ALWAYS, "0.0001 + 0.003 * I,"); omniout_str(ALWAYS, "0.001 + 0.001 * I,"); omniout_str(ALWAYS, "0.0001 + 0.004 * I,"); omniout_str(ALWAYS, "0.003 + 0.006 * I,"); omniout_str(ALWAYS, "0.0001 + 0.005 * I,"); omniout_str(ALWAYS, "0.0001 + 0.003 * I,"); omniout_str(ALWAYS, "0.001 + 0.001 * I,"); omniout_str(ALWAYS, "0.001 + 0.003 * I,"); omniout_str(ALWAYS, "0.0001 + 0.004 * I,"); omniout_str(ALWAYS, "0.003 + 0.006 * I,"); omniout_str(ALWAYS, "0.0001 + 0.005 * I,"); omniout_str(ALWAYS, "0.0001 + 0.003 * I,"); omniout_str(ALWAYS, "0.001 + 0.001 * I,"); omniout_str(ALWAYS, "0.001 + 0.003 * I,"); omniout_str(ALWAYS, "0.0001 + 0.004 * I,"); omniout_str(ALWAYS, "0.003 + 0.006 * I,"); omniout_str(ALWAYS, "0.0001 + 0.005 * I,"); omniout_str(ALWAYS, "0.0001 + 0.003 * I,"); omniout_str(ALWAYS, "0.001 + 0.001 * I,"); omniout_str(ALWAYS, "0.001 + 0.003 * I,"); omniout_str(ALWAYS, "0.0001 + 0.004 * I,"); omniout_str(ALWAYS, "0.003 + 0.006 * I,"); omniout_str(ALWAYS, "0.0001 + 0.005 * I,"); omniout_str(ALWAYS, "0.0001 + 0.003 * I,"); omniout_str(ALWAYS, "0.001 + 0.001 * I,"); omniout_str(ALWAYS, "0.001 + 0.003 * I,"); omniout_str(ALWAYS, "0.0001 + 0.004 * I,"); omniout_str(ALWAYS, "0.003 + 0.006 * I,"); omniout_str(ALWAYS, "0.0001 + 0.005 * I,"); omniout_str(ALWAYS, "0.0001 + 0.003 * I,"); omniout_str(ALWAYS, "0.001 + 0.001 * I,"); omniout_str(ALWAYS, "0.0001 + 0.004 * I,"); omniout_str(ALWAYS, "0.003 + 0.006 * I,"); omniout_str(ALWAYS, "0.0001 + 0.005 * I,"); omniout_str(ALWAYS, "0.0001 + 0.003 * I,"); omniout_str(ALWAYS, "0.001 + 0.001 * I,"); omniout_str(ALWAYS, "0.001 + 0.003 * I,"); omniout_str(ALWAYS, "0.0001 + 0.004 * I,"); omniout_str(ALWAYS, "0.003 + 0.006 * I,"); omniout_str(ALWAYS, "0.0001 + 0.005 * I,"); omniout_str(ALWAYS, "0.0001 + 0.003 * I,"); omniout_str(ALWAYS, "0.001 + 0.001 * I,"); omniout_str(ALWAYS, "0.001 + 0.003 * I,"); omniout_str(ALWAYS, "0.0001 + 0.004 * I,"); omniout_str(ALWAYS, "0.003 + 0.006 * I,"); omniout_str(ALWAYS, "0.0001 + 0.005 * I,"); omniout_str(ALWAYS, "0.0001 + 0.003 * I,"); omniout_str(ALWAYS, "0.001 + 0.001 * I,"); omniout_str(ALWAYS, "0.001 + 0.003 * I,"); omniout_str(ALWAYS, "0.0001 + 0.004 * I,"); omniout_str(ALWAYS, "0.003 + 0.006 * I,"); omniout_str(ALWAYS, "0.0001 + 0.005 * I,"); omniout_str(ALWAYS, "0.0001 + 0.003 * I,"); omniout_str(ALWAYS, "0.001 + 0.001 * I,"); omniout_str(ALWAYS, "0.001 + 0.003 * I,"); omniout_str(ALWAYS, "0.0001 + 0.004 * I,"); omniout_str(ALWAYS, "0.003 + 0.006 * I,"); omniout_str(ALWAYS, "0.0001 + 0.005 * I,"); omniout_str(ALWAYS, "0.0001 + 0.003 * I,"); omniout_str(ALWAYS, "0.001 + 0.001 * I,"); omniout_str(ALWAYS, "0.0001 + 0.004 * I,"); omniout_str(ALWAYS, "0.003 + 0.006 * I,"); omniout_str(ALWAYS, "0.0001 + 0.005 * I,"); omniout_str(ALWAYS, "0.0001 + 0.003 * I,"); omniout_str(ALWAYS, "0.001 + 0.001 * I,"); omniout_str(ALWAYS, "0.001 + 0.003 * I,"); omniout_str(ALWAYS, "0.0001 + 0.004 * I,"); omniout_str(ALWAYS, "0.003 + 0.006 * I,"); omniout_str(ALWAYS, "0.0001 + 0.005 * I,"); omniout_str(ALWAYS, "0.0001 + 0.003 * I,"); omniout_str(ALWAYS, "0.001 + 0.001 * I,"); omniout_str(ALWAYS, "0.001 + 0.003 * I,"); omniout_str(ALWAYS, "0.0001 + 0.004 * I,"); omniout_str(ALWAYS, "0.003 + 0.006 * I,"); omniout_str(ALWAYS, "0.0001 + 0.005 * I,"); omniout_str(ALWAYS, "0.0001 + 0.003 * I,"); omniout_str(ALWAYS, "0.001 + 0.001 * I,"); omniout_str(ALWAYS, "0.001 + 0.003 * I,"); omniout_str(ALWAYS, "0.0001 + 0.004 * I,"); omniout_str(ALWAYS, "0.003 + 0.006 * I,"); omniout_str(ALWAYS, "0.0001 + 0.005 * I,"); omniout_str(ALWAYS, "0.0001 + 0.003 * I,"); omniout_str(ALWAYS, "0.001 + 0.001 * I,"); omniout_str(ALWAYS, "0.001 + 0.003 * I,"); omniout_str(ALWAYS, "0.0001 + 0.004 * I,"); omniout_str(ALWAYS, "0.003 + 0.006 * I,"); omniout_str(ALWAYS, "0.0001 + 0.005 * I,"); omniout_str(ALWAYS, "0.0001 + 0.003 * I,"); omniout_str(ALWAYS, "0.001 + 0.001 * I,"); omniout_str(ALWAYS, "0.0001 + 0.004 * I,"); omniout_str(ALWAYS, "0.003 + 0.006 * I,"); omniout_str(ALWAYS, "0.0001 + 0.005 * I,"); omniout_str(ALWAYS, "0.0001 + 0.003 * I,"); omniout_str(ALWAYS, "0.001 + 0.001 * I,"); omniout_str(ALWAYS, "0.001 + 0.003 * I,"); omniout_str(ALWAYS, "0.0001 + 0.004 * I,"); omniout_str(ALWAYS, "0.003 + 0.006 * I,"); omniout_str(ALWAYS, "0.0001 + 0.005 * I,"); omniout_str(ALWAYS, "0.0001 + 0.003 * I,"); omniout_str(ALWAYS, "0.001 + 0.001 * I,"); omniout_str(ALWAYS, "0.001 + 0.003 * I,"); omniout_str(ALWAYS, "0.0001 + 0.004 * I,"); omniout_str(ALWAYS, "0.003 + 0.006 * I,"); omniout_str(ALWAYS, "0.0001 + 0.005 * I,"); omniout_str(ALWAYS, "0.0001 + 0.003 * I,"); omniout_str(ALWAYS, "0.001 + 0.001 * I,"); omniout_str(ALWAYS, "0.001 + 0.003 * I,"); omniout_str(ALWAYS, "0.0001 + 0.004 * I,"); omniout_str(ALWAYS, "0.003 + 0.006 * I,"); omniout_str(ALWAYS, "0.0001 + 0.005 * I,"); omniout_str(ALWAYS, "0.0001 + 0.003 * I,"); omniout_str(ALWAYS, "0.001 + 0.001 * I,"); omniout_str(ALWAYS, "0.001 + 0.003 * I,"); omniout_str(ALWAYS, "0.0001 + 0.004 * I,"); omniout_str(ALWAYS, "0.003 + 0.006 * I,"); omniout_str(ALWAYS, "0.0001 + 0.005 * I,"); omniout_str(ALWAYS, "0.0001 + 0.003 * I,"); omniout_str(ALWAYS, "0.001 + 0.001 * I,"); omniout_str(ALWAYS, "0.0001 + 0.004 * I,"); omniout_str(ALWAYS, "0.003 + 0.006 * I,"); omniout_str(ALWAYS, "0.0001 + 0.005 * I,"); omniout_str(ALWAYS, "0.0001 + 0.003 * I,"); omniout_str(ALWAYS, "0.001 + 0.001 * I,"); omniout_str(ALWAYS, "0.001 + 0.003 * I,"); omniout_str(ALWAYS, "0.0001 + 0.004 * I,"); omniout_str(ALWAYS, "0.003 + 0.006 * I,"); omniout_str(ALWAYS, "0.0001 + 0.005 * I,"); omniout_str(ALWAYS, "0.0001 + 0.003 * I,"); omniout_str(ALWAYS, "0.001 + 0.001 * I,"); omniout_str(ALWAYS, "0.001 + 0.003 * I,"); omniout_str(ALWAYS, "0.0001 + 0.004 * I,"); omniout_str(ALWAYS, "0.003 + 0.006 * I,"); omniout_str(ALWAYS, "0.0001 + 0.005 * I,"); omniout_str(ALWAYS, "0.0001 + 0.003 * I,"); omniout_str(ALWAYS, "0.001 + 0.001 * I,"); omniout_str(ALWAYS, "0.001 + 0.003 * I,"); omniout_str(ALWAYS, "0.0001 + 0.004 * I,"); omniout_str(ALWAYS, "0.003 + 0.006 * I,"); omniout_str(ALWAYS, "0.0001 + 0.005 * I,"); omniout_str(ALWAYS, "0.0001 + 0.003 * I,"); omniout_str(ALWAYS, "0.001 + 0.001 * I,"); omniout_str(ALWAYS, "0.001 + 0.003 * I,"); omniout_str(ALWAYS, "0.0001 + 0.004 * I,"); omniout_str(ALWAYS, "0.003 + 0.006 * I,"); omniout_str(ALWAYS, "0.0001 + 0.005 * I,"); omniout_str(ALWAYS, "0.0001 + 0.003 * I,"); omniout_str(ALWAYS, "0.001 + 0.001 * I,"); omniout_str(ALWAYS, "0.0001 + 0.004 * I,"); omniout_str(ALWAYS, "0.003 + 0.006 * I,"); omniout_str(ALWAYS, "0.0001 + 0.005 * I,"); omniout_str(ALWAYS, "0.0001 + 0.003 * I,"); omniout_str(ALWAYS, "0.001 + 0.001 * I,"); omniout_str(ALWAYS, "0.001 + 0.003 * I,"); omniout_str(ALWAYS, "0.0001 + 0.004 * I,"); omniout_str(ALWAYS, "0.003 + 0.006 * I,"); omniout_str(ALWAYS, "0.0001 + 0.005 * I,"); omniout_str(ALWAYS, "0.0001 + 0.003 * I,"); omniout_str(ALWAYS, "0.001 + 0.001 * I,"); omniout_str(ALWAYS, "0.001 + 0.003 * I,"); omniout_str(ALWAYS, "0.0001 + 0.004 * I,"); omniout_str(ALWAYS, "0.003 + 0.006 * I,"); omniout_str(ALWAYS, "0.0001 + 0.005 * I,"); omniout_str(ALWAYS, "0.0001 + 0.003 * I,"); omniout_str(ALWAYS, "0.001 + 0.001 * I,"); omniout_str(ALWAYS, "0.001 + 0.003 * I,"); omniout_str(ALWAYS, "0.0001 + 0.004 * I,"); omniout_str(ALWAYS, "0.003 + 0.006 * I,"); omniout_str(ALWAYS, "0.0001 + 0.005 * I,"); omniout_str(ALWAYS, "0.0001 + 0.003 * I,"); omniout_str(ALWAYS, "0.001 + 0.001 * I,"); omniout_str(ALWAYS, "0.001 + 0.003 * I,"); omniout_str(ALWAYS, "0.0001 + 0.004 * I,"); omniout_str(ALWAYS, "0.003 + 0.006 * I,"); omniout_str(ALWAYS, "0.0001 + 0.005 * I,"); omniout_str(ALWAYS, "0.0001 + 0.003 * I,"); omniout_str(ALWAYS, "0.001 + 0.001 * I,"); omniout_str(ALWAYS, "0.0001 + 0.004 * I,"); omniout_str(ALWAYS, "0.003 + 0.006 * I,"); omniout_str(ALWAYS, "0.0001 + 0.005 * I,"); omniout_str(ALWAYS, "0.0001 + 0.003 * I,"); omniout_str(ALWAYS, "0.001 + 0.001 * I,"); omniout_str(ALWAYS, "0.001 + 0.003 * I,"); omniout_str(ALWAYS, "0.0001 + 0.004 * I,"); omniout_str(ALWAYS, "0.003 + 0.006 * I,"); omniout_str(ALWAYS, "0.0001 + 0.005 * I,"); omniout_str(ALWAYS, "0.0001 + 0.003 * I,"); omniout_str(ALWAYS, "0.001 + 0.001 * I,"); omniout_str(ALWAYS, "0.001 + 0.003 * I,"); omniout_str(ALWAYS, "0.0001 + 0.004 * I,"); omniout_str(ALWAYS, "0.003 + 0.006 * I,"); omniout_str(ALWAYS, "0.0001 + 0.005 * I,"); omniout_str(ALWAYS, "0.0001 + 0.003 * I,"); omniout_str(ALWAYS, "0.001 + 0.001 * I,"); omniout_str(ALWAYS, "0.001 + 0.003 * I,"); omniout_str(ALWAYS, "0.0001 + 0.004 * I,"); omniout_str(ALWAYS, "0.003 + 0.006 * I,"); omniout_str(ALWAYS, "0.0001 + 0.005 * I,"); omniout_str(ALWAYS, "0.0001 + 0.003 * I,"); omniout_str(ALWAYS, "0.001 + 0.001 * I,"); omniout_str(ALWAYS, "0.001 + 0.003 * I,"); omniout_str(ALWAYS, "0.0001 + 0.004 * I,"); omniout_str(ALWAYS, "0.003 + 0.006 * I,"); omniout_str(ALWAYS, "0.0001 + 0.005 * I,"); omniout_str(ALWAYS, "0.0001 + 0.003 * I,"); omniout_str(ALWAYS, "0.001 + 0.001 * I,"); omniout_str(ALWAYS, "0.0001 + 0.004 * I,"); omniout_str(ALWAYS, "0.003 + 0.006 * I,"); omniout_str(ALWAYS, "0.0001 + 0.005 * I,"); omniout_str(ALWAYS, "0.0001 + 0.003 * I,"); omniout_str(ALWAYS, "0.001 + 0.001 * I,"); omniout_str(ALWAYS, "0.001 + 0.003 * I,"); omniout_str(ALWAYS, "0.0001 + 0.004 * I,"); omniout_str(ALWAYS, "0.003 + 0.006 * I,"); omniout_str(ALWAYS, "0.0001 + 0.005 * I,"); omniout_str(ALWAYS, "0.0001 + 0.003 * I,"); omniout_str(ALWAYS, "0.001 + 0.001 * I,"); omniout_str(ALWAYS, "0.001 + 0.003 * I,"); omniout_str(ALWAYS, "0.0001 + 0.004 * I,"); omniout_str(ALWAYS, "0.003 + 0.006 * I,"); omniout_str(ALWAYS, "0.0001 + 0.005 * I,"); omniout_str(ALWAYS, "0.0001 + 0.003 * I,"); omniout_str(ALWAYS, "0.001 + 0.001 * I,"); omniout_str(ALWAYS, "0.001 + 0.003 * I,"); omniout_str(ALWAYS, "0.0001 + 0.004 * I,"); omniout_str(ALWAYS, "0.003 + 0.006 * I,"); omniout_str(ALWAYS, "0.0001 + 0.005 * I,"); omniout_str(ALWAYS, "0.0001 + 0.003 * I,"); omniout_str(ALWAYS, "0.001 + 0.001 * I,"); omniout_str(ALWAYS, "0.001 + 0.003 * I,"); omniout_str(ALWAYS, "0.0001 + 0.004 * I,"); omniout_str(ALWAYS, "0.003 + 0.006 * I,"); omniout_str(ALWAYS, "0.0001 + 0.005 * I,"); omniout_str(ALWAYS, "0.0001 + 0.003 * I,"); omniout_str(ALWAYS, "0.001 + 0.001 * I,"); omniout_str(ALWAYS, "0.0001 + 0.004 * I,"); omniout_str(ALWAYS, "0.003 + 0.006 * I,"); omniout_str(ALWAYS, "0.0001 + 0.005 * I,"); omniout_str(ALWAYS, "0.0001 + 0.003 * I,"); omniout_str(ALWAYS, "0.001 + 0.001 * I,"); omniout_str(ALWAYS, "0.001 + 0.003 * I,"); omniout_str(ALWAYS, "0.0001 + 0.004 * I,"); omniout_str(ALWAYS, "0.003 + 0.006 * I,"); omniout_str(ALWAYS, "0.0001 + 0.005 * I,"); omniout_str(ALWAYS, "0.0001 + 0.003 * I,"); omniout_str(ALWAYS, "0.001 + 0.001 * I,"); omniout_str(ALWAYS, "0.001 + 0.003 * I,"); omniout_str(ALWAYS, "0.0001 + 0.004 * I,"); omniout_str(ALWAYS, "0.003 + 0.006 * I,"); omniout_str(ALWAYS, "0.0001 + 0.005 * I,"); omniout_str(ALWAYS, "0.0001 + 0.003 * I,"); omniout_str(ALWAYS, "0.001 + 0.001 * I,"); omniout_str(ALWAYS, "0.001 + 0.003 * I,"); omniout_str(ALWAYS, "0.0001 + 0.004 * I,"); omniout_str(ALWAYS, "0.003 + 0.006 * I,"); omniout_str(ALWAYS, "0.0001 + 0.005 * I,"); omniout_str(ALWAYS, "0.0001 + 0.003 * I,"); omniout_str(ALWAYS, "0.001 + 0.001 * I,"); omniout_str(ALWAYS, "0.001 + 0.003 * I,"); omniout_str(ALWAYS, "0.0001 + 0.004 * I,"); omniout_str(ALWAYS, "0.003 + 0.006 * I,"); omniout_str(ALWAYS, "0.0001 + 0.005 * I,"); omniout_str(ALWAYS, "0.0001 + 0.003 * I,"); omniout_str(ALWAYS, "0.001 + 0.001 * I,"); omniout_str(ALWAYS, "0.0001 + 0.004 * I,"); omniout_str(ALWAYS, "0.003 + 0.006 * I,"); omniout_str(ALWAYS, "0.0001 + 0.005 * I,"); omniout_str(ALWAYS, "0.0001 + 0.003 * I,"); omniout_str(ALWAYS, "0.001 + 0.001 * I,"); omniout_str(ALWAYS, "0.001 + 0.003 * I,"); omniout_str(ALWAYS, "0.0001 + 0.004 * I,"); omniout_str(ALWAYS, "0.003 + 0.006 * I,"); omniout_str(ALWAYS, "0.0001 + 0.005 * I,"); omniout_str(ALWAYS, "0.0001 + 0.003 * I,"); omniout_str(ALWAYS, "0.001 + 0.001 * I,"); omniout_str(ALWAYS, "0.001 + 0.003 * I,"); omniout_str(ALWAYS, "0.0001 + 0.004 * I,"); omniout_str(ALWAYS, "0.003 + 0.006 * I,"); omniout_str(ALWAYS, "0.0001 + 0.005 * I,"); omniout_str(ALWAYS, "0.0001 + 0.003 * I,"); omniout_str(ALWAYS, "0.001 + 0.001 * I,"); omniout_str(ALWAYS, "0.001 + 0.003 * I,"); omniout_str(ALWAYS, "0.0001 + 0.004 * I,"); omniout_str(ALWAYS, "0.003 + 0.006 * I,"); omniout_str(ALWAYS, "0.0001 + 0.005 * I,"); omniout_str(ALWAYS, "0.0001 + 0.003 * I,"); omniout_str(ALWAYS, "0.001 + 0.001 * I,"); omniout_str(ALWAYS, "0.001 + 0.003 * I,"); omniout_str(ALWAYS, "0.0001 + 0.004 * I,"); omniout_str(ALWAYS, "0.003 + 0.006 * I,"); omniout_str(ALWAYS, "0.0001 + 0.005 * I,"); omniout_str(ALWAYS, "0.0001 + 0.003 * I,"); omniout_str(ALWAYS, "0.001 + 0.001 * I,"); omniout_str(ALWAYS, "0.0001 + 0.004 * I,"); omniout_str(ALWAYS, "0.003 + 0.006 * I,"); omniout_str(ALWAYS, "0.0001 + 0.005 * I,"); omniout_str(ALWAYS, "0.0001 + 0.003 * I,"); omniout_str(ALWAYS, "0.001 + 0.001 * I,"); omniout_str(ALWAYS, "0.001 + 0.003 * I,"); omniout_str(ALWAYS, "0.0001 + 0.004 * I,"); omniout_str(ALWAYS, "0.003 + 0.006 * I,"); omniout_str(ALWAYS, "0.0001 + 0.005 * I,"); omniout_str(ALWAYS, "0.0001 + 0.003 * I,"); omniout_str(ALWAYS, "0.001 + 0.001 * I,"); omniout_str(ALWAYS, "0.001 + 0.003 * I,"); omniout_str(ALWAYS, "0.0001 + 0.004 * I,"); omniout_str(ALWAYS, "0.003 + 0.006 * I,"); omniout_str(ALWAYS, "0.0001 + 0.005 * I,"); omniout_str(ALWAYS, "0.0001 + 0.003 * I,"); omniout_str(ALWAYS, "0.001 + 0.001 * I,"); omniout_str(ALWAYS, "0.001 + 0.003 * I,"); omniout_str(ALWAYS, "0.0001 + 0.004 * I,"); omniout_str(ALWAYS, "0.003 + 0.006 * I,"); omniout_str(ALWAYS, "0.0001 + 0.005 * I,"); omniout_str(ALWAYS, "0.0001 + 0.003 * I,"); omniout_str(ALWAYS, "0.001 + 0.001 * I,"); omniout_str(ALWAYS, "0.001 + 0.003 * I,"); omniout_str(ALWAYS, "0.0001 + 0.004 * I,"); omniout_str(ALWAYS, "0.003 + 0.006 * I,"); omniout_str(ALWAYS, "0.0001 + 0.005 * I,"); omniout_str(ALWAYS, "0.0001 + 0.003 * I,"); omniout_str(ALWAYS, "0.001 + 0.001 * I,"); omniout_str(ALWAYS, "0.001 + 0.003 * I,"); omniout_str(ALWAYS, "0.000 + 0.000 * I ];"); omniout_str(ALWAYS, ""); omniout_str(ALWAYS, "glob_nxt := glob_nxt + 1;"); omniout_str(ALWAYS, "it := x_delta[glob_nxt];"); omniout_str(ALWAYS, "return it;"); omniout_str(ALWAYS, "end;"); omniout_str(ALWAYS, "#END USER DEF BLOCK"); omniout_str(ALWAYS, "#######END OF ECHO OF PROBLEM#################"); glob_unchanged_h_cnt := 0; glob_warned := false; glob_warned2 := false; glob_small_float := glob__0; glob_smallish_float := glob__0; glob_large_float := c(0.10*10^101); glob_larger_float := c(0.11*10^101); glob_almost_1 := c(0.99); x_start := 0.1 + 0.1*I; x_end := 99.0 + 99.0*I; array_y_init[1] := exact_soln_y(x_start); glob_look_poles := true; glob_max_h := 0.1; glob_type_given_pole := 1; array_given_rad_poles[1, 1] := c(-1.5); 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 ) = tanh ( sqrt ( 2\ .0 * x + 3.0 ) ) ; "); omniout_int(INFO, "Iterations ", 32, glob_iter, 4, " "); prog_report(x_start, x_end); if glob_html_log then logstart(html_log_file); logitem_str(html_log_file, "2017-11-26T16:39:24-06:00"); logitem_str(html_log_file, "Maple"); logitem_str(html_log_file, "tanh_sqrt"); logitem_str(html_log_file, "diff ( y , x , 1 ) = ta\ nh ( sqrt ( 2.0 * x + 3.0 ) ) ; "); logitem_complex(html_log_file, x_start); logitem_complex(html_log_file, x_end); logitem_complex(html_log_file, array_x[1]); logitem_complex(html_log_file, glob_h); logitem_h_reason(html_log_file); logitem_integer(html_log_file, Digits); glob_desired_digits_correct := 0.; logitem_float(html_log_file, glob_desired_digits_correct); if array_est_digits[1] <> -16 then logitem_integer(html_log_file, array_est_digits[1]) else logitem_str(html_log_file, "Unknown") end if; if glob_min_good_digits <> -16 then logitem_integer(html_log_file, glob_min_good_digits) else logitem_str(html_log_file, "Unknown") end if; if glob_good_digits <> -16 then logitem_integer(html_log_file, glob_good_digits) else logitem_str(html_log_file, "Unknown") end if; logitem_str(html_log_file, "NA"); logitem_str(html_log_file, "NA"); logitem_integer(html_log_file, ATS_MAX_TERMS); if glob_type_given_pole = 0 then logitem_str(html_log_file, "Not Given"); logitem_str(html_log_file, "NA") elif glob_type_given_pole = 4 then logitem_str(html_log_file, "No Solution"); logitem_str(html_log_file, "NA") elif glob_type_given_pole = 5 then logitem_str(html_log_file, "Some Pole"); logitem_str(html_log_file, "????") elif glob_type_given_pole = 3 then logitem_str(html_log_file, "No Pole"); logitem_str(html_log_file, "NA") elif glob_type_given_pole = 1 then logitem_str(html_log_file, "Real Sing"); logitem_float(html_log_file, glob_least_given_sing) elif glob_type_given_pole = 2 then logitem_str(html_log_file, "Complex Sing"); logitem_float(html_log_file, glob_least_given_sing) end if; if glob_least_ratio_sing < glob_large_float then glob_least_ratio_sing := 0; logitem_float(html_log_file, glob_least_ratio_sing) else logitem_str(html_log_file, "NONE") end if; if glob_least_3_sing < glob_large_float then logitem_float(html_log_file, glob_least_3_sing) else logitem_str(html_log_file, "NONE") end if; if glob_least_6_sing < glob_large_float then glob_least_6_sing := 0.; logitem_float(html_log_file, glob_least_6_sing) else logitem_str(html_log_file, "NONE") end if; logitem_integer(html_log_file, glob_iter); logitem_time(html_log_file, glob_clock_sec); if c(glob_percent_done) < glob__100 then logitem_time(html_log_file, glob_total_exp_sec); 0 else logitem_str(html_log_file, "Done"); 0 end if; log_revs(html_log_file, " 309 "); logitem_str(html_log_file, "tanh_sqrt diffeq.mxt"); logitem_str(html_log_file, "tanh_sqrt maple results"); logitem_str(html_log_file, "??"); 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/tanh_sqrtpostcpx.cpx################# diff ( y , x , 1 ) = tanh ( sqrt ( 2.0 * x + 3.0 ) ) ; ! #BEGIN FIRST INPUT BLOCK Digits:=32; max_terms:=30; ! #END FIRST INPUT BLOCK #BEGIN SECOND INPUT BLOCK x_start := 0.1 + 0.1 * I; x_end := 99.0 + 99.0 * I; array_y_init[0 + 1] := exact_soln_y(x_start); glob_look_poles := true; glob_max_h := 0.1; glob_type_given_pole := 1; array_given_rad_poles[1,1] := c(-1.5); 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(0.0)); end; next_delta := proc() global glob_nxt, x_delta; x_delta := [ 0.001 + 0.00004 * I, 0.0001 + 0.004 * I, 0.003 + 0.006 * I, 0.0001 + 0.005 * I, 0.0001 + 0.003 * I, 0.001 + 0.001 * I, 0.001 + 0.003 * I, 0.0001 + 0.004 * I, 0.003 + 0.006 * I, 0.0001 + 0.005 * I, 0.0001 + 0.003 * I, 0.001 + 0.001 * I, 0.001 + 0.003 * I, 0.0001 + 0.004 * I, 0.003 + 0.006 * I, 0.0001 + 0.005 * I, 0.0001 + 0.003 * I, 0.001 + 0.001 * I, 0.001 + 0.003 * I, 0.0001 + 0.004 * I, 0.003 + 0.006 * I, 0.0001 + 0.005 * I, 0.0001 + 0.003 * I, 0.001 + 0.001 * I, 0.001 + 0.003 * I, 0.0001 + 0.004 * I, 0.003 + 0.006 * I, 0.0001 + 0.005 * I, 0.0001 + 0.003 * I, 0.001 + 0.001 * I, 0.0001 + 0.004 * I, 0.003 + 0.006 * I, 0.0001 + 0.005 * I, 0.0001 + 0.003 * I, 0.001 + 0.001 * I, 0.001 + 0.003 * I, 0.0001 + 0.004 * I, 0.003 + 0.006 * I, 0.0001 + 0.005 * I, 0.0001 + 0.003 * I, 0.001 + 0.001 * I, 0.001 + 0.003 * I, 0.0001 + 0.004 * I, 0.003 + 0.006 * I, 0.0001 + 0.005 * I, 0.0001 + 0.003 * I, 0.001 + 0.001 * I, 0.001 + 0.003 * I, 0.0001 + 0.004 * I, 0.003 + 0.006 * I, 0.0001 + 0.005 * I, 0.0001 + 0.003 * I, 0.001 + 0.001 * I, 0.001 + 0.003 * I, 0.0001 + 0.004 * I, 0.003 + 0.006 * I, 0.0001 + 0.005 * I, 0.0001 + 0.003 * I, 0.001 + 0.001 * I, 0.0001 + 0.004 * I, 0.003 + 0.006 * I, 0.0001 + 0.005 * I, 0.0001 + 0.003 * I, 0.001 + 0.001 * I, 0.001 + 0.003 * I, 0.0001 + 0.004 * I, 0.003 + 0.006 * I, 0.0001 + 0.005 * I, 0.0001 + 0.003 * I, 0.001 + 0.001 * I, 0.001 + 0.003 * I, 0.0001 + 0.004 * I, 0.003 + 0.006 * I, 0.0001 + 0.005 * I, 0.0001 + 0.003 * I, 0.001 + 0.001 * I, 0.001 + 0.003 * I, 0.0001 + 0.004 * I, 0.003 + 0.006 * I, 0.0001 + 0.005 * I, 0.0001 + 0.003 * I, 0.001 + 0.001 * I, 0.001 + 0.003 * I, 0.0001 + 0.004 * I, 0.003 + 0.006 * I, 0.0001 + 0.005 * I, 0.0001 + 0.003 * I, 0.001 + 0.001 * I, 0.0001 + 0.004 * I, 0.003 + 0.006 * I, 0.0001 + 0.005 * I, 0.0001 + 0.003 * I, 0.001 + 0.001 * I, 0.001 + 0.003 * I, 0.0001 + 0.004 * I, 0.003 + 0.006 * I, 0.0001 + 0.005 * I, 0.0001 + 0.003 * I, 0.001 + 0.001 * I, 0.001 + 0.003 * I, 0.0001 + 0.004 * I, 0.003 + 0.006 * I, 0.0001 + 0.005 * I, 0.0001 + 0.003 * I, 0.001 + 0.001 * I, 0.001 + 0.003 * I, 0.0001 + 0.004 * I, 0.003 + 0.006 * I, 0.0001 + 0.005 * I, 0.0001 + 0.003 * I, 0.001 + 0.001 * I, 0.001 + 0.003 * I, 0.0001 + 0.004 * I, 0.003 + 0.006 * I, 0.0001 + 0.005 * I, 0.0001 + 0.003 * I, 0.001 + 0.001 * I, 0.0001 + 0.004 * I, 0.003 + 0.006 * I, 0.0001 + 0.005 * I, 0.0001 + 0.003 * I, 0.001 + 0.001 * I, 0.001 + 0.003 * I, 0.0001 + 0.004 * I, 0.003 + 0.006 * I, 0.0001 + 0.005 * I, 0.0001 + 0.003 * I, 0.001 + 0.001 * I, 0.001 + 0.003 * I, 0.0001 + 0.004 * I, 0.003 + 0.006 * I, 0.0001 + 0.005 * I, 0.0001 + 0.003 * I, 0.001 + 0.001 * I, 0.001 + 0.003 * I, 0.0001 + 0.004 * I, 0.003 + 0.006 * I, 0.0001 + 0.005 * I, 0.0001 + 0.003 * I, 0.001 + 0.001 * I, 0.001 + 0.003 * I, 0.0001 + 0.004 * I, 0.003 + 0.006 * I, 0.0001 + 0.005 * I, 0.0001 + 0.003 * I, 0.001 + 0.001 * I, 0.0001 + 0.004 * I, 0.003 + 0.006 * I, 0.0001 + 0.005 * I, 0.0001 + 0.003 * I, 0.001 + 0.001 * I, 0.001 + 0.003 * I, 0.0001 + 0.004 * I, 0.003 + 0.006 * I, 0.0001 + 0.005 * I, 0.0001 + 0.003 * I, 0.001 + 0.001 * I, 0.001 + 0.003 * I, 0.0001 + 0.004 * I, 0.003 + 0.006 * I, 0.0001 + 0.005 * I, 0.0001 + 0.003 * I, 0.001 + 0.001 * I, 0.001 + 0.003 * I, 0.0001 + 0.004 * I, 0.003 + 0.006 * I, 0.0001 + 0.005 * I, 0.0001 + 0.003 * I, 0.001 + 0.001 * I, 0.001 + 0.003 * I, 0.0001 + 0.004 * I, 0.003 + 0.006 * I, 0.0001 + 0.005 * I, 0.0001 + 0.003 * I, 0.001 + 0.001 * I, 0.0001 + 0.004 * I, 0.003 + 0.006 * I, 0.0001 + 0.005 * I, 0.0001 + 0.003 * I, 0.001 + 0.001 * I, 0.001 + 0.003 * I, 0.0001 + 0.004 * I, 0.0001 + 0.004 * I, 0.003 + 0.006 * I, 0.0001 + 0.005 * I, 0.0001 + 0.003 * I, 0.001 + 0.001 * I, 0.001 + 0.003 * I, 0.0001 + 0.004 * I, 0.003 + 0.006 * I, 0.0001 + 0.005 * I, 0.0001 + 0.003 * I, 0.001 + 0.001 * I, 0.001 + 0.003 * I, 0.0001 + 0.004 * I, 0.003 + 0.006 * I, 0.0001 + 0.005 * I, 0.0001 + 0.003 * I, 0.001 + 0.001 * I, 0.001 + 0.003 * I, 0.0001 + 0.004 * I, 0.003 + 0.006 * I, 0.0001 + 0.005 * I, 0.0001 + 0.003 * I, 0.001 + 0.001 * I, 0.001 + 0.003 * I, 0.0001 + 0.004 * I, 0.003 + 0.006 * I, 0.0001 + 0.005 * I, 0.0001 + 0.003 * I, 0.001 + 0.001 * I, 0.0001 + 0.004 * I, 0.003 + 0.006 * I, 0.0001 + 0.005 * I, 0.0001 + 0.003 * I, 0.001 + 0.001 * I, 0.001 + 0.003 * I, 0.0001 + 0.004 * I, 0.003 + 0.006 * I, 0.0001 + 0.005 * I, 0.0001 + 0.003 * I, 0.001 + 0.001 * I, 0.001 + 0.003 * I, 0.0001 + 0.004 * I, 0.003 + 0.006 * I, 0.0001 + 0.005 * I, 0.0001 + 0.003 * I, 0.001 + 0.001 * I, 0.001 + 0.003 * I, 0.0001 + 0.004 * I, 0.003 + 0.006 * I, 0.0001 + 0.005 * I, 0.0001 + 0.003 * I, 0.001 + 0.001 * I, 0.001 + 0.003 * I, 0.0001 + 0.004 * I, 0.003 + 0.006 * I, 0.0001 + 0.005 * I, 0.0001 + 0.003 * I, 0.001 + 0.001 * I, 0.0001 + 0.004 * I, 0.003 + 0.006 * I, 0.0001 + 0.005 * I, 0.0001 + 0.003 * I, 0.001 + 0.001 * I, 0.001 + 0.003 * I, 0.0001 + 0.004 * I, 0.003 + 0.006 * I, 0.0001 + 0.005 * I, 0.0001 + 0.003 * I, 0.001 + 0.001 * I, 0.001 + 0.003 * I, 0.0001 + 0.004 * I, 0.003 + 0.006 * I, 0.0001 + 0.005 * I, 0.0001 + 0.003 * I, 0.001 + 0.001 * I, 0.001 + 0.003 * I, 0.0001 + 0.004 * I, 0.003 + 0.006 * I, 0.0001 + 0.005 * I, 0.0001 + 0.003 * I, 0.001 + 0.001 * I, 0.001 + 0.003 * I, 0.0001 + 0.004 * I, 0.003 + 0.006 * I, 0.0001 + 0.005 * I, 0.0001 + 0.003 * I, 0.001 + 0.001 * I, 0.0001 + 0.004 * I, 0.003 + 0.006 * I, 0.0001 + 0.005 * I, 0.0001 + 0.003 * I, 0.001 + 0.001 * I, 0.001 + 0.003 * I, 0.0001 + 0.004 * I, 0.003 + 0.006 * I, 0.0001 + 0.005 * I, 0.0001 + 0.003 * I, 0.001 + 0.001 * I, 0.001 + 0.003 * I, 0.0001 + 0.004 * I, 0.003 + 0.006 * I, 0.0001 + 0.005 * I, 0.0001 + 0.003 * I, 0.001 + 0.001 * I, 0.001 + 0.003 * I, 0.0001 + 0.004 * I, 0.003 + 0.006 * I, 0.0001 + 0.005 * I, 0.0001 + 0.003 * I, 0.001 + 0.001 * I, 0.001 + 0.003 * I, 0.0001 + 0.004 * I, 0.003 + 0.006 * I, 0.0001 + 0.005 * I, 0.0001 + 0.003 * I, 0.001 + 0.001 * I, 0.0001 + 0.004 * I, 0.003 + 0.006 * I, 0.0001 + 0.005 * I, 0.0001 + 0.003 * I, 0.001 + 0.001 * I, 0.001 + 0.003 * I, 0.0001 + 0.004 * I, 0.003 + 0.006 * I, 0.0001 + 0.005 * I, 0.0001 + 0.003 * I, 0.001 + 0.001 * I, 0.001 + 0.003 * I, 0.0001 + 0.004 * I, 0.003 + 0.006 * I, 0.0001 + 0.005 * I, 0.0001 + 0.003 * I, 0.001 + 0.001 * I, 0.001 + 0.003 * I, 0.0001 + 0.004 * I, 0.003 + 0.006 * I, 0.0001 + 0.005 * I, 0.0001 + 0.003 * I, 0.001 + 0.001 * I, 0.001 + 0.003 * I, 0.0001 + 0.004 * I, 0.003 + 0.006 * I, 0.0001 + 0.005 * I, 0.0001 + 0.003 * I, 0.001 + 0.001 * I, 0.0001 + 0.004 * I, 0.003 + 0.006 * I, 0.0001 + 0.005 * I, 0.0001 + 0.003 * I, 0.001 + 0.001 * I, 0.001 + 0.003 * I, 0.0001 + 0.004 * I, 0.003 + 0.006 * I, 0.0001 + 0.005 * I, 0.0001 + 0.003 * I, 0.001 + 0.001 * I, 0.001 + 0.003 * I, 0.0001 + 0.004 * I, 0.003 + 0.006 * I, 0.0001 + 0.005 * I, 0.0001 + 0.003 * I, 0.001 + 0.001 * I, 0.001 + 0.003 * I, 0.0001 + 0.004 * I, 0.003 + 0.006 * I, 0.0001 + 0.005 * I, 0.0001 + 0.003 * I, 0.001 + 0.001 * I, 0.001 + 0.003 * I, 0.0001 + 0.004 * I, 0.003 + 0.006 * I, 0.0001 + 0.005 * I, 0.0001 + 0.003 * I, 0.001 + 0.001 * I, 0.003 + 0.006 * I, 0.0001 + 0.005 * I, 0.0001 + 0.003 * I, 0.001 + 0.001 * I, 0.001 + 0.003 * I, 0.0001 + 0.004 * I, 0.003 + 0.006 * I, 0.0001 + 0.005 * I, 0.0001 + 0.003 * I, 0.001 + 0.001 * I, 0.001 + 0.003 * I, 0.0001 + 0.004 * I, 0.003 + 0.006 * I, 0.0001 + 0.005 * I, 0.0001 + 0.003 * I, 0.001 + 0.001 * I, 0.001 + 0.003 * I, 0.0001 + 0.004 * I, 0.003 + 0.006 * I, 0.0001 + 0.005 * I, 0.0001 + 0.003 * I, 0.001 + 0.001 * I, 0.0001 + 0.004 * I, 0.003 + 0.006 * I, 0.0001 + 0.005 * I, 0.0001 + 0.003 * I, 0.001 + 0.001 * I, 0.001 + 0.003 * I, 0.0001 + 0.004 * I, 0.003 + 0.006 * I, 0.0001 + 0.005 * I, 0.0001 + 0.003 * I, 0.001 + 0.001 * I, 0.001 + 0.003 * I, 0.0001 + 0.004 * I, 0.003 + 0.006 * I, 0.0001 + 0.005 * I, 0.0001 + 0.003 * I, 0.001 + 0.001 * I, 0.001 + 0.003 * I, 0.0001 + 0.004 * I, 0.003 + 0.006 * I, 0.0001 + 0.005 * I, 0.0001 + 0.003 * I, 0.001 + 0.001 * I, 0.001 + 0.003 * I, 0.0001 + 0.004 * I, 0.003 + 0.006 * I, 0.0001 + 0.005 * I, 0.0001 + 0.003 * I, 0.001 + 0.001 * I, 0.0001 + 0.004 * I, 0.003 + 0.006 * I, 0.0001 + 0.005 * I, 0.0001 + 0.003 * I, 0.001 + 0.001 * I, 0.001 + 0.003 * I, 0.0001 + 0.004 * I, 0.003 + 0.006 * I, 0.0001 + 0.005 * I, 0.0001 + 0.003 * I, 0.001 + 0.001 * I, 0.001 + 0.003 * I, 0.0001 + 0.004 * I, 0.003 + 0.006 * I, 0.0001 + 0.005 * I, 0.0001 + 0.003 * I, 0.001 + 0.001 * I, 0.001 + 0.003 * I, 0.0001 + 0.004 * I, 0.003 + 0.006 * I, 0.0001 + 0.005 * I, 0.0001 + 0.003 * I, 0.001 + 0.001 * I, 0.001 + 0.003 * I, 0.0001 + 0.004 * I, 0.003 + 0.006 * I, 0.0001 + 0.005 * I, 0.0001 + 0.003 * I, 0.001 + 0.001 * I, 0.0001 + 0.004 * I, 0.003 + 0.006 * I, 0.0001 + 0.005 * I, 0.0001 + 0.003 * I, 0.001 + 0.001 * I, 0.001 + 0.003 * I, 0.0001 + 0.004 * I, 0.003 + 0.006 * I, 0.0001 + 0.005 * I, 0.0001 + 0.003 * I, 0.001 + 0.001 * I, 0.001 + 0.003 * I, 0.0001 + 0.004 * I, 0.003 + 0.006 * I, 0.0001 + 0.005 * I, 0.0001 + 0.003 * I, 0.001 + 0.001 * I, 0.001 + 0.003 * I, 0.0001 + 0.004 * I, 0.003 + 0.006 * I, 0.0001 + 0.005 * I, 0.0001 + 0.003 * I, 0.001 + 0.001 * I, 0.001 + 0.003 * I, 0.0001 + 0.004 * I, 0.003 + 0.006 * I, 0.0001 + 0.005 * I, 0.0001 + 0.003 * I, 0.001 + 0.001 * I, 0.0001 + 0.004 * I, 0.003 + 0.006 * I, 0.0001 + 0.005 * I, 0.0001 + 0.003 * I, 0.001 + 0.001 * I, 0.001 + 0.003 * I, 0.0001 + 0.004 * I, 0.003 + 0.006 * I, 0.0001 + 0.005 * I, 0.0001 + 0.003 * I, 0.001 + 0.001 * I, 0.001 + 0.003 * I, 0.0001 + 0.004 * I, 0.003 + 0.006 * I, 0.0001 + 0.005 * I, 0.0001 + 0.003 * I, 0.001 + 0.001 * I, 0.001 + 0.003 * I, 0.0001 + 0.004 * I, 0.003 + 0.006 * I, 0.0001 + 0.005 * I, 0.0001 + 0.003 * I, 0.001 + 0.001 * I, 0.001 + 0.003 * I, 0.0001 + 0.004 * I, 0.003 + 0.006 * I, 0.0001 + 0.005 * I, 0.0001 + 0.003 * I, 0.001 + 0.001 * I, 0.0001 + 0.004 * I, 0.003 + 0.006 * I, 0.0001 + 0.005 * I, 0.0001 + 0.003 * I, 0.001 + 0.001 * I, 0.001 + 0.003 * I, 0.0001 + 0.004 * I, 0.003 + 0.006 * I, 0.0001 + 0.005 * I, 0.0001 + 0.003 * I, 0.001 + 0.001 * I, 0.001 + 0.003 * I, 0.0001 + 0.004 * I, 0.003 + 0.006 * I, 0.0001 + 0.005 * I, 0.0001 + 0.003 * I, 0.001 + 0.001 * I, 0.001 + 0.003 * I, 0.0001 + 0.004 * I, 0.003 + 0.006 * I, 0.0001 + 0.005 * I, 0.0001 + 0.003 * I, 0.001 + 0.001 * I, 0.001 + 0.003 * I, 0.0001 + 0.004 * I, 0.003 + 0.006 * I, 0.0001 + 0.005 * I, 0.0001 + 0.003 * I, 0.001 + 0.001 * I, 0.0001 + 0.004 * I, 0.003 + 0.006 * I, 0.0001 + 0.005 * I, 0.0001 + 0.003 * I, 0.001 + 0.001 * I, 0.001 + 0.003 * I, 0.0001 + 0.004 * I, 0.003 + 0.006 * I, 0.0001 + 0.005 * I, 0.0001 + 0.003 * I, 0.001 + 0.001 * I, 0.001 + 0.003 * I, 0.0001 + 0.004 * I, 0.003 + 0.006 * I, 0.0001 + 0.005 * I, 0.0001 + 0.003 * I, 0.001 + 0.001 * I, 0.001 + 0.003 * I, 0.0001 + 0.004 * I, 0.003 + 0.006 * I, 0.0001 + 0.005 * I, 0.0001 + 0.003 * I, 0.001 + 0.001 * I, 0.001 + 0.003 * I, 0.0001 + 0.004 * I, 0.003 + 0.006 * I, 0.0001 + 0.005 * I, 0.0001 + 0.003 * I, 0.001 + 0.001 * I, 0.0001 + 0.004 * I, 0.003 + 0.006 * I, 0.0001 + 0.005 * I, 0.0001 + 0.003 * I, 0.001 + 0.001 * I, 0.001 + 0.003 * I, 0.0001 + 0.004 * I, 0.003 + 0.006 * I, 0.0001 + 0.005 * I, 0.0001 + 0.003 * I, 0.001 + 0.001 * I, 0.001 + 0.003 * I, 0.0001 + 0.004 * I, 0.003 + 0.006 * I, 0.0001 + 0.005 * I, 0.0001 + 0.003 * I, 0.001 + 0.001 * I, 0.001 + 0.003 * I, 0.0001 + 0.004 * I, 0.003 + 0.006 * I, 0.0001 + 0.005 * I, 0.0001 + 0.003 * I, 0.001 + 0.001 * I, 0.001 + 0.003 * I, 0.0001 + 0.004 * I, 0.003 + 0.006 * I, 0.0001 + 0.005 * I, 0.0001 + 0.003 * I, 0.001 + 0.001 * I, 0.0001 + 0.004 * I, 0.003 + 0.006 * I, 0.0001 + 0.005 * I, 0.0001 + 0.003 * I, 0.001 + 0.001 * I, 0.001 + 0.003 * I, 0.0001 + 0.004 * I, 0.003 + 0.006 * I, 0.0001 + 0.005 * I, 0.0001 + 0.003 * I, 0.001 + 0.001 * I, 0.001 + 0.003 * I, 0.0001 + 0.004 * I, 0.003 + 0.006 * I, 0.0001 + 0.005 * I, 0.0001 + 0.003 * I, 0.001 + 0.001 * I, 0.001 + 0.003 * I, 0.0001 + 0.004 * I, 0.003 + 0.006 * I, 0.0001 + 0.005 * I, 0.0001 + 0.003 * I, 0.001 + 0.001 * I, 0.001 + 0.003 * I, 0.0001 + 0.004 * I, 0.003 + 0.006 * I, 0.0001 + 0.005 * I, 0.0001 + 0.003 * I, 0.001 + 0.001 * I, 0.0001 + 0.004 * I, 0.003 + 0.006 * I, 0.0001 + 0.005 * I, 0.0001 + 0.003 * I, 0.001 + 0.001 * I, 0.001 + 0.003 * I, 0.0001 + 0.004 * I, 0.003 + 0.006 * I, 0.0001 + 0.005 * I, 0.0001 + 0.003 * I, 0.001 + 0.001 * I, 0.001 + 0.003 * I, 0.0001 + 0.004 * I, 0.003 + 0.006 * I, 0.0001 + 0.005 * I, 0.0001 + 0.003 * I, 0.001 + 0.001 * I, 0.001 + 0.003 * I, 0.0001 + 0.004 * I, 0.003 + 0.006 * I, 0.0001 + 0.005 * I, 0.0001 + 0.003 * I, 0.001 + 0.001 * I, 0.001 + 0.003 * I, 0.0001 + 0.004 * I, 0.003 + 0.006 * I, 0.0001 + 0.005 * I, 0.0001 + 0.003 * I, 0.001 + 0.001 * I, 0.0001 + 0.004 * I, 0.003 + 0.006 * I, 0.0001 + 0.005 * I, 0.0001 + 0.003 * I, 0.001 + 0.001 * I, 0.001 + 0.003 * I, 0.0001 + 0.004 * I, 0.003 + 0.006 * I, 0.0001 + 0.005 * I, 0.0001 + 0.003 * I, 0.001 + 0.001 * I, 0.001 + 0.003 * I, 0.0001 + 0.004 * I, 0.003 + 0.006 * I, 0.0001 + 0.005 * I, 0.0001 + 0.003 * I, 0.001 + 0.001 * I, 0.001 + 0.003 * I, 0.0001 + 0.004 * I, 0.003 + 0.006 * I, 0.0001 + 0.005 * I, 0.0001 + 0.003 * I, 0.001 + 0.001 * I, 0.001 + 0.003 * I, 0.0001 + 0.004 * I, 0.003 + 0.006 * I, 0.0001 + 0.005 * I, 0.0001 + 0.003 * I, 0.001 + 0.001 * I, 0.0001 + 0.004 * I, 0.003 + 0.006 * I, 0.0001 + 0.005 * I, 0.0001 + 0.003 * I, 0.001 + 0.001 * I, 0.001 + 0.003 * I, 0.0001 + 0.004 * I, 0.003 + 0.006 * I, 0.0001 + 0.005 * I, 0.0001 + 0.003 * I, 0.001 + 0.001 * I, 0.001 + 0.003 * I, 0.0001 + 0.004 * I, 0.003 + 0.006 * I, 0.0001 + 0.005 * I, 0.0001 + 0.003 * I, 0.001 + 0.001 * I, 0.001 + 0.003 * I, 0.0001 + 0.004 * I, 0.003 + 0.006 * I, 0.0001 + 0.005 * I, 0.0001 + 0.003 * I, 0.001 + 0.001 * I, 0.001 + 0.003 * I, 0.0001 + 0.004 * I, 0.003 + 0.006 * I, 0.0001 + 0.005 * I, 0.0001 + 0.003 * I, 0.001 + 0.001 * I, 0.0001 + 0.004 * I, 0.003 + 0.006 * I, 0.0001 + 0.005 * I, 0.0001 + 0.003 * I, 0.001 + 0.001 * I, 0.001 + 0.003 * I, 0.0001 + 0.004 * I, 0.003 + 0.006 * I, 0.0001 + 0.005 * I, 0.0001 + 0.003 * I, 0.001 + 0.001 * I, 0.001 + 0.003 * I, 0.0001 + 0.004 * I, 0.003 + 0.006 * I, 0.0001 + 0.005 * I, 0.0001 + 0.003 * I, 0.001 + 0.001 * I, 0.001 + 0.003 * I, 0.0001 + 0.004 * I, 0.003 + 0.006 * I, 0.0001 + 0.005 * I, 0.0001 + 0.003 * I, 0.001 + 0.001 * I, 0.001 + 0.003 * I, 0.0001 + 0.004 * I, 0.003 + 0.006 * I, 0.0001 + 0.005 * I, 0.0001 + 0.003 * I, 0.001 + 0.001 * I, 0.0001 + 0.004 * I, 0.003 + 0.006 * I, 0.0001 + 0.005 * I, 0.0001 + 0.003 * I, 0.001 + 0.001 * I, 0.001 + 0.003 * I, 0.0001 + 0.004 * I, 0.003 + 0.006 * I, 0.0001 + 0.005 * I, 0.0001 + 0.003 * I, 0.001 + 0.001 * I, 0.001 + 0.003 * I, 0.0001 + 0.004 * I, 0.003 + 0.006 * I, 0.0001 + 0.005 * I, 0.0001 + 0.003 * I, 0.001 + 0.001 * I, 0.001 + 0.003 * I, 0.0001 + 0.004 * I, 0.003 + 0.006 * I, 0.0001 + 0.005 * I, 0.0001 + 0.003 * I, 0.001 + 0.001 * I, 0.001 + 0.003 * I, 0.0001 + 0.004 * I, 0.003 + 0.006 * I, 0.0001 + 0.005 * I, 0.0001 + 0.003 * I, 0.001 + 0.001 * I, 0.001 + 0.003 * I, 0.000 + 0.000 * I ]; glob_nxt := glob_nxt + 1; it := x_delta[glob_nxt]; return it; end; #END USER DEF BLOCK #######END OF ECHO OF PROBLEM################# START of Soultion x[1] = 0.1 0.1 h = 0.0001 0.005 y[1] (numeric) = 0 0 y[1] (closed_form) = 0 0 absolute error = 0 relative error = -100 % Correct digits = -16 Radius of convergence (given) for eq 1 = 1.603 Order of pole (given) = 0.5 0 NO POLE (ratio 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.5MB, alloc=40.3MB, time=0.38 x[1] = 0.1001 0.105 h = 0.0001 0.003 y[1] (numeric) = 6.51567162569e-05 0.00473080551035 y[1] (closed_form) = 0 0 absolute error = 0.004731 relative error = -100 % Correct digits = -16 Radius of convergence (given) for eq 1 = 1.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.1002 0.108 h = 0.001 0.001 y[1] (numeric) = 0.000141223704917 0.00756969484558 y[1] (closed_form) = 0 0 absolute error = 0.007571 relative error = -100 % Correct digits = -16 Radius of convergence (given) for eq 1 = 1.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.1012 0.109 h = 0.001 0.003 y[1] (numeric) = 0.00108099076772 0.0085221715888 y[1] (closed_form) = 0 0 absolute error = 0.00859 relative error = -100 % Correct digits = -16 Radius of convergence (given) for eq 1 = 1.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.1022 0.112 h = 0.0001 0.004 y[1] (numeric) = 0.00200796645774 0.0113671425302 y[1] (closed_form) = 0 0 absolute error = 0.01154 relative error = -100 % Correct digits = -16 Radius of convergence (given) for eq 1 = 1.606 Order of pole (given) = 0.5 0 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 0.1023 0.116 h = 0.003 0.006 y[1] (numeric) = 0.00207631395293 0.015152893929 y[1] (closed_form) = 0 0 absolute error = 0.01529 relative error = -100 % Correct digits = -16 Radius of convergence (given) for eq 1 = 1.606 Order of pole (given) = 0.5 0 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 memory used=75.3MB, alloc=52.3MB, time=0.98 x[1] = 0.1053 0.122 h = 0.0001 0.005 y[1] (numeric) = 0.00487445407689 0.0208511934142 y[1] (closed_form) = 0 0 absolute error = 0.02141 relative error = -100 % Correct digits = -16 Radius of convergence (given) for eq 1 = 1.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.1054 0.127 h = 0.0001 0.003 y[1] (numeric) = 0.00493350968131 0.0255846377863 y[1] (closed_form) = 0 0 absolute error = 0.02606 relative error = -100 % Correct digits = -16 Radius of convergence (given) for eq 1 = 1.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.1055 0.13 h = 0.001 0.001 y[1] (numeric) = 0.00500594845899 0.0284251837898 y[1] (closed_form) = 0 0 absolute error = 0.02886 relative error = -100 % Correct digits = -16 Radius of convergence (given) for eq 1 = 1.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.1065 0.131 h = 0.001 0.003 y[1] (numeric) = 0.00594500774023 0.0293794007188 y[1] (closed_form) = 0 0 absolute error = 0.02997 relative error = -100 % Correct digits = -16 Radius of convergence (given) for eq 1 = 1.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 memory used=121.0MB, alloc=52.3MB, time=1.54 x[1] = 0.1075 0.134 h = 0.0001 0.004 y[1] (numeric) = 0.00686883578703 0.032227144447 y[1] (closed_form) = 0 0 absolute error = 0.03295 relative error = -100 % Correct digits = -16 Radius of convergence (given) for eq 1 = 1.613 Order of pole (given) = 0.5 0 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 0.1076 0.138 h = 0.003 0.006 y[1] (numeric) = 0.00693236497285 0.0360151024117 y[1] (closed_form) = 0 0 absolute error = 0.03668 relative error = -100 % Correct digits = -16 Radius of convergence (given) for eq 1 = 1.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.1106 0.144 h = 0.0001 0.005 y[1] (numeric) = 0.00972480218661 0.0417202106426 y[1] (closed_form) = 0 0 absolute error = 0.04284 relative error = -100 % Correct digits = -16 Radius of convergence (given) for eq 1 = 1.617 Order of pole (given) = 0.5 0 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 0.1107 0.149 h = 0.0001 0.003 y[1] (numeric) = 0.00977788789435 0.0464564502374 y[1] (closed_form) = 0 0 absolute error = 0.04747 relative error = -100 % Correct digits = -16 Radius of convergence (given) for eq 1 = 1.618 Order of pole (given) = 0.5 0 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 memory used=166.7MB, alloc=52.3MB, time=2.11 x[1] = 0.1108 0.152 h = 0.001 0.001 y[1] (numeric) = 0.00984677953773 0.0492987449871 y[1] (closed_form) = 0 0 absolute error = 0.05027 relative error = -100 % Correct digits = -16 Radius of convergence (given) for eq 1 = 1.618 Order of pole (given) = 0.5 0 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 0.1118 0.153 h = 0.001 0.003 y[1] (numeric) = 0.0107851885731 0.0502547073921 y[1] (closed_form) = 0 0 absolute error = 0.0514 relative error = -100 % Correct digits = -16 Radius of convergence (given) for eq 1 = 1.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.1128 0.156 h = 0.0001 0.004 y[1] (numeric) = 0.0117059786722 0.0531052917254 y[1] (closed_form) = 0 0 absolute error = 0.05438 relative error = -100 % Correct digits = -16 Radius of convergence (given) for eq 1 = 1.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.1129 0.16 h = 0.003 0.006 y[1] (numeric) = 0.0117647975878 0.056895578126 y[1] (closed_form) = 0 0 absolute error = 0.0581 relative error = -100 % Correct digits = -16 Radius of convergence (given) for eq 1 = 1.621 Order of pole (given) = 0.5 0 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 memory used=212.5MB, alloc=52.3MB, time=2.68 x[1] = 0.1159 0.166 h = 0.0001 0.005 y[1] (numeric) = 0.0145517832457 0.0626076013916 y[1] (closed_form) = 0 0 absolute error = 0.06428 relative error = -100 % Correct digits = -16 Radius of convergence (given) for eq 1 = 1.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.116 0.171 h = 0.0001 0.003 y[1] (numeric) = 0.0145990350173 0.0673467860221 y[1] (closed_form) = 0 0 absolute error = 0.06891 relative error = -100 % Correct digits = -16 Radius of convergence (given) for eq 1 = 1.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.1161 0.174 h = 0.001 0.001 y[1] (numeric) = 0.0146644630168 0.0701909175828 y[1] (closed_form) = 0 0 absolute error = 0.07171 relative error = -100 % Correct digits = -16 Radius of convergence (given) for eq 1 = 1.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.1171 0.175 h = 0.001 0.003 y[1] (numeric) = 0.0156022788678 0.0711486286005 y[1] (closed_form) = 0 0 absolute error = 0.07284 relative error = -100 % Correct digits = -16 Radius of convergence (given) for eq 1 = 1.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 memory used=258.3MB, alloc=52.3MB, time=3.24 x[1] = 0.1181 0.178 h = 0.0001 0.004 y[1] (numeric) = 0.0165201419077 0.0740021165844 y[1] (closed_form) = 0 0 absolute error = 0.07582 relative error = -100 % Correct digits = -16 Radius of convergence (given) for eq 1 = 1.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.1182 0.182 h = 0.003 0.006 y[1] (numeric) = 0.0165743617617 0.0777948479502 y[1] (closed_form) = 0 0 absolute error = 0.07954 relative error = -100 % Correct digits = -16 Radius of convergence (given) for eq 1 = 1.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.1212 0.188 h = 0.0001 0.005 y[1] (numeric) = 0.0193561481392 0.0835138821765 y[1] (closed_form) = 0 0 absolute error = 0.08573 relative error = -100 % Correct digits = -16 Radius of convergence (given) for eq 1 = 1.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.1213 0.193 h = 0.0001 0.003 y[1] (numeric) = 0.0193977057644 0.088256154973 y[1] (closed_form) = 0 0 absolute error = 0.09036 relative error = -100 % Correct digits = -16 Radius of convergence (given) for eq 1 = 1.633 Order of pole (given) = 0.5 0 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 memory used=304.0MB, alloc=52.3MB, time=3.81 x[1] = 0.1214 0.196 h = 0.001 0.001 y[1] (numeric) = 0.0194597558114 0.0911022073491 y[1] (closed_form) = 0 0 absolute error = 0.09316 relative error = -100 % Correct digits = -16 Radius of convergence (given) for eq 1 = 1.633 Order of pole (given) = 0.5 0 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 0.1224 0.197 h = 0.0001 0.004 y[1] (numeric) = 0.020397034977 0.0920616680155 y[1] (closed_form) = 0 0 absolute error = 0.09429 relative error = -100 % Correct digits = -16 Radius of convergence (given) for eq 1 = 1.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 x[1] = 0.1225 0.201 h = 0.003 0.006 y[1] (numeric) = 0.0204473563841 0.0958565401226 y[1] (closed_form) = 0 0 absolute error = 0.09801 relative error = -100 % Correct digits = -16 Radius of convergence (given) for eq 1 = 1.635 Order of pole (given) = 0.5 0 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 0.1255 0.207 h = 0.0001 0.005 y[1] (numeric) = 0.0232247848877 0.101581620299 y[1] (closed_form) = 0 0 absolute error = 0.1042 relative error = -100 % Correct digits = -16 Radius of convergence (given) for eq 1 = 1.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.1256 0.212 h = 0.0001 0.003 y[1] (numeric) = 0.0232615168058 0.106326595249 y[1] (closed_form) = 0 0 absolute error = 0.1088 relative error = -100 % Correct digits = -16 Radius of convergence (given) for eq 1 = 1.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=349.7MB, alloc=52.3MB, time=4.37 x[1] = 0.1257 0.215 h = 0.001 0.001 y[1] (numeric) = 0.0233207052017 0.109174326328 y[1] (closed_form) = 0 0 absolute error = 0.1116 relative error = -100 % Correct digits = -16 Radius of convergence (given) for eq 1 = 1.64 Order of pole (given) = 0.5 0 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 0.1267 0.216 h = 0.001 0.003 y[1] (numeric) = 0.0242575463375 0.110135286812 y[1] (closed_form) = 0 0 absolute error = 0.1128 relative error = -100 % Correct digits = -16 Radius of convergence (given) for eq 1 = 1.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.1277 0.219 h = 0.0001 0.004 y[1] (numeric) = 0.0251702249374 0.112994297635 y[1] (closed_form) = 0 0 absolute error = 0.1158 relative error = -100 % Correct digits = -16 Radius of convergence (given) for eq 1 = 1.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.1278 0.223 h = 0.003 0.006 y[1] (numeric) = 0.0252161605292 0.116791818599 y[1] (closed_form) = 0 0 absolute error = 0.1195 relative error = -100 % Correct digits = -16 Radius of convergence (given) for eq 1 = 1.643 Order of pole (given) = 0.5 0 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 memory used=395.6MB, alloc=52.3MB, time=4.94 x[1] = 0.1308 0.229 h = 0.0001 0.005 y[1] (numeric) = 0.0279888591733 0.122524064067 y[1] (closed_form) = 0 0 absolute error = 0.1257 relative error = -100 % Correct digits = -16 Radius of convergence (given) for eq 1 = 1.647 Order of pole (given) = 0.5 0 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 0.1309 0.234 h = 0.0001 0.003 y[1] (numeric) = 0.0280201645376 0.127272377266 y[1] (closed_form) = 0 0 absolute error = 0.1303 relative error = -100 % Correct digits = -16 Radius of convergence (given) for eq 1 = 1.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.131 0.237 h = 0.001 0.001 y[1] (numeric) = 0.0280761386821 0.130122175626 y[1] (closed_form) = 0 0 absolute error = 0.1331 relative error = -100 % Correct digits = -16 Radius of convergence (given) for eq 1 = 1.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.132 0.238 h = 0.001 0.003 y[1] (numeric) = 0.0290125465279 0.131084882944 y[1] (closed_form) = 0 0 absolute error = 0.1343 relative error = -100 % Correct digits = -16 Radius of convergence (given) for eq 1 = 1.649 Order of pole (given) = 0.5 0 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 memory used=441.4MB, alloc=52.3MB, time=5.51 x[1] = 0.133 0.241 h = 0.0001 0.004 y[1] (numeric) = 0.0299226192995 0.133946952975 y[1] (closed_form) = 0 0 absolute error = 0.1372 relative error = -100 % Correct digits = -16 Radius of convergence (given) for eq 1 = 1.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.1331 0.245 h = 0.003 0.006 y[1] (numeric) = 0.0299642877841 0.137747223728 y[1] (closed_form) = 0 0 absolute error = 0.141 relative error = -100 % Correct digits = -16 Radius of convergence (given) for eq 1 = 1.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.1361 0.251 h = 0.0001 0.005 y[1] (numeric) = 0.0327325090514 0.143486701465 y[1] (closed_form) = 0 0 absolute error = 0.1472 relative error = -100 % Correct digits = -16 Radius of convergence (given) for eq 1 = 1.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 x[1] = 0.1362 0.256 h = 0.0001 0.003 y[1] (numeric) = 0.0327585367591 0.148238476648 y[1] (closed_form) = 0 0 absolute error = 0.1518 relative error = -100 % Correct digits = -16 Radius of convergence (given) for eq 1 = 1.656 Order of pole (given) = 0.5 0 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 memory used=487.2MB, alloc=52.3MB, time=6.08 x[1] = 0.1363 0.259 h = 0.001 0.001 y[1] (numeric) = 0.0328113875286 0.151090414537 y[1] (closed_form) = 0 0 absolute error = 0.1546 relative error = -100 % Correct digits = -16 Radius of convergence (given) for eq 1 = 1.657 Order of pole (given) = 0.5 0 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 0.1373 0.26 h = 0.001 0.003 y[1] (numeric) = 0.0337474165505 0.152054864029 y[1] (closed_form) = 0 0 absolute error = 0.1558 relative error = -100 % Correct digits = -16 Radius of convergence (given) for eq 1 = 1.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.1383 0.263 h = 0.0001 0.004 y[1] (numeric) = 0.0346549969491 0.154920038158 y[1] (closed_form) = 0 0 absolute error = 0.1587 relative error = -100 % Correct digits = -16 Radius of convergence (given) for eq 1 = 1.659 Order of pole (given) = 0.5 0 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 0.1384 0.267 h = 0.003 0.006 y[1] (numeric) = 0.0346925192076 0.158723154207 y[1] (closed_form) = 0 0 absolute error = 0.1625 relative error = -100 % Correct digits = -16 Radius of convergence (given) for eq 1 = 1.66 Order of pole (given) = 0.5 0 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 memory used=532.9MB, alloc=52.3MB, time=6.64 x[1] = 0.1414 0.273 h = 0.0001 0.005 y[1] (numeric) = 0.0374565147689 0.164469921383 y[1] (closed_form) = 0 0 absolute error = 0.1687 relative error = -100 % Correct digits = -16 Radius of convergence (given) for eq 1 = 1.664 Order of pole (given) = 0.5 0 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 0.1415 0.278 h = 0.0001 0.003 y[1] (numeric) = 0.037477416211 0.169225275442 y[1] (closed_form) = 0 0 absolute error = 0.1733 relative error = -100 % Correct digits = -16 Radius of convergence (given) for eq 1 = 1.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.1416 0.281 h = 0.001 0.001 y[1] (numeric) = 0.0375272358802 0.172079420974 y[1] (closed_form) = 0 0 absolute error = 0.1761 relative error = -100 % Correct digits = -16 Radius of convergence (given) for eq 1 = 1.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.1426 0.282 h = 0.001 0.003 y[1] (numeric) = 0.0384629396833 0.173045606112 y[1] (closed_form) = 0 0 absolute error = 0.1773 relative error = -100 % Correct digits = -16 Radius of convergence (given) for eq 1 = 1.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=578.7MB, alloc=52.3MB, time=7.21 x[1] = 0.1436 0.285 h = 0.0001 0.004 y[1] (numeric) = 0.0393681413004 0.175913924646 y[1] (closed_form) = 0 0 absolute error = 0.1803 relative error = -100 % Correct digits = -16 Radius of convergence (given) for eq 1 = 1.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 x[1] = 0.1437 0.289 h = 0.003 0.006 y[1] (numeric) = 0.0394016400369 0.179719976006 y[1] (closed_form) = 0 0 absolute error = 0.184 relative error = -100 % Correct digits = -16 Radius of convergence (given) for eq 1 = 1.669 Order of pole (given) = 0.5 0 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 0.1467 0.295 h = 0.0001 0.005 y[1] (numeric) = 0.0421616603427 0.185474080176 y[1] (closed_form) = 0 0 absolute error = 0.1902 relative error = -100 % Correct digits = -16 Radius of convergence (given) for eq 1 = 1.673 Order of pole (given) = 0.5 0 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 0.1468 0.3 h = 0.0001 0.003 y[1] (numeric) = 0.0421775890704 0.190233123162 y[1] (closed_form) = 0 0 absolute error = 0.1949 relative error = -100 % Correct digits = -16 Radius of convergence (given) for eq 1 = 1.674 Order of pole (given) = 0.5 0 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 0.1469 0.303 h = 0.001 0.001 y[1] (numeric) = 0.0422244711124 0.193089540322 y[1] (closed_form) = 0 0 absolute error = 0.1977 relative error = -100 % Correct digits = -16 Radius of convergence (given) for eq 1 = 1.675 Order of pole (given) = 0.5 0 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 memory used=624.4MB, alloc=52.3MB, time=7.77 x[1] = 0.1479 0.304 h = 0.0001 0.004 y[1] (numeric) = 0.0431599023752 0.19405745278 y[1] (closed_form) = 0 0 absolute error = 0.1988 relative error = -100 % Correct digits = -16 Radius of convergence (given) for eq 1 = 1.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.148 0.308 h = 0.003 0.006 y[1] (numeric) = 0.0431900008461 0.197866052699 y[1] (closed_form) = 0 0 absolute error = 0.2025 relative error = -100 % Correct digits = -16 Radius of convergence (given) for eq 1 = 1.677 Order of pole (given) = 0.5 0 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 0.151 0.314 h = 0.0001 0.005 y[1] (numeric) = 0.0459467107249 0.203626459878 y[1] (closed_form) = 0 0 absolute error = 0.2087 relative error = -100 % Correct digits = -16 Radius of convergence (given) for eq 1 = 1.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 x[1] = 0.1511 0.319 h = 0.0001 0.003 y[1] (numeric) = 0.0459584378744 0.208388704376 y[1] (closed_form) = 0 0 absolute error = 0.2134 relative error = -100 % Correct digits = -16 Radius of convergence (given) for eq 1 = 1.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 memory used=670.2MB, alloc=52.3MB, time=8.34 x[1] = 0.1512 0.322 h = 0.001 0.001 y[1] (numeric) = 0.0460028389062 0.211247091515 y[1] (closed_form) = 0 0 absolute error = 0.2162 relative error = -100 % Correct digits = -16 Radius of convergence (given) for eq 1 = 1.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.1522 0.323 h = 0.001 0.003 y[1] (numeric) = 0.0469380565976 0.212216480392 y[1] (closed_form) = 0 0 absolute error = 0.2173 relative error = -100 % Correct digits = -16 Radius of convergence (given) for eq 1 = 1.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.1532 0.326 h = 0.0001 0.004 y[1] (numeric) = 0.0478390954509 0.215090716651 y[1] (closed_form) = 0 0 absolute error = 0.2203 relative error = -100 % Correct digits = -16 Radius of convergence (given) for eq 1 = 1.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.1533 0.33 h = 0.003 0.006 y[1] (numeric) = 0.047865401842 0.218902406357 y[1] (closed_form) = 0 0 absolute error = 0.2241 relative error = -100 % Correct digits = -16 Radius of convergence (given) for eq 1 = 1.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 memory used=716.1MB, alloc=52.3MB, time=8.91 x[1] = 0.1563 0.336 h = 0.0001 0.005 y[1] (numeric) = 0.0506185976192 0.22467021709 y[1] (closed_form) = 0 0 absolute error = 0.2303 relative error = -100 % Correct digits = -16 Radius of convergence (given) for eq 1 = 1.69 Order of pole (given) = 0.5 0 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 0.1564 0.341 h = 0.0001 0.003 y[1] (numeric) = 0.0506256412932 0.229436339052 y[1] (closed_form) = 0 0 absolute error = 0.235 relative error = -100 % Correct digits = -16 Radius of convergence (given) for eq 1 = 1.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.1565 0.344 h = 0.001 0.001 y[1] (numeric) = 0.0506672805064 0.232297107094 y[1] (closed_form) = 0 0 absolute error = 0.2378 relative error = -100 % Correct digits = -16 Radius of convergence (given) for eq 1 = 1.692 Order of pole (given) = 0.5 0 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 0.1575 0.345 h = 0.001 0.003 y[1] (numeric) = 0.0516023211544 0.233268203846 y[1] (closed_form) = 0 0 absolute error = 0.2389 relative error = -100 % Correct digits = -16 Radius of convergence (given) for eq 1 = 1.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 memory used=762.0MB, alloc=52.3MB, time=9.48 x[1] = 0.1585 0.348 h = 0.0001 0.004 y[1] (numeric) = 0.0525013048902 0.2361456765 y[1] (closed_form) = 0 0 absolute error = 0.2419 relative error = -100 % Correct digits = -16 Radius of convergence (given) for eq 1 = 1.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.1586 0.352 h = 0.003 0.006 y[1] (numeric) = 0.0525239456621 0.239960530372 y[1] (closed_form) = 0 0 absolute error = 0.2456 relative error = -100 % Correct digits = -16 Radius of convergence (given) for eq 1 = 1.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.1616 0.358 h = 0.0001 0.005 y[1] (numeric) = 0.0552738723132 0.245735765891 y[1] (closed_form) = 0 0 absolute error = 0.2519 relative error = -100 % Correct digits = -16 Radius of convergence (given) for eq 1 = 1.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.1617 0.363 h = 0.0001 0.003 y[1] (numeric) = 0.0552763905455 0.250505855987 y[1] (closed_form) = 0 0 absolute error = 0.2565 relative error = -100 % Correct digits = -16 Radius of convergence (given) for eq 1 = 1.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=807.7MB, alloc=52.3MB, time=10.04 x[1] = 0.1618 0.366 h = 0.001 0.001 y[1] (numeric) = 0.0553153638277 0.253369057241 y[1] (closed_form) = 0 0 absolute error = 0.2593 relative error = -100 % Correct digits = -16 Radius of convergence (given) for eq 1 = 1.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.1628 0.367 h = 0.001 0.003 y[1] (numeric) = 0.0562502771578 0.25434184877 y[1] (closed_form) = 0 0 absolute error = 0.2605 relative error = -100 % Correct digits = -16 Radius of convergence (given) for eq 1 = 1.703 Order of pole (given) = 0.5 0 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 0.1638 0.37 h = 0.0001 0.004 y[1] (numeric) = 0.0571473181522 0.257222581142 y[1] (closed_form) = 0 0 absolute error = 0.2635 relative error = -100 % Correct digits = -16 Radius of convergence (given) for eq 1 = 1.704 Order of pole (given) = 0.5 0 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 0.1639 0.374 h = 0.003 0.006 y[1] (numeric) = 0.0571664206879 0.261040668228 y[1] (closed_form) = 0 0 absolute error = 0.2672 relative error = -100 % Correct digits = -16 Radius of convergence (given) for eq 1 = 1.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 memory used=853.4MB, alloc=52.3MB, time=10.61 x[1] = 0.1669 0.38 h = 0.0001 0.005 y[1] (numeric) = 0.0599133205636 0.266823341039 y[1] (closed_form) = 0 0 absolute error = 0.2735 relative error = -100 % Correct digits = -16 Radius of convergence (given) for eq 1 = 1.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.167 0.385 h = 0.0001 0.003 y[1] (numeric) = 0.0599114723314 0.271597483261 y[1] (closed_form) = 0 0 absolute error = 0.2781 relative error = -100 % Correct digits = -16 Radius of convergence (given) for eq 1 = 1.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.1671 0.388 h = 0.001 0.001 y[1] (numeric) = 0.0599478760429 0.274463166024 y[1] (closed_form) = 0 0 absolute error = 0.2809 relative error = -100 % Correct digits = -16 Radius of convergence (given) for eq 1 = 1.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.1681 0.389 h = 0.001 0.003 y[1] (numeric) = 0.0608827106437 0.275437637706 y[1] (closed_form) = 0 0 absolute error = 0.2821 relative error = -100 % Correct digits = -16 Radius of convergence (given) for eq 1 = 1.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.1691 0.392 h = 0.0001 0.004 y[1] (numeric) = 0.0617779205178 0.278321648947 y[1] (closed_form) = 0 0 absolute error = 0.2851 relative error = -100 % Correct digits = -16 Radius of convergence (given) for eq 1 = 1.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 memory used=899.2MB, alloc=52.3MB, time=11.17 x[1] = 0.1692 0.396 h = 0.003 0.006 y[1] (numeric) = 0.0617936127995 0.282143032976 y[1] (closed_form) = 0 0 absolute error = 0.2888 relative error = -100 % Correct digits = -16 Radius of convergence (given) for eq 1 = 1.716 Order of pole (given) = 0.5 0 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 0.1722 0.402 h = 0.0001 0.005 y[1] (numeric) = 0.0645377253099 0.287933147116 y[1] (closed_form) = 0 0 absolute error = 0.2951 relative error = -100 % Correct digits = -16 Radius of convergence (given) for eq 1 = 1.72 Order of pole (given) = 0.5 0 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 0.1723 0.407 h = 0.0001 0.003 y[1] (numeric) = 0.0645316702415 0.292711418862 y[1] (closed_form) = 0 0 absolute error = 0.2997 relative error = -100 % Correct digits = -16 Radius of convergence (given) for eq 1 = 1.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.1724 0.41 h = 0.001 0.001 y[1] (numeric) = 0.0645656010407 0.295579627468 y[1] (closed_form) = 0 0 absolute error = 0.3025 relative error = -100 % Correct digits = -16 Radius of convergence (given) for eq 1 = 1.722 Order of pole (given) = 0.5 0 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 memory used=945.1MB, alloc=52.3MB, time=11.74 x[1] = 0.1734 0.411 h = 0.0001 0.004 y[1] (numeric) = 0.065500404321 0.29655576323 y[1] (closed_form) = 0 0 absolute error = 0.3037 relative error = -100 % Correct digits = -16 Radius of convergence (given) for eq 1 = 1.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.1735 0.415 h = 0.003 0.006 y[1] (numeric) = 0.0655132236487 0.300379993611 y[1] (closed_form) = 0 0 absolute error = 0.3074 relative error = -100 % Correct digits = -16 Radius of convergence (given) for eq 1 = 1.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.1765 0.421 h = 0.0001 0.005 y[1] (numeric) = 0.0682550375827 0.306176480589 y[1] (closed_form) = 0 0 absolute error = 0.3137 relative error = -100 % Correct digits = -16 Radius of convergence (given) for eq 1 = 1.729 Order of pole (given) = 0.5 0 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 0.1766 0.426 h = 0.0001 0.003 y[1] (numeric) = 0.0682454391999 0.310958316379 y[1] (closed_form) = 0 0 absolute error = 0.3184 relative error = -100 % Correct digits = -16 Radius of convergence (given) for eq 1 = 1.73 Order of pole (given) = 0.5 0 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 memory used=991.1MB, alloc=52.3MB, time=12.31 x[1] = 0.1767 0.429 h = 0.001 0.001 y[1] (numeric) = 0.0682772881701 0.313828703779 y[1] (closed_form) = 0 0 absolute error = 0.3212 relative error = -100 % Correct digits = -16 Radius of convergence (given) for eq 1 = 1.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.1777 0.43 h = 0.001 0.003 y[1] (numeric) = 0.0692120819891 0.314806258375 y[1] (closed_form) = 0 0 absolute error = 0.3223 relative error = -100 % Correct digits = -16 Radius of convergence (given) for eq 1 = 1.732 Order of pole (given) = 0.5 0 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 0.1787 0.433 h = 0.0001 0.004 y[1] (numeric) = 0.0701041390109 0.317696389218 y[1] (closed_form) = 0 0 absolute error = 0.3253 relative error = -100 % Correct digits = -16 Radius of convergence (given) for eq 1 = 1.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 x[1] = 0.1788 0.437 h = 0.003 0.006 y[1] (numeric) = 0.0701137865168 0.321524022771 y[1] (closed_form) = 0 0 absolute error = 0.3291 relative error = -100 % Correct digits = -16 Radius of convergence (given) for eq 1 = 1.735 Order of pole (given) = 0.5 0 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 memory used=1037.0MB, alloc=52.3MB, time=12.88 x[1] = 0.1818 0.443 h = 0.0001 0.005 y[1] (numeric) = 0.0728532499222 0.327327939758 y[1] (closed_form) = 0 0 absolute error = 0.3353 relative error = -100 % Correct digits = -16 Radius of convergence (given) for eq 1 = 1.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.1819 0.448 h = 0.0001 0.003 y[1] (numeric) = 0.0728397417653 0.332114033756 y[1] (closed_form) = 0 0 absolute error = 0.34 relative error = -100 % Correct digits = -16 Radius of convergence (given) for eq 1 = 1.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.182 0.451 h = 0.001 0.001 y[1] (numeric) = 0.0728692974861 0.33498702031 y[1] (closed_form) = 0 0 absolute error = 0.3428 relative error = -100 % Correct digits = -16 Radius of convergence (given) for eq 1 = 1.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.183 0.452 h = 0.001 0.003 y[1] (numeric) = 0.0738041451628 0.335966206002 y[1] (closed_form) = 0 0 absolute error = 0.344 relative error = -100 % Correct digits = -16 Radius of convergence (given) for eq 1 = 1.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 memory used=1082.9MB, alloc=52.3MB, time=13.45 x[1] = 0.184 0.455 h = 0.0001 0.004 y[1] (numeric) = 0.0746946847619 0.338859649691 y[1] (closed_form) = 0 0 absolute error = 0.347 relative error = -100 % Correct digits = -16 Radius of convergence (given) for eq 1 = 1.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 x[1] = 0.1841 0.459 h = 0.003 0.006 y[1] (numeric) = 0.0747012888775 0.342690735318 y[1] (closed_form) = 0 0 absolute error = 0.3507 relative error = -100 % Correct digits = -16 Radius of convergence (given) for eq 1 = 1.746 Order of pole (given) = 0.5 0 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 0.1871 0.465 h = 0.0001 0.005 y[1] (numeric) = 0.0774386312735 0.348502063619 y[1] (closed_form) = 0 0 absolute error = 0.357 relative error = -100 % Correct digits = -16 Radius of convergence (given) for eq 1 = 1.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 x[1] = 0.1872 0.47 h = 0.0001 0.003 y[1] (numeric) = 0.0774213733838 0.353292474885 y[1] (closed_form) = 0 0 absolute error = 0.3617 relative error = -100 % Correct digits = -16 Radius of convergence (given) for eq 1 = 1.751 Order of pole (given) = 0.5 0 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 memory used=1128.8MB, alloc=52.3MB, time=14.02 x[1] = 0.1873 0.473 h = 0.001 0.001 y[1] (numeric) = 0.0774487325074 0.35616809394 y[1] (closed_form) = 0 0 absolute error = 0.3645 relative error = -100 % Correct digits = -16 Radius of convergence (given) for eq 1 = 1.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.1883 0.474 h = 0.001 0.003 y[1] (numeric) = 0.0783836778942 0.357148890903 y[1] (closed_form) = 0 0 absolute error = 0.3656 relative error = -100 % Correct digits = -16 Radius of convergence (given) for eq 1 = 1.754 Order of pole (given) = 0.5 0 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 0.1893 0.477 h = 0.0001 0.004 y[1] (numeric) = 0.079272807408 0.360045651486 y[1] (closed_form) = 0 0 absolute error = 0.3687 relative error = -100 % Correct digits = -16 Radius of convergence (given) for eq 1 = 1.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.1894 0.481 h = 0.003 0.006 y[1] (numeric) = 0.0792764964094 0.363880233112 y[1] (closed_form) = 0 0 absolute error = 0.3724 relative error = -100 % Correct digits = -16 Radius of convergence (given) for eq 1 = 1.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.1924 0.487 h = 0.0001 0.005 y[1] (numeric) = 0.0820119433365 0.369698946653 y[1] (closed_form) = 0 0 absolute error = 0.3787 relative error = -100 % Correct digits = -16 Radius of convergence (given) for eq 1 = 1.761 Order of pole (given) = 0.5 0 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 memory used=1174.5MB, alloc=52.3MB, time=14.58 x[1] = 0.1925 0.492 h = 0.0001 0.003 y[1] (numeric) = 0.0819910953739 0.374493728061 y[1] (closed_form) = 0 0 absolute error = 0.3834 relative error = -100 % Correct digits = -16 Radius of convergence (given) for eq 1 = 1.763 Order of pole (given) = 0.5 0 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 0.1926 0.495 h = 0.001 0.001 y[1] (numeric) = 0.0820163542392 0.377372009264 y[1] (closed_form) = 0 0 absolute error = 0.3862 relative error = -100 % Correct digits = -16 Radius of convergence (given) for eq 1 = 1.763 Order of pole (given) = 0.5 0 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 0.1936 0.496 h = 0.001 0.003 y[1] (numeric) = 0.0829514398844 0.378354396507 y[1] (closed_form) = 0 0 absolute error = 0.3873 relative error = -100 % Correct digits = -16 Radius of convergence (given) for eq 1 = 1.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.1946 0.499 h = 0.0001 0.004 y[1] (numeric) = 0.0838392652034 0.381254474411 y[1] (closed_form) = 0 0 absolute error = 0.3904 relative error = -100 % Correct digits = -16 Radius of convergence (given) for eq 1 = 1.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 memory used=1220.5MB, alloc=52.3MB, time=15.15 x[1] = 0.1947 0.503 h = 0.003 0.006 y[1] (numeric) = 0.0838401669295 0.385092591064 y[1] (closed_form) = 0 0 absolute error = 0.3941 relative error = -100 % Correct digits = -16 Radius of convergence (given) for eq 1 = 1.768 Order of pole (given) = 0.5 0 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 0.1977 0.509 h = 0.0001 0.005 y[1] (numeric) = 0.0865739397292 0.39091865669 y[1] (closed_form) = 0 0 absolute error = 0.4004 relative error = -100 % Correct digits = -16 Radius of convergence (given) for eq 1 = 1.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.1978 0.514 h = 0.0001 0.003 y[1] (numeric) = 0.0865496607333 0.395717855056 y[1] (closed_form) = 0 0 absolute error = 0.4051 relative error = -100 % Correct digits = -16 Radius of convergence (given) for eq 1 = 1.774 Order of pole (given) = 0.5 0 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 0.1979 0.517 h = 0.001 0.001 y[1] (numeric) = 0.0865729152244 0.398598824435 y[1] (closed_form) = 0 0 absolute error = 0.4079 relative error = -100 % Correct digits = -16 Radius of convergence (given) for eq 1 = 1.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 memory used=1266.4MB, alloc=52.3MB, time=15.72 x[1] = 0.1989 0.518 h = 0.0001 0.004 y[1] (numeric) = 0.0875081823507 0.399582779877 y[1] (closed_form) = 0 0 absolute error = 0.4091 relative error = -100 % Correct digits = -16 Radius of convergence (given) for eq 1 = 1.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.199 0.522 h = 0.003 0.006 y[1] (numeric) = 0.0875067440479 0.403423935805 y[1] (closed_form) = 0 0 absolute error = 0.4128 relative error = -100 % Correct digits = -16 Radius of convergence (given) for eq 1 = 1.777 Order of pole (given) = 0.5 0 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 0.202 0.528 h = 0.0001 0.005 y[1] (numeric) = 0.0902391627889 0.409256281691 y[1] (closed_form) = 0 0 absolute error = 0.4191 relative error = -100 % Correct digits = -16 Radius of convergence (given) for eq 1 = 1.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.2021 0.533 h = 0.0001 0.003 y[1] (numeric) = 0.0902120039231 0.414059276685 y[1] (closed_form) = 0 0 absolute error = 0.4238 relative error = -100 % Correct digits = -16 Radius of convergence (given) for eq 1 = 1.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=1312.2MB, alloc=52.3MB, time=16.28 x[1] = 0.2022 0.536 h = 0.001 0.001 y[1] (numeric) = 0.090233577073 0.416942555765 y[1] (closed_form) = 0 0 absolute error = 0.4266 relative error = -100 % Correct digits = -16 Radius of convergence (given) for eq 1 = 1.785 Order of pole (given) = 0.5 0 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 0.2032 0.537 h = 0.001 0.003 y[1] (numeric) = 0.0911690140931 0.417927845408 y[1] (closed_form) = 0 0 absolute error = 0.4278 relative error = -100 % Correct digits = -16 Radius of convergence (given) for eq 1 = 1.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.2042 0.54 h = 0.0001 0.004 y[1] (numeric) = 0.0920546496388 0.420834072702 y[1] (closed_form) = 0 0 absolute error = 0.4308 relative error = -100 % Correct digits = -16 Radius of convergence (given) for eq 1 = 1.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.2043 0.544 h = 0.003 0.006 y[1] (numeric) = 0.0920506598954 0.424678825129 y[1] (closed_form) = 0 0 absolute error = 0.4345 relative error = -100 % Correct digits = -16 Radius of convergence (given) for eq 1 = 1.789 Order of pole (given) = 0.5 0 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 memory used=1358.2MB, alloc=52.3MB, time=16.85 x[1] = 0.2073 0.55 h = 0.0001 0.005 y[1] (numeric) = 0.094781805102 0.430518446103 y[1] (closed_form) = 0 0 absolute error = 0.4408 relative error = -100 % Correct digits = -16 Radius of convergence (given) for eq 1 = 1.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.2074 0.555 h = 0.0001 0.003 y[1] (numeric) = 0.0947515083216 0.435325931397 y[1] (closed_form) = 0 0 absolute error = 0.4455 relative error = -100 % Correct digits = -16 Radius of convergence (given) for eq 1 = 1.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.2075 0.558 h = 0.001 0.001 y[1] (numeric) = 0.0947712536381 0.438211938877 y[1] (closed_form) = 0 0 absolute error = 0.4483 relative error = -100 % Correct digits = -16 Radius of convergence (given) for eq 1 = 1.796 Order of pole (given) = 0.5 0 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 0.2085 0.559 h = 0.001 0.003 y[1] (numeric) = 0.0957069455487 0.439198753437 y[1] (closed_form) = 0 0 absolute error = 0.4495 relative error = -100 % Correct digits = -16 Radius of convergence (given) for eq 1 = 1.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.2095 0.562 h = 0.0001 0.004 y[1] (numeric) = 0.0965915709576 0.44210828161 y[1] (closed_form) = 0 0 absolute error = 0.4525 relative error = -100 % Correct digits = -16 memory used=1404.2MB, alloc=52.3MB, time=17.42 Radius of convergence (given) for eq 1 = 1.8 Order of pole (given) = 0.5 0 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 0.2096 0.566 h = 0.003 0.006 y[1] (numeric) = 0.0965851553393 0.445956656155 y[1] (closed_form) = 0 0 absolute error = 0.4563 relative error = -100 % Correct digits = -16 Radius of convergence (given) for eq 1 = 1.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.2126 0.572 h = 0.0001 0.005 y[1] (numeric) = 0.0993152353648 0.451803500415 y[1] (closed_form) = 0 0 absolute error = 0.4626 relative error = -100 % Correct digits = -16 Radius of convergence (given) for eq 1 = 1.806 Order of pole (given) = 0.5 0 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 0.2127 0.577 h = 0.0001 0.003 y[1] (numeric) = 0.0992819567836 0.456615506275 y[1] (closed_form) = 0 0 absolute error = 0.4673 relative error = -100 % Correct digits = -16 Radius of convergence (given) for eq 1 = 1.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.2128 0.58 h = 0.001 0.001 y[1] (numeric) = 0.0992999681729 0.459504258312 y[1] (closed_form) = 0 0 absolute error = 0.4701 relative error = -100 % Correct digits = -16 Radius of convergence (given) for eq 1 = 1.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 memory used=1450.2MB, alloc=52.3MB, time=17.98 x[1] = 0.2138 0.581 h = 0.001 0.003 y[1] (numeric) = 0.100235952329 0.460492572975 y[1] (closed_form) = 0 0 absolute error = 0.4713 relative error = -100 % Correct digits = -16 Radius of convergence (given) for eq 1 = 1.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.2148 0.584 h = 0.0001 0.004 y[1] (numeric) = 0.101119666924 0.463405389656 y[1] (closed_form) = 0 0 absolute error = 0.4743 relative error = -100 % Correct digits = -16 Radius of convergence (given) for eq 1 = 1.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 x[1] = 0.2149 0.588 h = 0.003 0.006 y[1] (numeric) = 0.101110949974 0.467257407498 y[1] (closed_form) = 0 0 absolute error = 0.4781 relative error = -100 % Correct digits = -16 Radius of convergence (given) for eq 1 = 1.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.2179 0.594 h = 0.0001 0.005 y[1] (numeric) = 0.103840168294 0.473111417328 y[1] (closed_form) = 0 0 absolute error = 0.4844 relative error = -100 % Correct digits = -16 Radius of convergence (given) for eq 1 = 1.818 Order of pole (given) = 0.5 0 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 memory used=1496.2MB, alloc=52.3MB, time=18.56 x[1] = 0.218 0.599 h = 0.0001 0.003 y[1] (numeric) = 0.103804062589 0.477927968537 y[1] (closed_form) = 0 0 absolute error = 0.4891 relative error = -100 % Correct digits = -16 Radius of convergence (given) for eq 1 = 1.819 Order of pole (given) = 0.5 0 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 0.2181 0.602 h = 0.001 0.001 y[1] (numeric) = 0.103820433023 0.480819478025 y[1] (closed_form) = 0 0 absolute error = 0.4919 relative error = -100 % Correct digits = -16 Radius of convergence (given) for eq 1 = 1.821 Order of pole (given) = 0.5 0 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 0.2191 0.603 h = 0.001 0.003 y[1] (numeric) = 0.104756745406 0.481809267166 y[1] (closed_form) = 0 0 absolute error = 0.4931 relative error = -100 % Correct digits = -16 Radius of convergence (given) for eq 1 = 1.822 Order of pole (given) = 0.5 0 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 0.2201 0.606 h = 0.0001 0.004 y[1] (numeric) = 0.105639646574 0.48472535699 y[1] (closed_form) = 0 0 absolute error = 0.4961 relative error = -100 % Correct digits = -16 Radius of convergence (given) for eq 1 = 1.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 memory used=1542.0MB, alloc=52.3MB, time=19.12 x[1] = 0.2202 0.61 h = 0.003 0.006 y[1] (numeric) = 0.10562875158 0.488581034994 y[1] (closed_form) = 0 0 absolute error = 0.4999 relative error = -100 % Correct digits = -16 Radius of convergence (given) for eq 1 = 1.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 x[1] = 0.2232 0.616 h = 0.0001 0.005 y[1] (numeric) = 0.108357306661 0.494442147067 y[1] (closed_form) = 0 0 absolute error = 0.5062 relative error = -100 % Correct digits = -16 Radius of convergence (given) for eq 1 = 1.83 Order of pole (given) = 0.5 0 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 0.2233 0.621 h = 0.0001 0.003 y[1] (numeric) = 0.108318526894 0.499263263087 y[1] (closed_form) = 0 0 absolute error = 0.5109 relative error = -100 % Correct digits = -16 Radius of convergence (given) for eq 1 = 1.832 Order of pole (given) = 0.5 0 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 0.2234 0.624 h = 0.001 0.001 y[1] (numeric) = 0.108333348304 0.502157539757 y[1] (closed_form) = 0 0 absolute error = 0.5137 relative error = -100 % Correct digits = -16 Radius of convergence (given) for eq 1 = 1.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 memory used=1588.0MB, alloc=52.3MB, time=19.69 x[1] = 0.2244 0.625 h = 0.0001 0.004 y[1] (numeric) = 0.109270023515 0.503148777004 y[1] (closed_form) = 0 0 absolute error = 0.5149 relative error = -100 % Correct digits = -16 Radius of convergence (given) for eq 1 = 1.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.2245 0.629 h = 0.003 0.006 y[1] (numeric) = 0.10925730753 0.507007591895 y[1] (closed_form) = 0 0 absolute error = 0.5186 relative error = -100 % Correct digits = -16 Radius of convergence (given) for eq 1 = 1.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.2275 0.635 h = 0.0001 0.005 y[1] (numeric) = 0.111985363257 0.512874757793 y[1] (closed_form) = 0 0 absolute error = 0.525 relative error = -100 % Correct digits = -16 Radius of convergence (given) for eq 1 = 1.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.2276 0.64 h = 0.0001 0.003 y[1] (numeric) = 0.111944348355 0.517699785287 y[1] (closed_form) = 0 0 absolute error = 0.5297 relative error = -100 % Correct digits = -16 Radius of convergence (given) for eq 1 = 1.842 Order of pole (given) = 0.5 0 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 memory used=1633.9MB, alloc=52.3MB, time=20.26 x[1] = 0.2277 0.643 h = 0.001 0.001 y[1] (numeric) = 0.111957876101 0.520596432324 y[1] (closed_form) = 0 0 absolute error = 0.5325 relative error = -100 % Correct digits = -16 Radius of convergence (given) for eq 1 = 1.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.2287 0.644 h = 0.001 0.003 y[1] (numeric) = 0.112894873468 0.521588899273 y[1] (closed_form) = 0 0 absolute error = 0.5337 relative error = -100 % Correct digits = -16 Radius of convergence (given) for eq 1 = 1.845 Order of pole (given) = 0.5 0 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 0.2297 0.647 h = 0.0001 0.004 y[1] (numeric) = 0.11377647487 0.524511022018 y[1] (closed_form) = 0 0 absolute error = 0.5367 relative error = -100 % Correct digits = -16 Radius of convergence (given) for eq 1 = 1.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.2298 0.651 h = 0.003 0.006 y[1] (numeric) = 0.113761806434 0.528373518847 y[1] (closed_form) = 0 0 absolute error = 0.5405 relative error = -100 % Correct digits = -16 Radius of convergence (given) for eq 1 = 1.848 Order of pole (given) = 0.5 0 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 0.2328 0.657 h = 0.0001 0.005 y[1] (numeric) = 0.116489555408 0.534247657471 y[1] (closed_form) = 0 0 absolute error = 0.5468 relative error = -100 % Correct digits = -16 Radius of convergence (given) for eq 1 = 1.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 memory used=1679.9MB, alloc=52.3MB, time=20.82 x[1] = 0.2329 0.662 h = 0.0001 0.003 y[1] (numeric) = 0.116446146282 0.539077274172 y[1] (closed_form) = 0 0 absolute error = 0.5515 relative error = -100 % Correct digits = -16 Radius of convergence (given) for eq 1 = 1.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.233 0.665 h = 0.001 0.001 y[1] (numeric) = 0.11645829293 0.541976699491 y[1] (closed_form) = 0 0 absolute error = 0.5543 relative error = -100 % Correct digits = -16 Radius of convergence (given) for eq 1 = 1.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.234 0.666 h = 0.001 0.003 y[1] (numeric) = 0.117395714175 0.542970564095 y[1] (closed_form) = 0 0 absolute error = 0.5555 relative error = -100 % Correct digits = -16 Radius of convergence (given) for eq 1 = 1.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.235 0.669 h = 0.0001 0.004 y[1] (numeric) = 0.118276769705 0.545895901776 y[1] (closed_form) = 0 0 absolute error = 0.5586 relative error = -100 % Correct digits = -16 Radius of convergence (given) for eq 1 = 1.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 memory used=1725.8MB, alloc=52.3MB, time=21.39 x[1] = 0.2351 0.673 h = 0.003 0.006 y[1] (numeric) = 0.118260267751 0.54976208579 y[1] (closed_form) = 0 0 absolute error = 0.5623 relative error = -100 % Correct digits = -16 Radius of convergence (given) for eq 1 = 1.861 Order of pole (given) = 0.5 0 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 0.2381 0.679 h = 0.0001 0.005 y[1] (numeric) = 0.120987893586 0.555643119362 y[1] (closed_form) = 0 0 absolute error = 0.5687 relative error = -100 % Correct digits = -16 Radius of convergence (given) for eq 1 = 1.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.2382 0.684 h = 0.0001 0.003 y[1] (numeric) = 0.120942237825 0.560477330417 y[1] (closed_form) = 0 0 absolute error = 0.5734 relative error = -100 % Correct digits = -16 Radius of convergence (given) for eq 1 = 1.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.2383 0.687 h = 0.001 0.001 y[1] (numeric) = 0.120953091838 0.563379535255 y[1] (closed_form) = 0 0 absolute error = 0.5762 relative error = -100 % Correct digits = -16 Radius of convergence (given) for eq 1 = 1.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 memory used=1771.8MB, alloc=52.3MB, time=21.96 x[1] = 0.2393 0.688 h = 0.001 0.003 y[1] (numeric) = 0.121890967631 0.56437476936 y[1] (closed_form) = 0 0 absolute error = 0.5774 relative error = -100 % Correct digits = -16 Radius of convergence (given) for eq 1 = 1.87 Order of pole (given) = 0.5 0 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 0.2403 0.691 h = 0.0001 0.004 y[1] (numeric) = 0.122771566589 0.567303296283 y[1] (closed_form) = 0 0 absolute error = 0.5804 relative error = -100 % Correct digits = -16 Radius of convergence (given) for eq 1 = 1.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.2404 0.695 h = 0.003 0.006 y[1] (numeric) = 0.12275334838 0.571173168938 y[1] (closed_form) = 0 0 absolute error = 0.5842 relative error = -100 % Correct digits = -16 Radius of convergence (given) for eq 1 = 1.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.2434 0.701 h = 0.0001 0.005 y[1] (numeric) = 0.125481029324 0.577061015218 y[1] (closed_form) = 0 0 absolute error = 0.5905 relative error = -100 % Correct digits = -16 Radius of convergence (given) for eq 1 = 1.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 memory used=1817.7MB, alloc=52.3MB, time=22.53 x[1] = 0.2435 0.706 h = 0.0001 0.003 y[1] (numeric) = 0.125433272304 0.581899821115 y[1] (closed_form) = 0 0 absolute error = 0.5953 relative error = -100 % Correct digits = -16 Radius of convergence (given) for eq 1 = 1.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.2436 0.709 h = 0.001 0.001 y[1] (numeric) = 0.125442920758 0.584804803948 y[1] (closed_form) = 0 0 absolute error = 0.5981 relative error = -100 % Correct digits = -16 Radius of convergence (given) for eq 1 = 1.882 Order of pole (given) = 0.5 0 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 0.2446 0.71 h = 0.001 0.003 y[1] (numeric) = 0.126381280405 0.585801378906 y[1] (closed_form) = 0 0 absolute error = 0.5993 relative error = -100 % Correct digits = -16 Radius of convergence (given) for eq 1 = 1.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.2456 0.713 h = 0.0001 0.004 y[1] (numeric) = 0.127261509853 0.588733067032 y[1] (closed_form) = 0 0 absolute error = 0.6023 relative error = -100 % Correct digits = -16 Radius of convergence (given) for eq 1 = 1.886 Order of pole (given) = 0.5 0 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 memory used=1863.6MB, alloc=52.3MB, time=23.10 x[1] = 0.2457 0.717 h = 0.003 0.006 y[1] (numeric) = 0.127241690804 0.592606626136 y[1] (closed_form) = 0 0 absolute error = 0.6061 relative error = -100 % Correct digits = -16 Radius of convergence (given) for eq 1 = 1.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.2487 0.723 h = 0.0001 0.005 y[1] (numeric) = 0.129969599685 0.598501198713 y[1] (closed_form) = 0 0 absolute error = 0.6125 relative error = -100 % Correct digits = -16 Radius of convergence (given) for eq 1 = 1.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 x[1] = 0.2488 0.728 h = 0.0001 0.003 y[1] (numeric) = 0.129919884441 0.603344595456 y[1] (closed_form) = 0 0 absolute error = 0.6172 relative error = -100 % Correct digits = -16 Radius of convergence (given) for eq 1 = 1.894 Order of pole (given) = 0.5 0 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 0.2489 0.731 h = 0.001 0.001 y[1] (numeric) = 0.129928412953 0.606252352108 y[1] (closed_form) = 0 0 absolute error = 0.62 relative error = -100 % Correct digits = -16 Radius of convergence (given) for eq 1 = 1.896 Order of pole (given) = 0.5 0 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 0.2499 0.732 h = 0.0001 0.004 y[1] (numeric) = 0.130867284402 0.607250238836 y[1] (closed_form) = 0 0 absolute error = 0.6212 relative error = -100 % Correct digits = -16 memory used=1909.4MB, alloc=52.3MB, time=23.66 Radius of convergence (given) for eq 1 = 1.897 Order of pole (given) = 0.5 0 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 0.25 0.736 h = 0.003 0.006 y[1] (numeric) = 0.130846134464 0.61112694946 y[1] (closed_form) = 0 0 absolute error = 0.625 relative error = -100 % Correct digits = -16 Radius of convergence (given) for eq 1 = 1.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.253 0.742 h = 0.0001 0.005 y[1] (numeric) = 0.133574295119 0.617027245054 y[1] (closed_form) = 0 0 absolute error = 0.6313 relative error = -100 % Correct digits = -16 Radius of convergence (given) for eq 1 = 1.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.2531 0.747 h = 0.0001 0.003 y[1] (numeric) = 0.13352295243 0.621874565898 y[1] (closed_form) = 0 0 absolute error = 0.636 relative error = -100 % Correct digits = -16 Radius of convergence (given) for eq 1 = 1.906 Order of pole (given) = 0.5 0 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 0.2532 0.75 h = 0.001 0.001 y[1] (numeric) = 0.133530551401 0.624784692889 y[1] (closed_form) = 0 0 absolute error = 0.6389 relative error = -100 % Correct digits = -16 Radius of convergence (given) for eq 1 = 1.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 memory used=1955.4MB, alloc=52.3MB, time=24.23 x[1] = 0.2542 0.751 h = 0.001 0.003 y[1] (numeric) = 0.134469869599 0.625783691692 y[1] (closed_form) = 0 0 absolute error = 0.6401 relative error = -100 % Correct digits = -16 Radius of convergence (given) for eq 1 = 1.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 x[1] = 0.2552 0.754 h = 0.0001 0.004 y[1] (numeric) = 0.135349598611 0.628721177888 y[1] (closed_form) = 0 0 absolute error = 0.6431 relative error = -100 % Correct digits = -16 Radius of convergence (given) for eq 1 = 1.91 Order of pole (given) = 0.5 0 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 0.2553 0.758 h = 0.0001 0.004 y[1] (numeric) = 0.135327057541 0.632601562967 y[1] (closed_form) = 0 0 absolute error = 0.6469 relative error = -100 % Correct digits = -16 Radius of convergence (given) for eq 1 = 1.912 Order of pole (given) = 0.5 0 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 0.2554 0.762 h = 0.003 0.006 y[1] (numeric) = 0.135304151061 0.636482533364 y[1] (closed_form) = 0 0 absolute error = 0.6507 relative error = -100 % Correct digits = -16 Radius of convergence (given) for eq 1 = 1.914 Order of pole (given) = 0.5 0 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 memory used=2001.2MB, alloc=52.3MB, time=24.80 x[1] = 0.2584 0.768 h = 0.0001 0.005 y[1] (numeric) = 0.138032715586 0.642390534043 y[1] (closed_form) = 0 0 absolute error = 0.6571 relative error = -100 % Correct digits = -16 Radius of convergence (given) for eq 1 = 1.919 Order of pole (given) = 0.5 0 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 0.2585 0.773 h = 0.0001 0.003 y[1] (numeric) = 0.137979225171 0.647243158204 y[1] (closed_form) = 0 0 absolute error = 0.6618 relative error = -100 % Correct digits = -16 Radius of convergence (given) for eq 1 = 1.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.2586 0.776 h = 0.001 0.001 y[1] (numeric) = 0.137985598822 0.650156487918 y[1] (closed_form) = 0 0 absolute error = 0.6646 relative error = -100 % Correct digits = -16 Radius of convergence (given) for eq 1 = 1.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.2596 0.777 h = 0.001 0.003 y[1] (numeric) = 0.138925531112 0.651156979413 y[1] (closed_form) = 0 0 absolute error = 0.6658 relative error = -100 % Correct digits = -16 Radius of convergence (given) for eq 1 = 1.924 Order of pole (given) = 0.5 0 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 memory used=2047.2MB, alloc=52.3MB, time=25.36 x[1] = 0.2606 0.78 h = 0.0001 0.004 y[1] (numeric) = 0.139804999391 0.654098059969 y[1] (closed_form) = 0 0 absolute error = 0.6689 relative error = -100 % Correct digits = -16 Radius of convergence (given) for eq 1 = 1.926 Order of pole (given) = 0.5 0 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 0.2607 0.784 h = 0.003 0.006 y[1] (numeric) = 0.139780830586 0.657982694578 y[1] (closed_form) = 0 0 absolute error = 0.6727 relative error = -100 % Correct digits = -16 Radius of convergence (given) for eq 1 = 1.927 Order of pole (given) = 0.5 0 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 0.2637 0.79 h = 0.0001 0.005 y[1] (numeric) = 0.142510118675 0.663897144309 y[1] (closed_form) = 0 0 absolute error = 0.679 relative error = -100 % Correct digits = -16 Radius of convergence (given) for eq 1 = 1.933 Order of pole (given) = 0.5 0 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 0.2638 0.795 h = 0.0001 0.003 y[1] (numeric) = 0.142455089424 0.668754328154 y[1] (closed_form) = 0 0 absolute error = 0.6838 relative error = -100 % Correct digits = -16 Radius of convergence (given) for eq 1 = 1.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 memory used=2093.2MB, alloc=52.3MB, time=25.93 x[1] = 0.2639 0.798 h = 0.001 0.001 y[1] (numeric) = 0.142460593903 0.67167040782 y[1] (closed_form) = 0 0 absolute error = 0.6866 relative error = -100 % Correct digits = -16 Radius of convergence (given) for eq 1 = 1.936 Order of pole (given) = 0.5 0 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 0.2649 0.799 h = 0.001 0.003 y[1] (numeric) = 0.1434011161 0.672672121928 y[1] (closed_form) = 0 0 absolute error = 0.6878 relative error = -100 % Correct digits = -16 Radius of convergence (given) for eq 1 = 1.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.2659 0.802 h = 0.0001 0.004 y[1] (numeric) = 0.144280544457 0.675616233135 y[1] (closed_form) = 0 0 absolute error = 0.6909 relative error = -100 % Correct digits = -16 Radius of convergence (given) for eq 1 = 1.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.266 0.806 h = 0.003 0.006 y[1] (numeric) = 0.144255220601 0.679504516445 y[1] (closed_form) = 0 0 absolute error = 0.6946 relative error = -100 % Correct digits = -16 Radius of convergence (given) for eq 1 = 1.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 memory used=2139.2MB, alloc=52.3MB, time=26.50 x[1] = 0.269 0.812 h = 0.0001 0.005 y[1] (numeric) = 0.146985383073 0.685425314549 y[1] (closed_form) = 0 0 absolute error = 0.701 relative error = -100 % Correct digits = -16 Radius of convergence (given) for eq 1 = 1.946 Order of pole (given) = 0.5 0 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 0.2691 0.817 h = 0.0001 0.003 y[1] (numeric) = 0.146928947702 0.690287037665 y[1] (closed_form) = 0 0 absolute error = 0.7058 relative error = -100 % Correct digits = -16 Radius of convergence (given) for eq 1 = 1.949 Order of pole (given) = 0.5 0 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 0.2692 0.82 h = 0.001 0.001 y[1] (numeric) = 0.146933662229 0.69320585342 y[1] (closed_form) = 0 0 absolute error = 0.7086 relative error = -100 % Correct digits = -16 Radius of convergence (given) for eq 1 = 1.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.2702 0.821 h = 0.001 0.003 y[1] (numeric) = 0.147874796965 0.694208759814 y[1] (closed_form) = 0 0 absolute error = 0.7098 relative error = -100 % Correct digits = -16 Radius of convergence (given) for eq 1 = 1.951 Order of pole (given) = 0.5 0 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 0.2712 0.824 h = 0.0001 0.004 y[1] (numeric) = 0.148754260813 0.697155863638 y[1] (closed_form) = 0 0 absolute error = 0.7128 relative error = -100 % Correct digits = -16 Radius of convergence (given) for eq 1 = 1.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 memory used=2185.1MB, alloc=52.3MB, time=27.06 x[1] = 0.2713 0.828 h = 0.003 0.006 y[1] (numeric) = 0.148727886875 0.701047777159 y[1] (closed_form) = 0 0 absolute error = 0.7167 relative error = -100 % Correct digits = -16 Radius of convergence (given) for eq 1 = 1.955 Order of pole (given) = 0.5 0 NO POLE (ratio test) 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) = 0.151459069034 0.706974820158 y[1] (closed_form) = 0 0 absolute error = 0.723 relative error = -100 % Correct digits = -16 Radius of convergence (given) for eq 1 = 1.961 Order of pole (given) = 0.5 0 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 0.2744 0.839 h = 0.0001 0.003 y[1] (numeric) = 0.151401357433 0.711841058537 y[1] (closed_form) = 0 0 absolute error = 0.7278 relative error = -100 % Correct digits = -16 Radius of convergence (given) for eq 1 = 1.963 Order of pole (given) = 0.5 0 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 0.2745 0.842 h = 0.001 0.001 y[1] (numeric) = 0.151405359492 0.714762594404 y[1] (closed_form) = 0 0 absolute error = 0.7306 relative error = -100 % Correct digits = -16 Radius of convergence (given) for eq 1 = 1.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 memory used=2231.0MB, alloc=52.3MB, time=27.63 x[1] = 0.2755 0.843 h = 0.001 0.003 y[1] (numeric) = 0.152347128124 0.715766662594 y[1] (closed_form) = 0 0 absolute error = 0.7318 relative error = -100 % Correct digits = -16 Radius of convergence (given) for eq 1 = 1.965 Order of pole (given) = 0.5 0 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 0.2765 0.846 h = 0.0001 0.004 y[1] (numeric) = 0.153226700483 0.71871671941 y[1] (closed_form) = 0 0 absolute error = 0.7349 relative error = -100 % Correct digits = -16 Radius of convergence (given) for eq 1 = 1.968 Order of pole (given) = 0.5 0 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 0.2766 0.85 h = 0.003 0.006 y[1] (numeric) = 0.153199379124 0.722612241862 y[1] (closed_form) = 0 0 absolute error = 0.7387 relative error = -100 % Correct digits = -16 Radius of convergence (given) for eq 1 = 1.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.2796 0.856 h = 0.0001 0.005 y[1] (numeric) = 0.155931720779 0.728545423731 y[1] (closed_form) = 0 0 absolute error = 0.745 relative error = -100 % Correct digits = -16 Radius of convergence (given) for eq 1 = 1.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 memory used=2277.1MB, alloc=52.3MB, time=28.20 x[1] = 0.2797 0.861 h = 0.0001 0.003 y[1] (numeric) = 0.155872859948 0.733416149947 y[1] (closed_form) = 0 0 absolute error = 0.7498 relative error = -100 % Correct digits = -16 Radius of convergence (given) for eq 1 = 1.977 Order of pole (given) = 0.5 0 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 0.2798 0.864 h = 0.001 0.001 y[1] (numeric) = 0.155876225247 0.73634038794 y[1] (closed_form) = 0 0 absolute error = 0.7527 relative error = -100 % Correct digits = -16 Radius of convergence (given) for eq 1 = 1.978 Order of pole (given) = 0.5 0 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 0.2808 0.865 h = 0.0001 0.004 y[1] (numeric) = 0.156818647874 0.737345587326 y[1] (closed_form) = 0 0 absolute error = 0.7538 relative error = -100 % Correct digits = -16 Radius of convergence (given) for eq 1 = 1.98 Order of pole (given) = 0.5 0 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 0.2809 0.869 h = 0.003 0.006 y[1] (numeric) = 0.156790548767 0.741244187518 y[1] (closed_form) = 0 0 absolute error = 0.7576 relative error = -100 % Correct digits = -16 Radius of convergence (given) for eq 1 = 1.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 memory used=2323.0MB, alloc=52.3MB, time=28.76 x[1] = 0.2839 0.875 h = 0.0001 0.005 y[1] (numeric) = 0.159523924893 0.747182582832 y[1] (closed_form) = 0 0 absolute error = 0.764 relative error = -100 % Correct digits = -16 Radius of convergence (given) for eq 1 = 1.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 x[1] = 0.284 0.88 h = 0.0001 0.003 y[1] (numeric) = 0.159464121338 0.752057135896 y[1] (closed_form) = 0 0 absolute error = 0.7688 relative error = -100 % Correct digits = -16 Radius of convergence (given) for eq 1 = 1.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.2841 0.883 h = 0.001 0.001 y[1] (numeric) = 0.159466965921 0.754983677541 y[1] (closed_form) = 0 0 absolute error = 0.7716 relative error = -100 % Correct digits = -16 Radius of convergence (given) for eq 1 = 1.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.2851 0.884 h = 0.001 0.003 y[1] (numeric) = 0.160409953662 0.755989834157 y[1] (closed_form) = 0 0 absolute error = 0.7728 relative error = -100 % Correct digits = -16 Radius of convergence (given) for eq 1 = 1.992 Order of pole (given) = 0.5 0 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 memory used=2369.0MB, alloc=52.3MB, time=29.34 x[1] = 0.2861 0.887 h = 0.0001 0.004 y[1] (numeric) = 0.161289880093 0.758945278607 y[1] (closed_form) = 0 0 absolute error = 0.7759 relative error = -100 % Correct digits = -16 Radius of convergence (given) for eq 1 = 1.994 Order of pole (given) = 0.5 0 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 0.2862 0.891 h = 0.003 0.006 y[1] (numeric) = 0.16126101867 0.762847442313 y[1] (closed_form) = 0 0 absolute error = 0.7797 relative error = -100 % Correct digits = -16 Radius of convergence (given) for eq 1 = 1.996 Order of pole (given) = 0.5 0 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 0.2892 0.897 h = 0.0001 0.005 y[1] (numeric) = 0.163995801248 0.768791774775 y[1] (closed_form) = 0 0 absolute error = 0.7861 relative error = -100 % Correct digits = -16 Radius of convergence (given) for eq 1 = 2.001 Order of pole (given) = 0.5 0 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 0.2893 0.902 h = 0.0001 0.003 y[1] (numeric) = 0.163935077311 0.773670757563 y[1] (closed_form) = 0 0 absolute error = 0.7908 relative error = -100 % Correct digits = -16 Radius of convergence (given) for eq 1 = 2.004 Order of pole (given) = 0.5 0 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 0.2894 0.905 h = 0.001 0.001 y[1] (numeric) = 0.163937421447 0.776599963731 y[1] (closed_form) = 0 0 absolute error = 0.7937 relative error = -100 % Correct digits = -16 Radius of convergence (given) for eq 1 = 2.005 Order of pole (given) = 0.5 0 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 memory used=2415.0MB, alloc=52.3MB, time=29.90 x[1] = 0.2904 0.906 h = 0.001 0.003 y[1] (numeric) = 0.16488109769 0.777607194662 y[1] (closed_form) = 0 0 absolute error = 0.7949 relative error = -100 % Correct digits = -16 Radius of convergence (given) for eq 1 = 2.007 Order of pole (given) = 0.5 0 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 0.2914 0.909 h = 0.0001 0.004 y[1] (numeric) = 0.16576132884 0.780565471765 y[1] (closed_form) = 0 0 absolute error = 0.798 relative error = -100 % Correct digits = -16 Radius of convergence (given) for eq 1 = 2.009 Order of pole (given) = 0.5 0 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 0.2915 0.913 h = 0.003 0.006 y[1] (numeric) = 0.165731800893 0.784471170486 y[1] (closed_form) = 0 0 absolute error = 0.8018 relative error = -100 % Correct digits = -16 Radius of convergence (given) for eq 1 = 2.011 Order of pole (given) = 0.5 0 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 0.2945 0.919 h = 0.0001 0.005 y[1] (numeric) = 0.168468114221 0.790421328048 y[1] (closed_form) = 0 0 absolute error = 0.8082 relative error = -100 % Correct digits = -16 Radius of convergence (given) for eq 1 = 2.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=2461.1MB, alloc=52.3MB, time=30.48 x[1] = 0.2946 0.924 h = 0.0001 0.003 y[1] (numeric) = 0.168406588379 0.795304704264 y[1] (closed_form) = 0 0 absolute error = 0.8129 relative error = -100 % Correct digits = -16 Radius of convergence (given) for eq 1 = 2.019 Order of pole (given) = 0.5 0 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 0.2947 0.927 h = 0.001 0.001 y[1] (numeric) = 0.16840850256 0.798236551776 y[1] (closed_form) = 0 0 absolute error = 0.8158 relative error = -100 % Correct digits = -16 Radius of convergence (given) for eq 1 = 2.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.2957 0.928 h = 0.001 0.003 y[1] (numeric) = 0.169352883945 0.799244826328 y[1] (closed_form) = 0 0 absolute error = 0.817 relative error = -100 % Correct digits = -16 Radius of convergence (given) for eq 1 = 2.021 Order of pole (given) = 0.5 0 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 0.2967 0.931 h = 0.0001 0.004 y[1] (numeric) = 0.170233483624 0.80220589136 y[1] (closed_form) = 0 0 absolute error = 0.8201 relative error = -100 % Correct digits = -16 Radius of convergence (given) for eq 1 = 2.024 Order of pole (given) = 0.5 0 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 memory used=2507.0MB, alloc=52.3MB, time=31.04 x[1] = 0.2968 0.935 h = 0.003 0.006 y[1] (numeric) = 0.170203382538 0.806115094308 y[1] (closed_form) = 0 0 absolute error = 0.8239 relative error = -100 % Correct digits = -16 Radius of convergence (given) for eq 1 = 2.026 Order of pole (given) = 0.5 0 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 0.2998 0.941 h = 0.0001 0.005 y[1] (numeric) = 0.172941345576 0.81207096328 y[1] (closed_form) = 0 0 absolute error = 0.8303 relative error = -100 % Correct digits = -16 Radius of convergence (given) for eq 1 = 2.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 x[1] = 0.2999 0.946 h = 0.0001 0.003 y[1] (numeric) = 0.17287913324 0.816958693864 y[1] (closed_form) = 0 0 absolute error = 0.8351 relative error = -100 % Correct digits = -16 Radius of convergence (given) for eq 1 = 2.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.3 0.949 h = 0.001 0.001 y[1] (numeric) = 0.172880686088 0.819893157925 y[1] (closed_form) = 0 0 absolute error = 0.8379 relative error = -100 % Correct digits = -16 Radius of convergence (given) for eq 1 = 2.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 memory used=2553.0MB, alloc=52.3MB, time=31.61 x[1] = 0.301 0.95 h = 0.001 0.003 y[1] (numeric) = 0.173825788093 0.82090244546 y[1] (closed_form) = 0 0 absolute error = 0.8391 relative error = -100 % Correct digits = -16 Radius of convergence (given) for eq 1 = 2.036 Order of pole (given) = 0.5 0 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 0.302 0.953 h = 0.0001 0.004 y[1] (numeric) = 0.174706817738 0.823866252643 y[1] (closed_form) = 0 0 absolute error = 0.8422 relative error = -100 % Correct digits = -16 Radius of convergence (given) for eq 1 = 2.038 Order of pole (given) = 0.5 0 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 0.3021 0.957 h = 0.003 0.006 y[1] (numeric) = 0.17467623442 0.827778926902 y[1] (closed_form) = 0 0 absolute error = 0.846 relative error = -100 % Correct digits = -16 Radius of convergence (given) for eq 1 = 2.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.3051 0.963 h = 0.0001 0.005 y[1] (numeric) = 0.17741596085 0.833740392167 y[1] (closed_form) = 0 0 absolute error = 0.8524 relative error = -100 % Correct digits = -16 Radius of convergence (given) for eq 1 = 2.046 Order of pole (given) = 0.5 0 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 memory used=2599.0MB, alloc=52.3MB, time=32.18 x[1] = 0.3052 0.968 h = 0.0001 0.003 y[1] (numeric) = 0.177353174335 0.838632435458 y[1] (closed_form) = 0 0 absolute error = 0.8572 relative error = -100 % Correct digits = -16 Radius of convergence (given) for eq 1 = 2.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.3053 0.971 h = 0.001 0.001 y[1] (numeric) = 0.177354432588 0.841569489758 y[1] (closed_form) = 0 0 absolute error = 0.8601 relative error = -100 % Correct digits = -16 Radius of convergence (given) for eq 1 = 2.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.3063 0.972 h = 0.0001 0.004 y[1] (numeric) = 0.178300269558 0.842579759727 y[1] (closed_form) = 0 0 absolute error = 0.8612 relative error = -100 % Correct digits = -16 Radius of convergence (given) for eq 1 = 2.051 Order of pole (given) = 0.5 0 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 0.3064 0.976 h = 0.003 0.006 y[1] (numeric) = 0.178269301214 0.846495389801 y[1] (closed_form) = 0 0 absolute error = 0.8651 relative error = -100 % Correct digits = -16 Radius of convergence (given) for eq 1 = 2.053 Order of pole (given) = 0.5 0 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 0.3094 0.982 h = 0.0001 0.005 y[1] (numeric) = 0.181010567791 0.8524616018 y[1] (closed_form) = 0 0 absolute error = 0.8715 relative error = -100 % Correct digits = -16 Radius of convergence (given) for eq 1 = 2.059 Order of pole (given) = 0.5 0 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 memory used=2645.0MB, alloc=52.3MB, time=32.75 x[1] = 0.3095 0.987 h = 0.0001 0.003 y[1] (numeric) = 0.180947323953 0.857357317018 y[1] (closed_form) = 0 0 absolute error = 0.8762 relative error = -100 % Correct digits = -16 Radius of convergence (given) for eq 1 = 2.061 Order of pole (given) = 0.5 0 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 0.3096 0.99 h = 0.001 0.001 y[1] (numeric) = 0.180948350221 0.86029657629 y[1] (closed_form) = 0 0 absolute error = 0.8791 relative error = -100 % Correct digits = -16 Radius of convergence (given) for eq 1 = 2.063 Order of pole (given) = 0.5 0 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 0.3106 0.991 h = 0.001 0.003 y[1] (numeric) = 0.181894819256 0.861307676504 y[1] (closed_form) = 0 0 absolute error = 0.8803 relative error = -100 % Correct digits = -16 Radius of convergence (given) for eq 1 = 2.064 Order of pole (given) = 0.5 0 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 0.3116 0.994 h = 0.0001 0.004 y[1] (numeric) = 0.182776773104 0.864276467919 y[1] (closed_form) = 0 0 absolute error = 0.8834 relative error = -100 % Correct digits = -16 Radius of convergence (given) for eq 1 = 2.066 Order of pole (given) = 0.5 0 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 memory used=2690.9MB, alloc=52.3MB, time=33.32 x[1] = 0.3117 0.998 h = 0.003 0.006 y[1] (numeric) = 0.182745485516 0.868195503807 y[1] (closed_form) = 0 0 absolute error = 0.8872 relative error = -100 % Correct digits = -16 Radius of convergence (given) for eq 1 = 2.068 Order of pole (given) = 0.5 0 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 0.3147 1.004 h = 0.0001 0.005 y[1] (numeric) = 0.185488714608 0.874167096006 y[1] (closed_form) = 0 0 absolute error = 0.8936 relative error = -100 % Correct digits = -16 Radius of convergence (given) for eq 1 = 2.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.3148 1.009 h = 0.0001 0.003 y[1] (numeric) = 0.185425097853 0.879067041278 y[1] (closed_form) = 0 0 absolute error = 0.8984 relative error = -100 % Correct digits = -16 Radius of convergence (given) for eq 1 = 2.076 Order of pole (given) = 0.5 0 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 0.3149 1.012 h = 0.001 0.001 y[1] (numeric) = 0.185425949015 0.882008838864 y[1] (closed_form) = 0 0 absolute error = 0.9013 relative error = -100 % Correct digits = -16 Radius of convergence (given) for eq 1 = 2.078 Order of pole (given) = 0.5 0 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 memory used=2736.9MB, alloc=52.3MB, time=33.89 x[1] = 0.3159 1.013 h = 0.001 0.003 y[1] (numeric) = 0.186373177143 0.883020865169 y[1] (closed_form) = 0 0 absolute error = 0.9025 relative error = -100 % Correct digits = -16 Radius of convergence (given) for eq 1 = 2.079 Order of pole (given) = 0.5 0 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 0.3169 1.016 h = 0.0001 0.004 y[1] (numeric) = 0.187255724368 0.885992263515 y[1] (closed_form) = 0 0 absolute error = 0.9056 relative error = -100 % Correct digits = -16 Radius of convergence (given) for eq 1 = 2.082 Order of pole (given) = 0.5 0 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 0.317 1.02 h = 0.003 0.006 y[1] (numeric) = 0.187224201244 0.889914666914 y[1] (closed_form) = 0 0 absolute error = 0.9094 relative error = -100 % Correct digits = -16 Radius of convergence (given) for eq 1 = 2.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.32 1.026 h = 0.0001 0.005 y[1] (numeric) = 0.189969491831 0.895891521171 y[1] (closed_form) = 0 0 absolute error = 0.9158 relative error = -100 % Correct digits = -16 Radius of convergence (given) for eq 1 = 2.089 Order of pole (given) = 0.5 0 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 memory used=2782.7MB, alloc=52.3MB, time=34.46 x[1] = 0.3201 1.031 h = 0.0001 0.003 y[1] (numeric) = 0.189905605566 0.900795648224 y[1] (closed_form) = 0 0 absolute error = 0.9206 relative error = -100 % Correct digits = -16 Radius of convergence (given) for eq 1 = 2.092 Order of pole (given) = 0.5 0 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 0.3202 1.034 h = 0.001 0.001 y[1] (numeric) = 0.189906342943 0.903739953973 y[1] (closed_form) = 0 0 absolute error = 0.9235 relative error = -100 % Correct digits = -16 Radius of convergence (given) for eq 1 = 2.093 Order of pole (given) = 0.5 0 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 0.3212 1.035 h = 0.001 0.003 y[1] (numeric) = 0.19085434142 0.904752876254 y[1] (closed_form) = 0 0 absolute error = 0.9247 relative error = -100 % Correct digits = -16 Radius of convergence (given) for eq 1 = 2.095 Order of pole (given) = 0.5 0 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 0.3222 1.038 h = 0.0001 0.004 y[1] (numeric) = 0.191737534498 0.907726832602 y[1] (closed_form) = 0 0 absolute error = 0.9278 relative error = -100 % Correct digits = -16 Radius of convergence (given) for eq 1 = 2.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 memory used=2828.7MB, alloc=52.3MB, time=35.03 x[1] = 0.3223 1.042 h = 0.003 0.006 y[1] (numeric) = 0.191705857072 0.911652563529 y[1] (closed_form) = 0 0 absolute error = 0.9316 relative error = -100 % Correct digits = -16 Radius of convergence (given) for eq 1 = 2.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.3253 1.048 h = 0.0001 0.005 y[1] (numeric) = 0.194453303148 0.917634561028 y[1] (closed_form) = 0 0 absolute error = 0.938 relative error = -100 % Correct digits = -16 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.3254 1.053 h = 0.0001 0.003 y[1] (numeric) = 0.194389247644 0.922542819583 y[1] (closed_form) = 0 0 absolute error = 0.9428 relative error = -100 % Correct digits = -16 Radius of convergence (given) for eq 1 = 2.107 Order of pole (given) = 0.5 0 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 0.3255 1.056 h = 0.001 0.001 y[1] (numeric) = 0.194389930658 0.925489602184 y[1] (closed_form) = 0 0 absolute error = 0.9457 relative error = -100 % Correct digits = -16 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.3265 1.057 h = 0.001 0.003 y[1] (numeric) = 0.195338709712 0.926503390548 y[1] (closed_form) = 0 0 absolute error = 0.9469 relative error = -100 % Correct digits = -16 memory used=2874.8MB, alloc=52.3MB, time=35.60 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.3275 1.06 h = 0.0001 0.004 y[1] (numeric) = 0.196222598861 0.929479855379 y[1] (closed_form) = 0 0 absolute error = 0.95 relative error = -100 % Correct digits = -16 Radius of convergence (given) for eq 1 = 2.113 Order of pole (given) = 0.5 0 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 0.3276 1.064 h = 0.003 0.006 y[1] (numeric) = 0.196190845848 0.933408872322 y[1] (closed_form) = 0 0 absolute error = 0.9538 relative error = -100 % Correct digits = -16 Radius of convergence (given) for eq 1 = 2.115 Order of pole (given) = 0.5 0 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 0.3306 1.07 h = 0.0001 0.005 y[1] (numeric) = 0.198940536503 0.939395893753 y[1] (closed_form) = 0 0 absolute error = 0.9602 relative error = -100 % Correct digits = -16 Radius of convergence (given) for eq 1 = 2.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.3307 1.075 h = 0.0001 0.003 y[1] (numeric) = 0.198876408905 0.944308231671 y[1] (closed_form) = 0 0 absolute error = 0.965 relative error = -100 % Correct digits = -16 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 memory used=2920.7MB, alloc=52.3MB, time=36.17 x[1] = 0.3308 1.078 h = 0.001 0.001 y[1] (numeric) = 0.198877095081 0.947257458741 y[1] (closed_form) = 0 0 absolute error = 0.9679 relative error = -100 % Correct digits = -16 Radius of convergence (given) for eq 1 = 2.125 Order of pole (given) = 0.5 0 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 0.3318 1.079 h = 0.0001 0.004 y[1] (numeric) = 0.199826663946 0.948272083536 y[1] (closed_form) = 0 0 absolute error = 0.9691 relative error = -100 % Correct digits = -16 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.3319 1.083 h = 0.003 0.006 y[1] (numeric) = 0.199794868506 0.952203895012 y[1] (closed_form) = 0 0 absolute error = 0.9729 relative error = -100 % Correct digits = -16 Radius of convergence (given) for eq 1 = 2.128 Order of pole (given) = 0.5 0 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 0.3349 1.089 h = 0.0001 0.005 y[1] (numeric) = 0.202546500984 0.958195173172 y[1] (closed_form) = 0 0 absolute error = 0.9794 relative error = -100 % Correct digits = -16 Radius of convergence (given) for eq 1 = 2.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=2966.6MB, alloc=52.3MB, time=36.74 x[1] = 0.335 1.094 h = 0.0001 0.003 y[1] (numeric) = 0.202482339019 0.963110980058 y[1] (closed_form) = 0 0 absolute error = 0.9842 relative error = -100 % Correct digits = -16 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.3351 1.097 h = 0.001 0.001 y[1] (numeric) = 0.202483043963 0.966062285492 y[1] (closed_form) = 0 0 absolute error = 0.9871 relative error = -100 % Correct digits = -16 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.3361 1.098 h = 0.001 0.003 y[1] (numeric) = 0.203433289842 0.967077616264 y[1] (closed_form) = 0 0 absolute error = 0.9882 relative error = -100 % Correct digits = -16 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.3371 1.101 h = 0.0001 0.004 y[1] (numeric) = 0.204318571788 0.970058624951 y[1] (closed_form) = 0 0 absolute error = 0.9913 relative error = -100 % Correct digits = -16 Radius of convergence (given) for eq 1 = 2.142 Order of pole (given) = 0.5 0 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 memory used=3012.6MB, alloc=52.3MB, time=37.30 x[1] = 0.3372 1.105 h = 0.003 0.006 y[1] (numeric) = 0.204286841126 0.97399364235 y[1] (closed_form) = 0 0 absolute error = 0.9952 relative error = -100 % Correct digits = -16 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.3402 1.111 h = 0.0001 0.005 y[1] (numeric) = 0.207040872665 0.979989722611 y[1] (closed_form) = 0 0 absolute error = 1.002 relative error = -100 % Correct digits = -16 Radius of convergence (given) for eq 1 = 2.15 Order of pole (given) = 0.5 0 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 0.3403 1.116 h = 0.0001 0.003 y[1] (numeric) = 0.206976811738 0.984909508435 y[1] (closed_form) = 0 0 absolute error = 1.006 relative error = -100 % Correct digits = -16 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.3404 1.119 h = 0.001 0.001 y[1] (numeric) = 0.206977622278 0.987863196143 y[1] (closed_form) = 0 0 absolute error = 1.009 relative error = -100 % Correct digits = -16 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 memory used=3058.7MB, alloc=52.3MB, time=37.89 x[1] = 0.3414 1.12 h = 0.001 0.003 y[1] (numeric) = 0.207928672952 0.988879309 y[1] (closed_form) = 0 0 absolute error = 1.011 relative error = -100 % Correct digits = -16 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 x[1] = 0.3424 1.123 h = 0.0001 0.004 y[1] (numeric) = 0.208814783034 0.991862682539 y[1] (closed_form) = 0 0 absolute error = 1.014 relative error = -100 % Correct digits = -16 Radius of convergence (given) for eq 1 = 2.158 Order of pole (given) = 0.5 0 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 0.3425 1.127 h = 0.003 0.006 y[1] (numeric) = 0.20878318869 0.9958008606 y[1] (closed_form) = 0 0 absolute error = 1.017 relative error = -100 % Correct digits = -16 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.3455 1.133 h = 0.0001 0.005 y[1] (numeric) = 0.211539694883 1.00180162308 y[1] (closed_form) = 0 0 absolute error = 1.024 relative error = -100 % Correct digits = -16 Radius of convergence (given) for eq 1 = 2.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 memory used=3104.7MB, alloc=52.3MB, time=38.45 x[1] = 0.3456 1.138 h = 0.0001 0.003 y[1] (numeric) = 0.211475823269 1.0067253311 y[1] (closed_form) = 0 0 absolute error = 1.029 relative error = -100 % Correct digits = -16 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.3457 1.141 h = 0.001 0.001 y[1] (numeric) = 0.211476791568 1.00968136607 y[1] (closed_form) = 0 0 absolute error = 1.032 relative error = -100 % Correct digits = -16 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.3467 1.142 h = 0.001 0.003 y[1] (numeric) = 0.212428653588 1.01069823219 y[1] (closed_form) = 0 0 absolute error = 1.033 relative error = -100 % Correct digits = -16 Radius of convergence (given) for eq 1 = 2.171 Order of pole (given) = 0.5 0 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 0.3477 1.145 h = 0.0001 0.004 y[1] (numeric) = 0.213315633604 1.01368391955 y[1] (closed_form) = 0 0 absolute error = 1.036 relative error = -100 % Correct digits = -16 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.3478 1.149 h = 0.003 0.006 y[1] (numeric) = 0.213284244683 1.01762521187 y[1] (closed_form) = 0 0 absolute error = 1.04 relative error = -100 % Correct digits = -16 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=3150.6MB, alloc=52.3MB, time=39.03 x[1] = 0.3508 1.155 h = 0.0001 0.005 y[1] (numeric) = 0.216043296595 1.02363053679 y[1] (closed_form) = 0 0 absolute error = 1.046 relative error = -100 % Correct digits = -16 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.3509 1.16 h = 0.0001 0.003 y[1] (numeric) = 0.215979699502 1.02855810894 y[1] (closed_form) = 0 0 absolute error = 1.051 relative error = -100 % Correct digits = -16 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 x[1] = 0.351 1.163 h = 0.001 0.001 y[1] (numeric) = 0.215980875869 1.03151645537 y[1] (closed_form) = 0 0 absolute error = 1.054 relative error = -100 % Correct digits = -16 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.352 1.164 h = 0.001 0.003 y[1] (numeric) = 0.216933554907 1.03253404628 y[1] (closed_form) = 0 0 absolute error = 1.055 relative error = -100 % Correct digits = -16 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 memory used=3196.6MB, alloc=52.3MB, time=39.60 x[1] = 0.353 1.167 h = 0.0001 0.004 y[1] (numeric) = 0.217821444566 1.03552199622 y[1] (closed_form) = 0 0 absolute error = 1.058 relative error = -100 % Correct digits = -16 Radius of convergence (given) for eq 1 = 2.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 x[1] = 0.3531 1.171 h = 0.003 0.006 y[1] (numeric) = 0.217790327722 1.03946635539 y[1] (closed_form) = 0 0 absolute error = 1.062 relative error = -100 % Correct digits = -16 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 x[1] = 0.3561 1.177 h = 0.0001 0.005 y[1] (numeric) = 0.220551991994 1.04547612323 y[1] (closed_form) = 0 0 absolute error = 1.068 relative error = -100 % Correct digits = -16 Radius of convergence (given) for eq 1 = 2.198 Order of pole (given) = 0.5 0 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 0.3562 1.182 h = 0.0001 0.003 y[1] (numeric) = 0.220488751587 1.05040750022 y[1] (closed_form) = 0 0 absolute error = 1.073 relative error = -100 % Correct digits = -16 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 memory used=3242.6MB, alloc=52.3MB, time=40.16 x[1] = 0.3563 1.185 h = 0.001 0.001 y[1] (numeric) = 0.2204901845 1.05336812165 y[1] (closed_form) = 0 0 absolute error = 1.076 relative error = -100 % Correct digits = -16 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.3573 1.186 h = 0.0001 0.004 y[1] (numeric) = 0.221443685376 1.05438640921 y[1] (closed_form) = 0 0 absolute error = 1.077 relative error = -100 % Correct digits = -16 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.3574 1.19 h = 0.003 0.006 y[1] (numeric) = 0.221412818471 1.05833337389 y[1] (closed_form) = 0 0 absolute error = 1.081 relative error = -100 % Correct digits = -16 Radius of convergence (given) for eq 1 = 2.206 Order of pole (given) = 0.5 0 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 0.3604 1.196 h = 0.0001 0.005 y[1] (numeric) = 0.224176730448 1.06434690273 y[1] (closed_form) = 0 0 absolute error = 1.088 relative error = -100 % Correct digits = -16 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 memory used=3288.6MB, alloc=52.3MB, time=40.73 x[1] = 0.3605 1.201 h = 0.0001 0.003 y[1] (numeric) = 0.22411381622 1.069281512 y[1] (closed_form) = 0 0 absolute error = 1.093 relative error = -100 % Correct digits = -16 Radius of convergence (given) for eq 1 = 2.214 Order of pole (given) = 0.5 0 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 0.3606 1.204 h = 0.001 0.001 y[1] (numeric) = 0.224115480892 1.07224406581 y[1] (closed_form) = 0 0 absolute error = 1.095 relative error = -100 % Correct digits = -16 Radius of convergence (given) for eq 1 = 2.216 Order of pole (given) = 0.5 0 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 0.3616 1.205 h = 0.001 0.003 y[1] (numeric) = 0.225069684565 1.07326294065 y[1] (closed_form) = 0 0 absolute error = 1.097 relative error = -100 % Correct digits = -16 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.3626 1.208 h = 0.0001 0.004 y[1] (numeric) = 0.225959340044 1.07625497581 y[1] (closed_form) = 0 0 absolute error = 1.1 relative error = -100 % Correct digits = -16 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 memory used=3334.6MB, alloc=52.3MB, time=41.30 x[1] = 0.3627 1.212 h = 0.003 0.006 y[1] (numeric) = 0.225928863416 1.08020491746 y[1] (closed_form) = 0 0 absolute error = 1.104 relative error = -100 % Correct digits = -16 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.3657 1.218 h = 0.0001 0.005 y[1] (numeric) = 0.22869550176 1.08622266858 y[1] (closed_form) = 0 0 absolute error = 1.11 relative error = -100 % Correct digits = -16 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.3658 1.223 h = 0.0001 0.003 y[1] (numeric) = 0.228633089859 1.09116097043 y[1] (closed_form) = 0 0 absolute error = 1.115 relative error = -100 % Correct digits = -16 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.3659 1.226 h = 0.001 0.001 y[1] (numeric) = 0.228635096916 1.09412573032 y[1] (closed_form) = 0 0 absolute error = 1.118 relative error = -100 % Correct digits = -16 Radius of convergence (given) for eq 1 = 2.233 Order of pole (given) = 0.5 0 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 0.3669 1.227 h = 0.001 0.003 y[1] (numeric) = 0.229590129565 1.09514525053 y[1] (closed_form) = 0 0 absolute error = 1.119 relative error = -100 % Correct digits = -16 Radius of convergence (given) for eq 1 = 2.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 memory used=3380.7MB, alloc=52.3MB, time=41.87 x[1] = 0.3679 1.23 h = 0.0001 0.004 y[1] (numeric) = 0.230480797715 1.09813940158 y[1] (closed_form) = 0 0 absolute error = 1.122 relative error = -100 % Correct digits = -16 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.368 1.234 h = 0.003 0.006 y[1] (numeric) = 0.230450771125 1.10209227047 y[1] (closed_form) = 0 0 absolute error = 1.126 relative error = -100 % Correct digits = -16 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.371 1.24 h = 0.0001 0.005 y[1] (numeric) = 0.233220190408 1.1081141257 y[1] (closed_form) = 0 0 absolute error = 1.132 relative error = -100 % Correct digits = -16 Radius of convergence (given) for eq 1 = 2.245 Order of pole (given) = 0.5 0 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 0.3711 1.245 h = 0.0001 0.003 y[1] (numeric) = 0.233158354489 1.11305605797 y[1] (closed_form) = 0 0 absolute error = 1.137 relative error = -100 % Correct digits = -16 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=3426.6MB, alloc=52.3MB, time=42.44 x[1] = 0.3712 1.248 h = 0.001 0.001 y[1] (numeric) = 0.233160747279 1.11602298586 y[1] (closed_form) = 0 0 absolute error = 1.14 relative error = -100 % Correct digits = -16 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.3722 1.249 h = 0.001 0.003 y[1] (numeric) = 0.234116611457 1.11704312441 y[1] (closed_form) = 0 0 absolute error = 1.141 relative error = -100 % Correct digits = -16 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.3732 1.252 h = 0.0001 0.004 y[1] (numeric) = 0.2350083243 1.12003933993 y[1] (closed_form) = 0 0 absolute error = 1.144 relative error = -100 % Correct digits = -16 Radius of convergence (given) for eq 1 = 2.253 Order of pole (given) = 0.5 0 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 0.3733 1.256 h = 0.003 0.006 y[1] (numeric) = 0.23497880519 1.12399508563 y[1] (closed_form) = 0 0 absolute error = 1.148 relative error = -100 % Correct digits = -16 Radius of convergence (given) for eq 1 = 2.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 memory used=3472.6MB, alloc=52.3MB, time=43.01 x[1] = 0.3763 1.262 h = 0.0001 0.005 y[1] (numeric) = 0.237751055976 1.13002092751 y[1] (closed_form) = 0 0 absolute error = 1.155 relative error = -100 % Correct digits = -16 Radius of convergence (given) for eq 1 = 2.261 Order of pole (given) = 0.5 0 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 0.3764 1.267 h = 0.0001 0.003 y[1] (numeric) = 0.237689866789 1.13496642728 y[1] (closed_form) = 0 0 absolute error = 1.16 relative error = -100 % Correct digits = -16 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 x[1] = 0.3765 1.27 h = 0.001 0.001 y[1] (numeric) = 0.237692686915 1.13793548467 y[1] (closed_form) = 0 0 absolute error = 1.162 relative error = -100 % Correct digits = -16 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.3775 1.271 h = 0.001 0.003 y[1] (numeric) = 0.238649384437 1.13895621497 y[1] (closed_form) = 0 0 absolute error = 1.164 relative error = -100 % Correct digits = -16 Radius of convergence (given) for eq 1 = 2.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=3518.5MB, alloc=52.3MB, time=43.58 x[1] = 0.3785 1.274 h = 0.0001 0.004 y[1] (numeric) = 0.239542172111 1.14195444363 y[1] (closed_form) = 0 0 absolute error = 1.167 relative error = -100 % Correct digits = -16 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 x[1] = 0.3786 1.278 h = 0.003 0.006 y[1] (numeric) = 0.239513215609 1.14591301515 y[1] (closed_form) = 0 0 absolute error = 1.171 relative error = -100 % Correct digits = -16 Radius of convergence (given) for eq 1 = 2.272 Order of pole (given) = 0.5 0 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 0.3816 1.284 h = 0.0001 0.005 y[1] (numeric) = 0.242288344569 1.15194272703 y[1] (closed_form) = 0 0 absolute error = 1.177 relative error = -100 % Correct digits = -16 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.3817 1.289 h = 0.0001 0.003 y[1] (numeric) = 0.242227869997 1.1568917307 y[1] (closed_form) = 0 0 absolute error = 1.182 relative error = -100 % Correct digits = -16 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 memory used=3564.5MB, alloc=52.3MB, time=44.14 x[1] = 0.3818 1.292 h = 0.001 0.001 y[1] (numeric) = 0.242231157339 1.15986287872 y[1] (closed_form) = 0 0 absolute error = 1.185 relative error = -100 % Correct digits = -16 Radius of convergence (given) for eq 1 = 2.283 Order of pole (given) = 0.5 0 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 0.3828 1.293 h = 0.0001 0.004 y[1] (numeric) = 0.243188689314 1.16088417459 y[1] (closed_form) = 0 0 absolute error = 1.186 relative error = -100 % Correct digits = -16 Radius of convergence (given) for eq 1 = 2.284 Order of pole (given) = 0.5 0 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 0.3829 1.297 h = 0.003 0.006 y[1] (numeric) = 0.243160226647 1.16484514487 y[1] (closed_form) = 0 0 absolute error = 1.19 relative error = -100 % Correct digits = -16 Radius of convergence (given) for eq 1 = 2.286 Order of pole (given) = 0.5 0 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 0.3859 1.303 h = 0.0001 0.005 y[1] (numeric) = 0.245937823295 1.17087813018 y[1] (closed_form) = 0 0 absolute error = 1.196 relative error = -100 % Correct digits = -16 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.386 1.308 h = 0.0001 0.003 y[1] (numeric) = 0.245877975349 1.17583010808 y[1] (closed_form) = 0 0 absolute error = 1.201 relative error = -100 % Correct digits = -16 Radius of convergence (given) for eq 1 = 2.295 Order of pole (given) = 0.5 0 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 memory used=3610.5MB, alloc=52.3MB, time=44.71 x[1] = 0.3861 1.311 h = 0.001 0.001 y[1] (numeric) = 0.245881671227 1.17880303047 y[1] (closed_form) = 0 0 absolute error = 1.204 relative error = -100 % Correct digits = -16 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.3871 1.312 h = 0.001 0.003 y[1] (numeric) = 0.246839915521 1.17982480249 y[1] (closed_form) = 0 0 absolute error = 1.205 relative error = -100 % Correct digits = -16 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 x[1] = 0.3881 1.315 h = 0.0001 0.004 y[1] (numeric) = 0.247734754605 1.1828266547 y[1] (closed_form) = 0 0 absolute error = 1.208 relative error = -100 % Correct digits = -16 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.3882 1.319 h = 0.003 0.006 y[1] (numeric) = 0.247706951735 1.18679035525 y[1] (closed_form) = 0 0 absolute error = 1.212 relative error = -100 % Correct digits = -16 Radius of convergence (given) for eq 1 = 2.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 memory used=3656.4MB, alloc=52.3MB, time=45.28 x[1] = 0.3912 1.325 h = 0.0001 0.005 y[1] (numeric) = 0.250487504772 1.19282699646 y[1] (closed_form) = 0 0 absolute error = 1.219 relative error = -100 % Correct digits = -16 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.3913 1.33 h = 0.0001 0.003 y[1] (numeric) = 0.25042849106 1.1977823592 y[1] (closed_form) = 0 0 absolute error = 1.224 relative error = -100 % Correct digits = -16 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.3914 1.333 h = 0.001 0.001 y[1] (numeric) = 0.250432724346 1.20075729955 y[1] (closed_form) = 0 0 absolute error = 1.227 relative error = -100 % Correct digits = -16 Radius of convergence (given) for eq 1 = 2.314 Order of pole (given) = 0.5 0 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 0.3924 1.334 h = 0.001 0.003 y[1] (numeric) = 0.251391803673 1.20177958963 y[1] (closed_form) = 0 0 absolute error = 1.228 relative error = -100 % Correct digits = -16 Radius of convergence (given) for eq 1 = 2.315 Order of pole (given) = 0.5 0 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 memory used=3702.4MB, alloc=52.3MB, time=45.84 x[1] = 0.3934 1.337 h = 0.0001 0.004 y[1] (numeric) = 0.252287794407 1.20478330949 y[1] (closed_form) = 0 0 absolute error = 1.231 relative error = -100 % Correct digits = -16 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 x[1] = 0.3935 1.341 h = 0.003 0.006 y[1] (numeric) = 0.252260700029 1.20874968816 y[1] (closed_form) = 0 0 absolute error = 1.235 relative error = -100 % Correct digits = -16 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.3965 1.347 h = 0.0001 0.005 y[1] (numeric) = 0.255044245583 1.21478987143 y[1] (closed_form) = 0 0 absolute error = 1.241 relative error = -100 % Correct digits = -16 Radius of convergence (given) for eq 1 = 2.326 Order of pole (given) = 0.5 0 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 0.3966 1.352 h = 0.0001 0.003 y[1] (numeric) = 0.254986126051 1.21974855398 y[1] (closed_form) = 0 0 absolute error = 1.246 relative error = -100 % Correct digits = -16 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 memory used=3748.5MB, alloc=52.3MB, time=46.41 x[1] = 0.3967 1.355 h = 0.001 0.001 y[1] (numeric) = 0.25499093186 1.22272547268 y[1] (closed_form) = 0 0 absolute error = 1.249 relative error = -100 % Correct digits = -16 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.3977 1.356 h = 0.001 0.003 y[1] (numeric) = 0.255950845459 1.22374825593 y[1] (closed_form) = 0 0 absolute error = 1.25 relative error = -100 % Correct digits = -16 Radius of convergence (given) for eq 1 = 2.332 Order of pole (given) = 0.5 0 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 0.3987 1.359 h = 0.0001 0.004 y[1] (numeric) = 0.256848011129 1.22675379297 y[1] (closed_form) = 0 0 absolute error = 1.253 relative error = -100 % Correct digits = -16 Radius of convergence (given) for eq 1 = 2.335 Order of pole (given) = 0.5 0 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 0.3988 1.363 h = 0.003 0.006 y[1] (numeric) = 0.25682167179 1.2307227973 y[1] (closed_form) = 0 0 absolute error = 1.257 relative error = -100 % Correct digits = -16 Radius of convergence (given) for eq 1 = 2.337 Order of pole (given) = 0.5 0 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 memory used=3794.5MB, alloc=52.3MB, time=46.98 x[1] = 0.4018 1.369 h = 0.0001 0.005 y[1] (numeric) = 0.259608242522 1.23676640995 y[1] (closed_form) = 0 0 absolute error = 1.264 relative error = -100 % Correct digits = -16 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.4019 1.374 h = 0.0001 0.003 y[1] (numeric) = 0.259551074434 1.24172834699 y[1] (closed_form) = 0 0 absolute error = 1.269 relative error = -100 % Correct digits = -16 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.402 1.377 h = 0.001 0.001 y[1] (numeric) = 0.259556486274 1.24470720427 y[1] (closed_form) = 0 0 absolute error = 1.271 relative error = -100 % Correct digits = -16 Radius of convergence (given) for eq 1 = 2.348 Order of pole (given) = 0.5 0 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 0.403 1.378 h = 0.001 0.003 y[1] (numeric) = 0.260517232783 1.24573045625 y[1] (closed_form) = 0 0 absolute error = 1.273 relative error = -100 % Correct digits = -16 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 memory used=3840.4MB, alloc=52.3MB, time=47.54 x[1] = 0.404 1.381 h = 0.0001 0.004 y[1] (numeric) = 0.261415595015 1.24873776035 y[1] (closed_form) = 0 0 absolute error = 1.276 relative error = -100 % Correct digits = -16 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.4041 1.385 h = 0.003 0.006 y[1] (numeric) = 0.261390055135 1.25270933768 y[1] (closed_form) = 0 0 absolute error = 1.28 relative error = -100 % Correct digits = -16 Radius of convergence (given) for eq 1 = 2.355 Order of pole (given) = 0.5 0 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 0.4071 1.391 h = 0.0001 0.005 y[1] (numeric) = 0.264179680351 1.25875626824 y[1] (closed_form) = 0 0 absolute error = 1.286 relative error = -100 % Correct digits = -16 Radius of convergence (given) for eq 1 = 2.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.4072 1.396 h = 0.0001 0.003 y[1] (numeric) = 0.264123518339 1.26372139422 y[1] (closed_form) = 0 0 absolute error = 1.291 relative error = -100 % Correct digits = -16 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.4073 1.399 h = 0.001 0.001 y[1] (numeric) = 0.264129568139 1.26670215021 y[1] (closed_form) = 0 0 absolute error = 1.294 relative error = -100 % Correct digits = -16 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=3886.4MB, alloc=52.3MB, time=48.11 x[1] = 0.4083 1.4 h = 0.003 0.006 y[1] (numeric) = 0.265091145626 1.26772584699 y[1] (closed_form) = 0 0 absolute error = 1.295 relative error = -100 % Correct digits = -16 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.4113 1.406 h = 0.0001 0.005 y[1] (numeric) = 0.267882967532 1.27377491827 y[1] (closed_form) = 0 0 absolute error = 1.302 relative error = -100 % Correct digits = -16 Radius of convergence (given) for eq 1 = 2.373 Order of pole (given) = 0.5 0 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 0.4114 1.411 h = 0.0001 0.003 y[1] (numeric) = 0.267827606309 1.27874217287 y[1] (closed_form) = 0 0 absolute error = 1.306 relative error = -100 % Correct digits = -16 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.4115 1.414 h = 0.001 0.001 y[1] (numeric) = 0.267834159311 1.28172419481 y[1] (closed_form) = 0 0 absolute error = 1.309 relative error = -100 % Correct digits = -16 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 memory used=3932.2MB, alloc=52.3MB, time=48.68 x[1] = 0.4125 1.415 h = 0.001 0.003 y[1] (numeric) = 0.268796317514 1.28274816305 y[1] (closed_form) = 0 0 absolute error = 1.311 relative error = -100 % Correct digits = -16 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.4135 1.418 h = 0.0001 0.004 y[1] (numeric) = 0.269696785761 1.28575830589 y[1] (closed_form) = 0 0 absolute error = 1.314 relative error = -100 % Correct digits = -16 Radius of convergence (given) for eq 1 = 2.382 Order of pole (given) = 0.5 0 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 0.4136 1.422 h = 0.003 0.006 y[1] (numeric) = 0.269672752138 1.28973408396 y[1] (closed_form) = 0 0 absolute error = 1.318 relative error = -100 % Correct digits = -16 Radius of convergence (given) for eq 1 = 2.384 Order of pole (given) = 0.5 0 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 0.4166 1.428 h = 0.0001 0.005 y[1] (numeric) = 0.272467668009 1.29578628733 y[1] (closed_form) = 0 0 absolute error = 1.324 relative error = -100 % Correct digits = -16 Radius of convergence (given) for eq 1 = 2.39 Order of pole (given) = 0.5 0 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 memory used=3978.3MB, alloc=52.3MB, time=49.25 x[1] = 0.4167 1.433 h = 0.0001 0.003 y[1] (numeric) = 0.272413397596 1.30075661869 y[1] (closed_form) = 0 0 absolute error = 1.329 relative error = -100 % Correct digits = -16 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 x[1] = 0.4168 1.436 h = 0.001 0.001 y[1] (numeric) = 0.272420637963 1.30374047121 y[1] (closed_form) = 0 0 absolute error = 1.332 relative error = -100 % Correct digits = -16 Radius of convergence (given) for eq 1 = 2.395 Order of pole (given) = 0.5 0 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 0.4178 1.437 h = 0.001 0.003 y[1] (numeric) = 0.273383622079 1.30476484499 y[1] (closed_form) = 0 0 absolute error = 1.333 relative error = -100 % Correct digits = -16 Radius of convergence (given) for eq 1 = 2.396 Order of pole (given) = 0.5 0 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 0.4188 1.44 h = 0.0001 0.004 y[1] (numeric) = 0.274285335914 1.30777662167 y[1] (closed_form) = 0 0 absolute error = 1.336 relative error = -100 % Correct digits = -16 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 memory used=4024.3MB, alloc=52.3MB, time=49.81 x[1] = 0.4189 1.444 h = 0.003 0.006 y[1] (numeric) = 0.274262209599 1.31175482975 y[1] (closed_form) = 0 0 absolute error = 1.34 relative error = -100 % Correct digits = -16 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.4219 1.45 h = 0.0001 0.005 y[1] (numeric) = 0.277060240251 1.31781005754 y[1] (closed_form) = 0 0 absolute error = 1.347 relative error = -100 % Correct digits = -16 Radius of convergence (given) for eq 1 = 2.408 Order of pole (given) = 0.5 0 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 0.422 1.455 h = 0.0001 0.003 y[1] (numeric) = 0.277007108474 1.32278339994 y[1] (closed_form) = 0 0 absolute error = 1.351 relative error = -100 % Correct digits = -16 Radius of convergence (given) for eq 1 = 2.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.4221 1.458 h = 0.001 0.001 y[1] (numeric) = 0.277015064062 1.32576904315 y[1] (closed_form) = 0 0 absolute error = 1.354 relative error = -100 % Correct digits = -16 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 memory used=4070.2MB, alloc=52.3MB, time=50.38 x[1] = 0.4231 1.459 h = 0.001 0.003 y[1] (numeric) = 0.277978870761 1.32679379983 y[1] (closed_form) = 0 0 absolute error = 1.356 relative error = -100 % Correct digits = -16 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 x[1] = 0.4241 1.462 h = 0.0001 0.004 y[1] (numeric) = 0.278881846099 1.32980716182 y[1] (closed_form) = 0 0 absolute error = 1.359 relative error = -100 % Correct digits = -16 Radius of convergence (given) for eq 1 = 2.417 Order of pole (given) = 0.5 0 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 0.4242 1.466 h = 0.003 0.006 y[1] (numeric) = 0.27885966404 1.33378774708 y[1] (closed_form) = 0 0 absolute error = 1.363 relative error = -100 % Correct digits = -16 Radius of convergence (given) for eq 1 = 2.419 Order of pole (given) = 0.5 0 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 0.4272 1.472 h = 0.0001 0.005 y[1] (numeric) = 0.28166082739 1.33984589298 y[1] (closed_form) = 0 0 absolute error = 1.369 relative error = -100 % Correct digits = -16 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 x[1] = 0.4273 1.477 h = 0.0001 0.003 y[1] (numeric) = 0.281608879642 1.34482218075 y[1] (closed_form) = 0 0 absolute error = 1.374 relative error = -100 % Correct digits = -16 Radius of convergence (given) for eq 1 = 2.428 Order of pole (given) = 0.5 0 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 memory used=4116.3MB, alloc=52.3MB, time=50.95 x[1] = 0.4274 1.48 h = 0.001 0.001 y[1] (numeric) = 0.281617576856 1.34780957482 y[1] (closed_form) = 0 0 absolute error = 1.377 relative error = -100 % Correct digits = -16 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.4284 1.481 h = 0.0001 0.004 y[1] (numeric) = 0.282582202329 1.34883469225 y[1] (closed_form) = 0 0 absolute error = 1.378 relative error = -100 % Correct digits = -16 Radius of convergence (given) for eq 1 = 2.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 x[1] = 0.4285 1.485 h = 0.003 0.006 y[1] (numeric) = 0.282560833698 1.35281729333 y[1] (closed_form) = 0 0 absolute error = 1.382 relative error = -100 % Correct digits = -16 Radius of convergence (given) for eq 1 = 2.434 Order of pole (given) = 0.5 0 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 0.4315 1.491 h = 0.0001 0.005 y[1] (numeric) = 0.285364672678 1.35887790459 y[1] (closed_form) = 0 0 absolute error = 1.389 relative error = -100 % Correct digits = -16 Radius of convergence (given) for eq 1 = 2.44 Order of pole (given) = 0.5 0 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 memory used=4162.4MB, alloc=52.3MB, time=51.52 x[1] = 0.4316 1.496 h = 0.0001 0.003 y[1] (numeric) = 0.285313744615 1.36385668993 y[1] (closed_form) = 0 0 absolute error = 1.393 relative error = -100 % Correct digits = -16 Radius of convergence (given) for eq 1 = 2.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.4317 1.499 h = 0.001 0.001 y[1] (numeric) = 0.285323080044 1.3668455685 y[1] (closed_form) = 0 0 absolute error = 1.396 relative error = -100 % Correct digits = -16 Radius of convergence (given) for eq 1 = 2.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.4327 1.5 h = 0.001 0.003 y[1] (numeric) = 0.286288402945 1.36787098876 y[1] (closed_form) = 0 0 absolute error = 1.398 relative error = -100 % Correct digits = -16 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.4337 1.503 h = 0.0001 0.004 y[1] (numeric) = 0.287193745564 1.37088718858 y[1] (closed_form) = 0 0 absolute error = 1.401 relative error = -100 % Correct digits = -16 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 memory used=4208.3MB, alloc=52.3MB, time=52.08 x[1] = 0.4338 1.507 h = 0.003 0.006 y[1] (numeric) = 0.287173385494 1.37487206919 y[1] (closed_form) = 0 0 absolute error = 1.405 relative error = -100 % Correct digits = -16 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.4368 1.513 h = 0.0001 0.005 y[1] (numeric) = 0.28998038424 1.38093540487 y[1] (closed_form) = 0 0 absolute error = 1.411 relative error = -100 % Correct digits = -16 Radius of convergence (given) for eq 1 = 2.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.4369 1.518 h = 0.0001 0.003 y[1] (numeric) = 0.289930719177 1.38591701418 y[1] (closed_form) = 0 0 absolute error = 1.416 relative error = -100 % Correct digits = -16 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.437 1.521 h = 0.001 0.001 y[1] (numeric) = 0.289940842088 1.38890757006 y[1] (closed_form) = 0 0 absolute error = 1.419 relative error = -100 % Correct digits = -16 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 memory used=4254.2MB, alloc=52.3MB, time=52.65 x[1] = 0.438 1.522 h = 0.001 0.003 y[1] (numeric) = 0.290906975734 1.3899333111 y[1] (closed_form) = 0 0 absolute error = 1.42 relative error = -100 % Correct digits = -16 Radius of convergence (given) for eq 1 = 2.464 Order of pole (given) = 0.5 0 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 0.439 1.525 h = 0.0001 0.004 y[1] (numeric) = 0.291813618144 1.39295096035 y[1] (closed_form) = 0 0 absolute error = 1.423 relative error = -100 % Correct digits = -16 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 x[1] = 0.4391 1.529 h = 0.003 0.006 y[1] (numeric) = 0.291794298194 1.39693806803 y[1] (closed_form) = 0 0 absolute error = 1.427 relative error = -100 % Correct digits = -16 Radius of convergence (given) for eq 1 = 2.469 Order of pole (given) = 0.5 0 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 0.4421 1.535 h = 0.0001 0.005 y[1] (numeric) = 0.294604466742 1.40300402617 y[1] (closed_form) = 0 0 absolute error = 1.434 relative error = -100 % Correct digits = -16 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 memory used=4300.3MB, alloc=52.3MB, time=53.22 x[1] = 0.4422 1.54 h = 0.0001 0.003 y[1] (numeric) = 0.294556103428 1.40798839425 y[1] (closed_form) = 0 0 absolute error = 1.438 relative error = -100 % Correct digits = -16 Radius of convergence (given) for eq 1 = 2.479 Order of pole (given) = 0.5 0 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 0.4423 1.543 h = 0.001 0.001 y[1] (numeric) = 0.294567036258 1.41098058796 y[1] (closed_form) = 0 0 absolute error = 1.441 relative error = -100 % Correct digits = -16 Radius of convergence (given) for eq 1 = 2.481 Order of pole (given) = 0.5 0 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 0.4433 1.544 h = 0.001 0.003 y[1] (numeric) = 0.295533975597 1.41200662902 y[1] (closed_form) = 0 0 absolute error = 1.443 relative error = -100 % Correct digits = -16 Radius of convergence (given) for eq 1 = 2.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.4443 1.547 h = 0.0001 0.004 y[1] (numeric) = 0.296441928397 1.41502568122 y[1] (closed_form) = 0 0 absolute error = 1.446 relative error = -100 % Correct digits = -16 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.4444 1.551 h = 0.003 0.006 y[1] (numeric) = 0.296423678343 1.41901496371 y[1] (closed_form) = 0 0 absolute error = 1.45 relative error = -100 % Correct digits = -16 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 memory used=4346.3MB, alloc=52.3MB, time=53.79 x[1] = 0.4474 1.557 h = 0.0001 0.005 y[1] (numeric) = 0.299237024178 1.42508344395 y[1] (closed_form) = 0 0 absolute error = 1.456 relative error = -100 % Correct digits = -16 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.4475 1.562 h = 0.0001 0.003 y[1] (numeric) = 0.299189999151 1.43007050587 y[1] (closed_form) = 0 0 absolute error = 1.461 relative error = -100 % Correct digits = -16 Radius of convergence (given) for eq 1 = 2.497 Order of pole (given) = 0.5 0 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 0.4476 1.565 h = 0.001 0.001 y[1] (numeric) = 0.299201763017 1.43306429812 y[1] (closed_form) = 0 0 absolute error = 1.464 relative error = -100 % Correct digits = -16 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.4486 1.566 h = 0.001 0.003 y[1] (numeric) = 0.30016950261 1.43409061894 y[1] (closed_form) = 0 0 absolute error = 1.465 relative error = -100 % Correct digits = -16 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 memory used=4392.2MB, alloc=52.3MB, time=54.36 x[1] = 0.4496 1.569 h = 0.0001 0.004 y[1] (numeric) = 0.30107877513 1.43711102821 y[1] (closed_form) = 0 0 absolute error = 1.468 relative error = -100 % Correct digits = -16 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.4497 1.573 h = 0.003 0.006 y[1] (numeric) = 0.301061623005 1.44110243349 y[1] (closed_form) = 0 0 absolute error = 1.472 relative error = -100 % Correct digits = -16 Radius of convergence (given) for eq 1 = 2.505 Order of pole (given) = 0.5 0 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 0.4527 1.579 h = 0.0001 0.005 y[1] (numeric) = 0.303878151162 1.44717333714 y[1] (closed_form) = 0 0 absolute error = 1.479 relative error = -100 % Correct digits = -16 Radius of convergence (given) for eq 1 = 2.511 Order of pole (given) = 0.5 0 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 0.4528 1.584 h = 0.0001 0.003 y[1] (numeric) = 0.303832498805 1.45216302828 y[1] (closed_form) = 0 0 absolute error = 1.484 relative error = -100 % Correct digits = -16 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 memory used=4438.3MB, alloc=52.3MB, time=54.92 x[1] = 0.4529 1.587 h = 0.001 0.001 y[1] (numeric) = 0.30384511354 1.45515838002 y[1] (closed_form) = 0 0 absolute error = 1.487 relative error = -100 % Correct digits = -16 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.4539 1.588 h = 0.0001 0.004 y[1] (numeric) = 0.304813647579 1.45618496083 y[1] (closed_form) = 0 0 absolute error = 1.488 relative error = -100 % Correct digits = -16 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.454 1.592 h = 0.003 0.006 y[1] (numeric) = 0.304797437209 1.46017816545 y[1] (closed_form) = 0 0 absolute error = 1.492 relative error = -100 % Correct digits = -16 Radius of convergence (given) for eq 1 = 2.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.457 1.598 h = 0.0001 0.005 y[1] (numeric) = 0.307616679538 1.46625111527 y[1] (closed_form) = 0 0 absolute error = 1.498 relative error = -100 % Correct digits = -16 Radius of convergence (given) for eq 1 = 2.527 Order of pole (given) = 0.5 0 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 memory used=4484.3MB, alloc=52.3MB, time=55.49 x[1] = 0.4571 1.603 h = 0.0001 0.003 y[1] (numeric) = 0.307572204379 1.47124303498 y[1] (closed_form) = 0 0 absolute error = 1.503 relative error = -100 % Correct digits = -16 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.4572 1.606 h = 0.001 0.001 y[1] (numeric) = 0.307585548493 1.47423970843 y[1] (closed_form) = 0 0 absolute error = 1.506 relative error = -100 % Correct digits = -16 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.4582 1.607 h = 0.001 0.003 y[1] (numeric) = 0.308554758663 1.47526650695 y[1] (closed_form) = 0 0 absolute error = 1.507 relative error = -100 % Correct digits = -16 Radius of convergence (given) for eq 1 = 2.533 Order of pole (given) = 0.5 0 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 0.4592 1.61 h = 0.0001 0.004 y[1] (numeric) = 0.309466492655 1.47828933732 y[1] (closed_form) = 0 0 absolute error = 1.51 relative error = -100 % Correct digits = -16 Radius of convergence (given) for eq 1 = 2.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 memory used=4530.4MB, alloc=52.3MB, time=56.06 x[1] = 0.4593 1.614 h = 0.003 0.006 y[1] (numeric) = 0.309451428502 1.48228456903 y[1] (closed_form) = 0 0 absolute error = 1.514 relative error = -100 % Correct digits = -16 Radius of convergence (given) for eq 1 = 2.538 Order of pole (given) = 0.5 0 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 0.4623 1.62 h = 0.0001 0.005 y[1] (numeric) = 0.312273857467 1.48835976305 y[1] (closed_form) = 0 0 absolute error = 1.521 relative error = -100 % Correct digits = -16 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 x[1] = 0.4624 1.625 h = 0.0001 0.003 y[1] (numeric) = 0.312230814174 1.49335419317 y[1] (closed_form) = 0 0 absolute error = 1.526 relative error = -100 % Correct digits = -16 Radius of convergence (given) for eq 1 = 2.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.4625 1.628 h = 0.001 0.001 y[1] (numeric) = 0.312245043219 1.49635235432 y[1] (closed_form) = 0 0 absolute error = 1.529 relative error = -100 % Correct digits = -16 Radius of convergence (given) for eq 1 = 2.55 Order of pole (given) = 0.5 0 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 0.4635 1.629 h = 0.001 0.003 y[1] (numeric) = 0.313215036347 1.49737937728 y[1] (closed_form) = 0 0 absolute error = 1.53 relative error = -100 % Correct digits = -16 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 memory used=4576.2MB, alloc=52.3MB, time=56.63 x[1] = 0.4645 1.632 h = 0.0001 0.004 y[1] (numeric) = 0.314128110677 1.50040343697 y[1] (closed_form) = 0 0 absolute error = 1.533 relative error = -100 % Correct digits = -16 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.4646 1.636 h = 0.003 0.006 y[1] (numeric) = 0.314114216026 1.50440064473 y[1] (closed_form) = 0 0 absolute error = 1.537 relative error = -100 % Correct digits = -16 Radius of convergence (given) for eq 1 = 2.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.4676 1.642 h = 0.0001 0.005 y[1] (numeric) = 0.316939830169 1.51047798905 y[1] (closed_form) = 0 0 absolute error = 1.543 relative error = -100 % Correct digits = -16 Radius of convergence (given) for eq 1 = 2.563 Order of pole (given) = 0.5 0 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 0.4677 1.647 h = 0.0001 0.003 y[1] (numeric) = 0.31689824727 1.51547486616 y[1] (closed_form) = 0 0 absolute error = 1.548 relative error = -100 % Correct digits = -16 Radius of convergence (given) for eq 1 = 2.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 memory used=4622.2MB, alloc=52.3MB, time=57.20 x[1] = 0.4678 1.65 h = 0.001 0.001 y[1] (numeric) = 0.316913377593 1.51847447675 y[1] (closed_form) = 0 0 absolute error = 1.551 relative error = -100 % Correct digits = -16 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.4688 1.651 h = 0.001 0.003 y[1] (numeric) = 0.317884146931 1.51950170577 y[1] (closed_form) = 0 0 absolute error = 1.552 relative error = -100 % Correct digits = -16 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 x[1] = 0.4698 1.654 h = 0.0001 0.004 y[1] (numeric) = 0.318798566445 1.52252695136 y[1] (closed_form) = 0 0 absolute error = 1.556 relative error = -100 % Correct digits = -16 Radius of convergence (given) for eq 1 = 2.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 x[1] = 0.4699 1.658 h = 0.003 0.006 y[1] (numeric) = 0.318785863014 1.52652608448 y[1] (closed_form) = 0 0 absolute error = 1.559 relative error = -100 % Correct digits = -16 Radius of convergence (given) for eq 1 = 2.575 Order of pole (given) = 0.5 0 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 memory used=4667.9MB, alloc=52.3MB, time=57.76 x[1] = 0.4729 1.664 h = 0.0001 0.005 y[1] (numeric) = 0.321614658801 1.53260548695 y[1] (closed_form) = 0 0 absolute error = 1.566 relative error = -100 % Correct digits = -16 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 x[1] = 0.473 1.669 h = 0.0001 0.003 y[1] (numeric) = 0.321574562887 1.53760474815 y[1] (closed_form) = 0 0 absolute error = 1.571 relative error = -100 % Correct digits = -16 Radius of convergence (given) for eq 1 = 2.584 Order of pole (given) = 0.5 0 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 0.4731 1.672 h = 0.001 0.001 y[1] (numeric) = 0.321590609682 1.54060577022 y[1] (closed_form) = 0 0 absolute error = 1.574 relative error = -100 % Correct digits = -16 Radius of convergence (given) for eq 1 = 2.586 Order of pole (given) = 0.5 0 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 0.4741 1.673 h = 0.001 0.003 y[1] (numeric) = 0.322562148195 1.54163318741 y[1] (closed_form) = 0 0 absolute error = 1.575 relative error = -100 % Correct digits = -16 Radius of convergence (given) for eq 1 = 2.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 memory used=4713.8MB, alloc=52.3MB, time=58.33 x[1] = 0.4751 1.676 h = 0.0001 0.004 y[1] (numeric) = 0.323477916681 1.54465957613 y[1] (closed_form) = 0 0 absolute error = 1.578 relative error = -100 % Correct digits = -16 Radius of convergence (given) for eq 1 = 2.59 Order of pole (given) = 0.5 0 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 0.4752 1.68 h = 0.003 0.006 y[1] (numeric) = 0.323466424669 1.54866058437 y[1] (closed_form) = 0 0 absolute error = 1.582 relative error = -100 % Correct digits = -16 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.4782 1.686 h = 0.0001 0.005 y[1] (numeric) = 0.326298396573 1.55474195458 y[1] (closed_form) = 0 0 absolute error = 1.589 relative error = -100 % Correct digits = -16 Radius of convergence (given) for eq 1 = 2.599 Order of pole (given) = 0.5 0 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 0.4783 1.691 h = 0.0001 0.003 y[1] (numeric) = 0.326259812357 1.5597435375 y[1] (closed_form) = 0 0 absolute error = 1.594 relative error = -100 % Correct digits = -16 Radius of convergence (given) for eq 1 = 2.603 Order of pole (given) = 0.5 0 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 memory used=4759.7MB, alloc=52.3MB, time=58.90 x[1] = 0.4784 1.694 h = 0.001 0.001 y[1] (numeric) = 0.326276789703 1.56274593345 y[1] (closed_form) = 0 0 absolute error = 1.596 relative error = -100 % Correct digits = -16 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.4794 1.695 h = 0.0001 0.004 y[1] (numeric) = 0.327249090085 1.5637735214 y[1] (closed_form) = 0 0 absolute error = 1.598 relative error = -100 % Correct digits = -16 Radius of convergence (given) for eq 1 = 2.606 Order of pole (given) = 0.5 0 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 0.4795 1.699 h = 0.003 0.006 y[1] (numeric) = 0.327238634334 1.56777611855 y[1] (closed_form) = 0 0 absolute error = 1.602 relative error = -100 % Correct digits = -16 Radius of convergence (given) for eq 1 = 2.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.4825 1.705 h = 0.0001 0.005 y[1] (numeric) = 0.330073312249 1.57385914916 y[1] (closed_form) = 0 0 absolute error = 1.608 relative error = -100 % Correct digits = -16 Radius of convergence (given) for eq 1 = 2.615 Order of pole (given) = 0.5 0 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 memory used=4805.6MB, alloc=52.3MB, time=59.47 x[1] = 0.4826 1.71 h = 0.0001 0.003 y[1] (numeric) = 0.330036020992 1.57886269942 y[1] (closed_form) = 0 0 absolute error = 1.613 relative error = -100 % Correct digits = -16 Radius of convergence (given) for eq 1 = 2.618 Order of pole (given) = 0.5 0 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 0.4827 1.713 h = 0.001 0.001 y[1] (numeric) = 0.330053794008 1.58186625943 y[1] (closed_form) = 0 0 absolute error = 1.616 relative error = -100 % Correct digits = -16 Radius of convergence (given) for eq 1 = 2.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.4837 1.714 h = 0.001 0.003 y[1] (numeric) = 0.331026742378 1.58289398973 y[1] (closed_form) = 0 0 absolute error = 1.617 relative error = -100 % Correct digits = -16 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 x[1] = 0.4847 1.717 h = 0.0001 0.004 y[1] (numeric) = 0.33194501517 1.58592241029 y[1] (closed_form) = 0 0 absolute error = 1.62 relative error = -100 % Correct digits = -16 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.4848 1.721 h = 0.003 0.006 y[1] (numeric) = 0.331935805105 1.58992679048 y[1] (closed_form) = 0 0 absolute error = 1.624 relative error = -100 % Correct digits = -16 Radius of convergence (given) for eq 1 = 2.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 memory used=4851.4MB, alloc=52.3MB, time=60.04 x[1] = 0.4878 1.727 h = 0.0001 0.005 y[1] (numeric) = 0.334773644893 1.59601162514 y[1] (closed_form) = 0 0 absolute error = 1.631 relative error = -100 % Correct digits = -16 Radius of convergence (given) for eq 1 = 2.633 Order of pole (given) = 0.5 0 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 0.4879 1.732 h = 0.0001 0.003 y[1] (numeric) = 0.334737907236 1.6010173829 y[1] (closed_form) = 0 0 absolute error = 1.636 relative error = -100 % Correct digits = -16 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.488 1.735 h = 0.001 0.001 y[1] (numeric) = 0.334756634578 1.60402224796 y[1] (closed_form) = 0 0 absolute error = 1.639 relative error = -100 % Correct digits = -16 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.489 1.736 h = 0.001 0.003 y[1] (numeric) = 0.335730330763 1.60505011778 y[1] (closed_form) = 0 0 absolute error = 1.64 relative error = -100 % Correct digits = -16 Radius of convergence (given) for eq 1 = 2.64 Order of pole (given) = 0.5 0 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 memory used=4897.3MB, alloc=52.3MB, time=60.60 x[1] = 0.49 1.739 h = 0.0001 0.004 y[1] (numeric) = 0.336649958369 1.60807956303 y[1] (closed_form) = 0 0 absolute error = 1.643 relative error = -100 % Correct digits = -16 Radius of convergence (given) for eq 1 = 2.643 Order of pole (given) = 0.5 0 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 0.4901 1.743 h = 0.003 0.006 y[1] (numeric) = 0.336642010073 1.61208567742 y[1] (closed_form) = 0 0 absolute error = 1.647 relative error = -100 % Correct digits = -16 Radius of convergence (given) for eq 1 = 2.645 Order of pole (given) = 0.5 0 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 0.4931 1.749 h = 0.0001 0.005 y[1] (numeric) = 0.33948300098 1.61817223073 y[1] (closed_form) = 0 0 absolute error = 1.653 relative error = -100 % Correct digits = -16 Radius of convergence (given) for eq 1 = 2.652 Order of pole (given) = 0.5 0 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 0.4932 1.754 h = 0.0001 0.003 y[1] (numeric) = 0.33944883656 1.62318013535 y[1] (closed_form) = 0 0 absolute error = 1.658 relative error = -100 % Correct digits = -16 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=4943.2MB, alloc=52.3MB, time=61.17 x[1] = 0.4933 1.757 h = 0.001 0.001 y[1] (numeric) = 0.339468529292 1.62618626896 y[1] (closed_form) = 0 0 absolute error = 1.661 relative error = -100 % Correct digits = -16 Radius of convergence (given) for eq 1 = 2.657 Order of pole (given) = 0.5 0 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 0.4943 1.758 h = 0.001 0.003 y[1] (numeric) = 0.340442965307 1.62721426223 y[1] (closed_form) = 0 0 absolute error = 1.662 relative error = -100 % Correct digits = -16 Radius of convergence (given) for eq 1 = 2.659 Order of pole (given) = 0.5 0 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 0.4953 1.761 h = 0.0001 0.004 y[1] (numeric) = 0.341363947803 1.63024469212 y[1] (closed_form) = 0 0 absolute error = 1.666 relative error = -100 % Correct digits = -16 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.4954 1.765 h = 0.003 0.006 y[1] (numeric) = 0.341357276008 1.63425249236 y[1] (closed_form) = 0 0 absolute error = 1.67 relative error = -100 % Correct digits = -16 Radius of convergence (given) for eq 1 = 2.664 Order of pole (given) = 0.5 0 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 memory used=4989.0MB, alloc=52.3MB, time=61.75 x[1] = 0.4984 1.771 h = 0.0001 0.005 y[1] (numeric) = 0.344201405624 1.64034068071 y[1] (closed_form) = 0 0 absolute error = 1.676 relative error = -100 % Correct digits = -16 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.4985 1.776 h = 0.0001 0.003 y[1] (numeric) = 0.344168832412 1.64535067223 y[1] (closed_form) = 0 0 absolute error = 1.681 relative error = -100 % Correct digits = -16 Radius of convergence (given) for eq 1 = 2.674 Order of pole (given) = 0.5 0 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 0.4986 1.779 h = 0.001 0.001 y[1] (numeric) = 0.344189500609 1.64835803829 y[1] (closed_form) = 0 0 absolute error = 1.684 relative error = -100 % Correct digits = -16 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.4996 1.78 h = 0.001 0.003 y[1] (numeric) = 0.345164668267 1.64938613942 y[1] (closed_form) = 0 0 absolute error = 1.685 relative error = -100 % Correct digits = -16 Radius of convergence (given) for eq 1 = 2.677 Order of pole (given) = 0.5 0 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 memory used=5034.9MB, alloc=52.3MB, time=62.32 x[1] = 0.5006 1.783 h = 0.0001 0.004 y[1] (numeric) = 0.346087004864 1.65241751461 y[1] (closed_form) = 0 0 absolute error = 1.688 relative error = -100 % Correct digits = -16 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.5007 1.787 h = 0.003 0.006 y[1] (numeric) = 0.346081622991 1.65642695291 y[1] (closed_form) = 0 0 absolute error = 1.692 relative error = -100 % Correct digits = -16 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.5037 1.793 h = 0.0001 0.005 y[1] (numeric) = 0.348928877331 1.66251669447 y[1] (closed_form) = 0 0 absolute error = 1.699 relative error = -100 % Correct digits = -16 Radius of convergence (given) for eq 1 = 2.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.5038 1.798 h = 0.0001 0.003 y[1] (numeric) = 0.348897911685 1.66752871361 y[1] (closed_form) = 0 0 absolute error = 1.704 relative error = -100 % Correct digits = -16 Radius of convergence (given) for eq 1 = 2.692 Order of pole (given) = 0.5 0 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 0.5039 1.801 h = 0.001 0.001 y[1] (numeric) = 0.348919564466 1.67053727648 y[1] (closed_form) = 0 0 absolute error = 1.707 relative error = -100 % Correct digits = -16 Radius of convergence (given) for eq 1 = 2.694 Order of pole (given) = 0.5 0 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 memory used=5080.9MB, alloc=52.3MB, time=62.88 x[1] = 0.5049 1.802 h = 0.0001 0.004 y[1] (numeric) = 0.349895455394 1.67156547031 y[1] (closed_form) = 0 0 absolute error = 1.708 relative error = -100 % Correct digits = -16 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.505 1.806 h = 0.003 0.006 y[1] (numeric) = 0.349891174879 1.67557629636 y[1] (closed_form) = 0 0 absolute error = 1.712 relative error = -100 % Correct digits = -16 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.508 1.812 h = 0.0001 0.005 y[1] (numeric) = 0.352741089324 1.68166734765 y[1] (closed_form) = 0 0 absolute error = 1.718 relative error = -100 % Correct digits = -16 Radius of convergence (given) for eq 1 = 2.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.5081 1.817 h = 0.0001 0.003 y[1] (numeric) = 0.352711496118 1.68668108457 y[1] (closed_form) = 0 0 absolute error = 1.723 relative error = -100 % Correct digits = -16 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=5126.8MB, alloc=52.3MB, time=63.45 x[1] = 0.5082 1.82 h = 0.001 0.001 y[1] (numeric) = 0.352733989306 1.68969066125 y[1] (closed_form) = 0 0 absolute error = 1.726 relative error = -100 % Correct digits = -16 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.5092 1.821 h = 0.001 0.003 y[1] (numeric) = 0.353710495097 1.69071893157 y[1] (closed_form) = 0 0 absolute error = 1.727 relative error = -100 % Correct digits = -16 Radius of convergence (given) for eq 1 = 2.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.5102 1.824 h = 0.0001 0.004 y[1] (numeric) = 0.354635336256 1.69375197964 y[1] (closed_form) = 0 0 absolute error = 1.73 relative error = -100 % Correct digits = -16 Radius of convergence (given) for eq 1 = 2.714 Order of pole (given) = 0.5 0 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 0.5103 1.828 h = 0.003 0.006 y[1] (numeric) = 0.354632367858 1.69776435647 y[1] (closed_form) = 0 0 absolute error = 1.734 relative error = -100 % Correct digits = -16 Radius of convergence (given) for eq 1 = 2.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=5172.7MB, alloc=52.3MB, time=64.02 x[1] = 0.5133 1.834 h = 0.0001 0.005 y[1] (numeric) = 0.357485377997 1.70385681319 y[1] (closed_form) = 0 0 absolute error = 1.741 relative error = -100 % Correct digits = -16 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.5134 1.839 h = 0.0001 0.003 y[1] (numeric) = 0.357457419371 1.70887246952 y[1] (closed_form) = 0 0 absolute error = 1.746 relative error = -100 % Correct digits = -16 Radius of convergence (given) for eq 1 = 2.727 Order of pole (given) = 0.5 0 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 0.5135 1.842 h = 0.001 0.001 y[1] (numeric) = 0.357480912089 1.71188317795 y[1] (closed_form) = 0 0 absolute error = 1.749 relative error = -100 % Correct digits = -16 Radius of convergence (given) for eq 1 = 2.729 Order of pole (given) = 0.5 0 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 0.5145 1.843 h = 0.001 0.003 y[1] (numeric) = 0.358458125292 1.71291151388 y[1] (closed_form) = 0 0 absolute error = 1.75 relative error = -100 % Correct digits = -16 Radius of convergence (given) for eq 1 = 2.73 Order of pole (given) = 0.5 0 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 memory used=5218.5MB, alloc=52.3MB, time=64.59 x[1] = 0.5155 1.846 h = 0.0001 0.004 y[1] (numeric) = 0.359384314278 1.71594539872 y[1] (closed_form) = 0 0 absolute error = 1.753 relative error = -100 % Correct digits = -16 Radius of convergence (given) for eq 1 = 2.733 Order of pole (given) = 0.5 0 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 0.5156 1.85 h = 0.003 0.006 y[1] (numeric) = 0.359382667907 1.71995928025 y[1] (closed_form) = 0 0 absolute error = 1.757 relative error = -100 % Correct digits = -16 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.5186 1.856 h = 0.0001 0.005 y[1] (numeric) = 0.362238755653 1.72605306561 y[1] (closed_form) = 0 0 absolute error = 1.764 relative error = -100 % Correct digits = -16 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.5187 1.861 h = 0.0001 0.003 y[1] (numeric) = 0.362212443632 1.73107058418 y[1] (closed_form) = 0 0 absolute error = 1.769 relative error = -100 % Correct digits = -16 Radius of convergence (given) for eq 1 = 2.746 Order of pole (given) = 0.5 0 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 memory used=5264.4MB, alloc=52.3MB, time=65.16 x[1] = 0.5188 1.864 h = 0.001 0.001 y[1] (numeric) = 0.362236942434 1.73408239001 y[1] (closed_form) = 0 0 absolute error = 1.772 relative error = -100 % Correct digits = -16 Radius of convergence (given) for eq 1 = 2.748 Order of pole (given) = 0.5 0 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 0.5198 1.865 h = 0.001 0.003 y[1] (numeric) = 0.363214854217 1.73511077768 y[1] (closed_form) = 0 0 absolute error = 1.773 relative error = -100 % Correct digits = -16 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.5208 1.868 h = 0.0001 0.004 y[1] (numeric) = 0.364142387229 1.73814546277 y[1] (closed_form) = 0 0 absolute error = 1.776 relative error = -100 % Correct digits = -16 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.5209 1.872 h = 0.003 0.006 y[1] (numeric) = 0.364142071648 1.74216080351 y[1] (closed_form) = 0 0 absolute error = 1.78 relative error = -100 % Correct digits = -16 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 memory used=5310.3MB, alloc=52.3MB, time=65.72 x[1] = 0.5239 1.878 h = 0.0001 0.005 y[1] (numeric) = 0.367001217626 1.74825584248 y[1] (closed_form) = 0 0 absolute error = 1.786 relative error = -100 % Correct digits = -16 Radius of convergence (given) for eq 1 = 2.761 Order of pole (given) = 0.5 0 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 0.524 1.883 h = 0.0001 0.003 y[1] (numeric) = 0.366976562825 1.75327516689 y[1] (closed_form) = 0 0 absolute error = 1.791 relative error = -100 % Correct digits = -16 Radius of convergence (given) for eq 1 = 2.764 Order of pole (given) = 0.5 0 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 0.5241 1.886 h = 0.001 0.001 y[1] (numeric) = 0.367002073427 1.75628803625 y[1] (closed_form) = 0 0 absolute error = 1.794 relative error = -100 % Correct digits = -16 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.5251 1.887 h = 0.001 0.003 y[1] (numeric) = 0.36798067483 1.75731646221 y[1] (closed_form) = 0 0 absolute error = 1.795 relative error = -100 % Correct digits = -16 Radius of convergence (given) for eq 1 = 2.768 Order of pole (given) = 0.5 0 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 0.5261 1.89 h = 0.0001 0.004 y[1] (numeric) = 0.368909547375 1.76035191178 y[1] (closed_form) = 0 0 absolute error = 1.799 relative error = -100 % Correct digits = -16 Radius of convergence (given) for eq 1 = 2.771 Order of pole (given) = 0.5 0 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 memory used=5356.2MB, alloc=52.3MB, time=66.29 x[1] = 0.5262 1.894 h = 0.003 0.006 y[1] (numeric) = 0.368910570241 1.76436866687 y[1] (closed_form) = 0 0 absolute error = 1.803 relative error = -100 % Correct digits = -16 Radius of convergence (given) for eq 1 = 2.774 Order of pole (given) = 0.5 0 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 0.5292 1.9 h = 0.0001 0.005 y[1] (numeric) = 0.371772753863 1.77046488617 y[1] (closed_form) = 0 0 absolute error = 1.809 relative error = -100 % Correct digits = -16 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.5293 1.905 h = 0.0001 0.003 y[1] (numeric) = 0.371749765531 1.77548596082 y[1] (closed_form) = 0 0 absolute error = 1.814 relative error = -100 % Correct digits = -16 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.5294 1.908 h = 0.001 0.001 y[1] (numeric) = 0.371776292847 1.77849986033 y[1] (closed_form) = 0 0 absolute error = 1.817 relative error = -100 % Correct digits = -16 Radius of convergence (given) for eq 1 = 2.785 Order of pole (given) = 0.5 0 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 memory used=5402.2MB, alloc=52.3MB, time=66.86 x[1] = 0.5304 1.909 h = 0.0001 0.004 y[1] (numeric) = 0.37275557479 1.77952831157 y[1] (closed_form) = 0 0 absolute error = 1.818 relative error = -100 % Correct digits = -16 Radius of convergence (given) for eq 1 = 2.787 Order of pole (given) = 0.5 0 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 0.5305 1.913 h = 0.003 0.006 y[1] (numeric) = 0.372757738935 1.78354626472 y[1] (closed_form) = 0 0 absolute error = 1.822 relative error = -100 % Correct digits = -16 Radius of convergence (given) for eq 1 = 2.79 Order of pole (given) = 0.5 0 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 0.5335 1.919 h = 0.0001 0.005 y[1] (numeric) = 0.375622506992 1.7896434785 y[1] (closed_form) = 0 0 absolute error = 1.829 relative error = -100 % Correct digits = -16 Radius of convergence (given) for eq 1 = 2.796 Order of pole (given) = 0.5 0 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 0.5336 1.924 h = 0.0001 0.003 y[1] (numeric) = 0.375600939542 1.79466603575 y[1] (closed_form) = 0 0 absolute error = 1.834 relative error = -100 % Correct digits = -16 Radius of convergence (given) for eq 1 = 2.8 Order of pole (given) = 0.5 0 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 memory used=5448.2MB, alloc=52.3MB, time=67.43 x[1] = 0.5337 1.927 h = 0.001 0.001 y[1] (numeric) = 0.375628333613 1.79768080782 y[1] (closed_form) = 0 0 absolute error = 1.837 relative error = -100 % Correct digits = -16 Radius of convergence (given) for eq 1 = 2.802 Order of pole (given) = 0.5 0 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 0.5347 1.928 h = 0.001 0.003 y[1] (numeric) = 0.376608193894 1.79870927868 y[1] (closed_form) = 0 0 absolute error = 1.838 relative error = -100 % Correct digits = -16 Radius of convergence (given) for eq 1 = 2.803 Order of pole (given) = 0.5 0 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 0.5357 1.931 h = 0.0001 0.004 y[1] (numeric) = 0.377539536659 1.80174607384 y[1] (closed_form) = 0 0 absolute error = 1.841 relative error = -100 % Correct digits = -16 Radius of convergence (given) for eq 1 = 2.806 Order of pole (given) = 0.5 0 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 0.5358 1.935 h = 0.003 0.006 y[1] (numeric) = 0.377543051201 1.80576535965 y[1] (closed_form) = 0 0 absolute error = 1.845 relative error = -100 % Correct digits = -16 Radius of convergence (given) for eq 1 = 2.809 Order of pole (given) = 0.5 0 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 memory used=5494.1MB, alloc=52.3MB, time=68.00 x[1] = 0.5388 1.941 h = 0.0001 0.005 y[1] (numeric) = 0.380410816418 1.81186362177 y[1] (closed_form) = 0 0 absolute error = 1.851 relative error = -100 % Correct digits = -16 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.5389 1.946 h = 0.0001 0.003 y[1] (numeric) = 0.380390929831 1.81688782801 y[1] (closed_form) = 0 0 absolute error = 1.856 relative error = -100 % Correct digits = -16 Radius of convergence (given) for eq 1 = 2.819 Order of pole (given) = 0.5 0 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 0.539 1.949 h = 0.001 0.001 y[1] (numeric) = 0.380419348096 1.81990356949 y[1] (closed_form) = 0 0 absolute error = 1.859 relative error = -100 % Correct digits = -16 Radius of convergence (given) for eq 1 = 2.821 Order of pole (given) = 0.5 0 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 0.54 1.95 h = 0.001 0.003 y[1] (numeric) = 0.381399871897 1.82093204242 y[1] (closed_form) = 0 0 absolute error = 1.86 relative error = -100 % Correct digits = -16 Radius of convergence (given) for eq 1 = 2.822 Order of pole (given) = 0.5 0 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 memory used=5540.0MB, alloc=52.3MB, time=68.57 x[1] = 0.541 1.953 h = 0.0001 0.004 y[1] (numeric) = 0.382332538193 1.82396950368 y[1] (closed_form) = 0 0 absolute error = 1.864 relative error = -100 % Correct digits = -16 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 x[1] = 0.5411 1.957 h = 0.003 0.006 y[1] (numeric) = 0.382337407838 1.82799007918 y[1] (closed_form) = 0 0 absolute error = 1.868 relative error = -100 % Correct digits = -16 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.5441 1.963 h = 0.0001 0.005 y[1] (numeric) = 0.385208146504 1.83408932129 y[1] (closed_form) = 0 0 absolute error = 1.874 relative error = -100 % Correct digits = -16 Radius of convergence (given) for eq 1 = 2.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.5442 1.968 h = 0.0001 0.003 y[1] (numeric) = 0.385189946388 1.83911512325 y[1] (closed_form) = 0 0 absolute error = 1.879 relative error = -100 % Correct digits = -16 Radius of convergence (given) for eq 1 = 2.838 Order of pole (given) = 0.5 0 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 0.5443 1.971 h = 0.001 0.001 y[1] (numeric) = 0.38521939161 1.84213180219 y[1] (closed_form) = 0 0 absolute error = 1.882 relative error = -100 % Correct digits = -16 Radius of convergence (given) for eq 1 = 2.84 Order of pole (given) = 0.5 0 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 memory used=5585.8MB, alloc=52.3MB, time=69.13 x[1] = 0.5453 1.972 h = 0.001 0.003 y[1] (numeric) = 0.386200569579 1.84316026536 y[1] (closed_form) = 0 0 absolute error = 1.883 relative error = -100 % Correct digits = -16 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.5463 1.975 h = 0.0001 0.004 y[1] (numeric) = 0.387134552524 1.84619835977 y[1] (closed_form) = 0 0 absolute error = 1.886 relative error = -100 % Correct digits = -16 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.5464 1.979 h = 0.003 0.006 y[1] (numeric) = 0.387140781017 1.85022018264 y[1] (closed_form) = 0 0 absolute error = 1.89 relative error = -100 % Correct digits = -16 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.5494 1.985 h = 0.0001 0.005 y[1] (numeric) = 0.390014468459 1.85632033812 y[1] (closed_form) = 0 0 absolute error = 1.897 relative error = -100 % Correct digits = -16 Radius of convergence (given) for eq 1 = 2.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 memory used=5631.8MB, alloc=52.3MB, time=69.70 x[1] = 0.5495 1.99 h = 0.0001 0.003 y[1] (numeric) = 0.389997959244 1.86134768336 y[1] (closed_form) = 0 0 absolute error = 1.902 relative error = -100 % Correct digits = -16 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.5496 1.993 h = 0.001 0.001 y[1] (numeric) = 0.39002843349 1.86436526833 y[1] (closed_form) = 0 0 absolute error = 1.905 relative error = -100 % Correct digits = -16 Radius of convergence (given) for eq 1 = 2.859 Order of pole (given) = 0.5 0 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 0.5506 1.994 h = 0.001 0.003 y[1] (numeric) = 0.391010256202 1.86539371032 y[1] (closed_form) = 0 0 absolute error = 1.906 relative error = -100 % Correct digits = -16 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.5516 1.997 h = 0.0001 0.004 y[1] (numeric) = 0.391945548374 1.86843240564 y[1] (closed_form) = 0 0 absolute error = 1.909 relative error = -100 % Correct digits = -16 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=5677.6MB, alloc=52.3MB, time=70.27 x[1] = 0.5517 2.001 h = 0.003 0.006 y[1] (numeric) = 0.391953138538 1.87245543425 y[1] (closed_form) = 0 0 absolute error = 1.913 relative error = -100 % Correct digits = -16 Radius of convergence (given) for eq 1 = 2.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.5547 2.007 h = 0.0001 0.005 y[1] (numeric) = 0.394829749182 1.87855643815 y[1] (closed_form) = 0 0 absolute error = 1.92 relative error = -100 % Correct digits = -16 Radius of convergence (given) for eq 1 = 2.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.5548 2.012 h = 0.0001 0.003 y[1] (numeric) = 0.394814934164 1.88358527508 y[1] (closed_form) = 0 0 absolute error = 1.925 relative error = -100 % Correct digits = -16 Radius of convergence (given) for eq 1 = 2.876 Order of pole (given) = 0.5 0 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 0.5549 2.015 h = 0.001 0.001 y[1] (numeric) = 0.394846438832 1.88660373519 y[1] (closed_form) = 0 0 absolute error = 1.927 relative error = -100 % Correct digits = -16 Radius of convergence (given) for eq 1 = 2.878 Order of pole (given) = 0.5 0 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 memory used=5723.5MB, alloc=52.3MB, time=70.84 x[1] = 0.5559 2.016 h = 0.0001 0.004 y[1] (numeric) = 0.395828896803 1.88763214494 y[1] (closed_form) = 0 0 absolute error = 1.929 relative error = -100 % Correct digits = -16 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.556 2.02 h = 0.003 0.006 y[1] (numeric) = 0.395837646936 1.89165619487 y[1] (closed_form) = 0 0 absolute error = 1.933 relative error = -100 % Correct digits = -16 Radius of convergence (given) for eq 1 = 2.882 Order of pole (given) = 0.5 0 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 0.559 2.026 h = 0.0001 0.005 y[1] (numeric) = 0.398716743567 1.89775791273 y[1] (closed_form) = 0 0 absolute error = 1.939 relative error = -100 % Correct digits = -16 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.5591 2.031 h = 0.0001 0.003 y[1] (numeric) = 0.398703371714 1.9027880132 y[1] (closed_form) = 0 0 absolute error = 1.944 relative error = -100 % Correct digits = -16 Radius of convergence (given) for eq 1 = 2.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=5769.4MB, alloc=52.3MB, time=71.42 x[1] = 0.5592 2.034 h = 0.001 0.001 y[1] (numeric) = 0.398735754032 1.90580721453 y[1] (closed_form) = 0 0 absolute error = 1.947 relative error = -100 % Correct digits = -16 Radius of convergence (given) for eq 1 = 2.894 Order of pole (given) = 0.5 0 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 0.5602 2.035 h = 0.001 0.003 y[1] (numeric) = 0.399718751735 1.90683559542 y[1] (closed_form) = 0 0 absolute error = 1.948 relative error = -100 % Correct digits = -16 Radius of convergence (given) for eq 1 = 2.896 Order of pole (given) = 0.5 0 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 0.5612 2.038 h = 0.0001 0.004 y[1] (numeric) = 0.40065645229 1.90987534099 y[1] (closed_form) = 0 0 absolute error = 1.951 relative error = -100 % Correct digits = -16 Radius of convergence (given) for eq 1 = 2.899 Order of pole (given) = 0.5 0 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 0.5613 2.042 h = 0.003 0.006 y[1] (numeric) = 0.400666567488 1.91390052101 y[1] (closed_form) = 0 0 absolute error = 1.955 relative error = -100 % Correct digits = -16 Radius of convergence (given) for eq 1 = 2.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.5643 2.048 h = 0.0001 0.005 y[1] (numeric) = 0.403548538261 1.92000297056 y[1] (closed_form) = 0 0 absolute error = 1.962 relative error = -100 % Correct digits = -16 Radius of convergence (given) for eq 1 = 2.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=5815.4MB, alloc=52.3MB, time=71.98 x[1] = 0.5644 2.053 h = 0.0001 0.003 y[1] (numeric) = 0.40353686446 1.92503446901 y[1] (closed_form) = 0 0 absolute error = 1.967 relative error = -100 % Correct digits = -16 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.5645 2.056 h = 0.001 0.001 y[1] (numeric) = 0.403570278468 1.92805448936 y[1] (closed_form) = 0 0 absolute error = 1.97 relative error = -100 % Correct digits = -16 Radius of convergence (given) for eq 1 = 2.914 Order of pole (given) = 0.5 0 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 0.5655 2.057 h = 0.001 0.003 y[1] (numeric) = 0.404553893776 1.9290828184 y[1] (closed_form) = 0 0 absolute error = 1.971 relative error = -100 % Correct digits = -16 Radius of convergence (given) for eq 1 = 2.915 Order of pole (given) = 0.5 0 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 0.5665 2.06 h = 0.0001 0.004 y[1] (numeric) = 0.405492879933 1.93212307658 y[1] (closed_form) = 0 0 absolute error = 1.974 relative error = -100 % Correct digits = -16 Radius of convergence (given) for eq 1 = 2.918 Order of pole (given) = 0.5 0 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 memory used=5861.4MB, alloc=52.3MB, time=72.55 x[1] = 0.5666 2.064 h = 0.003 0.006 y[1] (numeric) = 0.405504360579 1.93614934705 y[1] (closed_form) = 0 0 absolute error = 1.978 relative error = -100 % Correct digits = -16 Radius of convergence (given) for eq 1 = 2.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.5696 2.07 h = 0.0001 0.005 y[1] (numeric) = 0.408389177637 1.94225246808 y[1] (closed_form) = 0 0 absolute error = 1.985 relative error = -100 % Correct digits = -16 Radius of convergence (given) for eq 1 = 2.927 Order of pole (given) = 0.5 0 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 0.5697 2.075 h = 0.0001 0.003 y[1] (numeric) = 0.408379202171 1.94728531537 y[1] (closed_form) = 0 0 absolute error = 1.99 relative error = -100 % Correct digits = -16 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.5698 2.078 h = 0.001 0.001 y[1] (numeric) = 0.408413647495 1.95030612532 y[1] (closed_form) = 0 0 absolute error = 1.993 relative error = -100 % Correct digits = -16 Radius of convergence (given) for eq 1 = 2.933 Order of pole (given) = 0.5 0 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 memory used=5907.4MB, alloc=52.3MB, time=73.12 x[1] = 0.5708 2.079 h = 0.001 0.003 y[1] (numeric) = 0.409397870799 1.95133439256 y[1] (closed_form) = 0 0 absolute error = 1.994 relative error = -100 % Correct digits = -16 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 x[1] = 0.5718 2.082 h = 0.0001 0.004 y[1] (numeric) = 0.410338133293 1.9543751339 y[1] (closed_form) = 0 0 absolute error = 1.997 relative error = -100 % Correct digits = -16 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.5719 2.086 h = 0.003 0.006 y[1] (numeric) = 0.410350978977 1.95840245585 y[1] (closed_form) = 0 0 absolute error = 2.001 relative error = -100 % Correct digits = -16 Radius of convergence (given) for eq 1 = 2.94 Order of pole (given) = 0.5 0 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 0.5749 2.092 h = 0.0001 0.005 y[1] (numeric) = 0.413238613777 1.96450618976 y[1] (closed_form) = 0 0 absolute error = 2.007 relative error = -100 % Correct digits = -16 Radius of convergence (given) for eq 1 = 2.946 Order of pole (given) = 0.5 0 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 memory used=5953.3MB, alloc=52.3MB, time=73.69 x[1] = 0.575 2.097 h = 0.0001 0.003 y[1] (numeric) = 0.41323033596 1.96954033762 y[1] (closed_form) = 0 0 absolute error = 2.012 relative error = -100 % Correct digits = -16 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.5751 2.1 h = 0.001 0.001 y[1] (numeric) = 0.413265811656 1.9725619083 y[1] (closed_form) = 0 0 absolute error = 2.015 relative error = -100 % Correct digits = -16 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.5761 2.101 h = 0.001 0.003 y[1] (numeric) = 0.414250633324 1.97359010416 y[1] (closed_form) = 0 0 absolute error = 2.017 relative error = -100 % Correct digits = -16 Radius of convergence (given) for eq 1 = 2.954 Order of pole (given) = 0.5 0 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 0.5771 2.104 h = 0.0001 0.004 y[1] (numeric) = 0.41519216248 1.97663129989 y[1] (closed_form) = 0 0 absolute error = 2.02 relative error = -100 % Correct digits = -16 Radius of convergence (given) for eq 1 = 2.957 Order of pole (given) = 0.5 0 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 memory used=5999.3MB, alloc=52.3MB, time=74.27 x[1] = 0.5772 2.108 h = 0.003 0.006 y[1] (numeric) = 0.415206372035 1.98065963506 y[1] (closed_form) = 0 0 absolute error = 2.024 relative error = -100 % Correct digits = -16 Radius of convergence (given) for eq 1 = 2.959 Order of pole (given) = 0.5 0 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 0.5802 2.114 h = 0.0001 0.005 y[1] (numeric) = 0.418096795399 1.98676392487 y[1] (closed_form) = 0 0 absolute error = 2.03 relative error = -100 % Correct digits = -16 Radius of convergence (given) for eq 1 = 2.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.5803 2.119 h = 0.0001 0.003 y[1] (numeric) = 0.418090213617 1.99179932589 y[1] (closed_form) = 0 0 absolute error = 2.035 relative error = -100 % Correct digits = -16 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.5804 2.122 h = 0.001 0.001 y[1] (numeric) = 0.418126718196 1.99482162895 y[1] (closed_form) = 0 0 absolute error = 2.038 relative error = -100 % Correct digits = -16 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 x[1] = 0.5814 2.123 h = 0.0001 0.004 y[1] (numeric) = 0.419112128582 1.9958497442 y[1] (closed_form) = 0 0 absolute error = 2.039 relative error = -100 % Correct digits = -16 Radius of convergence (given) for eq 1 = 2.973 Order of pole (given) = 0.5 0 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 memory used=6045.1MB, alloc=52.3MB, time=74.83 x[1] = 0.5815 2.127 h = 0.003 0.006 y[1] (numeric) = 0.419127499173 1.99987893765 y[1] (closed_form) = 0 0 absolute error = 2.043 relative error = -100 % Correct digits = -16 Radius of convergence (given) for eq 1 = 2.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.5845 2.133 h = 0.0001 0.005 y[1] (numeric) = 0.422020293297 2.00598369424 y[1] (closed_form) = 0 0 absolute error = 2.05 relative error = -100 % Correct digits = -16 Radius of convergence (given) for eq 1 = 2.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.5846 2.138 h = 0.0001 0.003 y[1] (numeric) = 0.422015155256 2.01102015681 y[1] (closed_form) = 0 0 absolute error = 2.055 relative error = -100 % Correct digits = -16 Radius of convergence (given) for eq 1 = 2.986 Order of pole (given) = 0.5 0 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 0.5847 2.141 h = 0.001 0.001 y[1] (numeric) = 0.422052535598 2.01404308022 y[1] (closed_form) = 0 0 absolute error = 2.058 relative error = -100 % Correct digits = -16 Radius of convergence (given) for eq 1 = 2.988 Order of pole (given) = 0.5 0 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 memory used=6091.0MB, alloc=52.3MB, time=75.40 x[1] = 0.5857 2.142 h = 0.001 0.003 y[1] (numeric) = 0.423038446106 2.01507112581 y[1] (closed_form) = 0 0 absolute error = 2.059 relative error = -100 % Correct digits = -16 Radius of convergence (given) for eq 1 = 2.99 Order of pole (given) = 0.5 0 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 0.5867 2.145 h = 0.0001 0.004 y[1] (numeric) = 0.423982300525 2.01811310774 y[1] (closed_form) = 0 0 absolute error = 2.062 relative error = -100 % Correct digits = -16 Radius of convergence (given) for eq 1 = 2.993 Order of pole (given) = 0.5 0 NO POLE (ratio test) 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) = 0.423999031352 2.02214324503 y[1] (closed_form) = 0 0 absolute error = 2.066 relative error = -100 % Correct digits = -16 Radius of convergence (given) for eq 1 = 2.995 Order of pole (given) = 0.5 0 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 0.5898 2.155 h = 0.0001 0.005 y[1] (numeric) = 0.426894558852 2.02824845529 y[1] (closed_form) = 0 0 absolute error = 2.073 relative error = -100 % Correct digits = -16 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=6136.8MB, alloc=52.3MB, time=75.97 x[1] = 0.5899 2.16 h = 0.0001 0.003 y[1] (numeric) = 0.426891112046 2.0332860851 y[1] (closed_form) = 0 0 absolute error = 2.078 relative error = -100 % Correct digits = -16 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.59 2.163 h = 0.001 0.001 y[1] (numeric) = 0.426929517454 2.03630968953 y[1] (closed_form) = 0 0 absolute error = 2.081 relative error = -100 % Correct digits = -16 Radius of convergence (given) for eq 1 = 3.008 Order of pole (given) = 0.5 0 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 0.591 2.164 h = 0.001 0.003 y[1] (numeric) = 0.427915998817 2.03733763815 y[1] (closed_form) = 0 0 absolute error = 2.082 relative error = -100 % Correct digits = -16 Radius of convergence (given) for eq 1 = 3.009 Order of pole (given) = 0.5 0 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 0.592 2.167 h = 0.0001 0.004 y[1] (numeric) = 0.428861090475 2.04037999593 y[1] (closed_form) = 0 0 absolute error = 2.085 relative error = -100 % Correct digits = -16 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 memory used=6182.7MB, alloc=52.3MB, time=76.53 x[1] = 0.5921 2.171 h = 0.003 0.006 y[1] (numeric) = 0.428879178387 2.04441104082 y[1] (closed_form) = 0 0 absolute error = 2.089 relative error = -100 % Correct digits = -16 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.5951 2.177 h = 0.0001 0.005 y[1] (numeric) = 0.431777408514 2.05051665219 y[1] (closed_form) = 0 0 absolute error = 2.095 relative error = -100 % Correct digits = -16 Radius of convergence (given) for eq 1 = 3.021 Order of pole (given) = 0.5 0 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 0.5952 2.182 h = 0.0001 0.003 y[1] (numeric) = 0.431775648876 2.05555540433 y[1] (closed_form) = 0 0 absolute error = 2.1 relative error = -100 % Correct digits = -16 Radius of convergence (given) for eq 1 = 3.025 Order of pole (given) = 0.5 0 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 0.5953 2.185 h = 0.001 0.001 y[1] (numeric) = 0.431815076422 2.05857966295 y[1] (closed_form) = 0 0 absolute error = 2.103 relative error = -100 % Correct digits = -16 Radius of convergence (given) for eq 1 = 3.027 Order of pole (given) = 0.5 0 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 memory used=6228.6MB, alloc=52.3MB, time=77.10 x[1] = 0.5963 2.186 h = 0.001 0.003 y[1] (numeric) = 0.432802118991 2.05960750635 y[1] (closed_form) = 0 0 absolute error = 2.105 relative error = -100 % Correct digits = -16 Radius of convergence (given) for eq 1 = 3.029 Order of pole (given) = 0.5 0 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 0.5973 2.189 h = 0.0001 0.004 y[1] (numeric) = 0.433748436839 2.0626502139 y[1] (closed_form) = 0 0 absolute error = 2.108 relative error = -100 % Correct digits = -16 Radius of convergence (given) for eq 1 = 3.032 Order of pole (given) = 0.5 0 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 0.5974 2.193 h = 0.003 0.006 y[1] (numeric) = 0.433767878046 2.06668213082 y[1] (closed_form) = 0 0 absolute error = 2.112 relative error = -100 % Correct digits = -16 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.6004 2.199 h = 0.0001 0.005 y[1] (numeric) = 0.436668779591 2.07278809228 y[1] (closed_form) = 0 0 absolute error = 2.118 relative error = -100 % Correct digits = -16 Radius of convergence (given) for eq 1 = 3.041 Order of pole (given) = 0.5 0 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 memory used=6274.4MB, alloc=52.3MB, time=77.67 x[1] = 0.6005 2.204 h = 0.0001 0.003 y[1] (numeric) = 0.436668702273 2.0778279227 y[1] (closed_form) = 0 0 absolute error = 2.123 relative error = -100 % Correct digits = -16 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 x[1] = 0.6006 2.207 h = 0.001 0.001 y[1] (numeric) = 0.436709148575 2.08085280922 y[1] (closed_form) = 0 0 absolute error = 2.126 relative error = -100 % Correct digits = -16 Radius of convergence (given) for eq 1 = 3.047 Order of pole (given) = 0.5 0 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 0.6016 2.208 h = 0.001 0.003 y[1] (numeric) = 0.437696742712 2.08188053948 y[1] (closed_form) = 0 0 absolute error = 2.127 relative error = -100 % Correct digits = -16 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.6026 2.211 h = 0.0001 0.004 y[1] (numeric) = 0.438644275403 2.08492357136 y[1] (closed_form) = 0 0 absolute error = 2.131 relative error = -100 % Correct digits = -16 Radius of convergence (given) for eq 1 = 3.051 Order of pole (given) = 0.5 0 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 0.6027 2.215 h = 0.003 0.006 y[1] (numeric) = 0.438665065505 2.08895632547 y[1] (closed_form) = 0 0 absolute error = 2.135 relative error = -100 % Correct digits = -16 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 memory used=6320.2MB, alloc=52.3MB, time=78.23 x[1] = 0.6057 2.221 h = 0.0001 0.005 y[1] (numeric) = 0.441568606848 2.09506258747 y[1] (closed_form) = 0 0 absolute error = 2.141 relative error = -100 % Correct digits = -16 Radius of convergence (given) for eq 1 = 3.061 Order of pole (given) = 0.5 0 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 0.6058 2.226 h = 0.0001 0.003 y[1] (numeric) = 0.441570206255 2.10010345301 y[1] (closed_form) = 0 0 absolute error = 2.146 relative error = -100 % Correct digits = -16 Radius of convergence (given) for eq 1 = 3.064 Order of pole (given) = 0.5 0 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 0.6059 2.229 h = 0.001 0.001 y[1] (numeric) = 0.441611667493 2.10312894164 y[1] (closed_form) = 0 0 absolute error = 2.149 relative error = -100 % Correct digits = -16 Radius of convergence (given) for eq 1 = 3.066 Order of pole (given) = 0.5 0 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 0.6069 2.23 h = 0.0001 0.004 y[1] (numeric) = 0.442599803584 2.10415655117 y[1] (closed_form) = 0 0 absolute error = 2.15 relative error = -100 % Correct digits = -16 Radius of convergence (given) for eq 1 = 3.068 Order of pole (given) = 0.5 0 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 memory used=6366.1MB, alloc=52.3MB, time=78.80 x[1] = 0.607 2.234 h = 0.003 0.006 y[1] (numeric) = 0.442621741394 2.10819001451 y[1] (closed_form) = 0 0 absolute error = 2.154 relative error = -100 % Correct digits = -16 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 x[1] = 0.61 2.24 h = 0.0001 0.005 y[1] (numeric) = 0.445527526574 2.1142965276 y[1] (closed_form) = 0 0 absolute error = 2.161 relative error = -100 % Correct digits = -16 Radius of convergence (given) for eq 1 = 3.077 Order of pole (given) = 0.5 0 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 0.6101 2.245 h = 0.0001 0.003 y[1] (numeric) = 0.445530552582 2.11933827009 y[1] (closed_form) = 0 0 absolute error = 2.166 relative error = -100 % Correct digits = -16 Radius of convergence (given) for eq 1 = 3.081 Order of pole (given) = 0.5 0 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 0.6102 2.248 h = 0.001 0.001 y[1] (numeric) = 0.445572877301 2.12236426879 y[1] (closed_form) = 0 0 absolute error = 2.169 relative error = -100 % Correct digits = -16 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 memory used=6412.1MB, alloc=52.3MB, time=79.37 x[1] = 0.6112 2.249 h = 0.001 0.003 y[1] (numeric) = 0.446561473765 2.12339177486 y[1] (closed_form) = 0 0 absolute error = 2.17 relative error = -100 % Correct digits = -16 Radius of convergence (given) for eq 1 = 3.085 Order of pole (given) = 0.5 0 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 0.6122 2.252 h = 0.0001 0.004 y[1] (numeric) = 0.44751123267 2.12643535898 y[1] (closed_form) = 0 0 absolute error = 2.173 relative error = -100 % Correct digits = -16 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.6123 2.256 h = 0.003 0.006 y[1] (numeric) = 0.44753451006 2.1304695964 y[1] (closed_form) = 0 0 absolute error = 2.177 relative error = -100 % Correct digits = -16 Radius of convergence (given) for eq 1 = 3.091 Order of pole (given) = 0.5 0 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 0.6153 2.262 h = 0.0001 0.005 y[1] (numeric) = 0.450442875783 2.13657632137 y[1] (closed_form) = 0 0 absolute error = 2.184 relative error = -100 % Correct digits = -16 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 memory used=6458.0MB, alloc=52.3MB, time=79.94 x[1] = 0.6154 2.267 h = 0.0001 0.003 y[1] (numeric) = 0.45044756673 2.14161902085 y[1] (closed_form) = 0 0 absolute error = 2.188 relative error = -100 % Correct digits = -16 Radius of convergence (given) for eq 1 = 3.101 Order of pole (given) = 0.5 0 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 0.6155 2.27 h = 0.001 0.001 y[1] (numeric) = 0.450490898478 2.14464557505 y[1] (closed_form) = 0 0 absolute error = 2.191 relative error = -100 % Correct digits = -16 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.6165 2.271 h = 0.001 0.003 y[1] (numeric) = 0.451480019164 2.14567294697 y[1] (closed_form) = 0 0 absolute error = 2.193 relative error = -100 % Correct digits = -16 Radius of convergence (given) for eq 1 = 3.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.6175 2.274 h = 0.0001 0.004 y[1] (numeric) = 0.452430959253 2.14871678617 y[1] (closed_form) = 0 0 absolute error = 2.196 relative error = -100 % Correct digits = -16 Radius of convergence (given) for eq 1 = 3.107 Order of pole (given) = 0.5 0 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 memory used=6503.9MB, alloc=52.3MB, time=80.50 x[1] = 0.6176 2.278 h = 0.003 0.006 y[1] (numeric) = 0.452455570241 2.15275176482 y[1] (closed_form) = 0 0 absolute error = 2.2 relative error = -100 % Correct digits = -16 Radius of convergence (given) for eq 1 = 3.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.6206 2.284 h = 0.0001 0.005 y[1] (numeric) = 0.455366483904 2.15885865626 y[1] (closed_form) = 0 0 absolute error = 2.206 relative error = -100 % Correct digits = -16 Radius of convergence (given) for eq 1 = 3.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.6207 2.289 h = 0.0001 0.003 y[1] (numeric) = 0.45537283224 2.16390227202 y[1] (closed_form) = 0 0 absolute error = 2.211 relative error = -100 % Correct digits = -16 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.6208 2.292 h = 0.001 0.001 y[1] (numeric) = 0.455417166055 2.16692935745 y[1] (closed_form) = 0 0 absolute error = 2.214 relative error = -100 % Correct digits = -16 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.6218 2.293 h = 0.001 0.003 y[1] (numeric) = 0.456406801437 2.1679565885 y[1] (closed_form) = 0 0 absolute error = 2.215 relative error = -100 % Correct digits = -16 memory used=6549.7MB, alloc=52.3MB, time=81.07 Radius of convergence (given) for eq 1 = 3.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 x[1] = 0.6228 2.296 h = 0.0001 0.004 y[1] (numeric) = 0.457358910386 2.17100065987 y[1] (closed_form) = 0 0 absolute error = 2.219 relative error = -100 % Correct digits = -16 Radius of convergence (given) for eq 1 = 3.127 Order of pole (given) = 0.5 0 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 0.6229 2.3 h = 0.003 0.006 y[1] (numeric) = 0.457384848481 2.17503634755 y[1] (closed_form) = 0 0 absolute error = 2.223 relative error = -100 % Correct digits = -16 Radius of convergence (given) for eq 1 = 3.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.6259 2.306 h = 0.0001 0.005 y[1] (numeric) = 0.460298277216 2.18114336146 y[1] (closed_form) = 0 0 absolute error = 2.229 relative error = -100 % Correct digits = -16 Radius of convergence (given) for eq 1 = 3.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.626 2.311 h = 0.0001 0.003 y[1] (numeric) = 0.460306274771 2.18618785364 y[1] (closed_form) = 0 0 absolute error = 2.234 relative error = -100 % Correct digits = -16 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 memory used=6595.6MB, alloc=52.3MB, time=81.64 x[1] = 0.6261 2.314 h = 0.001 0.001 y[1] (numeric) = 0.460351605331 2.18921544653 y[1] (closed_form) = 0 0 absolute error = 2.237 relative error = -100 % Correct digits = -16 Radius of convergence (given) for eq 1 = 3.142 Order of pole (given) = 0.5 0 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 0.6271 2.315 h = 0.001 0.003 y[1] (numeric) = 0.46134174593 2.19024253029 y[1] (closed_form) = 0 0 absolute error = 2.238 relative error = -100 % Correct digits = -16 Radius of convergence (given) for eq 1 = 3.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.6281 2.318 h = 0.0001 0.004 y[1] (numeric) = 0.46229501121 2.19328681153 y[1] (closed_form) = 0 0 absolute error = 2.241 relative error = -100 % Correct digits = -16 Radius of convergence (given) for eq 1 = 3.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.6282 2.322 h = 0.003 0.006 y[1] (numeric) = 0.462322269443 2.19732317674 y[1] (closed_form) = 0 0 absolute error = 2.245 relative error = -100 % Correct digits = -16 Radius of convergence (given) for eq 1 = 3.15 Order of pole (given) = 0.5 0 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 memory used=6641.5MB, alloc=52.3MB, time=82.21 x[1] = 0.6312 2.328 h = 0.0001 0.005 y[1] (numeric) = 0.465238180149 2.20343027049 y[1] (closed_form) = 0 0 absolute error = 2.252 relative error = -100 % Correct digits = -16 Radius of convergence (given) for eq 1 = 3.156 Order of pole (given) = 0.5 0 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 0.6313 2.333 h = 0.0001 0.003 y[1] (numeric) = 0.465247818168 2.20847560008 y[1] (closed_form) = 0 0 absolute error = 2.257 relative error = -100 % Correct digits = -16 Radius of convergence (given) for eq 1 = 3.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.6314 2.336 h = 0.001 0.001 y[1] (numeric) = 0.46529413981 2.21150367718 y[1] (closed_form) = 0 0 absolute error = 2.26 relative error = -100 % Correct digits = -16 Radius of convergence (given) for eq 1 = 3.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 x[1] = 0.6324 2.337 h = 0.0001 0.004 y[1] (numeric) = 0.466284776192 2.21253060751 y[1] (closed_form) = 0 0 absolute error = 2.261 relative error = -100 % Correct digits = -16 Radius of convergence (given) for eq 1 = 3.164 Order of pole (given) = 0.5 0 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 memory used=6687.4MB, alloc=52.3MB, time=82.78 x[1] = 0.6325 2.341 h = 0.003 0.006 y[1] (numeric) = 0.466313157263 2.21656754683 y[1] (closed_form) = 0 0 absolute error = 2.265 relative error = -100 % Correct digits = -16 Radius of convergence (given) for eq 1 = 3.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.6355 2.347 h = 0.0001 0.005 y[1] (numeric) = 0.469231177426 2.22267470522 y[1] (closed_form) = 0 0 absolute error = 2.272 relative error = -100 % Correct digits = -16 Radius of convergence (given) for eq 1 = 3.173 Order of pole (given) = 0.5 0 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 0.6356 2.352 h = 0.0001 0.003 y[1] (numeric) = 0.469242210706 2.22772074441 y[1] (closed_form) = 0 0 absolute error = 2.277 relative error = -100 % Correct digits = -16 Radius of convergence (given) for eq 1 = 3.177 Order of pole (given) = 0.5 0 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 0.6357 2.355 h = 0.001 0.001 y[1] (numeric) = 0.469289375255 2.23074923179 y[1] (closed_form) = 0 0 absolute error = 2.28 relative error = -100 % Correct digits = -16 Radius of convergence (given) for eq 1 = 3.179 Order of pole (given) = 0.5 0 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 memory used=6733.4MB, alloc=52.3MB, time=83.35 x[1] = 0.6367 2.356 h = 0.001 0.003 y[1] (numeric) = 0.4702804328 2.23177603111 y[1] (closed_form) = 0 0 absolute error = 2.281 relative error = -100 % Correct digits = -16 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.6377 2.359 h = 0.0001 0.004 y[1] (numeric) = 0.471235813866 2.23482065907 y[1] (closed_form) = 0 0 absolute error = 2.284 relative error = -100 % Correct digits = -16 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.6378 2.363 h = 0.003 0.006 y[1] (numeric) = 0.471265501266 2.23885821899 y[1] (closed_form) = 0 0 absolute error = 2.288 relative error = -100 % Correct digits = -16 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.6408 2.369 h = 0.0001 0.005 y[1] (numeric) = 0.474185941778 2.24496538108 y[1] (closed_form) = 0 0 absolute error = 2.294 relative error = -100 % Correct digits = -16 Radius of convergence (given) for eq 1 = 3.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 memory used=6779.2MB, alloc=52.3MB, time=83.92 x[1] = 0.6409 2.374 h = 0.0001 0.003 y[1] (numeric) = 0.47419859821 2.2500121872 y[1] (closed_form) = 0 0 absolute error = 2.299 relative error = -100 % Correct digits = -16 Radius of convergence (given) for eq 1 = 3.197 Order of pole (given) = 0.5 0 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 0.641 2.377 h = 0.001 0.001 y[1] (numeric) = 0.474246742718 2.2530411168 y[1] (closed_form) = 0 0 absolute error = 2.302 relative error = -100 % Correct digits = -16 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.642 2.378 h = 0.001 0.003 y[1] (numeric) = 0.475238278706 2.2540677519 y[1] (closed_form) = 0 0 absolute error = 2.304 relative error = -100 % Correct digits = -16 Radius of convergence (given) for eq 1 = 3.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 x[1] = 0.643 2.381 h = 0.0001 0.004 y[1] (numeric) = 0.476194779523 2.2571125292 y[1] (closed_form) = 0 0 absolute error = 2.307 relative error = -100 % Correct digits = -16 Radius of convergence (given) for eq 1 = 3.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.6431 2.385 h = 0.003 0.006 y[1] (numeric) = 0.47622576505 2.26115068015 y[1] (closed_form) = 0 0 absolute error = 2.311 relative error = -100 % Correct digits = -16 Radius of convergence (given) for eq 1 = 3.206 Order of pole (given) = 0.5 0 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 memory used=6825.1MB, alloc=52.3MB, time=84.48 x[1] = 0.6461 2.391 h = 0.0001 0.005 y[1] (numeric) = 0.479148592314 2.2672578071 y[1] (closed_form) = 0 0 absolute error = 2.317 relative error = -100 % Correct digits = -16 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.6462 2.396 h = 0.0001 0.003 y[1] (numeric) = 0.479162861616 2.27230534353 y[1] (closed_form) = 0 0 absolute error = 2.322 relative error = -100 % Correct digits = -16 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.6463 2.399 h = 0.001 0.001 y[1] (numeric) = 0.479211979533 2.27533469355 y[1] (closed_form) = 0 0 absolute error = 2.325 relative error = -100 % Correct digits = -16 Radius of convergence (given) for eq 1 = 3.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.6473 2.4 h = 0.001 0.003 y[1] (numeric) = 0.480203984693 2.27636115906 y[1] (closed_form) = 0 0 absolute error = 2.326 relative error = -100 % Correct digits = -16 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=6871.1MB, alloc=52.3MB, time=85.05 x[1] = 0.6483 2.403 h = 0.0001 0.004 y[1] (numeric) = 0.481161592091 2.27940606575 y[1] (closed_form) = 0 0 absolute error = 2.33 relative error = -100 % Correct digits = -16 Radius of convergence (given) for eq 1 = 3.223 Order of pole (given) = 0.5 0 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 0.6484 2.407 h = 0.003 0.006 y[1] (numeric) = 0.481193867145 2.28344477881 y[1] (closed_form) = 0 0 absolute error = 2.334 relative error = -100 % Correct digits = -16 Radius of convergence (given) for eq 1 = 3.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.6514 2.413 h = 0.0001 0.005 y[1] (numeric) = 0.484119047453 2.28955183306 y[1] (closed_form) = 0 0 absolute error = 2.34 relative error = -100 % Correct digits = -16 Radius of convergence (given) for eq 1 = 3.233 Order of pole (given) = 0.5 0 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 0.6515 2.418 h = 0.0001 0.003 y[1] (numeric) = 0.484134918867 2.29460006399 y[1] (closed_form) = 0 0 absolute error = 2.345 relative error = -100 % Correct digits = -16 Radius of convergence (given) for eq 1 = 3.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 memory used=6917.0MB, alloc=52.3MB, time=85.62 x[1] = 0.6516 2.421 h = 0.001 0.001 y[1] (numeric) = 0.484185003368 2.29762981312 y[1] (closed_form) = 0 0 absolute error = 2.348 relative error = -100 % Correct digits = -16 Radius of convergence (given) for eq 1 = 3.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.6526 2.422 h = 0.001 0.003 y[1] (numeric) = 0.485177468495 2.29865610395 y[1] (closed_form) = 0 0 absolute error = 2.349 relative error = -100 % Correct digits = -16 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.6536 2.425 h = 0.0001 0.004 y[1] (numeric) = 0.486136169176 2.30170112066 y[1] (closed_form) = 0 0 absolute error = 2.352 relative error = -100 % Correct digits = -16 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.6537 2.429 h = 0.003 0.006 y[1] (numeric) = 0.486169724794 2.30574036756 y[1] (closed_form) = 0 0 absolute error = 2.356 relative error = -100 % Correct digits = -16 Radius of convergence (given) for eq 1 = 3.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 memory used=6962.8MB, alloc=52.3MB, time=86.18 x[1] = 0.6567 2.435 h = 0.0001 0.005 y[1] (numeric) = 0.489097224355 2.31184731282 y[1] (closed_form) = 0 0 absolute error = 2.363 relative error = -100 % Correct digits = -16 Radius of convergence (given) for eq 1 = 3.253 Order of pole (given) = 0.5 0 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 0.6568 2.44 h = 0.0001 0.003 y[1] (numeric) = 0.489114686672 2.31689620324 y[1] (closed_form) = 0 0 absolute error = 2.368 relative error = -100 % Correct digits = -16 Radius of convergence (given) for eq 1 = 3.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.6569 2.443 h = 0.001 0.001 y[1] (numeric) = 0.489165730673 2.31992633067 y[1] (closed_form) = 0 0 absolute error = 2.371 relative error = -100 % Correct digits = -16 Radius of convergence (given) for eq 1 = 3.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.6579 2.444 h = 0.0001 0.004 y[1] (numeric) = 0.490158646632 2.32095244197 y[1] (closed_form) = 0 0 absolute error = 2.372 relative error = -100 % Correct digits = -16 Radius of convergence (given) for eq 1 = 3.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 memory used=7008.8MB, alloc=52.3MB, time=86.75 x[1] = 0.658 2.448 h = 0.003 0.006 y[1] (numeric) = 0.490193291168 2.32499214136 y[1] (closed_form) = 0 0 absolute error = 2.376 relative error = -100 % Correct digits = -16 Radius of convergence (given) for eq 1 = 3.263 Order of pole (given) = 0.5 0 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 0.661 2.454 h = 0.0001 0.005 y[1] (numeric) = 0.493122761828 2.33109899175 y[1] (closed_form) = 0 0 absolute error = 2.383 relative error = -100 % Correct digits = -16 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.6611 2.459 h = 0.0001 0.003 y[1] (numeric) = 0.493141576938 2.33614844121 y[1] (closed_form) = 0 0 absolute error = 2.388 relative error = -100 % Correct digits = -16 Radius of convergence (given) for eq 1 = 3.274 Order of pole (given) = 0.5 0 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 0.6612 2.462 h = 0.001 0.001 y[1] (numeric) = 0.493193436807 2.33917888927 y[1] (closed_form) = 0 0 absolute error = 2.391 relative error = -100 % Correct digits = -16 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.6622 2.463 h = 0.001 0.003 y[1] (numeric) = 0.494186735779 2.34020484756 y[1] (closed_form) = 0 0 absolute error = 2.392 relative error = -100 % Correct digits = -16 Radius of convergence (given) for eq 1 = 3.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 memory used=7054.8MB, alloc=52.3MB, time=87.32 x[1] = 0.6632 2.466 h = 0.0001 0.004 y[1] (numeric) = 0.495147434244 2.34325003202 y[1] (closed_form) = 0 0 absolute error = 2.395 relative error = -100 % Correct digits = -16 Radius of convergence (given) for eq 1 = 3.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 x[1] = 0.6633 2.47 h = 0.003 0.006 y[1] (numeric) = 0.495183342068 2.34729021427 y[1] (closed_form) = 0 0 absolute error = 2.399 relative error = -100 % Correct digits = -16 Radius of convergence (given) for eq 1 = 3.283 Order of pole (given) = 0.5 0 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 0.6663 2.476 h = 0.0001 0.005 y[1] (numeric) = 0.498115069375 2.35339689096 y[1] (closed_form) = 0 0 absolute error = 2.406 relative error = -100 % Correct digits = -16 Radius of convergence (given) for eq 1 = 3.29 Order of pole (given) = 0.5 0 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 0.6664 2.481 h = 0.0001 0.003 y[1] (numeric) = 0.498135453817 2.3584469368 y[1] (closed_form) = 0 0 absolute error = 2.41 relative error = -100 % Correct digits = -16 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=7100.7MB, alloc=52.3MB, time=87.89 x[1] = 0.6665 2.484 h = 0.001 0.001 y[1] (numeric) = 0.498188259598 2.36147772562 y[1] (closed_form) = 0 0 absolute error = 2.413 relative error = -100 % Correct digits = -16 Radius of convergence (given) for eq 1 = 3.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.6675 2.485 h = 0.001 0.003 y[1] (numeric) = 0.499181992649 2.36250349589 y[1] (closed_form) = 0 0 absolute error = 2.415 relative error = -100 % Correct digits = -16 Radius of convergence (given) for eq 1 = 3.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.6685 2.488 h = 0.0001 0.004 y[1] (numeric) = 0.500143745989 2.36554873792 y[1] (closed_form) = 0 0 absolute error = 2.418 relative error = -100 % Correct digits = -16 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.6686 2.492 h = 0.003 0.006 y[1] (numeric) = 0.500180907204 2.36958937661 y[1] (closed_form) = 0 0 absolute error = 2.422 relative error = -100 % Correct digits = -16 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 memory used=7146.7MB, alloc=52.3MB, time=88.46 x[1] = 0.6716 2.498 h = 0.0001 0.005 y[1] (numeric) = 0.50311485726 2.37569584674 y[1] (closed_form) = 0 0 absolute error = 2.428 relative error = -100 % Correct digits = -16 Radius of convergence (given) for eq 1 = 3.31 Order of pole (given) = 0.5 0 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 0.6717 2.503 h = 0.0001 0.003 y[1] (numeric) = 0.503136798668 2.38074645624 y[1] (closed_form) = 0 0 absolute error = 2.433 relative error = -100 % Correct digits = -16 Radius of convergence (given) for eq 1 = 3.314 Order of pole (given) = 0.5 0 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 0.6718 2.506 h = 0.001 0.001 y[1] (numeric) = 0.503190542611 2.38377756637 y[1] (closed_form) = 0 0 absolute error = 2.436 relative error = -100 % Correct digits = -16 Radius of convergence (given) for eq 1 = 3.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.6728 2.507 h = 0.001 0.003 y[1] (numeric) = 0.504184700821 2.38480314447 y[1] (closed_form) = 0 0 absolute error = 2.438 relative error = -100 % Correct digits = -16 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 memory used=7192.5MB, alloc=52.3MB, time=89.02 x[1] = 0.6738 2.51 h = 0.0001 0.004 y[1] (numeric) = 0.505147495371 2.38784842685 y[1] (closed_form) = 0 0 absolute error = 2.441 relative error = -100 % Correct digits = -16 Radius of convergence (given) for eq 1 = 3.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.6739 2.514 h = 0.003 0.006 y[1] (numeric) = 0.505185899779 2.39188949617 y[1] (closed_form) = 0 0 absolute error = 2.445 relative error = -100 % Correct digits = -16 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 x[1] = 0.6769 2.52 h = 0.0001 0.005 y[1] (numeric) = 0.508122038701 2.39799572805 y[1] (closed_form) = 0 0 absolute error = 2.451 relative error = -100 % Correct digits = -16 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.677 2.525 h = 0.0001 0.003 y[1] (numeric) = 0.508145524356 2.40304686928 y[1] (closed_form) = 0 0 absolute error = 2.456 relative error = -100 % Correct digits = -16 Radius of convergence (given) for eq 1 = 3.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=7238.4MB, alloc=52.3MB, time=89.59 x[1] = 0.6771 2.528 h = 0.001 0.001 y[1] (numeric) = 0.508200198505 2.40607828174 y[1] (closed_form) = 0 0 absolute error = 2.459 relative error = -100 % Correct digits = -16 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.6781 2.529 h = 0.001 0.003 y[1] (numeric) = 0.509194773035 2.40710366373 y[1] (closed_form) = 0 0 absolute error = 2.46 relative error = -100 % Correct digits = -16 Radius of convergence (given) for eq 1 = 3.338 Order of pole (given) = 0.5 0 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 0.6791 2.532 h = 0.0001 0.004 y[1] (numeric) = 0.510158595067 2.41014896978 y[1] (closed_form) = 0 0 absolute error = 2.464 relative error = -100 % Correct digits = -16 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 x[1] = 0.6792 2.536 h = 0.003 0.006 y[1] (numeric) = 0.510198232203 2.41419044456 y[1] (closed_form) = 0 0 absolute error = 2.468 relative error = -100 % Correct digits = -16 Radius of convergence (given) for eq 1 = 3.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=7284.0MB, alloc=52.3MB, time=90.15 x[1] = 0.6822 2.542 h = 0.0001 0.005 y[1] (numeric) = 0.513136526143 2.42029640762 y[1] (closed_form) = 0 0 absolute error = 2.474 relative error = -100 % Correct digits = -16 Radius of convergence (given) for eq 1 = 3.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.6823 2.547 h = 0.0001 0.003 y[1] (numeric) = 0.513161542991 2.42534804941 y[1] (closed_form) = 0 0 absolute error = 2.479 relative error = -100 % Correct digits = -16 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.6824 2.55 h = 0.001 0.001 y[1] (numeric) = 0.513217139202 2.4283797457 y[1] (closed_form) = 0 0 absolute error = 2.482 relative error = -100 % Correct digits = -16 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 x[1] = 0.6834 2.551 h = 0.0001 0.004 y[1] (numeric) = 0.514212121296 2.42940492786 y[1] (closed_form) = 0 0 absolute error = 2.483 relative error = -100 % Correct digits = -16 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.6835 2.555 h = 0.003 0.006 y[1] (numeric) = 0.514252806522 2.43344674648 y[1] (closed_form) = 0 0 absolute error = 2.487 relative error = -100 % Correct digits = -16 Radius of convergence (given) for eq 1 = 3.361 Order of pole (given) = 0.5 0 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 memory used=7329.4MB, alloc=52.3MB, time=90.71 x[1] = 0.6865 2.561 h = 0.0001 0.005 y[1] (numeric) = 0.517192932045 2.43955247964 y[1] (closed_form) = 0 0 absolute error = 2.494 relative error = -100 % Correct digits = -16 Radius of convergence (given) for eq 1 = 3.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.6866 2.566 h = 0.0001 0.003 y[1] (numeric) = 0.517219250733 2.44460454594 y[1] (closed_form) = 0 0 absolute error = 2.499 relative error = -100 % Correct digits = -16 Radius of convergence (given) for eq 1 = 3.371 Order of pole (given) = 0.5 0 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 0.6867 2.569 h = 0.001 0.001 y[1] (numeric) = 0.517275630877 2.44763648292 y[1] (closed_form) = 0 0 absolute error = 2.502 relative error = -100 % Correct digits = -16 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.6877 2.57 h = 0.001 0.003 y[1] (numeric) = 0.518270959281 2.44866149497 y[1] (closed_form) = 0 0 absolute error = 2.503 relative error = -100 % Correct digits = -16 Radius of convergence (given) for eq 1 = 3.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=7374.9MB, alloc=52.3MB, time=91.28 x[1] = 0.6887 2.573 h = 0.0001 0.004 y[1] (numeric) = 0.519236656678 2.45170681429 y[1] (closed_form) = 0 0 absolute error = 2.506 relative error = -100 % Correct digits = -16 Radius of convergence (given) for eq 1 = 3.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.6888 2.577 h = 0.003 0.006 y[1] (numeric) = 0.519278554767 2.45574899301 y[1] (closed_form) = 0 0 absolute error = 2.51 relative error = -100 % Correct digits = -16 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.6918 2.583 h = 0.0001 0.005 y[1] (numeric) = 0.522220772825 2.46185440301 y[1] (closed_form) = 0 0 absolute error = 2.517 relative error = -100 % Correct digits = -16 Radius of convergence (given) for eq 1 = 3.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.6919 2.588 h = 0.0001 0.003 y[1] (numeric) = 0.522248597958 2.46690691373 y[1] (closed_form) = 0 0 absolute error = 2.522 relative error = -100 % Correct digits = -16 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 memory used=7420.6MB, alloc=52.3MB, time=91.84 x[1] = 0.692 2.591 h = 0.001 0.001 y[1] (numeric) = 0.522305884753 2.46993910119 y[1] (closed_form) = 0 0 absolute error = 2.525 relative error = -100 % Correct digits = -16 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.693 2.592 h = 0.001 0.003 y[1] (numeric) = 0.523301604702 2.47096390696 y[1] (closed_form) = 0 0 absolute error = 2.526 relative error = -100 % Correct digits = -16 Radius of convergence (given) for eq 1 = 3.395 Order of pole (given) = 0.5 0 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 0.694 2.595 h = 0.0001 0.004 y[1] (numeric) = 0.524268290243 2.47400920491 y[1] (closed_form) = 0 0 absolute error = 2.529 relative error = -100 % Correct digits = -16 Radius of convergence (given) for eq 1 = 3.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.6941 2.599 h = 0.003 0.006 y[1] (numeric) = 0.524311390051 2.4780517203 y[1] (closed_form) = 0 0 absolute error = 2.533 relative error = -100 % Correct digits = -16 Radius of convergence (given) for eq 1 = 3.401 Order of pole (given) = 0.5 0 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 memory used=7466.1MB, alloc=52.3MB, time=92.40 x[1] = 0.6971 2.605 h = 0.0001 0.005 y[1] (numeric) = 0.527255667 2.48415677969 y[1] (closed_form) = 0 0 absolute error = 2.539 relative error = -100 % Correct digits = -16 Radius of convergence (given) for eq 1 = 3.408 Order of pole (given) = 0.5 0 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 0.6972 2.61 h = 0.0001 0.003 y[1] (numeric) = 0.527284984682 2.48920970579 y[1] (closed_form) = 0 0 absolute error = 2.544 relative error = -100 % Correct digits = -16 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.6973 2.613 h = 0.001 0.001 y[1] (numeric) = 0.527343169503 2.49224212653 y[1] (closed_form) = 0 0 absolute error = 2.547 relative error = -100 % Correct digits = -16 Radius of convergence (given) for eq 1 = 3.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 x[1] = 0.6983 2.614 h = 0.001 0.003 y[1] (numeric) = 0.528339272494 2.4932667229 y[1] (closed_form) = 0 0 absolute error = 2.549 relative error = -100 % Correct digits = -16 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=7511.6MB, alloc=52.3MB, time=92.97 x[1] = 0.6993 2.617 h = 0.0001 0.004 y[1] (numeric) = 0.529306932308 2.49631198476 y[1] (closed_form) = 0 0 absolute error = 2.552 relative error = -100 % Correct digits = -16 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.6994 2.621 h = 0.003 0.006 y[1] (numeric) = 0.529351222475 2.50035481396 y[1] (closed_form) = 0 0 absolute error = 2.556 relative error = -100 % Correct digits = -16 Radius of convergence (given) for eq 1 = 3.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.7024 2.627 h = 0.0001 0.005 y[1] (numeric) = 0.53229752478 2.50645949631 y[1] (closed_form) = 0 0 absolute error = 2.562 relative error = -100 % Correct digits = -16 Radius of convergence (given) for eq 1 = 3.428 Order of pole (given) = 0.5 0 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 0.7025 2.632 h = 0.0001 0.003 y[1] (numeric) = 0.532328320865 2.51151280951 y[1] (closed_form) = 0 0 absolute error = 2.567 relative error = -100 % Correct digits = -16 Radius of convergence (given) for eq 1 = 3.432 Order of pole (given) = 0.5 0 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 memory used=7557.2MB, alloc=52.3MB, time=93.53 x[1] = 0.7026 2.635 h = 0.001 0.001 y[1] (numeric) = 0.532387394944 2.51454544675 y[1] (closed_form) = 0 0 absolute error = 2.57 relative error = -100 % Correct digits = -16 Radius of convergence (given) for eq 1 = 3.434 Order of pole (given) = 0.5 0 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 0.7036 2.636 h = 0.001 0.003 y[1] (numeric) = 0.533383872566 2.51556983079 y[1] (closed_form) = 0 0 absolute error = 2.571 relative error = -100 % Correct digits = -16 Radius of convergence (given) for eq 1 = 3.436 Order of pole (given) = 0.5 0 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 0.7046 2.639 h = 0.0001 0.004 y[1] (numeric) = 0.534352492773 2.51861504234 y[1] (closed_form) = 0 0 absolute error = 2.575 relative error = -100 % Correct digits = -16 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.7047 2.643 h = 0.003 0.006 y[1] (numeric) = 0.534397961747 2.52265816308 y[1] (closed_form) = 0 0 absolute error = 2.579 relative error = -100 % Correct digits = -16 Radius of convergence (given) for eq 1 = 3.442 Order of pole (given) = 0.5 0 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 memory used=7602.9MB, alloc=52.3MB, time=94.10 x[1] = 0.7077 2.649 h = 0.0001 0.005 y[1] (numeric) = 0.537346256004 2.52876244299 y[1] (closed_form) = 0 0 absolute error = 2.585 relative error = -100 % Correct digits = -16 Radius of convergence (given) for eq 1 = 3.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 x[1] = 0.7078 2.654 h = 0.0001 0.003 y[1] (numeric) = 0.537378516109 2.53381611572 y[1] (closed_form) = 0 0 absolute error = 2.59 relative error = -100 % Correct digits = -16 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.7079 2.657 h = 0.001 0.001 y[1] (numeric) = 0.537438470548 2.5368489531 y[1] (closed_form) = 0 0 absolute error = 2.593 relative error = -100 % Correct digits = -16 Radius of convergence (given) for eq 1 = 3.455 Order of pole (given) = 0.5 0 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 0.7089 2.658 h = 0.0001 0.004 y[1] (numeric) = 0.538435314486 2.53787312209 y[1] (closed_form) = 0 0 absolute error = 2.594 relative error = -100 % Correct digits = -16 Radius of convergence (given) for eq 1 = 3.456 Order of pole (given) = 0.5 0 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 0.709 2.662 h = 0.003 0.006 y[1] (numeric) = 0.538481785641 2.54191649022 y[1] (closed_form) = 0 0 absolute error = 2.598 relative error = -100 % Correct digits = -16 Radius of convergence (given) for eq 1 = 3.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=7648.4MB, alloc=52.3MB, time=94.66 x[1] = 0.712 2.668 h = 0.0001 0.005 y[1] (numeric) = 0.541431773052 2.54802042734 y[1] (closed_form) = 0 0 absolute error = 2.605 relative error = -100 % Correct digits = -16 Radius of convergence (given) for eq 1 = 3.466 Order of pole (given) = 0.5 0 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 0.7121 2.673 h = 0.0001 0.003 y[1] (numeric) = 0.541465277807 2.5530744052 y[1] (closed_form) = 0 0 absolute error = 2.61 relative error = -100 % Correct digits = -16 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.7122 2.676 h = 0.001 0.001 y[1] (numeric) = 0.541525980683 2.55610741244 y[1] (closed_form) = 0 0 absolute error = 2.613 relative error = -100 % Correct digits = -16 Radius of convergence (given) for eq 1 = 3.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.7132 2.677 h = 0.001 0.003 y[1] (numeric) = 0.54252313595 2.5571313985 y[1] (closed_form) = 0 0 absolute error = 2.614 relative error = -100 % Correct digits = -16 Radius of convergence (given) for eq 1 = 3.473 Order of pole (given) = 0.5 0 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 memory used=7694.1MB, alloc=52.3MB, time=95.23 x[1] = 0.7142 2.68 h = 0.0001 0.004 y[1] (numeric) = 0.543493507252 2.56017649122 y[1] (closed_form) = 0 0 absolute error = 2.617 relative error = -100 % Correct digits = -16 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.7143 2.684 h = 0.003 0.006 y[1] (numeric) = 0.543541135507 2.56422011082 y[1] (closed_form) = 0 0 absolute error = 2.621 relative error = -100 % Correct digits = -16 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 x[1] = 0.7173 2.69 h = 0.0001 0.005 y[1] (numeric) = 0.546493053383 2.57032360045 y[1] (closed_form) = 0 0 absolute error = 2.628 relative error = -100 % Correct digits = -16 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.7174 2.695 h = 0.0001 0.003 y[1] (numeric) = 0.546527995148 2.57537788824 y[1] (closed_form) = 0 0 absolute error = 2.633 relative error = -100 % Correct digits = -16 Radius of convergence (given) for eq 1 = 3.49 Order of pole (given) = 0.5 0 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 memory used=7739.7MB, alloc=52.3MB, time=95.79 x[1] = 0.7175 2.698 h = 0.001 0.001 y[1] (numeric) = 0.546589561692 2.57841106624 y[1] (closed_form) = 0 0 absolute error = 2.636 relative error = -100 % Correct digits = -16 Radius of convergence (given) for eq 1 = 3.492 Order of pole (given) = 0.5 0 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 0.7185 2.699 h = 0.001 0.003 y[1] (numeric) = 0.547587068085 2.57943483254 y[1] (closed_form) = 0 0 absolute error = 2.637 relative error = -100 % Correct digits = -16 Radius of convergence (given) for eq 1 = 3.494 Order of pole (given) = 0.5 0 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 0.7195 2.702 h = 0.0001 0.004 y[1] (numeric) = 0.548558360238 2.58247983666 y[1] (closed_form) = 0 0 absolute error = 2.64 relative error = -100 % Correct digits = -16 Radius of convergence (given) for eq 1 = 3.497 Order of pole (given) = 0.5 0 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 0.7196 2.706 h = 0.003 0.006 y[1] (numeric) = 0.548607133577 2.58652368707 y[1] (closed_form) = 0 0 absolute error = 2.644 relative error = -100 % Correct digits = -16 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 memory used=7785.2MB, alloc=52.3MB, time=96.36 x[1] = 0.7226 2.712 h = 0.0001 0.005 y[1] (numeric) = 0.551560948957 2.5926267066 y[1] (closed_form) = 0 0 absolute error = 2.651 relative error = -100 % Correct digits = -16 Radius of convergence (given) for eq 1 = 3.506 Order of pole (given) = 0.5 0 NO POLE (ratio test) 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) = 0.551597312772 2.59768127874 y[1] (closed_form) = 0 0 absolute error = 2.656 relative error = -100 % Correct digits = -16 Radius of convergence (given) for eq 1 = 3.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.7228 2.72 h = 0.001 0.001 y[1] (numeric) = 0.551659733761 2.60071461235 y[1] (closed_form) = 0 0 absolute error = 2.659 relative error = -100 % Correct digits = -16 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.7238 2.721 h = 0.001 0.003 y[1] (numeric) = 0.552657583241 2.60173815668 y[1] (closed_form) = 0 0 absolute error = 2.66 relative error = -100 % Correct digits = -16 Radius of convergence (given) for eq 1 = 3.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 memory used=7830.9MB, alloc=52.3MB, time=96.92 x[1] = 0.7248 2.724 h = 0.0001 0.004 y[1] (numeric) = 0.553629782398 2.60478305976 y[1] (closed_form) = 0 0 absolute error = 2.663 relative error = -100 % Correct digits = -16 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.7249 2.728 h = 0.003 0.006 y[1] (numeric) = 0.553679688664 2.60882712086 y[1] (closed_form) = 0 0 absolute error = 2.667 relative error = -100 % Correct digits = -16 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.7279 2.734 h = 0.0001 0.005 y[1] (numeric) = 0.556635368772 2.61492964859 y[1] (closed_form) = 0 0 absolute error = 2.674 relative error = -100 % Correct digits = -16 Radius of convergence (given) for eq 1 = 3.527 Order of pole (given) = 0.5 0 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 0.728 2.739 h = 0.0001 0.003 y[1] (numeric) = 0.556673139512 2.61998448019 y[1] (closed_form) = 0 0 absolute error = 2.678 relative error = -100 % Correct digits = -16 Radius of convergence (given) for eq 1 = 3.531 Order of pole (given) = 0.5 0 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 memory used=7876.3MB, alloc=52.3MB, time=97.48 x[1] = 0.7281 2.742 h = 0.001 0.001 y[1] (numeric) = 0.556736405631 2.62301795468 y[1] (closed_form) = 0 0 absolute error = 2.681 relative error = -100 % Correct digits = -16 Radius of convergence (given) for eq 1 = 3.533 Order of pole (given) = 0.5 0 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 0.7291 2.743 h = 0.001 0.003 y[1] (numeric) = 0.557734590258 2.62404127499 y[1] (closed_form) = 0 0 absolute error = 2.683 relative error = -100 % Correct digits = -16 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.7301 2.746 h = 0.0001 0.004 y[1] (numeric) = 0.558707682605 2.627086065 y[1] (closed_form) = 0 0 absolute error = 2.686 relative error = -100 % Correct digits = -16 Radius of convergence (given) for eq 1 = 3.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 x[1] = 0.7302 2.75 h = 0.003 0.006 y[1] (numeric) = 0.558758709515 2.63113031724 y[1] (closed_form) = 0 0 absolute error = 2.69 relative error = -100 % Correct digits = -16 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.7332 2.756 h = 0.0001 0.005 y[1] (numeric) = 0.561716221776 2.63723233237 y[1] (closed_form) = 0 0 absolute error = 2.696 relative error = -100 % Correct digits = -16 Radius of convergence (given) for eq 1 = 3.547 Order of pole (given) = 0.5 0 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 memory used=7921.9MB, alloc=52.3MB, time=98.04 x[1] = 0.7333 2.761 h = 0.0001 0.003 y[1] (numeric) = 0.561755384163 2.6422873992 y[1] (closed_form) = 0 0 absolute error = 2.701 relative error = -100 % Correct digits = -16 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.7334 2.764 h = 0.001 0.001 y[1] (numeric) = 0.561819486013 2.64532100023 y[1] (closed_form) = 0 0 absolute error = 2.704 relative error = -100 % Correct digits = -16 Radius of convergence (given) for eq 1 = 3.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.7344 2.765 h = 0.0001 0.004 y[1] (numeric) = 0.56281799795 2.64634409465 y[1] (closed_form) = 0 0 absolute error = 2.706 relative error = -100 % Correct digits = -16 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 x[1] = 0.7345 2.769 h = 0.003 0.006 y[1] (numeric) = 0.562869977591 2.65038850929 y[1] (closed_form) = 0 0 absolute error = 2.709 relative error = -100 % Correct digits = -16 Radius of convergence (given) for eq 1 = 3.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=7967.5MB, alloc=52.3MB, time=98.60 x[1] = 0.7375 2.775 h = 0.0001 0.005 y[1] (numeric) = 0.565829047411 2.65649008851 y[1] (closed_form) = 0 0 absolute error = 2.716 relative error = -100 % Correct digits = -16 Radius of convergence (given) for eq 1 = 3.565 Order of pole (given) = 0.5 0 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 0.7376 2.78 h = 0.0001 0.003 y[1] (numeric) = 0.565869392924 2.66154535525 y[1] (closed_form) = 0 0 absolute error = 2.721 relative error = -100 % Correct digits = -16 Radius of convergence (given) for eq 1 = 3.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 x[1] = 0.7377 2.783 h = 0.001 0.001 y[1] (numeric) = 0.565934205278 2.66457906383 y[1] (closed_form) = 0 0 absolute error = 2.724 relative error = -100 % Correct digits = -16 Radius of convergence (given) for eq 1 = 3.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.7387 2.784 h = 0.001 0.003 y[1] (numeric) = 0.56693299547 2.66560196619 y[1] (closed_form) = 0 0 absolute error = 2.725 relative error = -100 % Correct digits = -16 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=8013.0MB, alloc=52.3MB, time=99.17 x[1] = 0.7397 2.787 h = 0.0001 0.004 y[1] (numeric) = 0.567907714861 2.66864652556 y[1] (closed_form) = 0 0 absolute error = 2.728 relative error = -100 % Correct digits = -16 Radius of convergence (given) for eq 1 = 3.575 Order of pole (given) = 0.5 0 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 0.7398 2.791 h = 0.003 0.006 y[1] (numeric) = 0.567960792214 2.67269109616 y[1] (closed_form) = 0 0 absolute error = 2.732 relative error = -100 % Correct digits = -16 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.7428 2.797 h = 0.0001 0.005 y[1] (numeric) = 0.570921634368 2.67879212603 y[1] (closed_form) = 0 0 absolute error = 2.739 relative error = -100 % Correct digits = -16 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.7429 2.802 h = 0.0001 0.003 y[1] (numeric) = 0.570963343022 2.68384758448 y[1] (closed_form) = 0 0 absolute error = 2.744 relative error = -100 % Correct digits = -16 Radius of convergence (given) for eq 1 = 3.589 Order of pole (given) = 0.5 0 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 memory used=8058.6MB, alloc=52.3MB, time=99.73 x[1] = 0.743 2.805 h = 0.001 0.001 y[1] (numeric) = 0.571028973588 2.68688139386 y[1] (closed_form) = 0 0 absolute error = 2.747 relative error = -100 % Correct digits = -16 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.744 2.806 h = 0.001 0.003 y[1] (numeric) = 0.572028076793 2.68790406714 y[1] (closed_form) = 0 0 absolute error = 2.748 relative error = -100 % Correct digits = -16 Radius of convergence (given) for eq 1 = 3.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.745 2.809 h = 0.0001 0.004 y[1] (numeric) = 0.573003650207 2.69094848126 y[1] (closed_form) = 0 0 absolute error = 2.751 relative error = -100 % Correct digits = -16 Radius of convergence (given) for eq 1 = 3.596 Order of pole (given) = 0.5 0 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 0.7451 2.813 h = 0.003 0.006 y[1] (numeric) = 0.573057812705 2.69499318976 y[1] (closed_form) = 0 0 absolute error = 2.755 relative error = -100 % Correct digits = -16 Radius of convergence (given) for eq 1 = 3.599 Order of pole (given) = 0.5 0 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 memory used=8104.2MB, alloc=52.3MB, time=100.29 x[1] = 0.7481 2.819 h = 0.0001 0.005 y[1] (numeric) = 0.576020395244 2.70109365194 y[1] (closed_form) = 0 0 absolute error = 2.762 relative error = -100 % Correct digits = -16 Radius of convergence (given) for eq 1 = 3.606 Order of pole (given) = 0.5 0 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 0.7482 2.824 h = 0.0001 0.003 y[1] (numeric) = 0.576063451403 2.70614927973 y[1] (closed_form) = 0 0 absolute error = 2.767 relative error = -100 % Correct digits = -16 Radius of convergence (given) for eq 1 = 3.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.7483 2.827 h = 0.001 0.001 y[1] (numeric) = 0.57612989059 2.70918317668 y[1] (closed_form) = 0 0 absolute error = 2.77 relative error = -100 % Correct digits = -16 Radius of convergence (given) for eq 1 = 3.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.7493 2.828 h = 0.001 0.003 y[1] (numeric) = 0.577129299259 2.71020561945 y[1] (closed_form) = 0 0 absolute error = 2.771 relative error = -100 % Correct digits = -16 Radius of convergence (given) for eq 1 = 3.613 Order of pole (given) = 0.5 0 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 memory used=8149.7MB, alloc=52.3MB, time=100.86 x[1] = 0.7503 2.831 h = 0.0001 0.004 y[1] (numeric) = 0.578105713059 2.71324987789 y[1] (closed_form) = 0 0 absolute error = 2.774 relative error = -100 % Correct digits = -16 Radius of convergence (given) for eq 1 = 3.616 Order of pole (given) = 0.5 0 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 0.7504 2.835 h = 0.003 0.006 y[1] (numeric) = 0.578160948047 2.71729470671 y[1] (closed_form) = 0 0 absolute error = 2.778 relative error = -100 % Correct digits = -16 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.7534 2.841 h = 0.0001 0.005 y[1] (numeric) = 0.581125239264 2.7233945837 y[1] (closed_form) = 0 0 absolute error = 2.785 relative error = -100 % Correct digits = -16 Radius of convergence (given) for eq 1 = 3.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.7535 2.846 h = 0.0001 0.003 y[1] (numeric) = 0.5811696272 2.72845035907 y[1] (closed_form) = 0 0 absolute error = 2.79 relative error = -100 % Correct digits = -16 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 memory used=8195.2MB, alloc=52.3MB, time=101.42 x[1] = 0.7536 2.849 h = 0.001 0.001 y[1] (numeric) = 0.581236865364 2.73148433074 y[1] (closed_form) = 0 0 absolute error = 2.793 relative error = -100 % Correct digits = -16 Radius of convergence (given) for eq 1 = 3.633 Order of pole (given) = 0.5 0 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 0.7546 2.85 h = 0.001 0.003 y[1] (numeric) = 0.582236572054 2.7325065417 y[1] (closed_form) = 0 0 absolute error = 2.794 relative error = -100 % Correct digits = -16 Radius of convergence (given) for eq 1 = 3.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 x[1] = 0.7556 2.853 h = 0.0001 0.004 y[1] (numeric) = 0.583213812664 2.73555063446 y[1] (closed_form) = 0 0 absolute error = 2.797 relative error = -100 % Correct digits = -16 Radius of convergence (given) for eq 1 = 3.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.7557 2.857 h = 0.003 0.006 y[1] (numeric) = 0.58327010742 2.73959556652 y[1] (closed_form) = 0 0 absolute error = 2.801 relative error = -100 % Correct digits = -16 Radius of convergence (given) for eq 1 = 3.64 Order of pole (given) = 0.5 0 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 0.7587 2.863 h = 0.0001 0.005 y[1] (numeric) = 0.58623607586 2.74569484161 y[1] (closed_form) = 0 0 absolute error = 2.808 relative error = -100 % Correct digits = -16 Radius of convergence (given) for eq 1 = 3.647 Order of pole (given) = 0.5 0 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 memory used=8240.9MB, alloc=52.3MB, time=101.98 x[1] = 0.7588 2.868 h = 0.0001 0.003 y[1] (numeric) = 0.586281779759 2.75075074342 y[1] (closed_form) = 0 0 absolute error = 2.813 relative error = -100 % Correct digits = -16 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 x[1] = 0.7589 2.871 h = 0.001 0.001 y[1] (numeric) = 0.586349807216 2.75378477734 y[1] (closed_form) = 0 0 absolute error = 2.816 relative error = -100 % Correct digits = -16 Radius of convergence (given) for eq 1 = 3.653 Order of pole (given) = 0.5 0 NO POLE (ratio test) for Equation 1 NO REAL POLE (three term test) for Equation 1 NO COMPLEX POLE (six term test) for Equation 1 x[1] = 0.7599 2.872 h = 0.001 0.003 y[1] (numeric) = 0.587349804586 2.75480675533 y[1] (closed_form) = 0 0 absolute error = 2.817 relative error = -100 % Correct digits = -16 Radius of convergence (given) for eq 1 = 3.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 Finished! diff ( y , x , 1 ) = tanh ( sqrt ( 2.0 * x + 3.0 ) ) ; Iterations = 754 Total Elapsed Time = 1 Minutes 42 Seconds Expected Time Remaining = 0 Seconds Optimized Time Remaining = 0 Seconds Expected Total Time = 1 Minutes 42 Seconds > quit memory used=8284.0MB, alloc=52.3MB, time=102.49