include("Hamiltonian.jl")
mode = cpu_tensor
T = Float32 # single-precision mode

V_gauss(r2) =
    -10 * exp(-(sqrt(r2)) ^ 2)

d = 3
n = 2
N = 30
L = 6

open("ComplexScaling-FV-bound.dat", "w") do f
    for ϕ = range(0.0, 0.5, length=11)
        println("Calculating ϕ=", ϕ)
        s = system{T}(d, n, N, L)
        H = Hamiltonian{T}(s, V_gauss, ϕ, 0, mode)
        @time evals, _, info = eig(H, 10, resonances = false)

        dataline = vcat([ϕ], hcat(real.(evals), imag.(evals))'[:])
        println(f, join(dataline, '\t'))
    end
end