Go to the source code of this file.
|
subroutine | thermcell_height (ngrid, nlay, lalim, lmin, linter, lmix, zw2, zlev, lmax, zmax, zmax0, zmix, wmax, lev_out) |
|
subroutine thermcell_height |
( |
integer |
ngrid, |
|
|
integer |
nlay, |
|
|
integer, dimension(ngrid) |
lalim, |
|
|
integer, dimension(ngrid) |
lmin, |
|
|
real, dimension(ngrid) |
linter, |
|
|
integer, dimension(ngrid) |
lmix, |
|
|
real, dimension(ngrid,nlay+1) |
zw2, |
|
|
real, dimension(ngrid,nlay+1) |
zlev, |
|
|
integer, dimension(ngrid) |
lmax, |
|
|
real, dimension(ngrid) |
zmax, |
|
|
real, dimension(ngrid) |
zmax0, |
|
|
real, dimension(ngrid) |
zmix, |
|
|
real, dimension(ngrid) |
wmax, |
|
|
integer |
lev_out |
|
) |
| |