Skip to content

Commit 7474027

Browse files
fix some special functions
1 parent bf489ee commit 7474027

File tree

1 file changed

+2
-2
lines changed

1 file changed

+2
-2
lines changed

src/specialfunctions.jl

+2-2
Original file line numberDiff line numberDiff line change
@@ -126,8 +126,8 @@ expnlog1psinhatanhsqrt(n, x::Union{T, Dual{T}}) where {T<:Real} = x == 0 ? one(x
126126

127127
expm1nlog1p(n, x) = x == 0 ? one(x) : expm1(n*log1p(x))/(n*x)
128128

129-
log1pover(s) = log1p(s)/s
130-
logandpoly(x) = x == 0 ? one(x) : 6*(-2x+(x-2)*log1p(-x))/x^3
129+
log1pover(x) = iszero(x) ? one(x) : log1p(x)/x
130+
logandpoly(x) = iszero(x) ? one(x) : 6*(-2x+(x-2)*log1p(-x))/x^3
131131
function logandpoly(x::Union{Float64, ComplexF64})
132132
if abs(x) > 0.2
133133
6*(-2x+(x-2)*log1p(-x))/x^3

0 commit comments

Comments
 (0)