LMDZ
swclr.intfb.h
Go to the documentation of this file.
1 INTERFACE
2 SUBROUTINE SWCLR&
3  & ( KIDIA , KFDIA , KLON , KLEV , KAER , KNU,&
4  & PAER , PALBP , PDSIG , PRAYL , PSEC,&
5  & PCGAZ , PPIZAZ, PRAY1 , PRAY2 , PREFZ , PRJ,&
6  & PRK , PRMU0 , PTAUAZ, PTRA1 , PTRA2 , PTRCLR,&
7  & LRDUST,PPIZA_DST, PCGA_DST, PTAUREL_DST )
8 USE PARKIND1 ,ONLY : JPIM ,JPRB
9 USE YOERAD , ONLY : NOVLP
10 include "clesphys.h"
11 INTEGER(KIND=JPIM),INTENT(IN) :: KLON
12 INTEGER(KIND=JPIM),INTENT(IN) :: KLEV
13 INTEGER(KIND=JPIM),INTENT(IN) :: KIDIA
14 INTEGER(KIND=JPIM),INTENT(IN) :: KFDIA
15 INTEGER(KIND=JPIM),INTENT(IN) :: KAER
16 INTEGER(KIND=JPIM),INTENT(IN) :: KNU
17 REAL(KIND=JPRB) ,INTENT(IN) :: PAER(KLON,6,KLEV)
18 REAL(KIND=JPRB) ,INTENT(IN) :: PALBP(KLON,NSW)
19 REAL(KIND=JPRB) ,INTENT(IN) :: PDSIG(KLON,KLEV)
20 REAL(KIND=JPRB) ,INTENT(IN) :: PRAYL(KLON)
21 REAL(KIND=JPRB) ,INTENT(IN) :: PSEC(KLON)
22 LOGICAL ,INTENT(IN) :: LRDUST
23 REAL(KIND=JPRB) ,INTENT(IN) :: PPIZA_DST(KLON,KLEV)
24 REAL(KIND=JPRB) ,INTENT(IN) :: PCGA_DST(KLON,KLEV)
25 REAL(KIND=JPRB) ,INTENT(IN) :: PTAUREL_DST(KLON,KLEV)
26 REAL(KIND=JPRB) ,INTENT(OUT) :: PCGAZ(KLON,KLEV)
27 REAL(KIND=JPRB) ,INTENT(OUT) :: PPIZAZ(KLON,KLEV)
28 REAL(KIND=JPRB) ,INTENT(OUT) :: PRAY1(KLON,KLEV+1)
29 REAL(KIND=JPRB) ,INTENT(OUT) :: PRAY2(KLON,KLEV+1)
30 REAL(KIND=JPRB) ,INTENT(OUT) :: PREFZ(KLON,2,KLEV+1)
31 REAL(KIND=JPRB) ,INTENT(OUT) :: PRJ(KLON,6,KLEV+1)
32 REAL(KIND=JPRB) ,INTENT(OUT) :: PRK(KLON,6,KLEV+1)
33 REAL(KIND=JPRB) ,INTENT(OUT) :: PRMU0(KLON,KLEV+1)
34 REAL(KIND=JPRB) ,INTENT(OUT) :: PTAUAZ(KLON,KLEV)
35 REAL(KIND=JPRB) ,INTENT(OUT) :: PTRA1(KLON,KLEV+1)
36 REAL(KIND=JPRB) ,INTENT(OUT) :: PTRA2(KLON,KLEV+1)
37 REAL(KIND=JPRB) ,INTENT(OUT) :: PTRCLR(KLON)
38 END SUBROUTINE SWCLR
39 END INTERFACE
PRJ
INTERFACE SUBROUTINE SWCLR PRJ
Definition: swclr.intfb.h:3
KLEV
INTERFACE SUBROUTINE SWCLR KLEV
Definition: swclr.intfb.h:3
PTRA1
INTERFACE SUBROUTINE SWCLR PTRA1
Definition: swclr.intfb.h:3
PAER
INTERFACE SUBROUTINE SWCLR && PAER
Definition: swclr.intfb.h:3
KAER
INTERFACE SUBROUTINE SWCLR KAER
Definition: swclr.intfb.h:3
PRAY2
INTERFACE SUBROUTINE SWCLR PRAY2
Definition: swclr.intfb.h:3
REAL
!$Id ok_orolf LOGICAL ok_limitvrai LOGICAL ok_all_xml INTEGER iflag_ener_conserv REAL solaire REAL(kind=8) RCO2
PDSIG
INTERFACE SUBROUTINE SWCLR PDSIG
Definition: swclr.intfb.h:3
PALBP
INTERFACE SUBROUTINE SWCLR PALBP
Definition: swclr.intfb.h:3
PRAYL
INTERFACE SUBROUTINE SWCLR PRAYL
Definition: swclr.intfb.h:3
JPIM
ONLY JPIM
Definition: tsmbkind.h:5
INTEGER
INTERFACE SUBROUTINE JPRB INTEGER(KIND=JPIM)
KFDIA
INTERFACE SUBROUTINE SWCLR KFDIA
Definition: swclr.intfb.h:3
PSEC
INTERFACE SUBROUTINE SWCLR PSEC
Definition: swclr.intfb.h:3
PPIZA_DST
INTERFACE SUBROUTINE SWCLR PPIZA_DST
Definition: swclr.intfb.h:3
PCGA_DST
INTERFACE SUBROUTINE SWCLR PCGA_DST
Definition: swclr.intfb.h:3
PRK
INTERFACE SUBROUTINE SWCLR && PRK
Definition: swclr.intfb.h:3
PTRCLR
INTERFACE SUBROUTINE SWCLR PTRCLR
Definition: swclr.intfb.h:3
PREFZ
INTERFACE SUBROUTINE SWCLR PREFZ
Definition: swclr.intfb.h:3
KNU
INTERFACE SUBROUTINE SWCLR KNU
Definition: swclr.intfb.h:3
NOVLP
NAMELIST NAERAD LONEWSW LSRTM LNOTROAER LRADONDEM NRADLP NLAYINH NOVLP
Definition: naerad.h:3
PRAY1
INTERFACE SUBROUTINE SWCLR PRAY1
Definition: swclr.intfb.h:3
PTRA2
INTERFACE SUBROUTINE SWCLR PTRA2
Definition: swclr.intfb.h:3
JPRB
ONLY JPRB
Definition: tsmbkind.h:5
PRMU0
INTERFACE SUBROUTINE SWCLR PRMU0
Definition: swclr.intfb.h:3
LRDUST
INTERFACE SUBROUTINE SWCLR && LRDUST
Definition: swclr.intfb.h:3
ONLY
INTERFACE SUBROUTINE SWCLR PTAUREL_DST USE ONLY
Definition: swclr.intfb.h:3
PTAUREL_DST
INTERFACE SUBROUTINE RADLSW PTAUREL_DST
Definition: radlsw.intfb.h:3
KIDIA
INTERFACE SUBROUTINE SWCLR && KIDIA
Definition: swclr.intfb.h:3
KLON
INTERFACE SUBROUTINE SWCLR KLON
Definition: swclr.intfb.h:3
PTAUAZ
INTERFACE SUBROUTINE SWCLR PTAUAZ
Definition: swclr.intfb.h:3
NSW
NAMELIST NAERAD LONEWSW LSRTM LNOTROAER LRADONDEM NRADLP NLAYINH NSW
Definition: naerad.h:3
PPIZAZ
INTERFACE SUBROUTINE SWCLR PPIZAZ
Definition: swclr.intfb.h:3
PCGAZ
INTERFACE SUBROUTINE SWCLR && PCGAZ
Definition: swclr.intfb.h:3