catalan numbers in haskell