9.7.2 SHARED Clause

Passing a shared variable to a non-intrinsic procedure may result in the value of the shared variable being copied into temporary storage before the procedure reference, and back out of the temporary storage into the actual argument storage after the procedure reference. Use of intervening temporary storage can occur only when the following three conditions hold regarding an actual argument:

1. The actual argument is one of the following arguments:

   • A shared variable

   • A subobject of a shared variable

   • An object associated with a shared variable

   • An object associated with a subobject of a shared variable

2. The actual argument is one of the following arguments:

   • An array section

   • An array section with a vector subscript

   • An assumed-shape array

   • A pointer array

3. The associated dummy argument for the actual argument is an explicit-shape array or an assumed-size array.