anchor.diff:  | url                        | varchar(255)     |      |     |         |                |
   ||#
   (def-view-class method-link-species-set ()
  -  ((method-link-species-set-id :db-kind :key :type integer)
  -   (method-link-id :type integer)
  -   (species-set-id :type integer)
  -   (name           :type (string 255))
  -   (source         :type (string 255))
  -   (url            :type (string 255))
  -   (species-set    :db-kind :join 
  -                   :db-info (:join-class species-set
  -				   :home-key species-set-id
  -				   :foreign-key species-set-id))
  -   (method-link    :db-kind :join
  -                   :db-info (:join-class method-link
  -				   :home-key method-link-id
  -				   :foreign-key method-link-id)))
  +  ((method-link-species-set-id :db-kind :key  :type integer)
  +   (method-link-id             :db-kind :key  :type integer)
  +   (species-set-id             :db-kind :base :type integer)
  +   (name                       :db-kind :base :type (string 255))
  +   (source                     :db-kind :base :type (string 255))
  +   (url                        :db-kind :base :type (string 255))
  +   (species-set                :db-kind :join 
  +                               :db-info (:join-class species-set
  +                                         :home-key species-set-id
  +                                         :foreign-key species-set-id))
  +   (method-link                :db-kind :join
  +                               :db-info (:join-class method-link
  +                                         :home-key method-link-id
  +                                         :foreign-key method-link-id)))
     (:base-table "method_link_species_set")
     (:documentation "The assignment of a gene to a homology (in homology_member) depends on the species and the method that was applied. This class bridges the homology, not the assignment iself, with this additional information."))
   
  
positive.code: 
  (defmethod species ((gdb genome-db)) 
    "Retrieves the species of that genome-db entry from CLCB's species hash."
    (gethash (taxon-id gdb) clcb:*species-ncbi-id-hash*))
  
  ;;; The following first attempts are no longer required
  
  
negative.code:   (fetch-by-stable-id (stable-id m)))
  
  #||
  desc domain;
  | domain_id                  | int(10) unsigned |      | PRI | NULL    | auto_increment |
  | stable_id                  | varchar(40)      |      | MUL |         |                |
  | method_link_species_set_id | int(10) unsigned |      |     | 0       |                |
  