       (assoc-in [:board cell :entanglements subcell]
         {:player (:player game)
          :turn (:turn game)
-         :pair pair-cell
+         :pair [pair-cell pair-subcell]
          :focus *speculative*})
       ;; update the entangled spooky mark
       (update-in [:board pair-cell :entanglements pair-subcell] assoc
         :focus *speculative*
-        :pair cell)
+        :pair [cell subcell])
       ;; remove the pair tracker
       (dissoc :pair)
       ;; change the player

   ;; A cell
  {:entanglements {0 {:player 0
                      :turn 0
                      :pair 1
                      :focus false
                      :collapsing true}
                   1 {:player 1
                      :pair 2
                      :turn 1
                      :focus true}}
   :classical {:player 0


(def ^:dynamic *speculative* false)

;; TODO: make hover highlighting work (approach: third top-level activity)
;; TODO: make cycle collapse work

