#!/bin/sh
IXBIN=/usr/local/bin/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]
      

         
  
  
  
  
  h  (  h  pI9.0.00/32           !\(             !\   }                  @V           t          
                     P      U      Y      ]      e      k      q      w      }         b   C   ,   E   T      T      b   =       b      N   C   ,   E   S      E   M            b      N   C   ,   E   S      E   M            b      N   C       E   S      K   b      N   C     U   E   S       T      b   =       b      N   C   S       b   ,   C      E   S      T      T      M         b   =      b   =      b      N   C   ,   T      E   M            b   =      N   C   @   E   S   	   T      E   M            b   =      b      N   E   E   T      S      b   &   S   	   b      :     C  \   E   S      T      T      M         b   =      b   =      b      N   C   ,   T      E   M            b   =      N   C   @   E   S      T      E   M            b   =      b      N   U   S      6   C   D   -   M      k   b      N   F   E   S      S      b      :  0   C      -   M      q   b      N   F   E   S      C   (   T   	   S      b   =      8   :       T   
   M   $      b   =      b      :     C      -   M      w   b      N   F   E   S      C   (   T      S      b   =      8   :   (   T   
   M         S       b   =      b      :      C      -   M      }   b      N   F   E   S      C   (   T   	   S      b   =      8   :   (   T   
   M         S       b   =      b      :   d   C   0   -   M         b      N   F   b   E   :   ,   F   T   
   M         S       b   =      :   (   T   
   M        S       b   =      b   7   N   :   N   C   $   T      M         b   =      N   C      T      b   =       N   C   ,   T      M     ,   S      b   =      N   C   ,   T      M     A   S      b   =      N   C   ,   T      M     P   S      b   =      N   C      T      b   =       N   C   $   T      M     `   b   =      N   C   ,   T      S      M     q   b   =      N   C   $   T      M     }   b   =      N   C      T      b   =       N   C      U   E   S      T   
   T      b   =      b      F   U   T      S      E   T      S      b   &   b   =      N   5   N   E   b   D      <                                       U   b   C     U   E   S       E   Q       b      b      F   U   U   S       6   C   H   -   M        b      N   F   T      M        b   =      :  t   C   H   -   M        b      N   F   T      M        b   =      :  $   C   H   -   M        b      N   F   T      M        b   =      :      C   H   -   M        b      N   F   T      M        b   =      :      F   U   E   E   T      S       b   &   b      N   T      M        S       M        Q      M        S       b   =      N   5   N   C      C      E   b   G   D   N   E   b   D      4  L                                    b   C   8   T      M   
     Q       M     
   b   =      N   C   $   T      M        b   =      N   C   ,   T      Q      M   	  )   b   =      N   C   $   T      M     3   b   =      N   C      U   Q       6   C   H   -   M     ;   b      N   F   T      M     =   b   =      :   T   C   H   -   M     W   b      N   F   T      M     Y   b   =      :      5   N   C   $   T      M   	  s   b   =      N   C   $   T      M     }   b   =      N   C      T      b   =       N   C      C      E   b   G   D   N   E   b   D                            ̰      ԰      ʰ                                         !      &      *      /      4      <      A      F      L                    
      
 "    #  @ 
 $  l  &  x  &    '    (    (    (    )  T  *  `  *    +    +   % -     -    -    .  \  /  h  /    1   ! 1    2   + 2  H  3  T ! 2  |  4   ( 4    5   ! 4    6  L + 6    7   ! 6    8    8    9  $  <  0  '  d 	 A   	 B   	 C   	 D    	 E  @ 	 F  l 	 G    H   	 I   	 J  $  N  0  N  d  O  l  O    Q    S    V    V  	4 
 X  	X  X  	 
 Y  	  Y  	 
 Z  	  Z  
$ 
 [  
H  [  
|  \  
  \  
  ]     a    c  P  e   	 g   	 h    i   	 j  P 
 l  t  l   
 m    m   	 o  
( 	 p  
H 	 q  
l  s  
  umain procs gencode genproc table read tab find move integer stop real write key line sym new keyword value axiom gener angle length replace 4 5 -> 2 0 : 1 *** invalid generation specification *** invalid angle:  *** invalid length:  name *** invalid keyword:  *** invalid specification:  link turtle $define Generations  $define Angle  $define Length  procedure main() Generations end lindcomp.icn arg +       TRight(Angle)	# + -       TLeft(Angle)	# - [       TSave()		# [ ]       TRestore()	# ]        ( )	#  procedure  (gener)    if gener > 0 then { gener - 1       } F    else TDraw(Length)	# F f    else TSkip(Length)	# f    return 