%
%   ODENEX3B.M   Function evaluation for ODE step in ODENEX3.M
%
%   Evaluate  y' = 1/(x + y*exp(y))   
%
%   File prepared by J. R. White, UMass-Lowell (Sept 2006)
%
     function yp = odefile(x,y)
     yp = 1/(x + y*exp(y));
%
%   end of function