GPU-accelerate perceptual hashes in Haskell