|
|
|
@ -3,6 +3,7 @@
|
|
|
|
|
is realized in deep implemented."
|
|
|
|
|
(:require
|
|
|
|
|
[clojure.spec.alpha :as s]
|
|
|
|
|
[org.domaindrivenarchitecture.activity-pub-poc.predicates :as p]
|
|
|
|
|
[orchestra.core :refer [defn-spec]]))
|
|
|
|
|
|
|
|
|
|
; Properties:https://www.w3.org/TR/owl-ref/#Property
|
|
|
|
@ -11,7 +12,12 @@
|
|
|
|
|
|
|
|
|
|
;http://www.w3.org/2002/07/owl#Class
|
|
|
|
|
;https://www.w3.org/TR/owl-ref/#Class-def
|
|
|
|
|
(s/def ::Class any?)
|
|
|
|
|
(defn-spec owl-class? boolean?
|
|
|
|
|
[elem any?]
|
|
|
|
|
(or (p/uri-string? elem)
|
|
|
|
|
(map? elem)
|
|
|
|
|
(vector? elem)))
|
|
|
|
|
(s/def ::Class owl-class?)
|
|
|
|
|
|
|
|
|
|
;http://www.w3.org/2002/07/owl#DatatypeProperty
|
|
|
|
|
(s/def ::DatatypeProperty any?)
|
|
|
|
|