                              :background-size "contain"
                              :background-image (str "url(images/cardart/" (name (:face c)) ".png)")
                              :border-width "2px"}}]) cards)]])
+
+
 
 (defn player-one-area [player-info phase active-player?]
   (let [player-info (subscribe [:player-info 1])

           [:div.col-md-4.col-sm-4.col-xs-4
            [card-display]]]]])))

(defn- card-spread [cards]
  (map-indexed
   (fn [i c]
     ^{:key (str i (:face c))}
     [:div.discarded-card
      {:style {:position "absolute"
               :left (str (* 30 i) "px")
               :width "65px"
               :height "85px"
               :border-radius "5px"
               :border-color "black"
               :border-style "solid"
               :background-size "contain"
               :background-image (str "url(images/cardart/" (name (:face c)) ".png)")
               :border-width "2px"}}]) cards))

(defn discard-pile [cards]
  [:div
   [:div {:style {:position "relative"
                  :height "120px"
                  :width  "425px"
                  :background-color "darkgray"}}
    (map-indexed (fn [i c]
                   ^{:key (str i (:face c))}
                   [:div.discarded-card

       [:div#discard-pile {:style {:position "absolute" :left "35%" :bottom "60%"}}
        [discard-pile @discarded-cards]]

       [:div#player-display {:style {:position "absolute" :left "80%" :top "20%"}}
        [player-display @current-player-id @players]
        ]

       [:div#player-controls
        [:div (menu-box-style "0%")
         (if (= 1 @current-player-id)
