Functions
Sub	RanArray (AA() As Long, N As Long)
	Unsigned 30 bit integer random numbers (Lagged Fibonacci method)

Function	RanArrNext () As Long
	Unsigned 30 bit integer random number (Lagged Fibonacci method)

Sub	RanfArray (AA() As Double, N As Long)
	53 bit real random numbers in [0,1) (Lagged Fibonacci method)

Function	RanfArrNext () As Double
	53 bit real random number in [0,1) (Lagged Fibonacci method)

Sub	RanfStart (Seed As Long)
	Initialization for real random number generator (Lagged Fibonacci method)

Sub	RanStart (Seed As Long)
	Initialization for integer random number generator (Lagged Fibonacci method)

Detailed Description

This is the group of L6a21. Uniform random numbers (Lagged Fibonacci method).

Functions