Skip to content

Commit c4ea938

Browse files
committed
Don't use deprecated function
1 parent e14f031 commit c4ea938

File tree

1 file changed

+1
-1
lines changed

1 file changed

+1
-1
lines changed

Numeric/SpecFunctions/Internal.hs

Lines changed: 1 addition & 1 deletion
Original file line numberDiff line numberDiff line change
@@ -418,7 +418,7 @@ incompleteGamma a x
418418
-- Series for 1-Q(a,x). See [Temme1994] Eq. 5.5
419419
taylorSeriesComplQ
420420
= sumPowerSeries (-x) (scanSequence (/) 1 (enumSequenceFrom 1) / enumSequenceFrom a)
421-
* x**a / exp(logGammaL a)
421+
* x**a / exp(logGamma a)
422422
-- Legendre continued fractions
423423
contFraction = 1 - ( exp ( log x * a - x - logGamma a )
424424
/ evalContFractionB frac

0 commit comments

Comments
 (0)