Generates a random number on [0,1)-real-interval
| Type | Intent | Optional | Attributes | Name | ||
|---|---|---|---|---|---|---|
| class(mt19937), | intent(inout) | :: | me |
real(r8) function genrand64_real2(me)
!! Generates a random number on [0,1)-real-interval
implicit none
class(mt19937),intent(inout) :: me
genrand64_real2 = real(ishft(me%genrand64_int64(), -11), kind=r8) * pi253
end function genrand64_real2