               (projectmodel/aspectj-project-models)))
     (succeeds (.hasModel ?xcut))))
     
+;; Shadows
+
 
 ;(defn
 ;  advice-shadow

                                     ?set)
        ?aspect))))

;; Advice

(defn
  aspect-advice

;    (aspect ?aspect)
;    (contains (iterator-seq (.getPointcuts ?aspect)) ?pointcut)))

;; Declare declarations
;; --------------------


(defn
  aspect-declare
