| 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