Simple implementation of precedence climbing in Haskell