Gilles <gilles.thiba...@free.fr> writes:
>> Is it possible to do something just with the first and last notes of
>> music within? Can they be extracted from music as from a list? (Hence
>> my reference in the original post to car and cdr)?
>
> In music-functions.scm, you have some useful functions. Here an
> extract-music is used.
>
> %%%%%%%%%%%%%%%
>
> music = \relative { c2->\f d e <e g c>2-> }
>
> #(let ((mylist
> (extract-music music
> ;(lambda (evt)(eq? (ly:music-property evt 'name) 'NoteEvent)))))
> (lambda (evt)(memq (ly:music-property evt 'name)
> '(NoteEvent EventChord))))))
(let ((mylist (extract-named-music music '(EventChord NoteEvent))))
is shorter here...
> (display-scheme-music (car mylist))
> (display " ----\n")
> (display-scheme-music (last mylist)))
>
> %%%%%%%%%%%%%%%%
>
> NB
> Aleksandr, sorry for the double messages.
--
David Kastrup
_______________________________________________
lilypond-user mailing list
lilypond-user@gnu.org
https://lists.gnu.org/mailman/listinfo/lilypond-user
