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

Last change on this file since 5098 was 5081, checked in by abarral, 4 months ago

Commit linked to correcting relevant warnings during gfortran compilation

[minor]
Correct remnants of fixed-form "+" in massbarxy.F90
Correct COMMON alignment in clesphys.h, flux_arp.h, cv*param.h, YOECUMF.h, alpale.h
Correct obsolete logical operators
Restrict use of iso_fortran_env in nf95_abort.f90
Remove redundant save in module declarations
Remove <continue> without labels
Fix nonstandard kind selectors
  • 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
Line 
1!
2! $Header$
3!
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!------------------------------------------------------------
11
12      integer noff, minorig, nl, nlp, nlm
13      real sigd, spfac
14!IM 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 /cv30param/  sigd, spfac &
23!IM cf. FH : pour compatibilite avec conema3 TEMPORAIRE  :                ,pbcrit, ptcrit, epmax
24                      ,pbcrit, ptcrit &
25                      ,omtrain &
26                      ,dtovsh, dpbase, dttrig &
27                      ,dtcrit, tau, beta, alpha, delta, betad &
28                      ,noff, minorig, nl, nlp, nlm
29
30!$OMP THREADPRIVATE(/cv30param/)
Note: See TracBrowser for help on using the repository browser.