Philippe 23/02/2016: lfi2cdf: modif for JPHEXT/=1
[MNH-git_open_source-lfs.git] / LIBTOOLS / tools / lfi2cdf / src / modd_ncparam.f90
1 MODULE MODD_PARAM
2   IMPLICIT NONE 
3
4   CHARACTER(LEN=*), PARAMETER :: VERSION_ID='lfi2cdf Ver. Alpha'
5   INTEGER, PARAMETER :: INT   = 1
6   INTEGER, PARAMETER :: FLOAT = 2
7   INTEGER, PARAMETER :: TEXT  = 3
8   INTEGER, PARAMETER :: BOOL  = 4
9
10   INTEGER, PARAMETER :: D0 = 100
11   INTEGER, PARAMETER :: D1 = 200
12   INTEGER, PARAMETER :: D2 = 300
13   INTEGER, PARAMETER :: D3 = 400
14
15   INTEGER, PARAMETER :: NOTFOUND = -1
16
17   INTEGER, PARAMETER :: FM_FIELD_SIZE = 32
18   
19 END MODULE MODD_PARAM