dtimer_start Subroutine

private subroutine dtimer_start(this)

dtimer_start captures the current date_and_time values, converts them to UTC epoch seconds, and marks the date/time timer as active. The matching stop routine is dtimer_stop.

Note

This timer follows civil-clock time and is not guaranteed to be monotonic.

Type Bound

timer

Arguments

Type IntentOptional Attributes Name
class(timer), intent(inout) :: this

Timer instance whose date/time timing state is initialized.

Calls

proc~~dtimer_start~~CallsGraph proc~dtimer_start timer%dtimer_start proc~epoch_seconds_utc epoch_seconds_utc proc~dtimer_start->proc~epoch_seconds_utc proc~days_from_civil days_from_civil proc~epoch_seconds_utc->proc~days_from_civil

Called by

proc~~dtimer_start~~CalledByGraph proc~dtimer_start timer%dtimer_start proc~run_test25 run_test25 proc~run_test25->proc~dtimer_start proc~run_test26 run_test26 proc~run_test26->proc~dtimer_start proc~run_test27 run_test27 proc~run_test27->proc~dtimer_start proc~run_test28 run_test28 proc~run_test28->proc~dtimer_start proc~run_test29 run_test29 proc~run_test29->proc~dtimer_start proc~run_test30 run_test30 proc~run_test30->proc~dtimer_start program~example5 example5 program~example5->proc~dtimer_start program~example6 example6 program~example6->proc~dtimer_start program~check check program~check->proc~run_test25 program~check->proc~run_test26 program~check->proc~run_test27 program~check->proc~run_test28 program~check->proc~run_test29 program~check->proc~run_test30

Source Code

   subroutine dtimer_start(this)
      class(timer), intent(inout) :: this
         !! Timer instance whose date/time timing state is initialized.
      integer :: v(8)
         !! Raw `date_and_time` values captured at start.

      call date_and_time(values=v)
      this%dtime_start_utc = epoch_seconds_utc(v)
      this%is_dtime_started = .true.
   end subroutine dtimer_start