RanArray RanArrNext RanArrNext_sub RanfArray RanfArrNext RanfArrNext_sub RanfStart RanStart

RanArrNext_sub() Sub RanArrNext_sub ( Ret As  Long ) Unsigned 30 bit integer random number (Lagged Fibonacci method) (Subroutine version) Purpose Generates unsigned 30 bit integer random number by Lagged Fibonacci method. RanArrNext() generates 1009 random numbers using RanArray() and stores in the internal buffer, and returns only the first 100 of them in sequence. Parameters [out] Ret Generated unsigned 30 bit integer random number. Reference D. E. Knuth, “The Art of Computer Programming Third Edition, Vol.2 / Seminumerical Algorithms”, Addison Wesley Longman (1998)