計算機科学のブログ

コンテキストでの型の操作 コンテキストとしてのリスト:Applicative型クラスをさらに掘り下げる 対応するfmap関数、pure関数、ListとMaybe

入門Haskellプログラミング (Will Kurt(著)、株式会社クイープ(監修、翻訳)、翔泳社)のUNIT5(コンテキストでの型の操作)、LESSON29(コンテキストとしてのリスト:Applicative型クラスをさらに掘り下げる)、29.6(練習問題)Q29-1の解答を求めてみる。

コード

allFmap :: Applicative f => (a -> b) -> f a -> f b
allFmap f x = pure f <*> x

main :: IO ()
main = do
  print $ allFmap (+ 1) [1 .. 3]
  print $ allFmap (+ 1) $ Just 5
  print $ allFmap (+ 1) Nothing

入出力結果(Terminal, Zsh)

% runghc sample1.hs 
[2,3,4]
Just 6
Nothing
%