24 October   2023  10:35:26.730 AM      
 
monte_carlo_rule():
  FORTRAN77 version
 
  Compute the abscissas and weights of a quadrature rule
  that is simply a Monte Carlo sampling.
 
  The program requests input values from the user:
 
  * M, the spatial dimension,
  * N, the number of points to generate,
  * SEED, a positive integer.
 
  Output from the program includes
  a set of 3 files that define the quadrature rule.
 
    (1) "mc_m?_n?_s?_r.txt", the ranges;
    (2) "mc_m?_n?_s?_w.txt", the weights;
    (3) "mc_m?_n?_s?_x.txt", the abscissas.
 
  Spatial dimension M =        3
  Number of points N =      100
  Seed S =    123456789
 
  Creating R file = "mc_d3_n100_s123456789_r.txt".
  Creating W file = "mc_d3_n100_s123456789_w.txt".
  Creating X file = "mc_d3_n100_s123456789_x.txt".
 
monte_carlo_rule():
  Normal end of execution.
 
24 October   2023  10:35:26.731 AM