#!/bin/sh
IXBIN=/usr/local/lib/icon/iconx                                               
IXLCL=`echo $0 | sed 's=[^/]*$=iconx='`

[ -n "$ICONX" ] && exec "$ICONX" $0 ${1+"$@"}
[ -x "$IXLCL" ] && exec "$IXLCL" $0 ${1+"$@"}
[ -x "$IXBIN" ] && exec "$IXBIN" $0 ${1+"$@"}
exec iconx $0 ${1+"$@"}

[executable Icon binary follows]
      

                     Z      [`      [h      [      _8      b      H      c      c(I9.0.00/32                          :i                                                                                                      x       x                                                          L             W             ]   b   C       $   b   T       
   b   =           N   C      l   b   C          E   E   b   Q           b   <          &   C       (   b   M             d   8   :          b   M             g   
   N   b   T       #   b   Q           b   =          b   :          U   C       <   E   E   b   Q              M             j   
   N   5   E   N   T       $   b   Q           b   M             j   b   =          N   C         U   E   b   S          b   T       #   b   Q           b   =             N   b   C   b   C      ,   U   C          E   T          b   C       P   E   S          b   M             j   
   N   b   >          b   :       0   b   T       %   b   S          b   =             N   5   E   N   T       &   b   M             l   b   T       '   b   S          b   =          b   =          N   C          U   E   b   S          b   M             j      N   b   T       (   b   M       	         b   T       '   b   S          b   =          b   =          N   C       <   b   T       )   b   M                b   =          N   U   E   S           b   T          b   T          b   =           b   =             F   U   C       t   b   T          E   T          E   S           b   A          b   =          b   A          b   =          N   T       )   b   M                b   =          N   5   N   :@   N   E   D                                                                    '                                                       b   C       <   E   Q           E   Q           b   <          &      N   C         U   E   b   T          b   T          E   Q           b   A          b   =             N   b   C       `   U   E   b   T          b   Q              N   b   C          E   T          +   G   D   N   b   C          U   E   b   T          E   T          b   Q           b   A          b   =          b   T             N   b   C          E   T          +   G   D   N   b   C       x   E   C       P   E   E   E   T          b   Q           &      b   9           8   :          b   T          +   G   D   N   b   C         U   T          b   Q           b   =          N   C      D   U   E   b   T          b   T          E   E   b   Q           b   <          &   A          b   =             N   U   E   b   Q           b   <          &   6   b   C          -   M                   N   F   C       `   E   C       8   E   Q           b   <          &   8   b   :          b   T          +   G   D   :         b   C          -   M              g      N   F   C       T   b   T          E   Q           b   <          b   <           $   =          G   D   b   :      @   b   C          -   M                   N   F   C          b   T          E   E   E   Q           b   <          &   A          b   T       	   E   Q           b   <          b   <           $   =          	   =          G   D   b   :      @   b   C          -   M                   N   F   C       T   J   E   b   >       ;   E   <                b   T          b   =          G   D   b   :         b   C          -   M       	            N   F   C       L   J   E   b   >       ;   b   <              T          b   =          G   D   b   :         b   C          -   M                    N   F   C       D   J   T       "   b   =           b   T          b   =          G   D   b   :      `   b   C       `   -   M                   N   F   T       *   b   <           b   =          b   :          F   C          b   C          b   T          E   E   E   Q           b   <          &   A          b   T       	   E   Q           b   <          b   <           $   =          	   =          8   :          b   T          G   D   N   C         b   C          b   T          E   E   b   T          E   E   b   Q           b   <          &   A          b   =          b   A          b   T       	   E   Q           b   <          b   <           $   =          	   =          8   :          b   T          G   D   N   C       0   b   C          E   T          +   G   D   N   E   D                                                                ,                                                                                 b   C       <   E   S           E   Q           b   <          &      N   C         U   T       +   b   T          b   T       ,   b   S           b   =          b   =          N   C       L   b   T       (   b   M       
         b   S           b   =          N   T          E   Q           b   <          b   <           $   =          N   C      	   U   E   b   S          U   T       ,   b   S           b   =          6   C          -   M              C      N   F   C       h   b   T          E   E   b   Q           b   <          &   A          b   =          8   :          b   T          b   :         b   C          -   M              G      N   F   C       h   b   T          E   E   b   Q           b   <          &   A          b   =          8   :          b   T          b   :         b   C          -   M              K      N   F   C       `   b   T       
   E   Q           b   <          b   <           $   =          8   :          b   T          b   :      $   b   C          -   M              T      N   F   C       h   b   T          E   E   b   Q           b   <          &   A          b   =          8   :          b   T          b   :      \   b   C          -   M              Y      N   F   C       h   b   T          E   E   b   Q           b   <          &   A          b   =          8   :          b   T          b   :         b   C          -   M              ^      N   F   C          b   T          E   E   b   Q           b   <          &   E   b   Q           b   <          &   A          b   =          8   :          b   T          b   :         b   C          -   M              a      N   F   C       h   b   T          E   E   b   Q           b   <          &   A          b   =          8   :          b   T          b   :         b   C          -   M              '      N   F   C       h   b   T          E   E   b   Q           b   <          &   A          b   =          8   :          b   T          b   :         b   C          -   M                    N   F   C       P   b   T          E   Q           b   <          &   =          8   :          b   T          b   :      d   b   C          -   M              l      N   F   C       P   b   T          E   Q           b   <          &   =          8   :          b   T          b   :          b   C          -   M              r      N   F   C       P   b   T          E   Q           b   <          &   =          8   :          b   T          b   :          5      N   C          U   T       +   b   T          b   T       ,   b   S           b   =          b   =          N   C       L   b   T       (   b   M       	         b   S           b   =          N   T          b   S          b   =          N   C          b   S          G   D   N   C          E   S          b   C       P   E   E   E   T          b   S           &      b   9          8   :       (   b   C          b   T          G   D      N   b   C         U   E   b   T       -   b   S          b   =          b   M                
   N   b   C      @   E   E   b   S          b   <          &   M                
   N   b   C          E   S          b   T          E   Q           b   <          b   <           $   E   b   S          b   <          &   E   b   S          b   <          &   =             N   b   C          U   T       +   b   T          b   T       ,   b   S           b   =          b   =          N   C       L   b   T       (   b   M       	         b   S           b   =          N   T          b   S          b   =          N   C          b   S          G   D   b   :       X   b   C       D   b   T          E   S           b   A          b   =          G   D   N   C       ,   b   C          b   T          G   D   N   E   D                  x      !h                                            2                                          b   C       (   E   S           E   A              N   b   C          U   E   b   S          E   Q                 F   U   b   C          b   T       $   b   S           b   T          E   S          b   A          b   =          b   =          8   :          D   N   5   N   b   C       ,   b   C          b   S           G   D   N   E   D                  H      #                                       
       8   b   C       8   E   T          b   T       .   b   =              N   b   C       8   E   T          b   T       /   b   =              N   b   C       0   E   T          b   M                    N   b   C       (   E   T          E   A              N   E   D              X      $                                             C                b   C          b   C          b   C       h   E   T          E   Q           b   <          &   =          b   <          &   8   b   :          b   T          G   D   N   E   D                  X      %                                             G                b   C          b   C          b   C       x   E   T          E   Q           b   <          &   =          b   <          b   <           $   8   b   :          b   T          G   D   N   E   D                  X      &                                             K                b   C          b   C          b   C          E   E   E   Q           b   <          &   A          b   T          E   Q           b   <          &   =          	   8   b   :          b   T          G   D   N   E   D                  X      (                                              P                b   C          b   C          E   T          b   T          E   E   b   Q           b   <          &   A          b   =             F   E   Q           b   <          &   8   b   :       (   b   C          b   T          G   D   N   C       h   E   E   E   T          E   Q           b   <          &   &      T          b   =              N   b   C         b   C          E   T       -   E   Q           b   <          &   =          b   M                 
   N   b   C          E   E   E   E   b   T          E   Q           b   <          &   &   b   9           E   E   b   Q           b   <          &   9              +   G   D   b   :          b   C          E   E   E   E   b   T          E   Q           b   <          &   &   b   9           E   Q           b   <          &      +   G   D   N   E   D              X      +                                             T                b   C         U   E   b   T       -   E   Q           b   <          &   =          b   M                
   N   b   C          b   C       h   E   E   E   Q           b   <          &   %   b   <              F   b   T          8   :          b   T          G   D   N   C       ,   b   C          b   T          G   D   N   E   D                  X      -`                                             Y                b   C       |   b   C       d   b   T          E   T          E   Q           b   <          &   A          b   =          G   D   N   E   D                  X      .P                                             ^                b   C         U   E   E   T       -   E   Q           b   <          &   =          b   T       -   E   Q           b   <          &   =          
   M                
   N   b   C          b   C          E   E   b   <           E   E   b   Q           b   <          &   %      E   E   Q           b   <          &   %      F   b   T          8   :          b   T          G   D   N   C          b   C          b   C       x   E   E   b   Q           b   <          &   E   b   Q           b   <          &      F   T          8   :          b   T          G   D   N   E   D                  X      1                                             a                b   C          U   E   b   T       -   E   Q           b   <          &   =          b   M                 
   N   b   C       l   b   T          E   E   E   Q           b   <          &   9           b   A          b   =          G   D   N   C          b   C       t   b   T       (   b   T           b   T          b   Q           b   =          b   =          b   =          G   D   N   E   D                  h      3                                            g                             b   C      \   U   E   b   S           E   Q                 F   U   b   C      $   U   C       `   E   T       -   b   S           b   =          b   M                   8   b   :       ,   E   E   b   S           %   <             N   b   C       L   b   T       (   b   >          b   M                b   =          N   C          b   T          G   D   N   U   E   T          b   T          E   E   b   S           b   <          &   A          b   =             N   b   C       \   b   T          E   E   b   S           b   <          &   A          b   =          G   D   N   5   N   C       ,   b   C          b   T          G   D   N   E   D                  h      6(                                            l                             b   C          U   E   b   S           E   Q                 F   U   b   T       0   b   T          b   S           b   =          N   5   N   C       ,   b   C          b   T          G   D   N   E   D                  h      7h                                            r                             b   C          U   E   b   S           E   Q                 F   U   b   T       1   b   T          b   S           b   =          N   5   N   C       ,   b   C          b   T          G   D   N   E   D                  X      8                                             z                b   C          U   E   b   T       -   b   Q           b   =          b   M                
   N   b   C          b   Q           G   D   N   E   D                  x      9                                                                                      b   C       (   E   S          E   A              N   b   C          U   E   b   S           E   Q                 F   U   b   T       $   b   S          b   T          b   S           b   =          b   =          N   5   N   C       ,   b   C          b   S          G   D   N   E   D                  X      ;8                                      	                       b   C       x   E   E   E   T          E   Q           b   <          &   &      T          b   T          b   =             N   b   C       |   E   E   E   T          E   Q           b   <          &   &   b   9          E   Q           b   <          &      N   C       @   b   C       (   E   Q           b   <          &   G   D   N   E   D                    =                                                                      %             -             1             6             :                          ?                          F   b   C       8   E   S           b   T       .   b   =              N   b   C          U   E   b   S          E   Q                F   U   E   E   b   S           b   S          &   C       @   E   E   b   T          b   S          &      8   :       0   b   T          b   T          b   =             N   5   N   b   C       (   E   S          b   <              N   b   C          U   E   E   T          E   Q             &   b   <          ?   T          b   C       P   E   Q           E   S          4   <                &   8   b   :          b   T          b   =          B      F   5   N   C       X   E   S          b   T          E   Q          b   A          b   =             N   b   C          U   E   b   S          E   T       2   b   S           b   =                F   U   E   E   b   T          E   S          b   <          &   &   E   S          b   <          &      N   5   N   C       ,   b   C          b   S          G   D   N   E   D                                                                                                            X      B8                                                          H   b   ;          b   C          E   R           E   E   b   M              L   U   T       !   b   T       3   b   T          b   =          b   =          b   .   8      b   M             M         N   C      T   b   C   b   C         U   C       8   b   T          b   R           b   =          N   5   E   N   b   C   b   C       t   U   T          b   3   b   3   b   R           b   =          N   N   N   E   b   :         N   E   b   R           4   C          E   E   b   M              L   U   T       !   b   T       3   b   T          b   =          b   =          b   .   8      b   M             M      8   b   :          N   E   b   :                N   :   N   C       @   U   T          b   R           b   =          H   F   5   N   E   R           b   C          E   E   b   M              L   U   T       !   b   T       3   b   T          b   =          b   =          b   .   8      b   M             M      8   b   :          D      N   :   N   E   D                  X      F                                                         S   b   C          b   C          b   Q           ,   <          b   T       4   b   T       5   b   =           b   =          b   T       6   E   <             =          b   =          7   G   D   N   E   D                    H8                                                        U             X             S             [   b   C       (   E   S           b   <              N   b   C         b   Q          ,   U   E   S           b   <              F   b   C       8   b   T       6   b   <           b   =          N   5   E   N   b   Ct   b   C          b   C       p   b   T       7   b   Q           b   =          F   E   b   S           4   <                8   :       `   b   T       7   b   Q          b   =          F   E   b   S           4   <                N   T       8   b   <          b   =          N   :D   7   N   b   C       @   b   C       (   E   S           b   <              G   D   N   E   D                                                          h      KH                                                        S             _   b   ;       8   b   C       (   E   R          b   3(      N   b   C      (   E   Q           b   M             M      ,   b   C   b   C       T   b   T       4   b   T       9   b   R          b   =          b   =          N   C       T   U   T       6   b   <           b   =          N   N   N   E   b   :          N   U   b   <          ?   C       x   b   <          ?   T       4   b   T       5   b   R          b   =          b   =          B   8   b   :       `   b   C       L   b   T       (   b   >          b   M             i   b   =          N   D   B   H   F   5   N   :   7   N   E   D                                                          x      Nx                                                       S                          _   b   ;       8   b   C       (   E   R          b   3      N   b   C      ,   E   Q           b   M             M      ,   b   C       T   b   T       4   b   T       9   b   R          b   =          b   =          N   E   b   S           b   C       X   b   C       $   E   M             Q   (   N   5   E   N   Q           b   :          E   A              7   N   C          U   C       8   b   T       ,   b   S           b   =          N   5   E   N   U   T       $   b   S           b   T          b   T          b   T           b   Q           b   =          b   =          b   =          b   =          F   5   N   C       ,   b   C          b   S           G   D   N   E   D                  h      Q                                                                     H   b   C          U   E   b   T       -   b   Q           b   =          b   M                   N   b   C          b   Q           G   D   N   C       d   U   E   E   Q           %   <              N   b   C          b   M                 G   D   N   C       0   E   S           b   M             Q      N   b   C          U   E   b   S           4   E   b   T          E   Q              =          b   M             M            F   5   N   b   C       P   E   E   b   S           E   <             &   b   M             O      N   b   C       ,   b   C          b   S           G   D   N   E   D                  X      T                                                         S   b   C          E   Q           L   ,   b   <          E   M             Q   (   T       4   b   T       5   b   =           b   =          E   M             O   (   T       6   b   <           b   =          b   =          7      N   C       ,   b   C          b   Q           G   D   N   E   D                  X      V                                                         S   b   C       l   b   C       T   b   T       :   b   Q           b   >          b   >       <   b   =          G   D   N   E   D                  H      V                                                b   C         b   T       (   b   M                b   M                b   M       (         b   M       (         b   M       (         b   M       "         b   M       &      (   b   M       *      O   b   M       "      z   b   M       "         b   M       $         b   M       "         b   M       (         b   M       (      1   b   M       (      Z   b   M                 b   M                b   M       ,         b   M       ,         b   M       ,         b   M       "      ?   b   M       $      b   b   M       $         b   M       "      ?   b   M       $         b   M                b   M       /         b   M                b   M                b   M                b   M             ;   b   M       !      [   b   M       &      }   b   M       "         b   M                b   M       9         b   M       <         b   M       9      >   b   M       ;      x   b   =       '   N   C           b   C          E   G   D   N   E   D                     h                                                        J             L                    J             L                          Z                                                                                                                             "а            $(            %@            &h            '            +P            -            -            0            2            5            7             8@            98            :            <            A            F            G            J            N             QH            T(            U            V      ΰ      ɰ                                          Ӱ                              ߰                  Ȱ                  Ͱ            Ұ      ְ                                                 
                                                 	                     '              ,              2       
       8              C              G              K              P              T              Y              ^              a              g              l              r              z                     	                                                                                                                                                                                                                                                                                                                         
                                                    "             '             ,             0             4             8             <             A             F                                                           N       x  <             >             ?          @  ?          h % ?            @            @           " @          h  A          x  A           $ B            0 B          @ @ B          P  B           * C            C            D          X 6 D          h # D           
 E           ! F            F            F          `  G          p  G            G            G            H            K            O           
 Q            Q            R          (  R          8 	 R          x  S            S            S           
 T            T          (  T          P ( T          T ! T            U            U            U            U            U          	   W          	  X          	  X          	  X          	  X          	  Y          
  Z          
X  Z          
  Z          
  Z          
  [           # [            [          (  [          h  \           ! \            \           1 \           - \           % \            \          (  \          h  ]             ]           * ]           ' ]            ]            ]          
  ^          
0   ^          
P ' ^          
`  ^          
p  ^          
  _          
 $ _          
  _            _          H  `          p  `           # a           ! a          8 3 a          < / a          H ' a          L   a          x  a            c            c             c            c          ` . c          d * c          p " c          t  c            c            e            e            f            j            l            l          0  m          @ 
 m            n            o            o          @  q          x  r            r            r            r          @  s            s            s            s            t          `  t          d  t            u            u            u          (  u            v            v            v            v          X  w            w            w            w            w          H  x            x            x            x            y          `  y          d  y          p  y            z             z          $  z            {            {            {          8  |            |            |           
 q           % ~          (  ~                                   
           @            D            H                                                            8 
           P                         %            ,                                   p %                                                 8 
                                       
                                     !h            !            !            !            !            "8            "H            "X 
           "x "           "            "            #            #H            #X 
           #            #            # 
           $ 
           $ 
           $$            $            $            $            %             %(            %8            %            %            %            &(            &P            &`            &            '            '            'X            '\            'h            '            '            (             (h            (l            (x            (            (            ( !           )8            )< 
           )@            )P            )`            ) 
           )            )            *8            *<            *@            *x "           *| %           *            *            *            *            *            +             +0 "           +4            +8            +<            +L            +            + 
           +            ,            ,h            ,l            ,            ,            ,            -             -`            -            -            - 
           -            -            .P            . 
           .            .            .            .            /              /h            /l            /p            /            /            /            /            08 
           0`            0d            0            0            1            1P 
           1T            1x            1            1            1            1            1            2`            2p            2            2            2            3            3H            3L            3            3            3            4             4(            4P            4 
           4            4            4            4            5H            5L            5X            5h 
           5            5            6(            6`            6d 
           6 
           6            6            7h           7           7 
          7 
          8( 	          88 
          8           8           8           9            90           9           9           9           :            :$           :p           : 
          :           :           ;8 #          ; $          ; 
$          ; $          ; $          ; $          < %          < 	%          < %          <@  %          <D %          < &          < &          < '          = +          = -          = 	-          > .          > .          >@ /          >x /          >| /          > &/          > /          ?  0          ?@ 1          ?D 1          ?X "1          ? ,1          ? *1          ? "1          ? 1          @8 2          @H 2          @X 2          @ 3          @ 3          @ 3          A  4          A 4          A( 4          A, 4          Ah 5          Ax 6          B8 :          B $<          B <          B <          C /<          C <          Cp ?          C @          D %A          D  A          D A          D 0A          E A          E` C          Ep C          E  D          F  D          F$ D          F@ +D          FX 5D          F\ D          Fx F          F K          G L          G8 L          GH L          Gx !L          G|  L          G L          G L          G L          G M          H8 S          Hh U          H V          H V          H "V          I` W          I W          I X          J X          J0 Y          JP V          J [          J [          J \          KH e          K g          K h          K 
h          L  i          L0 i          Lp j          L 'k          L k          M k          M k          M` l          M l          M m          M k          M 
h          M p          Nx u          N x          N y          N 
y          O@ y          OP y          O z          O -z          O z          O 
y          P8 |          P %}          P }          P }          P }          Q0 ~          Q@           Q           Q           R           R8           Rh           Rx 
          R           R           S@           SD           Sh           Sl           S           S           S           T           T            T           T           T           T           U            U(           UH '          UX           Uh           U           U           V           VP           V`           Vp           V           V           V           Z 	          Z           Z     main prop words T NIL infile trace_set EVAL apply evlis initialize CAR CDR CONS SET ATOM NULL EQ PRINT COND TRACE UNTRACE glist DEFINE define_fn lambda getbs checkbal more balstr bstol ltos strip Map HELP pop put open stop image write writes exit member string type table set insert delete sort read tab bal pos any move many map v f lisp.icn sexpr source -C /C - wtLisp can't open  Reading:  >  l fn arglist arg QUOTE SETQ ITRACEON ITRACEOFF EXIT value fcn Arguments of  value of  list LAMBDA pair COND: ill-formed pair list fn_def fn_list actuals formals def save act form result i tmp    ) ( s c1 c2 cnt blanks  	 ill-formed expression 
 Syntax:
   (quote (a b c))           ==> (A B C)
   (setq a (quote (a b c)))  ==> (A B C)
   (setq b (quote (x y z)))  ==> (X Y Z)
   (car a)                   ==> A
   (cdr a)                   ==> (B C)
   (cons (quote d) a)        ==> (D A B C)
   (eq (car a) (car a))      ==> T
   (atom (quote ()))         ==> T
   (atom a)                  ==> NIL
   (null (car (car a)))      ==> T
   (eval (quote a))          ==> (A B C)
   (print a)                 ==> (A B C)
                                 (A B C)
 Define functions cadr and cddr:
   (define (quote (
           (cadr (lambda (l) (car (cdr l))))
           (cddr (lambda (l) (cdr (cdr l))))
           )))               ==> (CADR CDDR)
   (cadr a)                  ==> B
   (cddr a)                  ==> (C)
   (trace (quote (cadr)))    ==> NIL
   (untrace (quote (cadr)))  ==> NIL
 Is an atom in a list? Uses cond and recursion:
     (has (lambda (atm lis)
       (cond ((null lis) nil)
         ((eq atm (car lis)) t)
         (t (has atm (cdr lis))))
   )) )))                    ==> (HAS)
   (has (quote y) b)         ==> T
   (itraceon)                ==> T [turn on icon tracing]
   (itraceoff)               ==> NIL [turn off icon tracing]
   (help)                    ==> NIL [print help message]
   (exit)                    ==> [exit gracefully from icon] 