yapanuwan
/
BergEC-jl
1
0
Fork 0
Code Issues Pull Requests Packages Projects Releases Wiki Activity

Rename N = E and n = k + 1

This commit is contained in:
Nuwan Yapa 2024-02-21 10:14:18 -05:00
parent a55c6b49c0
commit 015a662901
1 changed files with 12 additions and 12 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

24
ho_basis.jl
View File

@ -1,24 +1,24 @@
# Gaussian potentials in HO space # Gaussian potentials in HO space
gl(R, l, k) = throw("unimplemented") gl(R, l, n) = throw("unimplemented")
function get_sp_basis(max_N) function get_sp_basis(E_max)
ns = Int[]
ls = Int[] ls = Int[]
ks = Int[]
# Heyde p67 # Heyde p67 with E = N and n = k + 1
for N in max_N:-1:0 for E in E_max:-1:0
for l in N:-2:0 for l in E:-2:0
k = (N - l) / 2 n = 1 + (E - l) / 2
push!(ns, n)
push!(ls, l) push!(ls, l)
push!(ks, k)
end end
end end
return (ls, ks) return (ns, ls)
end end
get_V_matrix(V_lk, ls, ks) = throw("unimplemented") get_V_matrix(V_l, ls, ns) = throw("unimplemented")
get_T_matrix(ls, ks) = throw("unimplemented") get_T_matrix(ns, ls) = throw("unimplemented")
get_H_matrix(V_ls, ls, ks) = get_T_matrix(ls, ks) + get_V_matrix(V_lk, ls, ks) get_H_matrix(V_l, ns, ls) = get_T_matrix(ns, ls) + get_V_matrix(V_l, ns, ls)