subroutine fisrtilp_tr |
( |
real |
dtime, |
|
|
real, dimension(klon, klev+1) |
paprs, |
|
|
real, dimension(klon, klev) |
pplay, |
|
|
real, dimension(klon, klev) |
t, |
|
|
real, dimension(klon, klev) |
q, |
|
|
real, dimension(klon, klev) |
ratqs, |
|
|
real, dimension(klon, klev) |
d_t, |
|
|
real, dimension(klon, klev) |
d_q, |
|
|
real, dimension(klon, klev) |
d_ql, |
|
|
real, dimension(klon, klev) |
rneb, |
|
|
real, dimension(klon, klev) |
radliq, |
|
|
real, dimension(klon) |
rain, |
|
|
real, dimension(klon) |
snow, |
|
|
real, dimension(klon, klev) |
pfrac_impa, |
|
|
real, dimension(klon, klev) |
pfrac_nucl, |
|
|
real, dimension(klon, klev) |
pfrac_1nucl, |
|
|
real, dimension(klon, klev) |
frac_impa, |
|
|
real, dimension(klon, klev) |
frac_nucl, |
|
|
real, dimension(klon, klev+1) |
prfl, |
|
|
real, dimension(klon, klev+1) |
psfl, |
|
|
real, dimension(klon, klev) |
rhcl |
|
) |
| |