Implementation of TSP heuristic called farthest insert in Haskell