source: LMDZ5/trunk/libf/phylmd/cv3param.h @ 2306

Last change on this file since 2306 was 2253, checked in by jyg, 10 years ago

1/ Introduction of two variables in the ".def" files: (i) cvl_sig2feed is
the top of the convective feeding layer in sigma coordinates (D=0.97);
(ii) cvl_comp_threshold is the threshold fraction of convective points
below which compression occurs (D=1.).
2/ Corrections of various bugs revealed by the changes in compression:

  • correct bugs in cv3a_uncompress.F90 for 3 fields used for convective

scavenging.

  • add a reset to zero of "sig" and "w0" for non-convective points

(cva_driver.F90).

  • in cv3_routines.F90, correct bounds of a few loops in cv3_undilute2,

correct the reset of the no-convection counter in cv3_yield.

  • in phys_output_write_mod.F90, correct output of wdtrainA and wdtrainM.

3/ Improve declarations in various subroutines.

Modified files:

conema3.h
cv3param.h
cv3p1_closure.F90
conf_phys_m.F90
cv3a_compress.F90
phys_output_write_mod.F90
cv3_routines.F90
concvl.F90
cva_driver.F90
cv3a_uncompress.F90

  • 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.1 KB
Line 
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!------------------------------------------------------------
8
9      integer noff, minorig, nl, nlp, nlm
10      real sigdz, spfac
11      integer flag_epKEorig,flag_wb
12      real pbcrit, ptcrit
13      real elcrit, tlcrit
14      real omtrain
15      real dtovsh, dpbase, dttrig
16      real dtcrit, tau, beta, alpha, alpha1
17      real wbmax
18      real delta
19      real betad
20
21      COMMON /cv3param/ sigdz, spfac &
22                      ,pbcrit, ptcrit &
23                      ,elcrit, tlcrit &
24                      ,omtrain &
25                      ,dtovsh, dpbase, dttrig &
26                      ,dtcrit, tau, beta, alpha, alpha1 &
27                      ,wbmax &
28                      ,delta, betad  &
29                      ,flag_epKEorig &
30                      ,flag_wb &
31                      ,noff, minorig, nl, nlp, nlm
32!$OMP THREADPRIVATE(/cv3param/)
33
Note: See TracBrowser for help on using the repository browser.