anchor.diff:                            :set nil)))
     (:documentation "Description of a segment of a protein."))
   
  -(def-ensembl-view analysis ()
  +(def-ensembl-class analysis
     ((analysis-id     :type integer 
                       :db-constraints (:not-null :primary-key)
                       :db-kind :key)
  
positive.code:               ,@class-args))))
  
  
  (def-ensembl-view dna-sequence ()
    ((seq-region-id :type integer
                    :db-constraints :not-null
                    :initarg :seq-region-id)
  
negative.code: ;;; --------------------------------------------------------------------------
  ;;; Proteins and Protein Features
  ;;; --------------------------------------------------------------------------
  (def-ensembl-class protein-feature
    ((protein-feature-id :type integer :db-constraints (:not-null :primary-key)
                         :db-kind :key)
     (translation-id :type integer     :db-constraints (:not-null))
  