CCPP SciDoc  v6.0.0
Common Community Physics Package Developed at DTC
mersenne_twister Module Reference

Data Types

interface  random_gauss
 
interface  random_index
 
interface  random_number
 
interface  random_setseed
 
type  random_stat
 Generator state. More...
 

Functions/Subroutines

subroutine, public random_seed (size, put, get, stat)
 This subroutine sets and gets state; overloads Fortran 90 standard. More...
 
subroutine random_setseed_s (inseed)
 This subroutine sets seed in saved mode. More...
 
subroutine random_setseed_t (inseed, stat)
 This subroutine sets seed in thread-safe mode. More...
 
real function, public random_number_f ()
 This function generates random numbers in functional mode. More...
 
subroutine random_number_i (harvest, inseed)
 This subroutine generates random numbers in interactive mode. More...
 
subroutine random_number_s (harvest)
 This subroutine generates random numbers in saved mode; overloads Fortran 90 standard. More...
 
subroutine random_number_t (harvest, stat)
 This subroutine generates random numbers in thread-safe mode. More...
 
real function, public random_gauss_f ()
 This subrouitne generates Gaussian random numbers in functional mode. More...
 
subroutine random_gauss_i (harvest, inseed)
 This subrouitne generates Gaussian random numbers in interactive mode. More...
 
subroutine random_gauss_s (harvest)
 This subroutine generates Gaussian random numbers in saved mode. More...
 
subroutine random_gauss_t (harvest, stat)
 This subroutine generates Gaussian random numbers in thread-safe mode. More...
 
integer function, public random_index_f (imax)
 This subroutine generates random indices in functional mode. More...
 
subroutine random_index_i (imax, iharvest, inseed)
 This subroutine generates random indices in interactive mode. More...
 
subroutine random_index_s (imax, iharvest)
 This subroutine generates random indices in saved mode. More...
 
subroutine random_index_t (imax, iharvest, stat)
 This subroutine generates random indices in thread-safe mode. More...
 

Variables

integer, parameter n =624
 
integer, parameter m =397
 
integer, parameter mata =-1727483681
 constant vector a More...
 
integer, parameter umask =-2147483648
 most significant w-r bits More...
 
integer, parameter lmask =2147483647
 least significant r bits More...
 
integer, parameter tmaskb =-1658038656
 tempering parameter More...
 
integer, parameter tmaskc =-272236544
 tempering parameter More...
 
integer, dimension(0:1), parameter mag01 =(/0,mata/)
 
integer, parameter iseed =4357
 
integer, parameter nrest =n+6
 
type(random_stat), save sstat