function fx = p04_fx ( x )

%*****************************************************************************80
%
%% P04_FX evaluates exp ( x ) - 1 / ( 10 * x )^2.
%
%  Licensing:
%
%    This code is distributed under the MIT license.
%
%  Modified:
%
%    07 July 2011
%
%  Author:
%
%    John Burkardt
%
%  Input:
%
%    real X(*), the point at which F is to be evaluated.
%
%  Output:
%
%    real FX(*), the value of the function at X.
%
  fx = exp ( x ) - 1.0 ./ ( 100.0 * x .* x );

  return
end
