Genrand64Int63 Genrand64Int63_sub Genrand64Int64 Genrand64Int64_sub Genrand64Real1 Genrand64Real1_sub Genrand64Real2 Genrand64Real2_sub Genrand64Real3 Genrand64Real3_sub GenrandInt31 GenrandInt31_sub GenrandInt32 GenrandInt32_sub GenrandReal1 GenrandReal1_sub GenrandReal2 GenrandReal2_sub GenrandReal3 GenrandReal3_sub GenrandRes53 GenrandRes53_sub InitByArray InitByArray64 InitGenrand InitGenrand64

Genrand64Int63() Function Genrand64Int63 ( ) Uniform random numbers (unsigned 63 bit integer random numbers) (64 bit Mersenne Twister) Purpose Generates uniformly distributed pseudo random numbers by 64 bit Mersenne Twister (MT19937-64). Returns LongLong Unsigned 63 bit integer pseudo random number. Note This function must be initialized by InitGenrand64() or InitByArray64() before generating random numbers. If this function is called without an initialization, it will be automatically initialized by the default seed 5489. Note This function cannot be used on the 32 bit Excel. Reference Mersenne Twister Home Page Example Program Generate 10 unsigned 63 bit integer pseudo random numbers using 5489 as the seed value for initialization. Sub Ex_Genrand64Int63() Dim Seed As LongLong, I As Long Seed = 5489 Call InitGenrand64(Seed) For I = 1 To 10 Debug.Print Genrand64Int63() Next End Sub Example Results 7257142393139058515 2310273370083821454 6554785140758948860 8731469323574217161 177744139283869798 3734563120159963499 2317997734240821264 209485271329599939 4802085494626258278 3179022463024956701