SYSTEM_CLOCK

1
CALL SYSTEM_CLOCK([COUNT, COUNT_RATE, COUNT_MAX]) 

SYSTEM_CLOCK函数可用于计算elapsed time,计算方式是两次调用SYSTEM_CLOCK函数并获取二者的差值。这个Intrinsic函数的返回值,依赖不同编译器的实现。

COUNT:可选的Integer类型输出参数,表示当前的处理器时钟计数,该值的范围为[0, COUNT_MAX],达到最大值COUNT_MAX后,会从0开始重头计数。

COUNT_RATE:可选的Integer或者Real类型输出参数,表示处理器每秒的clock次数。

当入参均为INTEGER时,所有参数的kind应当相同。不支持kind=1的情况,此时COUNT, COUNT_RATE, COUNT_MAX全返回0。

如果获取系统时钟失败,COUNT=-HUGE(COUNT), COUNT_RATE=0, COUNT_MAX=0。