tem_endOfId Function

public pure function tem_endOfId(tree, TreeID) result(origin)

The following function provides the coordinates of the end for a given ID in the complete mesh. The described element lies between the origin and this end point.

The end point of the element with a given ID coincides with the origin of treeID with a coordinate shift of +1 in each dimension.

Arguments

TypeIntentOptionalAttributesName
type(treelmesh_type), intent(in) :: tree

mesh information

integer(kind=long_k), intent(in) :: TreeID

input element ID

Return Value real(kind=rk)(3)

origin return value


Calls

proc~~tem_endofid~~CallsGraph proc~tem_endofid tem_endOfId proc~tem_coordofid tem_CoordOfId proc~tem_endofid->proc~tem_coordofid proc~tem_elemsizelevel tem_ElemSizeLevel proc~tem_endofid->proc~tem_elemsizelevel proc~tem_levelof tem_LevelOf proc~tem_coordofid->proc~tem_levelof

Called by

proc~~tem_endofid~~CalledByGraph proc~tem_endofid tem_endOfId proc~tem_converttreeidtocube tem_convertTreeIDtoCube proc~tem_converttreeidtocube->proc~tem_endofid proc~tem_shape_subtreefromgeominters tem_shape_subTreeFromGeomInters proc~tem_shape_subtreefromgeominters->proc~tem_converttreeidtocube proc~tem_cano_initsubtree tem_cano_initSubTree proc~tem_shape_subtreefromgeominters->proc~tem_cano_initsubtree proc~tem_cano_initsubtree->proc~tem_converttreeidtocube proc~tem_create_subtree_of tem_create_subTree_of proc~tem_create_subtree_of->proc~tem_shape_subtreefromgeominters 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 proc~tem_write_debugmesh tem_write_debugMesh proc~tem_write_debugmesh->proc~tem_create_subtree_of proc~tem_init_tracker_subtree tem_init_tracker_subTree proc~tem_init_tracker_subtree->proc~tem_create_subtree_of program~tem_varsys_test tem_varSys_test program~tem_varsys_test->proc~tem_create_subtree_of

Contents


Variables

TypeVisibilityAttributesNameInitial
integer, private :: coord(4)
real(kind=rk), private :: dx