redefine_halos Subroutine

  1. tem_construction_module.f90
  2. tem_construction_module
  3. redefine_halos

private subroutine redefine_halos(levelDesc, sendbuffer, recvbuffer, proc, commPattern, computeStencil)

Report the actually existing elements, which were requested as halos from remote

Arguments

TypeIntentOptionalAttributesName
type(tem_levelDesc_type), intent(inout) :: levelDesc

the level descriptor of specific level
type(tem_communication_type), intent(inout) :: sendbuffer

send and receive communication buffer type
type(tem_communication_type), intent(inout) :: recvbuffer

send and receive communication buffer type
type(tem_comm_env_type), intent(in) :: proc

Process description to use.
type(tem_commPattern_type) :: commPattern

communication pattern
type(tem_stencilHeader_type) :: computeStencil(:)

array of all stencils used in the simulation

Calls

proc~~redefine_halos~~CallsGraph proc~redefine_halos redefine_halos interface~tem_logging_isactive tem_logging_isActive proc~redefine_halos->interface~tem_logging_isactive interface~append~4 append proc~redefine_halos->interface~append~4 proc~tem_comm_dumptype tem_comm_dumpType proc~redefine_halos->proc~tem_comm_dumptype interface~init~15 init proc~redefine_halos->interface~init~15 proc~tem_stencil_communicate tem_stencil_communicate proc~redefine_halos->proc~tem_stencil_communicate interface~changetype changeType proc~redefine_halos->interface~changetype proc~tem_logging_isactive_primary tem_logging_isActive_primary interface~tem_logging_isactive->proc~tem_logging_isactive_primary proc~tem_logging_isactive_for tem_logging_isActive_for interface~tem_logging_isactive->proc~tem_logging_isactive_for proc~append_ga_dynlong append_ga_dynlong interface~append~4->proc~append_ga_dynlong proc~append_ga_dynlong_vec append_ga_dynlong_vec interface~append~4->proc~append_ga_dynlong_vec interface~tem_tostr tem_toStr proc~tem_comm_dumptype->interface~tem_tostr proc~init_ga2d_real init_ga2d_real interface~init~15->proc~init_ga2d_real proc~tem_stencil_communicate->interface~append~4 proc~tem_stencil_communicate->interface~init~15 proc~tem_stencil_getheaderpos tem_stencil_getHeaderPos proc~tem_stencil_communicate->proc~tem_stencil_getheaderpos proc~changetype_element_vec changeType_element_vec interface~changetype->proc~changetype_element_vec proc~changetype_element changeType_element interface~changetype->proc~changetype_element proc~tem_r2str_arr tem_r2str_arr interface~tem_tostr->proc~tem_r2str_arr proc~tem_l2str tem_l2str interface~tem_tostr->proc~tem_l2str proc~tem_d2str_arr tem_d2str_arr interface~tem_tostr->proc~tem_d2str_arr proc~tem_l2str_arr tem_l2str_arr interface~tem_tostr->proc~tem_l2str_arr proc~tem_d2str tem_d2str interface~tem_tostr->proc~tem_d2str proc~tem_b2str_arr tem_b2str_arr interface~tem_tostr->proc~tem_b2str_arr proc~tem_b2str tem_b2str interface~tem_tostr->proc~tem_b2str proc~tem_r2str tem_r2str interface~tem_tostr->proc~tem_r2str proc~tem_i2str tem_i2str interface~tem_tostr->proc~tem_i2str proc~tem_i2str_arr tem_i2str_arr interface~tem_tostr->proc~tem_i2str_arr interface~expand~2 expand proc~append_ga_dynlong->interface~expand~2 proc~append_ga_dynlong_vec->interface~expand~2 proc~tem_etypeisvalid tem_eTypeIsValid proc~changetype_element_vec->proc~tem_etypeisvalid proc~changetype_element->proc~tem_etypeisvalid proc~expand_ga_dynlong expand_ga_dynlong interface~expand~2->proc~expand_ga_dynlong

Called by

proc~~redefine_halos~~CalledByGraph proc~redefine_halos redefine_halos proc~communicate_elements communicate_elements proc~communicate_elements->proc~redefine_halos proc~tem_find_allelements tem_find_allElements proc~tem_find_allelements->proc~communicate_elements proc~tem_create_leveldesc tem_create_levelDesc proc~tem_create_leveldesc->proc~tem_find_allelements proc~tem_dimbydim_construction tem_dimByDim_construction proc~tem_dimbydim_construction->proc~tem_create_leveldesc

Contents

Variables


Variables

TypeVisibilityAttributesNameInitial
integer, private :: iProc
integer, private :: tPos
integer, private :: iElem
integer, private :: nElems
integer, private :: elemCount
integer(kind=long_k), private, allocatable:: recvBuf(:)
integer, private :: message_flag
logical, private :: wasAdded