calc_timestep_viscflow_cube Subroutine

private subroutine calc_timestep_viscflow_cube(cfl_conv, cfl_visc, length, dt, timestep, nPoly, mu, therm_cond)

Calculate time step based on a given CFL condition for a cube in a viscous flow simulation.

This subroutine calculates the timstep according to the CFL condition. Please notice, that this routine can be applied for flow simulations only.

Arguments

Type IntentOptional Attributes Name
real(kind=rk), intent(in) :: cfl_conv

CFL number for the convective part

real(kind=rk), intent(in) :: cfl_visc

CFL number for the viscous part

real(kind=rk), intent(in) :: length

Reference length of all elements

real(kind=rk), intent(out) :: dt

Resulting time step width

type(atl_timestep_type), intent(in) :: timestep

Info about the timestep type

integer, intent(in) :: nPoly

The number of polynomials per spatial direction

real(kind=rk), intent(in) :: mu

The dynamic viscosity

real(kind=rk), intent(in) :: therm_cond

The thermal conductivity