Refactor
This commit is contained in:
parent
df833235c8
commit
db3a9304e7
|
|
@ -37,10 +37,7 @@ function mesons!(ddu, du, u, (ρ_sp, ρ_vp, ρ_sn, ρ_vn), r)
|
|||
ddB0 = -(2/(r + r_reg)) * dB0 + m_ρ^2 * B0 / ħc + g2_ρ * (2 * Λv * W0^2 * B0 - (ρ_vp(r) - ρ_vn(r)) / 2) / ħc
|
||||
ddA0 = -(2/(r + r_reg)) * dA0 - ρ_vp(r) / ħc # e goes here?
|
||||
|
||||
ddu[1] = ddΦ0
|
||||
ddu[2] = ddW0
|
||||
ddu[3] = ddB0
|
||||
ddu[4] = ddA0
|
||||
ddu .= [ddΦ0, ddW0, ddB0, ddA0]
|
||||
end
|
||||
|
||||
"Solve meson equations and return the wave functions u(r)=[Φ0(r), W0(r), B0(r), A0(r)] where
|
||||
|
|
|
|||
Loading…
Reference in New Issue