calc_timestep_ed_cube Subroutine

private subroutine calc_timestep_ed_cube(cfl, length, speedOfLight, dt, nPoly)

Calculate time step based on a given CFL number of cubes in a electrodynamic simulation.

This subroutine calculates the time step with respect to a given cfl number for simulations of electrodynamic processes. Please notice that this routine assumes constant material parameters.

Arguments

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

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

Reference length of all elements
real(kind=rk), intent(in) :: speedOfLight

Speed of light
real(kind=rk), intent(out) :: dt

Resulting time step width
integer, intent(in) :: nPoly

The number of polynomials per spatial direction

Called by

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