Formatting

This commit is contained in:
Nuwan Yapa 2024-04-19 18:26:37 -04:00
parent e3b06b8bcd
commit fcdd669983
1 changed files with 7 additions and 7 deletions

View File

@ -111,12 +111,12 @@ function Moshinsky_transform(Es, n1s, l1s, n2s, l2s, Λ)
end
function pick_Moshinsky_brakcet(BRAC, n1, l1, n2, l2, n1, l1, n2, l2, Λ) # Efros notation -- don't confuse
ϵ = (l1 + l2 - Λ) % 2
NP = (l1 - l2 + Λ - ϵ) ÷ 2
MP = (l1 + l2 - Λ - ϵ) ÷ 2
N = (l1 - l2 + Λ - ϵ) ÷ 2
M = (l1 + l2 - Λ - ϵ) ÷ 2
ϵ = (l1 + l2 - Λ) % 2
NP = (l1 - l2 + Λ - ϵ) ÷ 2
MP = (l1 + l2 - Λ - ϵ) ÷ 2
N = (l1 - l2 + Λ - ϵ) ÷ 2
M = (l1 + l2 - Λ - ϵ) ÷ 2
# BRAC(NP,N1P,MP,N1,N2,N,M,L)
return BRAC[1 + NP, 1 + n1, 1 + MP, 1 + n1, 1 + n2, 1 + N, 1 + M, 1]
# BRAC(NP,N1P,MP,N1,N2,N,M,L)
return BRAC[1 + NP, 1 + n1, 1 + MP, 1 + n1, 1 + n2, 1 + N, 1 + M, 1]
end