GATHER                         G001 10/30/85 MJM 01/08/86                       
CRAY-1/S COS 1.12 CFT 1.11    
'NA,NB     '   10  20
'VECTOR B  '   1.0000000000000    ,               0.    ,               0.    
               2.0000000000000    ,               0.    ,  3.0000000000000    
               4.0000000000000    ,               0.    ,               0.    
                            0.    ,  5.0000000000000    ,  6.0000000000000    
               7.0000000000000    ,               0.    ,               0.    
               8.0000000000000    ,               0.    ,  9.0000000000000    
               10.000000000000    ,               0.    ,
'INDEX B   '     1,    4,    6,    7,   11,   12,   13,   16,   18,   19
'RESULT A  '   1.0000000000000    ,  2.0000000000000    ,  3.0000000000000    
               4.0000000000000    ,  5.0000000000000    ,  6.0000000000000    
               7.0000000000000    ,  8.0000000000000    ,  9.0000000000000    
               10.000000000000    ,


GATHER                         G002 10/30/85 MJM 01/08/86 B SAME SIZE AS A.     
CRAY-1/S COS 1.12 CFT 1.11    
'NA,NB     '   10  10
'VECTOR B  '   1.0000000000000    ,  3.0000000000000    ,  2.0000000000000    
               6.0000000000000    ,  4.0000000000000    ,  5.0000000000000    
               10.000000000000    ,  9.0000000000000    ,  7.0000000000000    
               8.0000000000000    ,
'INDEX B   '     1,    3,    2,    5,    6,    4,    9,   10,    8,    7
'RESULT A  '   1.0000000000000    ,  2.0000000000000    ,  3.0000000000000    
               4.0000000000000    ,  5.0000000000000    ,  6.0000000000000    
               7.0000000000000    ,  8.0000000000000    ,  9.0000000000000    
               10.000000000000    ,


GATHER                         G003 10/30/85 MJM 01/08/86 NUMBER IN A = 0.      
CRAY-1/S COS 1.12 CFT 1.11    
'NA,NB     '    0   5
'VECTOR B  '                0.    ,               0.    ,               0.    
                            0.    ,               0.    ,
'INDEX B   '
'RESULT A  '


GATHER                         G004 10/30/85 MJM 01/08/86 NUMBER IN B = 0.      
CRAY-1/S COS 1.12 CFT 1.11    
'NA,NB     '    3   0
'VECTOR B  '
'INDEX B   '     1,    2,    9,
'RESULT A  '                0.    ,               0.    ,  7.0000000000000    


GATHER                         G005 10/30/85 MJM 01/08/86 NUMBER IN A = 1.      
CRAY-1/S COS 1.12 CFT 1.11    
'NA,NB     '    1   5
'VECTOR B  '                0.    ,               0.    ,               0.    
              -99.000000000000    ,               0.    ,
'INDEX B   '     4,
'RESULT A  '  -99.000000000000    ,


GATHER                         G006 10/30/85 MJM 01/08/86 NUMBER IN A,B = 0.    
CRAY-1/S COS 1.12 CFT 1.11    
'NA,NB     '    0   0
'VECTOR B  '
'INDEX B   '
'RESULT A  '


GATHER                         G007 10/30/85 MJM 01/08/86 NUMBER IN A < 0.      
CRAY-1/S COS 1.12 CFT 1.11    
'NA,NB     '   -5   5
'VECTOR B  '   1.0000000000000    ,  2.0000000000000    ,  3.0000000000000    
               4.0000000000000    ,  5.0000000000000    ,
'INDEX B   '
'RESULT A  '


GATHER                         G008 10/30/85 MJM 01/08/86 LARGE B INTO SMALL A. 
CRAY-1/S COS 1.12 CFT 1.11    
'NA,NB     '   10  20
'VECTOR B  '   1.0000000000000    ,               0.    ,               0.    
               2.0000000000000    ,               0.    ,  3.0000000000000    
               4.0000000000000    ,               0.    ,               0.    
                            0.    ,  5.0000000000000    ,  6.0000000000000    
               7.0000000000000    ,               0.    ,               0.    
               8.0000000000000    ,               0.    ,  9.0000000000000    
               10.000000000000    ,               0.    ,
'INDEX B   '    19,   18,   16,   13,   12,   11,    7,    6,    4,    1
'RESULT A  '   10.000000000000    ,  9.0000000000000    ,  8.0000000000000    
               7.0000000000000    ,  6.0000000000000    ,  5.0000000000000    
               4.0000000000000    ,  3.0000000000000    ,  2.0000000000000    
               1.0000000000000    ,


