comparison base/generics.lisp @ 112:034ef8412ddb

asa-interval-string defgeneric darcs-hash:20070726151905-dc3a5-6c39aefd80ba1ebbd1b6c84c5f5fd752a4065eb3.gz
author c.rhodes <c.rhodes@gold.ac.uk>
date Thu, 26 Jul 2007 16:19:05 +0100
parents b445959f4cc1
children d574d015f5af
comparison
equal deleted inserted replaced
111:f49aa290b5c3 112:034ef8412ddb
75 (defgeneric asa-pitch-string (pitch-designator) 75 (defgeneric asa-pitch-string (pitch-designator)
76 (:documentation "Returns a string representing the designated ASA 76 (:documentation "Returns a string representing the designated ASA
77 pitch name which has three parts: a letter name in the set 77 pitch name which has three parts: a letter name in the set
78 {A,B,C,D,E,F,G}, an inflection in the set {n,f,s,ff,ss,fff,sss,...} 78 {A,B,C,D,E,F,G}, an inflection in the set {n,f,s,ff,ss,fff,sss,...}
79 and an octave number. E.g., Cn4 = Middle C.")) 79 and an octave number. E.g., Cn4 = Middle C."))
80 (defgeneric asa-interval-string (pitch-designator)
81 (:documentation "Returns a string representing the designated ASA
82 interval name which has two or three parts: a direction in the set
83 {r,f} (absent for unisons/primes), a type in the set
84 {p,ma,mi,a,d,aa,dd,aaa,ddd,...}, and a size number. E.g. rma2 =
85 rising major second."))
80 (defgeneric diatonic-pitch-name (pitch-designator) 86 (defgeneric diatonic-pitch-name (pitch-designator)
81 (:documentation "Returns a char in the set 87 (:documentation "Returns a char in the set
82 {#\A,#\B,#\C,#\D,#\E,#\F,#\G}, representing the pitch name of 88 {#\A,#\B,#\C,#\D,#\E,#\F,#\G}, representing the pitch name of
83 PITCH-DESIGNATOR.")) 89 PITCH-DESIGNATOR."))
84 (defgeneric pitch-class (pitch-designator) 90 (defgeneric pitch-class (pitch-designator)