tem_cano_storePntsInSubTree Subroutine

  1. tem_canonical_module.f90
  2. tem_canonicalND_module
  3. tem_cano_storePntsInSubTree

public subroutine tem_cano_storePntsInSubTree(me, inTree, map2global, countPoints, grwPnts)

Generate points using segments on canoND and add those points to a growing array of points if a point is found in subTree

Arguments

TypeIntentOptionalAttributesName
type(tem_canonicalND_type), intent(in) :: me(:)

canonicalND objects on which to work
type(treelmesh_type), intent(in) :: inTree

Global tree
type(dyn_intarray_type), intent(in) :: map2global

growing array for the map2global
integer, intent(inout) :: countPoints

How many points there will be
type(tem_grwPoints_type), intent(inout) :: grwPnts

growing array to store tracking points

Calls

proc~~tem_cano_storepntsinsubtree~~CallsGraph proc~tem_cano_storepntsinsubtree tem_cano_storePntsInSubTree proc~tem_posofid tem_PosOfId proc~tem_cano_storepntsinsubtree->proc~tem_posofid proc~tem_idofcoord tem_IdOfCoord proc~tem_cano_storepntsinsubtree->proc~tem_idofcoord proc~tem_coordofreal tem_CoordOfReal proc~tem_cano_storepntsinsubtree->proc~tem_coordofreal interface~append~21 append proc~tem_cano_storepntsinsubtree->interface~append~21 proc~tem_pathcomparison tem_PathComparison proc~tem_posofid->proc~tem_pathcomparison proc~tem_pathof tem_PathOf proc~tem_posofid->proc~tem_pathof proc~append_da_veclabel append_da_veclabel interface~append~21->proc~append_da_veclabel proc~append_da_label append_da_label interface~append~21->proc~append_da_label interface~expand~19 expand proc~append_da_veclabel->interface~expand~19 proc~append_da_label->interface~expand~19 interface~sortedposofval~4 sortedposofval proc~append_da_label->interface~sortedposofval~4 proc~expand_da_label expand_da_label interface~expand~19->proc~expand_da_label proc~sortposofval_label sortposofval_label interface~sortedposofval~4->proc~sortposofval_label

Called by

proc~~tem_cano_storepntsinsubtree~~CalledByGraph proc~tem_cano_storepntsinsubtree tem_cano_storePntsInSubTree proc~tem_shape_subtreefromgeominters tem_shape_subTreeFromGeomInters proc~tem_shape_subtreefromgeominters->proc~tem_cano_storepntsinsubtree proc~tem_create_subtree_of tem_create_subTree_of proc~tem_create_subtree_of->proc~tem_shape_subtreefromgeominters 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

Contents

Variables


Variables

TypeVisibilityAttributesNameInitial
integer, private :: nElems
integer, private :: nPoints
integer, private :: maxLevel
integer, private :: elemPos
integer, private :: iCano
integer, private :: iPnt
real(kind=rk), private :: coord(3)
real(kind=rk), private :: offset_a
real(kind=rk), private :: offset_b
real(kind=rk), private :: offset_c
real(kind=rk), private :: unit_vec_a(3)
real(kind=rk), private :: unit_vec_b(3)
real(kind=rk), private :: unit_vec_c(3)
integer(kind=long_k), private :: treeID
integer(kind=long_k), private, allocatable:: subTreeID(:)