SCATTER                        G009 10/30/85 MJM 01/08/86 SMALL B INTO LARGE A. 
CRAY-1/S COS 1.12 CFT 1.11    
'NA,NB     '   20  10
'VECTOR B  '   10.000000000000    ,  9.0000000000000    ,  8.0000000000000    
               7.0000000000000    ,  6.0000000000000    ,  5.0000000000000    
               4.0000000000000    ,  3.0000000000000    ,  2.0000000000000    
               1.0000000000000    ,
'INDEX A   '     1,    4,    6,    7,   11,   12,   13,   16,   18,   19
'RESULT A  '   10.000000000000    ,               0.    ,               0.    
               9.0000000000000    ,               0.    ,  8.0000000000000    
               7.0000000000000    ,               0.    ,               0.    
                            0.    ,  6.0000000000000    ,  5.0000000000000    
               4.0000000000000    ,               0.    ,               0.    
               3.0000000000000    ,               0.    ,  2.0000000000000    
               1.0000000000000    ,               0.    ,


SCATTER                        G010 10/30/85 MJM 01/08/86 B SAME SIZE AS A.     
CRAY-1/S COS 1.12 CFT 1.11    
'NA,NB     '   10  10
'VECTOR B  '   1.0000000000000    ,  3.0000000000000    ,  2.0000000000000    
               6.0000000000000    ,  4.0000000000000    ,  5.0000000000000    
               10.000000000000    ,  9.0000000000000    ,  7.0000000000000    
               8.0000000000000    ,
'INDEX A   '     1,    3,    2,    5,    6,    4,    9,   10,    8,    7
'RESULT A  '   1.0000000000000    ,  2.0000000000000    ,  3.0000000000000    
               5.0000000000000    ,  6.0000000000000    ,  4.0000000000000    
               8.0000000000000    ,  7.0000000000000    ,  10.000000000000    
               9.0000000000000    ,


SCATTER                        G011 10/30/85 MJM 01/08/86 NUMBER IN B = 0.      
CRAY-1/S COS 1.12 CFT 1.11    
'NA,NB     '    5   0
'VECTOR B  '
'INDEX A   '
'RESULT A  '   1.0000000000000    ,  2.0000000000000    ,  3.0000000000000    
               5.0000000000000    ,  6.0000000000000    ,


SCATTER                        G012 10/30/85 MJM 01/08/86 NUMBER IN A = 0.      
CRAY-1/S COS 1.12 CFT 1.11    
'NA,NB     '    0   3
'VECTOR B  '   1.0000000000000    ,  2.0000000000000    ,  3.0000000000000    
'INDEX A   '     1,    2,    9,
'RESULT A  '


SCATTER                        G013 10/30/85 MJM 01/08/86 NUMBER IN B = 1.      
CRAY-1/S COS 1.12 CFT 1.11    
'NA,NB     '    5   1
'VECTOR B  '  -99.000000000000    ,
'INDEX A   '     4,
'RESULT A  '   1.0000000000000    ,  2.0000000000000    ,  3.0000000000000    
              -99.000000000000    ,  6.0000000000000    ,


SCATTER                        G014 10/30/85 MJM 01/08/86 NUMBER IN A,B = 0.    
CRAY-1/S COS 1.12 CFT 1.11    
'NA,NB     '    0   0
'VECTOR B  '
'INDEX A   '
'RESULT A  '


SCATTER                        G015 10/30/85 MJM 01/08/86 NUMBER IN B < 0.      
CRAY-1/S COS 1.12 CFT 1.11    
'NA,NB     '    5  -5
'VECTOR B  '
'INDEX A   '
'RESULT A  '   1.0000000000000    ,  2.0000000000000    ,  3.0000000000000    
              -99.000000000000    ,  6.0000000000000    ,


SCATTER                        G016 10/30/85 MJM 01/08/86 SMALL B INTO LARGE A. 
CRAY-1/S COS 1.12 CFT 1.11    
'NA,NB     '   20  10
'VECTOR B  '   10.000000000000    ,  9.0000000000000    ,  8.0000000000000    
               7.0000000000000    ,  6.0000000000000    ,  5.0000000000000    
               4.0000000000000    ,  3.0000000000000    ,  2.0000000000000    
               1.0000000000000    ,
'INDEX A   '    19,   18,   16,   13,   12,   11,    7,    6,    4,    1
'RESULT A  '   1.0000000000000    ,  2.0000000000000    ,  3.0000000000000    
               2.0000000000000    ,  6.0000000000000    ,  3.0000000000000    
               4.0000000000000    ,  7.0000000000000    ,  3.0000000000000    
               9.0000000000000    ,  5.0000000000000    ,  6.0000000000000    
               7.0000000000000    ,               0.    ,               0.    
               8.0000000000000    ,               0.    ,  9.0000000000000    
               10.000000000000    ,               0.    ,


XXX                            

.