source: LMDZ6/branches/Ocean_skin/libf/phylmd/conema3.h @ 3627

Last change on this file since 3627 was 2481, checked in by fhourdin, 8 years ago

Introduction d'une dependance epmax=f(Cape) sur proposition de Camille Risi

  • Property copyright set to
    Name of program: LMDZ
    Creation date: 1984
    Version: LMDZ5
    License: CeCILL version 2
    Holder: Laboratoire de m\'et\'eorologie dynamique, CNRS, UMR 8539
    See the license file in the root directory
  • Property svn:eol-style set to native
  • Property svn:keywords set to Author Date Id Revision
File size: 743 bytes
Line 
1!
2! $Header$
3!-- Modified by : Filiberti M-A 06/2005
4!
5      real epmax             ! 0.993
6      real coef_epmax_cape             ! 0.993
7!jyg<
8      REAL  cvl_comp_threshold     ! 0.
9!>jyg
10      logical ok_adj_ema      ! F
11      integer iflag_clw      ! 0
12      integer iflag_cvl_sigd
13      real cvl_sig2feed      ! 0.97
14
15!jyg<
16!!      common/comconema1/epmax,coef_epmax_cape,ok_adj_ema,iflag_clw,sig1feed,sig2feed
17!!      common/comconema2/iflag_cvl_sigd
18      common/comconema1/epmax,coef_epmax_cape, cvl_comp_threshold, cvl_sig2feed
19      common/comconema2/iflag_cvl_sigd, iflag_clw, ok_adj_ema
20!>jyg
21
22!      common/comconema/epmax,coef_epmax_cape,ok_adj_ema,iflag_clw
23!$OMP THREADPRIVATE(/comconema1/)
24!$OMP THREADPRIVATE(/comconema2/)
25
Note: See TracBrowser for help on using the repository browser.