Use expm1

Co-authored-by: David Widmann <devmotion@users.noreply.github.com>
JuliaStats · Jan 8, 2024 · 8f68d06 · 8f68d06
1 parent 07d0ed5
commit 8f68d06
Showing 1 changed file with 1 addition and 1 deletion.
diff --git a/src/univariate/continuous/gumbel.jl b/src/univariate/continuous/gumbel.jl
@@ -102,4 +102,4 @@ logcdf(d::Gumbel, x::Real) = -exp(-zval(d, x))
 
 quantile(d::Gumbel, p::Real) = d.μ - d.θ * log(-log(p))
 
-gradlogpdf(d::Gumbel, x::Real) = (-1 + exp(-zval(d, x))) / d.θ
+gradlogpdf(d::Gumbel, x::Real) = expm1(-zval(d, x)) / d.θ