Skip to content

Commit

Permalink
omit pointless extra Newton iteration for λ (#112)
Browse files Browse the repository at this point in the history
  • Loading branch information
stevengj authored Jul 27, 2024
1 parent 2e6fc15 commit 6ed7307
Showing 1 changed file with 0 additions and 3 deletions.
3 changes: 0 additions & 3 deletions src/gausskronrod.jl
Original file line number Diff line number Diff line change
Expand Up @@ -139,9 +139,6 @@ function eignewt(H::AbstractSymTri{T}, n::Integer) where {T<:Real}
if isfinite(δλ)
lambda[i] -= δλ
if abs(δλ) 10 * eps(lambda[i])
# do one final Newton iteration for luck and profit:
δλ = eigpolyrat(H,lambda[i])
lambda[i] -= δλ
break
end
else
Expand Down

0 comments on commit 6ed7307

Please sign in to comment.