par_zig_mod Module Reference

For use with OpenMP. More...

Functions/Subroutines
subroutine, public	par_zigset (npar, par_jsrseed, grainsize)
subroutine, public	delete_par_zig (dummy)
integer function, public	par_shr3 (kpar)
real(dp) function, public	par_uni (kpar)
real(dp) function, public	par_rnor (kpar)
real(dp) function, public	par_rexp (kpar)
subroutine, public	generate_seed_from_clock (seed)
	suffer overflow, not sure correct in original case

Variables
integer, parameter	dp =SELECTED_REAL_KIND( 12, 60 )
real(dp), parameter	m1 =2147483648.0_DP
real(dp), parameter	m2 =2147483648.0_DP
real(dp), parameter	half =0.5_DP
real(dp), parameter	dn0 =3.442619855899_DP
real(dp), parameter	tn0 =3.442619855899_DP
real(dp), parameter	vn =0.00991256303526217_DP
real(dp), parameter	de0 =7.697117470131487_DP
real(dp), parameter	te0 =7.697117470131487_DP
real(dp), parameter	ve =0.003949659822581572_DP
integer, save	par_n = 0
integer, save	par_step
integer, dimension(:), allocatable, save	par_jsr
integer, dimension(:,:), allocatable, save	par_kn
integer, dimension(:,:), allocatable, save	par_ke
real(dp), dimension(:,:), allocatable, save	par_wn
real(dp), dimension(:,:), allocatable, save	par_fn
real(dp), dimension(:,:), allocatable, save	par_we
real(dp), dimension(:,:), allocatable, save	par_fe

Detailed Description

For use with OpenMP.

Each thread has its own random generator sequence Use for bd_move, both sda_2proteins and sdamm
see Random Generator Number

Function/Subroutine Documentation

delete_par_zig()

subroutine, public par_zig_mod::delete_par_zig

(

integer

dummy

)

generate_seed_from_clock()

subroutine, public par_zig_mod::generate_seed_from_clock

(

integer, intent(out)

seed

)

suffer overflow, not sure correct in original case

Here is the caller graph for this function:

par_rexp()

real(dp) function, public par_zig_mod::par_rexp

(

integer

kpar

)

Here is the call graph for this function:

par_rnor()

real(dp) function, public par_zig_mod::par_rnor

(

integer

kpar

)

Here is the call graph for this function:

par_shr3()

integer function, public par_zig_mod::par_shr3

(

integer

kpar

)

Here is the caller graph for this function:

par_uni()

real(dp) function, public par_zig_mod::par_uni

(

integer

kpar

)

Here is the call graph for this function:

Here is the caller graph for this function:

par_zigset()

subroutine, public par_zig_mod::par_zigset	(	integer, intent(in)	npar,
		integer, dimension(*), intent(in)	par_jsrseed,
		integer, intent(in)	grainsize
	)

Variable Documentation

de0

real(dp), parameter par_zig_mod::de0 =7.697117470131487_DP

private

dn0

real(dp), parameter par_zig_mod::dn0 =3.442619855899_DP

private

dp

integer, parameter par_zig_mod::dp =SELECTED_REAL_KIND( 12, 60 )

private

half

real(dp), parameter par_zig_mod::half =0.5_DP

private

m1

real(dp), parameter par_zig_mod::m1 =2147483648.0_DP

private

m2

real(dp), parameter par_zig_mod::m2 =2147483648.0_DP

private

par_fe

real(dp), dimension(:,:), allocatable, save par_zig_mod::par_fe

private

par_fn

real(dp), dimension(:,:), allocatable, save par_zig_mod::par_fn

private

par_jsr

integer, dimension(:), allocatable, save par_zig_mod::par_jsr

private

par_ke

integer, dimension(:,:), allocatable, save par_zig_mod::par_ke

private

par_kn

integer, dimension(:,:), allocatable, save par_zig_mod::par_kn

private

par_n

integer, save par_zig_mod::par_n = 0

private

par_step

integer, save par_zig_mod::par_step

private

par_we

real(dp), dimension(:,:), allocatable, save par_zig_mod::par_we

private

par_wn

real(dp), dimension(:,:), allocatable, save par_zig_mod::par_wn

private

te0

real(dp), parameter par_zig_mod::te0 =7.697117470131487_DP

private

tn0

real(dp), parameter par_zig_mod::tn0 =3.442619855899_DP

private

ve

real(dp), parameter par_zig_mod::ve =0.003949659822581572_DP

private

vn

real(dp), parameter par_zig_mod::vn =0.00991256303526217_DP

private