home *** CD-ROM | disk | FTP | other *** search
/ Frozen Fish 1: Amiga / FrozenFish-Apr94.iso / bbs / alib / d1xx / d160 / m4.lha / M4 / hanoi.m4 < prev    next >
Text File  |  1988-10-02  |  189b  |  8 lines

  1. define(hanoi, `trans(A, B, C, $1)')
  2.  
  3. define(moved,`move disk from $1 to $2
  4. ')
  5.  
  6. define(trans, `ifelse($4,1,`moved($1,$2)',
  7.     `trans($1,$3,$2,DECR($4))moved($1,$2)trans($3,$2,$1,DECR($4))')')
  8.