%
%   SHOOTF.M   Function file for SHOOTM1.M, SHOOTM2.M, and SHOOTA.M (used by ODE23)
%
%   Given differential eqn.:   y'' + 3xy' + 7y =  cos(2x)
%
%   File prepared by J. R. White, UMass-Lowell (Aug. 2003)
%
     function zp = odefile(x,z)
     zp = zeros(length(z),1);
     zp(1) = z(2);
     zp(2) = -3*x*z(2) - 7*z(1) + cos(2*x);
%
%   end of function
