source: LMDZ4/trunk/libf/phytherm/cvparam3.h @ 855

Last change on this file since 855 was 814, checked in by Laurent Fairhead, 17 years ago

Rajout de la physique utilisant les thermiques FH
LF

  • Property svn:eol-style set to native
  • Property svn:keywords set to Author Date Id Revision
File size: 1.0 KB
Line 
1!
2! $Header$
3!
4c------------------------------------------------------------
5c Parameters for convectL, iflag_con=3:
6c (includes - microphysical parameters, 
7c                       - parameters that control the rate of approach
8c               to quasi-equilibrium)
9c                       - noff & minorig (previously in input of convect1)
10c------------------------------------------------------------
11
12      integer noff, minorig, nl, nlp, nlm
13      real sigd, spfac
14cIM cf. FH : pour compatibilite avec conema3 TEMPORAIRE   real pbcrit, ptcrit, epmax
15      real pbcrit, ptcrit
16      real omtrain
17      real dtovsh, dpbase, dttrig
18      real dtcrit, tau, beta, alpha
19      real delta
20      real betad
21
22      COMMON /cvparam3/  noff, minorig, nl, nlp, nlm
23     :                ,  sigd, spfac
24cIM cf. FH : pour compatibilite avec conema3 TEMPORAIRE  :                ,pbcrit, ptcrit, epmax
25     :                ,pbcrit, ptcrit
26     :                ,omtrain
27     :                ,dtovsh, dpbase, dttrig
28     :                ,dtcrit, tau, beta, alpha, delta, betad
29
30c$OMP THREADPRIVATE(/cvparam3/)
Note: See TracBrowser for help on using the repository browser.