real(real64) function qshep_oct_m::qs3val::qs3val |
( |
real(real64) |
px, |
|
|
real(real64) |
py, |
|
|
real(real64) |
pz, |
|
|
integer(int64) |
n, |
|
|
real(real64), dimension(n) |
x, |
|
|
real(real64), dimension(n) |
y, |
|
|
real(real64), dimension(n) |
z, |
|
|
real(real64), dimension(n) |
f, |
|
|
integer(int64) |
nr, |
|
|
integer(int64), dimension(nr, nr, nr) |
lcell, |
|
|
integer(int64), dimension(n) |
lnext, |
|
|
real(real64), dimension(3) |
xyzmin, |
|
|
real(real64), dimension(3) |
xyzdel, |
|
|
real(real64) |
rmax, |
|
|
real(real64), dimension(n) |
rsq, |
|
|
real(real64), dimension(9, n) |
a |
|
) |
| |
|
private |