2 SUBROUTINE SRTM_REFTRA&
 
   21 END SUBROUTINE SRTM_REFTRA
 
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
 
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
 
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