関数型プログラミングの基礎 再帰関数の記述 リスト、パターンマッチングによるreverse関数の独自実装
入門Haskellプログラミング (Will Kurt(著)、株式会社クイープ(監修、翻訳)、翔泳社)のUNIT1(関数型プログラミングの基礎)、LESSON8(再帰関数の記述)、8.5(練習問題)Q8-1の解答を求めてみる。
コード
myReverse [] = []
myReverse (x : xs) = myReverse xs ++ [x]
main :: IO ()
main = do
mapM_ (print . myReverse) [[], [1], [1 .. 5], [5, 1, 4, 2, 3]]
mapM_ (print . myReverse) ["", "a", "abcde", "eadbc"]
入出力結果(Terminal, Zsh)
% runghc sample1.hs
[]
[1]
[5,4,3,2,1]
[3,2,4,1,5]
""
"a"
"edcba"
"cbdae"
%