Compaq Fortran
User Manual for
Tru64 UNIX and Linux Alpha Systems


Previous Contents Index

D.2.7 _OtsInParallel or mpc_in_parallel_region

Returns the current status of processing activity in a parallel region.

Syntax:


      INTERFACE 
          INTEGER FUNCTION otsinparallel () 
!DEC$     ALIAS otsinparallel, '_OtsInParallel' 
          END FUNCTION OtsInParallel 
      END INTERFACE 
      INTEGER result 
      result = otsinparallel () 

Description:

The routine returns 1 if the program is currently running within a parallel region, otherwise it returns 0. )


Index Contents