normalize eigenvectors in eigs (#463)

Author: jishnub

Project.toml

@@ -1,6 +1,6 @@
 name = "ApproxFunBase"
 uuid = "fbd15aa5-315a-5a7d-a8a4-24992e37be05"
-version = "0.8.23"
+version = "0.8.24"
 
 [deps]
 AbstractFFTs = "621f4979-c628-5d54-868e-fcf4e3e8185c"

src/eigen.jl

@@ -86,7 +86,9 @@ function pruneeigs(λ,V,ds,tolerance)
     for k=1:n
         if slnorm(V,n-3:n,k)≤tolerance
             push!(retλ,λ[k])
-            push!(retV,Fun(ds,V[:,k]))
+            f = Fun(ds, V[:,k])
+            f /= norm(f)
+            push!(retV, f)
         end
     end
     retλ,retV