diff --git a/src/Main.hs b/src/Main.hs index 87e3fb9..cd7eb60 100644 --- a/src/Main.hs +++ b/src/Main.hs @@ -206,7 +206,7 @@ main = do let m = head cs let l = take wh $ drop 1 cs let r = take wh $ drop wh $ drop 1 cs - --let s = Space (l ++ (repeat Dead)) m (r ++ (repeat Dead)) + let s = Space (l ++ (repeat Dead)) m (r ++ (repeat Dead)) -- non-random starting position for rule3 (the serpinski triangle) - let s = Space (repeat Dead) Alive (repeat Dead) + --let s = Space (repeat Dead) Alive (repeat Dead) runAutomata s h w