Update src/multivariate/dirichlet.jl

Co-authored-by: David Widmann <devmotion@users.noreply.github.com>

Author: matbesancon

src/multivariate/dirichlet.jl

@@ -418,7 +418,7 @@ function ChainRulesCore.rrule(::typeof(_logpdf), d::Dirichlet, x::AbstractVector
     function Dirichlet_logpdf_pullback(dy)
         ∂alpha = xlogy.(dy, x)
         ∂l = -dy
-        ∂x = dy * (d.alpha .-1) ./ x
+        ∂x = dy .* (d.alpha .-1) ./ x
         ∂alpha0 = 0.0
         if !isfinite(y)
             ∂alpha .= NaN