function f = f_runge ( m, n, x )

%*****************************************************************************80
%
%% f_runge() evaluates the Runge function.
%
%  Discussion:
%
%    Interpolation of the Runge function at evenly spaced points in [-1,1]
%    is a common test.
%
%  Licensing:
%
%    This code is distributed under the MIT license.
%
%  Modified:
%
%    03 July 2012
%
%  Author:
%
%    John Burkardt
%
%  Input:
%
%    integer M, the spatial dimension.
%
%    integer N, the number of evaluation points.
%
%    real X(M,N), the evaluation points.
%
%  Output:
%
%    real F(1,N), the function values.
%
  f(1,1:n) = 1.0 ./ ( 1.0 + 25.0 * sum ( x(1:m,1:n).^2, 1 ) );

  return
end
