deobfuscate haskell golf a bit