Lots of more haskell-y chaining