型の紹介 型クラスを使用する Showを実装する instanceとwhere
入門Haskellプログラミング (Will Kurt(著)、株式会社クイープ(監修、翻訳)、翔泳社)のUNIT2(型の紹介)、LESSON14(型クラスを使用する)、14.2(Showを実装する)、クイックチェック14-1の解答を求めてみる。
コード
data SixSideDie = S1 | S2 | S3 | S4 | S5 | S6
instance Show SixSideDie where
show S1 = "I"
show S2 = "Ⅱ"
show S3 = "Ⅲ"
show S4 = "Ⅳ"
show S5 = "Ⅴ"
show S6 = "Ⅵ"
main :: IO ()
main = do
mapM_ print [S1, S2, S3, S4, S5, S6]
入出力結果(Terminal, Zsh)
% runghc sample01.hs
I
Ⅱ
Ⅲ
Ⅳ
Ⅴ
Ⅵ
%