-module(infinity). -export([forever/0]). forever() -> a(0). a(I) -> io:format("~n ~p~n", [I]), b(I+1). b(I) -> c(I+1). c(I) -> a(I+1).