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    =        1
 
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.00000    
             1  OMP    3.2000000000    0.584073E-01    0.231266E-04
            10  SEQ    3.1424259850    0.833331E-03    0.953674E-06
            10  OMP    3.1424259850    0.833331E-03    0.309944E-05
           100  SEQ    3.1416009869    0.833333E-05    0.596046E-05
           100  OMP    3.1416009869    0.833333E-05    0.810623E-05
          1000  SEQ    3.1415927369    0.833333E-07    0.557899E-04
          1000  OMP    3.1415927369    0.833333E-07    0.581741E-04
         10000  SEQ    3.1415926544    0.833341E-09    0.560999E-03
         10000  OMP    3.1415926544    0.833341E-09    0.561953E-03
        100000  SEQ    3.1415926536    0.836842E-11    0.562000E-02
        100000  OMP    3.1415926536    0.836842E-11    0.562406E-02
       1000000  SEQ    3.1415926536    0.284217E-13    0.561810E-01
       1000000  OMP    3.1415926536    0.284217E-13    0.560620E-01
      10000000  SEQ    3.1415926536    0.621725E-13    0.563508    
      10000000  OMP    3.1415926536    0.621725E-13    0.561372    
     100000000  SEQ    3.1415926536    0.633271E-12     5.61403    
     100000000  OMP    3.1415926536    0.633271E-12     5.56877    
    1000000000  SEQ    3.1415926536    0.177636E-12     56.1334    
    1000000000  OMP    3.1415926536    0.177636E-12     55.5693    
 
COMPUTE_PI
  Normal end of execution.