yes = foo . bar . concatMap f . baz . bar