COPYIN (TU*X only)

Compaq Fortran Parallel Compiler Directive: Copies the values of listed data objects from the master thread to PRIVATE data objects of the same name in slave threads.

Syntax

c$PAR COPYIN object[, object] ...

c
Is one of the following: C (or c), !, or * (see Syntax Rules for Parallel Directives).

object
Is the name of a variable, a single array element, or a named common block. A named common block must appear between slashes (/ /).

Rules and Behavior

Single array elements can be copied, but array sections cannot be copied.

SHARED variables cannot be copied.

When an ALLOCATABLE array is to be copied, it must be allocated when the COPYIN directive is encountered.

COPYIN directives are permitted only within PARALLEL or PARALLEL DO constructs.

The following form is also allowed: c$COPYIN object[, object] ...

See Also: Parallel Directives for Tru64 UNIX Systems, Compaq Fortran Parallel Compiler Directives (TU*X only), OpenMP Fortran API Compiler Directives (TU*X only)

Examples

Consider the following:

  CPAR$ COPYIN A, B, /X/, C(I)

This statement specifies that the following be copied from the master thread to the PRIVATE data objects of the same name: A and B, the entire contents of common block X, and the Ith element of C.