Type | Intent | Optional | Attributes | Name | ||
---|---|---|---|---|---|---|
integer, | intent(inout) | :: | iterRK |
subroutine check_verlet_sweep(iterRK)
integer, intent(inout) :: iterRK
! if iterInit iterations were done in the runge-Kutta, switch to verlet scheme
if (iterRK == iterInit) then
tVerletSweep = .true.
iterRK = 0
call init_verlet_sweep()
end if
end subroutine check_verlet_sweep