-- | An action to perform if the verbosity is normal or higher, based on 'isNormal'.
whenNormal :: IO () -> IO ()
whenNormal act = do
    b <- isNormal
    when b act

-- | An action to perform if the verbosity is loud, based on 'isLoud'.
whenNormal :: IO () -> IO ()
whenNormal act = do
    b <- isNormal
    when b act

-- | An action to perform if the verbosity is loud, based on 'isLoud'.
whenNormal act = do
    b <- isNormal
    when b act

-- | An action to perform if the verbosity is loud, based on 'isLoud'.