Skip to content

HTTPS clone URL

Subversion checkout URL

You can clone with HTTPS or Subversion.

Download ZIP
Browse files

make fibonacchi function default main

  • Loading branch information...
commit 24d492acbc3ff1d0059afcfb7c1890e9f062fa16 1 parent 9a3f61b
@krestenkrab krestenkrab authored
Showing with 2 additions and 2 deletions.
  1. +2 −2 src/main/erl/fib.erl
View
4 src/main/erl/fib.erl
@@ -54,11 +54,11 @@ makeList(N) -> [N,makeList(N-1)].
runLength(_,N) when N==0 -> done;
runLength(L,N) -> tlength(L), runLength(L,N-1).
-main() ->
+main2() ->
List = makeList(2000),
io:format("time=~w~n", [timer:tc(fib,runLength,[List,1000000])]).
-main2() ->
+main() ->
time(fibo3,10),
time(fibo3,100),
time(fibo3,1000),
Please sign in to comment.
Something went wrong with that request. Please try again.