yes = Control.Monad.when foo $ do stuff; moreStuff; lastOfTheStuff