[Haskell-cafe] accurately scheduling events