XL Fortran for AIX V8.1.1

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

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

SRAND (SEED)

乱数発生ルーチン関数 RAND が使用するシード値を提供します。

引き数タイプおよび属性

SEED
スカラーでなければなりません。 RAND 関数に対してシード値を提供するのに使用する場合は、タイプが REAL(4) で、 IRAND サービスおよびユーティリティー関数に対してシード値を提供するのに使用する場合は、タイプが INTEGER(4) でなければなりません。これは、INTENT(IN) 引き数です。

クラス

サブルーチン

SRAND サブルーチンを使用するプログラムの例を次に示します。

CALL SRAND(0.5)
DO I = 1, 5
   R = RAND()
   PRINT *,R
ENDDO
END

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

0.3984375000
0.4048461914
0.1644897461
0.1281738281E-01
0.2313232422E-01

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


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