diff options
| author | Jed Barber <jjbarber@y7mail.com> | 2017-01-06 00:11:00 +1100 |
|---|---|---|
| committer | Jed Barber <jjbarber@y7mail.com> | 2017-01-06 00:11:00 +1100 |
| commit | ed35d03fbdafce4d6d41d8731318304a8eb7ff61 (patch) | |
| tree | 42a8fa732ae779a71db2561c93f63979cc4a5fe6 /src/senate.hs | |
| parent | a13d9db820d7cb83e9472e2cf387eb22c26d402d (diff) | |
Ballot counting working, but results differ slightly from AEC counts
Diffstat (limited to 'src/senate.hs')
| -rw-r--r-- | src/senate.hs | 28 |
1 files changed, 0 insertions, 28 deletions
diff --git a/src/senate.hs b/src/senate.hs deleted file mode 100644 index 8f24d88..0000000 --- a/src/senate.hs +++ /dev/null @@ -1,28 +0,0 @@ -module Senate( - SenateCounter, - createSenateCounter, - doCount - ) where - - - -import qualified System.IO as IO -import qualified SenateTypes as STY -import qualified CSV as CSV - - - -data SenateCounter = SenateCounter { inputData : IO.FilePath - , upperMap : STY.UpperMap - , lowerMap : STY.LowerMap } - - - -createSenateCounter :: IO.FilePath -> STY.UpperMap -> STY.LowerMap -> SenateCounter -createSenateCounter = SenateCounter --- use this function to errorcheck the input data - - - -doCount :: SenateCounter -> STY.Trace -> Int - |