bitmap vectorizer in haskell