Add the Fortran grib_dump call

This commit is contained in:
Shahram Najm 2015-10-02 17:03:26 +01:00
parent 51cd22c0c4
commit b6b84114f0
2 changed files with 2 additions and 0 deletions

View File

@ -36,6 +36,7 @@ character(len=9) :: typicalDate
! get and print some keys form the BUFR header
write(*,*) 'message: ',count
call codes_dump(ibufr)
! we need to instruct ecCodes to expand all the descriptors
! i.e. unpack the data values

View File

@ -39,6 +39,7 @@ program grib_get_keys
LOOP: DO WHILE (iret /= CODES_END_OF_FILE)
call grib_dump(igrib)
!check if the value of the key is MISSING
is_missing=0;
call codes_is_missing(igrib,'Ni',is_missing);