function p25_p_set ( p )

%*****************************************************************************80
%
%% P25_P_SET sets the value of a parameter for problem 25.
%
%  Licensing:
%
%    This code is distributed under the GNU LGPL license.
%
%  Modified:
%
%    22 January 2001
%
%  Author:
%
%    John Burkardt
%
%  Parameters:
%
%    Input, real P, the value of the parameter that multiplies the
%    Gaussian noise.
%
  p25_p_val ( 'SET', p );

  return
end
