W3FP04

The W3FP04 routine prints array of data points at their 
           approximate latitude/longitude positions on a
           polar stereographic projection.

USAGE: CALL W3FP04(IFLD,ALAT,ALON,TITLE,IDIM,CMIL,CMIR,CMJB,CMJT,
                   INUM,XFAC,IERR)

   Input variables:
      IFLD     REAL OR INTEGER FULLWORD ARRAY OF DATA POINTS
      ALAT     REAL ARRAY OF LATITUDE POSITIONS (>0 FOR NH,
               <0 FOR SH) FOR THE DATA TO BE PLOTTED
      ALON     REAL ARRAY OF LONGITUDES (WEST OF GREENWICH)
      TITLE    INTEGER SIZE 10 ALPHANUMERIC ARRAY OF
               CHARACTERS FOR TITLE TO BE WRITTEN ON PRINTOUT
      IDIM     INTEGER NUMBER OF DATA VALUES TO PLOT (SIZE OF
               ARRAYS IFLD, ALAT AND ALON)
      CMIL     REAL LEFT SIDE OF GRID - MINIMUM COARSE MESH
               I COORDINATE (MINIMUM VALUE OF 1.0)
      CMIR     REAL RIGHT SIDE OF GRID - MAXIMUM COARSE MESH
               I COORDINATE (MAXIMUM VALUE OF 65.0)
      CMJB     REAL BOTTOM OF GRID - MINIMUM COARSE MESH
               J COORDINATE (MINIMUM VALUE OF 1.0)
      CMJT     REAL TOP OF GRID - MAXIMUM COARSE MESH J
               COORDINATE (MAXIMUM VALUE OF 65.0)
      INUM     INTEGER THREE DIGIT NUMBER FOR THE FOLLOWING:
                       HUNDREDS DIGIT = TYPE OF DATA
                         1 = FIXED POINT
                         2 = FLOATING POINT
                         3 = ALPHANUMERIC
                       TENS DIGIT = HEMISPHERIC REFERENCE
                         0 = NORTHERN HEMISPHERE
                         1 = SOUTHERN HEMISPHERE
                       UNITS DIGIT = NUMBER OF CHARACTERS TO PLOT
                       MINIMUM = 1 CHARACTER
                       MAXIMUM = 4 CHARACTERS
      XFAC     REAL MAP SCALE FACTOR (DESIRED MAP SCALE = XFAC
                * 1:30,000,000 (STANDARD NMC 65X65 GRID SCALE))

   Output variables:
      TAPE6     PRINTED MAP WHEN EXECUTION IS SUCCESSFUL
      IERR      INTEGER RETURN CODE
 
REMARKS:
        BECAUSE THIS CODE COULD PRODUCE CONSIDERABLE OUTPUT
        THE SUBSET OF THE NMC 65X65 GRID WHICH CAN BE PRINTED IS A
        FUNCTION OF THE MAP SCALE FACTOR, E.G. FOR XFAC=5 THE MAXIMUM
        RANGE OF I AND J IS 27.0, FOR XFAC=2 THE RANGE IS 64.0.

 
W3lib.tar Library contains Fortran 90 decoder/encoder routines for GRIB edition 1. (Fortran90)
Date posted: 2/22/2007