1
0
Fork 0
mirror of https://gitlab.rlp.net/mobitar/ReCo.jl.git synced 2024-11-08 22:21:08 +00:00
ReCo.jl/graphics/pontential.jl
2022-01-21 02:56:33 +01:00

51 lines
No EOL
1.1 KiB
Julia
Raw Blame History

This file contains ambiguous Unicode characters

This file contains Unicode characters that might be confused with other characters. If you think that this is intentional, you can safely ignore this warning. Use the Escape button to reveal them.

using CairoMakie
using LaTeXStrings: @L_str
const minimum_r_σ_ratio = 2^(1 / 6)
function U_LJ_ϵ_ratio(r_σ_ratio::Real)
σ_r_ratio⁶ = r_σ_ratio^(-6)
return 4 * (σ_r_ratio⁶^2 - σ_r_ratio⁶)
end
function U_WCA_ϵ_ratio(r_σ_ratio::Real)
if r_σ_ratio > minimum_r_σ_ratio
return zero(r_σ_ratio)
else
return U_LJ_ϵ_ratio(r_σ_ratio) + 1
end
end
text_width_in_pt = 405
fig = Figure(;
resolution=(text_width_in_pt, 0.55 * text_width_in_pt), fontsize=10, figure_padding=1
)
max_x = 2.5
max_y = 1.05
min_y = -max_y
ax = Axis(fig[1, 1]; xlabel=L"r/σ", ylabel=L"U/ϵ", limits=(0.88, max_x, min_y, max_y))
r_σ_ratio = LinRange(0.95, max_x, 1000)
LJ = lines!(ax, r_σ_ratio, U_LJ_ϵ_ratio.(r_σ_ratio))
WCA = lines!(ax, r_σ_ratio, U_WCA_ϵ_ratio.(r_σ_ratio))
minimum_r_σ_ratio_line = lines!(
ax, [minimum_r_σ_ratio, minimum_r_σ_ratio], [min_y, max_y]; linestyle=:dash, linewidth=1
)
Legend(
fig[1, 2],
[LJ, WCA, minimum_r_σ_ratio_line],
[L"U_{LJ}", L"U_{WCA}", L"\frac{r}{σ} = 2^{1/6}"],
)
colgap!(fig.layout, 5)
rowgap!(fig.layout, 5)
save("exports/graphics/potential.pdf", fig; pt_per_unit=1)