Routine to increment by .
Type | Intent | Optional | Attributes | Name | ||
---|---|---|---|---|---|---|
real(kind=wp), | intent(in) | :: | dt | The value to use for . |
subroutine increment_time ( dt )
!! Routine to increment \(t\) by \(\Delta t\).
implicit none
real(wp), intent(in) :: dt
!! The value to use for \(\Delta t\).
time = time + dt
qtime = qtime + dt
end subroutine increment_time