! flux_tr..output-R- flux de tr
zx_flux(i) = -flux(i)*dtime*RG !jyg
| Type | Intent | Optional | Attributes | Name | ||
|---|---|---|---|---|---|---|
| real, | intent(in) | :: | dtime | |||
| real, | intent(in), | DIMENSION(klon,klev) | :: | coef | ||
| real, | intent(in), | DIMENSION(klon,klev) | :: | t | ||
| real, | intent(in), | DIMENSION(klon,klev) | :: | tr | ||
| real, | intent(in), | DIMENSION(klon) | :: | flux | ||
| real, | intent(in), | DIMENSION(klon,klev+1) | :: | paprs | ||
| real, | intent(in), | DIMENSION(klon,klev) | :: | pplay | ||
| real, | intent(in), | DIMENSION(klon,klev) | :: | delp | ||
| real, | intent(out), | DIMENSION(klon,klev) | :: | d_tr | ||
| real, | intent(out), | DIMENSION(klon) | :: | d_tr_dry | ||
| real, | intent(out), | DIMENSION(klon) | :: | flux_tr_dry |