関数型プログラミングの基礎 再帰関数の記述 リストでの再帰 lengthを実装する パターンマッチング
入門Haskellプログラミング (Will Kurt(著)、株式会社クイープ(監修、翻訳)、翔泳社)のUNIT1(関数型プログラミングの基礎)、LESSON8(再帰関数の記述)、8.2(lengthを実装する)、lengthを実装するのクイックチェック 8-1の解答を求めてみる。
コード
myLength :: Num p => [a] -> p
myLength [] = 0
myLength (_ : xs) = 1 + myLength xs
main :: IO ()
main = do
mapM_ (print . myLength) [[], [1], [-4 .. 5]]
mapM_ (print . myLength) ["", "a", "abcde"]
入出力結果(Terminal, Zsh)
% runghc sample01.hs
0
1
10
0
1
5
%