 (def get-pair-value (access/getter pair-value))
 
 ;;;;;; Type properties
+;; When it is stored
 (declare compute-size)
 
 (defn size-op [f]

            [epicea.utils.access :as access] :reload-all))

(spec/def ::unspecified nil?)

(spec/def ::bool boolean?)
(spec/def ::float float?)
(spec/def ::double double?)
(spec/def ::long #(instance? java.lang.Long %))
(spec/def ::int #(or (instance? java.lang.Integer %)
                     (int? %)))

(spec/def ::dynamic (partial = :dynamic))


;; How to specify one:
;; (value [:record :a :number :b double] [3 [4 9]])


(assert (spec/valid? ::number :number))
(assert (spec/valid? ::record [:record 
                               :a :number 
                               :b [:vec nil 3]]))


(def pair-settings {:default-parent [nil nil]})

