创建我自己的使用zip、解压缩、fst和list构造的fst实现

Question

我需要从haskell中的列表中获取前n个元素，但我不能使用接受函数。在下面的示例中，我需要替换使用zip、解压缩、fst和list结构的“fst”。我真的很纠结，有什么建议吗？

main = do
    let result = takeFirstN "test" 2
    putStrLn(result)

takeFirstN list nth = do
    take nth list

非常感谢！

Answer 1

睡了一觉，读了你的指点，我找到了一个解决办法。

main =
    do
    print (takeFirstNth "test" 3)

takeFirstNth list nth = fst (unzip (zip list [1..nth]))

谢谢你在正确的方向上的推动:)