sdr_truncate_qVal Subroutine

private subroutine sdr_truncate_qVal(proto, qVal, BCID, neighPos, treeID_periodic)

This routine gives special treatment when qVal > 1.0 or qVal == -1.0 for flooded neighbor, treat it as normal fluid: clean BCID, set qVal to -1 (no itersection). for non-flooded neighbor, treat it as high order wall: set qVal to 1

Arguments

Type IntentOptional Attributes Name
type(sdr_protoTree_type), intent(in) :: proto

preliminary tree
real(kind=rk), intent(inout) :: qVal

qValue
integer(kind=long_k), intent(inout) :: BCID

boundary id
integer, intent(in) :: neighPos

neighbor position in proto tree
integer(kind=long_k), intent(in), optional :: treeID_periodic

negative treeID of periodic domain

Calls

proc~~sdr_truncate_qval~~CallsGraph proc~sdr_truncate_qval sdr_truncate_qVal sdr_nodeprop_btest sdr_nodeprop_btest proc~sdr_truncate_qval->sdr_nodeprop_btest

Called by

proc~~sdr_truncate_qval~~CalledByGraph proc~sdr_truncate_qval sdr_truncate_qVal proc~getbcid_and_calcqval getBCID_and_calcQval proc~getbcid_and_calcqval->proc~sdr_truncate_qval proc~sdr_find_periodic_neighbor sdr_find_periodic_neighbor proc~getbcid_and_calcqval->proc~sdr_find_periodic_neighbor proc~sdr_find_periodic_neighbor->proc~sdr_truncate_qval proc~create_target create_target proc~create_target->proc~sdr_find_periodic_neighbor proc~sdr_identify_boundary sdr_identify_boundary proc~sdr_identify_boundary->proc~getbcid_and_calcqval proc~proto2treelm proto2Treelm proc~proto2treelm->proc~sdr_identify_boundary proc~traverse_tree traverse_tree proc~traverse_tree->proc~create_target proc~traverse_tree->proc~proto2treelm proc~traverse_tree->proc~traverse_tree proc~sdr_proto2treelm sdr_proto2treelm proc~sdr_proto2treelm->proc~traverse_tree