LMDZ
rrtm_taumol10.intfb.h
Go to the documentation of this file.
1 INTERFACE
2 SUBROUTINE RRTM_TAUMOL10 (KLEV,P_TAU,&
3  & P_TAUAERL,P_FAC00,P_FAC01,P_FAC10,P_FAC11,K_JP,K_JT,K_JT1,&
4  & P_COLH2O,K_LAYTROP,PFRAC)
5 USE PARKIND1 ,ONLY : JPIM ,JPRB
6 USE PARRRTM , ONLY : JPLAY ,JPBAND ,JPGPT ,NG10 ,NGS9
7 INTEGER(KIND=JPIM),INTENT(IN) :: KLEV
8 REAL(KIND=JPRB) ,INTENT(OUT) :: P_TAU(JPGPT,JPLAY)
9 REAL(KIND=JPRB) ,INTENT(IN) :: P_TAUAERL(JPLAY,JPBAND)
10 REAL(KIND=JPRB) ,INTENT(IN) :: P_FAC00(JPLAY)
11 REAL(KIND=JPRB) ,INTENT(IN) :: P_FAC01(JPLAY)
12 REAL(KIND=JPRB) ,INTENT(IN) :: P_FAC10(JPLAY)
13 REAL(KIND=JPRB) ,INTENT(IN) :: P_FAC11(JPLAY)
14 INTEGER(KIND=JPIM),INTENT(IN) :: K_JP(JPLAY)
15 INTEGER(KIND=JPIM),INTENT(IN) :: K_JT(JPLAY)
16 INTEGER(KIND=JPIM),INTENT(IN) :: K_JT1(JPLAY)
17 REAL(KIND=JPRB) ,INTENT(IN) :: P_COLH2O(JPLAY)
18 INTEGER(KIND=JPIM),INTENT(IN) :: K_LAYTROP
19 REAL(KIND=JPRB) ,INTENT(OUT) :: PFRAC(JPGPT,JPLAY)
20 END SUBROUTINE RRTM_TAUMOL10
21 END INTERFACE
INTEGER
INTERFACE SUBROUTINE JPRB USE NGS9 INTEGER(KIND=JPIM)
K_JT
INTERFACE SUBROUTINE SRTM_TAUMOL16 K_JT
Definition: srtm_taumol16.intfb.h:3
P_COLH2O
INTERFACE SUBROUTINE SRTM_TAUMOL16 && P_COLH2O
Definition: srtm_taumol16.intfb.h:3
K_LAYTROP
INTERFACE SUBROUTINE SRTM_TAUMOL16 && K_LAYTROP
Definition: srtm_taumol16.intfb.h:3
REAL
!$Id ok_orolf LOGICAL ok_limitvrai LOGICAL ok_all_xml INTEGER iflag_ener_conserv REAL solaire REAL(kind=8) RCO2
JPIM
ONLY JPIM
Definition: tsmbkind.h:5
KLEV
INTERFACE SUBROUTINE LW KLEV
Definition: lw.intfb.h:3
K_JT1
INTERFACE SUBROUTINE SRTM_TAUMOL16 K_JT1
Definition: srtm_taumol16.intfb.h:3
P_FAC10
INTERFACE SUBROUTINE SRTM_TAUMOL16 P_FAC10
Definition: srtm_taumol16.intfb.h:3
P_FAC01
INTERFACE SUBROUTINE SRTM_TAUMOL16 P_FAC01
Definition: srtm_taumol16.intfb.h:3
JPRB
ONLY JPRB
Definition: tsmbkind.h:5
ONLY
INTERFACE SUBROUTINE ONLY
Definition: rrtm_taumol10.intfb.h:5
K_JP
INTERFACE SUBROUTINE SRTM_TAUMOL16 && K_JP
Definition: srtm_taumol16.intfb.h:3
NG10
INTERFACE SUBROUTINE JPRB USE NG10
Definition: rrtm_taumol10.intfb.h:5
P_TAUAERL
INTERFACE SUBROUTINE RRTM_ECRT_140GP && P_TAUAERL
Definition: rrtm_ecrt_140gp.intfb.h:3
JPBAND
INTERFACE SUBROUTINE JPRB USE JPBAND
Definition: rrtm_taumol10.intfb.h:5
P_FAC00
INTERFACE SUBROUTINE SRTM_TAUMOL16 && P_FAC00
Definition: srtm_taumol16.intfb.h:3
JPLAY
INTERFACE SUBROUTINE RRTM_ECRT_140GP K_IREFLECT USE JPRB USE JPLAY
Definition: rrtm_ecrt_140gp.intfb.h:3
JPGPT
INTERFACE SUBROUTINE JPRB USE JPGPT
Definition: rrtm_taumol10.intfb.h:5
RRTM_TAUMOL10
INTERFACE SUBROUTINE RRTM_TAUMOL10(KLEV, P_TAU,&&P_TAUAERL, P_FAC00, P_FAC01, P_FAC10, P_FAC11, K_JP, K_JT, K_JT1,&&P_COLH2O, K_LAYTROP, PFRAC) USE PARKIND1
P_FAC11
INTERFACE SUBROUTINE SRTM_TAUMOL16 P_FAC11
Definition: srtm_taumol16.intfb.h:3