csr21@59: (cl:in-package "AMUSE-GSHARP")
csr21@59: 
csr21@59: (defclass gsharp-composition (amuse:composition)
csr21@59:   ((buffer :initarg :buffer :reader buffer)
csr21@59:    (tempi :initarg :tempi :reader tempi)))
csr21@59: 
csr21@59: (defclass gsharp-pitched-event (chromatic-pitched-event)
c@61:   ((note :initarg :note :reader note)
c@61:    (slice-index :initarg :slice-index)))