haskell简单合并

Question

我想实现一个简单的合并，而不使用任何预定义的东西。任何一个人都可以指向正确的方向，我会使用list comp吗？或者可以被判决等？

任何提示欢迎..到目前为止，我得到了

merge:: [a] -> [a] -> [a] 
mergexs [] = xs 
merge [] ys = ys 
merge (x:xs) (y:ys) = 

Answer 1

如果 “合并” 你的意思是 “拼接” 名单在一起，就像下面：

merge "aaaaaaaaa" "bbbbbb" 
>>> "ababababababaaa" 
merge "lunar" "solar" 
>>> "lsuonlaarr" 

你可以说：

merge :: [a] -> [a] -> [a] 
merge xs [] = xs 
merge [] ys = ys 
merge (x:xs) (y:ys) = x:y:merge xs ys  

Answer 2

我想你已经得到了定义，是几乎没有。

merge :: [a] -> [a] -> [a] 

首先你需要让Haskell知道你想要合并的数据是可订购的。

merge :: Ord a => [a] -> [a] -> [a] 
merge xs [] = xs 
merge [] ys = ys 

您在这里定义的条件对我来说看起来很好。合并一个空列表只会导致另一个列表。所以你现在要做的就是定义你想要合并的条件。有三种情况需要考虑。 x小于y，x大于y或者两者相等。

merge (x:xs) (y:ys) | x < y = undefined 
        | x > y = undefined 
        | otherwise = undefined 

我想你会想要使用递归方法。这听起来像你只是想要一个提示而不是直接的答案。只要想想如果你自己合并它们，你会如何手动列出这些列表。

merge [1,2] [3,4]  -- Choose the minimum element and then use merge again 
1 : merge [2] [3,4] -- to get the rest of the list 
1 : 2 : merge [] [3,4] -- Repeat until nothing else to merge 
1 : 2 : 3 : 4