initialize_random_number_generator Subroutine

public subroutine initialize_random_number_generator(user_seed)


System independent initialization of pseudo-random generator


Initialize random number generator with a seed.

Arguments

Type IntentOptional Attributes Name
integer, intent(in), optional :: user_seed

Variables

Type Visibility Attributes Name Initial
integer, public :: i
integer, public :: n
integer, public, allocatable, dimension(:) :: seed
integer, public, dimension(1:8) :: time_values