wrapper to request coordinates of MM part
Type | Intent | Optional | Attributes | Name | ||
---|---|---|---|---|---|---|
type(subsystem_type), | dimension(:) | :: | subsystems | array of subsystems associated with client codes |
subroutine mimic_collect_coordinates(subsystems)
!> array of subsystems associated with client codes
type(subsystem_type), dimension(:) :: subsystems
call timer_start("mimic_collect_coordinates")
call communicator%gather_coords(subsystems)
call timer_stop
end subroutine mimic_collect_coordinates