9.265 SYSTEM_CLOCK — Функция времени

Описание:

Определяет количество тактов процессора с неопределенного момента в прошлом по модулю COUNT_MAX, COUNT_RATE определяет количество тактов в секунду. Если платформа поддерживает монотонные часы, используются эти часы, и, в зависимости от реализации платформенных часов, они могут обеспечивать разрешение до наносекунд. Если монотонные часы недоступны, реализация переходит к часам реального времени.

COUNT_RATE зависит от системы и может изменяться в зависимости от типа аргументов. Для аргументов типа kind=4 (и меньших целочисленных типов) COUNT представляет миллисекунды, а для аргументов типа kind=8 (и больших целочисленных типов) COUNT обычно представляет микро- или наносекунды, в зависимости от разрешения базовых платформенных часов. COUNT_MAX обычно равно HUGE(COUNT_MAX). Обратите внимание, что разрешение в миллисекунды для версии kind=4 подразумевает, что COUNT переполнится примерно через 25 дней. Для избежания проблем с переполнением и для более точного измерения времени, пожалуйста, используйте версию kind=8.

Если нет часов или запрос к часам не удается, COUNT устанавливается в -HUGE(COUNT), а COUNT_RATE и COUNT_MAX устанавливаются в ноль.

При выполнении на платформе, использующей GNU C библиотеку (glibc) версии 2.16 или более ранней, или её производной, высокоточные монотонные часы доступны только при линковке с библиотекой rt. Это можно сделать явно, добавив флаг -lrt при линковке приложения, но также делается неявно при использовании OpenMP.

На платформе Windows версия с аргументами kind=4 использует функцию GetTickCount, а версия kind=8 использует QueryPerformanceCounter и QueryPerformanceCounterFrequency. Для получения дополнительной информации и возможных нюансов, обратитесь к документации платформы.

Стандарт:

Fortran 90 и более поздние версии

Класс:

Подпрограмма

Синтаксис:

CALL SYSTEM_CLOCK([COUNT, COUNT_RATE, COUNT_MAX])

Аргументы:

COUNT	(Необязательно) должен быть скалярным типом INTEGER с INTENT(OUT).
COUNT_RATE	(Необязательно) должен быть скалярным типом INTEGER или REAL, с INTENT(OUT).
COUNT_MAX	(Необязательно) должен быть скалярным типом INTEGER с INTENT(OUT).

Пример:

PROGRAM test_system_clock
  INTEGER :: count, count_rate, count_max
  CALL SYSTEM_CLOCK(count, count_rate, count_max)
  WRITE(*,*) count, count_rate, count_max
END PROGRAM

См. также:

DATE_AND_TIME, CPU_TIME

Далее: TAN, Предыдущее: SYSTEM, Вверх: Встроенные процедуры [Содержание][Индекс]