subroutine wenoappoxconvection |
( |
double precision, dimension(sx-3:ex+3, sy-3:ey+3, 0:n), intent(in) |
phi, |
|
|
double precision, dimension(sx-1:ex+1, sy-1:ey+1, 0:n-2), intent(in) |
u, |
|
|
double precision, dimension(sx-1:ex+1, sy-1:ey+1, 0:n-2), intent(in) |
v, |
|
|
double precision, dimension(sx-1:ex+1, sy-1:ey+1, 0:n-1), intent(in) |
w, |
|
|
integer, intent(in) |
sx, |
|
|
integer, intent(in) |
ex, |
|
|
integer, intent(in) |
sy, |
|
|
integer, intent(in) |
ey, |
|
|
integer, intent(in) |
l, |
|
|
integer, intent(in) |
n, |
|
|
double precision, dimension(sx-1:ex+1, sy-1:ey+1, 0:n-2), intent(out) |
dfx, |
|
|
double precision, dimension(sx-1:ex+1, sy-1:ey+1, 0:n-2), intent(out) |
dfy, |
|
|
double precision, dimension(sx-1:ex+1, sy-1:ey+1, 0:n-1), intent(out) |
dfz |
|
) |
| |