test

Sun Studio 12: Fortran ライブラリ・リファレンス

1.4.25 idate: 現在の日付を戻す

idate は、現在のシステム日付を 1 つの整数配列に日、月、年の順で入れます。

サブルーチンは、次のように呼び出します。

call idate( iarray ) Standard Version

iarray

INTEGER*4

出力 

3 要素数の配列。日、月、年 

例: idate (標準バージョン):


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