korc_hammersley_generator Module

@brief Module containing subroutines for generating 1-D and 2-D Hammersley quasi-Monte Carlo sequences. @details The algorithm and code for generating the 1-D Hammersley sequence was developed by John Burkardt at the Florida State University. Visit "https://people.sc.fsu.edu/~jburkardt/f_src/hammersley/hammersley.html" for more information. The algorithm and code for generating the 2-D Hammersley sequence was developed by L. Carbajal at the Oak Ridge National Lab.


Uses

  • module~~korc_hammersley_generator~~UsesGraph module~korc_hammersley_generator korc_hammersley_generator module~korc_types korc_types module~korc_hammersley_generator->module~korc_types iso_c_binding iso_c_binding module~korc_types->iso_c_binding

Used by

  • module~~korc_hammersley_generator~~UsedByGraph module~korc_hammersley_generator korc_hammersley_generator module~korc_spatial_distribution korc_spatial_distribution module~korc_spatial_distribution->module~korc_hammersley_generator module~korc_velocity_distribution korc_velocity_distribution module~korc_velocity_distribution->module~korc_hammersley_generator module~korc_initialize korc_initialize module~korc_initialize->module~korc_spatial_distribution module~korc_initialize->module~korc_velocity_distribution program~main main program~main->module~korc_initialize

Contents


Functions

private function prime(n)

@brief For more info please visit "https://people.sc.fsu.edu/~jburkardt/f_src/hammersley/hammersley.html". ************80

Read more…

Arguments

Type IntentOptional AttributesName
integer(kind=4) :: n

Return Value integer(kind=4)


Subroutines

public subroutine generate_2D_hammersley_sequence(ID, NMPIS, X, Y)

@brief Subroutine for generating a 2-D Hammersley sequence. @details This subroutine uses the algorithm for generating a 1-D Hammersley sequence. Each MPI process in KORC generates a (different) subset of pairs (X,Y) of a 2-D Hammersley sequence. The total number of pairs (X,Y) is NMPIS*N, where NMPIS is the number of MPI processes in the simulation and N is the number of particles followed by each MPI process. Each subset of pairs (X,Y) has N elements.

Read more…

Arguments

Type IntentOptional AttributesName
integer, intent(in) :: ID
integer, intent(in) :: NMPIS
real(kind=rp), intent(inout), DIMENSION(:):: X
real(kind=rp), intent(inout), DIMENSION(:):: Y

public subroutine hammersley(i, m, n, r)

@brief For more info please visit "https://people.sc.fsu.edu/~jburkardt/f_src/hammersley/hammersley.html". ************80

Read more…

Arguments

Type IntentOptional AttributesName
integer(kind=4) :: i
integer(kind=4) :: m
integer(kind=4) :: n
real(kind=8) :: r(m)

private subroutine hammersley_inverse(r, m, n, i)

@brief For more info please visit "https://people.sc.fsu.edu/~jburkardt/f_src/hammersley/hammersley.html".

Read more…

Arguments

Type IntentOptional AttributesName
real(kind=8) :: r(m)
integer(kind=4) :: m
integer(kind=4) :: n
integer(kind=4) :: i

private subroutine hammersley_sequence(i1, i2, m, n, r)

@brief For more info please visit "https://people.sc.fsu.edu/~jburkardt/f_src/hammersley/hammersley.html". ************80

Read more…

Arguments

Type IntentOptional AttributesName
integer(kind=4) :: i1
integer(kind=4) :: i2
integer(kind=4) :: m
integer(kind=4) :: n
real(kind=8) :: r(m,abs(i1-i2)+1)

private subroutine r8mat_print(m, n, a, title)

@brief For more info please visit "https://people.sc.fsu.edu/~jburkardt/f_src/hammersley/hammersley.html". ************80

Read more…

Arguments

Type IntentOptional AttributesName
integer(kind=4) :: m
integer(kind=4) :: n
real(kind=8) :: a(m,n)
character(len=*) :: title

private subroutine r8mat_print_some(m, n, a, ilo, jlo, ihi, jhi, title)

@brief For more info please visit "https://people.sc.fsu.edu/~jburkardt/f_src/hammersley/hammersley.html". ************80

Read more…

Arguments

Type IntentOptional AttributesName
integer(kind=4) :: m
integer(kind=4) :: n
real(kind=8) :: a(m,n)
integer(kind=4) :: ilo
integer(kind=4) :: jlo
integer(kind=4) :: ihi
integer(kind=4) :: jhi
character(len=*) :: title

private subroutine timestamp()

@brief For more info please visit "https://people.sc.fsu.edu/~jburkardt/f_src/hammersley/hammersley.html". ************80

Read more…

Arguments

None