CountdownLoop
countdown :: String -> IO String Source #
countdownLoop: Runs a Pomodoro timer.
>>> result <- countdownLoop noDelay "00:00" ... >>> result "00:00"
>>>
result <- countdownLoop noDelay "00:00"
result
>>> result' <- countdownLoop noDelay "00:59" ... >>> result' "00:00"
result' <- countdownLoop noDelay "00:59"
result'
>>> result'' <- countdownLoop noDelay "01:59" ... >>> result'' "00:00"
result'' <- countdownLoop noDelay "01:59"
result''
countdownLoop :: IO () -> String -> IO String Source #