Mercurial > hg > amuse
comparison base/generics.lisp @ 134:5e362d998f29
More documentation
darcs-hash:20070828101524-f76cc-6add2c3c254befc3cf767ac69706865b7830bc6a.gz
| author | David Lewis <d.lewis@gold.ac.uk> |
|---|---|
| date | Tue, 28 Aug 2007 11:15:24 +0100 |
| parents | f57ab0e109fb |
| children | fd85f52d9f9d |
comparison
equal
deleted
inserted
replaced
| 133:d041118612d4 | 134:5e362d998f29 |
|---|---|
| 135 (:method (ts) (beat-units-per-bar ts)) | 135 (:method (ts) (beat-units-per-bar ts)) |
| 136 (:documentation "Not obviously meaningful for non fraction-like | 136 (:documentation "Not obviously meaningful for non fraction-like |
| 137 time signatures")) | 137 time signatures")) |
| 138 (defgeneric beat-units (time-signature) | 138 (defgeneric beat-units (time-signature) |
| 139 (:documentation "In a standard, fraction-like time-signature or | 139 (:documentation "In a standard, fraction-like time-signature or |
| 140 a symbolic equivalent, this is the numerator (n.b., | 140 a symbolic equivalent, this is the denominator (n.b. the |
| 141 tactus-duration is the method of choice for compound time | 141 difference between this and @code{tactus-duration} is only |
| 142 sensitive queries.")) | 142 visible for compound time, where this returns the lower portion |
| 143 of the time signature, but @code{tactus-duration} returns the | |
| 144 higher-level unit).")) | |
| 143 (defgeneric time-signature-denominator (time-signature) | 145 (defgeneric time-signature-denominator (time-signature) |
| 144 (:method (ts) (beat-units ts)) | 146 (:method (ts) (beat-units ts)) |
| 145 (:documentation "Not obviously meaningful for non fraction-like | 147 (:documentation "Not obviously meaningful for non fraction-like |
| 146 time signatures")) | 148 time signatures")) |
| 147 (defgeneric tactus-duration (time-signature) | 149 (defgeneric tactus-duration (time-signature) |