LMDZ
YOMCST2.h
Go to the documentation of this file.
1 
2  INTEGER choice, iflag_mix
3  REAL gammas, alphas, betas, Fmax, qqa1, qqa2, qqa3, scut
4  REAL Qcoef1max,Qcoef2max,Supcrit1,Supcrit2
5  REAL coef_clos_ls
6 !
7  COMMON/YOMCST2/gammas, alphas, betas, Fmax, scut, &
8  & qqa1, qqa2, qqa3, &
9  & Qcoef1max,Qcoef2max, &
10  & Supcrit1, Supcrit2, &
11  & choice,iflag_mix,coef_clos_ls
12 !$OMP THREADPRIVATE(/YOMCST2/)
13 ! --------------------------------------------------------------------
14 
THREADPRIVATE
!IM for NMC files!real nfiles!real nfiles!real nfiles!real nlevSTD3 real nlevSTD3 real nlevSTD3 real nlevSTD3 real nlevSTD8 real nlevSTD8 real nlevSTD8 real nlevSTD8!$OMP THREADPRIVATE(rlevstd) CHARACTER *4
betas
INTEGER iflag_mix REAL betas
Definition: YOMCST2.h:2
REAL
!$Id ok_orolf LOGICAL ok_limitvrai LOGICAL ok_all_xml INTEGER iflag_ener_conserv REAL solaire REAL(kind=8) RCO2
alphas
INTEGER iflag_mix REAL alphas
Definition: YOMCST2.h:2
scut
INTEGER iflag_mix REAL scut REAL Supcrit2 REAL coef_clos_ls!COMMON YOMCST2 scut
Definition: YOMCST2.h:2
INTEGER
INTERFACE SUBROUTINE JPRB INTEGER(KIND=JPIM)
Qcoef2max
INTEGER iflag_mix REAL scut REAL Qcoef2max
Definition: YOMCST2.h:2
iflag_mix
INTEGER iflag_mix REAL scut REAL Supcrit2 REAL coef_clos_ls!COMMON YOMCST2 iflag_mix
Definition: YOMCST2.h:2
Supcrit2
INTEGER iflag_mix REAL scut REAL Supcrit2 REAL coef_clos_ls!COMMON YOMCST2 Supcrit2
Definition: YOMCST2.h:2
Qcoef1max
INTEGER iflag_mix REAL scut REAL Qcoef1max
Definition: YOMCST2.h:2
qqa3
INTEGER iflag_mix REAL qqa3
Definition: YOMCST2.h:2
Fmax
INTEGER iflag_mix REAL Fmax
Definition: YOMCST2.h:2
choice
INTEGER choice
Definition: YOMCST2.h:2
qqa1
INTEGER iflag_mix REAL qqa1
Definition: YOMCST2.h:2
gammas
INTEGER iflag_mix REAL gammas
Definition: YOMCST2.h:2
qqa2
INTEGER iflag_mix REAL qqa2
Definition: YOMCST2.h:2
Supcrit1
INTEGER iflag_mix REAL scut REAL Supcrit1
Definition: YOMCST2.h:2