要素別処理組込み関数 (個別):2 つの 64 ビットの符号なし整数を掛け合わせます。これは総称関数が結合されていない個別関数です。この関数を実引数として渡すことはできません。
形式
result = MULT_HIGH (i, j)
i
(入力) INTEGER(8)。
j
(入力) INTEGER(8)。
結果
結果の型は INTEGER(8) です。結果の値は,128 ビットの符号なし結果の上位 (左側) 64 ビットです。
例
次に例を示します。
INTEGER(8) I,J,K I=2_8**53 J=2_8**51 K = MULT_HIGH (I,J) PRINT *,I,J,K WRITE (6,1000)I,J,K 1000 FORMAT (' ', 3(Z,1X)) END
この例は,次の結果を出力します。
9007199254740992 2251799813685248 1099511627776 20000000000000 8000000000000 10000000000