How to write unmaintainable Haskell code