計算機科学のブログ

Haskell - 型によるプログラミング - Maybe型:欠損値に対処する - Maybeを使った計算

入門Haskellプログラミング (Will Kurt(著)、株式会社クイープ(監修、翻訳)、翔泳社)の UNIT3(型によるプログラミング)、LESSON 19(Maybe型:欠損値に対処する)、19.3(Maybeを使った計算)、Q19-2の解答を求めてみる。

コード

sample2.hs

main :: IO ()
main = do
    print xs
    print $ map numOrZero xs

numOrZero :: Maybe Int -> Int
numOrZero Nothing = 0
numOrZero (Just n) = n

xs :: [Maybe Int]
xs = [Just (-2), Just (-1), Nothing, Just 1, Just 2]

入出力結果(Terminal, Zsh)

% runghc sample2.hs 
[Just (-2),Just (-1),Nothing,Just 1,Just 2]
[-2,-1,0,1,2]
%