include file: wrf_status_codes.h 13
  
!WRF Error and Warning messages (1-999)
!All i/o package-specific status codes you may want to add must be handled by your package (see below)
! WRF handles these and netCDF messages only
  integer, parameter  :: WRF_NO_ERR                  =  0       !no error
  integer, parameter  :: WRF_WARN_FILE_NF            = -1	!file not found, or incomplete
  integer, parameter  :: WRF_WARN_MD_NF              = -2	!metadata not found
  integer, parameter  :: WRF_WARN_TIME_NF            = -3	!timestamp not found
  integer, parameter  :: WRF_WARN_TIME_EOF           = -4	!no more timestamps
  integer, parameter  :: WRF_WARN_VAR_NF             = -5	!variable not found
  integer, parameter  :: WRF_WARN_VAR_EOF            = -6	!no more variables for the current time
  integer, parameter  :: WRF_WARN_TOO_MANY_FILES     = -7	!too many open files
  integer, parameter  :: WRF_WARN_TYPE_MISMATCH      = -8	!data type mismatch
  integer, parameter  :: WRF_WARN_WRITE_RONLY_FILE   = -9	!attempt to write readonly file
  integer, parameter  :: WRF_WARN_READ_WONLY_FILE    = -10	!attempt to read writeonly file
  integer, parameter  :: WRF_WARN_FILE_NOT_OPENED    = -11	!attempt to access unopened file
  integer, parameter  :: WRF_WARN_2DRYRUNS_1VARIABLE = -12	!attempt to do 2 trainings for 1 variable
  integer, parameter  :: WRF_WARN_READ_PAST_EOF      = -13	!attempt to read past EOF
  integer, parameter  :: WRF_WARN_BAD_DATA_HANDLE    = -14	!bad data handle
  integer, parameter  :: WRF_WARN_WRTLEN_NE_DRRUNLEN = -15	!write length not equal to training length
  integer, parameter  :: WRF_WARN_TOO_MANY_DIMS      = -16	!more dimensions requested than training
  integer, parameter  :: WRF_WARN_COUNT_TOO_LONG     = -17	!attempt to read more data than exists
  integer, parameter  :: WRF_WARN_DIMENSION_ERROR    = -18	!input dimension inconsistent
  integer, parameter  :: WRF_WARN_BAD_MEMORYORDER    = -19	!input MemoryOrder not recognized
  integer, parameter  :: WRF_WARN_DIMNAME_REDEFINED  = -20	!a dimension name with 2 different lengths
  integer, parameter  :: WRF_WARN_CHARSTR_GT_LENDATA = -21	!string longer than provided storage
  integer, parameter  :: WRF_WARN_NOTSUPPORTED       = -22	!function not supportable
  integer, parameter  :: WRF_WARN_NOOP	             = -23   	!package implements this routine as NOOP

!Fatal errors 
  integer, parameter  :: WRF_ERR_FATAL_ALLOCATION_ERROR  = -100	!allocation error
  integer, parameter  :: WRF_ERR_FATAL_DEALLOCATION_ERR  = -101	!dealloc error
  integer, parameter  :: WRF_ERR_FATAL_BAD_FILE_STATUS   = -102	!bad file status


!Package specific errors (1000+)	
!Netcdf status codes
!WRF will accept status codes of 1000+, but it is up to the package to handle
! and return the status to the user.

  integer, parameter  :: WRF_ERR_FATAL_BAD_VARIABLE_DIM  = -1004
  integer, parameter  :: WRF_ERR_FATAL_MDVAR_DIM_NOT_1D  = -1005
  integer, parameter  :: WRF_ERR_FATAL_TOO_MANY_TIMES    = -1006
  integer, parameter  :: WRF_WARN_BAD_DATA_TYPE      = -1007    !this code not in either spec?
  integer, parameter  :: WRF_WARN_FILE_NOT_COMMITTED = -1008    !this code not in either spec?
  integer, parameter  :: WRF_WARN_FILE_OPEN_FOR_READ = -1009
  integer, parameter  :: WRF_IO_NOT_INITIALIZED      = -1010
  integer, parameter  :: WRF_WARN_MD_AFTER_OPEN      = -1011
  integer, parameter  :: WRF_WARN_TOO_MANY_VARIABLES = -1012
  integer, parameter  :: WRF_WARN_DRYRUN_CLOSE       = -1013
  integer, parameter  :: WRF_WARN_DATESTR_BAD_LENGTH = -1014
  integer, parameter  :: WRF_WARN_ZERO_LENGTH_READ   = -1015
  integer, parameter  :: WRF_WARN_DATA_TYPE_NOT_FOUND = -1016
  integer, parameter  :: WRF_WARN_DATESTR_ERROR      = -1017
  integer, parameter  :: WRF_WARN_DRYRUN_READ        = -1018
  integer, parameter  :: WRF_WARN_ZERO_LENGTH_GET    = -1019
  integer, parameter  :: WRF_WARN_ZERO_LENGTH_PUT    = -1020
  integer, parameter  :: WRF_WARN_NETCDF             = -1021 	
  integer, parameter  :: WRF_WARN_LENGTH_LESS_THAN_1 = -1022	
  integer, parameter  :: WRF_WARN_MORE_DATA_IN_FILE  = -1023	
  integer, parameter  :: WRF_WARN_DATE_LT_LAST_DATE  = -1024