 (ns mars-ogler.scrape
-  (:require [clojure.string :as str]
+  (:require [clojure.set :as set]
+            [clojure.string :as str]
             [clj-time.core :as time]
             [clj-time.coerce :as cvt-time]
             [clj-time.format :as fmt-time]

(defmethod cell->map :camera
  [_ cell]
  (let [abbrev (-> (html/text cell) str/trim)]
    {:cam (cams/cams-by-abbrev abbrev)
     :cam-name (cams/cam-names-by-abbrev abbrev)}))

(defmethod cell->map :delay
  [_ cell]

;;

(def image-attributes
  (set/union #{:w :h :id :url :cam :delay :sol :thumbnail :type} times/types))

(defn classify-size
  [{:keys [w h type] :as image}]
