CAM
mcica_random_numbers.f90 File Reference

Data Types

type  mersennetwister::randomnumbersequence
 
interface  mersennetwister::new_randomnumbersequence
 
type  mcica_random_numbers::randomnumberstream
 
interface  mcica_random_numbers::getrandomnumbers
 
interface  mcica_random_numbers::initializerandomnumberstream
 

Modules

module  mersennetwister
 
module  mcica_random_numbers
 

Functions/Subroutines

integer function mersennetwister::mixbits (u, v)
 
integer function mersennetwister::twist (u, v)
 
subroutine mersennetwister::nextstate (twister)
 
elemental integer function mersennetwister::temper (y)
 
type(randomnumbersequence) function mersennetwister::initialize_scalar (seed)
 
type(randomnumbersequence) function mersennetwister::initialize_vector (seed)
 
integer function, public mersennetwister::getrandomint (twister)
 
integer function, public mersennetwister::getrandompositiveint (twister)
 
real(kind=r8) function, public mersennetwister::getrandomreal (twister)
 
subroutine, public mersennetwister::finalize_randomnumbersequence (twister)
 
type(randomnumberstream) function mcica_random_numbers::initializerandomnumberstream_s (seed)
 
type(randomnumberstream) function mcica_random_numbers::initializerandomnumberstream_v (seed)
 
subroutine mcica_random_numbers::getrandomnumber_scalar (stream, number)
 
subroutine mcica_random_numbers::getrandomnumber_1d (stream, numbers)
 
subroutine mcica_random_numbers::getrandomnumber_2d (stream, numbers)
 

Variables

integer, parameter mersennetwister::blocksize = 624
 
integer, parameter mersennetwister::m = 397
 
integer, parameter mersennetwister::matrix_a = -1727483681
 
integer, parameter mersennetwister::lmask = 2147483647
 
integer, parameter mersennetwister::umask = (-LMASK) - 1
 
integer, parameter mersennetwister::tmaskb = -1658038656
 
integer, parameter mersennetwister::tmaskc = -272236544