W3FP13
The W3FP13 routine converts grib version 1 formatted
product definition section to an Office Note
84 id label.
USAGE: CALL W3FP13 (GRIB, PDS, ID8, IERR )
Input argument list:
GRIB - GRIB SECTION 0 READ AS CHARACTER*8
PDS - GRIB PDS SECTION 1 READ AS CHARACTER*1 PDS(*)
Output argument list: (INCLUDING WORK ARRAYS)
ID8 - 12 INTEGER*4 FORMATTED O.N. 84 ID.
6 INTEGER 64 BIT WORDS ON CRAY
IERR 0 - COMPLETED SATISFACTORILY
1 - GRIB BLOCK 0 NOT CORRECT
2 - LENGTH OF PDS NOT CORRECT
3 - COULD NOT MATCH TYPE INDICATOR
4 - GRID TYPE NOT IN TABLES
5 - COULD NOT MATCH TYPE LEVEL
6 - COULD NOT INTERPRET ORIGINATOR OF CODE
REMARKS:
SOME OF THE ID'S WILL NOT BE EXACT TO THE O.N. 84
FOR LOCATING FIELD ON THE DATASET. THESE DIFFERENCES
ARE MAINLY DUE TO TRUNCATION ERRORS WITH LAYERS.
FOR EXAMPLE: .18019 SIG .47191 SIG R H FOR 36.O HRS
WILL CONVERT TO: .18000 SIG .47000 SIG R H FOR 36.0 HRS
THE ABOVE ID'S NOW FORCED TO BE EXACT
IF J THE WORD COUNT IS GREATER THEN 32743, J IS STORED
IN THE 12TH ID WORD. BITS 16-31 OF THE 8TH ID WORD ARE
SET TO ZERO.
W3lib.tar |
Library contains Fortran 90 decoder/encoder
routines for GRIB edition 1. (Fortran90)
Date posted: 2/22/2007 |