calc_timestep_viscflow_cube_2d Subroutine

  1. atl_calc_time.f90
  2. atl_calc_time_module
  3. calc_timestep_viscflow_cube_2d

private subroutine calc_timestep_viscflow_cube_2d(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

TypeIntentOptionalAttributesName
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

Called by

proc~~calc_timestep_viscflow_cube_2d~~CalledByGraph proc~calc_timestep_viscflow_cube_2d calc_timestep_viscflow_cube_2d proc~calculate_cfl_timestep calculate_cfl_timestep proc~calculate_cfl_timestep->proc~calc_timestep_viscflow_cube_2d proc~atl_get_timestep atl_get_timestep proc~atl_get_timestep->proc~calculate_cfl_timestep proc~atl_solve_program atl_solve_program proc~atl_solve_program->proc~atl_get_timestep proc~atl_initialize_program atl_initialize_program proc~atl_initialize_program->proc~atl_get_timestep program~ateles ateles program~ateles->proc~atl_solve_program program~ateles->proc~atl_initialize_program

Contents

Variables


Variables

TypeVisibilityAttributesNameInitial
real(kind=rk), private :: max_velocity
real(kind=rk), private :: dt_conv
real(kind=rk), private :: dt_visc
real(kind=rk), private :: disc_fact