|
LMDZ
|
Go to the source code of this file.
Functions/Subroutines | |
| subroutine | radlsw (KIDIA, KFDIA, KLON, KLEV, KMODE, KAER, PRII0, PAER, PALBD, PALBP, PAPH, PAP, PCCNL, PCCNO, PCCO2, PCLFR, PDP, PEMIS, PEMIW, PLSM, PMU0, POZON, PQ, PQIWP, PQLWP, PQS, PQRAIN, PRAINT, PTH, PT, PTS, PNBAS, PNTOP, PREF_LIQ, PREF_ICE, PEMIT, PFCT, PFLT, PFCS, PFLS, PFRSOD, PSUDU, PUVDF, PPARF, PPARCF, PTINCF, PSFSWDIR, PSFSWDIF, PFSDNN, PFSDNV, LRDUST, PPIZA_DST, PCGA_DST, PTAUREL_DST, PTAU_LW, PFLUX, PFLUC, PFSDN, PFSUP, PFSCDN, PFSCUP) |
| subroutine radlsw | ( | integer(kind=jpim), intent(in) | KIDIA, |
| integer(kind=jpim), intent(in) | KFDIA, | ||
| integer(kind=jpim), intent(in) | KLON, | ||
| integer(kind=jpim), intent(in) | KLEV, | ||
| integer(kind=jpim), intent(in) | KMODE, | ||
| integer(kind=jpim), intent(in) | KAER, | ||
| real(kind=jprb), intent(in) | PRII0, | ||
| real(kind=jprb), dimension(klon,6,klev), intent(in) | PAER, | ||
| real(kind=jprb), dimension(klon,nsw), intent(in) | PALBD, | ||
| real(kind=jprb), dimension(klon,nsw), intent(in) | PALBP, | ||
| real(kind=jprb), dimension(klon,klev+1), intent(in) | PAPH, | ||
| real(kind=jprb), dimension(klon,klev), intent(in) | PAP, | ||
| real(kind=jprb), dimension(klon), intent(in) | PCCNL, | ||
| real(kind=jprb), dimension(klon), intent(in) | PCCNO, | ||
| real(kind=jprb), intent(in) | PCCO2, | ||
| real(kind=jprb), dimension(klon,klev), intent(in) | PCLFR, | ||
| real(kind=jprb), dimension(klon,klev), intent(in) | PDP, | ||
| real(kind=jprb), dimension(klon), intent(in) | PEMIS, | ||
| real(kind=jprb), dimension(klon), intent(in) | PEMIW, | ||
| real(kind=jprb), dimension(klon), intent(in) | PLSM, | ||
| real(kind=jprb), dimension(klon), intent(in) | PMU0, | ||
| real(kind=jprb), dimension(klon,klev), intent(in) | POZON, | ||
| real(kind=jprb), dimension(klon,klev), intent(in) | PQ, | ||
| real(kind=jprb), dimension(klon,klev), intent(in) | PQIWP, | ||
| real(kind=jprb), dimension(klon,klev), intent(in) | PQLWP, | ||
| real(kind=jprb), dimension(klon,klev), intent(in) | PQS, | ||
| real(kind=jprb), dimension(klon,klev) | PQRAIN, | ||
| real(kind=jprb), dimension(klon,klev) | PRAINT, | ||
| real(kind=jprb), dimension(klon,klev+1), intent(in) | PTH, | ||
| real(kind=jprb), dimension(klon,klev), intent(in) | PT, | ||
| real(kind=jprb), dimension(klon), intent(in) | PTS, | ||
| real(kind=jprb), dimension(klon), intent(in) | PNBAS, | ||
| real(kind=jprb), dimension(klon), intent(in) | PNTOP, | ||
| real(kind=jprb), dimension(klon,klev), intent(in) | PREF_LIQ, | ||
| real(kind=jprb), dimension(klon,klev), intent(in) | PREF_ICE, | ||
| real(kind=jprb), dimension(klon), intent(out) | PEMIT, | ||
| real(kind=jprb), dimension(klon,klev+1), intent(out) | PFCT, | ||
| real(kind=jprb), dimension(klon,klev+1), intent(out) | PFLT, | ||
| real(kind=jprb), dimension(klon,klev+1), intent(out) | PFCS, | ||
| real(kind=jprb), dimension(klon,klev+1), intent(out) | PFLS, | ||
| real(kind=jprb), dimension(klon), intent(out) | PFRSOD, | ||
| real(kind=jprb), dimension(klon), intent(out) | PSUDU, | ||
| real(kind=jprb), dimension(klon), intent(out) | PUVDF, | ||
| real(kind=jprb), dimension(klon), intent(out) | PPARF, | ||
| real(kind=jprb), dimension(klon), intent(out) | PPARCF, | ||
| real(kind=jprb), dimension(klon), intent(out) | PTINCF, | ||
| real(kind=jprb), dimension(klon,nsw), intent(out) | PSFSWDIR, | ||
| real(kind=jprb), dimension(klon,nsw), intent(out) | PSFSWDIF, | ||
| real(kind=jprb), dimension(klon), intent(out) | PFSDNN, | ||
| real(kind=jprb), dimension(klon), intent(out) | PFSDNV, | ||
| logical, intent(in) | LRDUST, | ||
| real(kind=jprb), dimension(klon,klev,nsw), intent(in) | PPIZA_DST, | ||
| real(kind=jprb), dimension(klon,klev,nsw), intent(in) | PCGA_DST, | ||
| real(kind=jprb), dimension(klon,klev,nsw), intent(in) | PTAUREL_DST, | ||
| real(kind=jprb), dimension(klon,klev,nlw), intent(in) | PTAU_LW, | ||
| real(kind=jprb), dimension(klon,2,klev+1), intent(out) | PFLUX, | ||
| real(kind=jprb), dimension(klon,2,klev+1), intent(out) | PFLUC, | ||
| real(kind=jprb), dimension(klon,klev+1), intent(out) | PFSDN, | ||
| real(kind=jprb), dimension(klon,klev+1), intent(out) | PFSUP, | ||
| real(kind=jprb), dimension(klon,klev+1), intent(out) | PFSCDN, | ||
| real(kind=jprb), dimension(klon,klev+1), intent(out) | PFSCUP | ||
| ) |
Definition at line 16 of file radlsw.F90.
1.8.9.1 
