8.24 ATOMIC_DEFINE — Установка переменной атомарно

Описание:

ATOMIC_DEFINE(ATOM, VALUE) определяет переменную ATOM со значением VALUE атомарно.

Стандарт:

Fortran 2008 и более поздние версии

Класс:

Атомарная подпрограмма

Синтаксис:

CALL ATOMIC_DEFINE(ATOM, VALUE)

Аргументы:

ATOM	Скалярная комассивная или коиндексированная переменная целочисленного типа с ATOMIC_INT_KIND видом или логического типа с ATOMIC_LOGICAL_KIND видом.
VALURE	Скалярный и того же типа, что и ATOM. Если вид отличается, значение преобразуется к виду ATOM.

Пример:

program atomic
  use iso_fortran_env
  integer(atomic_int_kind) :: atom[*]
  call atomic_define (atom[1], this_image())
end program atomic

См. также:

ATOMIC_REF, ISO_FORTRAN_ENV