9 May 2025   9:00:24.523 PM
 
discrete_pdf_sample_2d():
  FORTRAN90 version
  Generate sample data using a discrete PDF.
 
TEST01
  Consider data skewed toward the upper left corner
  of the unit square.
  Generate 1000 samples
  PDF data is on a   20 by   20 grid.
 
  PDF data sums to    2.88230    
 
  Wrote sample data to file "test01.txt".
 
TEST02
  Consider data suggested by the shape and density of Iowa.
  Generate 1000 samples
  PDF data is on a   12 by    8 grid.
 
  PDF data sums to    3200.00    
 
  Wrote sample data to file "test02.txt".
 
discrete_pdf_sample_2d():
  Normal end of execution.
 
 9 May 2025   9:00:24.527 PM