W3FI71
The W3FI71 routine makes a 18, 37, 55, 64, or 91 word integer array
used by w3fi72 grib packer to make the grid descriptioni
section (gds) - section 2.
USAGE: CALL W3FI71 (IGRID, IGDS, IERR)
Input argument list:
IGRID - GRIB GRID NUMBER, OR OFFICE NOTE 84 GRID NUMBER
Output argument list:
IGDS - 18, 37, 55, 64, OR 91 WORD INTEGER ARRAY WITH
INFORMATION TO MAKE A GRIB GRID DESCRIPTION SECTION.
IERR - 0 CORRECT EXIT
1 GRID TYPE IN IGRID IS NOT IN TABLE
REMARKS:
1) OFFICE NOTE GRID TYPE 26 IS 6 IN GRIB, 26 IS AN
INTERNATIONAL EXCHANGE GRID.
2) VALUES RETURNED IN 18, 37, 55, 64, OR 91 WORD INTEGER ARRAY
IGDS VARY DEPENDING ON GRID REPRESENTATION TYPE.
LAT/LON GRID:
IGDS( 1) = NUMBER OF VERTICAL COORDINATES
IGDS( 2) = PV, PL OR 255
IGDS( 3) = DATA REPRESENTATION TYPE (CODE TABLE 6)
IGDS( 4) = NO. OF POINTS ALONG A LATITUDE
IGDS( 5) = NO. OF POINTS ALONG A LONGITUDE MERIDIAN
IGDS( 6) = LATITUDE OF ORIGIN (SOUTH - IVE)
IGDS( 7) = LONGITUDE OF ORIGIN (WEST -IVE)
IGDS( 8) = RESOLUTION FLAG (CODE TABLE 7)
IGDS( 9) = LATITUDE OF EXTREME POINT (SOUTH - IVE)
IGDS(10) = LONGITUDE OF EXTREME POINT (WEST - IVE)
IGDS(11) = LATITUDE INCREMENT
IGDS(12) = LONGITUDE INCREMENT
IGDS(13) = SCANNING MODE FLAGS (CODE TABLE 8)
IGDS(14) = ... THROUGH ...
IGDS(18) = ... NOT USED FOR THIS GRID
IGDS(19) - IGDS(91) FOR GRIDS 37-44, NUMBER OF POINTS
IN EACH OF 73 ROWS.
GAUSSIAN GRID:
IGDS( 1) = ... THROUGH ...
IGDS(10) = ... SAME AS LAT/LON GRID
IGDS(11) = NUMBER OF LATITUDE LINES BETWEEN A POLE
AND THE EQUATOR
IGDS(12) = LONGITUDE INCREMENT
IGDS(13) = SCANNING MODE FLAGS (CODE TABLE 8)
IGDS(14) = ... THROUGH ...
IGDS(18) = ... NOT USED FOR THIS GRID
SPHERICAL HARMONICS:
IGDS( 1) = NUMBER OF VERTICAL COORDINATES
IGDS( 2) = PV, PL OR 255
IGDS( 3) = DATA REPRESENTATION TYPE (CODE TABLE 6)
IGDS( 4) = J - PENTAGONAL RESOLUTION PARAMETER
IGDS( 5) = K - PENTAGONAL RESOLUTION PARAMETER
IGDS( 6) = M - PENTAGONAL RESOLUTION PARAMETER
IGDS( 7) = REPRESENTATION TYPE (CODE TABLE 9)
IGDS( 8) = REPRESENTATION MODE (CODE TABLE 10)
IGDS( 9) = ... THROUGH ...
IGDS(18) = ... NOT USED FOR THIS GRID
POLAR STEREOGRAPHIC:
IGDS( 1) = NUMBER OF VERTICAL COORDINATES
IGDS( 2) = PV, PL OR 255
IGDS( 3) = DATA REPRESENTATION TYPE (CODE TABLE 6)
IGDS( 4) = NO. OF POINTS ALONG X-AXIS
IGDS( 5) = NO. OF POINTS ALONG Y-AXIS
IGDS( 6) = LATITUDE OF ORIGIN (SOUTH -IVE)
IGDS( 7) = LONGITUTE OF ORIGIN (WEST -IVE)
IGDS( 8) = RESOLUTION FLAG (CODE TABLE 7)
IGDS( 9) = LONGITUDE OF MERIDIAN PARALLEL TO Y-AXIS
IGDS(10) = X-DIRECTION GRID LENGTH (INCREMENT)
IGDS(11) = Y-DIRECTION GRID LENGTH (INCREMENT)
IGDS(12) = PROJECTION CENTER FLAG (0=NORTH POLE ON PLANE,
1=SOUTH POLE ON PLANE,
IGDS(13) = SCANNING MODE FLAGS (CODE TABLE 8)
IGDS(14) = ... THROUGH ...
IGDS(18) = .. NOT USED FOR THIS GRID
MERCATOR:
IGDS( 1) = ... THROUGH ...
IGDS(12) = ... SAME AS LAT/LON GRID
IGDS(13) = LATITUDE AT WHICH PROJECTION CYLINDER
INTERSECTS EARTH
IGDS(14) = SCANNING MODE FLAGS
IGDS(15) = ... THROUGH ...
IGDS(18) = .. NOT USED FOR THIS GRID
LAMBERT CONFORMAL:
IGDS( 1) = NUMBER OF VERTICAL COORDINATES
IGDS( 2) = PV, PL OR 255
IGDS( 3) = DATA REPRESENTATION TYPE (CODE TABLE 6)
IGDS( 4) = NO. OF POINTS ALONG X-AXIS
IGDS( 5) = NO. OF POINTS ALONG Y-AXIS
IGDS( 6) = LATITUDE OF ORIGIN (SOUTH -IVE)
IGDS( 7) = LONGITUTE OF ORIGIN (WEST -IVE)
IGDS( 8) = RESOLUTION FLAG (CODE TABLE 7)
IGDS( 9) = LONGITUDE OF MERIDIAN PARALLEL TO Y-AXIS
IGDS(10) = X-DIRECTION GRID LENGTH (INCREMENT)
IGDS(11) = Y-DIRECTION GRID LENGTH (INCREMENT)
IGDS(12) = PROJECTION CENTER FLAG (0=NORTH POLE ON PLANE,
1=SOUTH POLE ON PLANE,
IGDS(13) = SCANNING MODE FLAGS (CODE TABLE 8)
IGDS(14) = NOT USED
IGDS(15) = FIRST LATITUDE FROM THE POLE AT WHICH THE
SECANT CONE CUTS THE SPERICAL EARTH
IGDS(16) = SECOND LATITUDE ...
IGDS(17) = LATITUDE OF SOUTH POLE (MILLIDEGREES)
IGDS(18) = LONGITUDE OF SOUTH POLE (MILLIDEGREES)
ARAKAWA SEMI-STAGGERED E-GRID ON ROTATED LAT/LON GRID
IGDS( 1) = NUMBER OF VERTICAL COORDINATES
IGDS( 2) = PV, PL OR 255
IGDS( 3) = DATA REPRESENTATION TYPE (CODE TABLE 6) [201]
IGDS( 4) = NI - TOTAL NUMBER OF ACTUAL DATA POINTS
INCLUDED ON GRID
IGDS( 5) = NJ - DUMMY SECOND DIMENSION; SET=1
IGDS( 6) = LA1 - LATITUDE OF FIRST GRID POINT
IGDS( 7) = LO1 - LONGITUDE OF FIRST GRID POINT
IGDS( 8) = RESOLUTION AND COMPONENT FLAG (CODE TABLE 7)
IGDS( 9) = LA2 - NUMBER OF MASS POINTS ALONG
SOUTHERNMOST ROW OF GRID
IGDS(10) = LO2 - NUMBER OF ROWS IN EACH COLUMN
IGDS(11) = DI - LONGITUDINAL DIRECTION INCREMENT
IGDS(12) = DJ - LATITUDINAL DIRECTION INCREMENT
IGDS(13) = SCANNING MODE FLAGS (CODE TABLE 8)
IGDS(14) = ... THROUGH ...
IGDS(18) = ... NOT USED FOR THIS GRID (SET TO ZERO)
ARAKAWA FILLED E-GRID ON ROTATED LAT/LON GRID
IGDS( 1) = NUMBER OF VERTICAL COORDINATES
IGDS( 2) = PV, PL OR 255
IGDS( 3) = DATA REPRESENTATION TYPE (CODE TABLE 6) [202]
IGDS( 4) = NI - TOTAL NUMBER OF ACTUAL DATA POINTS
INCLUDED ON GRID
IGDS( 5) = NJ - DUMMY SECOND DIMENTION; SET=1
IGDS( 6) = LA1 - LATITUDE LATITUDE OF FIRST GRID POINT
IGDS( 7) = LO1 - LONGITUDE OF FIRST GRID POINT
IGDS( 8) = RESOLUTION AND COMPONENT FLAG (CODE TABLE 7)
IGDS( 9) = LA2 - NUMBER OF (ZONAL) POINTS IN EACH ROW
IGDS(10) = LO2 - NUMBER OF (MERIDIONAL) POINTS IN EACH
COLUMN
IGDS(11) = DI - LONGITUDINAL DIRECTION INCREMENT
IGDS(12) = DJ - LATITUDINAL DIRECTION INCREMENT
IGDS(13) = SCANNING MODE FLAGS (CODE TABLE 8)
IGDS(14) = ... THROUGH ...
IGDS(18) = ... NOT USED FOR THIS GRID
ARAKAWA STAGGERED E-GRID ON ROTATED LAT/LON GRID
IGDS( 1) = NUMBER OF VERTICAL COORDINATES
IGDS( 2) = PV, PL OR 255
IGDS( 3) = DATA REPRESENTATION TYPE (CODE TABLE 6) [203]
IGDS( 4) = NI - NUMBER OF DATA POINTS IN EACH ROW
IGDS( 5) = NJ - NUMBER OF ROWS
IGDS( 6) = LA1 - LATITUDE OF FIRST GRID POINT
IGDS( 7) = LO1 - LONGITUDE OF FIRST GRID POINT
IGDS( 8) = RESOLUTION AND COMPONENT FLAG (CODE TABLE 7)
IGDS( 9) = LA2 - CENTRAL LATITUDE
IGDS(10) = LO2 - CENTRAL LONGTITUDE
IGDS(11) = DI - LONGITUDINAL DIRECTION INCREMENT
IGDS(12) = DJ - LATITUDINAL DIRECTION INCREMENT
IGDS(13) = SCANNING MODE FLAGS (CODE TABLE 8)
IGDS(14) = ... THROUGH ...
IGDS(18) = ... NOT USED FOR THIS GRID
W3lib.tar |
Library contains Fortran 90 decoder/encoder
routines for GRIB edition 1. (Fortran90)
Date posted: 2/22/2007 |