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