test

Sun Studio 12：Fortran 库参考

1.4.25 idate：返回当前日期

idate 将当前系统日期放入一个整型数组中：日期、月份和年份

该子例程的调用方式如下所示：

call idate( iarray ) 标准版本

iarray

INTEGER*4

输出 

三元素数组：日期、月份和年份 

示例：idate（标准版本）：


demo% cat tidate.f
       INTEGER*4 iarray(3)
       call idate( iarray )
       write(*, "(’ The date is: ’,3i5)" )  iarray
       end
demo% f95 tidate.f
demo% a.out
 The date is: 10 8 1998
demo%