2016 Update

Task/Knuth-shuffle/Elixir/knuth-shuffle.elixir

@@ -6,18 +6,17 @@ defmodule Knuth do
   end
 
   defp random_move( n, {inputs, acc} ) do
-    item = Enum.at( inputs, :random.uniform(n)-1 )
+    item = Enum.at( inputs, :rand.uniform(n)-1 )
     {List.delete( inputs, item ), [item | acc]}
   end
 end
 
-:random.seed( :os.timestamp )
 seq = Enum.to_list( 0..19 )
 IO.inspect Knuth.shuffle( seq )
 
 seq = [1,2,3]
 Enum.reduce(1..100000, Map.new, fn _,acc ->
   k = Knuth.shuffle(seq)
-  Dict.update(acc, k, 1, &(&1+1))
+  Map.update(acc, k, 1, &(&1+1))
 end)
 |> Enum.each(fn {k,v} -> IO.inspect {k,v} end)