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