hls-tactics-plugin-1.2.0.0: test/golden/FmapJoin.expected.hs

fJoin :: (Monad m, Monad f) => f (m (m a)) -> f (m a)
fJoin = fmap (\ m -> m >>= id)