[CM] is x a rhythm/a keynum?

[Johannes Quint]

--Apple-Mail-2--946765028
Content-Transfer-Encoding: 7bit
Content-Type: text/plain;
	charset=US-ASCII;
	format=flowed

how can i test, if x is a rhythm (if x is a keynum)?

i want to have something like:

(defun rhythm-or-keynum (x)
	(cond ((rhythmp x) "i am a rhythm")	; but rhythmp/keynump doesn't exist
	          ((keynump x) "i am a keynum")
	          (t "no rhythm, no keynum")))

thanks for help

j.q.



__

Johannes Quint
Rilkestr.55
D-53225 Bonn
0228 468256
johannes.quint@web.de
--Apple-Mail-2--946765028
Content-Transfer-Encoding: 7bit
Content-Type: text/enriched;
	charset=US-ASCII

how can i test, if x is a rhythm (if x is a keynum)?


i want to have something like:


(defun rhythm-or-keynum (x)

	(cond ((rhythmp x) "i am a rhythm")	; but rhythmp/keynump doesn't
exist

	          ((keynump x) "i am a keynum")

	          (t "no rhythm, no keynum")))


thanks for help


j.q.



<fontfamily><param>Helvetica</param>

__


Johannes Quint

Rilkestr.55

D-53225 Bonn

0228 468256

johannes.quint@web.de</fontfamily>
--Apple-Mail-2--946765028--