diff ( y , x , 2 ) = sin(x); ! Digits := 32; max_terms := 30; ! x_start := 0.1; x_end := 5.0 ; diff(y,0,exact_soln_y(x_start)); diff(y,1,exact_soln_yp(x_start)); glob_h := 0.00001; glob_look_poles := true; glob_max_iter := 100; ! exact_soln_y := proc(x) return(2.0 - cos(x)); end; exact_soln_yp := proc(x) return(sin(x)); end;