haskellでdataの設定で型を増やしたとき、返り値の前に来る文字を消したい

Question

haskellで入れた数値によって種類が違う型の出力を返す関数を作りたいと考えて下記のコードを作成しました。

data Test
  = Int Int
  | Intlist [Int]
  deriving (Show, Read, Eq, Ord)

test :: Int->Test
test x
 |x==1=Int 3
 |x==2=Intlist [1]

main = do
      let hoge = test 1
      print(hoge)
      let hoge2= test 2
      print(hoge2)

mainを実行したとき
-- >>> main
-- Int 3
-- Intlist [1]
となります。
このIntとIntlistという文字を消す方法がわかりません。
教えてください。

Answer 1

こんにちは。

deriving Show を使うのをやめて、手作業で Show Test のインスタンスを書いてください。
deriving Show だとどんなデータ型にも適用できる最も一般的な文字列化ロジックを採用しているわけですが、それが仕様にマッチしないのなら使ってはいけないのです。

Comments

[退会済みユーザー]

ありがとうございます