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