source: LMDZ6/branches/Amaury_dev/libf/phylmd/cv30param.h @ 5116

Last change on this file since 5116 was 5099, checked in by abarral, 4 months ago

Replace most uses of CPP_DUST by the corresponding logical defined in lmdz_cppkeys_wrapper.F90
Convert several files from .F to .f90 to allow Dust to compile w/o rrtm/ecrad
Create lmdz_yoerad.f90
(lint) Remove "!" on otherwise empty line
  • 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: 1.0 KB
RevLine 
[5099]1
[879]2! $Header$
[5099]3
[1992]4!------------------------------------------------------------
5! Parameters for convectL, iflag_con=30:
6! (includes - microphysical parameters, 
7!                       - parameters that control the rate of approach
8!               to quasi-equilibrium)
9!                       - noff & minorig (previously in input of convect1)
10!------------------------------------------------------------
[879]11
12      integer noff, minorig, nl, nlp, nlm
13      real sigd, spfac
[1992]14!IM cf. FH : pour compatibilite avec conema3 TEMPORAIRE   real pbcrit, ptcrit, epmax
[879]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
[5081]22      COMMON /cv30param/  sigd, spfac &
[1992]23!IM cf. FH : pour compatibilite avec conema3 TEMPORAIRE  :                ,pbcrit, ptcrit, epmax
24                      ,pbcrit, ptcrit &
25                      ,omtrain &
26                      ,dtovsh, dpbase, dttrig &
[5081]27                      ,dtcrit, tau, beta, alpha, delta, betad &
28                      ,noff, minorig, nl, nlp, nlm
[879]29
[1992]30!$OMP THREADPRIVATE(/cv30param/)
Note: See TracBrowser for help on using the repository browser.