RosettaCodeData/Task/Time-a-function/Erlang/time-a-function-2.erl

3 lines
102 B
Erlang
Raw Permalink Normal View History

2013-04-11 01:07:29 -07:00
9> timer:tc(fun (X) -> lists:foreach(fun(Y) -> Y*Y end, lists:seq(1,X)) end, [1000000]).
{2293844,ok}