|
Last change
on this file since 5440 was
2665,
checked in by dcugnet, 8 years ago
|
- A (re)startphy.nc file (standard name: "startphy0.nc") can be read by ce0l to
get land mask, so mask can be defined (in decreasing priority order) from:
1) "o2a.nc file" if this file is found
2) "startphy0.nc" if this file is found
3) "Relief.nc" otherwise
- Sub-cell scales parameters for orographic gravity waves can be read from file
"oro_params.nc" if the configuration key "read_orop" is TRUE.
The effect is to bypass the "grid_noro" routine in ce0l, so that any
pre-defined mask (from o2a.nc or startphy0.nc) is then overwritten.
- The gcm stops if the "limit.nc" records number differs from the current year
number of days. A warning is issued in case the gcm calendar does not match
the time axis attribute "calendar" (if available) from the "limit.nc" file.
This attribute is now added to the "limit.nc" time axis.
- Few simplifications in grid_noro
- Few parameters changes in acama_gwd and flott_gwd.
- Variable d_u can be saved in the outputs.
|
-
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.4 KB
|
| Line | |
|---|
| 1 | ! |
|---|
| 2 | ! $Id: logic_mod.F90 2665 2016-10-12 12:53:20Z evignon $ |
|---|
| 3 | ! |
|---|
| 4 | MODULE logic_mod |
|---|
| 5 | |
|---|
| 6 | IMPLICIT NONE |
|---|
| 7 | |
|---|
| 8 | LOGICAL purmats ! true if time stepping is purely Matsuno scheme |
|---|
| 9 | ! false implies Matsuno-Leapfrog time stepping scheme |
|---|
| 10 | LOGICAL forward ! true if during forward phase of Matsuno step |
|---|
| 11 | LOGICAL leapf ! true if during a leapfrog time stepping step |
|---|
| 12 | LOGICAL apphys ! true if during a time step when physics will be called |
|---|
| 13 | LOGICAL statcl |
|---|
| 14 | LOGICAL conser |
|---|
| 15 | LOGICAL apdiss ! true if during a time step when dissipation will be called |
|---|
| 16 | LOGICAL apdelq |
|---|
| 17 | LOGICAL saison |
|---|
| 18 | LOGICAL ecripar |
|---|
| 19 | LOGICAL fxyhypb ! true if using hyperbolic function discretization |
|---|
| 20 | ! for latitudinal grid |
|---|
| 21 | LOGICAL ysinus ! true if using sine function discretiation |
|---|
| 22 | ! for latitudinal grid |
|---|
| 23 | LOGICAL read_start ! true if reading a start.nc file to initialize fields |
|---|
| 24 | LOGICAL ok_guide ! true if nudging |
|---|
| 25 | LOGICAL ok_strato |
|---|
| 26 | LOGICAL ok_gradsfile |
|---|
| 27 | LOGICAL ok_limit ! true for boundary conditions file creation (limit.nc) |
|---|
| 28 | LOGICAL ok_etat0 ! true for initial states creation (start.nc, startphy.nc) |
|---|
| 29 | LOGICAL read_orop ! true for sub-cell scales orographic params read in file |
|---|
| 30 | LOGICAL hybrid ! vertical coordinate is hybrid if true (sigma otherwise) |
|---|
| 31 | ! (only used if disvert_type==2) |
|---|
| 32 | INTEGER iflag_phys ! type of physics to call: 0 none, 1: phy*** package, |
|---|
| 33 | ! 2: Held & Suarez, 101-200: aquaplanets & terraplanets |
|---|
| 34 | INTEGER iflag_trac |
|---|
| 35 | |
|---|
| 36 | END MODULE logic_mod |
|---|
Note: See
TracBrowser
for help on using the repository browser.
