/*
 * The Towers Of Hanoi
 * Yorick
 * Copyright (C) 2003 Amit Singh. All Rights Reserved.
 * http://hanoi.kernelthread.com
 *
 * Last tested under Yorick version 1.4
 * ftp://ftp-icf.llnl.gov/pub/Yorick/yorick-ad.html
 *
 * Usage:
 *
 * % yorick -i hanoi.i
 * > hanoi(3)
 *
 */

func dohanoi(n, f, u, t)
{
    if (n > 0) {
        ret = dohanoi(n - 1, f, t, u)
        ret = write(f, " --> ", t)
        ret = dohanoi(n - 1, u, f, t)
    }

    return
}

func hanoi(n)
{
    if (n > 0) {
        ret = dohanoi(n, 1, 2, 3)
    } else {
        ret = write("usage: hanoi n, n > 0\n")
    }

    return
}