$ od -c -N 50000 [phylum]<LISP>KOTO>Library>ChapCONTROLFNS.txt!1
0000000           \r   9   .  \t   C   O   N   D   I   T   I   O   N   A
0000020    L   S       A   N   D       I   T   E   R   A   T   I   V   E
0000040        S   T   A   T   E   M   E   N   T   S  \r  \r      \r   I
0000060    n       o   r   d   e   r       t   o       d   o       a   n
0000100    y       b   u   t       t   h   e       s   i   m   p   l   e
0000120    s   t       c   o   m   p   u   t   a   t   i   o   n   s   ,
0000140        i   t       i   s       n   e   c   e   s   s   a   r   y
0000160        t   o       t   e   s   t       v   a   l   u   e   s    
0000200    a   n   d       e   x   e   c   u   t   e       e   x   p   r
0000220    e   s   s   i   o   n   s       c   o   n   d   i   t   i   o
0000240    n   a   l   l   y   ,       a   n   d       t   o       e   x
0000260    e   c   u   t   e       a       s   e   r   i   e   s       o
0000300    f       e   x   p   r   e   s   s   i   o   n   s   .        
0000320    I   n   t   e   r   l   i   s   p       s   u   p   p   l   i
0000340    e   s       a       l   a   r   g   e       n   u   m   b   e
0000360    r       o   f       p   r   e   d   i   c   a   t   e   s   ,
0000400        c   o   n   d   i   t   i   o   n   a   l       f   u   n
0000420    c   t   i   o   n   s   ,       a   n   d       c   o   n   t
0000440    r   o   l       f   u   n   c   t   i   o   n   s   .        
0000460    A   l   s   o   ,       t   h   e   r   e       i   s       a
0000500        c   o   m   p   l   e   x       "   i   t   e   r   a   t
0000520    i   v   e       s   t   a   t   e   m   e   n   t   "       f
0000540    a   c   i   l   i   t   y       w   h   i   c   h       a   l
0000560    l   o   w   s       t   h   e       u   s   e   r       t   o
0000600        e   a   s   i   l   y       c   r   e   a   t   e       c
0000620    o   m   p   l   e   x       l   o   o   p   s       a   n   d
0000640        i   t   e   r   a   t   i   v   e       c   o   n   s   t
0000660    r   u   c   t   s       (   p   a   g   e       X   .   X   X
0000700    )   .  \r  \r   9   .   1          \t   D   a   t   a       T
0000720    y   p   e       P   r   e   d   i   c   a   t   e   s  \r  \r
0000740    I   n   t   e   r   l   i   s   p       p   r   o   v   i   d
0000760    e   s       s   e   p   a   r   a   t   e       f   u   n   c
0001000    t   i   o   n   s       f   o   r       t   e   s   t   i   n
0001020    g       w   h   e   t   h   e   r       o   b   j   e   c   t
0001040    s       a   r   e       o   f       c   e   r   t   a   i   n
0001060        c   o   m   m   o   n   l   y   -   u   s   e   d       t
0001100    y   p   e   s   :  \r   (   L   I   T   A   T   O   M       X
0001120    )          \t   [   F   u   n   c   t   i   o   n   ]  \r   R
0001140    e   t   u   r   n   s       T       i   f       X       i   s
0001160        a       l   i   t   a   t   o   m       (   s   e   e    
0001200    p   a   g   e       X   .   X   X   )       N   I   L       o
0001220    t   h   e   r   w   i   s   e   .           N   o   t   e    
0001240    t   h   a   t       a       n   u   m   b   e   r       i   s
0001260        n   o   t       a       l   i   t   a   t   o   m   .    
0001300   \r  \r   (   S   M   A   L   L   P       X   )          \t   [
0001320    F   u   n   c   t   i   o   n   ]  \r   R   e   t   u   r   n
0001340    s       X       i   f       X       i   s       a       s   m
0001360    a   l   l       i   n   t   e   g   e   r   ;       N   I   L
0001400        o   t   h   e   r   w   i   s   e   .           (   N   o
0001420    t   e       t   h   a   t       t   h   e       r   a   n   g
0001440    e       o   f       s   m   a   l   l       i   n   t   e   g
0001460    e   r   s       i   s       i   m   p   l   e   m   e   n   t
0001500    a   t   i   o   n   -   d   e   p   e   n   d   e   n   t   .
0001520            S   e   e       p   a   g   e       X   .   X   X   .
0001540    )  \r  \r   (   F   I   X   P       X   )          \t   [   F
0001560    u   n   c   t   i   o   n   ]  \r   R   e   t   u   r   n   s
0001600        X       i   f       X       i   s       a       s   m   a
0001620    l   l       o   r       l   a   r   g   e       i   n   t   e
0001640    g   e   r   ;       N   I   L       o   t   h   e   r   w   i
0001660    s   e   .  \r  \r   (   F   L   O   A   T   P       X   )    
0001700       \t   [   F   u   n   c   t   i   o   n   ]  \r   R   e   t
0001720    u   r   n   s       X       i   f       X       i   s       a
0001740        f   l   o   a   t   i   n   g       p   o   i   n   t    
0001760    n   u   m   b   e   r   ;       N   I   L       o   t   h   e
0002000    r   w   i   s   e   .  \r  \r   (   N   U   M   B   E   R   P
0002020        X   )          \t   [   F   u   n   c   t   i   o   n   ]
0002040   \r   R   e   t   u   r   n   s       X       i   f       X    
0002060    i   s       a       n   u   m   b   e   r       o   f       a
0002100    n   y       t   y   p   e       (   F   I   X   P       o   r
0002120        F   L   O   A   T   P   )   ,       N   I   L       o   t
0002140    h   e   r   w   i   s   e   .  \r  \r   (   A   T   O   M    
0002160    X   )          \t   [   F   u   n   c   t   i   o   n   ]  \r
0002200    R   e   t   u   r   n   s       T       i   f       X       i
0002220    s       a   n       a   t   o   m       (   i   .   e   .    
0002240    a       l   i   t   a   t   o   m       o   r       a       n
0002260    u   m   b   e   r   )   ;       N   I   L       o   t   h   e
0002300    r   w   i   s   e   .  \r   W   a   r   n   i   n   g   :    
0002320        (   A   T   O   M       X   )       i   s       N   I   L
0002340        i   f       X       i   s       a   n       a   r   r   a
0002360    y   ,       s   t   r   i   n   g   ,       e   t   c   .    
0002400        I   n       m   a   n   y       d   i   a   l   e   c   t
0002420    s       o   f       L   i   s   p   ,       t   h   e       f
0002440    u   n   c   t   i   o   n       A   T   O   M       i   s    
0002460    d   e   f   i   n   e   d       e   q   u   i   v   a   l   e
0002500    n   t       t   o       t   h   e       I   n   t   e   r   l
0002520    i   s   p       f   u   n   c   t   i   o   n       N   L   I
0002540    S   T   P   .  \r  \r   (   L   I   S   T   P       X   )    
0002560       \t   [   F   u   n   c   t   i   o   n   ]  \r   R   e   t
0002600    u   r   n   s       X       i   f       X       i   s       a
0002620        l   i   s   t       c   e   l   l   ,       e   .   g   .
0002640    ,       s   o   m   e   t   h   i   n   g       c   r   e   a
0002660    t   e   d       b   y       C   O   N   S   ;       N   I   L
0002700        o   t   h   e   r   w   i   s   e   .  \r  \r   (   N   L
0002720    I   S   T   P       X   )          \t   [   F   u   n   c   t
0002740    i   o   n   ]  \r   (   N   O   T       (   L   I   S   T   P
0002760        X   )   )   .           R   e   t   u   r   n   s       T
0003000        i   f       X       i   s       n   o   t       a       l
0003020    i   s   t       c   e   l   l   ,       N   I   L       o   t
0003040    h   e   r   w   i   s   e   .  \r  \r   (   S   T   R   I   N
0003060    G   P       X   )          \t   [   F   u   n   c   t   i   o
0003100    n   ]  \r   R   e   t   u   r   n   s       X       i   f    
0003120    X       i   s       a       s   t   r   i   n   g   ,       N
0003140    I   L       o   t   h   e   r   w   i   s   e   .  \r  \r   (
0003160    A   R   R   A   Y   P       X   )          \t   [   F   u   n
0003200    c   t   i   o   n   ]  \r   R   e   t   u   r   n   s       X
0003220        i   f       X       i   s       a   n       a   r   r   a
0003240    y   ,       N   I   L       o   t   h   e   r   w   i   s   e
0003260    .  \r   N   o   t   e   :           I   n       s   o   m   e
0003300        i   m   p   l   e   m   e   n   t   a   t   i   o   n   s
0003320        o   f       I   n   t   e   r   l   i   s   p       (   b
0003340    u   t       n   o   t       I   n   t   e   r   l   i   s   p
0003360    -   D   )   ,       A   R   R   A   Y   P       m   a   y    
0003400    a   l   s   o       r   e   t   u   r   n       X       i   f
0003420        i   t       i   s       o   f       t   y   p   e       C
0003440    C   O   D   E   P       o   r       H   A   R   R   A   Y   P
0003460    .  \r  \r   (   H   A   R   R   A   Y   P       X   )        
0003500   \t   [   F   u   n   c   t   i   o   n   ]  \r   R   e   t   u
0003520    r   n   s       X       i   f       i   t       i   s       a
0003540        h   a   s   h       a   r   r   a   y       o   b   j   e
0003560    c   t   ;       o   t   h   e   r   w   i   s   e       N   I
0003600    L   .  \r   N   o   t   e       t   h   a   t       H   A   R
0003620    R   A   Y   P       r   e   t   u   r   n   s       N   I   L
0003640        i   f       X       i   s       a       l   i   s   t    
0003660    w   h   o   s   e       C   A   R       i   s       a   n    
0003700    H   A   R   R   A   Y   P   ,       e   v   e   n       t   h
0003720    o   u   g   h       t   h   i   s       i   s       a   c   c
0003740    e   p   t   e   d       b   y       t   h   e       h   a   s
0003760    h       a   r   r   a   y       f   u   n   c   t   i   o   n
0004000    s   .  \r  \r   N   o   t   e   :           T   h   e       e
0004020    m   p   t   y       l   i   s   t   ,       (   )       o   r
0004040        N   I   L   ,       i   s       c   o   n   s   i   d   e
0004060    r   e   d       t   o       b   e       a       l   i   t   a
0004100    t   o   m   ,       r   a   t   h   e   r       t   h   a   n
0004120        a       l   i   s   t   .           T   h   e   r   e   f
0004140    o   r   e   ,       (   L   I   T   A   T   O   M       N   I
0004160    L   )       =       (   A   T   O   M       N   I   L   )    
0004200    =       T       a   n   d       (   L   I   S   T   P       N
0004220    I   L   )       =       N   I   L   .           C   a   r   e
0004240        s   h   o   u   l   d       b   e       t   a   k   e   n
0004260        w   h   e   n       u   s   i   n   g       t   h   e   s
0004300    e       f   u   n   c   t   i   o   n   s       i   f       t
0004320    h   e       o   b   j   e   c   t       m   a   y       b   e
0004340        t   h   e       e   m   p   t   y       l   i   s   t    
0004360    N   I   L   .  \r  \r   9   .   2          \t   E   q   u   a
0004400    l   i   t   y       P   r   e   d   i   c   a   t   e   s  \r
0004420   \r   A       c   o   m   m   o   n       o   p   e   r   a   t
0004440    i   o   n       w   h   e   n       d   e   a   l   i   n   g
0004460        w   i   t   h       d   a   t   a       o   b   j   e   c
0004500    t   s       i   s       t   o       t   e   s   t       w   h
0004520    e   t   h   e   r       t   w   o       o   b   j   e   c   t
0004540    s       a   r   e       e   q   u   a   l   .           I   n
0004560        s   o   m   e       c   a   s   e   s   ,       s   u   c
0004600    h       a   s       w   h   e   n       c   o   m   p   a   r
0004620    i   n   g       t   w   o       s   m   a   l   l       i   n
0004640    t   e   g   e   r   s   ,       e   q   u   a   l   i   t   y
0004660        c   a   n       b   e       e   a   s   i   l   y       d
0004700    e   t   e   r   m   i   n   e   d   .           H   o   w   e
0004720    v   e   r   ,       s   o   m   e   t   i   m   e   s       t
0004740    h   e   r   e       i   s       m   o   r   e       t   h   a
0004760    n       o   n   e       t   y   p   e       o   f       e   q
0005000    u   a   l   i   t   y   .           F   o   r       i   n   s
0005020    t   a   n   c   e   ,       g   i   v   e   n       t   w   o
0005040        l   i   s   t   s   ,       o   n   e       c   a   n    
0005060    a   s   k       w   h   e   t   h   e   r       t   h   e   y
0005100        a   r   e       e   x   a   c   t   l   y       t   h   e
0005120        s   a   m   e       o   b   j   e   c   t   ,       o   r
0005140        w   h   e   t   h   e   r       t   h   e   y       a   r
0005160    e       t   w   o       d   i   s   t   i   n   c   t       l
0005200    i   s   t   s       w   h   i   c   h       c   o   n   t   a
0005220    i   n       t   h   e       s   a   m   e       e   l   e   m
0005240    e   n   t   s   .           C   o   n   f   u   s   i   o   n
0005260        b   e   t   w   e   e   n       t   h   e   s   e       t
0005300    w   o       t   y   p   e   s       o   f       e   q   u   a
0005320    l   i   t   y       i   s       o   f   t   e   n       t   h
0005340    e       s   o   u   r   c   e       o   f       p   r   o   g
0005360    r   a   m       e   r   r   o   r   s   .           I   n   t
0005400    e   r   l   i   s   p       s   u   p   p   l   i   e   s    
0005420    a   n       e   x   t   e   n   s   i   v   e       s   e   t
0005440        o   f       f   u   n   c   t   i   o   n   s       f   o
0005460    r       t   e   s   t   i   n   g       e   q   u   a   l   i
0005500    t   y   :  \r   (   E   Q       X       Y   )          \t   [
0005520    F   u   n   c   t   i   o   n   ]  \r   R   e   t   u   r   n
0005540    s       T       i   f       X       a   n   d       Y       a
0005560    r   e       i   d   e   n   t   i   c   a   l       p   o   i
0005600    n   t   e   r   s   ;       N   I   L       o   t   h   e   r
0005620    w   i   s   e   .           E   Q       s   h   o   u   l   d
0005640        n   o   t       b   e       u   s   e   d       t   o    
0005660    c   o   m   p   a   r   e       t   w   o       n   u   m   b
0005700    e   r   s   ,       u   n   l   e   s   s       t   h   e   y
0005720        a   r   e       s   m   a   l   l       i   n   t   e   g
0005740    e   r   s   ;       u   s   e       E   Q   P       i   n   s
0005760    t   e   a   d   .  \r  \r   (   N   E   Q       X       Y   )
0006000           \t   [   F   u   n   c   t   i   o   n   ]  \r   (   N
0006020    O   T       (   E   Q       X       Y   )   )  \r  \r   (   N
0006040    U   L   L       X   )          \t   [   F   u   n   c   t   i
0006060    o   n   ]  \r   (   N   O   T       X   )          \t   [   F
0006100    u   n   c   t   i   o   n   ]  \r   (   E   Q       X       N
0006120    I   L   )  \r  \r   (   E   Q   P       X       Y   )        
0006140   \t   [   F   u   n   c   t   i   o   n   ]  \r   R   e   t   u
0006160    r   n   s       T       i   f       X       a   n   d       Y
0006200        a   r   e       E   Q   ,       o   r       i   f       X
0006220        a   n   d       Y       a   r   e       n   u   m   b   e
0006240    r   s       a   n   d       a   r   e       e   q   u   a   l
0006260        i   n       v   a   l   u   e   ;       N   I   L       o
0006300    t   h   e   r   w   i   s   e   .           F   o   r       m
0006320    o   r   e       d   i   s   c   u   s   s   i   o   n       o
0006340    f       E   Q   P       a   n   d       o   t   h   e   r    
0006360    n   u   m   b   e   r       f   u   n   c   t   i   o   n   s
0006400    ,       s   e   e       p   a   g   e       X   .   X   X   .
0006420   \r   N   o   t   e   :           E   Q   P       a   l   s   o
0006440        c   a   n       b   e       u   s   e   d       t   o    
0006460    c   o   m   p   a   r   e       s   t   a   c   k       p   o
0006500    i   n   t   e   r   s       (   p   a   g   e       X   .   X
0006520    X   )       a   n   d       c   o   m   p   i   l   e   d    
0006540    c   o   d   e       (   p   a   g   e       X   .   X   X   )
0006560    .  \r  \r   (   E   Q   U   A   L       X       Y   )        
0006600   \t   [   F   u   n   c   t   i   o   n   ]  \r   E   Q   U   A
0006620    L       r   e   t   u   r   n   s       T       i   f       X
0006640        a   n   d       Y       a   r   e       (   1   )       E
0006660    Q   ;       o   r       (   2   )       E   Q   P   ,       i
0006700    .   e   .   ,       n   u   m   b   e   r   s       w   i   t
0006720    h       e   q   u   a   l       v   a   l   u   e   ;       o
0006740    r       (   3   )       S   T   R   E   Q   U   A   L   ,    
0006760    i   .   e   .   ,       s   t   r   i   n   g   s       c   o
0007000    n   t   a   i   n   i   n   g       t   h   e       s   a   m
0007020    e       s   e   q   u   e   n   c   e       o   f       c   h
0007040    a   r   a   c   t   e   r   s   ;       o   r       (   4   )
0007060        l   i   s   t   s       a   n   d       C   A   R       o
0007100    f       X       i   s       E   Q   U   A   L       t   o    
0007120    C   A   R       o   f       Y   ,       a   n   d       C   D
0007140    R       o   f       X       i   s       E   Q   U   A   L    
0007160    t   o       C   D   R       o   f       Y   .           E   Q
0007200    U   A   L       r   e   t   u   r   n   s       N   I   L    
0007220    o   t   h   e   r   w   i   s   e   .           N   o   t   e
0007240        t   h   a   t       E   Q   U   A   L       c   a   n    
0007260    b   e       s   i   g   n   i   f   i   c   a   n   t   l   y
0007300        s   l   o   w   e   r       t   h   a   n       E   Q   .
0007320   \r   A       l   o   o   s   e       d   e   s   c   r   i   p
0007340    t   i   o   n       o   f       E   Q   U   A   L       m   i
0007360    g   h   t       b   e       t   o       s   a   y       t   h
0007400    a   t       X       a   n   d       Y       a   r   e       E
0007420    Q   U   A   L       i   f       t   h   e   y       p   r   i
0007440    n   t       o   u   t       t   h   e       s   a   m   e    
0007460    w   a   y   .  \r  \r   (   E   Q   U   A   L   A   L   L    
0007500    X       Y   )          \t   [   F   u   n   c   t   i   o   n
0007520    ]  \r   L   i   k   e       E   Q   U   A   L   ,       e   x
0007540    c   e   p   t       i   t       d   e   s   c   e   n   d   s
0007560        i   n   t   o       t   h   e       c   o   n   t   e   n
0007600    t   s       o   f       a   r   r   a   y   s   ,       h   a
0007620    s   h       a   r   r   a   y   s   ,       u   s   e   r    
0007640    d   a   t   a       t   y   p   e   s   ,       e   t   c   .
0007660            T   w   o       n   o   n   -   E   Q       a   r   r
0007700    a   y   s       m   a   y       b   e       E   Q   U   A   L
0007720    A   L   L       i   f       t   h   e   i   r       r   e   s
0007740    p   e   c   t   i   v   e       c   o   m   p   o   n   a   n
0007760    t   s       a   r   e       E   Q   U   A   L   A   L   L   .
0010000   \r  \r  \r   9   .   3          \t   L   o   g   i   c   a   l
0010020        P   r   e   d   i   c   a   t   e   s  \r  \r   (   A   N
0010040    D       X   1       X   2       .   .   .       X   N   )    
0010060       \t   [   N   L   a   m   b   d   a       N   o   S   p   r
0010100    e   a   d       F   u   n   c   t   i   o   n   ]  \r   T   a
0010120    k   e   s       a   n       i   n   d   e   f   i   n   i   t
0010140    e       n   u   m   b   e   r       o   f       a   r   g   u
0010160    m   e   n   t   s       (   i   n   c   l   u   d   i   n   g
0010200        z   e   r   o   )   ,       t   h   a   t       a   r   e
0010220        e   v   a   l   u   a   t   e   d       i   n       o   r
0010240    d   e   r   .           I   f       a   n   y       a   r   g
0010260    u   m   e   n   t       e   v   a   l   u   a   t   e   s    
0010300    t   o       N   I   L   ,       A   N   D       i   m   m   e
0010320    d   i   a   t   e   l   y       r   e   t   u   r   n   s    
0010340    N   I   L       (   w   i   t   h   o   u   t       e   v   a
0010360    l   u   a   t   i   n   g       t   h   e       r   e   m   a
0010400    i   n   i   n   g       a   r   g   u   m   e   n   t   s   )
0010420    .           I   f       a   l   l       o   f       t   h   e
0010440        a   r   g   u   m   e   n   t   s       e   v   a   l   u
0010460    a   t   e       t   o       n   o   n   -   N   I   L   ,    
0010500    t   h   e       v   a   l   u   e       o   f       t   h   e
0010520        l   a   s   t       a   r   g   u   m   e   n   t       i
0010540    s       r   e   t   u   r   n   e   d   .           (   A   N
0010560    D   )           =   >           T   .  \r  \r   (   O   R    
0010600    X   1       X   2       .   .   .       X   N   )          \t
0010620    [   N   L   a   m   b   d   a       N   o   S   p   r   e   a
0010640    d       F   u   n   c   t   i   o   n   ]  \r   T   a   k   e
0010660    s       a   n       i   n   d   e   f   i   n   i   t   e    
0010700    n   u   m   b   e   r       o   f       a   r   g   u   m   e
0010720    n   t   s       (   i   n   c   l   u   d   i   n   g       z
0010740    e   r   o   )   ,       t   h   a   t       a   r   e       e
0010760    v   a   l   u   a   t   e   d       i   n       o   r   d   e
0011000    r   .           I   f       a   n   y       a   r   g   u   m
0011020    e   n   t       i   s       n   o   n   -   N   I   L   ,    
0011040    t   h   e       v   a   l   u   e       o   f       t   h   a
0011060    t       a   r   g   u   m   e   n   t       i   s       r   e
0011100    t   u   r   n   e   d       b   y       O   R       (   w   i
0011120    t   h   o   u   t       e   v   a   l   u   a   t   i   n   g
0011140        t   h   e       r   e   m   a   i   n   i   n   g       a
0011160    r   g   u   m   e   n   t   s   )   .           I   f       a
0011200    l   l       o   f       t   h   e       a   r   g   u   m   e
0011220    n   t   s       e   v   a   l   u   a   t   e       t   o    
0011240    N   I   L   ,       N   I   L       i   s       r   e   t   u
0011260    r   n   e   d   .           (   O   R   )           =   >    
0011300        N   I   L   .  \r  \r   A   N   D       a   n   d       O
0011320    R       c   a   n       b   e       u   s   e   d       a   s
0011340        s   i   m   p   l   e       l   o   g   i   c   a   l    
0011360    c   o   n   n   e   c   t   i   v   e   s   ,       b   u   t
0011400        n   o   t   e       t   h   a   t       t   h   e   y    
0011420    m   a   y       n   o   t       e   v   a   l   u   a   t   e
0011440        a   l   l       o   f       t   h   e   i   r       a   r
0011460    g   u   m   e   n   t   s   .           T   h   i   s       m
0011500    a   k   e   s       a       d   i   f   f   e   r   e   n   c
0011520    e       i   f       t   h   e       e   v   a   l   u   a   t
0011540    i   o   n       o   f       s   o   m   e       o   f       t
0011560    h   e       a   r   g   u   m   e   n   t   s       c   a   u
0011600    s   e   s       s   i   d   e   -   e   f   f   e   c   t   s
0011620    .           A   n   o   t   h   e   r       r   e   s   u   l
0011640    t       o   f       t   h   i   s       i   m   p   l   e   m
0011660    e   n   t   a   t   i   o   n       o   f       A   N   D    
0011700    a   n   d       O   R       i   s       t   h   a   t       t
0011720    h   e   y       c   a   n       b   e       u   s   e   d    
0011740    a   s       s   i   m   p   l   e       c   o   n   d   i   t
0011760    i   o   n   a   l       s   t   a   t   e   m   e   n   t   s
0012000    .           F   o   r       e   x   a   m   p   l   e   :    
0012020    (   A   N   D       (   L   I   S   T   P       X   )       (
0012040    C   D   R       X   )   )       r   e   t   u   r   n   s    
0012060    t   h   e       v   a   l   u   e       o   f       (   C   D
0012100    R       X   )       i   f       X       i   s       a       l
0012120    i   s   t       c   e   l   l   ,       o   t   h   e   r   w
0012140    i   s   e       i   t       r   e   t   u   r   n   s       N
0012160    I   L       w   i   t   h   o   u   t       e   v   a   l   u
0012200    a   t   i   n   g       (   C   D   R       X   )   .        
0012220    I   n       g   e   n   e   r   a   l   ,       t   h   i   s
0012240        u   s   e       o   f       A   N   D       a   n   d    
0012260    O   R       s   h   o   u   l   d       b   e       a   v   o
0012300    i   d   e   d       i   n       f   a   v   o   r       o   f
0012320        m   o   r   e       e   x   p   l   i   c   i   t       c
0012340    o   n   d   i   t   i   o   n   a   l       s   t   a   t   e
0012360    m   e   n   t   s       i   n       o   r   d   e   r       t
0012400    o       m   a   k   e       p   r   o   g   r   a   m   s    
0012420    m   o   r   e       r   e   a   d   a   b   l   e   .  \r  \r
0012440    9   .   4          \t   T   h   e       C   O   N   D       C
0012460    o   n   d   i   t   i   o   n   a   l       F   u   n   c   t
0012500    i   o   n  \r  \r   (   C   O   N   D       C   L   A   U   S
0012520    E   1       C   L   A   U   S   E   2       .   .   .       C
0012540    L   A   U   S   E   K   )          \t   [   N   L   a   m   b
0012560    d   a       N   o   S   p   r   e   a   d       F   u   n   c
0012600    t   i   o   n   ]  \r   T   h   e       c   o   n   d   i   t
0012620    i   o   n   a   l       f   u   n   c   t   i   o   n       o
0012640    f       I   n   t   e   r   l   i   s   p   ,       C   O   N
0012660    D   ,       t   a   k   e   s       a   n       i   n   d   e
0012700    f   i   n   i   t   e       n   u   m   b   e   r       o   f
0012720        a   r   g   u   m   e   n   t   s   ,       c   a   l   l
0012740    e   d       c   l   a   u   s   e   s   .           E   a   c
0012760    h       C   L   A   U   S   E   i       i   s       a       l
0013000    i   s   t       o   f       t   h   e       f   o   r   m    
0013020    (   P   i       C   i   1       .   .   .       C   i   N   )
0013040    ,       w   h   e   r   e       P   i       i   s       t   h
0013060    e       p   r   e   d   i   c   a   t   e   ,       a   n   d
0013100        C   i   1       .   .   .       C   i   N       a   r   e
0013120        t   h   e       c   o   n   s   e   q   u   e   n   t   s
0013140    .           T   h   e       o   p   e   r   a   t   i   o   n
0013160        o   f       C   O   N   D       c   a   n       b   e    
0013200    p   a   r   a   p   h   r   a   s   e   d       a   s   :  \r
0013220    I   F       P   1       T   H   E   N       C   1   1       .
0013240    .   .       C   1   N       E   L   S   E   I   F       P   2
0013260        T   H   E   N       C   2   1       .   .   .       C   2
0013300    N       E   L   S   E   I   F       P   3       .   .   .  \r
0013320    T   h   e       c   l   a   u   s   e   s       a   r   e    
0013340    c   o   n   s   i   d   e   r   e   d       i   n       s   e
0013360    q   u   e   n   c   e       a   s       f   o   l   l   o   w
0013400    s   :       t   h   e       p   r   e   d   i   c   a   t   e
0013420        P   1       o   f       t   h   e       c   l   a   u   s
0013440    e       C   L   A   U   S   E   i       i   s       e   v   a
0013460    l   u   a   t   e   d   .           I   f       t   h   e    
0013500    v   a   l   u   e       o   f       P   1       i   s       "
0013520    t   r   u   e   "       (   n   o   n   -   N   I   L   )   ,
0013540        t   h   e       c   o   n   s   e   q   u   e   n   t   s
0013560        C   i   1       .   .   .       C   i   N       a   r   e
0013600        e   v   a   l   u   a   t   e   d       i   n       o   r
0013620    d   e   r   ,       a   n   d       t   h   e       v   a   l
0013640    u   e       o   f       t   h   e       C   O   N   D       i
0013660    s       t   h   e       v   a   l   u   e       o   f       C
0013700    i   N   ,       t   h   e       l   a   s   t       e   x   p
0013720    r   e   s   s   i   o   n       i   n       t   h   e       c
0013740    l   a   u   s   e   .           I   f       P   1       i   s
0013760        "   f   a   l   s   e   "       (   E   Q       t   o    
0014000    N   I   L   )   ,       t   h   e   n       t   h   e       r
0014020    e   m   a   i   n   d   e   r       o   f       C   L   A   U
0014040    S   E   i       i   s       i   g   n   o   r   e   d   ,    
0014060    a   n   d       t   h   e       n   e   x   t       c   l   a
0014100    u   s   e   ,       C   L   A   U   S   E   i   +   1   ,    
0014120    i   s       c   o   n   s   i   d   e   r   e   d   .        
0014140    I   f       n   o       P   i       i   s       t   r   u   e
0014160        f   o   r       a   n   y       c   l   a   u   s   e   ,
0014200        t   h   e       v   a   l   u   e       o   f       t   h
0014220    e       C   O   N   D       i   s       N   I   L   .  \r   N
0014240    o   t   e   :           I   f       a       c   l   a   u   s
0014260    e       h   a   s       n   o       c   o   n   s   e   q   u
0014300    e   n   t   s   ,       a   n   d       h   a   s       t   h
0014320    e       f   o   r   m       (   P   i   )   ,       t   h   e
0014340    n       i   f       P   i       e   v   a   l   u   a   t   e
0014360    s       t   o       n   o   n   -   N   I   L   ,       i   t
0014400        i   s       r   e   t   u   r   n   e   d       a   s    
0014420    t   h   e       v   a   l   u   e       o   f       t   h   e
0014440        C   O   N   D   .           I   t       i   s       o   n
0014460    l   y       e   v   a   l   u   a   t   e   d       o   n   c
0014500    e   .  \r   E   x   a   m   p   l   e   :  \r   _       (   D
0014520    E   F   I   N   E   Q       (   D   O   U   B   L   E       (
0014540    X   )  \r                                                    
0014560            (   C   O   N   D       (   (   N   U   M   B   E   R
0014600    P       X   )       (   P   L   U   S       X       X   )   )
0014620   \r                                                            
0014640                            (   (   S   T   R   I   N   G   P    
0014660    X   )       (   C   O   N   C   A   T       X       X   )   )
0014700   \r                                                            
0014720                            (   (   A   T   O   M       X   )    
0014740    (   P   A   C   K   *       X       X   )   )  \r            
0014760                                                                 
0015000            (   T       (   P   R   I   N   T       "   u   n   k
0015020    n   o   w   n   "   )       X   )  \r                        
0015040                                                                (
0015060    (   H   O   R   R   I   B   L   E   -   E   R   R   O   R   )
0015100    )   ]  \r   (   D   O   U   B   L   E   )  \r   _       (   D
0015120    O   U   B   L   E       5   )  \r   1   0  \r   _       (   D
0015140    O   U   B   L   E       "   F   O   O   "   )  \r   "   F   O
0015160    O   F   O   O   "  \r   _       (   D   O   U   B   L   E    
0015200    '   B   A   R   )  \r   B   A   R   B   A   R  \r   _       (
0015220    D   O   U   B   L   E       '   (   A       B       C   )   )
0015240   \r   "   u   n   k   n   o   w   n   "  \r   (   A       B    
0015260    C   )  \r   A       f   e   w       p   o   i   n   t   s    
0015300    a   b   o   u   t       t   h   i   s       e   x   a   m   p
0015320    l   e   :           N   o   t   i   c   e       t   h   a   t
0015340        5       i   s       b   o   t   h       a       n   u   m
0015360    b   e   r       a   n   d       a   n       a   t   o   m   ,
0015400        b   u   t       i   t       i   s       "   c   a   u   g
0015420    h   t   "       b   y       t   h   e       N   U   M   B   E
0015440    R   P       c   l   a   u   s   e       b   e   f   o   r   e
0015460        t   h   e       A   T   O   M       c   l   a   u   s   e
0015500    .           A   l   s   o       n   o   t   i   c   e       t
0015520    h   e       p   r   e   d   i   c   a   t   e       T   ,    
0015540    w   h   i   c   h       i   s       a   l   w   a   y   s    
0015560    t   r   u   e   .           T   h   i   s       i   s       t
0015600    h   e       n   o   r   m   a   l       w   a   y       t   o
0015620        i   n   d   i   c   a   t   e       a       C   O   N   D
0015640        c   l   a   u   s   e       w   h   i   c   h       w   i
0015660    l   l       a   l   w   a   y   s       b   e       e   x   e
0015700    c   u   t   e   d       (   i   f       n   o   n   e       o
0015720    f       t   h   e       p   r   e   c   e   e   d   i   n   g
0015740        c   l   a   u   s   e   s       a   r   e       t   r   u
0015760    e   )   .           (   H   O   R   R   I   B   L   E   -   E
0016000    R   R   O   R   )       w   i   l   l       n   e   v   e   r
0016020        b   e       e   x   e   c   u   t   e   d   .  \r  \r  \r
0016040    9   .   5          \t   T   h   e       I   F       S   t   a
0016060    t   e   m   e   n   t  \r  \r   T   h   e       I   F       s
0016100    t   a   t   e   m   e   n   t       p   r   o   v   i   d   e
0016120    s       a       w   a   y       o   f       w   a   y       o
0016140    f       s   p   e   c   i   f   y   i   n   g       c   o   n
0016160    d   i   t   i   o   n   a   l       e   x   p   r   e   s   s
0016200    i   o   n   s       t   h   a   t       i   s       m   u   c
0016220    h       e   a   s   i   e   r       a   n   d       r   e   a
0016240    d   a   b   l   e       t   h   a   n       u   s   i   n   g
0016260        t   h   e       C   O   N   D       f   u   n   c   t   i
0016300    o   n       d   i   r   e   c   t   l   y       (   p   a   g
0016320    e       X   .   X   X   )   .           C   L   I   S   P    
0016340    t   r   a   n   s   l   a   t   e   s       e   x   p   r   e
0016360    s   s   i   o   n   s       e   m   p   l   o   y   i   n   g
0016400        I   F   ,       T   H   E   N   ,       E   L   S   E   I
0016420    F   ,       o   r       E   L   S   E       (   o   r       t
0016440    h   e   i   r       l   o   w   e   r   c   a   s   e       v
0016460    e   r   s   i   o   n   s   )       i   n   t   o       e   q
0016500    u   i   v   a   l   e   n   t       C   O   N   D       e   x
0016520    p   r   e   s   s   i   o   n   s   .           I   n       g
0016540    e   n   e   r   a   l   ,       s   t   a   t   e   m   e   n
0016560    t   s       o   f       t   h   e       f   o   r   m   :  \r
0016600    (   i   f       A   A   A       t   h   e   n       B   B   B
0016620        e   l   s   e   i   f       C   C   C       t   h   e   n
0016640        D   D   D       e   l   s   e       E   E   E   )  \r   a
0016660    r   e       t   r   a   n   s   l   a   t   e   d       t   o
0016700    :  \r   (   C   O   N   D       (   A   A   A       B   B   B
0016720    )  \r                           (   C   C   C       D   D   D
0016740    )  \r                           (   T       E   E   E   )    
0016760    )  \r   T   h   e       s   e   g   m   e   n   t       b   e
0017000    t   w   e   e   n       I   F       o   r       E   L   S   E
0017020    I   F       a   n   d       t   h   e       n   e   x   t    
0017040    T   H   E   N       c   o   r   r   e   s   p   o   n   d   s
0017060        t   o       t   h   e       p   r   e   d   i   c   a   t
0017100    e       o   f       a       C   O   N   D       c   l   a   u
0017120    s   e   ,       a   n   d       t   h   e       s   e   g   m
0017140    e   n   t       b   e   t   w   e   e   n       T   H   E   N
0017160        a   n   d       t   h   e       n   e   x   t       E   L
0017200    S   E       o   r       E   L   S   E   I   F       a   s    
0017220    t   h   e       c   o   n   s   e   q   u   e   n   t   (   s
0017240    )   .           E   L   S   E       i   s       t   h   e    
0017260    s   a   m   e       a   s       E   L   S   E   I   F       T
0017300        T   H   E   N   .           T   h   e   s   e       w   o
0017320    r   d   s       a   r   e       s   p   e   l   l   i   n   g
0017340        c   o   r   r   e   c   t   e   d       u   s   i   n   g
0017360        t   h   e       s   p   e   l   l   i   n   g       l   i
0017400    s   t       C   L   I   S   P   I   F   W   O   R   D   S   P
0017420    L   S   T   .           L   o   w   e   r       c   a   s   e
0017440        v   e   r   s   i   o   n   s       (   i   f   ,       t
0017460    h   e   n   ,       e   l   s   e   i   f   ,       e   l   s
0017500    e   )       m   a   y       a   l   s   o       b   e       u
0017520    s   e   d   .  \r   I   f       t   h   e   r   e       i   s
0017540        n   o   t   h   i   n   g       f   o   l   l   o   w   i
0017560    n   g       a       T   H   E   N   ,       o   r       T   H
0017600    E   N       i   s       o   m   i   t   t   e   d       e   n
0017620    t   i   r   e   l   y   ,       t   h   e   n       t   h   e
0017640        r   e   s   u   l   t   i   n   g       C   O   N   D    
0017660    c   l   a   u   s   e       h   a   s       a       p   r   e
0017700    d   i   c   a   t   e       b   u   t       n   o       c   o
0017720    n   s   e   q   u   e   n   t   .           F   o   r       e
0017740    x   a   m   p   l   e   ,       (   i   f       X       t   h
0017760    e   n       e   l   s   e   i   f       .   .   .   )       a
0020000    n   d       (   i   f       X       e   l   s   e   i   f    
0020020    .   .   .   )       b   o   t   h       t   r   a   n   s   l
0020040    a   t   e       t   o       (   C   O   N   D       (   X   )
0020060        .   .   .   )   ,       w   h   i   c   h       m   e   a
0020100    n   s       t   h   a   t       i   f       X       i   s    
0020120    n   o   t       N   I   L   ,       i   t       i   s       r
0020140    e   t   u   r   n   e   d       a   s       t   h   e       v
0020160    a   l   u   e       o   f       t   h   e       C   O   N   D
0020200    .  \r   N   o   t   e       t   h   a   t       o   n   l   y
0020220        o   n   e       e   x   p   r   e   s   s   i   o   n    
0020240    i   s       a   l   l   o   w   e   d       a   s       t   h
0020260    e       p   r   e   d   i   c   a   t   e   ,       b   u   t
0020300        m   u   l   t   i   p   l   e       e   x   p   r   e   s
0020320    s   i   o   n   s       a   r   e       a   l   l   o   w   e
0020340    d       a   s       t   h   e       c   o   n   s   e   q   u
0020360    e   n   t   s       a   f   t   e   r       T   H   E   N    
0020400    o   r       E   L   S   E   .           M   u   l   t   i   p
0020420    l   e       c   o   n   s   e   q   u   e   n   t       e   x
0020440    p   r   e   s   s   i   o   n   s       a   r   e       i   m
0020460    p   l   i   c   i   t   e   l   y       w   r   a   p   p   e
0020500    d       i   n       a       P   R   O   G   N   ,       a   n
0020520    d       t   h   e       v   a   l   u   e       o   f       t
0020540    h   e       l   a   s   t       o   n   e       i   s       r
0020560    e   t   u   r   n   e   d       a   s       t   h   e       v
0020600    a   l   u   e       o   f       t   h   e       c   o   n   s
0020620    e   q   u   e   n   t   .           F   o   r       e   x   a
0020640    m   p   l   e   :  \r   (   i   f       X       t   h   e   n
0020660        (   P   R   I   N   T       "   F   O   O   "   )       (
0020700    P   R   I   N   T       "   B   A   R   "   )       e   l   s
0020720    e   i   f       Y       t   h   e   n       (   P   R   I   N
0020740    T       "   B   A   Z   "   )   )  \r   C   L   I   S   P    
0020760    c   o   n   s   i   d   e   r   s       I   F   ,       T   H
0021000    E   N   ,       E   L   S   E   ,       a   n   d       E   L
0021020    S   E   I   F       t   o       h   a   v   e       l   o   w
0021040    e   r       p   r   e   c   e   d   e   n   c   e       t   h
0021060    a   n       a   l   l       i   n   f   i   x       a   n   d
0021100        p   r   e   f   i   x       o   p   e   r   a   t   o   r
0021120    s   ,       a   s       w   e   l   l       a   s       I   n
0021140    t   e   r   l   i   s   p       f   o   r   m   s   ,       s
0021160    o       i   t       i   s       s   o   m   e   t   i   m   e
0021200    s       p   o   s   s   i   b   l   e       t   o       o   m
0021220    i   t       p   a   r   e   n   t   h   e   s   e   s       a
0021240    r   o   u   n   d       p   r   e   d   i   c   a   t   e    
0021260    o   r       c   o   n   s   e   q   u   e   n   t       f   o
0021300    r   m   s   .           F   o   r       e   x   a   m   p   l
0021320    e   ,       (   i   f       F   O   O       X       Y       t
0021340    h   e   n       .   .   .   )       i   s       e   q   u   i
0021360    v   a   l   e   n   t       t   o       (   i   f       (   F
0021400    O   O       X       Y   )       t   h   e   n       .   .   .
0021420    )   ,       a   n   d       (   i   f       X       t   h   e
0021440    n       F   O   O       X       Y       e   l   s   e       .
0021460    .   .   )       a   s       e   q   u   i   v   a   l   e   n
0021500    t       t   o       (   i   f       X       t   h   e   n    
0021520    (   F   O   O       X       Y   )       e   l   s   e       .
0021540    .   .   )   .           E   s   s   e   n   t   i   a   l   l
0021560    y   ,       C   L   I   S   P       d   e   t   e   r   m   i
0021600    n   e   s       w   h   e   t   h   e   r       t   h   e    
0021620    s   e   g   m   e   n   t       b   e   t   w   e   e   n    
0021640    T   H   E   N       a   n   d       t   h   e       n   e   x
0021660    t       E   L   S   E       o   r       E   L   S   E   I   F
0021700        c   o   r   r   e   s   p   o   n   d   s       t   o    
0021720    o   n   e       f   o   r   m       o   r       s   e   v   e
0021740    r   a   l       a   n   d       a   c   t   s       a   c   c
0021760    o   r   d   i   n   g   l   y   ,       o   c   c   a   s   i
0022000    o   n   a   l   l   y       i   n   t   e   r   a   c   t   i
0022020    n   g       w   i   t   h       t   h   e       u   s   e   r
0022040        t   o       r   e   s   o   l   v   e       a   m   b   i
0022060    g   u   o   u   s       c   a   s   e   s   .           N   o
0022100    t   e       t   h   a   t       i   f       F   O   O       i
0022120    s       b   o   u   n   d       a   s       a       v   a   r
0022140    i   a   b   l   e   ,       (   i   f       F   O   O       t
0022160    h   e   n       .   .   .   )       i   s       t   r   a   n
0022200    s   l   a   t   e   d       a   s       (   C   O   N   D    
0022220    (   F   O   O       .   .   .   )   )   ,       s   o       i
0022240    f       a       c   a   l   l       t   o       t   h   e    
0022260    f   u   n   c   t   i   o   n       F   O   O       i   s    
0022300    d   e   s   i   r   e   d   ,       u   s   e       (   i   f
0022320        (   F   O   O   )       t   h   e   n       .   .   .   )
0022340    .  \r  \r   9   .   6          \t   S   e   l   e   c   t   i
0022360    o   n       F   u   n   c   t   i   o   n   s  \r  \r   (   S
0022400    E   L   E   C   T   Q       X       C   L   A   U   S   E   1
0022420        C   L   A   U   S   E   2       .   .   .       C   L   A
0022440    U   S   E   K       D   E   F   A   U   L   T   )          \t
0022460    [   N   L   a   m   b   d   a       N   o   S   p   r   e   a
0022500    d       F   u   n   c   t   i   o   n   ]  \r   S   e   l   e
0022520    c   t   s       a       f   o   r   m       o   r       s   e
0022540    q   u   e   n   c   e       o   f       f   o   r   m   s    
0022560    b   a   s   e   d       o   n       t   h   e       v   a   l
0022600    u   e       o   f       X   .           E   a   c   h       c
0022620    l   a   u   s   e       C   L   A   U   S   E   i       i   s
0022640        a       l   i   s   t       o   f       t   h   e       f
0022660    o   r   m       (   S   i       C   i   1       .   .   .    
0022700    C   i   N   )       w   h   e   r   e       S   i       i   s
0022720        t   h   e       s   e   l   e   c   t   i   o   n       k
0022740    e   y   .           T   h   e       o   p   e   r   a   t   i
0022760    o   n       o   f       S   E   L   E   C   T   Q       c   a
0023000    n       b   e       p   a   r   a   p   h   r   a   s   e   d
0023020        a   s   :  \r   I   F       X       =       S   1       T
0023040    H   E   N       C   1   1       .   .   .       C   1   N    
0023060    E   L   S   E   I   F       X       =       S   2       T   H
0023100    E   N       .   .   .       E   L   S   E       D   E   F   A
0023120    U   L   T   .  \r   I   f       S   i       i   s       a   n
0023140        a   t   o   m   ,       t   h   e       v   a   l   u   e
0023160        o   f       X       i   s       t   e   s   t   e   d    
0023200    t   o       s   e   e       i   f       i   t       i   s    
0023220    E   Q       t   o       S   i       (   w   h   i   c   h    
0023240    i   s       n   o   t       e   v   a   l   u   a   t   e   d
0023260    )   .           I   f       s   o   ,       t   h   e       e
0023300    x   p   r   e   s   s   i   o   n   s       C   i   1       .
0023320    .   .       C   i   N       a   r   e       e   v   a   l   u
0023340    a   t   e   d       i   n       s   e   q   u   e   n   c   e
0023360    ,       a   n   d       t   h   e       v   a   l   u   e    
0023400    o   f       t   h   e       S   E   L   E   C   T   Q       i
0023420    s       t   h   e       v   a   l   u   e       o   f       t
0023440    h   e       l   a   s   t       e   x   p   r   e   s   s   i
0023460    o   n       e   v   a   l   u   a   t   e   d   ,       i   .
0023500    e   .   ,       C   i   N   .  \r   I   f       S   i       i
0023520    s       a       l   i   s   t   ,       t   h   e       v   a
0023540    l   u   e       o   f       X       i   s       c   o   m   p
0023560    a   r   e   d       w   i   t   h       e   a   c   h       e
0023600    l   e   m   e   n   t       (   n   o   t       e   v   a   l
0023620    u   a   t   e   d   )       o   f       S   i   ,       a   n
0023640    d       i   f       X       i   s       E   Q       t   o    
0023660    a   n   y       o   n   e       o   f       t   h   e   m   ,
0023700        t   h   e   n       C   i   1       .   .   .       C   i
0023720    N       a   r   e       e   v   a   l   u   a   t   e   d    
0023740    a   s       a   b   o   v   e   .  \r   I   f       C   L   A
0023760    U   S   E   i       i   s       n   o   t       s   e   l   e
0024000    c   t   e   d       i   n       o   n   e       o   f       t
0024020    h   e       t   w   o       w   a   y   s       d   e   s   c
0024040    r   i   b   e   d   ,       C   L   A   U   S   E   i   +   1
0024060        i   s       t   e   s   t   e   d   ,       e   t   c   .
0024100    ,       u   n   t   i   l       a   l   l       t   h   e    
0024120    c   l   a   u   s   e   s       h   a   v   e       b   e   e
0024140    n       t   e   s   t   e   d   .           I   f       n   o
0024160    n   e       i   s       s   e   l   e   c   t   e   d   ,    
0024200    D   E   F   A   U   L   T       i   s       e   v   a   l   u
0024220    a   t   e   d   ,       a   n   d       i   t   s       v   a
0024240    l   u   e       i   s       r   e   t   u   r   n   e   d    
0024260    a   s       t   h   e       v   a   l   u   e       o   f    
0024300    t   h   e       S   E   L   E   C   T   Q   .           D   E
0024320    F   A   U   L   T       m   u   s   t       b   e       p   r
0024340    e   s   e   n   t   .  \r   A   n       e   x   a   m   p   l
0024360    e       o   f       t   h   e       f   o   r   m       o   f
0024400        a       S   E   L   E   C   T   Q       i   s   :  \r   [
0024420    S   E   L   E   C   T   Q       M   O   N   T   H  \r        
0024440        (   F   E   B   R   U   A   R   Y       (   i   f       (
0024460    L   E   A   P   Y   E   A   R   P   )       t   h   e   n    
0024500    2   9       e   l   s   e       2   8   )   )  \r            
0024520    (   (   A   P   R   I   L       J   U   N   E       S   E   P
0024540    T   E   M   B   E   R       N   O   V   E   M   B   E   R   )
0024560        3   0   )  \r               3   1   ]  \r   I   f       t
0024600    h   e       v   a   l   u   e       o   f       M   O   N   T
0024620    H       i   s       t   h   e       l   i   t   a   t   o   m
0024640        F   E   B   R   U   A   R   Y   ,       t   h   e       S
0024660    E   L   E   C   T   Q       r   e   t   u   r   n   s       2
0024700    8       o   r       2   9       (   d   e   p   e   n   d   i
0024720    n   g       o   n       (   L   E   A   P   Y   E   A   R   P
0024740    )   )   ;           o   t   h   e   r   w   i   s   e       i
0024760    f       M   O   N   T   H       i   s       A   P   R   I   L
0025000    ,       J   U   N   E   ,       S   E   P   T   E   M   B   E
0025020    R   ,       o   r       N   O   V   E   M   B   E   R   ,    
0025040    t   h   e       S   E   L   E   C   T   Q       r   e   t   u
0025060    r   n   s       3   0   ;           o   t   h   e   r   w   i
0025100    s   e       i   t       r   e   t   u   r   n   s       3   1
0025120    .  \r   S   E   L   E   C   T   Q       c   o   m   p   i   l
0025140    e   s       o   p   e   n   ,       a   n   d       i   s    
0025160    t   h   e   r   e   f   o   r   e       v   e   r   y       f
0025200    a   s   t   ;       h   o   w   e   v   e   r   ,       i   t
0025220        w   i   l   l       n   o   t       w   o   r   k       i
0025240    f       t   h   e       v   a   l   u   e       o   f       X
0025260        i   s       a       l   i   s   t   ,       a       l   a
0025300    r   g   e       i   n   t   e   g   e   r   ,       o   r    
0025320    f   l   o   a   t   i   n   g       p   o   i   n   t       n
0025340    u   m   b   e   r   ,       s   i   n   c   e       S   E   L
0025360    E   C   T   Q       u   s   e   s       E   Q       f   o   r
0025400        a   l   l       c   o   m   p   a   r   i   s   o   n   s
0025420    .  \r  \r   N   o   t   e   :           S   E   L   C   H   A
0025440    R   Q       (   p   a   g   e       X   .   X   X   )       i
0025460    s       a       v   e   r   s   i   o   n       o   f       S
0025500    E   L   E   C   T   Q       t   h   a   t       r   e   c   o
0025520    g   n   i   z   e   s       C   H   A   R   C   O   D   E    
0025540    l   i   t   a   t   o   m   s   .  \r   (   S   E   L   E   C
0025560    T   C       X       C   L   A   U   S   E   1       C   L   A
0025600    U   S   E   2       .   .   .       C   L   A   U   S   E   K
0025620        D   E   F   A   U   L   T   )          \t   [   N   L   a
0025640    m   b   d   a       N   o   S   p   r   e   a   d       F   u
0025660    n   c   t   i   o   n   ]  \r   "   S   E   L   E   C   T   Q
0025700    -   o   n   -   C   o   n   s   t   a   n   t   .   "        
0025720    S   i   m   i   l   a   r       t   o       S   E   L   E   C
0025740    T   Q       e   x   c   e   p   t       t   h   a   t       t
0025760    h   e       s   e   l   e   c   t   i   o   n       k   e   y
0026000    s       a   r   e       e   v   a   l   u   a   t   e   d   ,
0026020        a   n   d       t   h   e       r   e   s   u   l   t    
0026040    u   s   e   d       a   s       a       S   E   L   E   C   T
0026060    Q   -   s   t   y   l   e       s   e   l   e   c   t   i   o
0026100    n       k   e   y   .  \r   S   E   L   E   C   T   C       i
0026120    s       c   o   m   p   i   l   e   d       a   s       a    
0026140    S   E   L   E   C   T   Q   ,       w   i   t   h       t   h
0026160    e       s   e   l   e   c   t   i   o   n       k   e   y   s
0026200        e   v   a   l   u   a   t   e   d       a   t       c   o
0026220    m   p   i   l   e   -   t   i   m   e   .           T   h   e
0026240    r   e   f   o   r   e   ,       t   h   e       s   e   l   e
0026260    c   t   i   o   n       k   e   y   s       a   c   t       l
0026300    i   k   e       c   o   m   p   i   l   e   -   t   i   m   e
0026320        c   o   n   s   t   a   n   t   s       (   s   e   e    
0026340    p   a   g   e       X   .   X   X   )   .           F   o   r
0026360        e   x   a   m   p   l   e   :  \r   [   S   E   L   E   C
0026400    T   C       N   U   M  \r               (       (   f   o   r
0026420        X       f   r   o   m       1       t   o       9       c
0026440    o   l   l   e   c   t       (   T   I   M   E   S       X    
0026460    X   )   )       "   S   Q   U   A   R   E   "       )  \r    
0026500            "   H   I   P   "   ]  \r   c   o   m   p   i   l   e
0026520    s       a   s   :  \r   [   S   E   L   E   C   T   Q       N
0026540    U   M  \r               (       (   1       4       9       1
0026560    6       2   5       3   6       4   9       6   4       8   1
0026600    )       "   S   Q   U   A   R   E   "       )  \r            
0026620    "   H   I   P   "   ]  \r  \r  \r   9   .   7          \t   P
0026640    R   O   G       a   n   d       A   s   s   o   c   i   a   t
0026660    e   d       C   o   n   t   r   o   l       F   u   n   c   t
0026700    i   o   n   s  \r  \r   (   P   R   O   G   1       X   1    
0026720    X   2       .   .   .       X   N   )          \t   [   N   L
0026740    a   m   b   d   a       N   o   S   p   r   e   a   d       F
0026760    u   n   c   t   i   o   n   ]  \r   E   v   a   l   u   a   t
0027000    e   s       i   t   s       a   r   g   u   m   e   n   t   s
0027020        i   n       o   r   d   e   r   ,       a   n   d       r
0027040    e   t   u   r   n   s       t   h   e       v   a   l   u   e
0027060        o   f       i   t   s       f   i   r   s   t       a   r
0027100    g   u   m   e   n   t       X   1   .           F   o   r    
0027120    e   x   a   m   p   l   e   ,       (   P   R   O   G   1    
0027140    X       (   S   E   T   Q       X       Y   )   )       s   e
0027160    t   s       X       t   o       Y   ,       a   n   d       r
0027200    e   t   u   r   n   s       X   '   s       o   r   i   g   i
0027220    n   a   l       v   a   l   u   e   .  \r  \r   (   P   R   O
0027240    G   2       X   1       X   2       .   .   .       X   N   )
0027260           \t   [   N   o   S   p   r   e   a   d       F   u   n
0027300    c   t   i   o   n   ]  \r   S   i   m   i   l   a   r       t
0027320    o       P   R   O   G   1   .           E   v   a   l   u   a
0027340    t   e   s       i   t   s       a   r   g   u   m   e   n   t
0027360    s       i   n       o   r   d   e   r   ,       a   n   d    
0027400    r   e   t   u   r   n   s       t   h   e       v   a   l   u
0027420    e       o   f       i   t   s       s   e   c   o   n   d    
0027440    a   r   g   u   m   e   n   t       X   2   .  \r  \r   (   P
0027460    R   O   G   N       X   1       X   2       .   .   .       X
0027500    N   )          \t   [   N   L   a   m   b   d   a       N   o
0027520    S   p   r   e   a   d       F   u   n   c   t   i   o   n   ]
0027540   \r   P   R   O   G   N       e   v   a   l   u   a   t   e   s
0027560        e   a   c   h       o   f       i   t   s       a   r   g
0027600    u   m   e   n   t   s       i   n       o   r   d   e   r   ,
0027620        a   n   d       r   e   t   u   r   n   s       t   h   e
0027640        v   a   l   u   e       o   f       i   t   s       l   a
0027660    s   t       a   r   g   u   m   e   n   t   .           P   R
0027700    O   G   N       i   s       u   s   e   d       t   o       s
0027720    p   e   c   i   f   y       m   o   r   e       t   h   a   n
0027740        o   n   e       c   o   m   p   u   t   a   t   i   o   n
0027760        w   h   e   r   e       t   h   e       s   y   n   t   a
0030000    x       a   l   l   o   w   s       o   n   l   y       o   n
0030020    e   ,       e   .   g   .   ,       (   S   E   L   E   C   T
0030040    Q       .   .   .       (   P   R   O   G   N       .   .   .
0030060    )   )       a   l   l   o   w   s       e   v   a   l   u   a
0030100    t   i   o   n       o   f       s   e   v   e   r   a   l    
0030120    e   x   p   r   e   s   s   i   o   n   s       a   s       t
0030140    h   e       d   e   f   a   u   l   t       c   o   n   d   i
0030160    t   i   o   n       f   o   r       a       S   E   L   E   C
0030200    T   Q   .  \r  \r   (   P   R   O   G       V   A   R   L   S
0030220    T       E   1       E   2       .   .   .       E   N   )    
0030240       \t   [   N   L   a   m   b   d   a       N   o   S   p   r
0030260    e   a   d       F   u   n   c   t   i   o   n   ]  \r   T   h
0030300    i   s       f   u   n   c   t   i   o   n       a   l   l   o
0030320    w   s       t   h   e       u   s   e   r       t   o       w
0030340    r   i   t   e       a   n       A   L   G   O   L   -   l   i
0030360    k   e       p   r   o   g   r   a   m       c   o   n   t   a
0030400    i   n   i   n   g       I   n   t   e   r   l   i   s   p    
0030420    e   x   p   r   e   s   s   i   o   n   s       (   f   o   r
0030440    m   s   )       t   o       b   e       e   x   e   c   u   t
0030460    e   d   .           T   h   e       f   i   r   s   t       a
0030500    r   g   u   m   e   n   t   ,       V   A   R   L   S   T   ,
0030520        i   s       a       l   i   s   t       o   f       l   o
0030540    c   a   l       v   a   r   i   a   b   l   e   s       (   m
0030560    u   s   t       b   e       N   I   L       i   f       n   o
0030600        v   a   r   i   a   b   l   e   s       a   r   e       u
0030620    s   e   d   )   .           E   a   c   h       a   t   o   m
0030640        i   n       V   A   R   L   S   T       i   s       t   r
0030660    e   a   t   e   d       a   s       t   h   e       n   a   m
0030700    e       o   f       a       l   o   c   a   l       v   a   r
0030720    i   a   b   l   e       a   n   d       b   o   u   n   d    
0030740    t   o       N   I   L   .           V   A   R   L   S   T    
0030760    c   a   n       a   l   s   o       c   o   n   t   a   i   n
0031000        l   i   s   t   s           o   f       t   h   e       f
0031020    o   r   m       (   L   I   T   A   T   O   M       F   O   R
0031040    M   )   .           I   n       t   h   i   s       c   a   s
0031060    e   ,       L   I   T   A   T   O   M       i   s       t   h
0031100    e       n   a   m   e       o   f       t   h   e       v   a
0031120    r   i   a   b   l   e       a   n   d       i   s       b   o
0031140    u   n   d       t   o       t   h   e       v   a   l   u   e
0031160        o   f       F   O   R   M   .           T   h   e       e
0031200    v   a   l   u   a   t   i   o   n       t   a   k   e   s    
0031220    p   l   a   c   e       b   e   f   o   r   e       a   n   y
0031240        o   f       t   h   e       b   i   n   d   i   n   g   s
0031260        a   r   e       p   e   r   f   o   r   m   e   d   ,    
0031300    e   .   g   .   ,       (   P   R   O   G       (   (   X    
0031320    Y   )       (   Y       X   )   )       .   .   .   )       w
0031340    i   l   l       b   i   n   d       l   o   c   a   l       v
0031360    a   r   i   a   b   l   e       X       t   o       t   h   e
0031400        v   a   l   u   e       o   f       Y       (   e   v   a
0031420    l   u   a   t   e   d       o   u   t   s   i   d   e       t
0031440    h   e       P   R   O   G   )       a   n   d       l   o   c
0031460    a   l       v   a   r   i   a   b   l   e       Y       t   o
0031500        t   h   e       v   a   l   u   e       o   f       X    
0031520    (   o   u   t   s   i   d   e       t   h   e       P   R   O
0031540    G   )   .           A   n       a   t   t   e   m   p   t    
0031560    t   o       u   s   e       a   n   y   t   h   i   n   g    
0031600    o   t   h   e   r       t   h   a   n       a       l   i   t
0031620    a   t   o   m       a   s       a       P   R   O   G       v
0031640    a   r   i   a   b   l   e       w   i   l   l       c   a   u
0031660    s   e       a   n       e   r   r   o   r   ,       A   R   G
0031700        N   O   T       L   I   T   A   T   O   M   .           A
0031720    n       a   t   t   e   m   p   t       t   o       u   s   e
0031740        N   I   L       o   r       T       a   s       a       P
0031760    R   O   G       v   a   r   i   a   b   l   e       w   i   l
0032000    l       c   a   u   s   e       a   n       e   r   r   o   r
0032020    ,       A   T   T   E   M   P   T       T   O       B   I   N
0032040    D       N   I   L       O   R       T   .  \r   T   h   e    
0032060    r   e   s   t       o   f       t   h   e       P   R   O   G
0032100        i   s       a       s   e   q   u   e   n   c   e       o
0032120    f       n   o   n   -   a   t   o   m   i   c       s   t   a
0032140    t   e   m   e   n   t   s       (   f   o   r   m   s   )    
0032160    a   n   d       l   i   t   a   t   o   m   s       (   l   a
0032200    b   e   l   s   )   .           T   h   e       f   o   r   m
0032220    s       a   r   e       e   v   a   l   u   a   t   e   d    
0032240    s   e   q   u   e   n   t   i   a   l   l   y   ;       t   h
0032260    e       l   a   b   e   l   s       s   e   r   v   e       o
0032300    n   l   y       a   s       m   a   r   k   e   r   s   .    
0032320        T   h   e       t   w   o       s   p   e   c   i   a   l
0032340        f   u   n   c   t   i   o   n   s       G   O       a   n
0032360    d       R   E   T   U   R   N       a   l   t   e   r       t
0032400    h   i   s       f   l   o   w       o   f       c   o   n   t
0032420    r   o   l       a   s       d   e   s   c   r   i   b   e   d
0032440        b   e   l   o   w   .           T   h   e       v   a   l
0032460    u   e       o   f       t   h   e       P   R   O   G       i
0032500    s       u   s   u   a   l   l   y       s   p   e   c   i   f
0032520    i   e   d       b   y       t   h   e       f   u   n   c   t
0032540    i   o   n       R   E   T   U   R   N   .           I   f    
0032560    n   o       R   E   T   U   R   N       i   s       e   x   e
0032600    c   u   t   e   d       b   e   f   o   r   e       t   h   e
0032620        P   R   O   G       "   f   a   l   l   s       o   f   f
0032640        t   h   e       e   n   d   ,   "       t   h   e       v
0032660    a   l   u   e       o   f       t   h   e       P   R   O   G
0032700        i   s       N   I   L   .  \r  \r   (   G   O       U   )
0032720           \t   [   N   L   a   m   b   d   a       N   o   S   p
0032740    r   e   a   d       F   u   n   c   t   i   o   n   ]  \r   G
0032760    O       i   s       u   s   e   d       t   o       c   a   u
0033000    s   e       a       t   r   a   n   s   f   e   r       i   n
0033020        a       P   R   O   G   .           (   G   O       L   )
0033040        w   i   l   l       c   a   u   s   e       t   h   e    
0033060    P   R   O   G       t   o       e   v   a   l   u   a   t   e
0033100        f   o   r   m   s       s   t   a   r   t   i   n   g    
0033120    a   t       t   h   e       l   a   b   e   l       L       (
0033140    G   O       d   o   e   s       n   o   t       e   v   a   l
0033160    u   a   t   e       i   t   s       a   r   g   u   m   e   n
0033200    t   )   .           A       G   O       c   a   n       b   e
0033220        u   s   e   d       a   t       a   n   y       l   e   v
0033240    e   l       i   n       a       P   R   O   G   .           I
0033260    f       t   h   e       l   a   b   e   l       i   s       n
0033300    o   t       f   o   u   n   d   ,       G   O       w   i   l
0033320    l       s   e   a   r   c   h       h   i   g   h   e   r    
0033340    p   r   o   g   s       w   i   t   h   i   n       t   h   e
0033360        s   a   m   e       f   u   n   c   t   i   o   n   ,    
0033400    e   .   g   .   ,       (   P   R   O   G       .   .   .    
0033420    A       .   .   .       (   P   R   O   G       .   .   .    
0033440    (   G   O       A   )   )   )   .       I   f       t   h   e
0033460        l   a   b   e   l       i   s       n   o   t       f   o
0033500    u   n   d       i   n       t   h   e       f   u   n   c   t
0033520    i   o   n       i   n       w   h   i   c   h       t   h   e
0033540        P   R   O   G       a   p   p   e   a   r   s   ,       a
0033560    n       e   r   r   o   r       i   s       g   e   n   e   r
0033600    a   t   e   d   ,       U   N   D   E   F   I   N   E   D    
0033620    O   R       I   L   L   E   G   A   L       G   O   .  \r  \r
0033640    (   R   E   T   U   R   N       X   )          \t   [   F   u
0033660    n   c   t   i   o   n   ]  \r   A       R   E   T   U   R   N
0033700        i   s       t   h   e       n   o   r   m   a   l       e
0033720    x   i   t       f   o   r       a       P   R   O   G   .    
0033740    I   t   s       a   r   g   u   m   e   n   t       i   s    
0033760    e   v   a   l   u   a   t   e   d       a   n   d       i   s
0034000        i   m   m   e   d   i   a   t   e   l   y       r   e   t
0034020    u   r   n   e   d       t   h   e       v   a   l   u   e    
0034040    o   f       t   h   e       P   R   O   G       i   n       w
0034060    h   i   c   h       i   t       a   p   p   e   a   r   s   .
0034100   \r  \r   N   o   t   e   :           I   f       a       G   O
0034120        o   r       R   E   T   U   R   N       i   s       e   x
0034140    e   c   u   t   e   d       i   n       a   n       i   n   t
0034160    e   r   p   r   e   t   e   d       f   u   n   c   t   i   o
0034200    n       w   h   i   c   h       i   s       n   o   t       a
0034220        P   R   O   G   ,       t   h   e       G   O       o   r
0034240        R   E   T   U   R   N       w   i   l   l       b   e    
0034260    e   x   e   c   u   t   e   d       i   n       t   h   e    
0034300    l   a   s   t       i   n   t   e   r   p   r   e   t   e   d
0034320        P   R   O   G       e   n   t   e   r   e   d       i   f
0034340        a   n   y   ,       o   t   h   e   r   w   i   s   e    
0034360    c   a   u   s   e       a   n       e   r   r   o   r   .  \r
0034400    G   O       o   r       R   E   T   U   R   N       i   n   s
0034420    i   d   e       o   f       a       c   o   m   p   i   l   e
0034440    d       f   u   n   c   t   i   o   n       t   h   a   t    
0034460    i   s       n   o   t       a       P   R   O   G       i   s
0034500        n   o   t       a   l   l   o   w   e   d   ,       a   n
0034520    d       w   i   l   l       c   a   u   s   e       a   n    
0034540    e   r   r   o   r       a   t       c   o   m   p   i   l   e
0034560        t   i   m   e   .  \r   A   s       a       c   o   r   o
0034600    l   l   a   r   y   ,       G   O       o   r       R   E   T
0034620    U   R   N       i   n       a       f   u   n   c   t   i   o
0034640    n   a   l       a   r   g   u   m   e   n   t   ,       e   .
0034660    g   .   ,       t   o       S   O   R   T   ,       w   i   l
0034700    l       n   o   t       w   o   r   k       c   o   m   p   i
0034720    l   e   d   .           A   l   s   o   ,       s   i   n   c
0034740    e       N   L   S   E   T   Q   '   s       a   n   d       E
0034760    R   S   E   T   Q   '   s       c   o   m   p   i   l   e    
0035000    a   s       s   e   p   a   r   a   t   e       f   u   n   c
0035020    t   i   o   n   s   ,       a       G   O       o   r       R
0035040    E   T   U   R   N       c   a   n   n   o   t       b   e    
0035060    u   s   e   d       i   n   s   i   d   e       o   f       a
0035100        c   o   m   p   i   l   e   d       N   L   S   E   T   Q
0035120        o   r       E   R   S   E   T   Q       i   f       t   h
0035140    e       c   o   r   r   e   s   p   o   n   d   i   n   g    
0035160    P   R   O   G       i   s       o   u   t   s   i   d   e   ,
0035200        i   .   e   .   ,       a   b   o   v   e   ,       t   h
0035220    e       N   L   S   E   T   Q       o   r       E   R   S   E
0035240    T   Q   .  \r   (   L   E   T       V   A   R   L   S   T    
0035260    E   1       E   2       .   .   .       E   N   )          \t
0035300    [   M   a   c   r   o   ]  \r   L   E   T       i   s       e
0035320    s   s   e   n   t   i   a   l   l   y       a       P   R   O
0035340    G       t   h   a   t       c   a   n   '   t       c   o   n
0035360    t   a   i   n       G   O   '   s       o   r       R   E   T
0035400    U   R   N   '   s   ,       a   n   d       w   h   o   s   e
0035420        l   a   s   t       f   o   r   m       i   s       t   h
0035440    e       r   e   t   u   r   n   e   d       v   a   l   u   e
0035460    .  \r  \r   (   L   E   T   *       V   A   R   L   S   T    
0035500    E   1       E   2       .   .   .       E   N   )          \t
0035520    [   M   a   c   r   o   ]  \r   (   P   R   O   G   *       V
0035540    A   R   L   S   T       E   1       E   2       .   .   .    
0035560    E   N   )          \t   [   M   a   c   r   o   ]  \r   L   E
0035600    T   *       a   n   d       P   R   O   G   *       d   i   f
0035620    f   e   r       f   r   o   m       L   E   T       a   n   d
0035640        P   R   O   G       o   n   l   y       i   n       t   h
0035660    a   t       t   h   e       b   i   n   d   i   n   g       o
0035700    f       t   h   e       b   o   u   n   d       v   a   r   i
0035720    a   b   l   e   s       i   s       d   o   n   e       "   s
0035740    e   q   u   e   n   t   i   a   l   l   y   .   "           T
0035760    h   u   s  \r   (   L   E   T   *       (   (   A       (   L
0036000    I   S   T       5   )   )  \r                           (   B
0036020        (   L   I   S   T       A       A   )   )   )  \r        
0036040        (   E   Q       A       (   C   A   D   R       B   )   )
0036060    )  \r   w   o   u   l   d       e   v   a   l   u   a   t   e
0036100        t   o       T   ;       w   h   e   r   e   a   s       t
0036120    h   e       s   a   m   e       f   o   r   m       w   i   t
0036140    h       L   E   T       m   i   g   h   t       e   v   e   n
0036160        f   i   n   d       A       a   n       u   n   b   o   u
0036200    n   d       v   a   r   i   a   b   l   e       w   h   e   n
0036220        e   v   a   l   u   a   t   i   n   g       (   L   I   S
0036240    T       A       A   )   .  \r  \r  \r   9   .   8          \t
0036260    T   h   e       I   t   e   r   a   t   i   v   e       S   t
0036300    a   t   e   m   e   n   t  \r  \r   T   h   e       i   t   e
0036320    r   a   t   i   v   e       s   t   a   t   e   m   e   n   t
0036340        (   i   .   s   .   )       i   n       i   t   s       v
0036360    a   r   i   o   u   s       f   o   r   m   s       p   e   r
0036400    m   i   t   s       t   h   e       u   s   e   r       t   o
0036420        s   p   e   c   i   f   y       c   o   m   p   l   i   c
0036440    a   t   e   d       i   t   e   r   a   t   i   v   e       s
0036460    t   a   t   e   m   e   n   t   s       i   n       a       s
0036500    t   r   a   i   g   h   t   f   o   r   w   a   r   d       a
0036520    n   d       v   i   s   i   b   l   e       m   a   n   n   e
0036540    r   .           R   a   t   h   e   r       t   h   a   n    
0036560    t   h   e       u   s   e   r       h   a   v   i   n   g    
0036600    t   o       p   e   r   f   o   r   m       t   h   e       m
0036620    e   n   t   a   l       t   r   a   n   s   f   o   r   m   a
0036640    t   i   o   n   s       t   o       a   n       e   q   u   i
0036660    v   a   l   e   n   t       I   n   t   e   r   l   i   s   p
0036700        f   o   r   m       u   s   i   n   g       P   R   O   G
0036720    ,       M   A   P   C   ,       M   A   P   C   A   R   ,    
0036740    e   t   c   .   ,       t   h   e       s   y   s   t   e   m
0036760        d   o   e   s       i   t       f   o   r       h   i   m
0037000    .           T   h   e       g   o   a   l       w   a   s    
0037020    t   o       p   r   o   v   i   d   e       a       r   o   b
0037040    u   s   t       a   n   d       t   o   l   e   r   a   n   t
0037060        f   a   c   i   l   i   t   y       w   h   i   c   h    
0037100    c   o   u   l   d       "   m   a   k   e       s   e   n   s
0037120    e   "       o   u   t       o   f       a       w   i   d   e
0037140        c   l   a   s   s       o   f       i   t   e   r   a   t
0037160    i   v   e       s   t   a   t   e   m   e   n   t   s   .    
0037200        A   c   c   o   r   d   i   n   g   l   y   ,       t   h
0037220    e       u   s   e   r       s   h   o   u   l   d       n   o
0037240    t       f   e   e   l       o   b   l   i   g   e   d       t
0037260    o       r   e   a   d       a   n   d       u   n   d   e   r
0037300    s   t   a   n   d       i   n       d   e   t   a   i   l    
0037320    t   h   e       d   e   s   c   r   i   p   t   i   o   n    
0037340    o   f       e   a   c   h       o   p   e   r   a   t   o   r
0037360        g   i   v   e   n       b   e   l   o   w       i   n    
0037400    o   r   d   e   r       t   o       u   s   e       i   t   e
0037420    r   a   t   i   v   e       s   t   a   t   e   m   e   n   t
0037440    s   .  \r   A   n       i   t   e   r   a   t   i   v   e    
0037460    s   t   a   t   e   m   e   n   t       i   s       a       f
0037500    o   r   m       c   o   n   s   i   s   t   i   n   g       o
0037520    f       a       n   u   m   b   e   r       o   f       s   p
0037540    e   c   i   a   l       w   o   r   d   s       (   k   n   o
0037560    w   n       a   s       i   .   s   .       o   p   e   r   a
0037600    t   o   r   s       o   r       i   .   s   .   o   p   r   s
0037620    )   ,       f   o   l   l   o   w   e   d       b   y       o
0037640    p   e   r   a   n   d   s   .           M   a   n   y       i
0037660    .   s   .   o   p   r   s       (   F   O   R   ,       D   O
0037700    ,       W   H   I   L   E   ,       e   t   c   .   )       a
0037720    r   e       s   i   m   i   l   a   r       t   o       i   t
0037740    e   r   a   t   i   v   e       s   t   a   t   e   m   e   n
0037760    t   s       i   n       o   t   h   e   r       p   r   o   g
0040000    r   a   m   m   i   n   g       l   a   n   g   u   a   g   e
0040020    s   ;           o   t   h   e   r       i   .   s   .   o   p
0040040    r   s       (   C   O   L   L   E   C   T   ,       J   O   I
0040060    N   ,       I   N   ,       e   t   c   .   )       s   p   e
0040100    c   i   f   y       u   s   e   f   u   l       o   p   e   r
0040120    a   t   i   o   n   s       i   n       a       L   i   s   p
0040140        e   n   v   i   r   o   n   m   e   n   t   .           L
0040160    o   w   e   r       c   a   s   e       v   e   r   s   i   o
0040200    n   s       o   f       i   .   s   .   o   p   r   s       (
0040220    d   o   ,       c   o   l   l   e   c   t   ,       e   t   c
0040240    .   )       c   a   n       a   l   s   o       b   e       u
0040260    s   e   d   .           H   e   r   e       a   r   e       s
0040300    o   m   e       e   x   a   m   p   l   e   s       o   f    
0040320    i   t   e   r   a   t   i   v   e       s   t   a   t   e   m
0040340    e   n   t   s   :  \r   _       (   f   o   r       X       f
0040360    r   o   m       1       t   o       5       d   o       (   P
0040400    R   I   N   T       '   F   O   O   )   )  \r   F   O   O  \r
0040420    F   O   O  \r   F   O   O  \r   F   O   O  \r   F   O   O  \r
0040440    N   I   L  \r   _       (   f   o   r       X       f   r   o
0040460    m       2       t   o       1   0       b   y       2       c
0040500    o   l   l   e   c   t       (   T   I   M   E   S       X    
0040520    X   )   )  \r   (   4       1   6       3   6       6   4    
0040540    1   0   0   )  \r   _       (   f   o   r       X       i   n
0040560        '   (   A       B       1       C       6   .   5       N
0040600    I   L       (   4   5   )   )       c   o   u   n   t       (
0040620    N   U   M   B   E   R   P       X   )   )  \r   2  \r   I   t
0040640    e   r   a   t   i   v   e       s   t   a   t   e   m   e   n
0040660    t   s       a   r   e       i   m   p   l   e   m   e   n   t
0040700    e   d       t   h   r   o   u   g   h       C   L   I   S   P
0040720    ,       w   h   i   c   h       t   r   a   n   s   l   a   t
0040740    e   s       t   h   e       f   o   r   m       i   n   t   o
0040760        t   h   e       a   p   p   r   o   p   r   i   a   t   e
0041000        P   R   O   G   ,       M   A   P   C   A   R   ,       e
0041020    t   c   .           I   t   e   r   a   t   i   v   e       s
0041040    t   a   t   e   m   e   n   t       f   o   r   m   s       a
0041060    r   e       t   r   a   n   s   l   a   t   e   d       u   s
0041100    i   n   g       a   l   l       C   L   I   S   P       d   e
0041120    c   l   a   r   a   t   i   o   n   s       i   n       e   f
0041140    f   e   c   t       (   s   t   a   n   d   a   r   d   /   f
0041160    a   s   t   /   u   n   d   o   a   b   l   e   /       e   t
0041200    c   .   )   ;       s   e   e       p   a   g   e       X   .
0041220    X   X   .           M   i   s   s   p   e   l   l   e   d    
0041240    i   .   s   .   o   p   r   s       a   r   e       r   e   c
0041260    o   g   n   i   z   e   d       a   n   d       c   o   r   r
0041300    e   c   t   e   d       u   s   i   n   g       t   h   e    
0041320    s   p   e   l   l   i   n   g       l   i   s   t       C   L
0041340    I   S   P   F   O   R   W   O   R   D   S   P   L   S   T   .
0041360            T   h   e       o   r   d   e   r       o   f       a
0041400    p   p   e   a   r   a   n   c   e       o   f       o   p   e
0041420    r   a   t   o   r   s       i   s       n   e   v   e   r    
0041440    i   m   p   o   r   t   a   n   t   ;       C   L   I   S   P
0041460        s   c   a   n   s       t   h   e       e   n   t   i   r
0041500    e       s   t   a   t   e   m   e   n   t       b   e   f   o
0041520    r   e       i   t       b   e   g   i   n   s       t   o    
0041540    c   o   n   s   t   r   u   c   t       t   h   e       e   q
0041560    u   i   v   a   l   e   n   t       I   n   t   e   r   l   i
0041600    s   p       f   o   r   m   .           N   e   w       i   .
0041620    s   .   o   p   r   s       c   a   n       b   e       d   e
0041640    f   i   n   e   d       a   s       d   e   s   c   r   i   b
0041660    e   d       o   n       p   a   g   e       X   .   X   X   .
0041700   \r   I   f       t   h   e       u   s   e   r       d   e   f
0041720    i   n   e   s       a       f   u   n   c   t   i   o   n    
0041740    b   y       t   h   e       s   a   m   e       n   a   m   e
0041760        a   s       a   n       i   .   s   .   o   p   r       (
0042000    W   H   I   L   E   ,       T   O   ,       e   t   c   .   )
0042020    ,       t   h   e       i   .   s   .   o   p   r       w   i
0042040    l   l       n   o       l   o   n   g   e   r       h   a   v
0042060    e       t   h   e       C   L   I   S   P       i   n   t   e
0042100    r   p   r   e   t   a   t   i   o   n       w   h   e   n    
0042120    i   t       a   p   p   e   a   r   s       a   s       C   A
0042140    R       o   f       a       f   o   r   m   ,       a   l   t
0042160    h   o   u   g   h       i   t       w   i   l   l       c   o
0042200    n   t   i   n   u   e       t   o       b   e       t   r   e
0042220    a   t   e   d       a   s       a   n       i   .   s   .   o
0042240    p   r       i   f       i   t       a   p   p   e   a   r   s
0042260        i   n       t   h   e       i   n   t   e   r   i   o   r
0042300        o   f       a   n       i   t   e   r   a   t   i   v   e
0042320        s   t   a   t   e   m   e   n   t   .           T   o    
0042340    a   l   e   r   t       t   h   e       u   s   e   r   ,    
0042360    a       w   a   r   n   i   n   g       m   e   s   s   a   g
0042400    e       i   s       p   r   i   n   t   e   d   ,       e   .
0042420    g   .   ,       (   W   H   I   L   E       D   E   F   I   N
0042440    E   D   ,       T   H   E   R   E   F   O   R   E       D   I
0042460    S   A   B   L   E   D       I   N       C   L   I   S   P   )
0042500    .  \r   9   .   8   .   1          \t   I   .   s   .   t   y
0042520    p   e   s  \r  \r   T   h   e       f   o   l   l   o   w   i
0042540    n   g       i   .   s   .   o   p   r   s       a   r   e    
0042560    e   x   a   m   p   l   e   s       o   f       a       c   e
0042600    r   t   a   i   n       k   i   n   d       o   f       i   t
0042620    e   r   a   t   i   v   e       s   t   a   t   e   m   e   n
0042640    t       o   p   e   r   a   t   o   r       c   a   l   l   e
0042660    d       a   n       i   .   s   .   t   y   p   e   .        
0042700    T   h   e       i   .   s   .   t   y   p   e       s   p   e
0042720    c   i   f   i   e   s       w   h   a   t       i   s       t
0042740    o       b   e       d   o   n   e       a   t       e   a   c
0042760    h       i   t   e   r   a   t   i   o   n   .           I   t
0043000    s       o   p   e   r   a   n   d       i   s       c   a   l
0043020    l   e   d       t   h   e       "   b   o   d   y   "       o
0043040    f       t   h   e       i   t   e   r   a   t   i   v   e    
0043060    s   t   a   t   e   m   e   n   t   .           E   a   c   h
0043100        i   t   e   r   a   t   i   v   e       s   t   a   t   e
0043120    m   e   n   t       m   u   s   t       h   a   v   e       o
0043140    n   e       a   n   d       o   n   l   y       o   n   e    
0043160    i   .   s   .   t   y   p   e   .  \r   D   O       F   O   R
0043200    M          \t   [   I   .   S   .       O   p   e   r   a   t
0043220    o   r   ]  \r   S   p   e   c   i   f   i   e   s       w   h
0043240    a   t       i   s       t   o       b   e       d   o   n   e
0043260        a   t       e   a   c   h       i   t   e   r   a   t   i
0043300    o   n   .           D   O       w   i   t   h       n   o    
0043320    o   t   h   e   r       o   p   e   r   a   t   o   r       s
0043340    p   e   c   i   f   i   e   s       a   n       i   n   f   i
0043360    n   i   t   e       l   o   o   p   .           I   f       s
0043400    o   m   e       e   x   p   l   i   c   i   t       o   r    
0043420    i   m   p   l   i   c   i   t       t   e   r   m   i   n   a
0043440    t   i   n   g       c   o   n   d   i   t   i   o   n       i
0043460    s       s   p   e   c   i   f   i   e   d   ,       t   h   e
0043500        v   a   l   u   e       o   f       t   h   e       i   .
0043520    s   .       i   s       N   I   L   .           T   r   a   n
0043540    s   l   a   t   e   s       t   o       M   A   P   C       o
0043560    r       M   A   P       w   h   e   n   e   v   e   r       p
0043600    o   s   s   i   b   l   e   .  \r  \r   C   O   L   L   E   C
0043620    T       F   O   R   M          \t   [   I   .   S   .       O
0043640    p   e   r   a   t   o   r   ]  \r   S   p   e   c   i   f   i
0043660    e   s       t   h   a   t       t   h   e       v   a   l   u
0043700    e       o   f       F   O   R   M       a   t       e   a   c
0043720    h       i   t   e   r   a   t   i   o   n       i   s       t
0043740    o       b   e       c   o   l   l   e   c   t   e   d       i
0043760    n       a       l   i   s   t   ,       w   h   i   c   h    
0044000    i   s       r   e   t   u   r   n   e   d       a   s       t
0044020    h   e       v   a   l   u   e       o   f       t   h   e    
0044040    i   .   s   .       w   h   e   n       i   t       t   e   r
0044060    m   i   n   a   t   e   s   .           T   r   a   n   s   l
0044100    a   t   e   s       t   o       M   A   P   C   A   R   ,    
0044120    M   A   P   L   I   S   T       o   r       S   U   B   S   E
0044140    T       w   h   e   n   e   v   e   r       p   o   s   s   i
0044160    b   l   e   .  \r   W   h   e   n       C   O   L   L   E   C
0044200    T       t   r   a   n   s   l   a   t   e   s       t   o    
0044220    a       P   R   O   G       (   e   .   g   .   ,       i   f
0044240        U   N   T   I   L   ,       W   H   I   L   E   ,       e
0044260    t   c   .       a   p   p   e   a   r       i   n       t   h
0044300    e       i   .   s   .   )   ,       t   h   e       t   r   a
0044320    n   s   l   a   t   i   o   n       e   m   p   l   o   y   s
0044340        a   n       o   p   e   n       T   C   O   N   C       u
0044360    s   i   n   g       t   w   o       p   o   i   n   t   e   r
0044400    s       s   i   m   i   l   a   r       t   o       t   h   a
0044420    t       u   s   e   d       b   y       t   h   e       c   o
0044440    m   p   i   l   e   r       f   o   r       c   o   m   p   i
0044460    l   i   n   g       M   A   P   C   A   R   .           T   o
0044500        d   i   s   a   b   l   e       t   h   i   s       t   r
0044520    a   n   s   l   a   t   i   o   n   ,       p   e   r   f   o
0044540    r   m       (   C   L   D   I   S   A   B   L   E       '   F
0044560    C   O   L   L   E   C   T   )       (   s   e   e       p   a
0044600    g   e       X   .   X   X   )   .  \r  \r   J   O   I   N    
0044620    F   O   R   M          \t   [   I   .   S   .       O   p   e
0044640    r   a   t   o   r   ]  \r   S   i   m   i   l   a   r       t
0044660    o       C   O   L   L   E   C   T   ,       e   x   c   e   p
0044700    t       t   h   a   t       t   h   e       v   a   l   u   e
0044720    s       o   f       F   O   R   M       a   t       e   a   c
0044740    h       i   t   e   r   a   t   i   o   n       a   r   e    
0044760    N   C   O   N   C   e   d   .           T   r   a   n   s   l
0045000    a   t   e   s       t   o       M   A   P   C   O   N   C    
0045020    o   r       M   A   P   C   O   N       w   h   e   n   e   v
0045040    e   r       p   o   s   s   i   b   l   e   .           /   N
0045060    C   O   N   C   ,       /   M   A   P   C   O   N   C   ,    
0045100    a   n   d       /   M   A   P   C   O   N       a   r   e    
0045120    u   s   e   d       w   h   e   n       t   h   e       C   L
0045140    I   S   P       d   e   c   l   a   r   a   t   i   o   n    
0045160    U   N   D   O   A   B   L   E       i   s       i   n       e
0045200    f   f   e   c   t   .  \r  \r   S   U   M       F   O   R   M
0045220           \t   [   I   .   S   .       O   p   e   r   a   t   o
0045240    r   ]  \r   S   p   e   c   i   f   i   e   s       t   h   a
0045260    t       t   h   e       v   a   l   u   e   s       o   f    
0045300    F   O   R   M       a   t       e   a   c   h       i   t   e
0045320    r   a   t   i   o   n       b   e       a   d   d   e   d    
0045340    t   o   g   e   t   h   e   r       a   n   d       r   e   t
0045360    u   r   n   e   d       a   s       t   h   e       v   a   l
0045400    u   e       o   f       t   h   e       i   .   s   .   ,    
0045420    e   .   g   .   ,       (   f   o   r       I       f   r   o
0045440    m       1       t   o       5       s   u   m       (   T   I
0045460    M   E   S       I       I   )   )       r   e   t   u   r   n
0045500    s       1   +   4   +   9   +   1   6   +   2   5       =    
0045520    5   5   .           I   P   L   U   S   ,       F   P   L   U
0045540    S   ,       o   r       P   L   U   S       w   i   l   l    
0045560    b   e       u   s   e   d       i   n       t   h   e       t
0045600    r   a   n   s   l   a   t   i   o   n       d   e   p   e   n
0045620    d   i   n   g       o   n       t   h   e       C   L   I   S
0045640    P       d   e   c   l   a   r   a   t   i   o   n   s       i
0045660    n       e   f   f   e   c   t   .  \r  \r   C   O   U   N   T
0045700        F   O   R   M          \t   [   I   .   S   .       O   p
0045720    e   r   a   t   o   r   ]  \r   C   o   u   n   t   s       t
0045740    h   e       n   u   m   b   e   r       o   f       t   i   m
0045760    e   s       t   h   a   t       F   O   R   M       i   s    
0046000    t   r   u   e   ,       a   n   d       r   e   t   u   r   n
0046020    s       t   h   a   t       c   o   u   n   t       a   s    
0046040    i   t   s       v   a   l   u   e   .  \r  \r   A   L   W   A
0046060    Y   S       F   O   R   M          \t   [   I   .   S   .    
0046100    O   p   e   r   a   t   o   r   ]  \r   R   e   t   u   r   n
0046120    s       T       i   f       t   h   e       v   a   l   u   e
0046140        o   f       F   O   R   M       i   s       n   o   n   -
0046160    N   I   L       f   o   r       a   l   l       i   t   e   r
0046200    a   t   i   o   n   s   .           (   N   o   t   e   :    
0046220    r   e   t   u   r   n   s       N   I   L       a   s       s
0046240    o   o   n       a   s       t   h   e       v   a   l   u   e
0046260        o   f       F   O   R   M       i   s       N   I   L   )
0046300    .  \r  \r   N   E   V   E   R       F   O   R   M          \t
0046320    [   I   .   S   .       O   p   e   r   a   t   o   r   ]  \r
0046340    S   i   m   i   l   a   r       t   o       A   L   W   A   Y
0046360    S   ,       e   x   c   e   p   t       r   e   t   u   r   n
0046400    s       T       i   f       t   h   e       v   a   l   u   e
0046420        o   f       F   O   R   M       i   s       n   e   v   e
0046440    r       t   r   u   e   .           (   N   o   t   e   :    
0046460    r   e   t   u   r   n   s       N   I   L       a   s       s
0046500    o   o   n       a   s       t   h   e       v   a   l   u   e
0046520        o   f       F   O   R   M       i   s       n   o   n   -
0046540    N   I   L   )   .  \r  \r   T   h   e       f   o   l   l   o
0046560    w   i   n   g       i   .   s   .   t   y   p   e   s       e
0046600    x   p   l   i   c   i   t   l   y       r   e   f   e   r    
0046620    t   o       t   h   e       i   t   e   r   a   t   i   o   n
0046640        v   a   r   i   a   b   l   e       (   i   .   v   .   )
0046660        o   f       t   h   e       i   t   e   r   a   t   i   v
0046700    e       s   t   a   t   e   m   e   n   t   ,       w   h   i
0046720    c   h       i   s       a       v   a   r   i   a   b   l   e
0046740        s   e   t       a   t       e   a   c   h       i   t   e
0046760    r   a   t   i   o   n   .           T   h   i   s       i   s
0047000        e   x   p   l   a   i   n   e   d       b   e   l   o   w
0047020        u   n   d   e   r       F   O   R   .  \r   T   H   E   R
0047040    E   I   S       F   O   R   M          \t   [   I   .   S   .
0047060        O   p   e   r   a   t   o   r   ]  \r   R   e   t   u   r
0047100    n   s       t   h   e       f   i   r   s   t       v   a   l
0047120    u   e       o   f       t   h   e       i   .   v   .       f
0047140    o   r       w   h   i   c   h       F   O   R   M       i   s
0047160        n   o   n   -   N   I   L   ,       e   .   g   .   ,    
0047200    (   f   o   r       X       i   n       Y       t   h   e   r
0047220    e   i   s       (   N   U   M   B   E   R   P       X   )   )
0047240        r   e   t   u   r   n   s       t   h   e       f   i   r
0047260    s   t       n   u   m   b   e   r       i   n       Y   .    
0047300        (   N   o   t   e   :       r   e   t   u   r   n   s    
0047320    t   h   e       v   a   l   u   e       o   f       t   h   e
0047340        i   .   v   .       a   s       s   o   o   n       a   s
0047360        t   h   e       v   a   l   u   e       o   f       F   O
0047400    R   M       i   s       n   o   n   -   N   I   L   )   .  \r
0047420   \r   L   A   R   G   E   S   T       F   O   R   M          \t
0047440    [   I   .   S   .       O   p   e   r   a   t   o   r   ]  \r
0047460    S   M   A   L   L   E   S   T       F   O   R   M          \t
0047500    [   I   .   S   .       O   p   e   r   a   t   o   r   ]  \r
0047520    R   e   t   u   r   n   s       t   h   e       v   a   l   u
0047540    e       o   f       t   h   e       i   .   v   .       t   h
0047560    a   t       p   r   o   v   i   d   e   s       t   h   e    
0047600    l   a   r   g   e   s   t   /   s   m   a   l   l   e   s   t
0047620        v   a   l   u   e       o   f       F   O   R   M   .    
0047640            $   $   E   X   T   R   E   M   E       i   s       a
0047660    l   w   a   y   s       b   o   u   n   d       t   o       t
0047700    h   e       c   u   r   r   e   n   t       g   r   e   a   t
0047720    e   s   t   /   s   m   a   l   l   e   s   t       v   a   l
0047740    u   e   ,       $   $   V   A   L       t   o       t   h   e
0047760        v   a   l   u   e       o   f       t   h   e       i   .
0050000    v   .       f   r   o   m       w   h   i   c   h       i   t
0050020        c   a   m   e   .  \r  \r   9   .   8   .   2          \t
0050040    I   t   e   r   a   t   i   o   n       V   a   r   i   a   b
0050060    l   e       I   .   s   .   o   p   r   s  \r  \r   F   O   R
0050100        V   A   R          \t   [   I   .   S   .       O   p   e
0050120    r   a   t   o   r   ]  \r   S   p   e   c   i   f   i   e   s
0050140        t   h   e       i   t   e   r   a   t   i   o   n       v
0050160    a   r   i   a   b   l   e       (   i   .   v   .   )       w
0050200    h   i   c   h       i   s       u   s   e   d       i   n    
0050220    c   o   n   j   u   n   c   t   i   o   n       w   i   t   h
0050240        I   N   ,       O   N   ,       F   R   O   M   ,       T
0050260    O   ,       a   n   d       B   Y   .           T   h   e    
0050300    v   a   r   i   a   b   l   e       i   s       r   e   b   o
0050320    u   n   d       w   i   t   h   i   n       t   h   e       i
0050340    .   s   .   ,       s   o       t   h   e       v   a   l   u
0050360    e       o   f       t   h   e       v   a   r   i   a   b   l
0050400    e       o   u   t   s   i   d   e       t   h   e       i   .
0050420    s   .       i   s       n   o   t       e   f   f   e   c   t
0050440    e   d   .           E   x   a   m   p   l   e   :  \r   _    
0050460    (   S   E   T   Q       X       5   5   )  \r   5   5  \r   _
0050500        (   f   o   r       X       f   r   o   m       1       t
0050520    o       5       c   o   l   l   e   c   t       (   T   I   M
0050540    E   S       X       X   )   )  \r   (   1       4       9    
0050560    1   6       2   5   )  \r   _       X  \r   5   5  \r  \r   F
0050600    O   R       V   A   R   S          \t   [   I   .   S   .    
0050620    O   p   e   r   a   t   o   r   ]  \r   V   A   R   S       a
0050640        l   i   s   t       o   f       v   a   r   i   a   b   l
0050660    e   s   ,       e   .   g   .   ,       (   f   o   r       (
0050700    X       Y       Z   )       i   n       .   .   .   )   .    
0050720        T   h   e       f   i   r   s   t       v   a   r   i   a
0050740    b   l   e       i   s       t   h   e       i   .   v   .   ,
0050760        t   h   e       r   e   s   t       a   r   e       d   u
0051000    m   m   y       v   a   r   i   a   b   l   e   s   .        
0051020    S   e   e       B   I   N   D       b   e   l   o   w   .  \r
0051040   \r   F   O   R       O   L   D       V   A   R          \t   [
0051060    I   .   S   .       O   p   e   r   a   t   o   r   ]  \r   S
0051100    i   m   i   l   a   r       t   o       F   O   R   ,       e
0051120    x   c   e   p   t       t   h   a   t       V   A   R       i
0051140    s       n   o   t       r   e   b   o   u   n   d       w   i
0051160    t   h   i   n       t   h   e       i   .   s   .   ,       s
0051200    o       t   h   e       v   a   l   u   e       o   f       t
0051220    h   e       i   .   v   .       o   u   t   s   i   d   e    
0051240    o   f       t   h   e       i   .   s   .       i   s       c
0051260    h   a   n   g   e   d   .               E   x   a   m   p   l
0051300    e   :  \r   _       (   S   E   T   Q       X       5   5   )
0051320   \r   5   5  \r   _       (   f   o   r       o   l   d       X
0051340        f   r   o   m       1       t   o       5       c   o   l
0051360    l   e   c   t       (   T   I   M   E   S       X       X   )
0051400    )  \r   (   1       4       9       1   6       2   5   )  \r
0051420    _       X  \r   6  \r  \r   B   I   N   D       V   A   R    
0051440       \t   [   I   .   S   .       O   p   e   r   a   t   o   r
0051460    ]  \r   B   I   N   D       V   A   R   S          \t   [   I
0051500    .   S   .       O   p   e   r   a   t   o   r   ]  \r   U   s
0051520    e   d       t   o       s   p   e   c   i   f   y       d   u
0051540    m   m   y       v   a   r   i   a   b   l   e   s   ,       w
0051560    h   i   c   h       a   r   e       b   o   u   n   d       l
0051600    o   c   a   l   l   y       w   i   t   h   i   n       t   h
0051620    e       i   .   s   .  \r  \r   N   o   t   e   :           F
0051640    O   R   ,       F   O   R       O   L   D   ,       a   n   d
0051660        B   I   N   D       v   a   r   i   a   b   l   e   s    
0051700    c   a   n       b   e       i   n   i   t   i   a   l   i   z
0051720    e   d       b   y       u   s   i   n   g       t   h   e    
0051740    f   o   r   m       V   A   R   _   F   O   R   M   :  \r   (
0051760    f   o   r       o   l   d       (   X   _   F   O   R   M   )
0052000        b   i   n   d       (   Y   _   F   O   R   M   )       .
0052020    .   .   )  \r   I   N       F   O   R   M          \t   [   I
0052040    .   S   .       O   p   e   r   a   t   o   r   ]  \r   S   p
0052060    e   c   i   f   i   e   s       t   h   a   t       t   h   e
0052100        i   .   s   .       i   s       t   o       i   t   e   r
0052120    a   t   e       d   o   w   n       a       l   i   s   t    
0052140    w   i   t   h       t   h   e       i   .   v   .       b   e
0052160    i   n   g       r   e   s   e   t       t   o       t   h   e
0052200        c   o   r   r   e   s   p   o   n   d   i   n   g       e
0052220    l   e   m   e   n   t       a   t       e   a   c   h       i
0052240    t   e   r   a   t   i   o   n   .           F   o   r       e
0052260    x   a   m   p   l   e   ,       (   f   o   r       X       i
0052300    n       Y       d   o       .   .   .   )       c   o   r   r
0052320    e   s   p   o   n   d   s       t   o       (   M   A   P   C
0052340        Y       (   F   U   N   C   T   I   O   N       (   L   A
0052360    M   B   D   A       (   X   )       .   .   .   )   )   )   .
0052400            I   f       n   o       i   .   v   .       h   a   s
0052420        b   e   e   n       s   p   e   c   i   f   i   e   d   ,
0052440        a       d   u   m   m   y       i   s       s   u   p   p
0052460    l   i   e   d   ,       e   .   g   .   ,       (   i   n    
0052500    Y       c   o   l   l   e   c   t       C   A   D   R   )    
0052520    i   s       e   q   u   i   v   a   l   e   n   t       t   o
0052540        (   M   A   P   C   A   R       Y       (   F   U   N   C
0052560    T   I   O   N       C   A   D   R   )   )   .  \r  \r   O   N
0052600        F   O   R   M          \t   [   I   .   S   .       O   p
0052620    e   r   a   t   o   r   ]  \r   S   a   m   e       a   s    
0052640    I   N       e   x   c   e   p   t       t   h   a   t       t
0052660    h   e       i   .   v   .       i   s       r   e   s   e   t
0052700        t   o       t   h   e       c   o   r   r   e   s   p   o
0052720    n   d   i   n   g       t   a   i   l       a   t       e   a
0052740    c   h       i   t   e   r   a   t   i   o   n   .           T
0052760    h   u   s       I   N       c   o   r   r   e   s   p   o   n
0053000    d   s       t   o       M   A   P   C   ,       M   A   P   C
0053020    A   R   ,       a   n   d       M   A   P   C   O   N   C   ,
0053040        w   h   i   l   e       O   N       c   o   r   r   e   s
0053060    p   o   n   d   s       t   o       M   A   P   ,       M   A
0053100    P   L   I   S   T   ,       a   n   d       M   A   P   C   O
0053120    N   .  \r  \r   N   o   t   e   :           f   o   r       b
0053140    o   t   h       I   N       a   n   d       O   N   ,       F
0053160    O   R   M       i   s       e   v   a   l   u   a   t   e   d
0053200        b   e   f   o   r   e       t   h   e       m   a   i   n
0053220        p   a   r   t       o   f       t   h   e       i   .   s
0053240    .       i   s       e   n   t   e   r   e   d   ,       i   .
0053260    e   .       o   u   t   s   i   d   e       o   f       t   h
0053300    e       s   c   o   p   e       o   f       a   n   y       o
0053320    f       t   h   e       b   o   u   n   d       v   a   r   i
0053340    a   b   l   e   s       o   f       t   h   e       i   .   s
0053360    .           F   o   r       e   x   a   m   p   l   e   ,    
0053400    (   f   o   r       X       b   i   n   d       (   Y   _   '
0053420    (   1       2       3   )   )       i   n       Y       .   .
0053440    .   )       w   i   l   l       m   a   p       d   o   w   n
0053460        t   h   e       l   i   s   t       w   h   i   c   h    
0053500    i   s       t   h   e       v   a   l   u   e       o   f    
0053520    Y       e   v   a   l   u   a   t   e   d       o   u   t   s
0053540    i   d   e       o   f       t   h   e       i   .   s   .   ,
0053560        n   o   t       (   1       2       3   )   .  \r   I   N
0053600        O   L   D       V   A   R          \t   [   I   .   S   .
0053620        O   p   e   r   a   t   o   r   ]  \r   S   p   e   c   i
0053640    f   i   e   s       t   h   a   t       t   h   e       i   .
0053660    s   .       i   s       t   o       i   t   e   r   a   t   e
0053700        d   o   w   n       V   A   R   ,       w   i   t   h    
0053720    V   A   R       i   t   s   e   l   f       b   e   i   n   g
0053740        r   e   s   e   t       t   o       t   h   e       c   o
0053760    r   r   e   s   p   o   n   d   i   n   g       t   a   i   l
0054000        a   t       e   a   c   h       i   t   e   r   a   t   i
0054020    o   n   ,       e   .   g   .   ,       a   f   t   e   r    
0054040    (   f   o   r       X       i   n       o   l   d       L    
0054060    d   o       .   .   .       u   n   t   i   l       .   .   .
0054100    )       f   i   n   i   s   h   e   s   ,       L       w   i
0054120    l   l       b   e       s   o   m   e       t   a   i   l    
0054140    o   f       i   t   s       o   r   i   g   i   n   a   l    
0054160    v   a   l   u   e   .  \r  \r   I   N       O   L   D       (
0054200    V   A   R   _   F   O   R   M   )          \t   [   I   .   S
0054220    .       O   p   e   r   a   t   o   r   ]  \r   S   a   m   e
0054240        a   s       I   N       O   L   D       V   A   R   ,    
0054260    e   x   c   e   p   t       V   A   R       i   s       f   i
0054300    r   s   t       s   e   t       t   o       v   a   l   u   e
0054320        o   f       F   O   R   M   .  \r  \r   O   N       O   L
0054340    D       V   A   R          \t   [   I   .   S   .       O   p
0054360    e   r   a   t   o   r   ]  \r   S   a   m   e       a   s    
0054400    I   N       O   L   D       V   A   R       e   x   c   e   p
0054420    t       t   h   e       i   .   v   .       i   s       r   e
0054440    s   e   t       t   o       t   h   e       c   u   r   r   e
0054460    n   t       v   a   l   u   e       o   f       V   A   R    
0054500    a   t       e   a   c   h       i   t   e   r   a   t   i   o
0054520    n   ,       i   n   s   t   e   a   d       o   f       t   o
0054540        (   C   A   R       V   A   R   )   .  \r  \r   O   N    
0054560    O   L   D       (   V   A   R   _   F   O   R   M   )        
0054600   \t   [   I   .   S   .       O   p   e   r   a   t   o   r   ]
0054620   \r   S   a   m   e       a   s       O   N       O   L   D    
0054640    V   A   R   ,       e   x   c   e   p   t       V   A   R    
0054660    i   s       f   i   r   s   t       s   e   t       t   o    
0054700    v   a   l   u   e       o   f       F   O   R   M   .  \r  \r
0054720    I   N   S   I   D   E       F   O   R   M          \t   [   I
0054740    .   S   .       O   p   e   r   a   t   o   r   ]  \r   S   i
0054760    m   i   l   a   r       t   o       I   N   ,       e   x   c
0055000    e   p   t       t   r   e   a   t   s       f   i   r   s   t
0055020        n   o   n   -   l   i   s   t   ,       n   o   n   -   N
0055040    I   L       t   a   i   l       a   s       t   h   e       l
0055060    a   s   t       e   l   e   m   e   n   t       o   f       t
0055100    h   e       i   t   e   r   a   t   i   o   n   ,       e   .
0055120    g   .   ,       I   N   S   I   D   E       '   (   A       B
0055140        C       D       .       E   )       i   t   e   r   a   t
0055160    e   s       f   i   v   e       t   i   m   e   s       w   i
0055200    t   h       t   h   e       i   .   v   .       s   e   t    
0055220    t   o       E       o   n       t   h   e       l   a   s   t
0055240        i   t   e   r   a   t   i   o   n   .           I   N   S
0055260    I   D   E       '   A       i   s       e   q   u   i   v   a
0055300    l   e   n   t       t   o       I   N   S   I   D   E       '
0055320    (   A   )   ,       w   h   i   c   h       w   i   l   l    
0055340    i   t   e   r   a   t   e       o   n   c   e   .  \r  \r   F
0055360    R   O   M       F   O   R   M          \t   [   I   .   S   .
0055400        O   p   e   r   a   t   o   r   ]  \r   U   s   e   d    
0055420    t   o       s   p   e   c   i   f   y       a   n       i   n
0055440    i   t   i   a   l       v   a   l   u   e       f   o   r    
0055460    a       n   u   m   e   r   i   c   a   l       i   .   v   .
0055500            T   h   e       i   .   v   .       i   s       a   u
0055520    t   o   m   a   t   i   c   a   l   l   y       i   n   c   r
0055540    e   m   e   n   t   e   d       b   y       1       a   f   t
0055560    e   r       e   a   c   h       i   t   e   r   a   t   i   o
0055600    n       (   u   n   l   e   s   s       B   Y       i   s    
0055620    s   p   e   c   i   f   i   e   d   )   .           I   f    
0055640    n   o       i   .   v   .       h   a   s       b   e   e   n
0055660        s   p   e   c   i   f   i   e   d   ,       a       d   u
0055700    m   m   y       i   .   v   .       i   s       s   u   p   p
0055720    l   i   e   d       a   n   d       i   n   i   t   i   a   l
0055740    i   z   e   d   ,       e   .   g   .   ,       (   f   r   o
0055760    m       2       t   o       5       c   o   l   l   e   c   t
0056000        S   Q   R   T   )       r   e   t   u   r   n   s       (
0056020    1   .   4   1   4       1   .   7   3   2       2   .   0    
0056040    2   .   2   3   6   )   .  \r  \r   T   O       F   O   R   M
0056060           \t   [   I   .   S   .       O   p   e   r   a   t   o
0056100    r   ]  \r   U   s   e   d       t   o       s   p   e   c   i
0056120    f   y       t   h   e       f   i   n   a   l       v   a   l
0056140    u   e       f   o   r       a       n   u   m   e   r   i   c
0056160    a   l       i   .   v   .           I   f       F   R   O   M
0056200        i   s       n   o   t       s   p   e   c   i   f   i   e
0056220    d   ,       t   h   e       i   .   v   .       i   s       i
0056240    n   i   t   i   a   l   i   z   e   d       t   o       1   .
0056260            I   f       n   o       i   .   v   .       h   a   s
0056300        b   e   e   n       s   p   e   c   i   f   i   e   d   ,
0056320        a       d   u   m   m   y       i   .   v   .       i   s
0056340        s   u   p   p   l   i   e   d       a   n   d       i   n
0056360    i   t   i   a   l   i   z   e   d   .           I   f       B
0056400    Y       i   s       n   o   t       s   p   e   c   i   f   i
0056420    e   d   ,       t   h   e       i   .   v   .       i   s    
0056440    a   u   t   o   m   a   t   i   c   a   l   l   y       i   n
0056460    c   r   e   m   e   n   t   e   d       b   y       1       a
0056500    f   t   e   r       e   a   c   h       i   t   e   r   a   t
0056520    i   o   n   .           W   h   e   n       t   h   e       i
0056540    .   v   .       i   s       d   e   f   i   n   i   t   e   l
0056560    y       b   e   i   n   g       i   n   c   r   e   m   e   n
0056600    t   e   d   ,       i   .   e   .   ,       e   i   t   h   e
0056620    r       B   Y       i   s       n   o   t       s   p   e   c
0056640    i   f   i   e   d   ,       o   r       i   t   s       o   p
0056660    e   r   a   n   d       i   s       a       p   o   s   i   t
0056700    i   v   e       n   u   m   b   e   r   ,       t   h   e    
0056720    i   .   s   .       t   e   r   m   i   n   a   t   e   s    
0056740    w   h   e   n       t   h   e       i   .   v   .       e   x
0056760    c   e   e   d   s       t   h   e       v   a   l   u   e    
0057000    o   f       F   O   R   M   .           S   i   m   i   l   a
0057020    r   l   y   ,       w   h   e   n       t   h   e       i   .
0057040    v   .       i   s       d   e   f   i   n   i   t   e   l   y
0057060        b   e   i   n   g       d   e   c   r   e   m   e   n   t
0057100    e   d       t   h   e       i   .   s   .       t   e   r   m
0057120    i   n   a   t   e   s       w   h   e   n       t   h   e    
0057140    i   .   v   .       b   e   c   o   m   e   s       l   e   s
0057160    s       t   h   a   n       t   h   e       v   a   l   u   e
0057200        o   f       F   O   R   M       (   s   e   e       d   e
0057220    s   c   r   i   p   t   i   o   n       o   f       B   Y   )
0057240    .  \r   N   o   t   e   :           F   O   R   M       i   s
0057260        e   v   a   l   u   a   t   e   d       o   n   l   y    
0057300    o   n   c   e   ,       w   h   e   n       t   h   e       i
0057320    .   s   .       i   s       f   i   r   s   t       e   n   t
0057340    e   r   e   d   ,       a   n   d       i   t   s       v   a
0057360    l   u   e       b   o   u   n   d       t   o       a       t
0057400    e   m   p   o   r   a   r   y       v   a   r   i   a   b   l
0057420    e       a   g   a   i   n   s   t       w   h   i   c   h    
0057440    t   h   e       i   .   v   .       i   s       c   h   e   c
0057460    k   e   d       e   a   c   h       i   n   t   e   r   a   t
0057500    i   o   n   .           I   f       t   h   e       u   s   e
0057520    r       w   i   s   h   e   s       t   o       s   p   e   c
0057540    i   f   y       a   n       i   .   s   .       i   n       w
0057560    h   i   c   h       t   h   e       v   a   l   u   e       o
0057600    f       t   h   e       b   o   u   n   d   a   r   y       c
0057620    o   n   d   i   t   i   o   n       i   s       r   e   c   o
0057640    m   p   u   t   e   d       e   a   c   h       i   t   e   r
0057660    a   t   i   o   n   ,       h   e       s   h   o   u   l   d
0057700        u   s   e       W   H   I   L   E       o   r       U   N
0057720    T   I   L       i   n   s   t   e   a   d       o   f       T
0057740    O   .  \r  \r   N   o   t   e   :           W   h   e   n    
0057760    b   o   t   h       t   h   e       o   p   e   r   a   n   d
0060000    s       t   o       T   O       a   n   d       F   R   O   M
0060020        a   r   e       n   u   m   b   e   r   s   ,       a   n
0060040    d       T   O   '   s       o   p   e   r   a   n   d       i
0060060    s       l   e   s   s       t   h   a   n       F   R   O   M
0060100    '   s       o   p   e   r   a   n   d   ,       t   h   e    
0060120    i   .   v   .       i   s       d   e   c   r   e   m   e   n
0060140    t   e   d       b   y       1       a   f   t   e   r       e
0060160    a   c   h       i   t   e   r   a   t   i   o   n   .        
0060200    I   n       t   h   i   s       c   a   s   e   ,       t   h
0060220    e       i   .   s   .       t   e   r   m   i   n   a   t   e
0060240    s       w   h   e   n       t   h   e       i   .   v   .    
0060260    b   e   c   o   m   e   s       l   e   s   s       t   h   a
0060300    n       t   h   e       v   a   l   u   e       o   f       F
0060320    O   R   M   .           F   o   r       e   x   a   m   p   l
0060340    e   ,       (   f   r   o   m       1   0       t   o       1
0060360        d   o       P   R   I   N   T   )       p   r   i   n   t
0060400    s       t   h   e       n   u   m   b   e   r   s       f   r
0060420    o   m       1   0       d   o   w   n       t   o       1   .
0060440   \r   B   Y       F   O   R   M       (   w   i   t   h       I
0060460    N   /   O   N   )          \t   [   I   .   S   .       O   p
0060500    e   r   a   t   o   r   ]  \r   I   f       I   N       o   r
0060520        O   N       h   a   v   e       b   e   e   n       s   p
0060540    e   c   i   f   i   e   d   ,       t   h   e       v   a   l
0060560    u   e       o   f       F   O   R   M       d   e   t   e   r
0060600    m   i   n   e   s       t   h   e       t   a   i   l       f
0060620    o   r       t   h   e       n   e   x   t       i   t   e   r
0060640    a   t   i   o   n   ,       w   h   i   c   h       i   n    
0060660    t   u   r   n       d   e   t   e   r   m   i   n   e   s    
0060700    t   h   e       v   a   l   u   e       f   o   r       t   h
0060720    e       i   .   v   .       a   s       d   e   s   c   r   i
0060740    b   e   d       e   a   r   l   i   e   r   ,       i   .   e
0060760    .   ,       t   h   e       n   e   w       i   .   v   .    
0061000    i   s       C   A   R       o   f       t   h   e       t   a
0061020    i   l       f   o   r       I   N   ,       t   h   e       t
0061040    a   i   l       i   t   s   e   l   f       f   o   r       O
0061060    N   .           I   n       c   o   n   j   u   n   c   t   i
0061100    o   n       w   i   t   h       I   N   ,       t   h   e    
0061120    u   s   e   r       c   a   n       r   e   f   e   r       t
0061140    o       t   h   e       c   u   r   r   e   n   t       t   a
0061160    i   l       w   i   t   h   i   n       F   O   R   M       b
0061200    y       u   s   i   n   g       t   h   e       i   .   v   .
0061220        o   r       t   h   e       o   p   e   r   a   n   d    
0061240    f   o   r       I   N   /   O   N   ,       e   .   g   .   ,
0061260        (   f   o   r       Z       i   n       L       b   y    
0061300    (   C   D   D   R       Z   )       .   .   .   )       o   r
0061320        (   f   o   r       Z       i   n       L       b   y    
0061340    (   C   D   D   R       L   )       .   .   .   )   .       A
0061360    t       t   r   a   n   s   l   a   t   i   o   n       t   i
0061400    m   e   ,       t   h   e       n   a   m   e       o   f    
0061420    t   h   e       i   n   t   e   r   n   a   l       v   a   r
0061440    i   a   b   l   e       w   h   i   c   h       h   o   l   d
0061460    s       t   h   e       v   a   l   u   e       o   f       t
0061500    h   e       c   u   r   r   e   n   t       t   a   i   l    
0061520    i   s       s   u   b   s   t   i   t   u   t   e   d       f
0061540    o   r       t   h   e       i   .   v   .       t   h   r   o
0061560    u   g   h   o   u   t       F   O   R   M   .       F   o   r
0061600        e   x   a   m   p   l   e   ,       (   f   o   r       X
0061620        i   n       Y       b   y       (   C   D   R       (   M
0061640    E   M   B       '   F   O   O       (   C   D   R       X   )
0061660    )   )       c   o   l   l   e   c   t       X   )       s   p
0061700    e   c   i   f   i   e   s       t   h   a   t       a   f   t
0061720    e   r       e   a   c   h       i   t   e   r   a   t   i   o
0061740    n   ,       C   D   R       o   f       t   h   e       c   u
0061760    r   r   e   n   t       t   a   i   l       i   s       t   o
0062000        b   e       s   e   a   r   c   h   e   d       f   o   r
0062020        t   h   e       a   t   o   m       F   O   O   ,       a
0062040    n   d       (   C   D   R       o   f   )       t   h   i   s
0062060        l   a   t   t   e   r       t   a   i   l       t   o    
0062100    b   e       u   s   e   d       f   o   r       t   h   e    
0062120    n   e   x   t       i   t   e   r   a   t   i   o   n   .  \r
0062140   \r   B   Y       F   O   R   M       (   w   i   t   h   o   u
0062160    t       I   N   /   O   N   )          \t   [   I   .   S   .
0062200        O   p   e   r   a   t   o   r   ]  \r   I   f       I   N
0062220        o   r       O   N       h   a   v   e       n   o   t    
0062240    b   e   e   n       u   s   e   d   ,       B   Y       s   p
0062260    e   c   i   f   i   e   s       h   o   w       t   h   e    
0062300    i   .   v   .       i   t   s   e   l   f       i   s       r
0062320    e   s   e   t       a   t       e   a   c   h       i   t   e
0062340    r   a   t   i   o   n   .           I   f       F   R   O   M
0062360        o   r       T   O       h   a   v   e       b   e   e   n
0062400        s   p   e   c   i   f   i   e   d   ,       t   h   e    
0062420    i   .   v   .       i   s       k   n   o   w   n       t   o
0062440        b   e       n   u   m   e   r   i   c   a   l   ,       s
0062460    o       t   h   e       n   e   w       i   .   v   .       i
0062500    s       c   o   m   p   u   t   e   d       b   y       a   d
0062520    d   i   n   g       t   h   e       v   a   l   u   e       o
0062540    f       F   O   R   M       (   w   h   i   c   h       i   s
0062560        r   e   e   v   a   l   u   a   t   e   d       e   a   c
0062600    h       i   t   e   r   a   t   i   o   n   )       t   o    
0062620    t   h   e       c   u   r   r   e   n   t       v   a   l   u
0062640    e       o   f       t   h   e       i   .   v   .   ,       e
0062660    .   g   .   ,       (   f   o   r       N       f   r   o   m
0062700        1       t   o       1   0       b   y       2       c   o
0062720    l   l   e   c   t       N   )       m   a   k   e   s       a
0062740        l   i   s   t       o   f       t   h   e       f   i   r
0062760    s   t       f   i   v   e       o   d   d       n   u   m   b
0063000    e   r   s   .  \r   I   f       F   O   R   M       i   s    
0063020    a       p   o   s   i   t   i   v   e       n   u   m   b   e
0063040    r       (   F   O   R   M       i   t   s   e   l   f   ,    
0063060    n   o   t       i   t   s       v   a   l   u   e   ,       w
0063100    h   i   c   h       i   n       g   e   n   e   r   a   l    
0063120    C   L   I   S   P       w   o   u   l   d       h   a   v   e
0063140        n   o       w   a   y       o   f       k   n   o   w   i
0063160    n   g       i   n       a   d   v   a   n   c   e   )   ,    
0063200    t   h   e       i   .   s   .       t   e   r   m   i   n   a
0063220    t   e   s       w   h   e   n       t   h   e       v   a   l
0063240    u   e       o   f       t   h   e       i   .   v   .       e
0063260    x   c   e   e   d   s       t   h   e       v   a   l   u   e
0063300        o   f       T   O   '   s       o   p   e   r   a   n   d
0063320    .           I   f       F   O   R   M       i   s       a    
0063340    n   e   g   a   t   i   v   e       n   u   m   b   e   r   ,
0063360        t   h   e       i   .   s   .       t   e   r   m   i   n
0063400    a   t   e   s       w   h   e   n       t   h   e       v   a
0063420    l   u   e       o   f       t   h   e       i   .   v   .    
0063440    b   e   c   o   m   e   s       l   e   s   s       t   h   a
0063460    n       T   O   '   s       o   p   e   r   a   n   d   ,    
0063500    e   .   g   .   ,       (   f   o   r       I       f   r   o
0063520    m       N       t   o       M       b   y       -   2       u
0063540    n   t   i   l       (   L   E   S   S   P       I       M   )
0063560        .   .   .   )   .       O   t   h   e   r   w   i   s   e
0063600    ,       t   h   e       t   e   r   m   i   n   a   t   i   n
0063620    g       c   o   n   d   i   t   i   o   n       f   o   r    
0063640    e   a   c   h       i   t   e   r   a   t   i   o   n       d
0063660    e   p   e   n   d   s       o   n       t   h   e       v   a
0063700    l   u   e       o   f       F   O   R   M       f   o   r    
0063720    t   h   a   t       i   t   e   r   a   t   i   o   n   :    
0063740    i   f       F   O   R   M   <   0   ,       t   h   e       t
0063760    e   s   t       i   s       w   h   e   t   h   e   r       t
0064000    h   e       i   .   v   .       i   s       l   e   s   s    
0064020    t   h   a   n       T   O   '   s       o   p   e   r   a   n
0064040    d   ,       i   f       F   O   R   M   >   0       t   h   e
0064060        t   e   s   t       i   s       w   h   e   t   h   e   r
0064100        t   h   e       i   .   v   .       e   x   c   e   e   d
0064120    s       T   O   '   s       o   p   e   r   a   n   d   ,    
0064140    o   t   h   e   r   w   i   s   e       i   f       F   O   R
0064160    M   =   0   ,       t   h   e       i   .   s   .       t   e
0064200    r   m   i   n   a   t   e   s       u   n   c   o   n   d   i
0064220    t   i   o   n   a   l   l   y   .  \r   I   f       F   R   O
0064240    M       o   r       T   O       h   a   v   e       n   o   t
0064260        b   e   e   n       s   p   e   c   i   f   i   e   d    
0064300    a   n   d       F   O   R   M       i   s       n   o   t    
0064320    a       n   u   m   b   e   r   ,       t   h   e       i   .
0064340    v   .       i   s       s   i   m   p   l   y       r   e   s
0064360    e   t       t   o       t   h   e       v   a   l   u   e    
0064400    o   f       F   O   R   M       a   f   t   e   r       e   a
0064420    c   h       i   t   e   r   a   t   i   o   n   ,       e   .
0064440    g   .   ,       (   f   o   r       I       f   r   o   m    
0064460    N       b   y       M       .   .   .   )       i   s       e
0064500    q   u   i   v   a   l   e   n   t       t   o       (   f   o
0064520    r       I   _   N       b   y       (   P   L   U   S       I
0064540        M   )       .   .   .   )   .  \r  \r   A   S       V   A
0064560    R          \t   [   I   .   S   .       O   p   e   r   a   t
0064600    o   r   ]  \r   U   s   e   d       t   o       s   p   e   c
0064620    i   f   y       a   n       i   t   e   r   a   t   i   v   e
0064640        s   t   a   t   e   m   e   n   t       i   n   v   o   l
0064660    v   i   n   g       m   o   r   e       t   h   a   n       o
0064700    n   e       i   t   e   r   a   t   i   v   e       v   a   r
0064720    i   a   b   l   e   ,       e   .   g   .   ,       (   f   o
0064740    r       X       i   n       Y       a   s       U       i   n
0064760        V       d   o       .   .   .   )       c   o   r   r   e
0065000    s   p   o   n   d   s       t   o       M   A   P   2   C    
0065020    (   p   a   g   e       X   .   X   X   )   .           T   h
0065040    e       i   .   s   .       t   e   r   m   i   n   a   t   e
0065060    s       w   h   e   n       a   n   y       o   f       t   h
0065100    e       t   e   r   m   i   n   a   t   i   n   g       c   o
0065120    n   d   i   t   i   o   n   s       a   r   e       m   e   t
0065140    ,       e   .   g   .   ,       (   f   o   r       X       i
0065160    n       Y       a   s       I       f   r   o   m       1    
0065200    t   o       1   0       c   o   l   l   e   c   t       X   )
0065220        m   a   k   e   s       a       l   i   s   t       o   f
0065240        t   h   e       f   i   r   s   t       t   e   n       e
0065260    l   e   m   e   n   t   s       o   f       Y   ,       o   r
0065300        h   o   w   e   v   e   r       m   a   n   y       e   l
0065320    e   m   e   n   t   s       t   h   e   r   e       a   r   e
0065340        o   n       Y       i   f       l   e   s   s       t   h
0065360    a   n       1   0   .  \r   T   h   e       o   p   e   r   a
0065400    n   d       t   o       A   S   ,       V   A   R   ,       s
0065420    p   e   c   i   f   i   e   s       t   h   e       n   e   w
0065440        i   .   v   .       F   o   r       t   h   e       r   e
0065460    m   a   i   n   d   e   r       o   f       t   h   e       i
0065500    .   s   .   ,       o   r       u   n   t   i   l       a   n
0065520    o   t   h   e   r       A   S       i   s       e   n   c   o
0065540    u   n   t   e   r   e   d   ,       a   l   l       o   p   e
0065560    r   a   t   o   r   s       r   e   f   e   r       t   o    
0065600    t   h   e       n   e   w       i   .   v   .           F   o
0065620    r       e   x   a   m   p   l   e   ,       (   f   o   r    
0065640    I       f   r   o   m       1       t   o       N   1       a
0065660    s       J       f   r   o   m       1       t   o       N   2
0065700        b   y       2       a   s       K       f   r   o   m    
0065720    N   3       t   o       1       b   y       -   1       .   .
0065740    .   )       t   e   r   m   i   n   a   t   e   s       w   h
0065760    e   n       I       e   x   c   e   e   d   s       N   1   ,
0066000        o   r       J       e   x   c   e   e   d   s       N   2
0066020    ,       o   r       K       b   e   c   o   m   e   s       l
0066040    e   s   s       t   h   a   n       1   .           A   f   t
0066060    e   r       e   a   c   h       i   t   e   r   a   t   i   o
0066100    n   ,       I       i   s       i   n   c   r   e   m   e   n
0066120    t   e   d       b   y       1   ,       J       b   y       2
0066140    ,       a   n   d       K       b   y       -   1   .  \r  \r
0066160    O   U   T   O   F       F   O   R   M          \t   [   I   .
0066200    S   .       O   p   e   r   a   t   o   r   ]  \r   F   o   r
0066220        u   s   e       w   i   t   h       g   e   n   e   r   a
0066240    t   o   r   s       (   p   a   g   e       X   .   X   X   )
0066260    .           O   n       e   a   c   h       i   t   e   r   a
0066300    t   i   o   n   ,       t   h   e       i   .   v   .       i
0066320    s       s   e   t       t   o       s   u   c   c   e   s   s
0066340    i   v   e       v   a   l   u   e   s       r   e   t   u   r
0066360    n   e   d       b   y       t   h   e       g   e   n   e   r
0066400    a   t   o   r   .           T   h   e       i   .   s   .    
0066420    t   e   r   m   i   n   a   t   e   s       w   h   e   n    
0066440    t   h   e       g   e   n   e   r   a   t   o   r       r   u
0066460    n   s       o   u   t   .  \r  \r   9   .   8   .   3        
0066500   \t   C   o   n   d   i   t   i   o   n       I   .   s   .   o
0066520    p   r   s  \r  \r   W   H   E   N       F   O   R   M        
0066540   \t   [   I   .   S   .       O   p   e   r   a   t   o   r   ]
0066560   \r   P   r   o   v   i   d   e   s       a       w   a   y    
0066600    o   f       e   x   c   e   p   t   i   n   g       c   e   r
0066620    t   a   i   n       i   t   e   r   a   t   i   o   n   s   .
0066640            F   o   r       e   x   a   m   p   l   e   ,       (
0066660    f   o   r       X       i   n       Y       c   o   l   l   e
0066700    c   t       X       w   h   e   n       (   N   U   M   B   E
0066720    R   P       X   )   )       c   o   l   l   e   c   t   s    
0066740    o   n   l   y       t   h   e       e   l   e   m   e   n   t
0066760    s       o   f       Y       t   h   a   t       a   r   e    
0067000    n   u   m   b   e   r   s   .  \r  \r   U   N   L   E   S   S
0067020        F   O   R   M          \t   [   I   .   S   .       O   p
0067040    e   r   a   t   o   r   ]  \r   S   a   m   e       a   s    
0067060    W   H   E   N       e   x   c   e   p   t       f   o   r    
0067100    t   h   e       d   i   f   f   e   r   e   n   c   e       i
0067120    n       s   i   g   n   ,       i   .   e   .   ,       W   H
0067140    E   N       Z       i   s       t   h   e       s   a   m   e
0067160        a   s       U   N   L   E   S   S       (   N   O   T    
0067200    Z   )   .  \r  \r   W   H   I   L   E       F   O   R   M    
0067220       \t   [   I   .   S   .       O   p   e   r   a   t   o   r
0067240    ]  \r   P   r   o   v   i   d   e   s       a       w   a   y
0067260        o   f       t   e   r   m   i   n   a   t   i   n   g    
0067300    t   h   e       i   .   s   .           W   H   I   L   E    
0067320    F   O   R   M       e   v   a   l   u   a   t   e   s       F
0067340    O   R   M       b   e   f   o   r   e       e   a   c   h    
0067360    i   t   e   r   a   t   i   o   n   ,       a   n   d       i
0067400    f       t   h   e       v   a   l   u   e       i   s       N
0067420    I   L   ,       e   x   i   t   s   .  \r  \r   U   N   T   I
0067440    L       F   O   R   M          \t   [   I   .   S   .       O
0067460    p   e   r   a   t   o   r   ]  \r   S   a   m   e       a   s
0067500        W   H   I   L   E       e   x   c   e   p   t       f   o
0067520    r       d   i   f   f   e   r   e   n   c   e       i   n    
0067540    s   i   g   n   ,       i   .   e   .   ,       W   H   I   L
0067560    E       X       i   s       e   q   u   i   v   a   l   e   n
0067600    t       t   o       U   N   T   I   L       (   N   O   T    
0067620    X   )   .  \r  \r   U   N   T   I   L       N       (   N    
0067640    a       n   u   m   b   e   r   )          \t   [   I   .   S
0067660    .       O   p   e   r   a   t   o   r   ]  \r   E   q   u   i
0067700    v   a   l   e   n   t       t   o       U   N   T   I   L    
0067720    I   .   V   .       >       N   .  \r  \r   R   E   P   E   A
0067740    T   W   H   I   L   E       F   O   R   M          \t   [   I
0067760    .   S   .       O   p   e   r   a   t   o   r   ]  \r   S   a
0070000    m   e       a   s       W   H   I   L   E       e   x   c   e
0070020    p   t       t   h   e       t   e   s   t       i   s       p
0070040    e   r   f   o   r   m   e   d       a   f   t   e   r       t
0070060    h   e       e   v   a   l   u   t   i   o   n       o   f    
0070100    t   h   e       b   o   d   y   ,       b   u   t       b   e
0070120    f   o   r   e       t   h   e       i   .   v   .       i   s
0070140        r   e   s   e   t       f   o   r       t   h   e       n
0070160    e   x   t       i   t   e   r   a   t   i   o   n   .  \r  \r
0070200    R   E   P   E   A   T   U   N   T   I   L       F   O   R   M
0070220           \t   [   I   .   S   .       O   p   e   r   a   t   o
0070240    r   ]  \r   S   a   m   e       a   s       U   N   T   I   L
0070260    ,       e   x   c   e   p   t       t   h   e       t   e   s
0070300    t       i   s       p   e   r   f   o   r   m   e   d       a
0070320    f   t   e   r       t   h   e       e   v   a   l   u   a   t
0070340    i   o   n       o   f       t   h   e       b   o   d   y   .
0070360   \r  \r   R   E   P   E   A   T   U   N   T   I   L       N    
0070400    (   N       a       n   u   m   b   e   r   )          \t   [
0070420    I   .   S   .       O   p   e   r   a   t   o   r   ]  \r   E
0070440    q   u   i   v   a   l   e   n   t       t   o       R   E   P
0070460    E   A   T   U   N   T   I   L       I   .   V   .       >    
0070500    N   .  \r  \r   9   .   8   .   4          \t   O   t   h   e
0070520    r       I   .   s   .   o   p   r   s  \r  \r   F   I   R   S
0070540    T       F   O   R   M          \t   [   I   .   S   .       O
0070560    p   e   r   a   t   o   r   ]  \r   F   O   R   M       i   s
0070600        e   v   a   l   u   a   t   e   d       o   n   c   e    
0070620    b   e   f   o   r   e       t   h   e       f   i   r   s   t
0070640        i   t   e   r   a   t   i   o   n   ,       e   .   g   .
0070660    ,       (   f   o   r       X       Y       Z       i   n    
0070700    L       f   i   r   s   t       (   F   O   O       Y       Z
0070720    )       .   .   .   )   ,       a   n   d       F   O   O    
0070740    c   o   u   l   d       b   e       u   s   e   d       t   o
0070760        i   n   i   t   i   a   l   i   z   e       Y       a   n
0071000    d       Z   .  \r  \r   F   I   N   A   L   L   Y       F   O
0071020    R   M          \t   [   I   .   S   .       O   p   e   r   a
0071040    t   o   r   ]  \r   F   O   R   M       i   s       e   v   a
0071060    l   u   a   t   e   d       a   f   t   e   r       t   h   e
0071100        i   .   s   .       t   e   r   m   i   n   a   t   e   s
0071120    .           F   o   r       e   x   a   m   p   l   e   ,    
0071140    (   f   o   r       X       i   n       L       b   i   n   d
0071160        Y   _   0       d   o       (   i   f       (   A   T   O
0071200    M       X   )       t   h   e   n       (   S   E   T   Q    
0071220    Y       (   P   L   U   S       Y       1   )   )   )       f
0071240    i   n   a   l   l   y       (   R   E   T   U   R   N       Y
0071260    )   )       w   i   l   l       r   e   t   u   r   n       t
0071300    h   e       n   u   m   b   e   r       o   f       a   t   o
0071320    m   s       i   n       L   .  \r  \r   E   A   C   H   T   I
0071340    M   E       F   O   R   M          \t   [   I   .   S   .    
0071360    O   p   e   r   a   t   o   r   ]  \r   F   O   R   M       i
0071400    s       e   v   a   l   u   a   t   e   d       a   t       t
0071420    h   e       b   e   g   i   n   n   i   n   g       o   f    
0071440    e   a   c   h       i   t   e   r   a   t   i   o   n       b
0071460    e   f   o   r   e   ,       a   n   d       r   e   g   a   r
0071500    d   l   e   s   s       o   f   ,       a   n   y       t   e
0071520    s   t   i   n   g   .           F   o   r       e   x   a   m
0071540    p   l   e   ,       c   o   n   s   i   d   e   r   ,  \r   (
0071560    f   o   r       I       f   r   o   m       1       t   o    
0071600    N  \r                   d   o       (   .   .   .       (   F
0071620    O   O       I   )       .   .   .   )  \r                   u
0071640    n   l   e   s   s       (   .   .   .       (   F   O   O    
0071660    I   )       .   .   .   )  \r                   u   n   t   i
0071700    l       (   .   .   .       (   F   O   O       I   )       .
0071720    .   .   )   )  \r   T   h   e       u   s   e   r       m   i
0071740    g   h   t       w   a   n   t       t   o       s   e   t    
0071760    a       t   e   m   p   o   r   a   r   y       v   a   r   i
0072000    a   b   l   e       t   o       t   h   e       v   a   l   u
0072020    e       o   f       (   F   O   O       I   )       i   n    
0072040    o   r   d   e   r       t   o       a   v   o   i   d       c
0072060    o   m   p   u   t   i   n   g       i   t       t   h   r   e
0072100    e       t   i   m   e   s       e   a   c   h       i   t   e
0072120    r   a   t   i   o   n   .           H   o   w   e   v   e   r
0072140    ,       w   i   t   h   o   u   t       k   n   o   w   i   n
0072160    g       t   h   e       t   r   a   n   s   l   a   t   i   o
0072200    n   ,       h   e       w   o   u   l   d       n   o   t    
0072220    k   n   o   w       w   h   e   t   h   e   r       t   o    
0072240    p   u   t       t   h   e       a   s   s   i   g   n   m   e
0072260    n   t       i   n       t   h   e       o   p   e   r   a   n
0072300    d       t   o       D   O   ,       U   N   L   E   S   S   ,
0072320        o   r       U   N   T   I   L   ,       i   .   e   .   ,
0072340        w   h   i   c   h       o   n   e       w   o   u   l   d
0072360        b   e       e   x   e   c   u   t   e   d       f   i   r
0072400    s   t   .           H   e       c   a   n       a   v   o   i
0072420    d       t   h   i   s       p   r   o   b   l   e   m       b
0072440    y       s   i   m   p   l   y       w   r   i   t   i   n   g
0072460        E   A   C   H   T   I   M   E       (   S   E   T   Q    
0072500    J       (   F   O   O       I   )   )   .  \r  \r   D   E   C
0072520    L   A   R   E   :       D   E   C   L          \t   [   I   .
0072540    S   .       O   p   e   r   a   t   o   r   ]  \r   I   n   s
0072560    e   r   t   s       t   h   e       f   o   r   m       (   D
0072600    E   C   L   A   R   E       D   E   C   L   )       i   m   m
0072620    e   d   i   a   t   e   l   y       f   o   l   l   o   w   i
0072640    n   g       t   h   e       P   R   O   G       v   a   r   i
0072660    a   b   l   e       l   i   s   t       i   n       t   h   e
0072700        t   r   a   n   s   l   a   t   i   o   n   ,       o   r
0072720    ,       i   n       t   h   e       c   a   s   e       t   h
0072740    a   t       t   h   e       t   r   a   n   s   l   a   t   i
0072760    o   n       i   s       a       m   a   p   p   i   n   g    
0073000    f   u   n   c   t   i   o   n       r   a   t   h   e   r    
0073020    t   h   a   n       a       P   R   O   G   ,       i   m   m
0073040    e   d   i   a   t   e   l   y       f   o   l   l   o   w   i
0073060    n   g       t   h   e       a   r   g   u   m   e   n   t    
0073100    l   i   s   t       o   f       t   h   e       l   a   m   b
0073120    d   a       e   x   p   r   e   s   s   i   o   n       i   n
0073140        t   h   e       t   r   a   n   s   l   a   t   i   o   n
0073160    .           T   h   i   s       c   a   n       b   e       u
0073200    s   e   d       t   o       d   e   c   l   a   r   e       v
0073220    a   r   i   a   b   l   e   s       b   o   u   n   d       i
0073240    n       t   h   e       i   t   e   r   a   t   i   v   e    
0073260    s   t   a   t   e   m   e   n   t       t   o       b   e    
0073300    c   o   m   p   i   l   e   d       a   s       l   o   c   a
0073320    l       o   r       s   p   e   c   i   a   l       v   a   r
0073340    i   a   b   l   e   s       (   s   e   e       p   a   g   e
0073360        X   .   X   X   )   .           F   o   r       e   x   a
0073400    m   p   l   e       (   f   o   r       X       i   n       Y
0073420        d   e   c   l   a   r   e   :       (   L   O   C   A   L
0073440    V   A   R   S       X   )       .   .   .   )   .           S
0073460    e   v   e   r   a   l       D   E   C   L   A   R   E   :   s
0073500        c   a   n       a   p   p   p   e   a   r       i   n    
0073520    t   h   e       s   a   m   e       i   .   s   .   ;       t
0073540    h   e       d   e   c   l   a   r   a   t   i   o   n   s    
0073560    a   r   e       i   n   s   e   r   t   e   d       i   n    
0073600    t   h   e       o   r   d   e   r       t   h   e   y       a
0073620    p   p   e   a   r   .  \r  \r   D   E   C   L   A   R   E    
0073640    D   E   C   L          \t   [   I   .   S   .       O   p   e
0073660    r   a   t   o   r   ]  \r   S   a   m   e       a   s       D
0073700    E   C   L   A   R   E   :   .  \r   N   o   t   e       t   h
0073720    a   t       s   i   n   c   e       D   E   C   L   A   R   E
0073740        i   s       a   l   s   o       t   h   e       n   a   m
0073760    e       o   f       a       f   u   n   c   t   i   o   n   ,
0074000        D   E   C   L   A   R   E       c   a   n   n   o   t    
0074020    b   e       u   s   e   d       a   s       a   n       i   .
0074040    s   .       o   p   e   r   a   t   o   r       w   h   e   n
0074060        i   t       a   p   p   e   a   r   s       a   s       C
0074100    A   R       o   f       a       f   o   r   m   ,       i   .
0074120    e   .       a   s       t   h   e       f   i   r   s   t    
0074140    i   .   s   .       o   p   e   r   a   t   o   r       i   n
0074160        a   n       i   t   e   r   a   t   i   v   e       s   t
0074200    a   t   e   m   e   n   t   .           H   o   w   e   v   e
0074220    r   ,       d   e   c   l   a   r   e       (   l   o   w   e
0074240    r   -   c   a   s   e       v   e   r   s   i   o   n   )    
0074260    c   a   n       b   e       t   h   e       f   i   r   s   t
0074300        i   .   s   .       o   p   e   r   a   t   o   r   .  \r
0074320   \r   O   R   I   G   I   N   A   L       I   .   S   .   O   P
0074340    R       O   P   E   R   A   N   D          \t   [   I   .   S
0074360    .       O   p   e   r   a   t   o   r   ]  \r   I   .   S   .
0074400    O   P   R       w   i   l   l       b   e       t   r   a   n
0074420    s   l   a   t   e   d       u   s   i   n   g       i   t   s
0074440        o   r   i   g   i   n   a   l   ,       b   u   i   l   t
0074460    -   i   n       i   n   t   e   r   p   r   e   t   a   t   i
0074500    o   n   ,       i   n   d   e   p   e   n   d   e   n   t    
0074520    o   f       a   n   y       u   s   e   r       d   e   f   i
0074540    n   e   d       i   .   s   .       o   p   e   r   a   t   o
0074560    r   s   .           S   e   e       p   a   g   e       X   .
0074600    X   X   .  \r  \r   T   h   e   r   e       a   r   e       a
0074620    l   s   o       a       n   u   m   b   e   r       o   f    
0074640    i   .   s   .   o   p   r   s       t   h   a   t       m   a
0074660    k   e       i   t       e   a   s   i   e   r       t   o    
0074700    c   r   e   a   t   e       i   t   e   r   a   t   i   v   e
0074720        s   t   a   t   e   m   e   n   t   s       t   h   a   t
0074740        u   s   e       t   h   e       c   l   o   c   k   ,    
0074760    l   o   o   p   i   n   g       f   o   r       a       g   i
0075000    v   e   n       p   e   r   i   o   d       o   f       t   i
0075020    m   e   .           S   e   e       t   i   m   e   r   s   ,
0075040        p   a   g   e       X   .   X   X   .  \r   9   .   8   .
0075060    5          \t   M   i   s   c   e   l   l   a   n   e   o   u
0075100    s       H   i   n   t   s       o   n       I   .   S   .   O
0075120    p   r   s  \r  \r  \t 267  \t   L   o   w   e   r   c   a   s
0075140    e       v   e   r   s   i   o   n   s       o   f       a   l
0075160    l       i   .   s   .       o   p   e   r   a   t   o   r   s
0075200        a   r   e       e   q   u   i   v   a   l   e   n   t    
0075220    t   o       t   h   e       u   p   p   e   r   c   a   s   e
0075240    ,       e   .   g   .   ,       (   f   o   r       X       i
0075260    n       Y       .   .   .   )       i   s       e   q   u   i
0075300    v   a   l   e   n   t       t   o       (   F   O   R       X
0075320        I   N       Y       .   .   .   )   .  \r  \t 267  \t   E
0075340    a   c   h       i   .   s   .       o   p   e   r   a   t   o
0075360    r       i   s       o   f       l   o   w   e   r       p   r
0075400    e   c   e   d   e   n   c   e       t   h   a   n       a   l
0075420    l       I   n   t   e   r   l   i   s   p       f   o   r   m
0075440    s   ,       s   o       p   a   r   e   n   t   h   e   s   e
0075460    s       a   r   o   u   n   d       t   h   e       o   p   e
0075500    r   a   n   d   s       c   a   n       b   e       o   m   i
0075520    t   t   e   d   ,       a   n   d       w   i   l   l       b
0075540    e       s   u   p   p   l   i   e   d       w   h   e   r   e
0075560        n   e   c   e   s   s   a   r   y   ,       e   .   g   .
0075600    ,       B   I   N   D       (   X       Y       Z   )       c
0075620    a   n       b   e       w   r   i   t   t   e   n       B   I
0075640    N   D       X       Y       Z   ,       O   L   D       (   X
0075660    _   F   O   R   M   )       a   s       O   L   D       X   _
0075700    F   O   R   M   ,       W   H   E   N       (   N   U   M   B
0075720    E   R   P       X   )       a   s       W   H   E   N       N
0075740    U   M   B   E   R   P       X   ,       e   t   c   .  \r  \t
0075760  267  \t   R   E   T   U   R   N       o   r       G   O       m
0076000    a   y       b   e       u   s   e   d       i   n       a   n
0076020    y       o   p   e   r   a   n   d   .           (   I   n    
0076040    t   h   i   s       c   a   s   e   ,       t   h   e       t
0076060    r   a   n   s   l   a   t   i   o   n       o   f       t   h
0076100    e       i   t   e   r   a   t   i   v   e       s   t   a   t
0076120    e   m   e   n   t       w   i   l   l       a   l   w   a   y
0076140    s       b   e       i   n       t   h   e       f   o   r   m
0076160        o   f       a       P   R   O   G   ,       n   e   v   e
0076200    r       a       m   a   p   p   i   n   g       f   u   n   c
0076220    t   i   o   n   .   )           R   E   T   U   R   N       m
0076240    e   a   n   s       r   e   t   u   r   n       f   r   o   m
0076260        t   h   e       i   .   s   .       (   w   i   t   h    
0076300    t   h   e       i   n   d   i   c   a   t   e   d       v   a
0076320    l   u   e   )   ,       n   o   t       f   r   o   m       t
0076340    h   e       f   u   n   c   t   i   o   n       i   n       w
0076360    h   i   c   h       t   h   e       i   .   s       a   p   p
0076400    e   a   r   s   .           G   O       r   e   f   e   r   s
0076420        t   o       a       l   a   b   e   l       e   l   s   e
0076440    w   h   e   r   e       i   n       t   h   e       f   u   n
0076460    c   t   i   o   n       i   n       w   h   i   c   h       t
0076500    h   e       i   .   s   .       a   p   p   e   a   r   s   ,
0076520        e   x   c   e   p   t       f   o   r       t   h   e    
0076540    l   a   b   e   l   s       $   $   L   P   ,       $   $   I
0076560    T   E   R   A   T   E   ,       a   n   d       $   $   O   U
0076600    T       w   h   i   c   h       a   r   e       r   e   s   e
0076620    r   v   e   d   ,       a   s       d   e   s   c   r   i   b
0076640    e   d       b   e   l   o   w   .  \r  \t 267  \t   I   n    
0076660    t   h   e       c   a   s   e       o   f       F   I   R   S
0076700    T   ,       F   I   N   A   L   L   Y   ,       E   A   C   H
0076720    T   I   M   E   ,       D   E   C   L   A   R   E   :       o
0076740    r       o   n   e       o   f       t   h   e       i   .   s
0076760    .   t   y   p   e   s   ,       e   .   g   .   ,       D   O
0077000    ,       C   O   L   L   E   C   T   ,       S   U   M   ,    
0077020    e   t   c   .   ,       t   h   e       o   p   e   r   a   n
0077040    d       c   a   n       c   o   n   s   i   s   t       o   f
0077060        m   o   r   e       t   h   a   n       o   n   e       f
0077100    o   r   m   ,       e   .   g   .   ,       C   O   L   L   E
0077120    C   T       (   P   R   I   N   T       (   C   A   R       X
0077140    )   )       (   C   D   R       X   )   ,       i   n       w
0077160    h   i   c   h       c   a   s   e       a       P   R   O   G
0077200    N       i   s       s   u   p   p   l   i   e   d   .  \r  \t
0077220  267  \t   E   a   c   h       o   p   e   r   a   n   d       c
0077240    a   n       b   e       t   h   e       n   a   m   e       o
0077260    f       a       f   u   n   c   t   i   o   n   ,       i   n
0077300        w   h   i   c   h       c   a   s   e       i   t       i
0077320    s       a   p   p   l   i   e   d       t   o       t   h   e
0077340        (   l   a   s   t   )       i   .   v   .   ,       e   .
0077360    g   .   ,       (   f   o   r       X       i   n       Y    
0077400    d   o       P   R   I   N   T       w   h   e   n       N   U
0077420    M   B   E   R   P   )       i   s       t   h   e       s   a
0077440    m   e       a   s       (   f   o   r       X       i   n    
0077460    Y       d   o       (   P   R   I   N   T       X   )       w
0077500    h   e   n       (   N   U   M   B   E   R   P       X   )   )
0077520    .           N   o   t   e       t   h   a   t       t   h   e
0077540        i   .   v   .       n   e   e   d       n   o   t       b
0077560    e       e   x   p   l   i   c   i   t   l   y       s   p   e
0077600    c   i   f   i   e   d   ,       e   .   g   .   ,       (   i
0077620    n       Y       d   o       P   R   I   N   T       w   h   e
0077640    n       N   U   M   B   E   R   P   )       w   i   l   l    
0077660    w   o   r   k   .  \r   F   o   r       i   .   s   .   t   y
0077700    p   e   s   ,       e   .   g   .   ,       D   O   ,       C
0077720    O   L   L   E   C   T   ,       J   O   I   N   ,       t   h
0077740    e       f   u   n   c   t   i   o   n       i   s       a   l
0077760    w   a   y   s       a   p   p   l   i   e   d       t   o    
0100000    t   h   e       f   i   r   s   t       i   .   v   .       i
0100020    n       t   h   e       i   .   s   .   ,       w   h   e   t
0100040    h   e   r       e   x   p   l   i   c   i   t   y       n   a
0100060    m   e   d       o   r       n   o   t   .           F   o   r
0100100        e   x   a   m   p   l   e   ,       (   i   n       Y    
0100120    a   s       I       f   r   o   m       1       t   o       1
0100140    0       d   o       P   R   I   N   T   )       p   r   i   n
0100160    t   s       e   l   e   m   e   n   t   s       o   n       Y
0100200    ,       n   o   t       i   n   t   e   g   e   r   s       b
0100220    e   t   w   e   e   n       1       a   n   d       1   0   .
0100240   \r   N   o   t   e       t   h   a   t       t   h   i   s    
0100260    f   e   a   t   u   r   e       d   o   e   s       n   o   t
0100300        m   a   k   e       m   u   c   h       s   e   n   s   e
0100320        f   o   r       F   O   R   ,       O   L   D   ,       B
0100340    I   N   D   ,       I   N   ,       o   r       O   N   ,    
0100360    s   i   n   c   e       t   h   e   y       "   o   p   e   r
0100400    a   t   e   "       b   e   f   o   r   e       t   h   e    
0100420    l   o   o   p       s   t   a   r   t   s   ,       w   h   e
0100440    n       t   h   e       i   .   v   .       m   a   y       n
0100460    o   t       e   v   e   n       b   e       b   o   u   n   d
0100500    .  \r   I   n       t   h   e       c   a   s   e       o   f
0100520        B   Y       i   n       c   o   n   j   u   n   c   t   i
0100540    o   n       w   i   t   h       I   N   ,       t   h   e    
0100560    f   u   n   c   t   i   o   n       i   s       a   p   p   l
0100600    i   e   d       t   o       t   h   e       c   u   r   r   e
0100620    n   t       t   a   i   l       e   .   g   .   ,       (   f
0100640    o   r       X       i   n       Y       b   y       C   D   D
0100660    R       .   .   .   )       i   s       t   h   e       s   a
0100700    m   e       a   s       (   f   o   r       X       i   n    
0100720    Y       b   y       (   C   D   D   R       X   )       .   .
0100740    .   )   .  \r  \t 267  \t   W   h   i   l   e       t   h   e
0100760        e   x   a   c   t       f   o   r   m       o   f       t
0101000    h   e       t   r   a   n   s   l   a   t   i   o   n       o
0101020    f       a   n       i   t   e   r   a   t   i   v   e       s
0101040    t   a   t   e   m   e   n   t       d   e   p   e   n   d   s
0101060        o   n       w   h   i   c   h       o   p   e   r   a   t
0101100    o   r   s       a   r   e       p   r   e   s   e   n   t   ,
0101120        a       P   R   O   G       w   i   l   l       a   l   w
0101140    a   y   s       b   e       u   s   e   d       w   h   e   n
0101160    e   v   e   r       t   h   e       i   .   s   .       s   p
0101200    e   c   i   f   i   e   s       d   u   m   m   y       v   a
0101220    r   i   a   b   l   e   s   ,       i   .   e   .   ,       i
0101240    f       a       B   I   N   D       o   p   e   r   a   t   o
0101260    r       a   p   p   e   a   r   s   ,       o   r       t   h
0101300    e   r   e       i   s       m   o   r   e       t   h   a   n
0101320        o   n   e       v   a   r   i   a   b   l   e       s   p
0101340    e   c   i   f   i   e   d       b   y       a       F   O   R
0101360        o   p   e   r   a   t   o   r   ,       o   r       a    
0101400    G   O   ,       R   E   T   U   R   N   ,       o   r       a
0101420        r   e   f   e   r   e   n   c   e       t   o       t   h
0101440    e       v   a   r   i   a   b   l   e       $   $   V   A   L
0101460            a   p   p   e   a   r   s       i   n       a   n   y
0101500        o   f       t   h   e       o   p   e   r   a   n   d   s
0101520    .       W   h   e   n       a       P   R   O   G       i   s
0101540        u   s   e   d   ,       t   h   e       f   o   r   m    
0101560    o   f       t   h   e       t   r   a   n   s   l   a   t   i
0101600    o   n       i   s   :  \r   (   P   R   O   G       V   A   R
0101620    I   A   B   L   E   S  \r                           {   i   n
0101640    i   t   i   a   l   i   z   e   }  \r   $   $   L   P        
0101660    {   e   a   c   h   t   i   m   e   }  \r                    
0101700        {   t   e   s   t   }  \r                           {   b
0101720    o   d   y   }  \r   $   $   I   T   E   R   A   T   E  \r    
0101740                        {   a   f   t   e   r   t   e   s   t   }
0101760   \r                           {   u   p   d   a   t   e   }  \r
0102000                            (   G   O       $   $   L   P   )  \r
0102020    $   $   O   U   T       {   f   i   n   a   l   i   z   e   }
0102040   \r                           (   R   E   T   U   R   N       $
0102060    $   V   A   L   )   )  \r   w   h   e   r   e       {   t   e
0102100    s   t   }       c   o   r   r   e   s   p   o   n   d   s    
0102120    t   o       t   h   a   t       p   o   r   t   i   o   n    
0102140    o   f       t   h   e       l   o   o   p       t   h   a   t
0102160        t   e   s   t   s       f   o   r       t   e   r   m   i
0102200    n   a   t   i   o   n       a   n   d       a   l   s   o    
0102220    f   o   r       t   h   o   s   e       i   t   e   r   a   t
0102240    i   o   n   s       f   o   r       w   h   i   c   h       {
0102260    b   o   d   y   }       i   s       n   o   t       g   o   i
0102300    n   g       t   o       b   e       e   x   e   c   u   t   e
0102320    d   ,       (   a   s       i   n   d   i   c   a   t   e   d
0102340        b   y       a       W   H   E   N       o   r       U   N
0102360    L   E   S   S   )   ;       {   b   o   d   y   }       c   o
0102400    r   r   e   s   p   o   n   d   s       t   o       t   h   e
0102420        o   p   e   r   a   n   d       o   f       t   h   e    
0102440    i   .   s   .   t   y   p   e   ,       e   .   g   .   ,    
0102460    D   O   ,       C   O   L   L   E   C   T   ,       e   t   c
0102500    .   ;       {   a   f   t   e   r   t   e   s   t   }       c
0102520    o   r   r   e   s   p   o   n   d   s       t   o       t   h
0102540    o   s   e       t   e   s   t   s       f   o   r       t   e
0102560    r   m   i   n   a   t   i   o   n       s   p   e   c   i   f
0102600    i   e   d       b   y       R   E   P   E   A   T   W   H   I
0102620    L   E       o   r       R   E   P   E   A   T   U   N   T   I
0102640    L   ;       a   n   d       {   u   p   d   a   t   e   }    
0102660    c   o   r   r   e   s   p   o   n   d   s       t   o       t
0102700    h   a   t       p   a   r   t       t   h   a   t       r   e
0102720    s   e   t   s       t   h   e       t   a   i   l   ,       i
0102740    n   c   r   e   m   e   n   t   s       t   h   e       c   o
0102760    u   n   t   e   r   ,       e   t   c   .       i   n       p
0103000    r   e   p   a   r   a   t   i   o   n       f   o   r       t
0103020    h   e       n   e   x   t       i   t   e   r   a   t   i   o
0103040    n   .           {   i   n   i   t   i   a   l   i   z   e   }
0103060    ,       {   f   i   n   a   l   i   z   e   }   ,       a   n
0103100    d       {   e   a   c   h   t   i   m   e   }       c   o   r
0103120    r   e   s   p   o   n   d       t   o       t   h   e       o
0103140    p   e   r   a   n   d   s       o   f       F   I   R   S   T
0103160    ,       F   I   N   A   L   L   Y   ,       a   n   d       E
0103200    A   C   H   T   I   M   E   ,       i   f       a   n   y   .
0103220   \r   N   o   t   e       t   h   a   t       s   i   n   c   e
0103240        {   b   o   d   y   }       a   l   w   a   y   s       a
0103260    p   p   e   a   r   s       a   t       t   h   e       t   o
0103300    p       l   e   v   e   l       o   f       t   h   e       P
0103320    R   O   G   ,       t   h   e       u   s   e   r       c   a
0103340    n       i   n   s   e   r   t       l   a   b   e   l   s    
0103360    i   n       {   b   o   d   y   }   ,       a   n   d       G
0103400    O       t   o       t   h   e   m       f   r   o   m       w
0103420    i   t   h   i   n       {   b   o   d   y   }       o   r    
0103440    f   r   o   m       o   t   h   e   r       i   .   s   .    
0103460    o   p   e   r   a   n   d   s   ,       e   .   g   .   ,    
0103500    (   f   o   r       X       i   n       Y       f   i   r   s
0103520    t       (   G   O       A   )       d   o       (   F   O   O
0103540    )       A       (   F   I   E   )   )   .           H   o   w
0103560    e   v   e   r   ,       s   i   n   c   e       {   b   o   d
0103600    y   }       i   s       d   w   i   m   i   f   i   e   d    
0103620    a   s       a       l   i   s   t       o   f       f   o   r
0103640    m   s   ,       t   h   e       l   a   b   e   l   (   s   )
0103660        s   h   o   u   l   d       b   e       a   d   d   e   d
0103700        t   o       t   h   e       d   u   m   m   y       v   a
0103720    r   i   a   b   l   e   s       f   o   r       t   h   e    
0103740    i   t   e   r   a   t   i   v   e       s   t   a   t   e   m
0103760    e   n   t       i   n       o   r   d   e   r       t   o    
0104000    p   r   e   v   e   n   t       t   h   e   i   r       b   e
0104020    i   n   g       d   w   i   m   i   f   i   e   d       a   n
0104040    d       p   o   s   s   i   b   l   y       "   c   o   r   r
0104060    e   c   t   e   d   "   ,       e   .   g   .   ,       (   f
0104100    o   r       X       i   n       Y       b   i   n   d       A
0104120        f   i   r   s   t       (   G   O       A   )       d   o
0104140        (   F   O   O   )       A       (   F   I   E   )   )   .
0104160            T   h   e       u   s   e   r       c   a   n       a
0104200    l   s   o       G   O       t   o       $   $   L   P   ,    
0104220    $   $   I   T   E   R   A   T   E   ,       o   r       $   $
0104240    O   U   T   ,       o   r       e   x   p   l   i   c   i   t
0104260    l   y       s   e   t       $   $   V   A   L   .  \r   9   .
0104300    8   .   6          \t   E   r   r   o   r   s       i   n    
0104320    I   t   e   r   a   t   i   v   e       S   t   a   t   e   m
0104340    e   n   t   s  \r  \r   A   n       e   r   r   o   r       w
0104360    i   l   l       b   e       g   e   n   e   r   a   t   e   d
0104400        a   n   d       a   n       a   p   p   r   o   p   r   i
0104420    a   t   e       d   i   a   g   n   o   s   t   i   c       p
0104440    r   i   n   t   e   d       i   f       a   n   y       o   f
0104460        t   h   e       f   o   l   l   o   w   i   n   g       c
0104500    o   n   d   i   t   i   o   n   s       h   o   l   d   :  \r
0104520    (   1   )           O   p   e   r   a   t   o   r       w   i
0104540    t   h       n   u   l   l       o   p   e   r   a   n   d   ,
0104560        i   .   e   .   ,       t   w   o       a   d   j   a   c
0104600    e   n   t       o   p   e   r   a   t   o   r   s   ,       a
0104620    s       i   n       (   f   o   r       X       i   n       Y
0104640        u   n   t   i   l       d   o       .   .   .   )  \r   (
0104660    2   )           O   p   e   r   a   n   d       c   o   n   s
0104700    i   s   t   i   n   g       o   f       m   o   r   e       t
0104720    h   a   n       o   n   e       f   o   r   m       (   e   x
0104740    c   e   p   t       a   s       o   p   e   r   a   n   d    
0104760    t   o       F   I   R   S   T   ,       F   I   N   A   L   L
0105000    Y   ,       o   r       o   n   e       o   f       t   h   e
0105020        i   .   s   .   t   y   p   e   s   )   ,       e   .   g
0105040    .   ,       (   f   o   r       X       i   n       Y       (
0105060    P   R   I   N   T       X   )       c   o   l   l   e   c   t
0105100        .   .   .   )   .  \r   (   3   )           I   N   ,    
0105120    O   N   ,       F   R   O   M   ,       T   O   ,       o   r
0105140        B   Y       a   p   p   e   a   r       t   w   i   c   e
0105160        i   n       s   a   m   e       i   .   s   .  \r   (   4
0105200    )           B   o   t   h       I   N       a   n   d       O
0105220    N       u   s   e   d       o   n       s   a   m   e       i
0105240    .   v   .  \r   (   5   )           F   R   O   M       o   r
0105260        T   O       u   s   e   d       w   i   t   h       I   N
0105300        o   r       O   N       o   n       s   a   m   e       i
0105320    .   v   .  \r   (   6   )           M   o   r   e       t   h
0105340    a   n       o   n   e       i   .   s   .   t   y   p   e   ,
0105360        e   .   g   .   ,       a       D   O       a   n   d    
0105400    a       S   U   M   .  \r   I   n       3   ,       4   ,    
0105420    o   r       5   ,       a   n       e   r   r   o   r       i
0105440    s       n   o   t       g   e   n   e   r   a   t   e   d    
0105460    i   f       a   n       i   n   t   e   r   v   e   n   i   n
0105500    g       A   S       o   c   c   u   r   s   .  \r   I   f    
0105520    a   n       e   r   r   o   r       o   c   c   u   r   s   ,
0105540        t   h   e       i   .   s   .       i   s       l   e   f
0105560    t       u   n   c   h   a   n   g   e   d   .  \r   I   f    
0105600    n   o       D   O   ,       C   O   L   L   E   C   T   ,    
0105620    J   O   I   N       o   r       a   n   y       o   f       t
0105640    h   e       o   t   h   e   r       i   .   s   .   t   y   p
0105660    e   s       a   r   e       s   p   e   c   i   f   i   e   d
0105700    ,       C   L   I   S   P       w   i   l   l       f   i   r
0105720    s   t       a   t   t   e   m   p   t       t   o       f   i
0105740    n   d       a   n       o   p   e   r   a   n   d       c   o
0105760    n   s   i   s   t   i   n   g       o   f       m   o   r   e
0106000        t   h   a   n       o   n   e       f   o   r   m   ,    
0106020    e   .   g   .   ,       (   f   o   r       X       i   n    
0106040    Y       (   P   R   I   N   T       X   )       w   h   e   n
0106060        A   T   O   M       X       .   .   .   )   ,       a   n
0106100    d       i   n       t   h   i   s       c   a   s   e       w
0106120    i   l   l       i   n   s   e   r   t       a       D   O    
0106140    a   f   t   e   r       t   h   e       f   i   r   s   t    
0106160    f   o   r   m   .           (   I   n       t   h   i   s    
0106200    c   a   s   e   ,       c   o   n   d   i   t   i   o   n    
0106220    2       i   s       n   o   t       c   o   n   s   i   d   e
0106240    r   e   d       t   o       b   e       m   e   t   ,       a
0106260    n   d       a   n       e   r   r   o   r       i   s       n
0106300    o   t       g   e   n   e   r   a   t   e   d   .   )        
0106320    I   f       C   L   I   S   P       c   a   n   n   o   t    
0106340    f   i   n   d       s   u   c   h       a   n       o   p   e
0106360    r   a   n   d   ,       a   n   d       n   o       W   H   I
0106400    L   E       o   r       U   N   T   I   L       a   p   p   e
0106420    a   r   s       i   n       t   h   e       i   .   s   .   ,
0106440        a       w   a   r   n   i   n   g       m   e   s   s   a
0106460    g   e       i   s       p   r   i   n   t   e   d   :       N
0106500    O       D   O   ,       C   O   L   L   E   C   T   ,       O
0106520    R       J   O   I   N   :       f   o   l   l   o   w   e   d
0106540        b   y       t   h   e       i   .   s   .  \r   S   i   m
0106560    i   l   a   r   l   y   ,       i   f       n   o       t   e
0106600    r   m   i   n   a   t   i   n   g       c   o   n   d   i   t
0106620    i   o   n       i   s       d   e   t   e   c   t   e   d   ,
0106640        i   .   e   .   ,       n   o       I   N   ,       O   N
0106660    ,       W   H   I   L   E   ,       U   N   T   I   L   ,    
0106700    T   O   ,       o   r       a       R   E   T   U   R   N    
0106720    o   r       G   O   ,       a       w   a   r   n   i   n   g
0106740        m   e   s   s   a   g   e       i   s       p   r   i   n
0106760    t   e   d   :       P   O   S   S   I   B   L   E       N   O
0107000    N   -   T   E   R   M   I   N   A   T   I   N   G       I   T
0107020    E   R   A   T   I   V   E       S   T   A   T   E   M   E   N
0107040    T   :       f   o   l   l   o   w   e   d       b   y       t
0107060    h   e       i   t   e   r   a   t   i   v   e       s   t   a
0107100    t   e   m   e   n   t   .           H   o   w   e   v   e   r
0107120    ,       s   i   n   c   e       t   h   e       u   s   e   r
0107140        m   a   y       b   e       p   l   a   n   n   i   n   g
0107160        t   o       t   e   r   m   i   n   a   t   e       t   h
0107200    e       i   .   s   .       v   i   a       a   n       e   r
0107220    r   o   r   ,       c   o   n   t   r   o   l   -   E   ,    
0107240    o   r       a       R   E   T   F   R   O   M       f   r   o
0107260    m       a       l   o   w   e   r       f   u   n   c   t   i
0107300    o   n   ,       t   h   e       i   .   s   .       i   s    
0107320    s   t   i   l   l       t   r   a   n   s   l   a   t   e   d
0107340    .           N   o   t   e   :           T   h   e       e   r
0107360    r   o   r       m   e   s   s   a   g   e       i   s       n
0107400    o   t       p   r   i   n   t   e   d       i   f       t   h
0107420    e       v   a   l   u   e       o   f       C   L   I   S   P
0107440    I   .   S   .   G   A   G       i   s       T       (   i   n
0107460    i   t   i   a   l   l   y       N   I   L   )   .  \r   9   .
0107500    8   .   7          \t   D   e   f   i   n   i   n   g       N
0107520    e   w       I   t   e   r   a   t   i   v   e       S   t   a
0107540    t   e   m   e   n   t       O   p   e   r   a   t   o   r   s
0107560   \r  \r   T   h   e       f   o   l   l   o   w   i   n   g    
0107600    f   u   n   c   t   i   o   n       i   s       a   v   a   i
0107620    l   a   b   l   e       f   o   r       d   e   f   i   n   i
0107640    n   g       n   e   w       o   r       r   e   d   e   f   i
0107660    n   i   n   g       e   x   i   s   t   i   n   g       i   t
0107700    e   r   a   t   i   v   e       s   t   a   t   e   m   e   n
0107720    t       o   p   e   r   a   t   o   r   s   :  \r   (   I   .
0107740    S   .   O   P   R       N   A   M   E       F   O   R   M    
0107760    O   T   H   E   R   S       E   V   A   L   F   L   G   )    
0110000       \t   [   F   u   n   c   t   i   o   n   ]  \r   N   A   M
0110020    E       i   s       t   h   e       n   a   m   e       o   f
0110040        t   h   e       n   e   w       i   .   s   .   o   p   r
0110060    .           I   f       F   O   R   M       i   s       a    
0110100    l   i   s   t   ,       N   A   M   E       w   i   l   l    
0110120    b   e       a       n   e   w       i   .   s   .   t   y   p
0110140    e       (   s   e   e       p   a   g   e       X   .   X   X
0110160    )   ,       a   n   d       F   O   R   M       i   t   s    
0110200    b   o   d   y   .  \r   O   T   H   E   R   S       i   s    
0110220    a   n       (   o   p   t   i   o   n   a   l   )       l   i
0110240    s   t       o   f       a   d   d   i   t   i   o   n   a   l
0110260        i   .   s   .       o   p   e   r   a   t   o   r   s    
0110300    a   n   d       o   p   e   r   a   n   d   s       w   h   i
0110320    c   h       w   i   l   l       b   e       a   d   d   e   d
0110340        t   o       t   h   e       i   .   s   .       a   t    
0110360    t   h   e       p   l   a   c   e       w   h   e   r   e    
0110400    N   A   M   E       a   p   p   e   a   r   s   .           I
0110420    f       F   O   R   M       i   s       N   I   L   ,       N
0110440    A   M   E       i   s       a       n   e   w       i   .   s
0110460    .   o   p   r       d   e   f   i   n   e   d       e   n   t
0110500    i   r   e   l   y       b   y       O   T   H   E   R   S   .
0110520   \r   I   n       b   o   t   h       F   O   R   M       a   n
0110540    d       O   T   H   E   R   S   ,       t   h   e       a   t
0110560    o   m       $   $   V   A   L       c   a   n       b   e    
0110600    u   s   e   d       t   o       r   e   f   e   r   e   n   c
0110620    e       t   h   e       v   a   l   u   e       t   o       b
0110640    e       r   e   t   u   r   n   e   d       b   y       t   h
0110660    e       i   .   s   .   ,       I   .   V   .       t   o    
0110700    r   e   f   e   r   e   n   c   e       t   h   e       c   u
0110720    r   r   e   n   t       i   .   v   .   ,       a   n   d    
0110740    B   O   D   Y       t   o       r   e   f   e   r   e   n   c
0110760    e       N   A   M   E   '   s       o   p   e   r   a   n   d
0111000    .           I   n       o   t   h   e   r       w   o   r   d
0111020    s   ,       t   h   e       c   u   r   r   e   n   t       i
0111040    .   v   .       w   i   l   l       b   e       s   u   b   s
0111060    t   i   t   u   t   e   d       f   o   r       a   l   l    
0111100    i   n   s   t   a   n   c   e   s       o   f       I   .   V
0111120    .       a   n   d       N   A   M   E   '   s       o   p   e
0111140    r   a   n   d       w   i   l   l       b   e       s   u   b
0111160    s   t   i   t   u   t   e   d       f   o   r       a   l   l
0111200        i   n   s   t   a   n   c   e   s       o   f       B   O
0111220    D   Y       t   h   r   o   u   g   h   o   u   t       F   O
0111240    R   M       a   n   d       O   T   H   E   R   S   .  \r   I
0111260    f       E   V   A   L   F   L   G       i   s       T   ,    
0111300    F   O   R   M       a   n   d       O   T   H   E   R   S    
0111320    a   r   e       e   v   a   l   u   a   t   e   d       a   t
0111340        t   r   a   n   s   l   a   t   i   o   n       t   i   m
0111360    e   ,       a   n   d       t   h   e   i   r       v   a   l
0111400    u   e   s       u   s   e   d       a   s       d   e   s   c
0111420    r   i   b   e   d       a   b   o   v   e   .           A    
0111440    d   u   m   m   y       v   a   r   i   a   b   l   e       f
0111460    o   r       u   s   e       i   n       t   r   a   n   s   l
0111500    a   t   i   o   n       t   h   a   t       d   o   e   s    
0111520    n   o   t       c   l   a   s   h       w   i   t   h       a
0111540        d   u   m   m   y       v   a   r   i   a   b   l   e    
0111560    a   l   r   e   a   d   y       u   s   e   d       b   y    
0111600    s   o   m   e       o   t   h   e   r       i   .   s   .    
0111620    o   p   e   r   a   t   o   r   s       c   a   n       b   e
0111640        o   b   t   a   i   n   e   d       b   y       c   a   l
0111660    l   i   n   g       (   G   E   T   D   U   M   M   Y   V   A
0111700    R   )   .       (   G   E   T   D   U   M   M   Y   V   A   R
0111720        T   )       w   i   l   l       r   e   t   u   r   n    
0111740    a       d   u   m   m   y       v   a   r   i   a   b   l   e
0111760        a   n   d       a   l   s   o       i   n   s   u   r   e
0112000        t   h   a   t       i   t       i   s       b   o   u   n
0112020    d       a   s       a       P   R   O   G       v   a   r   i
0112040    a   b   l   e       i   n       t   h   e       t   r   a   n
0112060    s   l   a   t   i   o   n   .  \r   I   f       N   A   M   E
0112100        w   a   s       p   r   e   v   i   o   u   s   l   y    
0112120    a   n       i   .   s   .   o   p   r       a   n   d       i
0112140    s       b   e   i   n   g       r   e   d   e   f   i   n   e
0112160    d   ,       t   h   e       m   e   s   s   a   g   e       (
0112200    N   A   M   E       R   E   D   E   F   I   N   E   D   )    
0112220    w   i   l   l       b   e       p   r   i   n   t   e   d    
0112240    (   u   n   l   e   s   s       D   F   N   F   L   G   =   T
0112260    )   ,       a   n   d       a   l   l       e   x   p   r   e
0112300    s   s   i   o   n   s       u   s   i   n   g       t   h   e
0112320        i   .   s   .   o   p   r       N   A   M   E       t   h
0112340    a   t       h   a   v   e       b   e   e   n       t   r   a
0112360    n   s   l   a   t   e   d       w   i   l   l       h   a   v
0112400    e       t   h   e   i   r       t   r   a   n   s   l   a   t
0112420    i   o   n   s       d   i   s   c   a   r   d   e   d   .  \r
0112440   \r   T   h   e       f   o   l   l   o   w   i   n   g       a
0112460    r   e       s   o   m   e       e   x   a   m   p   l   e   s
0112500        o   f       h   o   w       I   .   S   .   O   P   R    
0112520    c   o   u   l   d       b   e       c   a   l   l   e   d    
0112540    t   o       d   e   f   i   n   e       s   o   m   e       e
0112560    x   i   s   t   i   n   g       i   .   s   .   o   p   r   s
0112600    ,       a   n   d       c   r   e   a   t   e       s   o   m
0112620    e       n   e   w       o   n   e   s   :  \r  \t   C   O   L
0112640    L   E   C   T  \t  \r   (   I   .   S   .   O   P   R       '
0112660    C   O   L   L   E   C   T  \r                                
0112700        '   (   S   E   T   Q       $   $   V   A   L       (   N
0112720    C   O   N   C   1       $   $   V   A   L       B   O   D   Y
0112740    )   )   )  \r  \t   S   U   M  \t  \r   (   I   .   S   .   O
0112760    P   R       '   S   U   M  \r                                
0113000        '   (   $   $   V   A   L   _   $   $   V   A   L   +   B
0113020    O   D   Y   )  \r                                       '   (
0113040    F   I   R   S   T       $   $   V   A   L   _   0   )   )  \r
0113060    N   o   t   e   :           $   $   V   A   L   +   B   O   D
0113100    Y       i   s       u   s   e   d       i   n   s   t   e   a
0113120    d       o   f       (   I   P   L   U   S       $   $   V   A
0113140    L       B   O   D   Y   )       s   o       t   h   a   t    
0113160    t   h   e       c   h   o   i   c   e       o   f       f   u
0113200    n   c   t   i   o   n       u   s   e   d       i   n       t
0113220    h   e       t   r   a   n   s   l   a   t   i   o   n   ,    
0113240    i   .   e   .   ,       I   P   L   U   S   ,       F   P   L
0113260    U   S   ,       o   r       P   L   U   S   ,       w   i   l
0113300    l       b   e       d   e   t   e   r   m   i   n   e   d    
0113320    b   y       t   h   e       d   e   c   l   a   r   a   t   i
0113340    o   n   s       t   h   e   n       i   n       e   f   f   e
0113360    c   t   .  \r  \t   N   E   V   E   R  \t  \r   (   I   .   S
0113400    .   O   P   R       '   N   E   V   E   R  \r                
0113420                        '   (   i   f       B   O   D   Y       t
0113440    h   e   n       $   $   V   A   L   _   N   I   L       (   G
0113460    O       $   $   O   U   T   )   )   )  \r   N   o   t   e   :
0113500            (   i   f       B   O   D   Y       t   h   e   n    
0113520    (   R   E   T   U   R   N       N   I   L   )   )       w   o
0113540    u   l   d       e   x   i   t       f   r   o   m       t   h
0113560    e       i   .   s   .       i   m   m   e   d   i   a   t   e
0113600    l   y       a   n   d       t   h   e   r   e   f   o   r   e
0113620        n   o   t       e   x   e   c   u   t   e       t   h   e
0113640        o   p   e   r   a   t   i   o   n   s       s   p   e   c
0113660    i   f   i   e   d       v   i   a       a       F   I   N   A
0113700    L   L   Y       (   i   f       a   n   y   )   .  \r  \t   T
0113720    H   E   R   E   I   S  \t  \r   (   I   .   S   .   O   P   R
0113740        '   T   H   E   R   E   I   S  \r                        
0113760                '   (   i   f       B   O   D   Y       t   h   e
0114000    n       $   $   V   A   L   _   I   .   V   .       (   G   O
0114020        $   $   O   U   T   )   )   )  \r  \t   R   C   O   L   L
0114040    E   C   T  \t   T   o       d   e   f   i   n   e       R   C
0114060    O   L   L   E   C   T   ,       a       v   e   r   s   i   o
0114100    n       o   f       C   O   L   L   E   C   T       w   h   i
0114120    c   h       u   s   e   s       C   O   N   S       i   n   s
0114140    t   e   a   d       o   f       N   C   O   N   C   1       a
0114160    n   d       t   h   e   n       r   e   v   e   r   s   e   s
0114200        t   h   e       l   i   s   t       o   f       v   a   l
0114220    u   e   s   :  \r   (   I   .   S   .   O   P   R       '   R
0114240    C   O   L   L   E   C   T  \r                                
0114260        '   (   $   $   V   A   L   _   (   C   O   N   S       B
0114300    O   D   Y       $   $   V   A   L   )   )  \r                
0114320                        '   (   F   I   N   A   L   L   Y       (
0114340    R   E   T   U   R   N       (   D   R   E   V   E   R   S   E
0114360        $   $   V   A   L   )   )   )   ]  \r  \t   T   C   O   L
0114400    L   E   C   T  \t   T   o       d   e   f   i   n   e       T
0114420    C   O   L   L   E   C   T   ,       a       v   e   r   s   i
0114440    o   n       o   f       C   O   L   L   E   C   T       w   h
0114460    i   c   h       u   s   e   s       T   C   O   N   C   :  \r
0114500    (   I   .   S   .   O   P   R       '   T   C   O   L   L   E
0114520    C   T  \r                                       '   (   T   C
0114540    O   N   C       $   $   V   A   L       B   O   D   Y   )  \r
0114560                                        '   (   F   I   R   S   T
0114600        $   $   V   A   L   _   (   C   O   N   S   )       F   I
0114620    N   A   L   L   Y       (   R   E   T   U   R   N       (   C
0114640    A   R       $   $   V   A   L   )   )   )   ]  \r  \t   P   R
0114660    O   D   U   C   T  \t  \r   (   I   .   S   .   O   P   R    
0114700    '   P   R   O   D   U   C   T  \r                            
0114720            '   (   $   $   V   A   L   _   $   $   V   A   L   *
0114740    B   O   D   Y   )  \r                                       '
0114760    (   F   I   R   S   T       $   $   V   A   L   _   1   )   ]
0115000   \r  \t   U   P   T   O  \t   T   o       d   e   f   i   n   e
0115020        U   P   T   O   ,       a       v   e   r   s   i   o   n
0115040        o   f       T   O       w   h   o   s   e       o   p   e
0115060    r   a   n   d       i   s       e   v   a   l   u   a   t   e
0115100    d       o   n   l   y       o   n   c   e   :  \r   (   I   .
0115120    S   .   O   P   R       '   U   P   T   O  \r                
0115140                        N   I   L  \r                            
0115160            '   (   B   I   N   D       $   $   F   O   O   _   B
0115200    O   D   Y       T   O       $   $   F   O   O   )   ]  \r  \t
0115220    T   O  \t   T   o       r   e   d   e   f   i   n   e       T
0115240    O       s   o       t   h   a   t       i   n   s   t   e   a
0115260    d       o   f       r   e   c   o   m   p   u   t   i   n   g
0115300        F   O   R   M       e   a   c   h       i   t   e   r   a
0115320    t   i   o   n   ,       a       v   a   r   i   a   b   l   e
0115340        i   s       b   o   u   n   d       t   o       t   h   e
0115360        v   a   l   u   e       o   f       F   O   R   M   ,    
0115400    a   n   d       t   h   e   n       t   h   a   t       v   a
0115420    r   i   a   b   l   e       i   s       u   s   e   d   :  \r
0115440    (   I   .   S   .   O   P   R       '   T   O  \r            
0115460                            N   I   L  \r                        
0115500                '   (   B   I   N   D       $   $   E   N   D    
0115520    F   I   R   S   T       $   $   E   N   D   _   B   O   D   Y
0115540        O   R   I   G   I   N   A   L       T   O       $   $   E
0115560    N   D   )   ]  \r   N   o   t   e       t   h   e       u   s
0115600    e       o   f       O   R   I   G   I   N   A   L       t   o
0115620        r   e   d   e   f   i   n   e       T   O       i   n    
0115640    t   e   r   m   s       o   f       i   t   s       o   r   i
0115660    g   i   n   a   l       d   e   f   i   n   i   t   i   o   n
0115700    .           O   R   I   G   I   N   A   L       i   s       i
0115720    n   t   e   n   d   e   d       f   o   r       u   s   e    
0115740    i   n       r   e   d   e   f   i   n   i   n   g       b   u
0115760    i   l   t   -   i   n       o   p   e   r   a   t   o   r   s
0116000    ,       s   i   n   c   e       t   h   e   i   r       d   e
0116020    f   i   n   i   t   i   o   n   s       a   r   e       n   o
0116040    t       a   c   c   e   s   s   i   b   l   e   ,       a   n
0116060    d       h   e   n   c   e       n   o   t       d   i   r   e
0116100    c   t   l   y       m   o   d   i   f   i   a   b   l   e   .
0116120            T   h   u   s       i   f       t   h   e       o   p
0116140    e   r   a   t   o   r       h   a   d       b   e   e   n    
0116160    d   e   f   i   n   e   d       b   y       t   h   e       u
0116200    s   e   r       v   i   a       I   .   S   .   O   P   R   ,
0116220        O   R   I   G   I   N   A   L       w   o   u   l   d    
0116240    n   o   t       o   b   t   a   i   n       i   t   s       o
0116260    r   i   g   i   n   a   l       d   e   f   i   n   i   t   i
0116300    o   n   .           I   n       t   h   i   s       c   a   s
0116320    e   ,       o   n   e       p   r   e   s   u   m   a   b   l
0116340    y       w   o   u   l   d       s   i   m   p   l   y       m
0116360    o   d   i   f   y       t   h   e       i   .   s   .   o   p
0116400    r       d   e   f   i   n   i   t   i   o   n   .  \r   I   .
0116420    S   .   O   P   R       c   a   n       a   l   s   o       b
0116440    e       u   s   e   d       t   o       d   e   f   i   n   e
0116460        s   y   n   o   n   y   m   s       f   o   r       a   l
0116500    r   e   a   d   y       d   e   f   i   n   e   d       i   .
0116520    s   .       o   p   e   r   a   t   o   r   s       b   y    
0116540    c   a   l   l   i   n   g       I   .   S   .   O   P   R    
0116560    w   i   t   h       F   O   R   M       a   n       a   t   o
0116600    m   ,       e   .   g   .   ,       (   I   .   S   .   O   P
0116620    R       '   W   H   E   R   E       '   W   H   E   N   )    
0116640    m   a   k   e   s       W   H   E   R   E       b   e       t
0116660    h   e       s   a   m   e       a   s       W   H   E   N   .
0116700            S   i   m   i   l   a   r   l   y   ,       f   o   l
0116720    l   o   w   i   n   g       (   I   .   S   .   O   P   R    
0116740    '   I   S   T   H   E   R   E       '   T   H   E   R   E   I
0116760    S   )   ,       o   n   e       c   a   n       w   r   i   t
0117000    e       (   I   S   T   H   E   R   E       A   T   O   M    
0117020    I   N       Y   )   ,       a   n   d       f   o   l   l   o
0117040    w   i   n   g       (   I   .   S   .   O   P   R       '   F
0117060    I   N   D       '   F   O   R   )       a   n   d       (   I
0117100    .   S   .   O   P   R       '   S   U   C   H   T   H   A   T
0117120        '   T   H   E   R   E   I   S   )   ,       o   n   e    
0117140    c   a   n       w   r   i   t   e       (   f   i   n   d    
0117160    X       i   n       Y       s   u   c   h   t   h   a   t    
0117200    X       m   e   m   b   e   r       Z   )   .           I   n
0117220        t   h   e       c   u   r   r   e   n   t       s   y   s
0117240    t   e   m   ,       W   H   E   R   E       i   s       s   y
0117260    n   o   n   y   m   o   u   s       w   i   t   h       W   H
0117300    E   N   ,       S   U   C   H   T   H   A   T       a   n   d
0117320        I   S   T   H   E   R   E       w   i   t   h       T   H
0117340    E   R   E   I   S   ,       F   I   N   D       w   i   t   h
0117360        F   O   R   ,       a   n   d       T   H   R   U       w
0117400    i   t   h       T   O   .  \r   I   f       F   O   R   M    
0117420    i   s       t   h   e       a   t   o   m       M   O   D   I
0117440    F   I   E   R   ,       t   h   e   n       N   A   M   E    
0117460    i   s       d   e   f   i   n   e   d       a   s       a   n
0117500        i   .   s   .   o   p   r       w   h   i   c   h       c
0117520    a   n       i   m   m   e   d   i   a   t   e   l   y       f
0117540    o   l   l   o   w       a   n   o   t   h   e   r       i   .
0117560    s   .       o   p   e   r   a   t   o   r       (   i   .   e
0117600    .   ,       a   n       e   r   r   o   r       w   i   l   l
0117620        n   o   t       b   e       g   e   n   e   r   a   t   e
0117640    d   ,       a   s       d   e   s   c   r   i   b   e   d    
0117660    p   r   e   v   i   o   u   s   l   y   )   .           N   A
0117700    M   E       w   i   l   l       n   o   t       t   e   r   m
0117720    i   n   a   t   e       t   h   e       s   c   o   p   e    
0117740    o   f       t   h   e       p   r   e   v   i   o   u   s    
0117760    o   p   e   r   a   t   o   r   ,       a   n   d       w   i
0120000    l   l       b   e       s   t   r   i   p   p   e   d       o
0120020    f   f       w   h   e   n       D   W   I   M   I   F   Y    
0120040    i   s       c   a   l   l   e   d       o   n       i   t   s
0120060        o   p   e   r   a   n   d   .           O   L   D       i
0120100    s       a   n       e   x   a   m   p   l   e       o   f    
0120120    a       M   O   D   I   F   I   E   R       t   y   p   e    
0120140    o   f       o   p   e   r   a   t   o   r   .           T   h
0120160    e       M   O   D   I   F   I   E   R       f   e   a   t   u
0120200    r   e       a   l   l   o   w   s       t   h   e       u   s
0120220    e   r       t   o       d   e   f   i   n   e       i   .   s
0120240    .       o   p   e   r   a   t   o   r   s       s   i   m   i
0120260    l   a   r       t   o       O   L   D   ,       f   o   r    
0120300    u   s   e       i   n       c   o   n   j   u   n   c   t   i
0120320    o   n       w   i   t   h       s   o   m   e       o   t   h
0120340    e   r       u   s   e   r       d   e   f   i   n   e   d    
0120360    i   .   s   .   o   p   r       w   h   i   c   h       w   i
0120400    l   l       p   r   o   d   u   c   e       t   h   e       a
0120420    p   p   r   o   p   r   i   a   t   e       t   r   a   n   s
0120440    l   a   t   i   o   n   .  \r   T   h   e       f   i   l   e
0120460        p   a   c   k   a   g   e       c   o   m   m   a   n   d
0120500        I   .   S   .   O   P   R   S       (   p   a   g   e    
0120520    X   .   X   X   )       w   i   l   l       d   u   m   p    
0120540    t   h   e       d   e   f   i   n   i   t   i   o   n       o
0120560    f       i   .   s   .   o   p   r   s   .           (   I   .
0120600    S   .   O   P   R   S       P   R   O   D   U   C   T       U
0120620    P   T   O   )       a   s       a       f   i   l   e       p
0120640    a   c   k   a   g   e       c   o   m   m   a   n   d       w
0120660    i   l   l       p   r   i   n   t       s   u   i   t   a   b
0120700    l   e       e   x   p   r   e   s   s   i   o   n   s       s
0120720    o       t   h   a   t       t   h   e   s   e       i   t   e
0120740    r   a   t   i   v   e       s   t   a   t   e   m   e   n   t
0120760        o   p   e   r   a   t   o   r   s       w   i   l   l    
0121000    b   e       (   r   e   )   d   e   f   i   n   e   d       w
0121020    h   e   n       t   h   e       f   i   l   e       i   s    
0121040    l   o   a   d   e   d   .  \r  \r   C   o   p   y   r   i   g
0121060    h   t       (   c   )       1   9   8   5       X   e   r   o
0121100    x       C   o   r   p   o   r   a   t   i   o   n   .        
0121120    A   l   l       r   i   g   h   t   s       r   e   s   e   r
0121140    v   e   d   .  \r  \r                                        
0121146