dSFMT_interface Module



Contents


Variables

Type Visibility Attributes Name Initial
integer, public, parameter :: random_store_size = 5*10**4
real(kind=c_double), public, save :: random_store(random_store_size)
integer, public, save :: current_element

Interfaces

interface

  • public subroutine init_gen_rand_fwrapper(sd) bind(c)

    Arguments

    Type IntentOptional Attributes Name
    integer(kind=c_int32_t), intent(in), value :: sd

interface

  • public subroutine fill_array_close_open_fwrapper(ar, sz) bind(c)

    Arguments

    Type IntentOptional Attributes Name
    real(kind=c_double), intent(inout) :: ar(*)
    integer(kind=c_int), intent(in), value :: sz

Functions

public function genrand_real2_dSFMT() result(r)

Arguments

None

Return Value real(kind=dp)


Subroutines

public subroutine dSFMT_init(seed)

Arguments

Type IntentOptional Attributes Name
integer, intent(in) :: seed