Make proposal-matcher configuration non-global to make it more practical to

[match/match.git] / program / Instance.hs

diff --git a/program/Instance.hs b/program/Instance.hs
index 384666f..145a8f3 100644 (file)
--- a/program/Instance.hs
+++ b/program/Instance.hs
@@ -1,10 +1,12 @@
-module Instance (module Instance, Wt) where
-import ProposalMatcherConfig (Wt)
+module Instance where
 import Data.Array.IArray
 import Data.Array.Unboxed
 import ArrayStuff
 import Formatter
 
+type Wt = Double -- Can be any RealFrac.
+numAsWt x = fromInteger (toInteger x)
+
 data Instance = Instance
        Int                 -- numReviewers
        Int                 -- numProposals