$ od -c -N 50000 [phylum]<LISP>Lyric>Internal>Library>MESATYPES.LCOM!1
0000000    (   F   I   L   E   C   R   E   A   T   E   D       "   1   8
0000020    -   D   e   c   -   8   6       1   4   :   5   3   :   3   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   >   I   N   T   E   R   N   A   L   >   L   I   B   R   A
0000120    R   Y   >   M   E   S   A   T   Y   P   E   S   .   ;   1   )
0000140       \r   "   1   6   -   D   e   c   -   8   6       1   2   :
0000160    1   1   :   2   4   "       b   c   o   m   p   l   '   d    
0000200    i   n       "   X   e   r   o   x       L   i   s   p       1
0000220    6   -   D   e   c   -   8   6       .   .   .   "       d   a
0000240    t   e   d       "   1   6   -   D   e   c   -   8   6       1
0000260    2   :   4   5   :   0   8   "   )  \r   (   F   I   L   E   C
0000300    R   E   A   T   E   D       "       5   -   O   c   t   -   8
0000320    4       1   2   :   1   6   :   0   0   "       {   E   R   I
0000340    S   }   <   L   I   S   P   C   O   R   E   >   L   I   B   R
0000360    A   R   Y   >   M   E   S   A   T   Y   P   E   S   .   ;   3
0000400        1   2   6   9   7       c   h   a   n   g   e   s       t
0000420    o   :       (   V   A   R   S      \r   M   E   S   A   T   Y
0000440    P   E   S   C   O   M   S   )       p   r   e   v   i   o   u
0000460    s       d   a   t   e   :       "   1   8   -   A   p   r   -
0000500    8   4       2   1   :   1   5   :   3   1   "       {   E   R
0000520    I   S   }   <   L   I   S   P   C   O   R   E   >   L   I   B
0000540    R   A   R   Y   >   M   E   S   A   T   Y   P   E   S   .   ;
0000560    2   )  \r   M   E   S   A   T   Y   P   E   F   N     247   D
0000600    4  \r   (   P       2       r   e   s   t       P       1    
0000620    i   s   T   y   p   e       P       0       t   y   p   e   N
0000640    a   m   e       I       0       t   y   p   e   D   e   c   l
0000660    )      \0   # 003  \0  \0 001   @ 002 001   @ 002 002 001   @
0000700  002 002 002 021 003 002   g  \0  \0   H   g  \0  \0   I 032   h
0000720  032   h 032 032 032   J  \n  \0  \0 020  \0   (   3   2       \
0000740    N   C   O   N   C   2   )  \r   (   2   0       D   A   T   A
0000760        1   6       M   E   S   A   R   E   C   O   R   D   )  \r
0001000    (   )  \r   M   E   S   A   R   E   C   O   R   D   F   N    
0001020  247   D   4  \r   (   P       3       r   e   s   t       P    
0001040    2       s   u   b   b   l   o   c   k   s       P       1    
0001060    f   i   e   l   d   D   e   c   l   a   r   a   t   i   o   n
0001100    s       P       0       r   e   c   o   r   d   N   a   m   e
0001120        I       0       r   e   c   o   r   d   D   e   c   l    
0001140    F       4       \   M   E   S   A   T   Y   P   E   S   )    
0001160   \0   @ 004 001  \0 001   @ 002 001   @ 002 002 001   h   h 032
0001200    @ 002 002 002 021 004 003   g  \0  \0   H   I  \t  \0  \0   o
0001220   \0  \0  \0   h 032  \n  \0  \0   h 032 032 032   J 001   H   K
0001240   \n  \0  \0   K  \n  \0  \0  \n  \0  \0  \n  \0  \0   H   i   T
0001260   \v  \0  \0 277 020  \0   (   6   0       P   U   T   H   A   S
0001300    H       5   4       \   N   C   O   N   C   2       5   1    
0001320    \   N   C   O   N   C   2       4   8       \   N   C   O   N
0001340    C   2       4   4       M   e   s   a   R   e   c   o   r   d
0001360    C   r   e   a   t   e   M   e   t   h   o   d       3   3    
0001400    \   N   C   O   N   C   2       2   4       M   e   s   a   R
0001420    e   c   o   r   d   F   i   e   l   d   s   )  \r   (   1   9
0001440        B   L   O   C   K   R   E   C   O   R   D   )  \r   (    
0001460    2   8       (   T   H   I   S   I   S   T   H   E   L   A   S
0001500    T   F   I   E   L   D       W   O   R   D   )   )  \r   M   e
0001520    s   a   R   e   c   o   r   d   F   i   e   l   d   s     247
0001540    D   4  \r   (   P       3       f   i   e   l   d       I    
0001560    0       f   i   e   l   d   D   e   c   l   a   r   a   t   i
0001600    o   n   s       F       4       \   M   E   S   A   T   Y   P
0001620    E   S       F       5       s   u   b   b   l   o   c   k   s
0001640        F       6       r   e   c   o   r   d   N   a   m   e   )
0001660       \0   o 004 003  \0 001 021   @ 003   @ 260   e   d 001   [
0001700    d 001 262   Q 002 001   T  \n  \0  \0 263 035   K   d 002 002
0001720  001   g  \0  \0 360 262   >   d 002 001   3     262   7   d 002
0001740  001   l 002 361 262   / 277   U   V   K  \n  \0  \0  \n  \0  \0
0001760  277   K 001   g  \0  \0  \n  \0  \0   K 002 001   3     265 016
0002000    g  \0  \0   K 002 001   h 032 032  \t  \0  \0   g  \0  \0   h
0002020  032 032 032 270   I 265  \a   H   h 032   Z 201   H   & 271 002
0002040  003 265 234   J 020  \0   (   8   4       E   V   A   L       6
0002060    5       P   A   C   K   *       5   6       T   C   O   N   C
0002100        5   3       M   e   s   a   R   e   c   o   r   d   S   u
0002120    b   b   l   o   c   k       1   8       G   E   T   H   A   S
0002140    H   )  \r   (   8   7       W   O   R   D       7   5       M
0002160    E   S   A   S   I   Z   E       6   2       S   T   A   R   T
0002200    O   F   T   H   I   S   F   I   E   L   D       2   8       W
0002220    O   R   D   )  \r   (   )  \r   M   e   s   a   R   e   c   o
0002240    r   d   S   u   b   b   l   o   c   k     247   D   4  \r   (
0002260    P       1       f   i   e   l   d   S   i   z   e       P    
0002300    0       f   i   e   l   d   N   a   m   e       I       1    
0002320    f   i   e   l   d   D   e   c   l   a   r   a   t   i   o   n
0002340        I       0       r   e   c   o   r   d   N   a   m   e   )
0002360       \0   l 002  \0  \0 002   A 001   A 002 001 021 002 001   I
0002400    3     252   g  \0  \0   I   h 032 032  \t  \0  \0 271   g  \0
0002420   \0   H   g  \0  \0   g  \0  \0   @   H   g  \0  \0  \n  \0  \0
0002440    h 032 032   g  \0  \0   g  \0  \0   h 032 032 032 032   h 032
0002460  032   g  \0  \0   g  \0  \0   g  \0  \0   @   H   h 032 032   g
0002500   \0  \0   g  \0  \0   h 032 032 032 032   g  \0  \0   I   h 032
0002520  032 032 032   g  \0  \0   h 032 032 032   h 032 032 032   h 032
0002540  032 020  \0   (   4   0       P   A   C   K   *       2   1    
0002560    E   V   A   L   )  \r   (   9   4       N   E   W   V   A   L
0002600    U   E       8   5       N   E   W   V   A   L   U   E       7
0002620    7       D   A   T   U   M       7   4       o   f       6   6
0002640        f   e   t   c   h       6   3       \   B   L   T       6
0002660    0       P   R   O   G   N       4   9       D   A   T   U   M
0002700        4   6       o   f       3   7       S   T   A   R   T   O
0002720    F   T   H   I   S   F   I   E   L   D       3   2       f   e
0002740    t   c   h       2   9       L   O   C   F       2   5       A
0002760    C   C   E   S   S   F   N   S       1   4       M   E   S   A
0003000    S   I   Z   E   )  \r   (   )  \r   M   e   s   a   R   e   c
0003020    o   r   d   C   r   e   a   t   e   M   e   t   h   o   d    
0003040  247   D   4  \r   (   L       (   1       r   e   s   t       0
0003060        r   e   c   o   r   d   N   a   m   e   )   )      \0   G
0003100  002  \0  \0 002   A 021 021 001   H 003 265  \b   h 022 262 027
0003120    h 020 001   Y 001   g  \0  \0 360 225   I 265 362   i 260 357
0003140    H 002   X 260 346   g  \0  \0   g  \0  \0   g  \0  \0   g  \0
0003160   \0   g  \0  \0   @   h 032 032   h 032 032   o  \0  \0  \0 032
0003200  032   h 032 032   h 032 032   h 032 020  \0   N   I   L  \r   (
0003220    4   7       M   E   S   A   S   I   Z   E       4   4       A
0003240    D   D   1       4   1       L   R   S   H       3   8       \
0003260    A   L   L   O   C   B   L   O   C   K       3   5       C   R
0003300    E   A   T   E       1   9       C   R   E   A   T   E   )  \r
0003320    (       5   8       (   1   )   )  \r   M   E   S   A   A   R
0003340    R   A   Y   F   N     247   D   4  \r   (   P       8       i
0003360    n   d   e   x   D   e   c   l       P       4       a   r   r
0003400    a   y   O   f   f   s   e   t   s       P       3       r   e
0003420    s   t       P       2       e   l   e   m   e   n   t   T   y
0003440    p   e       P       1       i   n   d   e   x   D   e   c   l
0003460    a   r   a   t   i   o   n   s       P       0       a   r   r
0003500    a   y   N   a   m   e       I       0       a   r   r   a   y
0003520    D   e   c   l   )      \0 226  \t  \0  \0 001   @ 002 001   @
0003540  002 002 001   @ 002 002 002 001   @ 002 002 002 002 021 024 004
0003560  021   @  \b   I 260       d 001   _ 020 001  \t  \0  \0   O 020
0003600  002 001  \t  \0  \0 032 275   N 265  \b   M   h 032   _ 016 201
0003620    M   & 276 002 003 265 341   O 016 022   Y   d   J  \n  \0  \0
0003640    \   g  \0  \0   H   g  \0  \0   I   L   J  \v  \0  \0   o  \0
0003660   \0  \0 032 032   h 032   g  \0  \0   g  \0  \0   g  \0  \0   I
0003700    h 032 032   h 032 032   g  \0  \0   g  \0  \0   L   h 032 032
0003720    h 032 032   g  \0  \0   g  \0  \0   J   h 032 032   h 032 032
0003740    h 032 032 032   h 032 032   h 032 032 032 032   K  \n  \0  \0
0003760  020  \0   (   1   4   7       \   A   P   P   E   N   D   2    
0004000    8   1       M   e   s   a   A   r   r   a   y   F   i   n   d
0004020    O   f   f   s   e   t       6   7       M   e   s   a   A   r
0004040    r   a   y   O   f   f   s   e   t   s       4   0       E   V
0004060    A   L       3   3       E   V   A   L   )  \r   (   1   2   4
0004100        Q   U   O   T   E       1   2   1       E   L   E   M   E
0004120    N   T   T   Y   P   E       1   1   1       Q   U   O   T   E
0004140        1   0   8       O   F   F   S   E   T   L   I   S   T    
0004160    9   8       Q   U   O   T   E       9   5       I   N   D   E
0004200    X   L   I   S   T       9   2       A   C   C   E   S   S   F
0004220    N   S       7   5       D   A   T   A       7   1       M   E
0004240    S   A   R   E   C   O   R   D   )  \r   (       8   5       (
0004260    W   O   R   D   )   )  \r   M   e   s   a   A   r   r   a   y
0004300    O   f   f   s   e   t   s     247   D   4  \r   (   P       0
0004320        r   e   s   t   O   f   O   f   f   s   e   t   s       I
0004340        1       e   l   e   m   e   n   t   T   y   p   e       I
0004360        0       i   n   d   e   x   D   e   c   l   a   r   a   t
0004400    i   o   n   s   )      \0 027 001  \0  \0 002   @   d 262 023
0004420  002   A  \n  \0  \0 021 001  \0   @ 002   H   A  \v  \0  \0   H
0004440  032 020  \0   (   1   8       M   e   s   a   A   r   r   a   y
0004460    F   i   n   d   O   f   f   s   e   t       8       M   e   s
0004500    a   A   r   r   a   y   O   f   f   s   e   t   s   )  \r   N
0004520    I   L  \r   (   )  \r   M   e   s   a   A   r   r   a   y   F
0004540    i   n   d   O   f   f   s   e   t     247   D   4  \r   (   I
0004560        2       e   l   e   m   e   n   t   T   y   p   e       I
0004600        1       a   r   r   a   y   O   f   f   s   e   t   s    
0004620    I       0       i   n   d   e   x   D   e   c   l   a   r   a
0004640    t   i   o   n   s   )      \0 033  \0  \0  \0 003   @ 265  \r
0004660    g  \0  \0   B   h 032 032  \t  \0  \0 020 001 002   @ 001 001
0004700  331   k 330   A 001 332 020  \0   (   1   2       E   V   A   L
0004720    )  \r   (   5       M   E   S   A   S   I   Z   E   )  \r   (
0004740    )  \r   R   e   m   o   v   e   L   a   s   t     247   D   4
0004760   \r   (   P       1       l   e   n   g   t   h       P       0
0005000        n   e   w   L   i   s   t       I       0       l   i   s
0005020    t   )      \0 036 002  \0  \0 001   @  \t  \0  \0 021 021 001
0005040    H  \t  \0  \0   Y   d   k 361 241   h 020   H   I   k 331  \n
0005060   \0  \0   h 031   H 020  \0   (   2   4       F   N   T   H    
0005100    1   0       L   E   N   G   T   H       3       C   O   P   Y
0005120    )  \r   N   I   L  \r   (   )  \r   (   P   R   E   T   T   Y
0005140    C   O   M   P   R   I   N   T       M   E   S   A   T   Y   P
0005160    E   S   C   O   M   S   )  \r   (   R   P   A   Q   Q       M
0005200    E   S   A   T   Y   P   E   S   C   O   M   S       (   (   *
0005220        D   e   f   i   n   e   s       t   h   r   e   e       n
0005240    e   w       r   e   c   o   r   d       t   y   p   e   s   :
0005260        M   E   S   A   T   Y   P   E   ,       M   E   S   A   R
0005300    E   C   O   R   D   ,       a   n   d       M   E   S   A   A
0005320    R   A   Y   .       A   l   s   o      \r   p   r   o   v   i
0005340    d   e   s       a       n   u   m   b   e   r       o   f    
0005360    m   a   c   r   o   s       t   o       m   a   n   i   p   u
0005400    l   a   t   e       o   b   j   e   c   t   s       o   f    
0005420    t   h   e   s   e       r   e   c   o   r   d       t   y   p
0005440    e   s   .       N   o   n   e       o   f       t   h   i   s
0005460        p   a   c   k   a   g   e       n   e   e   d       b   e
0005500       \r   p   r   e   s   e   n   t       i   n       t   h   e
0005520        c   o   m   p   i   l   e   d       v   e   r   s   i   o
0005540    n       o   f       a       c   l   i   e   n   t       p   a
0005560    c   k   a   g   e   .   )       (   *       P   u   b   l   i
0005600    c       s   t   u   f   f   )       (   M   A   C   R   O   S
0005620        M   E   S   A   S   I   Z   E       M   E   S   A   S   E
0005640    T   Q      \r   M   E   S   A   E   Q   U   A   L       F   M
0005660    E   S   A   E   L   T       M   E   S   A   E   L   T       M
0005700    E   S   A   S   E   T   A   )       (   P   R   O   P       A
0005720    R   G   N   A   M   E   S       M   E   S   A   S   I   Z   E
0005740        M   E   S   A   S   E   T   Q       M   E   S   A   E   Q
0005760    U   A   L       F   M   E   S   A   E   L   T       M   E   S
0006000    A   E   L   T      \r   M   E   S   A   S   E   T   A   )    
0006020    (   *       P   r   i   v   a   t   e       s   t   u   f   f
0006040    )       (   I   N   I   T   V   A   R   S       (   \   M   E
0006060    S   A   T   Y   P   E   S       (   H   A   S   H   A   R   R
0006100    A   Y       2   0   )   )   )       (   P       (   p   u   s
0006120    h   n   e   w       C   L   I   S   P   R   E   C   O   R   D
0006140    T   Y   P   E   S       (   Q   U   O   T   E  \r       M   E
0006160    S   A   T   Y   P   E   )   )       (   p   u   s   h   n   e
0006200    w       C   L   I   S   P   R   E   C   O   R   D   T   Y   P
0006220    E   S       (   Q   U   O   T   E       M   E   S   A   R   E
0006240    C   O   R   D   )   )       (   p   u   s   h   n   e   w    
0006260    C   L   I   S   P   R   E   C   O   R   D   T   Y   P   E   S
0006300        (   Q   U   O   T   E       M   E   S   A   A   R   R   A
0006320    Y   )   )  \r       (   M   O   V   D       (   Q   U   O   T
0006340    E       R   E   C   O   R   D   )       (   Q   U   O   T   E
0006360        M   E   S   A   T   Y   P   E   )   )       (   M   O   V
0006400    D       (   Q   U   O   T   E       R   E   C   O   R   D   )
0006420        (   Q   U   O   T   E       M   E   S   A   R   E   C   O
0006440    R   D   )   )       (   M   O   V   D       (   Q   U   O   T
0006460    E       R   E   C   O   R   D   )      \r   (   Q   U   O   T
0006500    E       M   E   S   A   A   R   R   A   Y   )   )   )       (
0006520    P   R   O   P       U   S   E   R   R   E   C   O   R   D   T
0006540    Y   P   E       M   E   S   A   T   Y   P   E       M   E   S
0006560    A   R   E   C   O   R   D       M   E   S   A   A   R   R   A
0006600    Y   )       (   F   N   S       M   E   S   A   T   Y   P   E
0006620    F   N       M   E   S   A   R   E   C   O   R   D   F   N    
0006640   \r   M   e   s   a   R   e   c   o   r   d   F   i   e   l   d
0006660    s       M   e   s   a   R   e   c   o   r   d   S   u   b   b
0006700    l   o   c   k       M   e   s   a   R   e   c   o   r   d   C
0006720    r   e   a   t   e   M   e   t   h   o   d       M   E   S   A
0006740    A   R   R   A   Y   F   N       M   e   s   a   A   r   r   a
0006760    y   O   f   f   s   e   t   s      \r   M   e   s   a   A   r
0007000    r   a   y   F   i   n   d   O   f   f   s   e   t       R   e
0007020    m   o   v   e   L   a   s   t   )   )   )  \r   (   P   U   T
0007040    P   R   O   P   S       M   E   S   A   S   I   Z   E       M
0007060    A   C   R   O       (   a   r   g   s       (   P   R   O   G
0007100        (   (   r   e   c   o   r   d   N   a   m   e       (   C
0007120    A   R       a   r   g   s   )   )   )       (   *       R   e
0007140    t   u   r   n   s       t   h   e       s   i   z   e       o
0007160    f       r   e   c   o   r   d      \r   r   e   c   o   r   d
0007200    N   a   m   e   )       (   R   E   T   U   R   N       (   E
0007220    V   A   L       (   B   Q   U   O   T   E       (   I   N   D
0007240    E   X   F       (   f   e   t   c   h       (   ,       r   e
0007260    c   o   r   d   N   a   m   e       T   H   I   S   I   S   T
0007300    H   E   L   A   S   T   F   I   E   L   D   )       o   f    
0007320    T   )   )   )   )   )   )   )   )  \r   (   P   U   T   P   R
0007340    O   P   S       M   E   S   A   S   E   T   Q       M   A   C
0007360    R   O       (   a   r   g   s       (   P   R   O   G       (
0007400    (   a       (   C   A   R       a   r   g   s   )   )       (
0007420    b       (   C   A   D   R       a   r   g   s   )   )       (
0007440    t   y   p   e       (   C   A   D   D   R       a   r   g   s
0007460    )   )   )       (   *       C   o   p   i   e   s      \r   t
0007500    h   e       c   o   n   t   e   n   t   s       o   f       "
0007520    b   "       i   n   t   o       "   a   "       R   e   t   u
0007540    r   n   s       a   .       S   h   o   u   l   d       b   e
0007560        u   s   e   d       t   o       t   r   a   n   s   l   a
0007600    t   e       s   t   a   t   e   m   e   n   t       o   f    
0007620    t   h   e       f   o   r   m       "   a       _       b   ;
0007640    "      \r   w   h   e   n       a       a   n   d       b    
0007660    a   r   e       n   e   i   t   h   e   r       n   u   m   b
0007700    e   r   s       n   o   r       p   o   i   n   t   e   r   s
0007720    .       A       s   a   f   e   r       (   i   e   ,       m
0007740    o   r   e       c   o   r   r   e   c   t   )       w   a   y
0007760        t   o       d   o       t   h   i   s       w   o   u   l
0010000    d       b   e       t   o      \r   s   a   y      \r   "   (
0010020    f   o   r   e   a   c   h       f   i   e   l   d       f    
0010040    i   n       t   y   p   e       s   t       f       h   a   s
0010060        b   o   t   h       a       f   e   t   c   h       a   n
0010100    d       a       r   e   p   l   a   c   e       m   e   t   h
0010120    o   d       d   o       (   r   e   p   l   a   c   e       (
0010140    t   y   p   e       f   )       o   f       a       w   i   t
0010160    h       (   f   e   t   c   h       (   t   y   p   e       f
0010200    )       o   f       b   )   )   )   "  \r   )       (   R   E
0010220    T   U   R   N       (   B   Q   U   O   T   E       (   \   B
0010240    L   T       ,       a       ,       b       (   M   E   S   A
0010260    S   I   Z   E       ,       t   y   p   e   )   )   )   )   )
0010300    )   )  \r   (   P   U   T   P   R   O   P   S       M   E   S
0010320    A   E   Q   U   A   L       M   A   C   R   O       (   a   r
0010340    g   s       (   P   R   O   G       (   (   a       (   C   A
0010360    R       a   r   g   s   )   )       (   b       (   C   A   D
0010400    R       a   r   g   s   )   )       (   t   y   p   e       (
0010420    C   A   D   D   R       a   r   g   s   )   )   )       (   *
0010440        C   o   m   p   a   r   e   s  \r       a       a   n   d
0010460        b       f   o   r       e   q   u   a   l   i   t   y   ,
0010500        w   h   e   r   e       a       a   n   d       b       a
0010520    r   e       i   n   s   t   a   n   c   e   s       o   f    
0010540    r   e   c   o   r   d       t   y   p   e   .       a       a
0010560    n   d       b       c   a   n       b   e       m   u   l   t
0010600    i   p   l   e       w   o   r   d   s       l   o   n   g   .
0010620   \r   )       (   R   E   T   U   R   N       (   B   Q   U   O
0010640    T   E       (   f   o   r       w   o   r   d       f   r   o
0010660    m       0       t   o       (   S   U   B   1       (   M   E
0010700    S   A   S   I   Z   E       ,       t   y   p   e   )   )    
0010720    a   l   w   a   y   s       (   E   Q       (   \   G   E   T
0010740    B   A   S   E       ,       a       w   o   r   d   )       (
0010760   \r   \   G   E   T   B   A   S   E       ,       b       w   o
0011000    r   d   )   )   )   )   )   )   )   )  \r   (   P   U   T   P
0011020    R   O   P   S       F   M   E   S   A   E   L   T       M   A
0011040    C   R   O       (   a   r   g   s       (   P   R   O   G    
0011060    (   (   a   r   r   a   y       (   C   A   R       a   r   g
0011100    s   )   )       (   a   r   r   a   y   T   y   p   e       (
0011120    C   A   D   R       a   r   g   s   )   )       (   i   n   d
0011140    e   x   e   s       (   C   D   D   R       a   r   g   s   )
0011160    )  \r       i   n   d   e   x   R   a   n   g   e   L   i   s
0011200    t       i   n   d   e   x   O   f   f   s   e   t   L   i   s
0011220    t   )       (   *       R   e   t   u   r   n   s       a    
0011240    p   o   i   n   t   e   r       t   o       t   h   e       i
0011260    n   d   i   c   a   t   e   d       e   l   e   m   e   n   t
0011300        o   f       a   r   r   a   y   .       U   n   s   a   f
0011320    e   ,      \r   b   e   c   a   u   s   e       i   t       r
0011340    e   t   u   r   n   s       a       p   o   i   n   t   e   r
0011360        t   o       t   h   e       m   i   d   d   l   e       o
0011400    f       t   h   e       s   t   r   u   c   t   u   r   e   ,
0011420        w   h   i   c   h       w   o   u   l   d       c   o   n
0011440    f   u   s   e       t   h   e       g   a   r   b   a   g   e
0011460        c   o   l   l   e   c   t   o   r  \r       i   f       y
0011500    o   u       h   e   l   d       o   n   t   o       t   h   e
0011520        e   l   e   m   e   n   t       p   o   i   n   t   e   r
0011540        l   o   n   g   e   r       t   h   a   n       t   h   e
0011560        a   r   r   a   y       p   o   i   n   t   e   r   .   )
0011600        (   S   E   T   Q       i   n   d   e   x   R   a   n   g
0011620    e   L   i   s   t       (   E   V   A   L       (  \r   B   Q
0011640    U   O   T   E       (   f   e   t   c   h       (   ,       a
0011660    r   r   a   y   T   y   p   e       I   N   D   E   X   L   I
0011700    S   T   )       o   f       T   )   )   )   )       (   S   E
0011720    T   Q       i   n   d   e   x   O   f   f   s   e   t   L   i
0011740    s   t       (   E   V   A   L       (   B   Q   U   O   T   E
0011760        (   f   e   t   c   h       (   ,       a   r   r   a   y
0012000    T   y   p   e  \r       O   F   F   S   E   T   L   I   S   T
0012020    )       o   f       T   )   )   )   )       (   R   E   T   U
0012040    R   N       (   L   I   S   T       (   Q   U   O   T   E    
0012060    \   A   D   D   B   A   S   E   )       a   r   r   a   y    
0012100    (   C   O   N   S       (   Q   U   O   T   E       I   P   L
0012120    U   S   )       (   f   o   r       i   n   d   e   x       i
0012140    n       i   n   d   e   x   e   s      \r   a   s       i   n
0012160    d   e   x   R   a   n   g   e       i   n       i   n   d   e
0012200    x   R   a   n   g   e   L   i   s   t       a   s       o   f
0012220    f   s   e   t       i   n       i   n   d   e   x   O   f   f
0012240    s   e   t   L   i   s   t       c   o   l   l   e   c   t    
0012260    (   B   Q   U   O   T   E       (   (   O   P   E   N   L   A
0012300    M   B   D   A       (   i   n   d   e   x   )       (   O   R
0012320       \r   (   A   N   D       (   I   L   E   Q       ,       (
0012340    C   A   R       i   n   d   e   x   R   a   n   g   e   )    
0012360    i   n   d   e   x   )       (   I   L   E   Q       i   n   d
0012400    e   x       ,       (   C   D   R       i   n   d   e   x   R
0012420    a   n   g   e   )   )   )       (   E   R   R   O   R       (
0012440    Q   U   O   T   E       i   n   d   e   x   O   u   t   O   f
0012460    R   a   n   g   e   )   )   )  \r       (   I   T   I   M   E
0012500    S       ,       o   f   f   s   e   t       (   I   D   I   F
0012520    F   E   R   E   N   C   E       i   n   d   e   x       ,    
0012540    (   C   A   R       i   n   d   e   x   R   a   n   g   e   )
0012560    )   )   )       ,       i   n   d   e   x   )   )   )   )   )
0012600    )   )   )   )  \r   (   P   U   T   P   R   O   P   S       M
0012620    E   S   A   E   L   T       M   A   C   R   O       (   a   r
0012640    g   s       (   P   R   O   G       (   (   a   r   r   a   y
0012660    T   y   p   e       (   C   A   D   R       a   r   g   s   )
0012700    )       e   l   e   m   e   n   t   T   y   p   e   )       (
0012720    *       R   e   t   u   r   n   s       t   h   e       s   e
0012740    l   e   c   t   e   d      \r   e   l   e   m   e   n   t    
0012760    o   f       t   h   e       a   r   r   a   y   .       C   o
0013000    p   i   e   s       i   t       i   n   t   o       a       f
0013020    r   e   s   h   l   y       a   l   l   o   c   a   t   e   d
0013040        b   o   x       t   o       a   v   o   i   d       r   e
0013060    t   u   r   n   i   n   g       a       p   o   i   n   t   e
0013100    r       t   o       t   h   e      \r   m   i   d   d   l   e
0013120        o   f       t   h   e       s   t   r   u   c   t   u   r
0013140    e   ,       w   h   i   c   h       m   i   g   h   t       c
0013160    o   n   f   u   s   e       t   h   e       g   a   r   b   a
0013200    g   e       c   o   l   l   e   c   t   o   r   .   )       (
0013220    S   E   T   Q       e   l   e   m   e   n   t   T   y   p   e
0013240        (   E   V   A   L       (   B   Q   U   O   T   E       (
0013260   \r   f   e   t   c   h       (   ,       a   r   r   a   y   T
0013300    y   p   e       E   L   E   M   E   N   T   T   Y   P   E   )
0013320        o   f       T   )   )   )   )       (   R   E   T   U   R
0013340    N       (   B   Q   U   O   T   E       (   M   E   S   A   S
0013360    E   T   Q       (   c   r   e   a   t   e       ,       e   l
0013400    e   m   e   n   t   T   y   p   e   )       ,       (   C   O
0013420    N   S       (  \r   Q   U   O   T   E       F   M   E   S   A
0013440    E   L   T   )       a   r   g   s   )       ,       e   l   e
0013460    m   e   n   t   T   y   p   e   )   )   )   )   )   )  \r   (
0013500    P   U   T   P   R   O   P   S       M   E   S   A   S   E   T
0013520    A       M   A   C   R   O       (   a   r   g   s       (   P
0013540    R   O   G       (   (   e   l   t   A   r   g   s       (   R
0013560    e   m   o   v   e   L   a   s   t       a   r   g   s   )   )
0013600        (   a   r   r   a   y   T   y   p   e       (   C   A   D
0013620    R       a   r   g   s   )   )       (   n   e   w   V   a   l
0013640    u   e       (  \r   C   A   R       (   L   A   S   T       a
0013660    r   g   s   )   )   )       e   l   e   m   e   n   t   T   y
0013700    p   e   )       (   *       R   e   p   l   a   c   e   s    
0013720    t   h   e       i   n   d   e   x   '   t   h       e   l   e
0013740    m   e   n   t       o   f       a   r   r   a   y   ,       p
0013760    r   o   v   i   d   e   d       t   h   a   t       a   r   r
0014000    a   y       i   s       a      \r   c   o   n   t   i   g   u
0014020    o   u   s       r   u   n       o   f       o   b   j   e   c
0014040    t   s       o   f       t   y   p   e       e   l   e   m   e
0014060    n   t   T   y   p   e   )       (   S   E   T   Q       e   l
0014100    e   m   e   n   t   T   y   p   e       (   E   V   A   L    
0014120    (   B   Q   U   O   T   E       (   f   e   t   c   h       (
0014140    ,       a   r   r   a   y   T   y   p   e      \r   E   L   E
0014160    M   E   N   T   T   Y   P   E   )       o   f       T   )   )
0014200    )   )       (   R   E   T   U   R   N       (   B   Q   U   O
0014220    T   E       (   M   E   S   A   S   E   T   Q       ,       (
0014240    C   O   N   S       (   Q   U   O   T   E       F   M   E   S
0014260    A   E   L   T   )       e   l   t   A   r   g   s   )       ,
0014300        n   e   w   V   a   l   u   e       ,      \r   e   l   e
0014320    m   e   n   t   T   y   p   e   )   )   )   )   )   )  \r   (
0014340    P   U   T   P   R   O   P   S       M   E   S   A   S   I   Z
0014360    E       A   R   G   N   A   M   E   S       (   r   e   c   o
0014400    r   d   N   a   m   e   )   )  \r   (   P   U   T   P   R   O
0014420    P   S       M   E   S   A   S   E   T   Q       A   R   G   N
0014440    A   M   E   S       (   a       b       t   y   p   e   )   )
0014460   \r   (   P   U   T   P   R   O   P   S       M   E   S   A   E
0014500    Q   U   A   L       A   R   G   N   A   M   E   S       (   a
0014520        b       t   y   p   e   )   )  \r   (   P   U   T   P   R
0014540    O   P   S       F   M   E   S   A   E   L   T       A   R   G
0014560    N   A   M   E   S       (   a   r   r   a   y       a   r   r
0014600    a   y   T   y   p   e       i   n   d   e   x   1       .   .
0014620    .       i   n   d   e   x   n   )   )  \r   (   P   U   T   P
0014640    R   O   P   S       M   E   S   A   E   L   T       A   R   G
0014660    N   A   M   E   S       (   a   r   r   a   y       a   r   r
0014700    a   y   T   y   p   e       i   n   d   e   x   1       .   .
0014720    .       i   n   d   e   x   n   )   )  \r   (   P   U   T   P
0014740    R   O   P   S       M   E   S   A   S   E   T   A       A   R
0014760    G   N   A   M   E   S       (   a   r   r   a   y       a   r
0015000    r   a   y   T   y   p   e       i   n   d   e   x   1       .
0015020    .   .       i   n   d   e   x   n       n   e   w   V   a   l
0015040    u   e   )   )  \r   (   R   P   A   Q   ?       \   M   E   S
0015060    A   T   Y   P   E   S       (   H   A   S   H   A   R   R   A
0015100    Y       2   0   )   )  \r   (   p   u   s   h   n   e   w    
0015120    C   L   I   S   P   R   E   C   O   R   D   T   Y   P   E   S
0015140        (   Q   U   O   T   E       M   E   S   A   T   Y   P   E
0015160    )   )  \r   (   p   u   s   h   n   e   w       C   L   I   S
0015200    P   R   E   C   O   R   D   T   Y   P   E   S       (   Q   U
0015220    O   T   E       M   E   S   A   R   E   C   O   R   D   )   )
0015240   \r   (   p   u   s   h   n   e   w       C   L   I   S   P   R
0015260    E   C   O   R   D   T   Y   P   E   S       (   Q   U   O   T
0015300    E       M   E   S   A   A   R   R   A   Y   )   )  \r   (   M
0015320    O   V   D       (   Q   U   O   T   E       R   E   C   O   R
0015340    D   )       (   Q   U   O   T   E       M   E   S   A   T   Y
0015360    P   E   )   )  \r   (   M   O   V   D       (   Q   U   O   T
0015400    E       R   E   C   O   R   D   )       (   Q   U   O   T   E
0015420        M   E   S   A   R   E   C   O   R   D   )   )  \r   (   M
0015440    O   V   D       (   Q   U   O   T   E       R   E   C   O   R
0015460    D   )       (   Q   U   O   T   E       M   E   S   A   A   R
0015500    R   A   Y   )   )  \r   (   P   U   T   P   R   O   P   S    
0015520    M   E   S   A   T   Y   P   E       U   S   E   R   R   E   C
0015540    O   R   D   T   Y   P   E       M   E   S   A   T   Y   P   E
0015560    F   N   )  \r   (   P   U   T   P   R   O   P   S       M   E
0015600    S   A   R   E   C   O   R   D       U   S   E   R   R   E   C
0015620    O   R   D   T   Y   P   E       M   E   S   A   R   E   C   O
0015640    R   D   F   N   )  \r   (   P   U   T   P   R   O   P   S    
0015660    M   E   S   A   A   R   R   A   Y       U   S   E   R   R   E
0015700    C   O   R   D   T   Y   P   E       M   E   S   A   A   R   R
0015720    A   Y   F   N   )  \r   (   P   U   T   P   R   O   P   S    
0015740    M   E   S   A   T   Y   P   E   S       C   O   P   Y   R   I
0015760    G   H   T       (   "   X   e   r   o   x       C   o   r   p
0016000    o   r   a   t   i   o   n   "       1   9   8   4   )   )  \r
0016020    N   I   L  \r                                                
0016024