flood_periphery Subroutine

  1. sdr_flooding_module.f90
  2. sdr_flooding_module
  3. flood_periphery

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~sdr_mark_floodnode sdr_mark_floodNode proc~flood_periphery->proc~sdr_mark_floodnode interface~tem_log tem_log proc~flood_periphery->interface~tem_log proc~tem_baryofid tem_BaryOfId proc~flood_periphery->proc~tem_baryofid proc~sdr_qvalbynode sdr_qValByNode proc~flood_periphery->proc~sdr_qvalbynode proc~needcalcqvalbybcid needCalcQValByBCID proc~flood_periphery->proc~needcalcqvalbybcid proc~tem_elemsize tem_ElemSize proc~flood_periphery->proc~tem_elemsize proc~needflddglbybcid needFldDglByBCID proc~flood_periphery->proc~needflddglbybcid proc~flood_periphery_diagonal flood_periphery_diagonal proc~flood_periphery->proc~flood_periphery_diagonal interface~tem_tostr tem_toStr proc~flood_periphery->interface~tem_tostr proc~intersect_raytriangle intersect_RayTriangle proc~sdr_qvalbynode->proc~intersect_raytriangle proc~fraction_pointline fraction_PointLine proc~sdr_qvalbynode->proc~fraction_pointline proc~flood_periphery_diagonal->proc~sdr_mark_floodnode proc~tem_coordofid tem_CoordOfId proc~flood_periphery_diagonal->proc~tem_coordofid proc~sdr_neighbor_in_proto sdr_neighbor_in_proto proc~flood_periphery_diagonal->proc~sdr_neighbor_in_proto 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 interface~positionofval~3 positionofval proc~sdr_neighbor_in_proto->interface~positionofval~3

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


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