Randomize dealer selection

[bmchrist]

No description provided.

[bmchrist]

@dweinand this feels a bit hack-y -- curious for your thoughts

[dweinand]

We can simplify the logic around order in State with something like:

defp play_order(dealer) do
  {_, order} = Enum.reduce(1..4, {dealer, []}, fn _, {player, order} ->
    next = next_player(player)
    {next, order ++ [next]}
  end)

  order
end

defp next_player(:a), do: :b
defp next_player(:b), do: :c
defp next_player(:c), do: :d
defp next_player(:d), do: :a

We could then add a new function to State to encapsulate the logic of setting initial values:

def new do
  dealer = Enum.random([:a, :b, :c, :d])
  %State{dealer: dealer, play_order: play_order(dealer)}
end

And also update the logic for determining the new dealer to just use next_player directly.