Redo mutable changes

2021-08-12 01:14:58 +02:00
parent 724f9a86f8
commit f1200c4501
4 changed files with 43 additions and 54 deletions
@@ -54,7 +54,7 @@ followImpulses w (f,g) cr
        (f, cr) 
        (_crImpulse $ _crActionPlan cr)
  where
-    g' = snd $ next g
+    g' = snd $ genWord8 g

 followImpulse
    :: Creature