24 lines
520 B
Julia
24 lines
520 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 = 16
|
|
ϕ = pi/6
|
|
|
|
open("ComplexScaling-FV.dat", "w") do f
|
|
for L = range(16, 32, length=33)
|
|
println("Calculating L=", L)
|
|
s = system{T}(d, n, N, L)
|
|
H = Hamiltonian{T}(s, V_gauss, ϕ, 0, mode)
|
|
@time evals, _, info = eig(H, 40)
|
|
|
|
dataline = vcat([L], hcat(real.(evals), imag.(evals))'[:])
|
|
println(f, join(dataline, '\t'))
|
|
end
|
|
end
|