##############ECHO OF PROBLEM################# ##############temp/h5h3postode.ode################# diff ( y , x , 5 ) = m1 * diff ( y , x , 3 ) ; ! /* BEGIN FIRST INPUT BLOCK */ Digits=64; max_terms=40; ! /* END FIRST INPUT BLOCK */ /* BEGIN SECOND INPUT BLOCK */ x_start=c(0.1); x_end=c(1.5); array_y_init[0 + 1] = exact_soln_y(x_start); array_y_init[1 + 1] = exact_soln_yp(x_start); array_y_init[2 + 1] = exact_soln_ypp(x_start); array_y_init[3 + 1] = exact_soln_yppp(x_start); array_y_init[4 + 1] = exact_soln_ypppp(x_start); glob_look_poles=true; glob_type_given_pole=3; /* END SECOND INPUT BLOCK */ /* BEGIN OVERRIDE BLOCK */ glob_desired_digits_correct=8; glob_max_minutes=(20.0); glob_subiter_method=3; glob_max_iter=1000; glob_upper_ratio_limit=c(1.11); glob_lower_ratio_limit=c(0.99); /* END OVERRIDE BLOCK */ ! /* BEGIN USER DEF BLOCK */ double exact_soln_y (double x) { return(cos(c(x))); } double exact_soln_yp (double x) { return(glob__m1 * sin(c(x))); } double exact_soln_ypp (double x) { return(glob__m1 * cos(c(x))); } double exact_soln_yppp (double x) { return(sin(x)); } double exact_soln_ypppp (double x) { return(cos(c(x))); } /* END USER DEF BLOCK */ #######END OF ECHO OF PROBLEM################# START of Soultion TOP MAIN SOLVE Loop x[1] = 0.1 y[1] (closed_form) = 0.9950041652780258 y[1] (numeric) = 0.9950041652780258 absolute error = 0 relative error = 0 % Desired digits = 8 Estimated correct digits = 14 Correct digits = 16 h = 0.05 SETTING H FOR POLE NO POLE (given) for Equation 1 NO POLE (ratio test) for Equation 1 Radius of convergence (three term test) for eq 1 = 0.009373 Order of pole (three term test) = 33 NO COMPLEX POLE (six term test) for Equation 1 SETTING H FOR POLE SETTING H FOR POLE SETTING H FOR POLE SETTING H FOR POLE SETTING H FOR POLE SETTING H FOR POLE SETTING H FOR POLE SETTING H FOR POLE SETTING H FOR POLE SETTING H FOR POLE SETTING H FOR POLE SETTING H FOR POLE SETTING H FOR POLE SETTING H FOR POLE SETTING H FOR POLE SETTING H FOR POLE SETTING H FOR POLE SETTING H FOR POLE SETTING H FOR POLE SETTING H FOR POLE SETTING H FOR POLE SETTING H FOR POLE SETTING H FOR POLE SETTING H FOR POLE SETTING H FOR POLE SETTING H FOR POLE SETTING H FOR POLE SETTING H FOR POLE SETTING H FOR POLE SETTING H FOR POLE SETTING H FOR POLE SETTING H FOR POLE SETTING H FOR POLE SETTING H FOR POLE SETTING H FOR POLE SETTING H FOR POLE SETTING H FOR POLE SETTING H FOR POLE SETTING H FOR POLE SETTING H FOR POLE SETTING H FOR POLE TOP MAIN SOLVE Loop x[1] = 0.1999976946686464 y[1] (closed_form) = 0.9800670358372746 y[1] (numeric) = 0.9800672414524 absolute error = 2.056151253704286e-07 relative error = 2.09797001482425e-05 % Desired digits = 8 Estimated correct digits = 12 Correct digits = 7 h = 8.777955881230441e-05 NO POLE (given) for Equation 1 NO 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! Maximum Iterations Reached before Solution Completed! diff ( y , x , 5 ) = m1 * diff ( y , x , 3 ) ; Iterations = 1000 Total Elapsed Time = 0.0 Seconds Elapsed Time(since restart) = 0.0 Seconds Expected Time Remaining = 0.0 Seconds Optimized Time Remaining = 0.0 Seconds Expected Total Time = 0.0 Seconds Time to Timeout = 20 Minutes 0.0 Seconds Percent Done = 9.638 %