This commit is contained in:
Nuwan Yapa 2025-01-17 12:56:01 -05:00
parent df833235c8
commit db3a9304e7
1 changed files with 1 additions and 4 deletions

View File

@ -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