nb_check_time_step_too_large Subroutine

public subroutine nb_check_time_step_too_large()

Uses

Finish nonblocking calculation of the maximum velocity and set the cfl limit.

Arguments

None

Contents

Source Code

nb_check_time_step_too_large

Source Code

  subroutine nb_check_time_step_too_large
    use run_parameters, only: immediate_reset
    implicit none
    if (immediate_reset) return
    call finish_nonblocking_max_vel_reduction
    call set_cfl_time_step_and_check_if_too_large
  end subroutine nb_check_time_step_too_large