source: LMDZ6/branches/Amaury_dev/libf/phylmd/cv3param.h @ 5091

Last change on this file since 5091 was 5081, checked in by abarral, 12 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.5 KB
RevLine 
[1992]1!------------------------------------------------------------
2! Parameters for convectL, iflag_con=3:
3! (includes - microphysical parameters,
4!                       - parameters that control the rate of approach
5!               to quasi-equilibrium)
6!                       - noff & minorig (previously in input of convect1)
7!------------------------------------------------------------
[879]8
[3571]9      integer flag_epKEorig
10      real flag_wb
[3496]11      integer cv_flag_feed
[879]12      integer noff, minorig, nl, nlp, nlm
13      real sigdz, spfac
14      real pbcrit, ptcrit
[1515]15      real elcrit, tlcrit
[2458]16      real coef_peel
[879]17      real omtrain
18      real dtovsh, dpbase, dttrig
19      real dtcrit, tau, beta, alpha, alpha1
[2761]20      real T_top_max
[2398]21      real tau_stop, noconv_stop
[1516]22      real wbmax
[879]23      real delta
24      real betad
[3496]25      real ejectliq
26      real ejectice
[879]27
[2253]28      COMMON /cv3param/ sigdz, spfac &
[1992]29                      ,pbcrit, ptcrit &
30                      ,elcrit, tlcrit &
[2458]31                      ,coef_peel &
[1992]32                      ,omtrain &
33                      ,dtovsh, dpbase, dttrig &
34                      ,dtcrit, tau, beta, alpha, alpha1 &
[2761]35                      ,T_top_max &
[2398]36                      ,tau_stop, noconv_stop &
[2253]37                      ,wbmax &
38                      ,delta, betad  &
[3496]39                      ,ejectliq, ejectice &
[5081]40                      ,flag_wb &
[2253]41                      ,flag_epKEorig &
[5081]42                      ,cv_flag_feed &
[3496]43                      ,noff, minorig, nl, nlp, nlm
[987]44!$OMP THREADPRIVATE(/cv3param/)
[879]45
Note: See TracBrowser for help on using the repository browser.