June 2018 Update

2018-06-22 20:57:24 +00:00 · 2018-06-22 20:57:24 +00:00 · 22f33d4004
commit 22f33d4004
parent ba8067c3b7
5278 changed files with 84726 additions and 14379 deletions
--- a/Task/Prime-decomposition/Erlang/prime-decomposition.erl
+++ b/Task/Prime-decomposition/Erlang/prime-decomposition.erl
@ -4,6 +4,7 @@ factors(N) ->
     factors(N,2,[]).

 factors(1,_,Acc) -> Acc;
+factors(N,K,Acc) when N < K*K -> [N|Acc];
 factors(N,K,Acc) when N rem K == 0 ->
    factors(N div K,K, [K|Acc]);
 factors(N,K,Acc) ->