Haskell one-liner that replaced 30 lines — by @winter_lee on VOID | VOID