$ od -c -N 50000 [eris]<LispCore>SOURCES>CMLSEQBASICS.DCOM!2
0000000    (   F   I   L   E   C   R   E   A   T   E   D       "       5
0000020    -   S   e   p   -   8   6       1   7   :   3   8   :   1   7
0000040    "       (   "   c   o   m   p   i   l   e   d       o   n    
0000060    "       {   E   R   I   S   }   <   L   I   S   P   C   O   R
0000100    E   >   L   I   B   R   A   R   Y   >   C   M   L   S   E   Q
0000120    B   A   S   I   C   S   .   ;   4   )      \r   "   2   9   -
0000140    A   u   g   -   8   6       2   2   :   2   1   :   5   6   "
0000160        "   C   O   M   P   I   L   E   -   F   I   L   E   d   "
0000200        i   n       "   X   e   r   o   x       L   i   s   p    
0000220    2   9   -   A   u   g   -   8   6       .   .   .   "       d
0000240    a   t   e   d       "   2   9   -   A   u   g   -   8   6    
0000260    2   2   :   5   5   :   0   3   "   )  \r   (   F   I   L   E
0000300    C   R   E   A   T   E   D       "       5   -   S   e   p   -
0000320    8   6       1   7   :   3   7   :   3   9   "       {   E   R
0000340    I   S   }   <   L   I   S   P   C   O   R   E   >   L   I   B
0000360    R   A   R   Y   >   C   M   L   S   E   Q   B   A   S   I   C
0000400    S   .   ;   4       1   8   9   5   3       c   h   a   n   g
0000420    e   s       t   o   :       (   V   A   R   S      \r   C   M
0000440    L   S   E   Q   B   A   S   I   C   S   C   O   M   S   )    
0000460    (   F   U   N   C   T   I   O   N   S       N   R   E   V   E
0000500    R   S   E   )       p   r   e   v   i   o   u   s       d   a
0000520    t   e   :       "   1   1   -   A   u   g   -   8   6       1
0000540    6   :   2   2   :   5   7   "      \r   {   E   R   I   S   }
0000560    <   L   I   S   P   C   O   R   E   >   L   I   B   R   A   R
0000600    Y   >   C   M   L   S   E   Q   B   A   S   I   C   S   .   ;
0000620    3   )  \r   (   R   P   A   Q   Q       C   M   L   S   E   Q
0000640    B   A   S   I   C   S   C   O   M   S       (   (   D   E   C
0000660    L   A   R   E   :       E   V   A   L   @   C   O   M   P   I
0000700    L   E       D   O   N   T   C   O   P   Y       (   F   I   L
0000720    E   S       C   M   L   S   E   Q   C   O   M   M   O   N   )
0000740    )       (   F   U   N   C   T   I   O   N   S       C   H   E
0000760    C   K   -   S   U   B   S   E   Q  \r       M   A   K   E   -
0001000    S   E   Q   U   E   N   C   E   -   O   F   -   T   Y   P   E
0001020    )       (   C   O   M   S       (   F   U   N   C   T   I   O
0001040    N   S       C   L   :   E   L   T       %   %   S   E   T   E
0001060    L   T   )       (   S   E   T   F   S       C   L   :   E   L
0001100    T   )   )       (   C   O   M   S       (   F   U   N   C   T
0001120    I   O   N   S       S   U   B   S   E   Q      \r   L   I   S
0001140    T   -   S   U   B   S   E   Q   *       V   E   C   T   O   R
0001160    -   S   U   B   S   E   Q   *   )       (   S   E   T   F   S
0001200        S   U   B   S   E   Q   )   )       (   F   U   N   C   T
0001220    I   O   N   S       C   O   P   Y   -   S   E   Q       L   I
0001240    S   T   -   C   O   P   Y   -   S   E   Q       L   I   S   T
0001260    -   C   O   P   Y   -   S   E   Q   *      \r   V   E   C   T
0001300    O   R   -   C   O   P   Y   -   S   E   Q       V   E   C   T
0001320    O   R   -   C   O   P   Y   -   S   E   Q   *   )       (   F
0001340    U   N   C   T   I   O   N   S       C   L   :   L   E   N   G
0001360    T   H   )       (   F   U   N   C   T   I   O   N   S       C
0001400    L   :   R   E   V   E   R   S   E       L   I   S   T   -   R
0001420    E   V   E   R   S   E   -   M   A   C   R   O      \r   V   E
0001440    C   T   O   R   -   R   E   V   E   R   S   E       V   E   C
0001460    T   O   R   -   R   E   V   E   R   S   E   *   )       (   F
0001500    U   N   C   T   I   O   N   S       N   R   E   V   E   R   S
0001520    E       L   I   S   T   -   N   R   E   V   E   R   S   E   -
0001540    M   A   C   R   O       L   I   S   T   -   N   R   E   V   E
0001560    R   S   E   *       V   E   C   T   O   R   -   N   R   E   V
0001600    E   R   S   E  \r       V   E   C   T   O   R   -   N   R   E
0001620    V   E   R   S   E   *   )       (   F   U   N   C   T   I   O
0001640    N   S       M   A   K   E   -   S   E   Q   U   E   N   C   E
0001660    )       (   F   U   N   C   T   I   O   N   S       C   O   N
0001700    C   A   T   E   N   A   T   E       C   O   N   C   A   T   E
0001720    N   A   T   E   -   T   O   -   L   I   S   T      \r   C   O
0001740    N   C   A   T   -   T   O   -   L   I   S   T   *       C   O
0001760    N   C   A   T   -   T   O   -   S   I   M   P   L   E   *   )
0002000        (   P   R   O   P   S       (   C   M   L   S   E   Q   B
0002020    A   S   I   C   S       F   I   L   E   T   Y   P   E   )   )
0002040    )   )  \r   C   H   E   C   K   -   S   U   B   S   E   Q    
0002060    D   1  \r   (   L       (   3       L   E   N   G   T   H    
0002100    2       E   N   D       1       S   T   A   R   T       0    
0002120    S   E   Q   )   )      \0   8  \0  \0  \0 004   C  \t  \0  \0
0002140  265   2   j   A 363 243   C   A 363 250   o  \0  \0  \0   A  \n
0002160   \0  \0 020   j   B 363 243   B   C 363 230   o  \0  \0  \0   B
0002200   \n  \0  \0 020   A   B 363 264  \v   o  \0  \0  \0   A   B  \v
0002220   \0  \0 020  \0   (   6   5   Q       C   L   :   E   R   R   O
0002240    R       4   6   Q       C   L   :   E   R   R   O   R       2
0002260    5   Q       C   L   :   E   R   R   O   R       3       C   L
0002300    :   Z   E   R   O   P   )  \r   N   I   L  \r   (       6   0
0002320    Q       "   I   l   l   e   g   a   l       s   u   b   s   e
0002340    q   u   e   n   c   e   :   ~   &   S   T   A   R   T       (
0002360    ~   D   )       m   a   y       n   o   t       b   e       g
0002400    r   e   a   t   e   r       t   h   a   n       E   N   D    
0002420    (   ~   D   )   .   "       4   2   Q       "   I   n   d   e
0002440    x       o   u   t       o   f       r   a   n   g   e   :    
0002460    ~   D   .   "  \r       2   1   Q       "   I   n   d   e   x
0002500        o   u   t       o   f       r   a   n   g   e   :       ~
0002520    D   .   "   )  \r   M   A   K   E   -   S   E   Q   U   E   N
0002540    C   E   -   O   F   -   T   Y   P   E       D   1  \r   (   L
0002560        (   1       L   E   N   G   T   H       0       T   Y   P
0002600    E   )   )      \0   w 001  \0  \0 002   @   d 003 220 001 021
0002620  001  \0   H   d   g  \0  \0 360 225 277   A  \t  \0  \0 020   g
0002640   \0  \0 360 247   H   d   g  \0  \0 360 233 277   A   g  \0  \0
0002660    g  \0  \0  \v  \0  \0 020   g  \0  \0 360 247   H   d   g  \0
0002700   \0 360 225 277   A  \t  \0  \0 020   g  \0  \0 360 224   A  \t
0002720   \0  \0 020   H   g  \0  \0 360 254   H   g  \0  \0 360 246   H
0002740    g  \0  \0 360 262 023   @ 223   @ 003 262 344   A   g  \0  \0
0002760    @ 002 001  \v  \0  \0 020   o  \0  \0  \0   @  \n  \0  \0 020
0003000   \0   (   1   6   4   Q       C   L   :   E   R   R   O   R    
0003020    1   5   3   Q       M   A   K   E   -   A   R   R   A   Y    
0003040    1   0   7   Q       M   A   K   E   -   A   R   R   A   Y    
0003060    7   5   Q       M   A   K   E   -   S   T   R   I   N   G    
0003100    5   3   Q       M   A   K   E   -   A   R   R   A   Y       2
0003120    3   Q       M   A   K   E   -   L   I   S   T   )  \r   (   1
0003140    4   5   Q       :   E   L   E   M   E   N   T   -   T   Y   P
0003160    E       1   3   0   Q       V   E   C   T   O   R       1   2
0003200    2   Q       S   I   M   P   L   E   -   A   R   R   A   Y    
0003220    1   1   4   Q       A   R   R   A   Y       1   0   1   Q    
0003240    S   I   M   P   L   E   -   V   E   C   T   O   R       6   6
0003260    Q       S   I   M   P   L   E   -   S   T   R   I   N   G    
0003300    5   7   Q       S   T   R   I   N   G       5   0   Q       B
0003320    I   T       4   5   Q       :   E   L   E   M   E   N   T   -
0003340    T   Y   P   E       3   6   Q       S   I   M   P   L   E   -
0003360    B   I   T   -   V   E   C   T   O   R       2   7   Q       B
0003400    I   T   -   V   E   C   T   O   R       1   4   Q       L   I
0003420    S   T   )  \r   (       1   6   0   Q       "   ~   S       i
0003440    s       a       b   a   d       t   y   p   e       s   p   e
0003460    c   i   f   i   e   r       f   o   r       s   e   q   u   e
0003500    n   c   e       f   u   n   c   t   i   o   n   s   .   "   )
0003520   \r   C   L   :   E   L   T       D   1  \r   (   L       (   1
0003540        I   N   D   E   X       0       S   E   Q   U   E   N   C
0003560    E   )   )      \0 213 003  \0  \0 002   j   A 363 237   g  \0
0003600   \0   g  \0  \0   @   g  \0  \0   A  \r 005  \0  \0 277   @ 021
0003620    ! 002   H   Y   o  \0  \0  \0 034 250   I   d 004   l 005 360
0003640  262   F 277   A   Z   j  \n  \0  \0 262 034   @   d  \t  \0  \0
0003660  262 023 277   g  \0  \0   g  \0  \0   @   g  \0  \0   A  \r 005
0003700   \0  \0 020 001 020   @   d  \t  \0  \0 262 023 277   g  \0  \0
0003720    g  \0  \0   @   g  \0  \0   A  \r 005  \0  \0 202 002   b  \0
0003740  277   J   k 325 260 300  \t  \0  \0 264 017   A   @  \t  \0  \0
0003760  375 363 262 301   @   A 266 020   g  \0  \0   H   o  \0  \0  \0
0004000   \f  \0  \0 020  \0   (   2   1   0   Q       C   H   E   C   K
0004020    -   T   Y   P   E   -   F   A   I   L       1   6   5   Q    
0004040    C   L   :   L   E   N   G   T   H       1   5   6   Q       V
0004060    E   C   T   O   R   P       1   4   1   Q       C   L   :   E
0004100    R   R   O   R       1   1   7   Q       E   N   D   P       1
0004120    0   7   Q       C   L   :   E   R   R   O   R       6   5   Q
0004140        E   N   D   P       5   6   Q       %   %   =       2   2
0004160    Q       C   L   :   E   R   R   O   R   )  \r   (   2   0   0
0004200    Q       S   E   Q   U   E   N   C   E       1   3   4   Q    
0004220    :   I   N   D   E   X       1   3   0   Q       :   N   A   M
0004240    E       1   2   5   Q       I   N   D   E   X   -   B   O   U
0004260    N   D   S   -   E   R   R   O   R       1   0   2   Q       :
0004300    I   N   D   E   X       7   6   Q       :   N   A   M   E    
0004320    7   3   Q       I   N   D   E   X   -   B   O   U   N   D   S
0004340    -   E   R   R   O   R       1   5   Q       :   I   N   D   E
0004360    X       1   1   Q       :   N   A   M   E       6       I   N
0004400    D   E   X   -   B   O   U   N   D   S   -   E   R   R   O   R
0004420    )  \r   (       2   0   5   Q       (   O   R       L   I   S
0004440    T       V   E   C   T   O   R   )       3   5   Q       (   N
0004460    I   L   )   )  \r   %   %   S   E   T   E   L   T       D   1
0004500   \r   (   L       (   2       N   E   W   V   A   L       1    
0004520    I   N   D   E   X       0       S   E   Q   U   E   N   C   E
0004540    )   )      \0 243 006  \0  \0 003   j   A 363 237   g  \0  \0
0004560    g  \0  \0   @   g  \0  \0   A  \r 005  \0  \0 277   @ 021   Q
0004600  005   H   Y   o  \0  \0  \0 034 250   I   d 004   l 005 360 262
0004620    J 277   A   @ 273   Z   j  \n  \0  \0 262 036   K   d  \t  \0
0004640   \0 262 023 277   g  \0  \0   g  \0  \0   @   g  \0  \0   A  \r
0004660  005  \0  \0 201   B 030   B 020   K   d 002  \t  \0  \0 262 023
0004700  277   g  \0  \0   g  \0  \0   @   g  \0  \0   A  \r 005  \0  \0
0004720  201 002   [ 277   J   k 325 260 276  \t  \0  \0 264   #   A   @
0004740   \t  \0  \0 375 363 257   g  \0  \0   g  \0  \0   @   g  \0  \0
0004760    A  \r 005  \0  \0 020   @ 274   A 275   B   L   M 267 020   g
0005000   \0  \0   H   o  \0  \0  \0  \f  \0  \0 020  \0   (   2   4   0
0005020    Q       C   H   E   C   K   -   T   Y   P   E   -   F   A   I
0005040    L       2   1   3   Q       C   L   :   E   R   R   O   R    
0005060    1   7   1   Q       C   L   :   L   E   N   G   T   H       1
0005100    6   2   Q       V   E   C   T   O   R   P       1   4   6   Q
0005120        C   L   :   E   R   R   O   R       1   2   4   Q       E
0005140    N   D   P       1   1   1   Q       C   L   :   E   R   R   O
0005160    R       6   7   Q       E   N   D   P       6   0   Q       %
0005200    %   =       2   2   Q       C   L   :   E   R   R   O   R   )
0005220   \r   (   2   3   0   Q       S   E   Q   U   E   N   C   E    
0005240    2   0   6   Q       :   I   N   D   E   X       2   0   2   Q
0005260        :   N   A   M   E       1   7   7   Q       I   N   D   E
0005300    X   -   B   O   U   N   D   S   -   E   R   R   O   R       1
0005320    4   1   Q       :   I   N   D   E   X       1   3   5   Q    
0005340    :   N   A   M   E       1   3   2   Q       I   N   D   E   X
0005360    -   B   O   U   N   D   S   -   E   R   R   O   R       1   0
0005400    4   Q       :   I   N   D   E   X       1   0   0   Q       :
0005420    N   A   M   E       7   5   Q       I   N   D   E   X   -   B
0005440    O   U   N   D   S   -   E   R   R   O   R       1   5   Q    
0005460    :   I   N   D   E   X       1   1   Q       :   N   A   M   E
0005500        6       I   N   D   E   X   -   B   O   U   N   D   S   -
0005520    E   R   R   O   R   )  \r   (       2   3   5   Q       (   O
0005540    R       L   I   S   T       V   E   C   T   O   R   )       3
0005560    5   Q       (   N   I   L   )   )  \r   (   R   E   M   P   R
0005600    O   P       (   Q   U   O   T   E       C   L   :   E   L   T
0005620    )       (   Q   U   O   T   E       S   E   T   F   -   M   E
0005640    T   H   O   D   -   E   X   P   A   N   D   E   R   )   )  \r
0005660    (   P   U   T   P   R   O   P   S       C   L   :   E   L   T
0005700        S   E   T   F   -   I   N   V   E   R   S   E       %   %
0005720    S   E   T   E   L   T   )  \r   S   U   B   S   E   Q       D
0005740    1  \r   (   L       (   2       E   N   D       1       S   T
0005760    A   R   T       0       S   E   Q   U   E   N   C   E   )   )
0006000       \0   A 002  \0  \0 003   j   A 363 230   o  \0  \0  \0   A
0006020   \n  \0  \0 020   @ 021 021 001   H   Y   o  \0  \0  \0 034 247
0006040    I   d 004   l 005 360 227 277   @   A   B  \v  \0  \0 020  \t
0006060   \0  \0 264  \t   @   A   B  \v  \0  \0 020   g  \0  \0   H   o
0006100   \0  \0  \0  \f  \0  \0 020  \0   (   7   6   Q       C   H   E
0006120    C   K   -   T   Y   P   E   -   F   A   I   L       6   2   Q
0006140        V   E   C   T   O   R   -   S   U   B   S   E   Q   *    
0006160    5   2   Q       V   E   C   T   O   R   P       4   6   Q    
0006200    L   I   S   T   -   S   U   B   S   E   Q   *       1   3   Q
0006220        C   L   :   E   R   R   O   R   )  \r   (   6   6   Q    
0006240    S   E   Q   U   E   N   C   E   )  \r   (       7   3   Q    
0006260    (   O   R       L   I   S   T       V   E   C   T   O   R   )
0006300        2   6   Q       (   N   I   L   )       7       "   I   n
0006320    d   e   x       o   u   t       o   f       r   a   n   g   e
0006340    :       ~   D   .   "   )  \r   L   I   S   T   -   S   U   B
0006360    S   E   Q   *       D   1  \r   (   L       (   2       E   N
0006400    D       1       S   T   A   R   T       0       S   E   Q   U
0006420    E   N   C   E   )   )      \0 205 005  \0  \0 003   B 235   A
0006440    B 363 231   o  \0  \0  \0   A   B  \v  \0  \0 020   @ 241   h
0006460  020   B 262 035   A   d   B  \n  \0  \0 262 026 277   A   @  \t
0006500   \0  \0 375 363 263 353   o  \0  \0  \0   A  \n  \0  \0 020   A
0006520    @  \n  \0  \0 021 021 001   H 001   h 032 271   H 265  \v   o
0006540   \0  \0  \0   A  \n  \0  \0 020 002   I   A   k 324 021 003 004
0006560    J  \t  \0  \0 263 032   B 265 023   J 002   K   d   J 001   &
0006600  277 002   L   k 324 274 273   Z 260 351   L 363 263 355   B 225
0006620    L   B  \n  \0  \0 221   I 020   o  \0  \0  \0   B  \n  \0  \0
0006640  020  \0   (   2   0   2   Q       C   L   :   E   R   R   O   R
0006660        1   6   7   Q       %   %   =       1   2   6   Q       E
0006700    N   D   P       1   1   1   Q       C   L   :   E   R   R   O
0006720    R       6   6   Q       N   T   H   C   D   R       6   0   Q
0006740        C   L   :   E   R   R   O   R       4   4   Q       C   L
0006760    :   L   E   N   G   T   H       3   4   Q       %   %   =    
0007000    1   6   Q       C   L   :   E   R   R   O   R   )  \r   N   I
0007020    L  \r   (       1   7   6   Q       "   I   n   d   e   x    
0007040    o   u   t       o   f       r   a   n   g   e   :       ~   D
0007060    .   "       1   0   5   Q       "   I   n   d   e   x       o
0007100    u   t       o   f       r   a   n   g   e   :       ~   D   .
0007120    "       5   4   Q       "   I   n   d   e   x       o   u   t
0007140        o   f       r   a   n   g   e   :       ~   D   .   "    
0007160    1   1   Q       "   I   l   l   e   g   a   l       s   u   b
0007200    s   e   q   u   e   n   c   e   :   ~   &   S   T   A   R   T
0007220        (   ~   D   )       m   a   y       n   o   t       b   e
0007240        g   r   e   a   t   e   r       t   h   a   n       E   N
0007260    D       (   ~   D   )   .   "   )  \r   V   E   C   T   O   R
0007300    -   S   U   B   S   E   Q   *       D   1  \r   (   L       (
0007320    2       E   N   D       1       S   T   A   R   T       0    
0007340    S   E   Q   U   E   N   C   E   )   )      \0 237  \t  \0  \0
0007360  003   @  \t  \0  \0 021   Q 005   B 243   H   b 004 277   A   B
0007400  363 231   o  \0  \0  \0   A   B  \v  \0  \0 020   H   d  \t  \0
0007420   \0 225 277   @  \t  \0  \0 020   A 363 250   o  \0  \0  \0   A
0007440   \n  \0  \0 020   A   j   @   [   Z   Y   o  \0  \0  \0 034 247
0007460    I   d 004   l 005 360 230 277   B   A 325  \t  \0  \0 260   -
0007500   \t  \0  \0 227   B   A 325  \t  \0  \0 260   !   I  \t  \0  \0
0007520  264 020   B   A 325   g  \0  \0   K  \t  \0  \0  \v  \0  \0 212
0007540    g  \0  \0   J   o  \0  \0  \0  \f  \0  \0 021 003  \b   B   N
0007560  363 242   O 020 020   O 020 275   O 016 274   @   N 266   M   L
0007600  267 277   N   k 324   O 016   k 324   _ 016 277 276 260 341  \0
0007620    (   1   7   1   Q       C   H   E   C   K   -   T   Y   P   E
0007640    -   F   A   I   L       1   5   5   Q       M   A   K   E   -
0007660    A   R   R   A   Y       1   5   2   Q       A   R   R   A   Y
0007700    -   E   L   E   M   E   N   T   -   T   Y   P   E       1   3
0007720    6   Q       C   L   :   A   R   R   A   Y   P       1   3   0
0007740    Q       M   A   K   E   -   S   T   R   I   N   G       1   2
0007760    1   Q       C   L   :   S   T   R   I   N   G   P       1   1
0010000    4   Q       M   A   K   E   -   L   I   S   T       6   1   Q
0010020        C   L   :   E   R   R   O   R       4   5   Q       C   O
0010040    P   Y   -   S   E   Q       3   7   Q       C   L   :   Z   E
0010060    R   O   P       3   1   Q       C   L   :   E   R   R   O   R
0010100        3       C   L   :   L   E   N   G   T   H   )  \r   (   1
0010120    6   1   Q       S   E   Q       1   4   6   Q       :   E   L
0010140    E   M   E   N   T   -   T   Y   P   E   )  \r   (       1   6
0010160    6   Q       (   O   R       L   I   S   T       S   T   R   I
0010200    N   G       A   R   R   A   Y   )       7   4   Q       (   N
0010220    I   L   )       5   5   Q       "   I   n   d   e   x       o
0010240    u   t       o   f       r   a   n   g   e   :       ~   D   .
0010260    "       2   4   Q       "   I   l   l   e   g   a   l       s
0010300    u   b   s   e   q   u   e   n   c   e   :   ~   &   S   T   A
0010320    R   T       (   ~   D   )       m   a   y       n   o   t    
0010340    b   e       g   r   e   a   t   e   r       t   h   a   n    
0010360    E   N   D       (   ~   D   )   .   "   )  \r   (   R   E   M
0010400    P   R   O   P       (   Q   U   O   T   E       S   U   B   S
0010420    E   Q   )       (   Q   U   O   T   E       S   E   T   F   -
0010440    I   N   V   E   R   S   E   )   )  \r   S   U   B   S   E   Q
0010460    -   s   e   t   f   -   e   x   p   a   n   d   e   r       D
0010500    1  \r   (   P       1   3   Q       N   E   W   -   S   E   Q
0010520    U   E   N   C   E       P       5       S   U   B   S   E   Q
0010540    -   s   e   t   f   -   f   o   r   m       P       4       D
0010560    U   M   M   I   E   S       P       3       X       I       0
0010600        A   C   C   E   S   S   -   F   O   R   M   )      \0   s
0010620   \f  \0  \0 001 021   @ 003   @ 260 024   d 001 273  \b  \0  \0
0010640  270   I 265  \a   H   h 032   Z 201   H   & 271 002 003 265 354
0010660    J 022 021   a  \n   @ 001   L 032 275  \b  \0  \0 021 001  \v
0010700    L   @ 002   O 026   h 032   M 002   _ 024 001   _ 022 277   O
0010720  024 002   _ 020 001   _ 016 277   O 020 002   d 220 001 276   g
0010740   \0  \0   g  \0  \0   O 022   O 026   g  \0  \0   O 016   g  \0
0010760   \0   N   h 032 032 032 032 032 032 032   O 026   h 032 032 032
0011000    M  \r 005  \0  \0 020  \0   (   1   6   0   Q       V   A   L
0011020    U   E   S       5   0   Q       G   E   N   S   Y   M       1
0011040    3   Q       G   E   N   S   Y   M   )  \r   (   1   3   4   Q
0011060        :   E   N   D   1       1   2   7   Q       :   S   T   A
0011100    R   T   1       1   2   0   Q       C   L   :   R   E   P   L
0011120    A   C   E       1   1   5   Q       P   R   O   G   N   )  \r
0011140    (   )  \r   (   P   U   T   P   R   O   P   S       S   U   B
0011160    S   E   Q       S   E   T   F   -   M   E   T   H   O   D   -
0011200    E   X   P   A   N   D   E   R       S   U   B   S   E   Q   -
0011220    s   e   t   f   -   e   x   p   a   n   d   e   r   )  \r   C
0011240    O   P   Y   -   S   E   Q       D   1  \r   (   L       (   0
0011260        S   E   Q   U   E   N   C   E   )   )      \0   0 002  \0
0011300   \0 001   @ 021 021 001   H   Y   o  \0  \0  \0 034 247   I   d
0011320  004   l 005 360 225 277   @  \t  \0  \0 020  \t  \0  \0 264  \a
0011340    @  \t  \0  \0 020   g  \0  \0   H   o  \0  \0  \0  \f  \0  \0
0011360  020  \0   (   5   5   Q       C   H   E   C   K   -   T   Y   P
0011400    E   -   F   A   I   L       4   1   Q       V   E   C   T   O
0011420    R   -   C   O   P   Y   -   S   E   Q   *       3   3   Q    
0011440    V   E   C   T   O   R   P       2   7   Q       L   I   S   T
0011460    -   C   O   P   Y   -   S   E   Q   *   )  \r   (   4   5   Q
0011500        S   E   Q   U   E   N   C   E   )  \r   (       5   2   Q
0011520        (   O   R       L   I   S   T       V   E   C   T   O   R
0011540    )       1   1   Q       (   N   I   L   )   )  \r   e   x   p
0011560    a   n   d   -   L   I   S   T   -   C   O   P   Y   -   S   E
0011600    Q       D   1  \r   (   L       (   1       $   $   M   A   C
0011620    R   O   -   E   N   V   I   R   O   N   M   E   N   T       0
0011640        $   $   M   A   C   R   O   -   F   O   R   M   )   )    
0011660   \0 017 001  \0  \0 002   @ 002 001 021 001  \0   g  \0  \0   H
0011700    h 032 032 020  \0   N   I   L  \r   (   1   0   Q       A   P
0011720    P   E   N   D   )  \r   (   )  \r   (   S   E   T   F   -   M
0011740    A   C   R   O   -   F   U   N   C   T   I   O   N       (   Q
0011760    U   O   T   E       L   I   S   T   -   C   O   P   Y   -   S
0012000    E   Q   )       (   Q   U   O   T   E       e   x   p   a   n
0012020    d   -   L   I   S   T   -   C   O   P   Y   -   S   E   Q   )
0012040    )  \r   L   I   S   T   -   C   O   P   Y   -   S   E   Q   *
0012060        D   1  \r   (   L       (   0       S   E   Q   U   E   N
0012100    C   E   )   )      \0 006  \0  \0  \0 001   @  \t  \0  \0 020
0012120   \0   (   3       \   A   P   P   E   N   D   2   )  \r   N   I
0012140    L  \r   (   )  \r   e   x   p   a   n   d   -   V   E   C   T
0012160    O   R   -   C   O   P   Y   -   S   E   Q       D   1  \r   (
0012200    L       (   1       $   $   M   A   C   R   O   -   E   N   V
0012220    I   R   O   N   M   E   N   T       0       $   $   M   A   C
0012240    R   O   -   F   O   R   M   )   )      \0   f 003  \0  \0 002
0012260    @ 002 021   ! 002   H 001 271   H 002 001 272   g  \0  \0   g
0012300   \0  \0   g  \0  \0   g  \0  \0   g  \0  \0   I   h 032 032 032
0012320    h 032 032   h 032 032   h 032   g  \0  \0   o  \0  \0  \0   g
0012340   \0  \0   g  \0  \0   J   o  \0  \0  \0 032 032   h 032 032   h
0012360  032 032   o  \0  \0  \0   g  \0  \0   o  \0  \0  \0   g  \0  \0
0012400    I   o  \0  \0  \0 032 032   h 032 032 032   h 032 032 032 032
0012420    h 032 032 032 020  \0   N   I   L  \r   (   1   1   7   Q    
0012440    A   R   E   F       1   1   0   Q       S   E   T   F       6
0012460    4   Q       M   A   K   E   -   S   E   Q   U   E   N   C   E
0012500    -   O   F   -   T   Y   P   E       6   1   Q       C   O   P
0012520    Y       5   2   Q       C   L   :   D   O       3   2   Q    
0012540    V   E   C   T   O   R       2   7   Q       T   H   E       2
0012560    4   Q       C   L   :   L   E   N   G   T   H       2   1   Q
0012600        L   E   N   G   T   H       1   6   Q       L   E   T   )
0012620   \r   (       1   2   4   Q       (   I   N   D   E   X   )    
0012640    1   1   4   Q       (   A   R   E   F       C   O   P   Y    
0012660    I   N   D   E   X   )       1   0   5   Q       (   (   =    
0012700    I   N   D   E   X       L   E   N   G   T   H   )       C   O
0012720    P   Y   )       7   1   Q       (   L   E   N   G   T   H   )
0012740        5   6   Q       (   I   N   D   E   X       0       (   1
0012760    +       I   N   D   E   X   )   )   )  \r   (   S   E   T   F
0013000    -   M   A   C   R   O   -   F   U   N   C   T   I   O   N    
0013020    (   Q   U   O   T   E       V   E   C   T   O   R   -   C   O
0013040    P   Y   -   S   E   Q   )       (   Q   U   O   T   E       e
0013060    x   p   a   n   d   -   V   E   C   T   O   R   -   C   O   P
0013100    Y   -   S   E   Q   )   )  \r   V   E   C   T   O   R   -   C
0013120    O   P   Y   -   S   E   Q   *       D   1  \r   (   L       (
0013140    0       S   E   Q   U   E   N   C   E   )   )      \0   * 005
0013160   \0  \0 001   @  \t  \0  \0 021   A 004   j   @  \t  \0  \0   H
0013200   \n  \0  \0 272   Y   H  \n  \0  \0 221   J 020   J 274   I 273
0013220    @   I 266   L   K 267 277   I   k 324 260 352  \0   (   2   5
0013240    Q       %   %   =       1   7   Q       M   A   K   E   -   S
0013260    E   Q   U   E   N   C   E   -   O   F   -   T   Y   P   E    
0013300    1   3   Q       T   Y   P   E   -   O   F       3       C   L
0013320    :   L   E   N   G   T   H   )  \r   N   I   L  \r   (   )  \r
0013340    C   L   :   L   E   N   G   T   H       D   1  \r   (   L    
0013360    (   0       S   E   Q   U   E   N   C   E   )   )      \0   ;
0013400  002  \0  \0 001   @ 021 021 001   H   Y   o  \0  \0  \0 034 247
0013420    I   d 004   l 005 360 225 277   @  \t  \0  \0 020  \t  \0  \0
0013440  264 022   @   d  \t  \0  \0 225 277   @  \t  \0  \0 020  \t  \0
0013460   \0 020   g  \0  \0   H   o  \0  \0  \0  \f  \0  \0 020  \0   (
0013500    7   0   Q       C   H   E   C   K   -   T   Y   P   E   -   F
0013520    A   I   L       5   4   Q       A   R   R   A   Y   -   T   O
0013540    T   A   L   -   S   I   Z   E       5   0   Q       F   I   L
0013560    L   -   P   O   I   N   T   E   R       4   2   Q       A   R
0013600    R   A   Y   -   H   A   S   -   F   I   L   L   -   P   O   I
0013620    N   T   E   R   -   P       3   3   Q       V   E   C   T   O
0013640    R   P       2   7   Q       L   E   N   G   T   H   )  \r   (
0013660    6   0   Q       S   E   Q   U   E   N   C   E   )  \r   (    
0013700    6   5   Q       (   O   R       L   I   S   T       V   E   C
0013720    T   O   R   )       1   1   Q       (   N   I   L   )   )  \r
0013740    C   L   :   R   E   V   E   R   S   E       D   1  \r   (   L
0013760        (   0       S   E   Q   U   E   N   C   E   )   )      \0
0014000    0 002  \0  \0 001   @ 021 021 001   H   Y   o  \0  \0  \0 034
0014020  247   I   d 004   l 005 360 225 277   @  \t  \0  \0 020  \t  \0
0014040   \0 264  \a   @  \t  \0  \0 020   g  \0  \0   H   o  \0  \0  \0
0014060   \f  \0  \0 020  \0   (   5   5   Q       C   H   E   C   K   -
0014100    T   Y   P   E   -   F   A   I   L       4   1   Q       V   E
0014120    C   T   O   R   -   R   E   V   E   R   S   E   *       3   3
0014140    Q       V   E   C   T   O   R   P       2   7   Q       R   E
0014160    V   E   R   S   E   )  \r   (   4   5   Q       S   E   Q   U
0014200    E   N   C   E   )  \r   (       5   2   Q       (   O   R    
0014220    L   I   S   T       V   E   C   T   O   R   )       1   1   Q
0014240        (   N   I   L   )   )  \r   e   x   p   a   n   d   -   L
0014260    I   S   T   -   R   E   V   E   R   S   E   -   M   A   C   R
0014300    O       D   1  \r   (   L       (   1       $   $   M   A   C
0014320    R   O   -   E   N   V   I   R   O   N   M   E   N   T       0
0014340        $   $   M   A   C   R   O   -   F   O   R   M   )   )    
0014360   \0   0 001  \0  \0 002   @ 002 001 021 001  \0   g  \0  \0   o
0014400   \0  \0  \0   g  \0  \0   H   h 032 032   o  \0  \0  \0 032   g
0014420   \0  \0   g  \0  \0   H   h 032 032   o  \0  \0  \0 032 032   h
0014440  032 032 032 032 020  \0   N   I   L  \r   (   3   6   Q       C
0014460    L   :   P   O   P       3   3   Q       C   L   :   P   U   S
0014500    H       1   7   Q       E   N   D   P       1   0   Q       C
0014520    L   :   D   O   )  \r   (       4   6   Q       (   N   E   W
0014540    -   L   I   S   T   )       2   7   Q       (   N   E   W   -
0014560    L   I   S   T   )       1   4   Q       (   (   N   E   W   -
0014600    L   I   S   T       N   I   L   )   )   )  \r   (   S   E   T
0014620    F   -   M   A   C   R   O   -   F   U   N   C   T   I   O   N
0014640        (   Q   U   O   T   E       L   I   S   T   -   R   E   V
0014660    E   R   S   E   -   M   A   C   R   O   )       (   Q   U   O
0014700    T   E       e   x   p   a   n   d   -   L   I   S   T   -   R
0014720    E   V   E   R   S   E   -   M   A   C   R   O   )   )  \r   e
0014740    x   p   a   n   d   -   V   E   C   T   O   R   -   R   E   V
0014760    E   R   S   E       D   1  \r   (   L       (   1       $   $
0015000    M   A   C   R   O   -   E   N   V   I   R   O   N   M   E   N
0015020    T       0       $   $   M   A   C   R   O   -   F   O   R   M
0015040    )   )      \0   a 003  \0  \0 002   @ 002 021   ! 002   H 001
0015060  271   H 002 001 272   g  \0  \0   g  \0  \0   g  \0  \0   I   h
0015100  032 032   h 032 032   h 032   g  \0  \0   o  \0  \0  \0   o  \0
0015120   \0  \0   g  \0  \0   g  \0  \0   J   o  \0  \0  \0 032 032   h
0015140  032 032   h 032 032 032   o  \0  \0  \0   g  \0  \0   o  \0  \0
0015160   \0   g  \0  \0   I   o  \0  \0  \0 032 032   h 032 032 032   h
0015200  032 032 032 032   h 032 032 032 020  \0   N   I   L  \r   (   1
0015220    1   2   Q       A   R   E   F       1   0   3   Q       S   E
0015240    T   F       5   6   Q       M   A   K   E   -   S   E   Q   U
0015260    E   N   C   E   -   O   F   -   T   Y   P   E       5   3   Q
0015300        N   E   W   -   S   E   Q   U   E   N   C   E       4   0
0015320    Q       C   L   :   D   O       2   4   Q       C   L   :   L
0015340    E   N   G   T   H       2   1   Q       L   E   N   G   T   H
0015360        1   6   Q       L   E   T   )  \r   (       1   1   7   Q
0015400        (   B   A   C   K   W   A   R   D   -   I   N   D   E   X
0015420    )       1   0   7   Q       (   A   R   E   F       N   E   W
0015440    -   S   E   Q   U   E   N   C   E       F   O   R   W   A   R
0015460    D   -   I   N   D   E   X   )       1   0   0   Q       (   (
0015500    =       F   O   R   W   A   R   D   -   I   N   D   E   X    
0015520    L   E   N   G   T   H   )       N   E   W   -   S   E   Q   U
0015540    E   N   C   E   )  \r       6   3   Q       (   L   E   N   G
0015560    T   H   )       5   0   Q       (   B   A   C   K   W   A   R
0015600    D   -   I   N   D   E   X       (   1   -       L   E   N   G
0015620    T   H   )       (   1   -       B   A   C   K   W   A   R   D
0015640    -   I   N   D   E   X   )   )       4   4   Q       (   F   O
0015660    R   W   A   R   D   -   I   N   D   E   X       0       (   1
0015700    +       F   O   R   W   A   R   D   -   I   N   D   E   X   )
0015720    )   )  \r   (   S   E   T   F   -   M   A   C   R   O   -   F
0015740    U   N   C   T   I   O   N       (   Q   U   O   T   E       V
0015760    E   C   T   O   R   -   R   E   V   E   R   S   E   )       (
0016000    Q   U   O   T   E       e   x   p   a   n   d   -   V   E   C
0016020    T   O   R   -   R   E   V   E   R   S   E   )   )  \r   V   E
0016040    C   T   O   R   -   R   E   V   E   R   S   E   *       D   1
0016060   \r   (   L       (   0       S   E   Q   U   E   N   C   E   )
0016100    )      \0   4 006  \0  \0 001   @  \t  \0  \0 021   ! 002   j
0016120    H   k 325   @  \t  \0  \0   H  \n  \0  \0 021 003 005   K   H
0016140   \n  \0  \0 221   M 020   M 272   K 271   @   L 266   J   I 267
0016160  277   K   k 324   L   k 325 274   [ 260 346  \0   (   3   2   Q
0016200        %   %   =       2   2   Q       M   A   K   E   -   S   E
0016220    Q   U   E   N   C   E   -   O   F   -   T   Y   P   E       1
0016240    6   Q       T   Y   P   E   -   O   F       3       C   L   :
0016260    L   E   N   G   T   H   )  \r   N   I   L  \r   (   )  \r   N
0016300    R   E   V   E   R   S   E       D   1  \r   (   L       (   0
0016320        S   E   Q   U   E   N   C   E   )   )      \0   0 002  \0
0016340   \0 001   @ 021 021 001   H   Y   o  \0  \0  \0 034 247   I   d
0016360  004   l 005 360 225 277   @  \t  \0  \0 020  \t  \0  \0 264  \a
0016400    @  \t  \0  \0 020   g  \0  \0   H   o  \0  \0  \0  \f  \0  \0
0016420  020  \0   (   5   5   Q       C   H   E   C   K   -   T   Y   P
0016440    E   -   F   A   I   L       4   1   Q       V   E   C   T   O
0016460    R   -   N   R   E   V   E   R   S   E   *       3   3   Q    
0016500    V   E   C   T   O   R   P       2   7   Q       D   R   E   V
0016520    E   R   S   E   )  \r   (   4   5   Q       S   E   Q   U   E
0016540    N   C   E   )  \r   (       5   2   Q       (   O   R       L
0016560    I   S   T       V   E   C   T   O   R   )       1   1   Q    
0016600    (   N   I   L   )   )  \r   e   x   p   a   n   d   -   L   I
0016620    S   T   -   N   R   E   V   E   R   S   E   -   M   A   C   R
0016640    O       D   1  \r   (   L       (   1       $   $   M   A   C
0016660    R   O   -   E   N   V   I   R   O   N   M   E   N   T       0
0016700        $   $   M   A   C   R   O   -   F   O   R   M   )   )    
0016720   \0   1 001  \0  \0 002   @ 002 001 021 001  \0   g  \0  \0   g
0016740   \0  \0   g  \0  \0   H   h 032 032   o  \0  \0  \0 032 032   g
0016760   \0  \0   H   o  \0  \0  \0 032 032   o  \0  \0  \0 032 032   o
0017000   \0  \0  \0 032 032 020  \0   N   I   L  \r   (   3   3   Q    
0017020    2   N   D       1   6   Q       C   D   R       1   3   Q    
0017040    1   S   T       1   0   Q       C   L   :   D   O   )  \r   (
0017060        5   4   Q       (   (   (   E   N   D   P       2   N   D
0017100    )       3   R   D   )       (   R   P   L   A   C   D       2
0017120    N   D       3   R   D   )   )       4   6   Q       (   (   3
0017140    R   D       (   Q   U   O   T   E       N   I   L   )       2
0017160    N   D   )   )       4   0   Q       (   1   S   T   )       2
0017200    6   Q       (   (   C   O   N   D       (   (   E   N   D   P
0017220        1   S   T   )       1   S   T   )       (   T       (   C
0017240    D   R       1   S   T   )   )   )   )   )  \r   (   S   E   T
0017260    F   -   M   A   C   R   O   -   F   U   N   C   T   I   O   N
0017300        (   Q   U   O   T   E       L   I   S   T   -   N   R   E
0017320    V   E   R   S   E   -   M   A   C   R   O   )       (   Q   U
0017340    O   T   E       e   x   p   a   n   d   -   L   I   S   T   -
0017360    N   R   E   V   E   R   S   E   -   M   A   C   R   O   )   )
0017400   \r   L   I   S   T   -   N   R   E   V   E   R   S   E   *    
0017420    D   1  \r   (   L       (   0       S   E   Q   U   E   N   C
0017440    E   )   )      \0   # 003  \0  \0 001   @ 002   @ 021 022 002
0017460    I   d  \t  \0  \0 221   J 020   J 031 277   H   d  \t  \0  \0
0017500  222 277   H 200 002   H   I 272 271 270 260 346  \0   (   2   5
0017520    Q       E   N   D   P       1   2   Q       E   N   D   P   )
0017540   \r   N   I   L  \r   (   )  \r   e   x   p   a   n   d   -   V
0017560    E   C   T   O   R   -   N   R   E   V   E   R   S   E       D
0017600    1  \r   (   L       (   1       $   $   M   A   C   R   O   -
0017620    E   N   V   I   R   O   N   M   E   N   T       0       $   $
0017640    M   A   C   R   O   -   F   O   R   M   )   )      \0   W 001
0017660   \0  \0 002   @ 002 001 021 001  \0   g  \0  \0   g  \0  \0   g
0017700   \0  \0   g  \0  \0   g  \0  \0   H   h 032 032 032   h 032 032
0017720    h 032 032   h 032   g  \0  \0   o  \0  \0  \0   o  \0  \0  \0
0017740    H   h 032 032   g  \0  \0   g  \0  \0   H   o  \0  \0  \0 032
0017760  032   g  \0  \0   H   o  \0  \0  \0 032 032   h 032 032 032   h
0020000  032 032 032 032   h 032 032 032 020  \0   N   I   L  \r   (   1
0020020    0   0   Q       A   R   E   F       6   6   Q       A   R   E
0020040    F       6   3   Q       R   O   T   A   T   E   F       4   4
0020060    Q       C   L   :   D   O       2   4   Q       V   E   C   T
0020100    O   R       2   1   Q       T   H   E       1   6   Q       C
0020120    L   :   L   E   N   G   T   H       1   3   Q       L   E   N
0020140    G   T   H       1   0   Q       L   E   T   )  \r   (       1
0020160    0   5   Q       (   R   I   G   H   T   -   I   N   D   E   X
0020200    )       7   3   Q       (   L   E   F   T   -   I   N   D   E
0020220    X   )       5   4   Q       (   =       L   E   F   T   -   I
0020240    N   D   E   X       H   A   L   F   -   L   E   N   G   T   H
0020260    )       5   0   Q       (   (   L   E   F   T   -   I   N   D
0020300    E   X       0       (   1   +       L   E   F   T   -   I   N
0020320    D   E   X   )   )       (   R   I   G   H   T   -   I   N   D
0020340    E   X       (   1   -       L   E   N   G   T   H   )       (
0020360    1   -       R   I   G   H   T   -   I   N   D   E   X   )   )
0020400        (   H   A   L   F   -   L   E   N   G   T   H       (   I
0020420    Q   U   O   T   I   E   N   T       L   E   N   G   T   H    
0020440    2   )   )   )   )  \r   (   S   E   T   F   -   M   A   C   R
0020460    O   -   F   U   N   C   T   I   O   N       (   Q   U   O   T
0020500    E       V   E   C   T   O   R   -   N   R   E   V   E   R   S
0020520    E   )       (   Q   U   O   T   E       e   x   p   a   n   d
0020540    -   V   E   C   T   O   R   -   N   R   E   V   E   R   S   E
0020560    )   )  \r   V   E   C   T   O   R   -   N   R   E   V   E   R
0020600    S   E   *       D   1  \r   (   L       (   0       S   E   Q
0020620    U   E   N   C   E   )   )      \0   B  \t  \0  \0 001   @  \t
0020640   \0  \0 021   Q 005   j   H   k 325   H   l 002 333 021 003  \b
0020660    N   O 020  \n  \0  \0 221   @ 020   @ 275   N 274   M   L 266
0020700  273   @ 272   O 016 271   J   I 266   M   L 267 277   K   J   I
0020720  267 277   N   k 324   O 016   k 325   _ 016 277   ^ 260 324  \0
0020740    (   2   7   Q       %   %   =       3       C   L   :   L   E
0020760    N   G   T   H   )  \r   N   I   L  \r   (   )  \r   M   A   K
0021000    E   -   S   E   Q   U   E   N   C   E       D   1  \r   (   L
0021020        (   0       -   a   r   g   s   -   )   )      \0 341  \v
0021040   \0 002  \0   e 021 001  \0   k   a 021 221  \n   l 002   a 272
0021060    H   l 003 274 273   L   d   K 363 231 277   h 275   I   d 003
0021100  263 027 260 026   a   g  \0  \0 360 225   L   k 330   a 260 356
0021120    L   l 002 324   \ 260 341 001   ^   d   g  \0  \0 360 231 277
0021140    J   g  \0  \0   M  \v  \0  \0 020   g  \0  \0 360 250   N   d
0021160    g  \0  \0 360 262   0 277   J  \t  \0  \0   _ 016 277   M 262
0021200    "   j   _ 024   J  \n  \0  \0 263 031   O 016   _ 022 277   O
0021220  024   _ 020 277   M   O 022   O 020 267 277   O 024   k 324 260
0021240  343   O 016 020   g  \0  \0 360 230   J   g  \0  \0   M  \v  \0
0021260   \0 020   N   g  \0  \0 360 256   N   g  \0  \0 360 250   N   d
0021300    g  \0  \0 360 262 031 277   I 223   I 003 262 336   J   g  \0
0021320   \0   I 002 001   g  \0  \0   M  \r 005  \0  \0 020   g  \0  \0
0021340  360 246   N   g  \0  \0 360 262 023   J   g  \0  \0   o  \0  \0
0021360   \0   g  \0  \0   M  \r 005  \0  \0 020   o  \0  \0  \0   I  \n
0021400   \0  \0 020  \0   (   3   3   6   Q       C   L   :   E   R   R
0021420    O   R       3   2   5   Q       M   A   K   E   -   A   R   R
0021440    A   Y       2   7   0   Q       M   A   K   E   -   A   R   R
0021460    A   Y       2   1   5   Q       M   A   K   E   -   A   R   R
0021500    A   Y       1   4   4   Q       %   %   =       1   2   7   Q
0021520        M   A   K   E   -   S   T   R   I   N   G       1   0   4
0021540    Q       M   A   K   E   -   L   I   S   T   )  \r   (   3   2
0021560    0   Q       :   I   N   I   T   I   A   L   -   E   L   E   M
0021600    E   N   T       3   1   1   Q       :   E   L   E   M   E   N
0021620    T   -   T   Y   P   E       3   0   2   Q       S   I   M   P
0021640    L   E   -   B   I   T   -   V   E   C   T   O   R       2   7
0021660    4   Q       B   I   T   -   V   E   C   T   O   R       2   6
0021700    3   Q       :   I   N   I   T   I   A   L   -   E   L   E   M
0021720    E   N   T       2   5   5   Q       :   E   L   E   M   E   N
0021740    T   -   T   Y   P   E       2   3   7   Q       S   I   M   P
0021760    L   E   -   A   R   R   A   Y       2   3   0   Q       V   E
0022000    C   T   O   R       2   2   2   Q       A   R   R   A   Y    
0022020    2   1   1   Q       :   I   N   I   T   I   A   L   -   E   L
0022040    E   M   E   N   T       2   0   3   Q       S   I   M   P   L
0022060    E   -   V   E   C   T   O   R       1   1   7   Q       S   T
0022100    R   I   N   G       1   1   0   Q       S   I   M   P   L   E
0022120    -   S   T   R   I   N   G       1   0   0   Q       :   I   N
0022140    I   T   I   A   L   -   E   L   E   M   E   N   T       7   1
0022160    Q       L   I   S   T       4   4   Q       :   I   N   I   T
0022200    I   A   L   -   E   L   E   M   E   N   T   )  \r   (       3
0022220    3   2   Q       "   ~   S       i   s       a       b   a   d
0022240        t   y   p   e       s   p   e   c   i   f   i   e   r    
0022260    f   o   r       s   e   q   u   e   n   c   e   s   .   "    
0022300    3   1   5   Q       (   M   O   D       2   )   )  \r   C   O
0022320    N   C   A   T   E   N   A   T   E       D   1  \r   (   L    
0022340    (   0       -   a   r   g   s   -   )   )      \0 330  \r  \0
0022360  002  \0   e 021 001  \0   k   a 021   a  \a   H   l 002 021   2
0022400   \f   O 022   d   O 020 363 233 277   O 024 022 272   I   d 003
0022420  263   % 260   $   a   _ 030 277   O 026 265 023   O 030   h 032
0022440    _ 026   _ 024 277   O 022   k 324   _ 022 260 330   O 030   &
0022460    _ 026 277 260 362 001   [   d   g  \0  \0 360 262   & 277   g
0022500   \0  \0   j 275 274   J 260 026   d 001 375 002   M   k 330   ]
0022520    n 002  \0 361 226   h   l   4  \n  \0  \0 277 265 354   M   L
0022540  016 020   g  \0  \0 360 263   1   K   g  \0  \0 360 263   *   K
0022560    g  \0  \0 360 263   #   K   g  \0  \0 360 263 034   K   g  \0
0022600   \0 360 263 025   K   g  \0  \0 360 254   K   g  \0  \0 360 246
0022620    K   g  \0  \0 360 262   +   g  \0  \0   k   _ 016 277 276   I
0022640    J 260 030   d 001 375 002   O 016   k 330   _ 016   n 002  \0
0022660  361 226   h   l   4  \n  \0  \0 277 265 352   O 016   N 016 020
0022700    o  \0  \0  \0   I  \n  \0  \0 020  \0   (   3   2   5   Q    
0022720    C   L   :   E   R   R   O   R       3   0   5   Q       \   L
0022740    I   S   P   E   R   R   O   R       1   5   0   Q       \   L
0022760    I   S   P   E   R   R   O   R   )  \r   (   2   4   7   Q    
0023000    C   O   N   C   A   T   -   T   O   -   S   I   M   P   L   E
0023020    *       2   4   1   Q       S   I   M   P   L   E   -   B   I
0023040    T   -   V   E   C   T   O   R       2   3   3   Q       B   I
0023060    T   -   V   E   C   T   O   R       2   2   5   Q       S   I
0023100    M   P   L   E   -   A   R   R   A   Y       2   1   6   Q    
0023120    A   R   R   A   Y       2   0   7   Q       S   T   R   I   N
0023140    G       2   0   0   Q       V   E   C   T   O   R       1   7
0023160    1   Q       S   I   M   P   L   E   -   S   T   R   I   N   G
0023200        1   6   2   Q       S   I   M   P   L   E   -   V   E   C
0023220    T   O   R       1   1   7   Q       C   O   N   C   A   T   -
0023240    T   O   -   L   I   S   T   *       1   1   0   Q       L   I
0023260    S   T   )  \r   (       3   2   1   Q       "   ~   S   :    
0023300    i   n   v   a   l   i   d       o   u   t   p   u   t       t
0023320    y   p   e       s   p   e   c   i   f   i   c   a   t   i   o
0023340    n   .   "   )  \r   e   x   p   a   n   d   -   C   O   N   C
0023360    A   T   E   N   A   T   E   -   T   O   -   L   I   S   T    
0023400    D   1  \r   (   L       (   1       $   $   M   A   C   R   O
0023420    -   E   N   V   I   R   O   N   M   E   N   T       0       $
0023440    $   M   A   C   R   O   -   F   O   R   M   )   )      \0   +
0023460  001  \0  \0 002   @ 002 001 021 001  \0   g  \0  \0   o  \0  \0
0023500   \0   g  \0  \0   g  \0  \0   H   o  \0  \0  \0 032 032   o  \0
0023520   \0  \0 032   o  \0  \0  \0 032 032   h 032 032 032 020  \0   N
0023540    I   L  \r   (   2   2   Q       S   E   Q   U   E   N   C   E
0023560    S       1   7   Q       C   L   :   D   O       1   0   Q    
0023600    L   E   T   )  \r   (       4   2   Q       (   (   (   N   U
0023620    L   L       S   E   Q   U   E   N   C   E   S   )       (   C
0023640    D   R       R   E   S   U   L   T   )   )       (   L   E   T
0023660        (   (   S   E   Q   U   E   N   C   E       (   C   A   R
0023700        S   E   Q   U   E   N   C   E   S   )   )   )       (   S
0023720    E   Q   -   D   I   S   P   A   T   C   H       S   E   Q   U
0023740    E   N   C   E       (   C   L   :   D   O       (   (   S   E
0023760    Q   U   E   N   C   E       S   E   Q   U   E   N   C   E    
0024000    (   C   D   R       S   E   Q   U   E   N   C   E   )   )   )
0024020        (   (   E   N   D   P       S   E   Q   U   E   N   C   E
0024040    )   )       (   S   E   T   Q       S   P   L   I   C   E    
0024060    (   C   D   R       (   R   P   L   A   C   D       S   P   L
0024100    I   C   E       (   C   O   N   S       (   C   A   R       S
0024120    E   Q   U   E   N   C   E   )       N   I   L   )   )   )   )
0024140    )       (   C   L   :   D   O       (   (   I   N   D   E   X
0024160        0       (   1   +       I   N   D   E   X   )   )       (
0024200    L   E   N   G   T   H       (   C   L   :   L   E   N   G   T
0024220    H       S   E   Q   U   E   N   C   E   )   )   )       (   (
0024240    =       I   N   D   E   X       L   E   N   G   T   H   )   )
0024260        (   S   E   T   Q       S   P   L   I   C   E       (   C
0024300    D   R       (   R   P   L   A   C   D       S   P   L   I   C
0024320    E       (   C   O   N   S       (   A   R   E   F       S   E
0024340    Q   U   E   N   C   E       I   N   D   E   X   )       N   I
0024360    L   )   )   )   )   )   )   )   )  \r       3   5   Q       (
0024400    (   S   P   L   I   C   E       R   E   S   U   L   T   )   )
0024420        2   7   Q       (   (   C   D   R       S   E   Q   U   E
0024440    N   C   E   S   )   )       1   4   Q       (   (   R   E   S
0024460    U   L   T       (   L   I   S   T       N   I   L   )   )   )
0024500    )  \r   (   S   E   T   F   -   M   A   C   R   O   -   F   U
0024520    N   C   T   I   O   N       (   Q   U   O   T   E       C   O
0024540    N   C   A   T   E   N   A   T   E   -   T   O   -   L   I   S
0024560    T   )       (   Q   U   O   T   E       e   x   p   a   n   d
0024600    -   C   O   N   C   A   T   E   N   A   T   E   -   T   O   -
0024620    L   I   S   T   )   )  \r   C   O   N   C   A   T   -   T   O
0024640    -   L   I   S   T   *       D   1  \r   (   L       (   0    
0024660    -   a   r   g   s   -   )   )      \0 223  \n  \0 002  \0   e
0024700  021 001  \0   H   k 021   2 005   J   d   I 363 262 025 277   K
0024720  022 021 201  \t   h   h 032 272   I   J 274   [ 265 032   J 002
0024740  020   a 275   L 265  \r   M   h 032   \ 273   J   k 324   Z 260
0024760  332   M   & 274 260 367 001   _ 022   _ 020   d   o  \0  \0  \0
0025000  034 246   d 004   l 005 360 262 024   ]  \t  \0  \0 263   @   L
0025020    d   M 001   & 277 002 274   M 002 260 360  \t  \0  \0 264   "
0025040    j   O 022  \t  \0  \0   _ 016 277   ^   O 016  \n  \0  \0 263
0025060  036   L   d   O 022   N 266   & 277 002 274   N   k 324 260 353
0025100    g  \0  \0   O 020   o  \0  \0  \0  \f  \0  \0 277   K 002 260
0025120  214  \0   (   2   1   4   Q       C   H   E   C   K   -   T   Y
0025140    P   E   -   F   A   I   L       1   5   7   Q       %   %   =
0025160        1   4   6   Q       C   L   :   L   E   N   G   T   H    
0025200    1   3   6   Q       V   E   C   T   O   R   P       1   1   5
0025220    Q       E   N   D   P   )  \r   (   2   0   3   Q       S   E
0025240    Q   U   E   N   C   E   )  \r   (       2   1   1   Q       (
0025260    O   R       L   I   S   T       V   E   C   T   O   R   )    
0025300    1   0   0   Q       (   N   I   L   )   )  \r   C   O   N   C
0025320    A   T   -   T   O   -   S   I   M   P   L   E   *       D   1
0025340   \r   (   L       (   0       -   a   r   g   s   -   )   )    
0025360   \0 377 030  \0 002  \0   e 021 001  \0   k   a 021 241  \v   H
0025400    l 002 021   2 020   O 032   d   O 030 363 262   / 277   O 034
0025420  022   Z   j 021 022 023   O   " 265 003 202 261  \0 275   J   O
0025440    &  \t  \0  \0   j   I   O   $  \n  \0  \0 021 004 027   O   ,
0025460    O   $  \n  \0  \0 262   &   O   . 020   a   _     277   O 036
0025500  265 023   O       h 032   _ 036   _ 034 277   O 032   k 324   _
0025520  032 260 266   O       &   _ 036 277 260 362   O   ( 001   _ 024
0025540    _ 022   d   o  \0  \0  \0 034 246   d 004   l 005 360 262 037
0025560    ]  \t  \0  \0 263   U   O   . 274   O   , 273   M 001   L   K
0025600  267 277   O   ,   k 324   _   , 277   M 002 260 345  \t  \0  \0
0025620  264   ,   j   _ 020   O   * 001  \n  \0  \0 263   .   O   .   _
0025640  016 277   O   , 276   O 024   O 020 266   O 016   N 267 277   O
0025660    ,   k 324   _   , 277   O 020   k 324 260 331   g  \0  \0   O
0025700  022   o  \0  \0  \0  \f  \0  \0 277   O   ( 002   O   * 002   _
0025720    * 277   _   ( 277 261 377   Y 001  \t  \0  \0   _ 026   O   &
0025740  032   _   & 277   O   $   O 026 324   _   $ 277   O   " 002   _
0025760    " 261 377   '  \0   (   3   4   5   Q       C   L   :   L   E
0026000    N   G   T   H       3   2   1   Q       C   H   E   C   K   -
0026020    T   Y   P   E   -   F   A   I   L       2   4   4   Q       %
0026040    %   =       2   3   1   Q       V   E   C   T   O   R   P    
0026060    1   7   5   Q       E   N   D   P       7   6   Q       %   %
0026100    =       6   4   Q       M   A   K   E   -   S   E   Q   U   E
0026120    N   C   E   -   O   F   -   T   Y   P   E       5   5   Q    
0026140    R   E   V   E   R   S   E   )  \r   (   3   1   0   Q       S
0026160    E   Q   U   E   N   C   E   )  \r   (       3   1   6   Q    
0026200    (   O   R       L   I   S   T       V   E   C   T   O   R   )
0026220        1   6   0   Q       (   N   I   L   )   )  \r   (   P   U
0026240    T   P   R   O   P   S       C   M   L   S   E   Q   B   A   S
0026260    I   C   S       F   I   L   E   T   Y   P   E       C   O   M
0026300    P   I   L   E   -   F   I   L   E   )  \r   (   P   U   T   P
0026320    R   O   P   S       C   M   L   S   E   Q   B   A   S   I   C
0026340    S       C   O   P   Y   R   I   G   H   T       (   "   X   e
0026360    r   o   x       C   o   r   p   o   r   a   t   i   o   n   "
0026400        1   9   8   6   )   )  \r   S   T   O   P  \r            
0026415