function p_data = p04_data ( dim_num, data_num )

%*****************************************************************************80
%
%% p04_data() returns the data for problem p04.
%
%  Licensing:
%
%    This code is distributed under the MIT license.
%
%  Modified:
%
%    01 August 2011
%
%  Author:
%
%    John Burkardt
%
%  Input:
%
%    integer DIM_num, the spatial dimension of the dependent
%    variables.
%
%    integer DATA_num, the number of data points.
%
%  Output:
%
%    real P_data(DIM_num,DATA_num), the data.
%
  p_data = [ ...
    0.00,  0.00; ...
    0.05,  0.70; ...
    0.10,  1.00; ...
    0.20,  1.00; ...
    0.80,  0.30; ...
    0.85,  0.05; ...
    0.90,  0.10; ...
    1.00,  1.00 ]';

  return
end
