subroutine qshep_oct_m::qs2grd::qs2grd |
( |
real(real64) |
px, |
|
|
real(real64) |
py, |
|
|
integer(int64) |
n, |
|
|
real(real64), dimension(n) |
x, |
|
|
real(real64), dimension(n) |
y, |
|
|
real(real64), dimension(n) |
f, |
|
|
integer(int64) |
nr, |
|
|
integer(int64), dimension(nr, nr) |
lcell, |
|
|
integer(int64), dimension(n) |
lnext, |
|
|
real(real64) |
xmin, |
|
|
real(real64) |
ymin, |
|
|
real(real64) |
dx, |
|
|
real(real64) |
dy, |
|
|
real(real64) |
rmax, |
|
|
real(real64), dimension(n) |
rsq, |
|
|
real(real64), dimension(5, n) |
a, |
|
|
real(real64) |
q, |
|
|
real(real64) |
qx, |
|
|
real(real64) |
qy, |
|
|
integer(int64) |
ier |
|
) |
| |
|
private |