16 in haskell