%
%   ODENEX3A.M   Function file for use in FZERO (see ODENEX3.M)
%
%   Evaluates f(x,y) = -x*exp(-y) + 0.5*y^2 - 0.5 for various y values 
%   for a specified x value which is given as XX in the global list.
%
%   File prepared by J. R. White, UMass-Lowell (Sept 2006)
%
      function f = funfile(y)
      global XX
      f = -XX*exp(-y) + 0.5*y*y - 0.5;
%
%   end of function
