-module(crash). -compile(export_all). go() -> run(10000000000000000). run(0) -> ok; run(N) -> Prout = list_to_atom(integer_to_list(N)), A = erlang:memory(atom), A1 = erlang:memory(atom_used), io:format("A= ~p, AU= ~p~n", [A, A1]), run(N-1).