gather angle count from all clients
Type | Intent | Optional | Attributes | Name | ||
---|---|---|---|---|---|---|
class(mimic_communicator), | intent(inout) | :: | this | |||
integer, | intent(out), | dimension(:), target | :: | angles_pcode | Integer data to gather |
subroutine gather_angle_count(this, angles_pcode)
class(mimic_communicator), intent(inout) :: this
!> Integer data to gather
integer, dimension(:), target, intent(out) :: angles_pcode
call this%gather_int(angles_pcode, MCL_SEND_NUM_ANGLES)
end subroutine gather_angle_count