function uniform_plots ( )

%*****************************************************************************80
%
%% UNIFORM_PLOTS plots PDF, CDF and inverse CDF for uniform density.
%
%  Licensing:
%
%    This code is distributed under the GNU LGPL license.
%
%  Modified:
%
%    25 February 2013
%
%  Author:
%
%    John Burkardt
%

%
%  PDF
%
  figure ( 1 )
  x = linspace ( -0.5, 1.5, 101 );
  y = ( 0.0 <= x & x <= 1.0 );
  plot ( x, y, 'r-', 'LineWidth', 5 );
  grid on
  title ( 'Uniform PDF', 'Fontsize', 24 );
  xlabel ( '<=== X ===>', 'Fontsize', 24 );
  ylabel ( '<=== rho(X) ===>', 'Fontsize', 24 );
  axis ( [-0.5, 1.5, -0.5, 1.5 ] );
  print ( '-dpng', 'uniform_pdf.png' );
%
%  CDF
%
  figure ( 2 )
  x = linspace ( -0.5, 1.5, 101 );
  y = ( ( 0.0 <= x & x <= 1.0 ) .* x ) + ( 1.0 < x );
  plot ( x, y, 'r-', 'LineWidth', 5 );
  grid on
  title ( 'Uniform CDF', 'Fontsize', 24 );
  xlabel ( '<=== X ===>', 'Fontsize', 24 );
  ylabel ( '<=== cdf(X) ===>', 'Fontsize', 24 );
  axis ( [-0.5, 1.5, -0.5, 1.5 ] );
  print ( '-dpng', 'uniform_cdf.png' );
%
%  invCDF
%
  figure ( 3 )
  x = linspace (  0.0, 1.0, 101 );
  y = ( ( 0.0 <= x & x <= 1.0 ) .* x );
  plot ( x, y, 'r-', 'LineWidth', 5 );
  grid on
  title ( 'Uniform invCDF', 'Fontsize', 24 );
  xlabel ( '<=== cdf(X) ===>', 'Fontsize', 24 );
  ylabel ( '<=== X ===>', 'Fontsize', 24 );
  axis ( [-0.5, 1.5, -0.5, 1.5 ] );
  print ( '-dpng', 'uniform_invcdf.png' );

  return
end

