string - 如何将新的字符串元素添加到字符串列表中？

Question

在我的作业中，我想编写一个函数，将一个字符串添加到字符串列表中，但我不知道该怎么做。

我以为会是这样的:

AddToLS :: [String] -> String -> [String]
AddToLS ls s = (ls : s)

但是这段代码甚至无法编译。

它应该像这样工作:

AddToLS [] "one" =["one"]
AddToLS ["one"] "two" =["one","two"]
AddToLS ["one","two"] "there" =["one","two","there"]

Answer 1

您想在末尾添加一个字符串类型的元素，因此，您可以将该元素连接到一个列表中并使用现有的 (++) 函数:

(++) :: [a] -> [a] -> [a]

因此，您必须将元素放入列表中，如下所示:

AddToLS ["one", "two"] "three"

将是:

["one", "two"] ++ ["three"]

但是您可以仅为字符串列表定义自己的concat，正如我所看到的，参数被翻转:

AddToLS :: [String] -> String -> [String]
addToLS = flip $ (++) . (:[]) 

这相当于:

AddToLS :: [String] -> String -> [String]
addToLS ss s = ss ++ [s]