Haskell script to find overlapping words between languages