rename randmtzig_exprnd -> randexp

Author: rfourquet

base/random.jl

@@ -7,7 +7,7 @@ export srand,
        randn, randn!,
        randbool,
        AbstractRNG, RNG, MersenneTwister,
-       randmtzig_exprnd
+       randexp
 
 abstract AbstractRNG
 
@@ -984,23 +984,23 @@ randn(dims::Int...) = randn!(Array(Float64, dims...))
 randn(rng::MersenneTwister, dims::Dims) = randn!(rng, Array(Float64, dims))
 randn(rng::MersenneTwister, dims::Int...) = randn!(rng, Array(Float64, dims...))
 
-@inline function randmtzig_exprnd(rng::MersenneTwister=GLOBAL_RNG)
+@inline function randexp(rng::MersenneTwister=GLOBAL_RNG)
     @inbounds begin
         ri = rand_ui52(rng)
         idx = ri & 0xFF
         x = ri*we[idx+1]
         ri < ke[idx+1] && return x # 98.9% of the time we return here 1st try
-        return randmtzig_exprnd_unlikely(rng, idx, x)
+        return randexp_unlikely(rng, idx, x)
     end
 end
 
-function randmtzig_exprnd_unlikely(rng, idx, x)
+function randexp_unlikely(rng, idx, x)
     @inbounds if idx == 0
         return ziggurat_exp_r - log(rand(rng))
     elseif (fe[idx] - fe[idx+1])*rand(rng) + fe[idx+1] < exp(-x)
         return x # return from the triangular area
     else
-        return randmtzig_exprnd(rng)
+        return randexp(rng)
     end
 end