diff --git a/examples/example01/Main.hs b/examples/example01/Main.hs index 760de35..419f0f8 100644 --- a/examples/example01/Main.hs +++ b/examples/example01/Main.hs @@ -125,7 +125,6 @@ reloadOnR _ _ = return () reload :: UserData -> Affection () reload ud = do - now <- getElapsedTime randList <- liftIO $ mapM (\_ -> randomRIO (0,1)) [0..3599] let fullMatrix = fromList 60 60 randList void $ liftIO $ swapMVar (lifeMat ud) fullMatrix