Scrambler
1
|
Go to the source code of this file.
Functions/Subroutines | |
subroutine | genak (nx, ny, nz, kx, ky, kz, pk, iseed, pi, x) |
subroutine genak | ( | integer | nx, |
integer | ny, | ||
integer | nz, | ||
integer | kx, | ||
integer | ky, | ||
integer | kz, | ||
double precision | pk, | ||
integer | iseed, | ||
double precision | pi, | ||
double precision, dimension(2*nx*ny*nz) | x | ||
) |
Definition at line 41 of file genak.f90.
References nr_randnum().
Referenced by fldgen().