 
 
 ;; ProgramElement hierarchy
-;; (but prefer not to use these) 
-;; -----------------------------
-    
-(defn
+;; ------------------------
+
+;; Prefer not to expose these relations, as the hierarchy is still managed by the facade created by AsmRelationshipProvider
+
+
+(defn-
   root
   "Relation of ProgramElement hierarchy roots."
   [?element]

                (recur (.getParent parent)))))]
         (ancestortypedeclaration (.getParent element))))
    
(defn
  element-enclosingtypedeclaration-element
  "Relation between a ProgramElement and its enclosing aspect (if any)."
  [?element ?typedeclaration]

    (element ?element)
    (equals ?handle (.getHandleIdentifier ?element))))

(defn-
  element-sourcelocation
  "Relation between a ProgramElement and its SourceLocation."
  [?element ?handle]
