計算機科学のブログ

関数型プログラミングの基礎 関数と関数型プログラミング if/then/else、even関数、偶奇の判定

入門Haskellプログラミング (Will Kurt(著)、株式会社クイープ(監修、翻訳)、翔泳社)のUNIT1(関数型プログラミングの基礎)、LESSON2(関数と関数型プログラミング)、2.5(練習問題)Q2-2、Q2-3の解答を求めてみる。

コード

inc :: Int -> Int
inc n = n + 1

double :: Int -> Int
double n = 2 * n

square :: Int -> Int
square n = n * n

f :: Int -> Int
f n =
  if even n
    then n - 2
    else 3 * n + 1

main :: IO ()
main = do
  print "Q2-2"
  print $ inc 2
  print $ double 2
  print $ square 2
  print "Q2-3"
  print $ f 2
  print $ f 3

入出力結果(Terminal, Zsh)

% runghc sample2.hs 
"Q2-2"
3
4
4
"Q2-3"
0
10
%