LMDZ
lwc.intfb.h
Go to the documentation of this file.
1 INTERFACE
2 SUBROUTINE LWC&
3  & ( KIDIA , KFDIA, KLON , KLEV,&
4  & PBINT , PBSUI, PCLDLD, PCLDLU,&
5  & PCNTRB, PEMIT, PFLUC,&
6  & PFLUX&
7  & )
8 USE PARKIND1 ,ONLY : JPIM ,JPRB
9 INTEGER(KIND=JPIM),INTENT(IN) :: KLON
10 INTEGER(KIND=JPIM),INTENT(IN) :: KLEV
11 INTEGER(KIND=JPIM),INTENT(IN) :: KIDIA
12 INTEGER(KIND=JPIM),INTENT(IN) :: KFDIA
13 REAL(KIND=JPRB) ,INTENT(IN) :: PBINT(KLON,KLEV+1)
14 REAL(KIND=JPRB) ,INTENT(IN) :: PBSUI(KLON)
15 REAL(KIND=JPRB) ,INTENT(IN) :: PCLDLD(KLON,KLEV)
16 REAL(KIND=JPRB) ,INTENT(IN) :: PCLDLU(KLON,KLEV)
17 REAL(KIND=JPRB) ,INTENT(IN) :: PCNTRB(KLON,KLEV+1,KLEV+1)
18 REAL(KIND=JPRB) ,INTENT(IN) :: PEMIT(KLON)
19 REAL(KIND=JPRB) ,INTENT(IN) :: PFLUC(KLON,2,KLEV+1)
20 REAL(KIND=JPRB) ,INTENT(OUT) :: PFLUX(KLON,2,KLEV+1)
21 END SUBROUTINE LWC
22 END INTERFACE
INTERFACE SUBROUTINE LWC && PCNTRB
Definition: lwc.intfb.h:3
!$Id ok_orolf LOGICAL ok_limitvrai LOGICAL ok_all_xml INTEGER iflag_ener_conserv REAL solaire REAL(kind=8) RCO2
INTERFACE SUBROUTINE LWC && PBINT
Definition: lwc.intfb.h:3
INTERFACE SUBROUTINE LWC PCLDLU
Definition: lwc.intfb.h:3
ONLY JPIM
Definition: tsmbkind.h:5
INTERFACE SUBROUTINE LWC &&PFLUX &&USE JPRB INTEGER(KIND=JPIM)
INTERFACE SUBROUTINE LWC PEMIT
Definition: lwc.intfb.h:3
INTERFACE SUBROUTINE LW PFLUX
Definition: lw.intfb.h:3
INTERFACE SUBROUTINE LWC PFLUC
Definition: lwc.intfb.h:3
INTERFACE SUBROUTINE LWC KFDIA
Definition: lwc.intfb.h:3
INTERFACE SUBROUTINE LWC PBSUI
Definition: lwc.intfb.h:3
ONLY JPRB
Definition: tsmbkind.h:5
INTERFACE SUBROUTINE LWC && KIDIA
Definition: lwc.intfb.h:3
INTERFACE SUBROUTINE LWC PCLDLD
Definition: lwc.intfb.h:3
INTERFACE SUBROUTINE LWC KLEV
Definition: lwc.intfb.h:3
INTERFACE SUBROUTINE LWC &&PFLUX &&USE ONLY
Definition: lwc.intfb.h:3
INTERFACE SUBROUTINE LWC KLON
Definition: lwc.intfb.h:3