cards.ex

defrecord Card, suit: nil, rank: nil

defmodule Cards do
  def create do
    lc suit inlist [:H, :D, :C, :S],
       rank inlist [:A, 2, 3, 4, 5, 6, 7, 8, 9, 10, :J, :Q, :K] do
      Card.new suit: suit, rank: rank, points: score(rank)
    end
  end

  def score(rank) when is_number(rank), do: rank
  def score(:A), do: 1
  def score(_), do: 10
end