如何在Haskell中实现++？

嗨,我是Haskell编程的新手.我正在尝试自己实现运算符"++".这是我写的一个小程序,但它不起作用:

append (es:e) xs = 
    if (null es)
    then e:xs
    else append es (e:xs)

我收到了很多关于[a],[[a]]和[[[a]]]的类型错误.关于Haskell中的列表类型仍然令人困惑.有人可以帮助我吗？谢谢.:)