inviscous_deactivated Function

private pure function inviscous_deactivated(nvrstk, mean, deviation, grad) result(isinviscous)

Deactivate adaptive inviscous computations.

Arguments

Type	Intent	Optional	Attributes		Name
class(atl_navierStokes_type),	intent(in)			::	nvrstk	Description of the equation
real(kind=rk),	intent(in)			::	mean(:)	The mean of each state variable.
real(kind=rk),	intent(in)			::	deviation(:)	Estimation of maximal deviation of each state.
real(kind=rk),	intent(in)			::	grad(:)	Estimation of maximal gradient of each state.

Return Value logical

Resulting indication whether viscous terms can be neglected.