geogrid/src/misc_definitions_module.F

   1 !!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!
   2 ! MODULE MISC_DEFINITIONS_MODULE
   3 !
   4 ! This module defines various non-meteorological constants that are used
   5 !   by other modules for readability.
   6 !
   7 !!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!
   8 module misc_definitions_module
   9
  10    integer, parameter :: MAX_FILENAME_LEN = 1024
  11
  12    real, parameter :: NAN=1.E20
  13
  14    real, parameter :: NOT_MASKED   = -2.,  &
  15                       MASKED_BOTH  = -1.,  &
  16                       MASKED_WATER =  0.,  &
  17                       MASKED_LAND  =  1.
  18
  19    integer, parameter :: OUTSIDE_DOMAIN=1E8, NOT_PROCESSED=1E9, INVALID=1E9
  20
  21    integer, parameter :: SIXTEEN_POINT=1, FOUR_POINT=2, N_NEIGHBOR=3, &
  22                          AVERAGE4=4, AVERAGE16=5, W_AVERAGE4=6, W_AVERAGE16=7, &
  23                          SEARCH=8
  24
  25    integer, parameter :: BOTTOM_TOP=1, TOP_BOTTOM=2
  26
  27    integer, parameter :: CONTINUOUS=0, CATEGORICAL=1, SP_CONTINUOUS=2
  28
  29    integer, parameter :: M=1, U=2, V=3, HH=4, VV=5
  30
  31    integer, parameter :: ONETWOONE=1, SMTHDESMTH=2, SMTHDESMTH_SPECIAL=3
  32
  33    integer, parameter :: BINARY=1, NETCDF=2, GRIB1=3, HDF=4
  34
  35    integer, parameter :: BIG_ENDIAN=0, LITTLE_ENDIAN=1
  36
  37    ! Projection codes for proj_info structure:
  38    INTEGER, PUBLIC, PARAMETER  :: PROJ_LATLON = 0
  39    INTEGER, PUBLIC, PARAMETER  :: PROJ_LC = 1
  40    INTEGER, PUBLIC, PARAMETER  :: PROJ_PS = 2
  41    INTEGER, PUBLIC, PARAMETER  :: PROJ_PS_WGS84 = 102
  42    INTEGER, PUBLIC, PARAMETER  :: PROJ_MERC = 3
  43    INTEGER, PUBLIC, PARAMETER  :: PROJ_GAUSS = 4
  44    INTEGER, PUBLIC, PARAMETER  :: PROJ_CYL = 5
  45    INTEGER, PUBLIC, PARAMETER  :: PROJ_CASSINI = 6
  46    INTEGER, PUBLIC, PARAMETER  :: PROJ_ALBERS_NAD83 = 105
  47    INTEGER, PUBLIC, PARAMETER  :: PROJ_ROTLL = 203
  48
  49 end module misc_definitions_module