Compare calculated fields against benchmark
This commit is contained in:
parent
de1b7b8092
commit
7822c0f168
|
|
@ -17,3 +17,14 @@ divs = length(xs) - 1
|
||||||
|
|
||||||
plot(xs, hcat(Φ0, W0, B0, A0), layout=4, label=["Φ0" "W0" "B0" "A0"])
|
plot(xs, hcat(Φ0, W0, B0, A0), layout=4, label=["Φ0" "W0" "B0" "A0"])
|
||||||
xlabel!("r (fm)")
|
xlabel!("r (fm)")
|
||||||
|
|
||||||
|
# test data generated from Hartree.f
|
||||||
|
# format: x S(x) V(x) R(x) A(x)
|
||||||
|
test_data = readdlm("test/Pb208FldsFSUGarnet.csv")
|
||||||
|
xs_bench = test_data[:, 1]
|
||||||
|
Φ0_bench = test_data[:, 2]
|
||||||
|
W0_bench = test_data[:, 3]
|
||||||
|
B0_bench = test_data[:, 4]
|
||||||
|
A0_bench = test_data[:, 5]
|
||||||
|
|
||||||
|
plot!(xs_bench, hcat(Φ0_bench, W0_bench, B0_bench, A0_bench), layout=4, label=["Φ0 benchmark" "W0 benchmark" "B0 benchmark" "A0 benchmark"])
|
||||||
|
|
|
||||||
Loading…
Reference in New Issue