               :default (fn [_] (utils/timestamp))}
    :modified {:prop (:modified dcterms)
               :validate [(v/number) (v/pos)]
-              :init (fn [{:keys [modified]}]
-                      (if (coll? modified)
-                        (last (sort modified))
-                        modified))
-              :default (fn [_] (utils/timestamp))}
+              :default (fn [_] [(utils/timestamp)])
+              :card :*
+              :order :asc}
    :repo     {:prop (:isPartOf dcterms)
               :validate [(v/uuid4)]
               :init (pick-id :repo)}
    :rights   {:prop (:accessRights dcterms)
-              :init (pick-id-coll :rights)
               :default (fn [_] [])
               :validate {:* [(v/uuid4)]}
               :card :*}
    :media    {:prop (:hasPart dcterms)
-              :init (pick-id-coll :media)
-              :default (fn [_] [])
               :validate {:* [(v/uuid4)]}
               :optional true
               :card :*}
    :presets  {:prop (:usesPreset imago)
-              :init (pick-id-coll :presets)
-              :default (fn [_] [])
-              :validate {:* [(v/uuid4)]}
+              :validate [(v/uuid4)]
               :card :*}})
 
 (defentity RightsStatement (:RightsStatement dctypes)

(defentity ImageVersionPreset (:ImageVersionPreset imago)
  {:title    {:prop (:title dcterms)
              :validate [(v/string)]
              :default (fn [{:keys [width height]}] (str width "x" height))}
   :restrict {:prop (:restrict imago)
              :validate {:* [(v/string)]}
              :default (fn [_] ["image/png" "image/jpeg"])}
   :width    {:prop (:width imago)
              :validate [(v/number) (v/pos)]
              :optional true}

                  :validate [(v/number) (v/pos)]
                  :default (fn [_] (utils/timestamp))}
   :colls        {:prop (:isPartOf dcterms)
                  :validate [(v/uuid4)]
                  :card :*}
   :versions     {:prop (:hasVersion dcterms)
                  :validate [(v/uuid4)]
                  :card :*
                  :optional true}})

(defentity ImageVersion (:ImageVersion imago)
  {:preset {:prop (:references dcterms)
            :validate [(v/uuid4)]
            :init (pick-id :preset)}
   :rights {:prop (:accessRights dcterms)
            :validate [(v/uuid4)]
            :card :*}})

(defn add-entity-rights
