Bozor in haskell