COMPUTE_PI
  FORTRAN90/OpenMP version
 
  Estimate the value of PI by summing a series.
 
  The number of processors available =        2
  The number of threads available    =        4
 
R8_TEST:
  Estimate the value of PI,
  using double precision arithmetic.
 
  N = number of terms computed and added;
 
  MODE = SEQ for sequential code;
  MODE = OMP for Open MP enabled code;
  (performance depends on whether Open MP is used,
  and how many processes are available!)
 
  ESTIMATE = the computed estimate of PI;
 
  ERROR = ( the computed estimate - PI );
 
  TIME = elapsed wall clock time;
 
  Note that you can't increase N forever, because:
  A) ROUNDOFF starts to be a problem, and
  B) maximum integer size is a problem.
 
  The maximum integer:              2147483647
 
 
             N Mode    Estimate        Error           Time
 
             1  SEQ    3.2000000000    0.584073E-01    0.953674E-06
             1  OMP    3.2000000000    0.584073E-01    0.615120E-03
            10  SEQ    3.1424259850    0.833331E-03    0.953674E-06
            10  OMP    3.1424259850    0.833331E-03    0.229836E-03
           100  SEQ    3.1416009869    0.833333E-05    0.619888E-05
           100  OMP    3.1416009869    0.833333E-05    0.221968E-03
          1000  SEQ    3.1415927369    0.833333E-07    0.560284E-04
          1000  OMP    3.1415927369    0.833333E-07    0.244141E-03
         10000  SEQ    3.1415926544    0.833341E-09    0.566006E-03
         10000  OMP    3.1415926544    0.833331E-09    0.500917E-03
        100000  SEQ    3.1415926536    0.836842E-11    0.593019E-02
        100000  OMP    3.1415926536    0.833333E-11    0.312114E-02
       1000000  SEQ    3.1415926536    0.284217E-13    0.564392E-01
       1000000  OMP    3.1415926536    0.826006E-13    0.325732E-01
      10000000  SEQ    3.1415926536    0.621725E-13    0.562391    
      10000000  OMP    3.1415926536    0.123457E-12    0.293848    
     100000000  SEQ    3.1415926536    0.633271E-12     5.62365    
     100000000  OMP    3.1415926536    0.110578E-12     2.82166    
    1000000000  SEQ    3.1415926536    0.177636E-12     55.9614    
    1000000000  OMP    3.1415926536    0.275335E-13     28.4536    
 
COMPUTE_PI
  Normal end of execution.