-define(INTERVAL, 100).
--record(state, {x :: non_neg_integer()
- ,y :: non_neg_integer()
- ,n :: non_neg_integer()
- ,bar :: string()
- ,board=array:new() :: array()
- ,gen_count :: non_neg_integer()
- ,gen_duration :: non_neg_integer()
- ,print_time :: non_neg_integer()
+-record(state, {x :: non_neg_integer()
+ ,y :: non_neg_integer()
+ ,n :: non_neg_integer()
+ ,bar :: string()
+ ,board :: array()
+ ,gen_count :: non_neg_integer()
+ ,gen_duration :: non_neg_integer()
+ ,print_time :: non_neg_integer()
}).
,n = X * Y
,bar = [?CHAR_BAR || _ <- lists:seq(1, X)]
,board = Board
- ,gen_count = 1
+ ,gen_count = 1 % Consider inital state to be generation 1
,gen_duration = Time
- ,print_time = 0
+ ,print_time = 0 % There was no print time yet
},
life_loop(State).