#!/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]
      

 G      0  1  2  3  4   6  C  @6  h6  I9.0.00/32  ^  1@   
9L'L<ULLL    D  pX 0        u@         Y@         @         4@                    ?   |         
                                                                         b   C   4   E   T      E   T      <     b      b      N   C   4   E   T      E   T      K   b      b      N   C       E   S       K   b      N   C       E   S      K   b      N   C       E   S      K   xb      N   C       E   S      K   \b      N   C       E   S      K   @b      N   C       E   S      <     b      N   C     U   E   S      T      Q       b   =      b      N   C   U   S      6   C   \   -   C      M        8   :      M        b      N   F   T      b   =       :     C   H   -   M        b      N   F   E   S      M        b      :     C   l   -   M        b      N   F   E   S       T      T      Q       b   =      b   =      b      :   H  C   l   -   M        b      N   F   E   S      T      T      Q       b   =      b   =      b      :     C   l   -   M        b      N   F   E   S      T      T      Q       b   =      b   =      b      :   `  C   l   -   M        b      N   F   E   S      T      T      Q       b   =      b   =      b      :      C   l   -   M        b      N   F   E   S      T      T      Q       b   =      b   =      b      :   x   C   l   -   M        b      N   F   E   S      T       T      Q       b   =      b   =      b      :      5   N   :   4N   C   x   E   T      T      M        E   M        T      b      E   M        T      b      b   =      b      N   C   X   E   T      E   T   !   T      M        b   =      M        b   
   b      N   C      E   T      T      T      T   
   E   T      b      E   T      b      b   =      T   
   T      T      b   =      T      T   
   <       <       b   =      T   
   T      T      b   =      T      b   =      b   =      b      N   C       T   "   T      b   =      N   C      E   S      T      T      T   
   E   T      <      b      E   T      <      b      b   =      <       :   @   F   C   (   U   M        .   8   b   1   5   0   :   2   b   =      b      N   C   @   E   S   	   E   S       S      S      b   A      b      N   C      C   t   E   S      b      N   T      S      T      S   	   T   	   S   	   S      S      S      b   =      :   T   T      S      T   
   S   	   T      S   	   S      S      S      b   =      N   C       T   #   T      b   =      N   C       T   $   T      b   =      N   E   b   D      D   
               #                       b   ;   @   C   8   E   R       E   <      b   >   ,   b      b      N   C   \   E   S       E   E   Q      <      b   &   E   Q      <      b   &   b      b      N   C      C      E   E   S       T   %   E   R       Q       b      b   =      b      E   E   Q      <      b   &   T   %   E   E   R       E   S       Q       b      b      E   Q      <      b   &   b      b   =      b      b      b   G   D   N   E   b   D      D                 )                       b   ;   @   C   8   E   R      E   <      b   >   ,   b      b      N   C   \   E   S       E   E   Q      <      b   &   E   Q      <      b   &   b      b      N   C      C      E   E   S       T   &   E   R      Q       b      b   =      b      E   E   Q      <      b   &   T   &   E   E   R      E   S       Q       b      b      E   Q      <      b   &   b      b   =      b      b      b   G   D   N   E   b   D      D                 /                       b   ;   @   C   8   E   R      E   <      b   >   ,   b      b      N   C   \   E   S       E   E   Q      <      b   &   E   Q      <      b   &   b      b      N   C      C      E   E   S       T   %   E   R      Q       b      b   =      b      E   E   Q      <      b   &   T   %   E   E   R      E   S       Q       b      b      E   Q      <      b   &   b      b   =      b      b      b   G   D   N   E   b   D      D                 6                       b   ;   @   C   8   E   R      E   <      b   >   ,   b      b      N   C   \   E   S       E   E   Q      <      b   &   E   Q      <      b   &   b      b      N   C      C      E   E   S       T   &   E   R      Q       b      b   =      b      E   E   Q      <      b   &   T   &   E   E   R      E   S       Q       b      b      E   Q      <      b   &   b      b   =      b      b      b   G   D   N   E   b   D      $                       =   b   C   $   T   '   M   ?   
  b   =      N   C      T   '   b   =       N   C   $   T   '   M      J  b   =      N   C   $   T   '   M   -   Q  b   =      N   C   $   T   '   M   #     b   =      N   C   $   T   '   M   9     b   =      N   C   $   T   '   M   *     b   =      N   C   $   T   '   M   8     b   =      N   C   $   T   '   M   )   A  b   =      N   C   $   T   '   M   /   k  b   =      N   C      T   (   b   =       N   E   b   D      4                   b              b   C   <   U   E   E   Q      b   %   <      b      N   b   D   N   C      C      T   +   E   E   E   E   Q       b   9      b   9      b   A      T      Q      E   E   Q       b   9      <      b   &   b   =      b   	   Y   b   G   D   N   E   b   D      <                     j                  b   C   4   E   S       T   ,   Q       b   =      b      N   C   L   U   E   E   S       b      T   ,   Q      b   =      b      F   5   N   C       C      S       b   G   D   N   E   b   D            ?              L   (                  q                            b   C   <   E   S       T      Q       Q      b   =      b      N   C     U   E   S      E   <      Q       I   b   )   b      F   U   U   E   S      E   <      Q      I   b   )   b      F   U   E   E   E   S       S      b   &   S      b   &   C   0   E   S      S      b      N   K   h:      K   db      N   5   N   5   N   C       C      S       b   G   D   N   E   b   D                 \   $                  y                                      b   C      U   E   E   S      E   E   Q       <      b   &   b   %   b      E   Q      b   %   b      N   T   (   M   #     b   =      N   C   h   E   S       T      E   Q       b   %   E   E   Q      <      b   &   b   %   b   =      b      N   C     U   E   S      E   <      E   Q       b   %   I   b   )   b      F   U   U   E   S      E   <      E   E   Q      <      b   &   b   %   I   b   )   b      F   U   C   H   E   E   E   S       S      b   &   S      b   &   K   b      N   U   E   S      E   <      S      I   b   )   b      F   U   E   E   E   S       S      b   &   S      b   &   4   E   E   E   Q       S      b   &   S      b   &   E   E   Q      S      b   &   S      b   &   b      b         N   5   N   5   N   5   N   C       C      S       b   G   D   N   E   b   D      l                  
               W     Z     ]                           b   C     U   E   Q      b      N   C   ,   E   Q      T      b   =       b      N   C   H   E   E   Q      b   9      E   <       <       b   A      b      N   C      E   E   Q      b   9      E   T   -   T   !   Q       M        b   =      b   =      T   -   T   !   Q       M        b   =      b   =      b   A      b      N   E   E   Q      b   9      Q       b      N   C      E   S       E   T      E   E   E   Q      b   9      <      b   &   E   E   Q      b   9      <      b   &   b      b   =      E   E   Q      <      b   &   E   Q      <      b   &   b      b      b      N   C      E   S      E   T      E   E   E   Q      b   9      <      b   &   E   E   Q      b   9      <      b   &   b      b   =      E   E   Q      <      b   &   E   Q      <      b   &   b      b      b      N   C      E   S      E   T      E   E   Q      b   9      <      b   &   b   =      E   E   Q      <      b   &   S       b      b      b      N   C      E   S      E   T      E   E   Q      b   9      <      b   &   b   =      E   E   Q      <      b   &   S      b      b      b      N   C      E   S      E   T      T      S       S      b   =      T      S      S      b   =      b   =      b   A      b      N   C   L   C   <   T      Q      Q      Q      S      b   =      b   G   D   N   E   b   D      4   "                                b   C   D   C   4   E   E   Q       b   9   
   Q      b      b   G   D   N   E   b   D      4   $#                                b   C      T   *   E   E   E   Q       b   9   	   b   9      b   9      E   E   E   E   Q       b   9      b      b   /   b      b   =      N   C   P   T      E   Q       b   9   	   E   Q       b   9   
   Q      b   =      N   C   D   C   4   E   E   Q       b   9   
   Q      b      b   G   D   N   E   b   D            ?   D   $               	                          b   C      U   T   .   E   E   S       E   E   b   A       b   A      b      <      b   &   C       E   Q       b      8   :      K    b   =      F   5   N   C   <   E   S       T      S       Q      b   =      b      N   C   4   E   Q       T   )   Q       b   =      b      N   C      U   E   S      E   <      E   Q       b   %   I   b   )   b      F   U   E   E   Q       S      b   &   E   E   S       <      b   &   S      b   &   b      N   5   N   C       C      Q       b   G   D   N   E   b   D      <   '                                    b   C      U   T   .   E   S       E   b   A       b      E   T      E   Q       b      Q      b   =      b      b   =      F   5   N   C       C      S       b   G   D   N   E   b   D      D   (               	         F     H     $       b   C      E   S       C   D   E   Q      b      N   T      <      <      b   =      :   $   T      <      <      b   =      b      N   C   H   E   E   E   S       <      b   &   <      b   &   Q       b      N   C   H   E   E   E   S       <      b   &   <      b   &   Q      b      N   C   T   E   E   E   S       <      b   &   <      b   &   E   Q      b      b      N   C       C      S       b   G   D   N   E   b   D      D   *               	         F     H     $       b   C      E   S       C   D   E   Q      b      N   T      <      <      b   =      :   $   T      <      <      b   =      b      N   C   T   E   E   E   S       E   S       b   %   b   &   <      b   &   Q       b      N   C   T   E   E   E   S       E   S       b   %   b   &   <      b   &   Q      b      N   C   `   E   E   E   S       E   S       b   %   b   &   <      b   &   E   Q      b      b      N   C       C      S       b   G   D   N   E   b   D                       ?   t   ,               
              F     &     H     )                    ,     1  b   C   ,   E   E   Q      b      K   Hb      N   C   ,   E   E   Q      b      K    b      N   C   ,   E   E   Q      b      <     b      N   C   \   E   S       E   E   Q      Q      b      E   Q      <      b      b      b      N   C       E   S      Q      b      N   C      T      Q       T   
   Q      E   E   S      b   A      Q      b   	   Y   Q      E   E   S      b   A      Q      b   	   Y   b   =      b   =      N   C     U   E   <      E   Q      <      b      I   b   )   F   U   C   (   E   S      4   S       b         N   T      Q       T   
   Q      E   E   S      b   A      Q      b   	   Y   Q      E   E   S      b   A      Q      b   	   Y   b   =      b   =      N   5   N   E   b   D      ,   /                        b   C   ,   T   /   Q       M      >  b   =      N   C   ,   T   /   Q       M       @  b   =      N   C      C   d   E   b   >   >   b      N   C   4   E   b   >   >   T   0   Q       Y   b      b   G   D   :   (   C      T   0   Q       Y   b   G   D   N   E   b   D         4                   E      F     H     <                   K      J     M     P     D                   T      W     Z     ]  	   `     D                   [            j  	   n     x                                                F     H     J     M     P     W     Z     ]  	   `           j  	   n     x    H                                                      p
    t    x    |        0    1    P1    1                    l    `"    "    x$    &    '    )    ,    /          y                                              	                                    #      )      /      6      =      E      K      T      [      b      j      q      y   
                  	            	      	      
                                    	                                                  "     +     0     8     <     A                                  ~      /  4  0  A  0  K     2     5     5 
 0  6  8  6  `  8    9    :    ;     <  (  =  \  ?  h  ?    A    A !   B  0  B  X  C    C    C    C    D     D    D    D  @  E  t  E    E    E    F    F     F     F  (  G  \  G   h  G  t  G    H    H "   H    H  L  L . l  L ? t  L    L 	   M    M $   M 
 $  N % 8  N ( @  N $ d  N 2   O !   O -   O    N    N    Q  T  S   p  S % x  S    S -   S    S  $	  W  0	  W  X	  Y  	  Z  
  \  0
  ` 
 X
  a 
 l
  b  
  d  
  g  
  g  
  g  0  i  L  i  T  i  \  i    j    j    j    j     j 3   j - 0  j 8 8  j 6 @  j ' L  j # T  j  \  j  p  k    m    p    p    p  4
  r  P
  r  X
  r  `
  r  
  s  
  s  
  s  
  s     s 3   s - 4  s 8 <  s 6 D  s ' P  s # X  s  `  s  t  t    v    y    y     y  8  {  T  {  \  {  d  {    |    |    |    | !   | 4   | . 8  | 9 @  | 7 H  | ( T  | $ \  |  d  |  x  }                  <    X    `    h                   !    4     . <   9 D   7 L   ( X   $ `    h    |           	    	    	 @   	 l   	    	    	    	    	 H   	 h    |      8   :   :
   : 0  < <  < H  < t  <>   <H   <7   <$   <   =    s (  v
 4  v \  w
 t  w   w
   y   z ,  | \   h                  (   L   p         (   `   h   p           &                 \   h   p                     $   X   `                  (   +   $    T   h             ,  
 P  	 p   |  
   	          ?   7 (   4  
 P  	 d              "         , 4  2 <  / D  ' L              "           ,    2 $   / ,   ' 4    p               !    $         !    !   (!   L!  ! \!  $ d!   l!   !   !  9 !   !   !  	 <"   H"   \"   "   "   "   "   "   (#   P#   \#   h#   #   #   #   #   #   #  
 #   $   8$   L$   T$   h$   $   $   $   %   %   4%    P%  
 %   %   %  
 %   &   $&   ,&   T&   t&   &   &   &   &   '   8'   D'   d'  ( t'  ' '   '  
 '   '   (   D(   h(   (   (   (   (   (    )   0)   @)   p)   )   )   )   )   )    *   L*   p*   *   *   *   *   *  	 +  
 8+   @+   P+  	 `+  
 +   +   +  	 +   +  
 +    ,   ,   ,   ,   ,  	 ,  	 -  
 (-  
 `-   |-   -   -  	 -   -   .   0.  ' D.  + P.   \.  
 .   .   .  
 /   (/   L/  * `/  . l/   x/  
 /   /  D  /  E  $0  F  H0  G  T0  G  l0  H  0  H  0  H  0  J  0  K  main win mono h w Window XMAX YMAX epi_x epi_y hypo_x hypo_y helpmsg point viewport window turtle DrwLine newmat Imatrix mmult set_window moveto lineto transform transform_points set_scale set_trans draw_curve WOpen get real integer WAttrib EraseArea Event close cos sin write stop copy Fg DrawLine list numeric put push open x y ul lr screen ll ur vp xform_mat pos direction color spiro.icn args a b k t1 t2 N arg use_epi t alist -help -h -epi yes -a -b -k -t1 -t2 -N label=Spirograph width= height= depth 1 red twopi ab Usage: Spiro [-a r] [-b r] [-k r] [-t1 r] [-t2 r] [-N n] [-epi] where: 	-a r	- radius of center circle {default 100} 	-b r	- radius of moving circle {5} 	-k r	- distance of pen from center of moving circle {20} 	-t1 r	- initial value for parameter {0.0} 	-t2 r	- final value for parameter {1.0 (one revolutio)} 	-N n	- number of intervals to draw {500} 	-epi	- use epitrochoid instead of hypotrochoid glib.icn pnts n m M r c m1 m2 m3 nk Matrices are wrong size to multiply x_scale y_scale x_trans y_trans xfrm width height p pl i xformed z xa ya incr t0 wopen.icn g  gpxop.icn gpxlib.icn 