doxy_201512/html/sucld_8intfb_8h_source.html

 INTERFACE

 SUBROUTINE SUCLD ( KLEV , PETA )

 USE PARKIND1 ,ONLY : JPIM ,JPRB

 INTEGER(KIND=JPIM),INTENT(IN) :: KLEV

 REAL(KIND=JPRB) ,INTENT(IN) :: PETA(KLEV)

 END SUBROUTINE SUCLD

 END INTERFACE

REAL
!$Id ok_orolf LOGICAL ok_limitvrai LOGICAL ok_all_xml INTEGER iflag_ener_conserv REAL solaire REAL(kind=8) RCO2

ONLY
INTERFACE SUBROUTINE ONLY
Definition: sucld.intfb.h:3

PARKIND1

JPIM
ONLY JPIM
Definition: tsmbkind.h:5

KLEV
INTERFACE SUBROUTINE LW KLEV
Definition: lw.intfb.h:3

SUCLD
INTERFACE SUBROUTINE SUCLD(KLEV, PETA) USE PARKIND1

JPRB
ONLY JPRB
Definition: tsmbkind.h:5

INTEGER
INTERFACE SUBROUTINE JPRB INTEGER(KIND=JPIM)