mod_rng Module


Uses

  • module~~mod_rng~2~~UsesGraph module~mod_rng~2 mod_rng module~cosp_kinds cosp_kinds module~mod_rng~2->module~cosp_kinds

Used by

  • module~~mod_rng~2~~UsedByGraph module~mod_rng~2 mod_rng module~lmdz_cosp_subsample_and_optics_mod~2 LMDZ_COSP_SUBSAMPLE_AND_OPTICS_MOD module~lmdz_cosp_subsample_and_optics_mod~2->module~mod_rng~2 module~mod_scops~2 mod_scops module~lmdz_cosp_subsample_and_optics_mod~2->module~mod_scops~2 module~mod_scops mod_scops module~mod_scops->module~mod_rng~2 module~mod_scops~2->module~mod_rng~2 module~lmdz_cosp_subsample_and_optics_mod LMDZ_COSP_SUBSAMPLE_AND_OPTICS_MOD module~lmdz_cosp_subsample_and_optics_mod->module~mod_rng~2 module~lmdz_cosp_subsample_and_optics_mod->module~mod_scops~2 proc~lmdz_cosp_interface lmdz_cosp_interface proc~lmdz_cosp_interface->module~lmdz_cosp_subsample_and_optics_mod~2 proc~lmdz_cosp_interface~2 lmdz_cosp_interface proc~lmdz_cosp_interface~2->module~lmdz_cosp_subsample_and_optics_mod~2

Contents


Variables

Type Visibility Attributes Name Initial
integer, public, parameter :: ki9 = selected_int_kind(R=9)
integer, public :: testInt

Interfaces

public interface init_rng

  • public subroutine init_rng_1(s, seed_in)

    Arguments

    Type IntentOptional Attributes Name
    type(rng_state), intent(inout) :: s
    integer, intent(in) :: seed_in
  • public subroutine init_rng_n(s, seed_in)

    Arguments

    Type IntentOptional Attributes Name
    type(rng_state), intent(inout), DIMENSION(:) :: s
    integer, intent(in), DIMENSION(:) :: seed_in

public interface get_rng

  • public function get_rng_1(s)

    Arguments

    Type IntentOptional Attributes Name
    type(rng_state), intent(inout) :: s

    Return Value real(kind=WP)

  • public function get_rng_n(s, n) result(r)

    Arguments

    Type IntentOptional Attributes Name
    type(rng_state), intent(inout) :: s
    integer, intent(inout) :: n

    Return Value real(kind=WP), DIMENSION (n)

  • public function get_rng_v(s) result(r)

    Arguments

    Type IntentOptional Attributes Name
    type(rng_state), intent(inout), DIMENSION(:) :: s

    Return Value real(kind=WP), DIMENSION (SIZE(S))


Derived Types

type, public ::  rng_state

Components

Type Visibility Attributes Name Initial
integer(kind=ki9), public :: seed

Functions

public function get_rng_1(s)

Arguments

Type IntentOptional Attributes Name
type(rng_state), intent(inout) :: s

Return Value real(kind=WP)

public function get_rng_n(s, n) result(r)

Arguments

Type IntentOptional Attributes Name
type(rng_state), intent(inout) :: s
integer, intent(inout) :: n

Return Value real(kind=WP), DIMENSION (n)

public function get_rng_v(s) result(r)

Arguments

Type IntentOptional Attributes Name
type(rng_state), intent(inout), DIMENSION(:) :: s

Return Value real(kind=WP), DIMENSION (SIZE(S))


Subroutines

public subroutine init_rng_1(s, seed_in)

Arguments

Type IntentOptional Attributes Name
type(rng_state), intent(inout) :: s
integer, intent(in) :: seed_in

public subroutine init_rng_n(s, seed_in)

Arguments

Type IntentOptional Attributes Name
type(rng_state), intent(inout), DIMENSION(:) :: s
integer, intent(in), DIMENSION(:) :: seed_in