Simon,
On Mon, May 26, 2014 at 7:54 AM, Simon Albrecht <simon.albre...@mail.de>wrote:
>
> The version statement should be \version "2.19", since the music contains
> standalone durations like @code{ ees4~ 16 }, which can’t be handled by 2.18.
>
>
True, didn't notice that. Also interesting is that omitting the pitchname
on tied notes gives a different count for the affected note than repeating
the name does. Attach the following lines to the file above to get the
count:
countOccurrences =
#(define-scheme-function
(parser location lst)
(list?)
(let* ((pitch-list (sort (delete-duplicates lst) ly:pitch<?))
(tabulation (make-list (length pitch-list) '())))
(map (lambda (p)
(cons p (count (lambda (x) (equal? x p)) lst)))
pitch-list)))
#(display #{ \countOccurrences \extractPitches \Bach #})
%%%%
-David
_______________________________________________
lilypond-user mailing list
lilypond-user@gnu.org
https://lists.gnu.org/mailman/listinfo/lilypond-user
