omp_in_parallel (3f)

returns whether or not a region is executing in parallel

Syntax

  interface
     logical function omp_in_parallel ( )
     end function omp_in_parallel
  end interface
  logical result
  result = omp_in_parallel ( )

Description

  The omp_in_parallel function has global scope.

Return Values

  This function returns TRUE if it is called from the dynamic extent of a
  region executing in parallel, even if nested regions exist that may be
  serialized. Otherwise, it returns FALSE. A parallel region that is
  serialized is not considered to be a region executing in parallel.