source: LMDZ5/branches/IPSLCM6.0.8/libf/dyn3d/logic_mod.F90 @ 3046

Last change on this file since 3046 was 2720, checked in by Laurent Fairhead, 8 years ago

Merged trunk changes r2664:2719 into testing branch

  • 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 2720 2016-11-30 12:28:41Z fairhead $
3!
4MODULE logic_mod
5
6IMPLICIT 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
36END MODULE logic_mod
Note: See TracBrowser for help on using the repository browser.