task/BmpDiff.hs