#!/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]
      

   G      0  1  2  3  4  6   C  6@  6hI9.0.00/32    %n%Q   >%ʐ#                @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      Kx   b      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   :4   N   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   Kh   :      Kd   b      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      KH   b      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     4   b   =      N   C   ,   T   /   Q       M      6   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    1P    1            ܰ    Ȱ    l    "`    "    $x    &а    'а    )ذ    ,    /    ʰ    x                      ڰ  Ӱ  Ͱ  ΰ                     	                                    #      )      /      6      =      E      K      T      [      b      j      q      y   
                  	            	      	      
                                    	                                                 "     +     0     8     <     A                                       /  7  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 2 N   ! 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   3 j   - j  0 8 j  8 6 j  @ ' j  L # j  T  j  \  j  p  k    m    p    p    p  
4  r  
P  r  
X  r  
`  r  
  s  
  s  
  s  
   s   3 s   - s  4 8 s  < 6 s  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  0H  G  0T  G  0l  H  0  H  0  H  0  J  0  Kmain 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 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 spiro.icn 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 g  wopen.icn gpxop.icn gpxlib.icn 