Intel® Fortran Compiler 18.0 Developer Guide and Reference

ATOMIC_REF

Intrinsic Subroutine (Generic): Lets you reference a variable atomically.

CALL ATOMIC_REF (value, atom)

value

(Output) Must be a scalar and of the same type as atom. If its kind is the same as that of atom or its type is logical, it becomes defined with the value of atom. Otherwise, it is defined with the value of INT(ATOM, KIND (VALUE)).

atom

(Input) Must be a scalar coarray or coindexed object and of type integer with kind ATOMIC_INT_KIND or of type logical with kind ATOMIC_LOGICAL_KIND.

ATOMIC_INT_KIND and ATOMIC_LOGICAL_KIND are named constants in the intrinsic module ISO_FORTRAN_ENV.

Example

Consider the following:

CALL ATOMIC_REF (SOL, I [9])

This causes SOL to become defined with the value of I on image 9.

See Also