summaryrefslogtreecommitdiff
path: root/src/senate.hs
diff options
context:
space:
mode:
Diffstat (limited to 'src/senate.hs')
-rw-r--r--src/senate.hs28
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
-