Intel® Fortran Compiler 16.0 User and Reference Guide

Adding OpenMP* Support to your Application

To add OpenMP* support to your application, do the following:

  1. Add the appropriate OpenMP* directives to your source code.

  2. Compile the application with [Q]openmp option.

  3. For applications with large local or temporary arrays, you may need to increase the stack space available at run-time. In addition, you may need to increase the stack allocated to individual threads by using the KMP_STACKSIZE environment variable or by setting the corresponding library routines.

You can set other environment variables to control multi-threaded code execution.

OpenMP Directive Syntax

To add OpenMP* support to your application, first add appropriate OpenMP* directives to your source code.

OpenMP* directives use a specific format and syntax. Intel Extension Routines to OpenMP* describes the OpenMP* extensions to the specification that have been added to the Intel® Fortran Compiler.

The following syntax illustrates using the directives in your source.

Example

<prefix> <directive> [<clause>[[,]<clause>...]]

where:

The directives are interpreted as comments if you omit the [Q]openmp option.

The OpenMP* constructs defining a parallel region have one of the following syntax forms:

Example

!$OMP <directive>
  <structured block of code> 
!$OMP END <directive> 
                  # OR 
!$OMP <directive>
  <structured block of code> 
                  # OR 
!$OMP <directive>

The following example demonstrates one way of using an OpenMP* directive to parallelize a loop.

Example

subroutine simple_omp(a, N)
  use omp_lib
  integer :: N, a(N) 
!$OMP PARALLEL DO
  do i = 1, N
    a(i) = i*2
  end do 
end subroutine simple_omp

Compile the Application

The [Q]openmp option enables the parallelizer to generate multi-threaded code based on the OpenMP* directives in the source. The code can be executed in parallel on single processor, multi-processor, or multi-core processor systems.

The [Q]openmp option works with both -O0 (Linux* and OS X*) and /Od (Windows*) and with any optimization level of O1, O2 and O3.

Specifying -O0 (Linux* and OS X*) or /Od (Windows*) with the OpenMP* option helps to debug OpenMP* applications.

Compile your application using commands similar to those shown below:

Operating System

Syntax Example

Linux*

ifort -openmp source_file

OS X*

ifort -openmp source_file

Windows*

ifort /Qopenmp source_file

Assume that you compile the sample above, using commands similar to the following, where the c option instructs the compiler to compile the code without generating an executable:

Operating System

Extended Syntax Example

Linux*

ifort -openmp -c parallel.f90

OS X*

ifort -openmp -c parallel.f90

Windows*

ifort /Qopenmp /c parallel.f90

The compiler might return a message similar to the following:

Example

parallel.f90(20) : (col. 6) remark: OpenMP DEFINED LOOP WAS PARALLELIZED.

Configure the OpenMP* Environment

Before you run the multi-threaded code, you can set the number of desired threads using the OpenMP* environment variable, OMP_NUM_THREADS.

See Also