相关疑难解决方法(0)

我创建了一个函数m，这样

m "abc" "def" == "bcd" 

我想创建另一个函数，用于在给定输入时m生成输出["bcd","efg","hia"]["abc","def","ghi"]

的定义m是

m :: [a] -> [a] -> [a]
m str1 str2 = (drop 1 str1) ++ (take 1 str2)

可能重复:
如何在Haskell中获取无限列表的每个第N个元素？

简单的任务 - 我们有一个列表,并希望只留下该列表中的每个第n个元素.在haskell中最常用的方法是什么？

脱离我的头顶是这样的:

dr n [] = []
dr n (x : xs) = x : (dr n $ drop n xs)

但我有一种强烈的感觉,我对这个问题过于复杂.