SYSTEM_CLOCK

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次数。

• 如果kind=4或者kind=2时，COUNT_RATE为1000，COUNT的值代表毫秒milliseconds，如果从0开始计数，大约25天COUNT计数会再次重置为0。
• 如果kind=8或者更大，COUNT_RATE为1000000000，COUNT代表纳秒。

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

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