Go to the source code of this file.
|
subroutine | thermcell_dq (ngrid, nlay, impl, ptimestep, fm, entr, masse, q, dq, qa, lev_out) |
|
subroutine | thermcell_dq_o (ngrid, nlay, impl, ptimestep, fm, entr, masse, q, dq, qa, lev_out) |
|
subroutine thermcell_dq |
( |
integer |
ngrid, |
|
|
integer |
nlay, |
|
|
integer |
impl, |
|
|
real |
ptimestep, |
|
|
real, dimension(ngrid,nlay+1) |
fm, |
|
|
real, dimension(ngrid,nlay) |
entr, |
|
|
real, dimension(ngrid,nlay) |
masse, |
|
|
real, dimension(ngrid,nlay) |
q, |
|
|
real, dimension(ngrid,nlay) |
dq, |
|
|
real, dimension(ngrid,nlay) |
qa, |
|
|
integer |
lev_out |
|
) |
| |
subroutine thermcell_dq_o |
( |
integer |
ngrid, |
|
|
integer |
nlay, |
|
|
integer |
impl, |
|
|
real |
ptimestep, |
|
|
real, dimension(ngrid,nlay+1) |
fm, |
|
|
real, dimension(ngrid,nlay) |
entr, |
|
|
real, dimension(ngrid,nlay) |
masse, |
|
|
real, dimension(ngrid,nlay) |
q, |
|
|
real, dimension(ngrid,nlay) |
dq, |
|
|
real, dimension(ngrid,nlay) |
qa, |
|
|
integer |
lev_out |
|
) |
| |