{-# htermination when :: Monad m => Bool -> m () -> m () #-} import Monad
content may be truncated. 'popout' for larger text window.