timer_obj_StepForward Subroutine

    impure subroutine timer_obj_StepForward(this)
      !> Moves timer from n to n+1
      implicit none
      class(timer_obj), intent(inout) :: this                                  !! Timer

      ! Get time at beginning of this iteration
      this%itertime = this%parallel%Time()
      this%lasttime = this%itertime
      ! Update time
      this%time = this%time + this%dt
      ! Update iteration count
      this%iter = this%iter + 1
      ! Zero timing info
      if (allocated(this%timing)) this%timing = 0.0_wp

      return
    end subroutine timer_obj_StepForward