test

Sun Studio 12：Fortran 库参考

1.4.51.1 time：获取系统时间

time() 函数的调用方式如下所示：

INTEGER*4 time 或 INTEGER*8

n = time() 标准版本

返回值 

INTEGER*4

输出 

自 GMT 1970 年 1 月 1 日 0:0:0 时起至今的时间（秒） 
 

INTEGER*8

输出 

在 64 位环境中，time 返回 INTEGER*8 值

函数 time() 返回自 GMT 1970 年 1 月 1 日 00:00:00 起至今的时间（秒）整数。这是操作系统时钟值。

示例：在操作系统中使用的 time() 标准版本：


demo% cat ttime.f
        INTEGER*4  n, time
        n = time()
        write(*,*) ’Seconds since 0 1/1/70 GMT = ’, n
        end
demo% f95 ttime.f
demo% a.out
 Seconds since 0 1/1/70 GMT =   913240205
demo%