tem_vrtxCoordOfId Function

public pure function tem_vrtxCoordOfId(tree, treeID) result(coord)

Calculate all eight vertex coordinates of a given tree ID

the numbering of the vertices is according to [tem_param_module:childPosition]

Arguments

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

complete tree for info about dimensions

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

input element ID

Return Value real(kind=rk)(3,8)

all vertices coordinates function return value


Calls

proc~~tem_vrtxcoordofid~~CallsGraph proc~tem_vrtxcoordofid tem_vrtxCoordOfId proc~tem_baryofid tem_BaryOfId proc~tem_vrtxcoordofid->proc~tem_baryofid proc~tem_coordofid tem_CoordOfId proc~tem_vrtxcoordofid->proc~tem_coordofid proc~tem_baryofid->proc~tem_coordofid proc~tem_elemsizelevel tem_ElemSizeLevel proc~tem_baryofid->proc~tem_elemsizelevel proc~tem_levelof tem_LevelOf proc~tem_coordofid->proc~tem_levelof

Called by

proc~~tem_vrtxcoordofid~~CalledByGraph proc~tem_vrtxcoordofid tem_vrtxCoordOfId proc~tem_getlocalboundingcube_fromsubtree tem_GetLocalBoundingCube_fromSubTree proc~tem_getlocalboundingcube_fromsubtree->proc~tem_vrtxcoordofid proc~tem_getlocalboundingcube_fromtree tem_GetLocalBoundingCube_fromTree proc~tem_getlocalboundingcube_fromtree->proc~tem_vrtxcoordofid interface~tem_getlocalboundingcube tem_GetLocalBoundingCube interface~tem_getlocalboundingcube->proc~tem_getlocalboundingcube_fromsubtree interface~tem_getlocalboundingcube->proc~tem_getlocalboundingcube_fromtree proc~tem_getrealboundingcube tem_GetRealBoundingCube proc~tem_getrealboundingcube->interface~tem_getlocalboundingcube proc~tem_seteffboundingbox_fromsubtree tem_setEffBoundingBox_fromSubTree proc~tem_seteffboundingbox_fromsubtree->interface~tem_getlocalboundingcube interface~tem_seteffboundingbox tem_setEffBoundingBox interface~tem_seteffboundingbox->proc~tem_seteffboundingbox_fromsubtree proc~tem_seteffboundingbox_fromtree tem_setEffBoundingBox_fromTree proc~tem_seteffboundingbox_fromtree->proc~tem_getrealboundingcube

Contents


Variables

TypeVisibilityAttributesNameInitial
real(kind=rk), private :: elemBary(3)
real(kind=rk), private :: length
integer, private :: x(4)
integer, private :: iCoord
integer, private :: iVrtx