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

Last change on this file since 5097 was 5081, checked in by abarral, 2 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
RevLine 
[879]1!
2! $Header$
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.