LMDZ
conema3.h
Go to the documentation of this file.
1 !
2 ! $Id: conema3.h 2253 2015-03-30 09:08:45Z jyg $
3 !-- Modified by : Filiberti M-A 06/2005
4 !
5  real epmax ! 0.993
6 !jyg<
8 !>jyg
9  logical ok_adj_ema ! F
10  integer iflag_clw ! 0
12  real cvl_sig2feed ! 0.97
13 
14 !jyg<
15 !! common/comconema1/epmax,ok_adj_ema,iflag_clw,sig1feed,sig2feed
16 !! common/comconema2/iflag_cvl_sigd
17  common/comconema1/epmax, cvl_comp_threshold, cvl_sig2feed
18  common/comconema2/iflag_cvl_sigd, iflag_clw, ok_adj_ema
19 !>jyg
20 
21 ! common/comconema/epmax,ok_adj_ema,iflag_clw
22 !$OMP THREADPRIVATE(/comconema1/)
23 !$OMP THREADPRIVATE(/comconema2/)
24 
!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
c c $Id
Definition: ini_bilKP_ave.h:11
!$Id iflag_clw
Definition: conema3.h:15
!$Id ok_orolf LOGICAL ok_limitvrai LOGICAL ok_all_xml INTEGER iflag_ener_conserv REAL solaire REAL(kind=8) RCO2
!$Id ok_adj_ema
Definition: conema3.h:15
!$Id sig1feed
Definition: conema3.h:15
!$Id sig2feed!common comconema2 iflag_cvl_sigd common comconema1 cvl_comp_threshold
Definition: conema3.h:15
nsplit_thermals!nrlmd le iflag_clos_bl tau_trig_deep real::s_trig!fin nrlmd le fact_thermals_ed_dz integer
Definition: thermcell.h:9
!$Id sig2feed!common comconema2 iflag_cvl_sigd common comconema1 epmax
Definition: conema3.h:15
!$Id sig2feed!common comconema2 iflag_cvl_sigd common comconema1 cvl_sig2feed common comconema2 iflag_cvl_sigd
Definition: conema3.h:15
!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 real
subroutine conema3(dtime, paprs, pplay, t, q, u, v, tra, ntra, work1, work2, d_t, d_q, d_u, d_v, d_tra, rain, snow, kbas, ktop, upwd, dnwd, dnwdbis, bas, top, ma, cape, tvp, rflag, pbase, bbase, dtvpdt1, dtvpdq1, dplcldt, dplcldr, qcond_incld)
Definition: conema3.F90:8