(defn squuid-created-at
  "Pull the date back out of a squuid. This will be nonsense if the UUID
passed in was not a squuid!"
  [^java.util.UUID uuid]
  (let [secs (bit-shift-right (.getMostSignificantBits uuid) 32)]
    (java.util.Date. (* secs 1000))))