diff ( y , x , 1 ) = m1 * 2.0 / ( x - 6.0 ) / ( x - 6.0 ) / ( x - 6.0) ;
!
Digits := 64;
max_terms := 40;
!
x_start := 2.0;
x_end := 3.0;
diff(y,0,exact_soln_y(x_start));
glob_look_poles := true;
glob_max_iter := 100;
!
exact_soln_y := proc(x)
return(1.0/ ( x - 6.0 ) / ( x - 6.0 ));
end;