function value = p01_exact ( )

%*****************************************************************************80
%
%% p01_exact() returns the exact integral of function 1 over the unit disk.
%
%  Discussion:
%
%    The integral depends on a parameter EX which can be set or
%    retrieved through p01_parameters().
%
%  Licensing:
%
%    This code is distributed under the MIT license.
%
%  Modified:
%
%    11 October 2022
%
%  Author:
%
%    John Burkardt
%
%  Output:
%
%    real VALUE, the exact integral.
%
  ex = p01_parameters ( );

  value = cos_power_int ( 0.0, 2.0 * pi, ex ) / ( ex + 2.0 );

  return
end
