 
      CALL SEQUENCE...
       xMplot  xin input output [-t1   VAL1 -name  VAL2 -lv1 VAL3 \ 
                                 -a    VAL4 -b     VAL5 -n   VAL6 \ 
                                 -kind VAL7 -label VAL8]
 
 
      DESCRIPTION...
       PLOT UP TO 50 SINGLE LEVEL ZONAL/MERIDIONAL CROSS SECTION CURVES
 
 
      AUTHOR  - F. Zwiers, 06 November 1986.
      LAST REVISION: $Header: /home/cvs/RMNLIB/utils/rdiag/lspgm/xmplot.ptn,v 4.9 2014/09/25 20:20:56 dugas Exp $
 
 
      PURPOSE - PLOTS UP TO 50 GLOBAL ZONALLY/MERIDIONALLY AVERAGED SINGLE LEVEL
                FIELDS VERSUS LATITUDE/LONGITUDE.
 
      INPUT FILE...
       XIN = FILE CONTAINING CURVES TO BE PLOTTED.
 
 
      INPUT PARAMETERS...
 
       NSTEP (t1)     = TIMESTEP NUMBER
       NAME           = NAME OF VARIABLE TO BE PLOTTED
                        THE NAMES blank, 'NEXT' AND 'SKIP' ARE RECOGNIZED BUT
                        FILE XIN IS REWOUND BEFORE EACH SEARCH.  THIS ALLOWS
                        FIELDS TO BE IN ANY ORDER ON THE FILE, BUT BLANK OR
                        'NEXT' ALWAYS SELECTS THE FIRST FIELD AND 'SKIP' IS
                        A NULL OPERATION. THE DEFAULT IS 'ALL', WHICH
                        IMPLIES PLOTTING ALL RECORDS.
       LEVEL   (lv1)  = LEVEL NUMBER
       YLO,YHI (a,b)  = LOWER,UPPER LIMITS OF VERTICAL Y-AXIS.
                        TICK MARKS DIVIDE THE Y-AXIS INTO 10 DIVISIONS BETWEEN
                        YLO AND YHI. A SOLID LINE IS DRAWN AT Y=0 IF YLO.LT.0.
                        AND YHI.GT.0.,  BUT AT YLO OTHERWISE. IF YLO=YHI, THE
                        PROGRAMS USES AUTOMATICALLY DETERMINED VALUES.
       MS             = PRINTER PLOT PARAMETER (NOW IGNORED).
       NC      (n)    = NUMBER OF CURVES/PLOT (DEFAULT = 1, MAX = 50)
       NZMS    (kind) = 0/1 FOR ZONAL/MERIDIONAL PLOT.
 
       LABEL   = 80 CHARACTER LABEL PRINTED ABOVE PLOT.
 
      READ(5,5010,END=900) NSTEP,NAME,LEVEL,YLO,YHI,MS,NC,NZMS
      READ(5,5012,END=902) LABEL
 5010 FORMAT(10X,I10,1X,A4,I5,2E10.0,I5,E10.0,2I5)
 5012 FORMAT(A80)
 
 
      EXAMPLE OF INPUT CARDS...
 
   XMPLOT         -1 NEXT  500    -1000.     1500.    0   20    0
   FJ - JAN Z(500) - 12W TO 21W
 
         0123456789012345678901234567890123456789012345678901234567890
         1         2         3         4         5         6         7
 
 
      EXIT CONDITIONS...
        0 NO PROBLEMS
 
      FATAL CONDITIONS...
        1 UNABLE TO READ DIRECTIVES CARD
        2 UNABLE TO READ LABEL CARD
        3 UNABLE TO READ XIN
        4 MORE THAN ONE SIZE IN XIN
 
      NON-FATAL CONDITION...
      101 FINISHED READING XIN
 
