diff options
Diffstat (limited to 'src/main.hs')
| -rw-r--r-- | src/main.hs | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/src/main.hs b/src/main.hs index 6e68489..7b08e64 100644 --- a/src/main.hs +++ b/src/main.hs @@ -166,10 +166,10 @@ main = do (aboveBallot, belowBallot) <- Cand.readCandidates candidateFile state counter <- Sen.createSenateCounter preferenceFile aboveBallot belowBallot Dir.createDirectory outputDir - election <- Elt.createElection outputDir counter + election <- Elt.createElection outputDir counter numToElect -- run the show - Elt.doCount election numToElect + Elt.doCount election |