added a Monad instance for Concurrently