source: LMDZ5/branches/LMDZ5_SPLA/libf/phylmd/YOEGWD.h @ 5080

Last change on this file since 5080 was 1938, checked in by lguez, 11 years ago

New run-time parameters: ok_gwd_rando, ruwmax and sat. Logical
variable ok_gwd_rando activates the new stochastic parameterization of
the drag of non-orographic gravity waves, by F. Lott. Default value of
ok_gwd_rando is false. A run with ok_gwd_rando creates new variables
in restartphy.nc: du_gwd_rando and dv_gwd_rando. Possible output in
history files of new variables du_gwd_rando, dv_gwd_rando and
vstr_gwd_rando.

  • 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! $Header$
3!
4!  ATTENTION : ce fichier include est compatible format fixe/format libre
5!                 veillez  n'utiliser que des ! pour les commentaires
6!                 et  bien positionner les & des lignes de continuation
7!                 (les placer en colonne 6 et en colonne 73)
8!     -----------------------------------------------------------------
9!*    *COMMON* *YOEGWD* - PARAMETERS FOR GRAVITY WAVE DRAG CALCULATIONS
10!     -----------------------------------------------------------------
11!
12      integer NKTOPG,NSTRA
13      real GFRCRIT,GKWAKE,GRCRIT,GVCRIT,GKDRAG,GKLIFT
14      real GHMAX,GRAHILO,GSIGCR,GSSEC,GTSEC,GVSEC
15
16      REAL RUWMAX
17!     Maximum Eliassen-Palm flux at launch level, in "FLOTT_GWD_rando"
18
19      REAL SAT ! saturation parameter in "FLOTT_GWD_rando"
20!     S_c in equation (12) of Lott (JGR, vol 118, page 8897, 2013)
21
22
23      COMMON/YOEGWD/ GFRCRIT,GKWAKE,GRCRIT,GVCRIT,GKDRAG,GKLIFT,        &
24     &     GHMAX,GRAHILO,GSIGCR,NKTOPG,NSTRA,GSSEC,GTSEC,GVSEC,         &
25     &     RUWMAX, sat
26
27      save /YOEGWD/
28!$OMP THREADPRIVATE(/YOEGWD/)
Note: See TracBrowser for help on using the repository browser.