stepsize_class_reset Subroutine

private pure subroutine stepsize_class_reset(me)

Reset the internal state of the step size control. This is called at the start of each integration.

Type Bound

stepsize_class

Arguments

Type IntentOptional Attributes Name
class(stepsize_class), intent(inout) :: me

Called by

proc~~stepsize_class_reset~~CalledByGraph proc~stepsize_class_reset stepsize_class%stepsize_class_reset proc~begin_integration_rk_variable_step_class rk_variable_step_class%begin_integration_rk_variable_step_class proc~begin_integration_rk_variable_step_class->proc~stepsize_class_reset proc~stepsize_class_constructor stepsize_class%stepsize_class_constructor proc~stepsize_class_constructor->proc~stepsize_class_reset proc~integrate_to_event_variable_step rk_variable_step_class%integrate_to_event_variable_step proc~integrate_to_event_variable_step->proc~begin_integration_rk_variable_step_class proc~integrate_variable_step rk_variable_step_class%integrate_variable_step proc~integrate_variable_step->proc~begin_integration_rk_variable_step_class program~rklib_example rklib_example program~rklib_example->proc~integrate_variable_step

Source Code

    pure subroutine stepsize_class_reset(me)

    implicit none

    class(stepsize_class),intent(inout) :: me

    me%err_old = 1.0e-4_wp
    me%last_rejected = .false.

    end subroutine stepsize_class_reset