X-Git-Url: https://mattmccutchen.net/match/match.git/blobdiff_plain/0fad209eedf28273f231ab76addc0272ffe32fc0..7b8c0e4e53d51ee1d3207493738ee9a36e7181d8:/program/CS2MinCostFlow.hs

diff --git a/program/CS2MinCostFlow.hs b/program/CS2MinCostFlow.hs
index 47a73f5..5ce8086 100644
--- a/program/CS2MinCostFlow.hs
+++ b/program/CS2MinCostFlow.hs
@@ -5,7 +5,12 @@ import System.IO.Unsafe
 import Data.Graph.Inductive.Graph
 import Data.Array.IArray
 import Data.List
+
+#if __GLASGOW_HASKELL__ <= 606
+(*) `on` f = \x y -> f x * f y
+#else
 import Data.Function
+#endif
 
 -- Configure the path to cs2.exe relative to the program/ directory here.
 cs2cmd = "./cs2.exe"