tem_shape_findElemByBCLabels Subroutine

  1. tem_subTree_module.f90
  2. tem_subTree_module
  3. tem_shape_findElemByBCLabels

private subroutine tem_shape_findElemByBCLabels(bcLabels, bc_prop, foundAny, map2global, bcIDs, stencil)

This routine identify elements that belong to certain bounaries. Labels of required boundaries are given by bcLabels. bc_prop contains boudnary_ID of all local elements. Firstly, bcLabels are converted into bcIDs. Then all elements in bc_prop are looped over to check if it matches one of the required bcID. If match, its position is save in map2global. Number of elements found on each level is saved in countElems.

Arguments

TypeIntentOptionalAttributesName
character(len=labelLen), intent(in) :: bcLabels(:)

bcLabels
type(tem_BC_prop_type), intent(in) :: bc_prop

bc property
logical, intent(out) :: foundAny

if any element be identified
type(dyn_intarray_type), intent(inout) :: map2global

dynamic array. Elements positions in bc_prop%property%elemID
integer, intent(out), allocatable:: bcIDs(:)

id of boundary condition to be tracked
type(tem_stencilHeader_type), intent(in), optional :: stencil

stencil required to get useful links

Calls

proc~~tem_shape_findelembybclabels~~CallsGraph proc~tem_shape_findelembybclabels tem_shape_findElemByBCLabels interface~append~16 append proc~tem_shape_findelembybclabels->interface~append~16 proc~append_singlega2d_real append_singlega2d_real interface~append~16->proc~append_singlega2d_real proc~append_arrayga2d_real append_arrayga2d_real interface~append~16->proc~append_arrayga2d_real interface~expand~14 expand proc~append_singlega2d_real->interface~expand~14 proc~append_arrayga2d_real->interface~expand~14 proc~expand_ga2d_real expand_ga2d_real interface~expand~14->proc~expand_ga2d_real

Called by

proc~~tem_shape_findelembybclabels~~CalledByGraph proc~tem_shape_findelembybclabels tem_shape_findElemByBCLabels proc~tem_create_subtree_of tem_create_subTree_of proc~tem_create_subtree_of->proc~tem_shape_findelembybclabels proc~tem_write_debugmesh tem_write_debugMesh proc~tem_write_debugmesh->proc~tem_create_subtree_of program~tem_varsys_test tem_varSys_test program~tem_varsys_test->proc~tem_create_subtree_of proc~tem_init_tracker_subtree tem_init_tracker_subTree proc~tem_init_tracker_subtree->proc~tem_create_subtree_of proc~tem_init_convergence tem_init_convergence proc~tem_init_convergence->proc~tem_create_subtree_of proc~tem_create_subtree_of_st_funlist tem_create_subTree_of_st_funList proc~tem_create_subtree_of_st_funlist->proc~tem_create_subtree_of program~tem_varsys_stfunvar_test tem_varSys_stfunVar_test program~tem_varsys_stfunvar_test->proc~tem_create_subtree_of_st_funlist proc~check_variableoperations check_variableOperations proc~check_variableoperations->proc~tem_create_subtree_of_st_funlist program~tem_variable_evaltype_test tem_variable_evaltype_test program~tem_variable_evaltype_test->proc~tem_create_subtree_of_st_funlist program~tem_variable_extract_test tem_variable_extract_test program~tem_variable_extract_test->proc~tem_create_subtree_of_st_funlist program~tem_variable_combine_test tem_variable_combine_Test program~tem_variable_combine_test->proc~tem_create_subtree_of_st_funlist program~tem_varsys_opvar_test tem_varSys_opVar_test program~tem_varsys_opvar_test->proc~tem_create_subtree_of_st_funlist program~tem_logical_opertor_test tem_logical_opertor_test program~tem_logical_opertor_test->proc~check_variableoperations

Contents

Variables


Variables

TypeVisibilityAttributesNameInitial
integer, private :: dPos
integer, private :: iElem
integer, private :: iBC
integer, private :: nBCs
integer, private :: iBCtype
integer, private :: posInTree
integer, private :: QQN
logical, private :: wasAdded
logical, private :: found
integer, private, allocatable:: map(:)