(cddr (cadr (procedure-source func)))))
(doc (procedure-documentation func))
(sign (object-property func 'music-function-signature))
(cddr (cadr (procedure-source func)))))
(doc (procedure-documentation func))
(sign (object-property func 'music-function-signature))