check_velocityFluid Subroutine

private subroutine check_velocityFluid(scheme, minLevel, maxLevel, general, mus_aborts)

Check the maximum velocity whether it is above Ma>0.1

Arguments

TypeIntentOptionalAttributesName
type(mus_scheme_type), intent(in) :: scheme

scheme type

integer, intent(in) :: minLevel

global scheme independent information

integer, intent(in) :: maxLevel

global scheme independent information

type(tem_general_type), intent(inout) :: general
type(mus_abortCriteria_type), intent(in) :: mus_aborts

Calls

proc~~check_velocityfluid~~CallsGraph proc~check_velocityfluid check_velocityFluid mpi_reduce mpi_reduce proc~check_velocityfluid->mpi_reduce proc~tem_isnan tem_isNaN proc~check_velocityfluid->proc~tem_isnan

Called by

proc~~check_velocityfluid~~CalledByGraph proc~check_velocityfluid check_velocityFluid proc~perform_checks perform_checks proc~perform_checks->proc~check_velocityfluid proc~mus_initialize mus_initialize proc~mus_initialize->proc~perform_checks proc~check_flow_status check_flow_status proc~check_flow_status->proc~perform_checks proc~do_recursive_multilevel do_recursive_multiLevel proc~do_recursive_multilevel->proc~check_flow_status program~musubi musubi program~musubi->proc~mus_initialize proc~do_fast_singlelevel do_fast_singleLevel proc~do_fast_singlelevel->proc~check_flow_status proc~do_benchmark do_benchmark proc~do_benchmark->proc~check_flow_status

Contents


Variables

TypeVisibilityAttributesNameInitial
real(kind=rk), private :: vel(3)
real(kind=rk), private :: velMag
real(kind=rk), private :: maxVel
real(kind=rk), private :: glob_maxVel
integer, private :: iLevel
integer, private :: ierror
integer, private :: iElem
integer, private :: elemOff
integer, private :: vel_pos(3)