Floyd-Warshall algorithm in Haskell + some tests.