1 files changed, 1 insertions, 1 deletions

diff --git a/trivmix/Trivmix.hs b/trivmix/Trivmix.hs
index 493c964..084da7f 100644
--- a/trivmix/Trivmix.hs
+++ b/trivmix/Trivmix.hs
@@ -128,7 +128,7 @@ trivmix Options{..} = do
       fps = 200
       interval = 0.2
       frames = interval * fps
-      delay = round $ recip fps * 10e6
+      delay = round $ recip fps * 1e6
       linInt x a b = a * (1 - x) + b * x
     newLevel <- readMVar level
     currentLevel <- readMVar level'