Fuzzy file finder in Haskell