From 93a9b586e82b5d113d9140ceac95acabc7d51917 Mon Sep 17 00:00:00 2001
From: Jed Barber <jjbarber@y7mail.com>
Date: Fri, 6 Jan 2017 15:04:20 +1100
Subject: Count results now line up with AEC distribution of preferences

---
 src/main.hs | 6 ++++++
 1 file changed, 6 insertions(+)

(limited to 'src/main.hs')

diff --git a/src/main.hs b/src/main.hs
index ecfec97..99a6681 100644
--- a/src/main.hs
+++ b/src/main.hs
@@ -8,6 +8,11 @@ import qualified Data.Maybe as Maybe
 
 
 
+--  this is all messy test code
+
+
+
+
 --  maps for NT Senate data
 --  will be removed when candidate info parsing complete
 above = [[1,2],[3,4],[5,6],[7,8],[9,10],[11,12],[13,14]]
@@ -42,3 +47,4 @@ main = do
         results = map (\x -> (Sen.doCount theCounter x) >>= (putStrLn . (((snd . head $ x) ++ " ") ++) . show)) testTraces
     sequence_ results
 
+
-- 
cgit