 
      CALL SEQUENCE...
       fullmix  INFILE OUT1 OUT2 INPUT OUTPUT [ -n VAL1 -m VAL2 -plv VAL3 ]
 
 
      AUTHOR - B.Dugas, fevrier 23/88.
      LAST REVISION: $Header: /home/cvs/RMNLIB/utils/rdiag/lspgm/fullmix.ptn,v 4.9 2014/09/25 20:20:48 dugas Exp $
 
 
      DESCRIPTION...
       CREATION DE DEUX FICHIERS DE DONNEES PERMETTANT LA COMPARAISONS 
       DEUX A DEUX DES TOUS LES ENREGISTREMENTS DU FICHIER INFILE
       I.E. ON AURA QUE (SI NOMBRE D'ENREGISTREMENT SUR IN = M) : 
  
        UNIT#2(1)        = UNIT#1(1)  ET  UNIT#3(1)        = UNIT#1(2), 
        UNIT#2(2)        = UNIT#1(1)  ET  UNIT#3(2)        = UNIT#1(3), 
                                    . 
                                    . 
                                    . 
        UNIT#2(M-1)      = UNIT#1(1)  ET  UNIT#3(M-1)      = UNIT#1(M), 
        UNIT#2(M)        = UNIT#1(2)  ET  UNIT#3(M)        = UNIT#1(3), 
                                    . 
                                    . 
                                    . 
        UNIT#2(2M-3)     = UNIT#1(2)  ET  UNIT#3(2M-3)     = UNIT#1(M), 
        UNIT#2(2M-2)     = UNIT#1(3)  ET  UNIT#3(2M-2)     = UNIT#1(4), 
                                    . 
                                    . 
                                    . 
        UNIT#2(M(M-1)/2) = UNIT#1(M-1) ET UNIT#3(M(M-1)/2) = UNIT#1(M), 
 
       JUSQU'A CE L'ON AIT TOUTES LES M(M-1)/2 PAIRES. 
 
       ON LIT LES NUMEROS DES PREMIERS ET DERNIERS ENREGISTREMENTS 
       A CONSIDERER SUR  UNIT#5. SI  LE PREMIER NOMBRE EST VIDE ON 
       LES UTLISE TOUS. 
 
 
      PARAMETRE...
       M1  (m)   = PREMIER ENREGISTREMENT CONSIDERE  (DEFAUT = PREMIER)
       M2  (n)   = DERNIER ENREGISTREMENT CONSIDERE  (DEFAUT = DERNIER)
       NIV (plv) = ORDINAL DU NIVEAU VERTICAL RETENU (DEFAUT = PREMIER)
 
       READ(5,5000) M1,M2,NIV 
 5000  FORMAT(10X,3I5)
 
 
      EXAMPLE OF INPUT CARD...
 
 FULLMIX      1   10  500
 
         0123456789012345678901234567890123456789012345678901234567890
         1         2         3         4         5         6         7
 
 
      EXIT CONDITIONS...
        0 NO PROBLEMS
        1 TOO MANY OR NOT ENOUGH LEVELS
        2 M1,M2 INCONSISTENT WITH NUMBER OF RECORDS IN INFILE
        3 REQUESTED LEVEL NIV UNAVAILABLE
        4 PROBLEMS READING FILE IN
        5 PREMATURE END OF FILE ON INPUT
        6 PREMATURE END OF FILE ON INFILE
        7 MORE THAN ONE TYPE OF DATA IN INFILE
        8 MEMORY ALLOCATION PROBLEM
 
