Philippe 23/02/2016: lfi2cdf: modif for JPHEXT/=1
[MNH-git_open_source-lfs.git] / tools / diachro / src / MOD / modd_nmgrid.f90
1 !-----------------------------------------------------------------
2 !--------------- special set of characters for SCCS information
3 !--------------- C. Fischer 30/09/94
4 !      @(#) Lib:/opt/local/MESONH/sources/modd/s.modd_nmgrid.f90, Version:1.9, Date:98/10/01, Last modified:98/06/04
5 !-----------------------------------------------------------------
6 !     ##################
7       MODULE MODD_NMGRID
8 !     ##################
9 !
10 !!****  *MODD_NMGRID* - Global variable  NMGRID declaration
11 !!
12 !!    PURPOSE
13 !!    -------
14 !!      This declarative module defines the NMGRID global variable, which
15 !!    stores the value of the grid indicator for the current displayed field
16 !!    (local alias IGRID or KGRID). The grid indicator is the number of the
17 !!    grid where the displayed variable is located in the MESO-NH model. Seven
18 !!    different grids are used, so far. See Book-1 for grid definitions.
19 !!
20 !!**  IMPLICIT ARGUMENTS
21 !!    ------------------
22 !!      None 
23 !!
24 !!    REFERENCE
25 !!    ---------
26 !!
27 !!     Book2 of the TRACE volume of the Meso-NH user manual
28 !!     (MODD_FIELD1_CV2D), to appear in 1994 
29 !!
30 !!     The 7 MESO-NH grid types are defined in:
31 !!      
32 !!      - Asencio N. et al., 1994, "Le projet de modele non-hydrostatique
33 !!        commun CNRM-LA, specifications techniques", 
34 !!        Note CNRM/GMME, 26, 139p, (pages 39 to 43).
35 !!
36 !!      - Fischer C., 1994, "File structure and content in the Meso-NH 
37 !!        model", Meso-nh internal note, CNRM/GMME,  July 5.
38 !!       
39 !!       
40 !!    AUTHOR
41 !!    ------
42 !!      JD    "LA"
43 !!
44 !!    MODIFICATIONS
45 !!    -------------
46 !!      Original       08/06/94                      
47 !!      Updated   PM   17/11/94  
48 !-------------------------------------------------------------------------------
49 !
50 !*       0.   DECLARATIONS
51 !             ------------
52 !
53 !
54 IMPLICIT NONE
55 !
56 INTEGER           :: NMGRID    ! Current MESO-NH grid indicator
57 !
58 END MODULE MODD_NMGRID