25 October   2023   8:20:32.057 AM      
 
multitask_openmp():
  FORTRAN77/OpenMP version
  Demonstrate how OpenMP can "multitask" by using the
  SECTIONS directive to carry out several tasks in parallel.
 
  Number of primes computed was  20000
  Last prime was       224737
  Number of sines computed was  20000
  Last sine computed was    12731.8    
 
  Elapsed time =    12.3692    
  Task 1 time =    5.86147    
  Task 2 time =    6.50776    
 
multitask_openmp():
  Normal end of execution.
 
25 October   2023   8:20:44.426 AM      
25 October   2023   8:20:44.428 AM      
 
multitask_openmp():
  FORTRAN77/OpenMP version
  Demonstrate how OpenMP can "multitask" by using the
  SECTIONS directive to carry out several tasks in parallel.
 
  Number of primes computed was  20000
  Last prime was       224737
  Number of sines computed was  20000
  Last sine computed was    12731.8    
 
  Elapsed time =    6.51342    
  Task 1 time =    5.85612    
  Task 2 time =    6.51318    
 
multitask_openmp():
  Normal end of execution.
 
25 October   2023   8:20:50.941 AM      
25 October   2023   8:20:50.943 AM      
 
multitask_openmp():
  FORTRAN77/OpenMP version
  Demonstrate how OpenMP can "multitask" by using the
  SECTIONS directive to carry out several tasks in parallel.
 
  Number of primes computed was  20000
  Last prime was       224737
  Number of sines computed was  20000
  Last sine computed was    12731.8    
 
  Elapsed time =    6.51944    
  Task 1 time =    6.02652    
  Task 2 time =    6.51912    
 
multitask_openmp():
  Normal end of execution.
 
25 October   2023   8:20:57.463 AM