型の紹介 - 型クラスを使用する - よい派生・悪い派生 - Ordクラス

開発環境

入門Haskellプログラミング (Will Kurt(著)、株式会社クイープ(監修、翻訳)、翔泳社)の UNIT2(型の紹介)、LESSON 14(型クラスを使用する)、14.6(よい派生・悪い派生)、クイックチェック 14-4の解答を求めてみる。

コード

sample4.hs

main :: IO ()
main = do
  print $ S2 < S3
  print $ S5 > S4

data SixSideDie = S1 | S2 | S3 | S4 | S5 | S6 deriving (Eq, Ord)

入出力結果(Terminal, Zsh)

% runghc sample4.hs 
True
True
%