Haskell - コンテキストでの型の操作 - コンテキストとしてのリスト:Applicative型クラスをさらに掘り下げる - 汎用パージョンのfmap関数, pure関数, <*>演算子
入門Haskellプログラミング (Will Kurt(著)、株式会社クイープ(監修、翻訳)、翔泳社)の UNIT5(コンテキストでの型の操作)、LESSON 29(コンテキストとしてのリスト:Applicative型クラスをさらに掘り下げる)、29.5(練習問題)、Q29-1の解答を求めてみる。
コード
sample.hs
main :: IO ()
main = do
print $ allFmap (+ 1) [1 .. 3]
print $ allFmap (+ 1) (Just 5)
print $ allFmap (+ 1) Nothing
allFmap :: Applicative f => (a -> b) -> f a -> f b
allFmap func x = pure func <*> x
入出力結果(Terminal, Zsh)
% runghc sample.hs
[2,3,4]
Just 6
Nothing
%