ＡＩＮＴ
copyright

green dotＡＩＮＴ

書式 AINT(A[,KIND])
機能 AINT ：Aの小数点部分を切り捨てる。
引数
A ：実数型
KIND
(省略可能)		：整数型
戻り値 型は実数型である。
KINDを指定したとき、種別型パラメタはKINDの指定に従う。
KINDを省略したとき、種別型パラメタは引数Aと同じである。

green dotサンプルプログラム

3.566, -3.14の小数点部分を切り捨てた値と小数点部分を 四捨五入した値を求める。 
    REAL :: a,b
    a=3.566; b=-3.14
    WRITE(*,*) AINT(a),AINT(b)
    WRITE(*,*) ANINT(a),ANINT(b)


実行例

    3.00000…　-3.00000…
    4.00000…  -3.00000…
line-end