VMS Help FORTRAN, Statements, Directive Statements, PRIVATE  *Conan The Librarian (sorry for the slow response - running on an old VAX)

  CPAR$ PRIVATE name[,...,name]
  CPAR$ PRIVATE_ALL

  PRIVATE directives can be interspersed with declaration statements
  within program units in a parallel-processing application program.
  The PRIVATE[_ALL] directive specifies those variables (scalars,
  arrays, and records) and common blocks that must have unique memory
  locations within each of the processes executing a parallel DO
  loop.

  PRIVATE_ALL causes all variables and common blocks declared in a
  routine to default to private -- unless they are explicitly
  declared as shared (for common blocks) or context-shared (for
  variables).  PRIVATE_ALL does not disallow the use of the SHARED
  and CONTEXT_SHARED directives; it merely establishes the default
  behavior for data sharing as PRIVATE, overriding the default
  behavior (SHARED_ALL and CONTEXT_SHARED) established by the
  /PARALLEL qualifier.

  Commas are required between the names that you specify on PRIVATE
  directives.  In addition, common block names must be enclosed by
  slashes (for example, /name/ or, for blank common, / /).

  See your user manual for information about when to use directives
  to resolve certain types of data dependence problems.