LMDZ
rrtm_ecrt_140gp.F90 File Reference

Go to the source code of this file.

Functions/Subroutines

subroutine rrtm_ecrt_140gp (K_IPLON, klon, klev, kcld, paer, paph, pap, pts, pth, pt, P_ZEMIS, P_ZEMIW, pq, pcco2, pozn, pcldf, ptaucld, ptclear, P_CLDFRAC, P_TAUCLD, PTAU_LW, P_COLDRY, P_WKL, P_WX, P_TAUAERL, PAVEL, P_TAVEL, PZ, P_TZ, P_TBOUND, K_NLAYERS, P_SEMISS, K_IREFLECT)
 

Function/Subroutine Documentation

subroutine rrtm_ecrt_140gp ( integer(kind=jpim), intent(in)  K_IPLON,
integer(kind=jpim), intent(in)  klon,
integer(kind=jpim), intent(in)  klev,
integer(kind=jpim), intent(out)  kcld,
real(kind=jprb), dimension(klon,6,klev), intent(in)  paer,
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)  pts,
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)  P_ZEMIS,
real(kind=jprb), dimension(klon), intent(in)  P_ZEMIW,
real(kind=jprb), dimension(klon,klev), intent(in)  pq,
real(kind=jprb), intent(in)  pcco2,
real(kind=jprb), dimension(klon,klev), intent(in)  pozn,
real(kind=jprb), dimension(klon,klev), intent(in)  pcldf,
real(kind=jprb), dimension(klon,klev,jpband), intent(in)  ptaucld,
real(kind=jprb), intent(out)  ptclear,
real(kind=jprb), dimension(jplay), intent(out)  P_CLDFRAC,
real(kind=jprb), dimension(jplay,jpband), intent(out)  P_TAUCLD,
real(kind=jprb), dimension(klon,klev,nlw), intent(in)  PTAU_LW,
real(kind=jprb), dimension(jplay), intent(out)  P_COLDRY,
real(kind=jprb), dimension(jpinpx,jplay), intent(out)  P_WKL,
real(kind=jprb), dimension(jpxsec,jplay), intent(out)  P_WX,
real(kind=jprb), dimension(jplay,jpband), intent(out)  P_TAUAERL,
real(kind=jprb), dimension(jplay), intent(out)  PAVEL,
real(kind=jprb), dimension(jplay), intent(out)  P_TAVEL,
real(kind=jprb), dimension(0:jplay), intent(out)  PZ,
real(kind=jprb), dimension(0:jplay), intent(out)  P_TZ,
real(kind=jprb), intent(out)  P_TBOUND,
integer(kind=jpim), intent(out)  K_NLAYERS,
real(kind=jprb), dimension(jpband), intent(out)  P_SEMISS,
integer(kind=jpim), intent(out)  K_IREFLECT 
)

Definition at line 16 of file rrtm_ecrt_140gp.F90.

Here is the call graph for this function:

Here is the caller graph for this function: