subroutine module_mp_nssl_2mom::hailmaxd |
( |
real | dtp, |
|
|
integer | nx, |
|
|
integer | ny, |
|
|
integer | nz, |
|
|
real, dimension(-nor+1:nx+nor,-nor+1:ny+nor,-norz+1:nz+norz,na) | an, |
|
|
integer | na, |
|
|
integer | nor, |
|
|
integer | norz, |
|
|
real, dimension(-nor+1:nx+nor,1,-norz+1:nz+norz,3) | alpha2d, |
|
|
real, dimension(-nor+1:nx+nor,-nor+1:ny+nor,-norz+1:nz+norz) | dn, |
|
|
real, dimension(nx,ny) | hailmax1d, |
|
|
real, dimension(nx,ny) | hailmaxk1, |
|
|
integer | jslab ) |
|
private |