(defrecord Car [model])

(def car1 (->Car "Lada"))
(def car2 (->Car "Lada"))
(def car3 car1)

; "=" compares by value, "identical?" compares the reference
(println (= car1 car2))          ; true
(println (identical? car1 car2)) ; false

(println (= car1 car3))          ; true
(println (identical? car1 car3)) ; true