+ life_loop(NewState).
+
+
+do_print_screen(Board, Bar, X, Y, N, GenCount, Time, PrintTime) ->
+ ok = do_print_status(Bar, X, Y, N, GenCount, Time, PrintTime),
+ ok = do_print_board(Board).
+
+
+do_print_status(Bar, X, Y, N, GenCount, TimeMic, PrintTimeMic) ->
+ TimeSec = TimeMic / 1000000,
+ PrintTimeSec = PrintTimeMic / 1000000,
+ ok = io:format("~s~n", [Bar]),
+ ok = io:format(
+ "X: ~b Y: ~b CELLS: ~b GENERATION: ~b DURATION: ~f PRINT TIME: ~f~n",
+ [X, Y, N, GenCount, TimeSec, PrintTimeSec]
+ ),
+ ok = io:format("~s~n", [Bar]).