想要添加到 Haskell 中的数据类型

Question

嗨，我有一个数据类型是

data MyIntStr = MyIntStr { intList :: IntList, strList :: StrInt}
type IntList = [[Int]]
type StrList = [[String]]

我想在MyData 的intList 和strList 中添加一些东西。所以我传递了一个空的默认数据，然后尝试将 Ints 添加到Intlist：

putInts :: [Int] -> MyIntStr -> MyIntStr
putInts (h:t) d
    |length t /= 0 = putInts t (intList:h)
    |otherwise intList:h

这给出了错误任何想法如何做到这一点？

Answer 1

只是以一些建设性的帮助（或者我希望如此）来结束这件事，这里有一个版本应该可以满足您的期望：

type IntList = [Int]
type StrList = [String]

data MyIntStr = MyIntStr { intList :: IntList, strList :: StrList }
              deriving Show

empty :: MyIntStr
empty = MyIntStr [] []

putInts :: [Int] -> MyIntStr -> MyIntStr
putInts is (MyIntStr is' ss) = MyIntStr (is'++is) ss

这是一个例子：

λ> putInts [1,2,3] empty
MyIntStr {intList = [1,2,3], strList = []}

---

我做了什么：

• 添加了deriving Show，这样我就可以看到我的示例了；）
• 将StrInt 更改为StrList，因为你显然是故意的
• 添加了empty，以便我可以测试
• 使用模式匹配重写 putInts 和 ++ 以连接您的 [Int] 列表