25 lines
545 B
Julia
25 lines
545 B
Julia
include("../Hamiltonian.jl")
|
|
mode = cpu_tensor
|
|
T = Float32 # single-precision mode
|
|
|
|
V_gauss(r2) =
|
|
-10 * exp(-(sqrt(r2)) ^ 2)
|
|
|
|
d = 3
|
|
n = 2
|
|
N = 96
|
|
ϕ = pi/6
|
|
n_imag = 1
|
|
|
|
open("ComplexScaling-FV-P-res.dat", "w") do f
|
|
for L = range(20, 35, length=16)
|
|
println("Calculating L=", L)
|
|
s = system{T}(d, n, N, L)
|
|
H = Hamiltonian{T}(s, V_gauss, ϕ, n_imag, mode)
|
|
@time evals, _, info = eig(H, 40)
|
|
|
|
dataline = vcat([L], hcat(real.(evals), imag.(evals))'[:])
|
|
println(f, join(dataline, '\t'))
|
|
end
|
|
end
|