4 in Haskell
5 in Haskell