Next: ATOMIC_REF, Previous: ATANH, Up: Intrinsic Procedures [Contents][Index]
ATOMIC_DEFINE
— Setting a variable atomicallyATOMIC_DEFINE(ATOM, VALUE)
defines the variable ATOM with the value
VALUE atomically.
Fortran 2008 and later
Atomic subroutine
CALL ATOMIC_DEFINE(ATOM, VALUE)
ATOM | Scalar coarray or coindexed variable of either integer
type with ATOMIC_INT_KIND kind or logical type
with ATOMIC_LOGICAL_KIND kind. |
VALURE | Scalar and of the same type as ATOM. If the kind is different, the value is converted to the kind of ATOM. |
program atomic use iso_fortran_env integer(atomic_int_kind) :: atom[*] call atomic_define (atom[1], this_image()) end program atomic