Go to the source code of this file.
|
| integer(i8b), parameter | ran_state::hg = HUGE(1_i8b) |
| |
| integer(i8b), parameter | ran_state::hgm = -hg |
| |
| integer(i8b), parameter | ran_state::hgng = hgm - 1 |
| |
| integer(i8b), save | ran_state::lenran = 0 |
| |
| integer(i8b), save | ran_state::seq = 0 |
| |
| integer(i8b), save | ran_state::iran0 |
| |
| integer(i8b), save | ran_state::jran0 |
| |
| integer(i8b), save | ran_state::kran0 |
| |
| integer(i8b), save | ran_state::nran0 |
| |
| integer(i8b), save | ran_state::mran0 |
| |
| integer(i8b), save | ran_state::rans |
| |
| integer(i8b), dimension(:), pointer, save | ran_state::iran |
| |
| integer(i8b), dimension(:), pointer, save | ran_state::jran |
| |
| integer(i8b), dimension(:), pointer, save | ran_state::kran |
| |
| integer(i8b), dimension(:), pointer, save | ran_state::nran |
| |
| integer(i8b), dimension(:), pointer, save | ran_state::mran |
| |
| integer(i8b), dimension(:), pointer, save | ran_state::ranv |
| |
| integer(i8b), dimension(:,:), pointer, save | ran_state::ranseeds |
| |
| real(r8), save | ran_state::amm |
| |