   [value]
   (if (> (count value) 1)
     value
-    (keyword (first value))))
+    (Integer. (first value))))
 
 (defn map-values
   "returns a map of the map (m) with the values mapped over the function (f)"

  (map-values (parse-circuit-data-into-map (str/split (slurp circuit-input) #"\n")) single-values-to-keywords))


(defn find-signal
  "returns the value of signal (keyword) within a circuit (map)"
  [signal circuit]
  (if (keyword? (signal circuit))
    (signal circuit)
    (println "more work to do"))
  )
  [n]
  (- 65535 n))

(defn parse-output-wire [s]
  (last (map str/trim (str/split s #"->"))))

