CALL SEQUENCE...
       cofaps  SPEC PSGRID INPUT OUTPUT [-lx VAL1 -i VAL3 -d60  VAL5 -nhem VAL7
                                         -ly VAL2 -j VAL4 -dgrw VAL6] 
 
 
      DESCRIPTION...
       cofaps  - CONVERT SPECTRAL HARMONIC FILE TO POLAR STEREOGRAPHIC GRID FILE 
 
 
      AUTHOR   - J.D.Henderson,  Nov 28/80.
      LAST REVISION: $Header: /home/cvs/RMNLIB/utils/rdiag/lspgm/cofaps.ptn,v 4.11 2014/10/16 11:34:03 dugas Exp $
 
 
      PURPOSE  - CONVERTS A FILE OF GLOBAL SPECTRAL HARMONIC FIELDS (SPEC)
                 TO HEMISPHERIC POLAR STEREOGRAPHIC GRIDS (PSFILE).
 
      NOTE     - THERE SHOULD BE ONLY ONE SPECTRAL SIZE IN A GIVEN FILE
 
 
      INPUT FILE...
       SPEC    = INPUT FILE OF GLOBAL SPECTRAL FIELDS
 
      OUTPUT FILE...
       PSGRID  = OUTPUT FILE OF POLAR STEREOGRAPHIC GRIDS
                (EITHER NORTH OR SOUTH HEMISPHERE)
 
 
      INPUT PARAMETERS...
 
       LX,LY = P.S. GRID DIMENSIONS
               IF LX=0 THE DEFAULT VALUES FOR THE GRID DESCRIPTION
               ARE USED. THIS PRODUCES A STANDARD CMC GRID.
               DEFAULT FOR LX,LY ARE 51,55.
       IP,JP = COORDINATES OF POLE IN THE P.S. GRID
               DEFAULTS FOR IP,JP ARE 26,28.
       D60   = GRID LENGTH AT 60 DEGREES LATITUDE (METERS))
               DEFAULT VALUE IS 381 KM = 3.81E5 M
       DGRW  = ORIENTATION OF GREENWICH LONGITUDE IN THE P.S. GRID
               DEFAULT VALUE IS 350. DEG.
       NHEM  = 1 OR N FOR N.HEM., 2 OR S FOR S. HEM.
               THIS PARAMETER HAS NO DEFAULT VALUE.
 
       READ(5,5010,END=902) LX,LY,IP,JP,D60,DGRW,NHEM
 5010  FORMAT(10X,4I5,2E10.0,I5) 
 
 
      EXAMPLE OF INPUT CARD...
 
  COFAPS     51   55   26   28    3.81E5      350.    1
 
         0123456789012345678901234567890123456789012345678901234567890
         1         2         3         4         5         6         7
 
      (THIS CARD WILL PRODUCE A 51,55 GRID WITH POLE AT 26,28.
       GRID SIZE AT 60 DEG IS 381 KM AND ORIENTATION OF THE
       GREENWICH MERIDIAN IS -10 DEGREES. IT IS A N.HEM. GRID.
       THIS IS ACTUALLY THE OLD STANDARD CMC GRID).
 
 
      EXIT CONDITIONS...
        0 NO PROBLEMS
        1 PREMATURE EOF ON SPEC
        2 DATA TYPE NOT SPECTRAL
        3 MORE THAN ONE SIZE IN SPEC
        4 ERROR ABORT READING INPUT
        5 UNABLE TO ALLOCATE WORKING MEMORY