Use liftM2 instead of named variables in a do block.