お次は、Haskell言語版の「Towers of Hanoi」： -- hanoi_v1.1.hs -- Haskell function to compute the Towers of Hanoi problem recursively -- -- Usage: putStr (hanoi_shower (hanoi 1 2 3 n)), or -- putStr (hanoi_shower (hanoi 'a' 'b' 'c' n)), -- …