X-Git-Url: https://mattmccutchen.net/match/match.git/blobdiff_plain/bc14b3b3a9345cb74bc7d8f3808a1d8cdd0bf479..35ce78e3b164a71da6177f0577b598a12198d237:/program/PMConfig.hs

diff --git a/program/PMConfig.hs b/program/PMConfig.hs
index 20a380f..d88f3d4 100644
--- a/program/PMConfig.hs
+++ b/program/PMConfig.hs
@@ -3,6 +3,12 @@ module PMConfig where
 import PMInstance
 import IMinCostFlow
 
+-- A PMConfig structure has a bunch of configuration values used by
+-- many functions in PMInstanceGenerator, ProposalMatcher, and Evaluation, which
+-- take a PMConfig as their first argument.  Module PMDefaults defines a sane
+-- default configuration `pmDefaults'; it can be used as-is or individual fields
+-- can be overridden, e.g., pmDefaults{loadTolerance = 2} .  See module
+-- PMDefaults for documentation of each field.
 data PMConfig = PMConfig {
 	minCostFlow :: MinCostFlowImpl,
 	reviewsEachProposal :: Int,
@@ -17,5 +23,8 @@ data PMConfig = PMConfig {
 	marginalVeryBoringCost :: Wt -> Wt,
 	assignmentCost :: Wt -> Wt,
 	knowledgeableBonus :: Wt,
-	expertBonus :: Wt
+	expertBonus :: Wt,
+	numTopics :: Int,
+	topicZipfExponent :: Wt,
+	reviewEvalWeights :: [Wt]
 }