Here be terrible Haskell.