core
/
eccodes
mirror of https://github.com/ecmwf/eccodes.git
1
0
Fork 0
Code Issues Packages Projects Releases Wiki Activity

Move MISSING_ values from constants to main file. The constants are error codes

This commit is contained in:
Shahram Najm 2015-12-30 18:43:48 +00:00
parent f6368eb56e
commit 7f125d09af
4 changed files with 7 additions and 4 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

2
fortran/eccodes_constants.h
View File

@ -65,5 +65,3 @@
integer, parameter,public :: CODES_END_OF_FILE = -1
integer, parameter,public :: CODES_SUCCESS = 0
integer, parameter,public :: CODES_NULL = -1
real(8), parameter,public :: CODES_MISSING_DOUBLE = -1.D+100
integer(4), parameter,public :: CODES_MISSING_LONG = 2147483647

3
fortran/eccodes_f90_head.f90
View File

@ -17,6 +17,9 @@ module eccodes
include "eccodes_constants.h"
include "eccodes_visibility.h"
real(8), parameter,public :: CODES_MISSING_DOUBLE = -1.D+100
integer(4), parameter,public :: CODES_MISSING_LONG = 2147483647
integer, parameter,public :: CODES_PRODUCT_ANY = 0
integer, parameter,public :: CODES_PRODUCT_GRIB = 1
integer, parameter,public :: CODES_PRODUCT_BUFR = 2

2
fortran/grib_api_constants.h
View File

@ -65,5 +65,3 @@
integer, parameter,public :: GRIB_END_OF_FILE = -1
integer, parameter,public :: GRIB_SUCCESS = 0
integer, parameter,public :: GRIB_NULL = -1
real(8), parameter,public :: GRIB_MISSING_DOUBLE = -1.D+100
integer(4), parameter,public :: GRIB_MISSING_LONG = 2147483647

4
fortran/grib_f90_head.f90
View File

@ -18,6 +18,10 @@ module grib_api
include "grib_api_externals.h"
include "grib_api_visibility.h"
real(8), parameter,public :: GRIB_MISSING_DOUBLE = -1.D+100
integer(4), parameter,public :: GRIB_MISSING_LONG = 2147483647
!> Create a new message in memory from an integer or character array containting the coded message.
!>
!> The message can be accessed through its gribid and it will be available\n