{-# htermination (=<<) :: (a -> IO b) -> IO a -> IO b #-}
content may be truncated. 'popout' for larger text window.