 (defonce client-channel (chan))
 
 (def ant "⚈")
-(def fruit "♥")
+(def fruit "🍎")
 (def phermone "•")
 (def rock "☗")
 (def color-dirt {0 "#d3b383"

      [1,1] (dom/div (clj->js (merge style {:className "up-right"})) ant))))

(defn show-fruit [cell]
  (dom/div #js {:style #js {:fontSize "25px"
                            :color color-fruit
                            :position "absolute"
                            :top "-5px"
                            :right "3px"}}
           fruit))

(defn show-rock [cell]
  (dom/div #js {:style #js {:color color-rock
                            :fontSize "16px"}} rock))

(defn cell-view [cell _]

  (let [style {:style {:color (if (get-in cell ["Object" "Mine"]) color-my-ant color-their-ant)
                       :position "absolute"
                       :top "0px"
                       :right "3px"}}]
    (condp = (get-in cell ["Object" "Direction"])
      [1,0] (dom/div (clj->js (merge style {:className "right"})) ant)
      [1,-1] (dom/div (clj->js (merge style {:className "down-right"})) ant)
