Even as simple as
fac 1 = 1
fac n = n * (fac (n - 1))
I mean, in Scheme it is longer to write. I enjoy Lisps and use Emacs for everything, but Haskell can be as terse, or even more terse. (Which is not always a good thing.)
I think in terms of token count it comes out to about the same; and Lisp admits fewer kinds of tokens.