简单总结下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