Algoritmo de diferença eficiente em Haskell
