XL Fortran for AIX V8.1.1

ランゲージ・リファレンス

+----------------------------------IBM 拡張----------------------------------+

INT2(A)

実数値または整数値を 2 バイトの整数に変換します。

引き数タイプおよび属性

A
整数または実数タイプのスカラーでなければなりません。

INT2 を別の関数呼び出しの実引き数として渡すことはできません。

クラス

エレメント型関数

結果タイプおよび属性

INTEGER(2) スカラー

結果値

A のタイプが整数の場合は、INT2(A) = A です。

A のタイプが実数の場合は、以下の 2 つの可能性があります。

どちらも場合でも、切り捨てが行われる場合があります。

以下は、INT2 関数の例です。

    REAL*4 :: R4
    REAL*8 :: R8
    INTEGER*4 :: I4
    INTEGER*8 :: I8
 
    R4 = 8.8; R8 = 18.9
    I4 = 4; I8 = 8
    PRINT *, INT2(R4), INT2(R8), INT2(I4), INT2(I8)
    PRINT *, INT2(2.3), INT2(6)
    PRINT *, INT2(65535.78), INT2(65536.89)
    END

上記のプログラムで生成される出力例は次のとおりです。

    8 18 4 8
    2 6
    -1 0     ! The results indicate that truncation has occurred, since
             ! only the last two bytes were saved.

+--------------------------------IBM 拡張の終り-------------------------------+


[ ページのトップ | 前ページ | 次ページ | 目次 | 索引 ]