Fortran Wiki
atomic_or (changes)

Showing changes from revision #1 to #2: (追記) Added (追記ここまで) | ~~(削除) Removed (削除ここまで)~~ | ~~(削除) Chan (削除ここまで)~~(追記) ged (追記ここまで)

Description

atomic_or(atom, value) atomically defines atom with the bitwise or between the values of atom and value. When stat is present and the~~(削除) invokation (削除ここまで)~~(追記) invocation (追記ここまで) was successful, it is assigned the value 0. If it is present and the~~(削除) invokation (削除ここまで)~~(追記) invocation (追記ここまで) has failed, it is assigned a positive value; in particular, for a coindexedatom, if the remote image has stopped, it is assigned the value of iso_fortran_env‘s stat_stopped_image and if the remote image has failed, the value stat_failed_image.

Standard

TS 18508 or later

Class

Atomic subroutine

Syntax

call atomic_or(atom, value [, stat])

Arguments

atom - Scalar coarray or coindexed variable of integer type with atomic_int_kind kind.
value - Scalar of the same type as atom. If the kind is different, the value is converted to the kind of atom.
stat - (optional) Scalar default-kind integer variable.

Example

program atomic
 use iso_fortran_env
 integer(atomic_int_kind) :: atom[*]
 call atomic_or(atom[1], int(b'10100011101'))
end program atomic

Fortran Wiki atomic_or (changes)