anchor.diff:  
     (:namespaces
      ;; namespaces for qnames
  +   ;; i.e. use these namespace prefixes when resolving qnames denoted
  +   ;; in the slot definitions and in class options
      ("uml" "http://www.omg.org/spec/UML/20110701" ))
   
     ;; UML composite name
  
positive.code: ;;; * Slot Definitions
  
  
  (defclass element-tranform-slot-definition
      (type-transform slot-definition)
    ())
  
  (defclass direct-element-tranform-slot-definition
      (type-transform-slot-definition standard-direct-slot-definition)
    ())
  
  (defclass effective-element-tranform-slot-definition
      (type-transform-slot-definition standard-effective-slot-definition)
    ())
  
  
negative.code: 
  (defvar *xmi-unmarshalling-model*)
  
  (defclass type-transform (transformation-model-component)
    ((source-element-qname
      :initarg :soruce-element-lname
      :type qname ;; FIXME: namespace qualified strings - see ensure-qname
  