An attempt to implement preferential voting (as done by the AEC) using Haskell.