subroutine module_mp_nssl_2mom::radardd02 |
( |
integer |
nx, |
|
|
integer |
ny, |
|
|
integer |
nz, |
|
|
integer |
nor, |
|
|
integer |
na, |
|
|
real, dimension(-nor+ng1:nx+nor,-nor+ng1:ny+nor,-nor+ng1:nz+nor,na) |
an, |
|
|
real, dimension(-nor+ng1:nx+nor,-nor+ng1:ny+nor,-nor+ng1:nz+nor) |
temk, |
|
|
real, dimension(-nor+ng1:nx+nor,-nor+ng1:ny+nor,-nor+ng1:nz+nor) |
dbz, |
|
|
real, dimension(-nor+ng1:nx+nor,-nor+ng1:ny+nor,-nor+ng1:nz+nor) |
db, |
|
|
integer |
nzdbz, |
|
|
real |
cnoh0t, |
|
|
real |
hwdn1t, |
|
|
integer |
ipconc, |
|
|
integer |
ke_diag, |
|
|
integer |
iunit |
|
) |
| |
|
private |