計算機科学のブログ

関数型プログラミングの基礎 - 再帰関数の記述 - length関数

入門Haskellプログラミング (Will Kurt(著)、株式会社クイープ(監修、翻訳)、翔泳社)の UNIT1(関数型プログラミングの基礎)、LESSON 8(再帰関数の記述)、8.2(リストでの再帰)、クイックチェック 8-1の解答を求めてみる。

コード

sample1.hs

main :: IO ()
main = do
  print $ myLength []
  print $ myLength [1]
  print $ myLength [1 .. 10]
  print $ myLength ""
  print $ myLength "a"
  print $ myLength "abcde"

myLength :: Num a1 => [a2] -> a1
myLength [] = 0
myLength (x:xs) = 1 + myLength xs

入出力結果(Terminal, Zsh)

% runghc sample1.hs 
0
1
10
0
1
5
%