comparison implementations/mtp/classes.lisp @ 330:2fbff655ba47 tip

Removed cpitch-adj and cents SQL columns
author Jeremy Gow <jeremy.gow@gmail.com>
date Mon, 21 Jan 2013 11:08:11 +0000
parents 04940d80aaed
children
comparison
equal deleted inserted replaced
329:f54848e1f74c 330:2fbff655ba47
48 ;;(onset :initarg :onset :accessor %mtp-onset) time / (amuse:timepoint ...) 48 ;;(onset :initarg :onset :accessor %mtp-onset) time / (amuse:timepoint ...)
49 ;;(dur :initarg :dur :accessor %mtp-accidental) interval / (amuse:duration ...) 49 ;;(dur :initarg :dur :accessor %mtp-accidental) interval / (amuse:duration ...)
50 (bioi :initarg :bioi :accessor %mtp-bioi) 50 (bioi :initarg :bioi :accessor %mtp-bioi)
51 (deltast :initarg :deltast :accessor %mtp-deltast) 51 (deltast :initarg :deltast :accessor %mtp-deltast)
52 (cpitch :initarg :cpitch :accessor %mtp-cpitch) 52 (cpitch :initarg :cpitch :accessor %mtp-cpitch)
53 (cpitch-adj :initarg :cpitch-adj :accessor %mtp-cpitch-adj)
54 (cents :initarg :cents :accessor %mtp-cents)
55 (mpitch :initarg :mpitch :accessor %mtp-mpitch) 53 (mpitch :initarg :mpitch :accessor %mtp-mpitch)
56 (accidental :initarg :accidental :accessor %mtp-accidental) 54 (accidental :initarg :accidental :accessor %mtp-accidental)
57 (keysig :initarg :keysig :accessor %mtp-keysig) 55 (keysig :initarg :keysig :accessor %mtp-keysig)
58 (mode :initarg :mode :accessor %mtp-mode) 56 (mode :initarg :mode :accessor %mtp-mode)
59 (barlength :initarg :barlength :accessor %mtp-barlength) 57 (barlength :initarg :barlength :accessor %mtp-barlength)