MODULE MetSCIparam_fd

  SAVE
  
  INTEGER, PARAMETER :: SUCCESS =  1
  INTEGER, PARAMETER :: NULL    =  0
  INTEGER, PARAMETER :: FAILURE = -1

  INTEGER, PARAMETER :: NOPATHWAY = 0
  INTEGER, PARAMETER :: JOB       = 1
  INTEGER, PARAMETER :: UPPERAIR  = 2
  INTEGER, PARAMETER :: SURFACE   = 3

  CHARACTER(5), PARAMETER :: MISSING_C = '-9999'
  INTEGER,      PARAMETER :: MISSING_I = -9999
  REAL,         PARAMETER :: MISSING_R = -9999.
 
END MODULE MetSCIparam_fd