FORTRAN中の时间函数

简单总结下FORTRAN中获取时间常用到的函数：

• CPU_TIME
• DATE_AND_TIME
• SYSTEM_CLOCK

---

CPU_TIME

返回的是一个浮点型，表示当前CPU运行时间（以秒计）。

DATE_AND_TIME

包括很多信息，包括日期，时间，时区，最后一个参数是一个大小为8的整型数组，记录了年，月，日，时区差（以分钟计），小时，分钟，秒，毫秒。

SYSTEM_CLOCK

用于决定处理器时钟周期。

程序示例如下:

PROGRAM COM_TIME
IMPLICIT NONE
INTEGER, PARAMETER:: MAX = 400
REAL(8), DIMENSION(MAX, MAX, MAX):: COF
INTEGER(4):: I, J, K
REAL(8):: START1,FINISH1
INTEGER(8):: START2, FINISH2
CHARACTER*10 DATE1, TIME1, PRETTY_TIME1
CHARACTER*10 DATE2, TIME2, PRETTY_TIME2
CHARACTER*10 DATE3