LMDZ
srtm_reftra.intfb.h
Go to the documentation of this file.
1 INTERFACE
2 SUBROUTINE SRTM_REFTRA&
3  & ( KLEV , KMODTS,&
4  & LDRTCHK,&
5  & PGG , PRMUZ, PTAU , PW,&
6  & PREF , PREFD, PTRA , PTRAD&
7  & )
8 USE PARKIND1 ,ONLY : JPIM ,JPRB
9 USE PARSRTM , ONLY : JPLAY
10 INTEGER(KIND=JPIM),INTENT(IN) :: KLEV
11 INTEGER(KIND=JPIM),INTENT(OUT) :: KMODTS
12 LOGICAL ,INTENT(IN) :: LDRTCHK(JPLAY)
13 REAL(KIND=JPRB) ,INTENT(IN) :: PGG(JPLAY)
14 REAL(KIND=JPRB) ,INTENT(IN) :: PRMUZ
15 REAL(KIND=JPRB) ,INTENT(IN) :: PTAU(JPLAY)
16 REAL(KIND=JPRB) ,INTENT(IN) :: PW(JPLAY)
17 REAL(KIND=JPRB) ,INTENT(INOUT) :: PREF(JPLAY)
18 REAL(KIND=JPRB) ,INTENT(INOUT) :: PREFD(JPLAY)
19 REAL(KIND=JPRB) ,INTENT(INOUT) :: PTRA(JPLAY)
20 REAL(KIND=JPRB) ,INTENT(INOUT) :: PTRAD(JPLAY)
21 END SUBROUTINE SRTM_REFTRA
22 END INTERFACE
INTERFACE SUBROUTINE SRTM_REFTRA PW
INTERFACE SUBROUTINE SRTM_REFTRA && PREF
!$Id ok_orolf LOGICAL ok_limitvrai LOGICAL ok_all_xml INTEGER iflag_ener_conserv REAL solaire REAL(kind=8) RCO2
ONLY JPIM
Definition: tsmbkind.h:5
INTERFACE SUBROUTINE SRTM_REFTRA PRMUZ
INTERFACE SUBROUTINE JPRB INTEGER(KIND=JPIM)
INTERFACE SUBROUTINE SRTM_REFTRA PTAU
INTERFACE SUBROUTINE SRTM_REFTRA && KLEV
INTERFACE SUBROUTINE SRTM_REFTRA PTRA
INTERFACE SUBROUTINE SRTM_REFTRA KMODTS
INTERFACE SUBROUTINE SRTM_REFTRA PREFD
INTERFACE SUBROUTINE SRTM_VRTQDR PTRAD
ONLY JPRB
Definition: tsmbkind.h:5
INTERFACE SUBROUTINE SRTM_REFTRA PTRAD &&USE ONLY
INTERFACE SUBROUTINE SRTM_REFTRA && PGG
INTERFACE SUBROUTINE RRTM_ECRT_140GP K_IREFLECT USE JPRB USE JPLAY
INTERFACE SUBROUTINE SRTM_REFTRA && LDRTCHK