SML如何减去2个列表并比较产品？

Question

我正在尝试减去2个列表，并返回比较的产品。

因此，如果列表a=2，3，2b= 1, 1 ,1，那么a-b = 1,2,1，并且返回的乘积(c)应该是1。

val c = List.map (fn i => (i - b) mod 10) a

模( mod ) 10用于两个减去的数字产生奇数结果的情况，例如2-8 = ~6 mod 10 = 4。

我陷入了减法，因为List.map不允许我做减法，因为它需要一个int值，而不是int列表(至少不是我编写它的方式:( )。

我对比较也是一片空白。

Answer 1

您可以使用ListPair.map一次遍历两个列表，如下所示：

val c = ListPair.map (fn (i, j) => (i - j) mod 10) (a,b)

Answer 2

你不会想要减去b -你想要减去相应的值。要做到这一点，一个方便的方法是将列表压缩在一起：

val c = List.map (fn (i, j) => (i - j) mod 10) (ListPair.zip (a, b))