pointfree as Haskell formatprg