## init.janet
## Config
(defn
  config
  []
  {:deck "52JJ"
   :player_count 4
   :stacks [{:id "trick"
             :label "trick"
             :orientation :up
             :max-size 4
             :alignment :stagger}]
   :info [{:id "north_south" :label "North/South" :value 0}
          {:id "east_west" :label "East/West" :value 0}]})

## Init
(defn-
  make-player
  [id team]
  {:id id :team team})

(defn init
  "Create an initial game state."
  [fst snd thd fth]
  {:players [(make-player fst "north_south")
             (make-player snd "east_west")
             (make-player thd "north_south")
             (make-player fth "east_west")]
   :state {:phase "deal" :info {:north_south 0 :east_west 0}}})