subroutine module_mp_nssl_2mom::fallout1d |
( |
integer |
nx, |
|
|
integer |
ny, |
|
|
integer |
nz, |
|
|
integer |
nor, |
|
|
integer |
na, |
|
|
real |
dtp, |
|
|
real |
dtfrac, |
|
|
integer |
jgs, |
|
|
real, dimension(nz+1,nx) |
vt, |
|
|
real, dimension(-nor+ng1:nx+nor,-nor+ng1:ny+nor,-nor+ng1:nz+nor,na) |
a, |
|
|
real, dimension(nx,nz+1) |
db1, |
|
|
integer |
ia, |
|
|
integer |
id, |
|
|
real, dimension(nx,ny,na) |
xfall, |
|
|
real, dimension(nz+1,nx,0:1) |
dtz1, |
|
|
integer |
ixcol |
|
) |
| |
|
private |