yes = foo (\x -> Just x)