 
      CALL SEQUENCE...
       xpand  XIN XOUT INPUT OUTPUT [-a VAL1 -b VAL2 -c VAL3 -d VAL4]
 
 
      DESCRIPTION...
       xpand  - MODIFIE LES DIMENSIONS(X,Y) D'UN TABLEAU 4D(X,Y,Z,T)
 
 
      AUTHOR  - S.BINER, 15 juillet 1993
      LAST REVISION: $Header: /data/armnraid1/cvs/RMNLIB/utils/rdiag/lspgm/xpand.ptn,v 4.8 2008/05/03 21:06:30 dugas Exp $
 
 
      PURPOSE - MODIFIER LES DIMENSIONS (X,Y) DE CHAQUE PLAN D'UN TABLEAU
                4D (X,Y,Z,T).  CES MODIFICATIONS SONT BASEES SUR DES
                PARAMETRES LUS SUR LA CARTE D'ENTREE.
 
      NOTE:     LE COMBLEMENT DES LIGNES ET COLONNES SE FAIT EN COPIANT
                LA LIGNE OU LA COLONNE ADJACENTE.
 
 
      INPUT FILE...
         XIN = INPUT FILE
 
      OUTPUT FILE...
         XOUT = OUTPUT GRID FILE
 
 
      INPUT PARAMETERS...
 
         NOTE: SI LE NOMBRE EST POSITIF, ON COMBLE CE NOMBRE DE
               COLONNES OU LIGNES.  SI LE NOMBRE EST NEGATIF, ON
               ENLEVE CE NOMBRE DE COLONNES OU LIGNES.
 
         NXA (a) = NOMBRE DE COLONNES A ENLEVER/COMBLER A LA GAUCHE DU TABLEAU.
         NXZ (b) = NOMBRE DE COLONNES A ENLEVER/COMBLER A LA DROITE DU TABLEAU.
         NYA (c) = NOMBRE DE LIGNES A ENLEVER/COMBLER EN BAS DU TABLEAU.
         NYZ (d) = NOMBRE DE LIGNES A ENLEVER/COMBLER EN HAUT DU TABLEAU.
 
         READ(5,5010) NXA,NXZ,NYA,NYZ
 5010    FORMAT(10X,4I5)
 
 
      EXAMPLE OF INPUT CARD...
 
 XPAND        1    3   -1   -2
 
         0123456789012345678901234567890123456789012345678901234567890
         1         2         3         4         5         6         7
 
 
      EXIT CONDITIONS...
        0 NO PROBLEMS
        1 ERROR READING INPUT PARAMETERS
        2 UNABLE TO READ FIRST INFO BUFFER
        3 FOUND ILLEGAL DATA TYPE
        4 INCONSISTENT INPUT PARAMETERS
        5 UNABLE TO READ FIRST RECORD
        6 MORE THAN ONE SIZE IN XIN
 
