18 lines
263 B
Erlang
18 lines
263 B
Erlang
|
%% Implemented by Arjun Sunel
|
||
|
|
-module(forever).
|
||
|
|
-export([main/0, for/0]).
|
||
|
|
|
||
|
|
main() ->
|
||
|
|
for().
|
||
|
|
|
||
|
|
for() ->
|
||
|
|
K = random:uniform(19),
|
||
|
|
io:fwrite( "~p ", [K] ),
|
||
|
|
if K==10 ->
|
||
|
|
ok;
|
||
|
|
true ->
|
||
|
|
M = random:uniform(19),
|
||
|
|
io:format("~p~n",[M]),
|
||
|
|
for()
|
||
|
|
end.
|