anchor.diff:                                     :domain d
                                      :direct-superclasses 
                                      (list bm-mc lm-mc domain)
  -                                   :metaclass md-mc))
  +                                   :metaclass md-mc
  +                                   #+SBCL :definition-source #+SBCL src))
                       (d-d ;; derived measurement class for DOMAIN (aux)
                        ;;
                        ;; FIXME: There may seem to be a certain
  
positive.code:                                    :domain d
                                     :direct-superclasses 
                                     (list dm-mc lm-mc domain)
                                     :metaclass md-mc))
  
  		    (c  ;; measurement class denoted by 'class' name
  		     (ensure-class 
  
negative.code: 			g:direct-superclasses (list mc-mc)
  			:metaclass md-mc
  			#+SBCL :definition-source #+SBCL src))
                      (b-d ;; base measurement class for DOMAIN
                       ;; This class serves to allow for a base
                       ;; measurement class to be defined as an instance
  