tem_build_listHorizontalDep Subroutine

private subroutine tem_build_listHorizontalDep(iStencil, levelDesc, posInSortElem, nElems, iIndex)

Update the neighor arrays depending on what is given in the element stencil

The array levelDesc( iLevel )%neigh( iStenci )%nghElems( 1:QQN, 1:nElems ) is being filled up here

Arguments

TypeIntentOptionalAttributesName
integer, intent(in) :: iStencil

Index of your neighbor list.

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

Level descriptor for each level of your mesh (starting from min level).

integer, intent(in) :: posInSortElem(:)

Positions in sorted elem%tID list

integer, intent(in) :: nElems

number of elements

integer, intent(inout) :: iIndex

Calls

proc~~tem_build_listhorizontaldep~~CallsGraph proc~tem_build_listhorizontaldep tem_build_listHorizontalDep proc~tem_treeidintotal tem_treeIDinTotal proc~tem_build_listhorizontaldep->proc~tem_treeidintotal tem_positioninsorted tem_positioninsorted proc~tem_treeidintotal->tem_positioninsorted proc~tem_etypeofid tem_eTypeOfId proc~tem_treeidintotal->proc~tem_etypeofid interface~positionofval~4 positionofval proc~tem_etypeofid->interface~positionofval~4 proc~posofval_label posofval_label interface~positionofval~4->proc~posofval_label

Called by

proc~~tem_build_listhorizontaldep~~CalledByGraph proc~tem_build_listhorizontaldep tem_build_listHorizontalDep proc~tem_build_horizontaldependencies tem_build_horizontalDependencies proc~tem_build_horizontaldependencies->proc~tem_build_listhorizontaldep proc~tem_create_leveldesc tem_create_levelDesc proc~tem_create_leveldesc->proc~tem_build_horizontaldependencies proc~tem_dimbydim_construction tem_dimByDim_construction proc~tem_dimbydim_construction->proc~tem_create_leveldesc proc~tem_build_face_info tem_build_face_info proc~tem_build_face_info->proc~tem_dimbydim_construction

Contents


Variables

TypeVisibilityAttributesNameInitial
integer, private :: iElem
integer, private :: iStencilElem
integer, private :: posInElem
integer, private :: levelPos
integer, private :: neighPos
integer, private :: neighVal
integer(kind=long_k), private :: nTreeID
logical, private :: invalid