計算機科学のブログ

コンテキストでの型の操作 コンテキストとしてのリスト:Applicative型クラスをさらに掘り下げる Applicative型クラス Maybe String型の値の結合、<$>演算子、<*>演算子

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

コード

lesson/app/Main.hs

module Main (main) where

import Lib ()

s1 :: Maybe String
s1 = Just "Hello, "

s2 :: Maybe String
s2 = Just "world!"

main :: IO ()
main = do
  mapM_
    (\(x, y) -> print $ (++) <$> x <*> y)
    [ (s1, s2),
      (s1, Nothing),
      (Nothing, s2),
      (Nothing, Nothing)
    ]

入出力結果(Terminal, Zsh)

% stack exec lesson-exe
Just "Hello, world!"
Nothing
Nothing
Nothing
%