Communicate with all existing process the number of requested halo elements
After this routine, each process knows how many processes there are to communicate with and how many elements have to be transferred
Type | Intent | Optional | Attributes | Name | ||
---|---|---|---|---|---|---|
type(tem_levelDesc_type), | intent(inout) | :: | me(minlevel:maxLevel) | the level descriptor to be filled |
||
type(tem_comm_env_type), | intent(in) | :: | proc | Process description to use. |
||
integer, | intent(in) | :: | minLevel | level range |
||
integer, | intent(in) | :: | maxLevel | level range |
Type | Visibility | Attributes | Name | Initial | |||
---|---|---|---|---|---|---|---|
integer, | private, | allocatable | :: | nHalosHis(:,:) | |||
integer, | private, | allocatable | :: | nHalosMine(:,:) | |||
integer, | private, | allocatable | :: | sources(:) | |||
integer, | private, | allocatable | :: | sourceHalos(:) | |||
integer, | private | :: | iProc | ||||
integer, | private | :: | iLevel | ||||
integer, | private | :: | ierr | ||||
integer, | private | :: | nLevels | ||||
integer, | private | :: | sourceProc | ||||
integer, | private | :: | nProcs | ||||
real(kind=rk), | private | :: | tStart | ||||
real(kind=rk), | private | :: | tEnd |