constant_random Module

This module provides 10,000 fixed random numbers used for initialising tests, so as always to give the same result when starting from noise, regardless of compiler/system. These should not be used for production runs.


Contents


Variables

Type Visibility Attributes Name Initial
real, private, dimension(:), allocatable :: random_array
integer, private :: counter = 0

Functions

public function ranf()

Arguments

None

Return Value real


Subroutines

public subroutine init_constant_random()

Arguments

None

public subroutine finish_constant_random()

Arguments

None

private subroutine set_random_array()

Arguments

None