| subroutine, public mo_setext::setext |
( |
real(r8), dimension(ncol,pver,extcnt), intent(out) |
extfrc, |
|
|
real(r8), dimension(ncol,pver+1), intent(in) |
zint_abs, |
|
|
real(r8), dimension(ncol,pver+1), intent(in) |
zint_rel, |
|
|
real(r8), dimension(ncol), intent(in) |
cldtop, |
|
|
real(r8), dimension(ncol,pver), intent(in) |
zmid, |
|
|
integer, intent(in) |
lchnk, |
|
|
real(r8), dimension(pcols,pver), intent(in) |
tfld, |
|
|
real(r8), dimension(ncol,pver), intent(in) |
o2mmr, |
|
|
real(r8), dimension(ncol,pver), intent(in) |
ommr, |
|
|
real(r8), dimension(pcols,pver), intent(in) |
pmid, |
|
|
real(r8), dimension(ncol,pver), intent(in) |
mbar, |
|
|
real(r8), dimension(ncol), intent(in) |
rlats, |
|
|
real(r8), intent(in) |
calday, |
|
|
integer, intent(in) |
ncol, |
|
|
real(r8), dimension(ncol), intent(in) |
rlons, |
|
|
type(physics_buffer_desc), dimension(:), pointer |
pbuf |
|
) |
| |