function fx = f1 ( x )

%*****************************************************************************80
%
%% f1() evaluates a nonlinear system of 1 equation.
%
%  Discussion:
%
%    This is Kepler's equation.
%
%  Licensing:
%
%    This code is distributed under the MIT license.
%
%  Modified:
%
%    09 April 2021
%
%  Author:
%
%    John Burkardt
%
%  Input:
%
%    real X(N), the variable values.
%
%  Output:
%
%    real FX(N), the function values at X.
%
  e = 0.8;
  m = 5.0;
  fx(1) = x(1) - m - e * sin ( x(1) );

  return
end
