anchor.diff:  			 homepage
   			 licence
   			 keywords
  -			 categories)
  +			 categories
  +			 cld)
     (let ((library (make-document)))
       (add-element "uuid" (princ-to-string (uuid:make-v4-uuid)) library)
       (add-element "name" name library) 
  
positive.code: 
  (defun find-library-by-name (name)
    (first (docs (db.find "libraries" (kv "name" name)))))
  			 
  
negative.code:     (add-element "licence" licence library)
      (add-element "keywords" keywords library)
      (add-element "categories" categories library)
      (add-element "cld" (cldm::unparse-cld-address cld) library)
  
      (db.insert "libraries" library)))
  
  