##############ECHO OF PROBLEM################# ##############temp/sing5postode.ode################# diff ( y , x , 1 ) = m1 * 3.0 / x / x / x / x ; ! /* BEGIN FIRST INPUT BLOCK */ Digits=32; max_terms=20; ! /* END FIRST INPUT BLOCK */ /* BEGIN SECOND INPUT BLOCK */ x_start=c(-1.0); x_end=c(-0.7); array_y_init[0 + 1] = exact_soln_y(x_start); glob_look_poles=true; glob_max_h=c(0.001); glob_min_h=c(0.001); glob_type_given_pole=1; array_given_rad_poles[1][1]=c(0.0); array_given_rad_poles[1][2]=c(0.0); array_given_ord_poles[1][1]=c(4.0); array_given_ord_poles[1][2]=c(0.0); /* 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(c(1.0)/c(x)/c(x)/c(x)); } /* END USER DEF BLOCK */ #######END OF ECHO OF PROBLEM################# START of Soultion TOP MAIN SOLVE Loop x[1] = -1 y[1] (closed_form) = -1 y[1] (numeric) = -1 absolute error = 0 relative error = 0 % Desired digits = 8 Estimated correct digits = 14 Correct digits = 16 h = 0.05 Radius of convergence (given) for eq 1 = 1 Order of pole (given) = 4 NO POLE (ratio test) for Equation 1 Radius of convergence (three term test) for eq 1 = 1 Order of pole (three term test) = 6.653e-14 NO COMPLEX POLE (six term test) for Equation 1 TOP MAIN SOLVE Loop x[1] = -0.8999999999999999 y[1] (closed_form) = -1.371742112482853 y[1] (numeric) = -1.371741640606589 absolute error = 4.718762645072871e-07 relative error = 3.439977968258123e-05 % Desired digits = 8 Estimated correct digits = 14 Correct digits = 7 h = 0.05 Radius of convergence (given) for eq 1 = 0.9 Order of pole (given) = 4 NO POLE (ratio test) for Equation 1 Radius of convergence (three term test) for eq 1 = 0.9 Order of pole (three term test) = 3.655e-14 NO COMPLEX POLE (six term test) for Equation 1 TOP MAIN SOLVE Loop x[1] = -0.7999999999999998 y[1] (closed_form) = -1.953125000000001 y[1] (numeric) = -1.95312325355389 absolute error = 1.746446110839628e-06 relative error = 8.941804087498889e-05 % Desired digits = 8 Estimated correct digits = 13 Correct digits = 7 h = 0.05 Radius of convergence (given) for eq 1 = 0.8 Order of pole (given) = 4 NO POLE (ratio test) for Equation 1 Radius of convergence (three term test) for eq 1 = 0.8 Order of pole (three term test) = 1.08e-13 NO COMPLEX POLE (six term test) for Equation 1 Finished! diff ( y , x , 1 ) = m1 * 3.0 / x / x / x / x ; Iterations = 6 Total Elapsed Time = 0.0 Seconds Elapsed Time(since restart) = 0.0 Seconds Time to Timeout = 20 Minutes 0.0 Seconds Percent Done = 116.7 %