[Haskell-cafe] Best way to write endsWith

[John Ky]

Hello,

I have this function here:

> endsWith :: Eq a => [a] -> [a] -> Bool
> endsWith suffix list
>   | lengthDifference < 0 = False
>   | otherwise = (drop lengthDifference list) == suffix
>   where lengthDifference = (length list) - (length suffix)

Would this be the preferred function argument order?  Or is the reverse (ie.
endsWith list suffix) better?

I like being able to say "abc" `endsWith` "c", but I also like to be able to
say map (endsWith 't') ["cat", dog"] but I can't have both.

By the way, is there a better way to write this function to be clearer and
more efficient?

Thanks

-John
-------------- next part --------------
An HTML attachment was scrubbed...
URL: http://www.haskell.org/pipermail/haskell-cafe/attachments/20061022/2e7c2078/attachment.htm