genrand64_real1 Function

  1. mt19937-64.f90
  2. mt19937_64
  3. genrand64_real1

private function genrand64_real1(me)

Generates a random number on [0,1]-real-interval

Arguments

TypeIntentOptionalAttributesName
class(mt19937), intent(inout) :: me

Return Value real(kind=r8)


Contents

Source Code

genrand64_real1

Source Code

  real(r8) function genrand64_real1(me)
    !! Generates a random number on [0,1]-real-interval
    implicit none
    class(mt19937),intent(inout) :: me

    genrand64_real1 = real(ishft(me%genrand64_int64(), -11), kind=r8) * pi253_1

  end function genrand64_real1