mod_clock Module Reference

Data Types
type	clock

Functions/Subroutines
pure elemental subroutine	reset (self)
pure elemental subroutine	tick (self)

Function/Subroutine Documentation

reset()

pure elemental subroutine mod_clock::reset

(

class(clock), intent(inout)

self

)

Definition at line 1709 of file suews_util_datetime.f95.

 
      !! Resets the clock to its start time.
 
      CLASS(clock), INTENT(inout) :: self
 
      self%currentTime = self%startTime
 
      self%started = .false.
      self%stopped = .false.
 

tick()

pure elemental subroutine mod_clock::tick ( class(clock), intent(inout) self )

private

Definition at line 1724 of file suews_util_datetime.f95.

 
      !! Increments the currentTime of the clock instance by one tickInterval.
 
      CLASS(clock), INTENT(inout) :: self
 
      IF (self%stopped) THEN
         RETURN
      END IF
 
      IF (.NOT. self%started) THEN
         self%started = .true.
         self%currentTime = self%startTime
      END IF
 
      self%currentTime = self%currentTime + self%tickInterval
 
      IF (self%currentTime >= self%stopTime) THEN
         self%stopped = .true.
      END IF