L6a21. 一様乱数 (ラグ付きフィボナッチ法)

関数
Sub	RanArray (AA() As Long, N As Long)
	符号なし30ビット整数乱数列 (ラグ付きフィボナッチ法)
**Function	RanArrNext () As Long
	符号なし 30 ビット整数乱数 (ラグ付きフィボナッチ法)
Sub	RanfArray (AA() As Double, N As Long)
	区間[0,1)の53ビット実数乱数列 (ラグ付きフィボナッチ法)
Function	RanfArrNext () As Double
	区間 [0,1) の 53 ビット実数乱数 (ラグ付きフィボナッチ法)
Sub	RanfStart (Seed As Long)
	実数乱数生成ルーチンの初期化 (ラグ付きフィボナッチ法)
Sub	RanStart (Seed As Long)
	整数乱数生成ルーチンの初期化 (ラグ付きフィボナッチ法)
**Sub	RanArrNext_sub (Ret As Long)
	符号なし 30 ビット整数乱数 (ラグ付きフィボナッチ法) (サブルーチン版)
Sub	RanfArrNext_sub (Ret As Double)
	区間 [0,1) の 53 ビット実数乱数 (ラグ付きフィボナッチ法) (サブルーチン版)

詳解

L6a21. 一様乱数 (ラグ付きフィボナッチ法) プログラムを表示しています.