Philippe 23/02/2016: lfi2cdf: modif for JPHEXT/=1
[MNH-git_open_source-lfs.git] / LIBTOOLS / tools / diachro / src / mesonh_MOD / modd_grid.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_grid.f90, Version:1.9, Date:98/10/01, Last modified:98/06/04
5 !-----------------------------------------------------------------
6 !     #################
7       MODULE MODD_GRID
8 !     #################
9 !
10 !!****  *MODD_GRID* - declaration of grid variables for all models
11 !!
12 !!    PURPOSE
13 !!    -------
14 !       The purpose of this declarative module is to declare  the variables
15 !     describing the grid for all models. 
16 !    
17 !
18 !!
19 !!**  IMPLICIT ARGUMENTS
20 !!    ------------------
21 !!      None 
22 !!
23 !!    REFERENCE
24 !!    ---------
25 !!      Book2 of documentation of Meso-NH (module MODD_GRID)
26 !!      Technical Specifications Report of the Meso-NH (chapters 2 and 3)
27 !!
28 !!    AUTHOR
29 !!    ------
30 !!      V. Ducrocq   *Meteo France*
31 !!
32 !!    MODIFICATIONS
33 !!    -------------
34 !!      Original    05/05/94                      
35 !!      V. Masson   nov 2004  : add XLATORI and XLONORI    
36 !-------------------------------------------------------------------------------
37 !
38 !*       0.   DECLARATIONS
39 !             ------------
40 !
41 IMPLICIT NONE
42 REAL,SAVE :: XLON0,XLAT0    ! Reference longitude and latitude 
43                             !  for the conformal projection
44 REAL,SAVE :: XBETA,XRPK     ! Rotation angle and projection parameter
45                             !  for the conformal projection
46 REAL,SAVE :: XLONORI,XLATORI ! Longitude and latitude of the point
47                              ! of coordinates x=0, y=0
48                              ! for the conformal projection
49 !  
50 END MODULE MODD_GRID