We read every piece of feedback, and take your input very seriously.
To see all available qualifiers, see our documentation.
There was an error while loading. Please reload this page.
2 parents 2eed453 + b6e00a3 commit 5b6d987Copy full SHA for 5b6d987
src/user_defined_collectives_m.f90
@@ -13,10 +13,10 @@ module user_defined_collectives_m
13
interface
14
15
module subroutine co_all(boolean)
16
- !! If any image in a team calls this subroutine, then this procedure must
17
- !! in the corresponding team. The subroutine sets the "boolean" argument
18
- !! .true. if it is true in all participating images upon entry and .false.
19
- !! otherwise.
+ !! If any image in a team calls this subroutine, then every image in the
+ !! the same team must call this subroutine. This subroutine sets the
+ !! "boolean" argument .true. if it is true in all participating images
+ !! upon entry and .false. otherwise.
20
implicit none
21
logical, intent(inout) :: boolean
22
end subroutine
0 commit comments