initialize_random_N Subroutine

  1. korc_random.f90
  2. korc_random
  3. initialize_random_N

public subroutine initialize_random_N(seed)

Uses

  • proc~~initialize_random_n~~UsesGraph proc~initialize_random_n initialize_random_N omp_lib omp_lib proc~initialize_random_n->omp_lib

Arguments

Type IntentOptional AttributesName
integer, intent(in) :: seed

Calls

proc~~initialize_random_n~~CallsGraph proc~initialize_random_n initialize_random_N interface~random_construct_n random_construct_N proc~initialize_random_n->interface~random_construct_n

Contents

Source Code

initialize_random_N

Source Code

  SUBROUTINE initialize_random_N(seed)
    USE omp_lib
    IMPLICIT NONE

    INTEGER, INTENT(IN) :: seed

    state = random_construct_N(seed)

  END SUBROUTINE initialize_random_N