📄 grib1.doc
字号:
C (20) - OCTET NUMBER OF THE LIST OF VERTICAL COORDINATEC PARAMETERSC ORC OCTET NUMBER OF THE LIST OF NUMBERS OF POINTSC IN EACH ROWC ORC 255 IF NEITHER ARE PRESENTC (21) - FOR GRIDS WITH PL, NUMBER OF POINTS IN GRIDC (22) - NUMBER OF WORDS IN EACH ROWC LATITUDE/LONGITUDE GRIDSC (2) - N(I) NR POINTS ON LATITUDE CIRCLEC (3) - N(J) NR POINTS ON LONGITUDE MERIDIANC (4) - LA(1) LATITUDE OF ORIGINC (5) - LO(1) LONGITUDE OF ORIGINC (6) - RESOLUTION FLAG (RIGHT ADJ COPY OF OCTET 17)C (7) - LA(2) LATITUDE OF EXTREME POINTC (8) - LO(2) LONGITUDE OF EXTREME POINTC (9) - DI LONGITUDINAL DIRECTION OF INCREMENTC (10) - DJ LATITUDINAL DIRECTION INCREMENTC (11) - SCANNING MODE FLAG (RIGHT ADJ COPY OF OCTET 28)C GAUSSIAN GRIDSC (2) - N(I) NR POINTS ON LATITUDE CIRCLEC (3) - N(J) NR POINTS ON LONGITUDE MERIDIANC (4) - LA(1) LATITUDE OF ORIGINC (5) - LO(1) LONGITUDE OF ORIGINC (6) - RESOLUTION FLAG (RIGHT ADJ COPY OF OCTET 17)C (7) - LA(2) LATITUDE OF EXTREME POINTC (8) - LO(2) LONGITUDE OF EXTREME POINTC (9) - DI LONGITUDINAL DIRECTION OF INCREMENTC (10) - N - NR OF CIRCLES POLE TO EQUATORC (11) - SCANNING MODE FLAG (RIGHT ADJ COPY OF OCTET 28)C (12) - NV - NR OF VERT COORD PARAMETERSC (13) - PV - OCTET NR OF LIST OF VERT COORD PARAMETERSC ORC PL - LOCATION OF THE LIST OF NUMBERS OF POINTS INC EACH ROW (IF NO VERT COORD PARAMETERSC ARE PRESENTC ORC 255 IF NEITHER ARE PRESENTC POLAR STEREOGRAPHIC GRIDSC (2) - N(I) NR POINTS ALONG LAT CIRCLEC (3) - N(J) NR POINTS ALONG LON CIRCLEC (4) - LA(1) LATITUDE OF ORIGINC (5) - LO(1) LONGITUDE OF ORIGINC (6) - RESOLUTION FLAG (RIGHT ADJ COPY OF OCTET 17)C (7) - LOV GRID ORIENTATIONC (8) - DX - X DIRECTION INCREMENTC (9) - DY - Y DIRECTION INCREMENTC (10) - PROJECTION CENTER FLAGC (11) - SCANNING MODE (RIGHT ADJ COPY OF OCTET 28)C SPHERICAL HARMONIC COEFFICIENTSC (2) - J PENTAGONAL RESOLUTION PARAMETERC (3) - K " " "C (4) - M " " "C (5) - REPRESENTATION TYPEC (6) - COEFFICIENT STORAGE MODEC MERCATOR GRIDSC (2) - N(I) NR POINTS ON LATITUDE CIRCLEC (3) - N(J) NR POINTS ON LONGITUDE MERIDIANC (4) - LA(1) LATITUDE OF ORIGINC (5) - LO(1) LONGITUDE OF ORIGINC (6) - RESOLUTION FLAG (RIGHT ADJ COPY OF OCTET 17)C (7) - LA(2) LATITUDE OF LAST GRID POINTC (8) - LO(2) LONGITUDE OF LAST GRID POINTC (9) - LATIT - LATITUDE OF PROJECTION INTERSECTIONC (10) - RESERVEDC (11) - SCANNING MODE FLAG (RIGHT ADJ COPY OF OCTET 28)C (12) - LONGITUDINAL DIR GRID LENGTHC (13) - LATITUDINAL DIR GRID LENGTHC LAMBERT CONFORMAL GRIDSC (2) - NX NR POINTS ALONG X-AXISC (3) - NY NR POINTS ALONG Y-AXISC (4) - LA1 LAT OF ORIGIN (LOWER LEFT)C (5) - LO1 LON OF ORIGIN (LOWER LEFT)C (6) - RESOLUTION (RIGHT ADJ COPY OF OCTET 17)C (7) - LOV - ORIENTATION OF GRIDC (8) - DX - X-DIR INCREMENTC (9) - DY - Y-DIR INCREMENTC (10) - PROJECTION CENTER FLAGC (11) - SCANNING MODE FLAG (RIGHT ADJ COPY OF OCTET 28)C (12) - LATIN 1 - FIRST LAT FROM POLE OF SECANT CONE INTERC (13) - LATIN 2 - SECOND LAT FROM POLE OF SECANT CONE INTERC STAGGERED ARAKAWA ROTATED LAT/LON GRIDS (TYPE 203)C (2) - N(I) NR POINTS ON LATITUDE CIRCLEC (3) - N(J) NR POINTS ON LONGITUDE MERIDIANC (4) - LA(1) LATITUDE OF ORIGINC (5) - LO(1) LONGITUDE OF ORIGINC (6) - RESOLUTION FLAG (RIGHT ADJ COPY OF OCTET 17)C (7) - LA(2) LATITUDE OF CENTERC (8) - LO(2) LONGITUDE OF CENTERC (9) - DI LONGITUDINAL DIRECTION OF INCREMENTC (10) - DJ LATITUDINAL DIRECTION INCREMENTC (11) - SCANNING MODE FLAG (RIGHT ADJ COPY OF OCTET 28)C KBMS - BITMAP DESCRIBING LOCATION OF OUTPUT ELEMENTS.C (ALWAYS CONSTRUCTED)C KPTR - ARRAY CONTAINING STORAGE FOR FOLLOWING PARAMETERSC (1) - TOTAL LENGTH OF GRIB MESSAGEC (2) - LENGTH OF INDICATOR (SECTION 0)C (3) - LENGTH OF PDS (SECTION 1)C (4) - LENGTH OF GDS (SECTION 2)C (5) - LENGTH OF BMS (SECTION 3)C (6) - LENGTH OF BDS (SECTION 4)C (7) - VALUE OF CURRENT BYTEC (8) - BIT POINTERC (9) - GRIB START BIT NRC (10) - GRIB/GRID ELEMENT COUNTC (11) - NR UNUSED BITS AT END OF SECTION 3C (12) - BIT MAP FLAG (COPY OF BMS OCTETS 5,6)C (13) - NR UNUSED BITS AT END OF SECTION 2C (14) - BDS FLAGS (RIGHT ADJ COPY OF OCTET 4)C (15) - NR UNUSED BITS AT END OF SECTION 4C (16) - RESERVEDC (17) - RESERVEDC (18) - RESERVEDC (19) - BINARY SCALE FACTORC (20) - NUM BITS USED TO PACK EACH DATUMC KRET - FLAG INDICATING QUALITY OF COMPLETIONCC REMARKS: WHEN DECODING IS COMPLETED, DATA AT EACH GRID POINT HAS BEENC RETURNED IN THE UNITS SPECIFIED IN THE GRIB MANUAL.CC VALUES FOR RETURN FLAG (KRET)C KRET = 0 - NORMAL RETURN, NO ERRORSC = 1 - 'GRIB' NOT FOUND IN FIRST 100 CHARSC = 2 - '7777' NOT IN CORRECT LOCATIONC = 3 - UNPACKED FIELD IS LARGER THAN 260000C = 4 - GDS/ GRID NOT ONE OF CURRENTLY ACCEPTED VALUESC = 5 - GRID NOT CURRENTLY AVAIL FOR CENTER INDICATEDC = 8 - TEMP GDS INDICATED, BUT GDS FLAG IS OFFC = 9 - GDS INDICATES SIZE MISMATCH WITH STD GRIDC =10 - INCORRECT CENTER INDICATORC =11 - BINARY DATA SECTION (BDS) NOT COMPLETELY PROCESSED.C PROGRAM IS NOT SET TO PROCESS FLAG COMBINATIONSC SHOWN IN OCTETS 4 AND 14.C =12 - BINARY DATA SECTION (BDS) NOT COMPLETELY PROCESSED.C PROGRAM IS NOT SET TO PROCESS FLAG COMBINATIONSCC SUBPROGRAM CAN BE CALLED FROM A MULTIPROCESSING ENVIRONMENT.CC ATTRIBUTES:C LANGUAGE: FORTRAN 90CC$$$C 4 AUG 1988C W3FI63CCC GRIB UNPACKING ROUTINECCC THIS ROUTINE WILL UNPACK A 'GRIB' FIELD TO THE EXACT GRIDC TYPE SPECIFIED IN THE MESSAGE, RETURN A BIT MAP AND MAKE THEC VALUES OF THE PRODUCT DEFINITION SEC (PDS) AND THE GRIDC DESCRIPTION SEC (GDS) AVAILABLE IN RETURN ARRAYS.C SEE "GRIB - THE WMO FORMAT FOR THE STORAGE OF WEATHER PRODUCTC INFORMATION AND THE EXCHANGE OF WEATHER PRODUCT MESSAGES INC GRIDDED BINARY FORM" DATED JULY 1, 1988 BY JOHN D. STACKPOLEC DOC, NOAA, NWS, NATIONAL METEOROLOGICAL CENTER.CC THE CALL TO THE GRIB UNPACKING ROUTINE IS AS FOLLOWS:CC CALL W3FI63(MSGA,KPDS,KGDS,LBMS,DATA,KPTR,KRET)CC INPUT:CC MSGA = CONTAINS THE GRIB MESSAGE TO BE UNPACKED. CHARACTERSC "GRIB" MAY BEGIN ANYWHERE WITHIN FIRST 100 BYTES.CC OUTPUT:CC KPDS(100) INTEGER*4C ARRAY TO CONTAIN THE ELEMENTS OF THE PRODUCTC DEFINITION SEC .C (VERSION 1)C KPDS(1) - ID OF CENTERC KPDS(2) - MODEL IDENTIFICATION (SEE "GRIB" TABLE 1)C KPDS(3) - GRID IDENTIFICATION (SEE "GRIB" TABLE 2)C KPDS(4) - GDS/BMS FLAGC BIT DEFINITIONC 25 0 - GDS OMITTEDC 1 - GDS INCLUDEDC 26 0 - BMS OMITTEDC 1 - BMS INCLUDEDC NOTE:- LEFTMOST BIT = 1,C RIGHTMOST BIT = 32C KPDS(5) - INDICATOR OF PARAMETER (SEE "GRIB" TABLE 5)C KPDS(6) - TYPE OF LEVEL (SEE "GRIB" TABLES 6 & 7)C KPDS(7) - HEIGHT,PRESSURE,ETC OF LEVELC KPDS(8) - YEAR INCLUDING CENTURYC KPDS(9) - MONTH OF YEARC KPDS(10) - DAY OF MONTHC KPDS(11) - HOUR OF DAYC KPDS(12) - MINUTE OF HOURC KPDS(13) - INDICATOR OF FORECAST TIME UNIT (SEE "GRIB"C TABLE 8)C KPDS(14) - TIME 1 (SEE "GRIB" TABLE 8A)C KPDS(15) - TIME 2 (SEE "GRIB" TABLE 8A)C KPDS(16) - TIME RANGE INDICATOR (SEE "GRIB" TABLE 8A)C KPDS(17) - NUMBER INCLUDED IN AVERAGEC KPDS(18) - EDITION NR OF GRIB SPECIFICATIONC KPDS(19) - VERSION NR OF PARAMETER TABLECC KGDS(13) INTEGER*4C ARRAY CONTAINING GDS ELEMENTS.CC KGDS(1) - DATA REPRESENTATION TYPECC LATITUDE/LONGITUDE GRIDS (SEE "GRIB" TABLE 10)C KGDS(2) - N(I) NUMBER OF POINTS ON LATITUDEC CIRCLEC KGDS(3) - N(J) NUMBER OF POINTS ON LONGITUDEC CIRCLEC KGDS(4) - LA(1) LATITUDE OF ORIGINC KGDS(5) - LO(1) LONGITUDE OF ORIGINC KGDS(6) - RESOLUTION FLAGC BIT MEANINGC 25 0 - DIRECTION INCREMENTS NOTC GIVENC 1 - DIRECTION INCREMENTS GIVENC KGDS(7) - LA(2) LATITUDE OF EXTREME POINTC KGDS(8) - LO(2) LONGITUDE OF EXTREME POINTC KGDS(9) - DI LONGITUDINAL DIRECTION INCREMENTC KGDS(10) - REGULAR LAT/LON GRIDC DJ - LATITUDINAL DIRECTIONC INCREMENTC GAUSSIAN GRIDC N - NUMBER OF LATITUDE CIRCLESC BETWEEN A POLE AND THE EQUATORC KGDS(11) - SCANNING MODE FLAGC BIT MEANINGC 25 0 - POINTS ALONG A LATITUDEC SCAN FROM WEST TO EASTC 1 - POINTS ALONG A LATITUDEC SCAN FROM EAST TO WESTC 26 0 - POINTS ALONG A MERIDIANC SCAN FROM NORTH TO SOUTHC 1 - POINTS ALONG A MERIDIANC SCAN FROM SOUTH TO NORTHC 27 0 - POINTS SCAN FIRST ALONGC CIRCLES OF LATITUDE, THENC ALONG MERIDIANSC (FORTRAN: (I,J))C 1 - POINTS SCAN FIRST ALONGC MERIDIANS THEN ALONGC CIRCLES OF LATITUDEC (FORTRAN: (J,I))CC POLAR STEREOGRAPHIC GRIDS (SEE GRIB TABLE 12)C KGDS(2) - N(I) NR POINTS ALONG LAT CIRCLEC KGDS(3) - N(J) NR POINTS ALONG LON CIRCLEC KGDS(4) - LA(1) LATITUDE OF ORIGINC KGDS(5) - LO(1) LONGITUDE OF ORIGINC KGDS(6) - RESERVEDC KGDS(7) - LOV GRID ORIENTATIONC KGDS(8) - DX - X DIRECTION INCREMENTC KGDS(9) - DY - Y DIRECTION INCREMENTC KGDS(10) - PROJECTION CENTER FLAGC KGDS(11) - SCANNING MODECC SPHERICAL HARMONIC COEFFICIENTS (SEE "GRIB" TABLE 14)C KGDS(2) - J PENTAGONAL RESOLUTION PARAMETERC KGDS(3) - K PENTAGONAL RESOLUTION PARAMETERC KGDS(4) - M PENTAGONAL RESOLUTION PARAMETERC KGDS(5) - REPRESENTATION TYPEC KGDS(6) - COEFFICIENT STORAGE MODECC MERCATOR GRIDSC KGDS(2) - N(I) NR POINTS ON LATITUDE CIRCLEC KGDS(3) - N(J) NR POINTS ON LONGITUDE MERIDIANC KGDS(4) - LA(1) LATITUDE OF ORIGINC KGDS(5) - LO(1) LONGITUDE OF ORIGINC KGDS(6) - RESOLUTION FLAGC KGDS(7) - LA(2) LATITUDE OF LAST GRID POINTC KGDS(8) - LO(2) LONGITUDE OF LAST GRID POINTC KGDS(9) - LATIN - LATITUDE OF PROJECTION INTERSECTIONC KGDS(10) - RESERVEDC KGDS(11) - SCANNING MODE FLAGC KGDS(12) - LONGITUDINAL DIR GRID LENGTHC KGDS(13) - LATITUDINAL DIR GRID LENGTHC LAMBERT CONFORMAL GRIDSC KGDS(2) - NX NR POINTS ALONG X-AXISC KGDS(3) - NY NR POINTS ALONG Y-AXISC KGDS(4) - LA1 LAT OF ORIGIN (LOWER LEFT)C KGDS(5) - LO1 LON OF ORIGIN (LOWER LEFT)C KGDS(6) - RESOLUTION (RIGHT ADJ COPY OF OCTET 17)C KGDS(7) - LOV - ORIENTATION OF GRIDC KGDS(8) - DX - X-DIR INCREMENTC KGDS(9) - DY - Y-DIR INCREMENTC KGDS(10) - PROJECTION CENTER FLAGC KGDS(11) - SCANNING MODE FLAGC KGDS(12) - LATIN 1 - FIRST LAT FROM POLE OFC SECANT CONE INTERSECTIONC KGDS(13) - LATIN 2 - SECOND LAT FROM POLE OFC SECANT CONE INTERSECTIONCC LBMS(*) LOGICALC ARRAY TO CONTAIN THE BIT MAP DESCRIBING THEC PLACEMENT OF DATA IN THE OUTPUT ARRAY. IF AC BIT MAP IS NOT INCLUDED IN THE SOURCE MESSAGE,C ONE WILL BE GENERATED AUTOMATICALLY BY THEC UNPACKING ROUTINE.CCC DATA(*) REAL*4C THIS ARRAY WILL CONTAIN THE UNPACKED DATA POINTS.CC NOTE:- 65160 IS MAXIMUN FIELD SIZE ALLOWABLECC KPTR(10) INTEGER*4C ARRAY CONTAINING STORAGE FOR THE FOLLOWINGC PARAMETERS.CC (1) - UNUSEDC (2) - UNUSEDC (3) - LENGTH OF PDS (IN BYTES)C (4) - LENGTH OF GDS (IN BYTES)C (5) - LENGTH OF BMS (IN BYTES)C (6) - LENGTH OF BDS (IN BYTES)C (7) - USED BY UNPACKING ROUTINEC (8) - NUMBER OF DATA POINTS FOR GRIDC (9) - "GRIB" CHARACTERS START IN BYTE NUMBERC (10) - USED BY UNPACKING ROUTINECCC KRET INTEGER*4C THIS VARIABLE WILL CONTAIN THE RETURN INDICATOR.CC 0 - NO ERRORS DETECTED.CC 1 - 'GRIB' NOT FOUND IN FIRST 100C CHARACTERS.⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -