join

2重のモナドを1重にする

code:hs

join :: Monad m => m (m a) -> m a

join x = x >>= id