flood_periphery Subroutine

private subroutine flood_periphery(proto, geometry, meshUniverse)

This routine loops over all intersected with geoemtry nodes and fluidify some node according to the following rule:\n 1. one of its link does noe intersect with any geometry that requires qVal 2. it has fluid neighbor on that direction. i.e. it is wet in that side. Jiaxing Qi

Arguments

TypeIntentOptionalAttributesName
type(sdr_protoTree_type), intent(inout) :: proto

The proto tree description with all the data enabling the flooding.

type(sdr_geometry_type), intent(in) :: geometry

Description of geometric objects.

type(treelmesh_type), intent(in) :: meshUniverse

treelmesh contains bounding cube info


Calls

proc~~flood_periphery~~CallsGraph proc~flood_periphery flood_periphery proc~tem_baryofid tem_BaryOfId proc~flood_periphery->proc~tem_baryofid proc~sdr_qvalbynode sdr_qValByNode proc~flood_periphery->proc~sdr_qvalbynode interface~tem_log tem_log proc~flood_periphery->interface~tem_log proc~flood_periphery_diagonal flood_periphery_diagonal proc~flood_periphery->proc~flood_periphery_diagonal proc~sdr_mark_floodnode sdr_mark_floodNode proc~flood_periphery->proc~sdr_mark_floodnode proc~tem_elemsize tem_ElemSize proc~flood_periphery->proc~tem_elemsize interface~tem_tostr tem_toStr proc~flood_periphery->interface~tem_tostr proc~needflddglbybcid needFldDglByBCID proc~flood_periphery->proc~needflddglbybcid proc~needcalcqvalbybcid needCalcQValByBCID proc~flood_periphery->proc~needcalcqvalbybcid proc~fraction_pointline fraction_PointLine proc~sdr_qvalbynode->proc~fraction_pointline proc~intersect_raytriangle intersect_RayTriangle proc~sdr_qvalbynode->proc~intersect_raytriangle proc~flood_periphery_diagonal->proc~sdr_mark_floodnode proc~sdr_neighbor_in_proto sdr_neighbor_in_proto proc~flood_periphery_diagonal->proc~sdr_neighbor_in_proto proc~tem_coordofid tem_CoordOfId proc~flood_periphery_diagonal->proc~tem_coordofid interface~positionofval~3 positionofval proc~sdr_neighbor_in_proto->interface~positionofval~3 proc~tem_idofcoord tem_IdOfCoord proc~sdr_neighbor_in_proto->proc~tem_idofcoord interface~tem_parentof tem_ParentOf proc~sdr_neighbor_in_proto->interface~tem_parentof

Called by

proc~~flood_periphery~~CalledByGraph proc~flood_periphery flood_periphery proc~sdr_flood_tree sdr_flood_tree proc~sdr_flood_tree->proc~flood_periphery program~seeder seeder program~seeder->proc~sdr_flood_tree

Contents


Variables

TypeVisibilityAttributesNameInitial
integer, private :: iNode
integer, private :: iDir
integer, private :: iSide
integer, private :: iLink
integer, private :: wetFace
integer, private :: wetFaceBit_pos
integer(kind=long_k), private :: treeID
real(kind=rk), private :: qVal(1:qQQQ)

qVal for 6 faces

real(kind=rk), private :: bary(3)
real(kind=rk), private :: dx
integer, private :: oldFlood
integer, private :: myColor
integer, private :: col_int
integer, private :: col_bit
integer, private :: iColor
integer, private :: nodeprops
integer, private :: proplength