 
      CALL SEQUENCE...
       splook  OUTSP INPUT OUTPUT [ -t1 VAL1 -name VAL2 -lv1 VAL3 \ 
                     -m VAL4 -n VAL5 -kind VAL6 [VAL7] -scal VAL8 ]
 
 
      AUTHORS - R.Laprise AND J.D.Henderson, NOV 29/83.
      LAST REVISION: $Header: /data/armnraid1/cvs/RMNLIB/utils/rdiag/lspgm/splook.ptn,v 4.9 2010/05/06 16:25:30 dugas Exp $
 
 
      PURPOSE...
       PRINTS SPECTRAL FIELDS FOUND ON FILE OUTSP. THEY MUST
       BE REQUESTED ON INPUT CARDS IN THE SAME ORDER AS THEY
       APPEAR ON THE FILE.
 
 
      PARAMETERS...
       CNTR         = -1 TO QUIT PROCESSING IMMEDIATLEY (IN INPUT CARD MODE).
       NSTEP (t1)  \
       NAM   (name) = RECORD LABEL WORDS 2,3,4 IDENTIFYING THE FIELD TO SUM.
       LEVEL (lv1) /
       NPR   (n)    = MAXIMUM NUMBER OF N-ROWS TO PRINT
       MPR   (m)    = MAXIMUM NUMBER OF M-COLUMNS TO PRINT
       KIND(1) CONTROLS OUTPUT FORMAT AS FOLLOWS...
                    = 1, (REAL,IMAG.).
                    = 3, 2-D AMPL. SPECTRUM IN (M,N-M). (DEFAULT)
                    = 4, 2-D AMPL. SPECTRUM IN (M,N). 
       KIND(2)      = VERTICAL LEVEL TYPE. IT CAN ONLY BE USED WITH CMC/RPN STD
                      FILES AND THEN LV1 AND LV2 ARE ASSUMED TO CONTAIN DECODED
                      VALUES. FURTHERMORE, THIS PARAMETRE CAN ONLY BE SPECIFIED
                      IN COMMAND-LINE MODE. THE CURRENTLY SUPPORTED VALUES ARE:
                      'HAUTEUR'   , heights (m) with respect to sea level
                      'SIGMA'     , classical terrain following (0.0 -> 1.0)
                      'ETA'       , first version of the GEM ETA coordinate
                      'PRESSION'  , pressure (mb)
                      'ARBITRAIRE', arbitrary level (no units apply)
                      'HAUTEURS'  , heights (M) with respect to the surface
                      'HYBRIDE'   , hybrid GEM coordinate
                      'THETA'     , potential temperature coordinate
                      'GALCHEN'   , GalChen generalized coordinate
       SCALE (scal) IS A SCALE FACTOR TO APPLY BEFORE PRINTING
                    = 0.0, REQUEST AUTOMATIC SCALING TO BE DONE
 
       NOTES: 1) NAM = ' ', '-1' OR 'NEXT' ARE EQUIVALENT, REQUESTING THAT
                 THE NEXT FIELD BE PRINTED, WHATEVER NSTEP OR LEVEL FOUND.
              2) NAM = 'ALL' REQUESTS THAT ALL RECORDS MATCHING NSTEP AND
                 LEVEL BE DISPLAYED.
 
 
       READ( 5,5010 CNTR,NSTEP,NAME,LEVEL,NPR,MPR,KIND, SCALE
 5010  FORMAT(A2,8X,I10,1X,A4,4I5,E10.0) 
 
 
      EXAMPLE OF INPUT CARD...
  SPLOOK  1979010100 VORT  500   21   21    3       0.0
 
         0123456789012345678901234567890123456789012345678901234567890
         1         2         3         4         5         6         7
 
 
      EXIT CONDITIONS...
        0 NO PROBLEMS
 
      FATAL CONDITIONS...
        1 UNKNOWN TYPE OF SPECTRAL ARRAY
        2 ERROR READING OUTSP
 
      NON-FATAL CONDITIONS...
      101 FINISHED READING OUTSP
      102 FINISHED READING DIRECTIVES
      103 FINISHED READING WHILE SKIPPING
 
