Implements type time_step_controller.
◆ time_step_controller_init()
subroutine time_step_controller::time_step_controller_init |
( |
class(time_step_controller_t), intent(inout) |
this, |
|
|
type(json_file), intent(inout) |
params |
|
) |
| |
◆ time_step_controller_set_dt()
subroutine time_step_controller::time_step_controller_set_dt |
( |
class(time_step_controller_t), intent(inout) |
this, |
|
|
real(kind=rp), intent(inout) |
dt, |
|
|
real(kind=rp), intent(in) |
cfl, |
|
|
real(kind=rp), intent(inout) |
cfl_avrg, |
|
|
integer, intent(in) |
tstep |
|
) |
| |
|
private |
- Parameters
-
dt | time step in case_t. |
cfl | courant number of current iteration. |
cfl_avrg | average Courant number. |
tstep | the current time step. @Algorithm:
- Set the first time step such that cfl is the set one;
- During time-stepping, adjust dt when cfl_avrg is offset by 20%.
|
Definition at line 94 of file time_step_controller.f90.