comparison base/generics.lisp @ 89:0b4c624910f1

base/: basic protocol for accessing monodies

darcs-hash:20070723140651-c0ce4-2c828ea984eb92f0ccb73866a6a496131c8fa736.gz

 (cl:in-package #:amuse) 
 
 ;;; Pulling compositions from the database 
 
 (defgeneric get-composition (identifier))
+
+(defgeneric monody (object)
+  (:documentation "Returns a monody."))
+(defgeneric ensure-monody (object)
+  (:documentation "Returns a generalised boolean."))
 
 ;;; Getting constituents from compositions
 ;; IS this the mechanism we want to use
 (defgeneric time-signatures (composition)
   (:documentation "Returns all time-signatures in a composition