{\rtf1\ansi\ansicpg1252\cocoartf1187 {\fonttbl\f0\fswiss\fcharset0 Helvetica;} {\colortbl;\red255\green255\blue255;} \paperw11900\paperh16840\margl1440\margr1440\vieww10800\viewh8400\viewkind0 \pard\tx566\tx1133\tx1700\tx2267\tx2834\tx3401\tx3968\tx4535\tx5102\tx5669\tx6236\tx6803\pardirnatural \f0\fs24 \cf0 This is a console shell for running LilyPond and related commands. Enter %help to see the available special commands.\ > %lilypond %args "/Users/kailautenschlager/Documents/02_Musik (SugarSync)/LP/eine kleine fruehlingsweise.dvorak.ttbb/eine kleine fruehlingsweise.dvorak.ttbb.ly"\ \'bb/Users/kailautenschlager/Documents/02_Musik (SugarSync)/LP/eine kleine fruehlingsweise.dvorak.ttbb/eine kleine fruehlingsweise.dvorak.ttbb.ly\'ab wird verarbeitet\ Analysieren...\ /Users/kailautenschlager/Documents/02_Musik (SugarSync)/LP/eine kleine fruehlingsweise.dvorak.ttbb/../change-pitch.ly:1:459: Fehler: GUILE signalisierte einen Fehler f\'fcr den hier beginnenden Ausdruck\ %% version 24/04/2012\ %% for lilypond 2.16 or higher\ \ %% some utility functions\ #(define (name-of music)\ (ly:music-property music 'name))\ \ #(define (good-music? music)\ (and (not (eq? 'Music (name-of music)))\ (or (pair? (ly:music-property music 'elements))\ (ly:music? (ly:music-property music 'element))\ (pair? (ly:music-property music 'articulations)))))\ \ #(define (noteEvent? music)\ (eq? (name-of music) 'NoteEvent))\ \ #\ (define (has-notes? music)\ "\ /Users/kailautenschlager/Documents/02_Musik (SugarSync)/LP/eine kleine fruehlingsweise.dvorak.ttbb/../change-pitch.ly:1:467: Fehler: syntax error, unexpected '(', expecting SCM_FUNCTION or SCM_IDENTIFIER or SCM_TOKEN or '='\ %% version 24/04/2012\ %% for lilypond 2.16 or higher\ \ %% some utility functions\ #(define (name-of music)\ (ly:music-property music 'name))\ \ #(define (good-music? music)\ (and (not (eq? 'Music (name-of music)))\ (or (pair? (ly:music-property music 'elements))\ (ly:music? (ly:music-property music 'element))\ (pair? (ly:music-property music 'articulations)))))\ \ #(define (noteEvent? music)\ (eq? (name-of music) 'NoteEvent))\ \ #(define \ \ /Users/kailautenschlager/Documents/02_Musik (SugarSync)/LP/eine kleine fruehlingsweise.dvorak.ttbb/../change-pitch.ly:1:691: Fehler: GUILE signalisierte einen Fehler f\'fcr den hier beginnenden Ausdruck\ %% version 24/04/2012\ %% for lilypond 2.16 or higher\ \ %% some utility functions\ #(define (name-of music)\ (ly:music-property music 'name))\ \ #(define (good-music? music)\ (and (not (eq? 'Music (name-of music)))\ (or (pair? (ly:music-property music 'elements))\ (ly:music? (ly:music-property music 'element))\ (pair? (ly:music-property music 'articulations)))))\ \ #(define (noteEvent? music)\ (eq? (name-of music) 'NoteEvent))\ \ #(define (has-notes? music)\ "Return true if there is at least one note in `music, false otherwise."\ (let ((found? #f))\ (let loop ((evt music))\ (cond (found?) ; do nothing : stop loop\ ((noteEvent? evt)(set! found? #\ \ /Users/kailautenschlager/Documents/02_Musik (SugarSync)/LP/eine kleine fruehlingsweise.dvorak.ttbb/../change-pitch.ly:1:1051: Fehler: GUILE signalisierte einen Fehler f\'fcr den hier beginnenden Ausdruck\ %% version 24/04/2012\ %% for lilypond 2.16 or higher\ \ %% some utility functions\ #(define (name-of music)\ (ly:music-property music 'name))\ \ #(define (good-music? music)\ (and (not (eq? 'Music (name-of music)))\ (or (pair? (ly:music-property music 'elements))\ (ly:music? (ly:music-property music 'element))\ (pair? (ly:music-property music 'articulations)))))\ \ #(define (noteEvent? music)\ (eq? (name-of music) 'NoteEvent))\ \ #(define (has-notes? music)\ "Return true if there is at least one note in `music, false otherwise."\ (let ((found? #f))\ (let loop ((evt music))\ (cond (found?) ; do nothing : stop loop\ ((noteEvent? evt)(set! found? #t))\ (else ; search deeper\ (let ((e (ly:music-property evt 'element))\ (es (ly:music-property evt 'elements)))\ (if (ly:music? e) (loop e))\ (while (and (pair? es)(not found?))\ \ /Users/kailautenschlager/Documents/02_Musik (SugarSync)/LP/eine kleine fruehlingsweise.dvorak.ttbb/../change-pitch.ly:1:1292: Fehler: GUILE signalisierte einen Fehler f\'fcr den hier beginnenden Ausdruck\ %% version 24/04/2012\ %% for lilypond 2.16 or higher\ \ %% some utility functions\ #(define (name-of music)\ (ly:music-property music 'name))\ \ #(define (good-music? music)\ (and (not (eq? 'Music (name-of music)))\ (or (pair? (ly:music-property music 'elements))\ (ly:music? (ly:music-property music 'element))\ (pair? (ly:music-property music 'articulations)))))\ \ #(define (noteEvent? music)\ (eq? (name-of music) 'NoteEvent))\ \ #(define (has-notes? music)\ "Return true if there is at least one note in `music, false otherwise."\ (let ((found? #f))\ (let loop ((evt music))\ (cond (found?) ; do nothing : stop loop\ ((noteEvent? evt)(set! found? #t))\ (else ; search deeper\ (let ((e (ly:music-property evt 'element))\ (es (ly:music-property evt 'elements)))\ (if (ly:music? e) (loop e))\ (while (and (pair? es)(not found?))\ \ /Users/kailautenschlager/Documents/02_Musik (SugarSync)/LP/eine kleine fruehlingsweise.dvorak.ttbb/../change-pitch.ly:1:1300: Fehler: syntax error, unexpected '(', expecting SCM_FUNCTION or SCM_IDENTIFIER or SCM_TOKEN or '='\ %% version 24/04/2012\ %% for lilypond 2.16 or higher\ \ %% some utility functions\ #(define (name-of music)\ (ly:music-property music 'name))\ \ #(define (good-music? music)\ (and (not (eq? 'Music (name-of music)))\ (or (pair? (ly:music-property music 'elements))\ (ly:music? (ly:music-property music 'element))\ (pair? (ly:music-property music 'articulations)))))\ \ #(define (noteEvent? music)\ (eq? (name-of music) 'NoteEvent))\ \ #(define (has-notes? music)\ "Return true if there is at least one note in `music, false otherwise."\ (let ((found? #f))\ (let loop ((evt music))\ (cond (found?) ; do nothing : stop loop\ ((noteEvent? evt)(set! found? #t))\ (else ; search deeper\ (let ((e (ly:music-property evt 'element))\ (es (ly:music-property evt 'elements)))\ (if (ly:music? e) (loop e))\ (while (and (pair? es)\ /Users/kailautenschlager/Documents/02_Musik (SugarSync)/LP/eine kleine fruehlingsweise.dvorak.ttbb/../change-pitch.ly:1:1547: Fehler: GUILE signalisierte einen Fehler f\'fcr den hier beginnenden Ausdruck\ %% version 24/04/2012\ %% for lilypond 2.16 or higher\ \ %% some utility functions\ #(define (name-of music)\ (ly:music-property music 'name))\ \ #(define (good-music? music)\ (and (not (eq? 'Music (name-of music)))\ (or (pair? (ly:music-property music 'elements))\ (ly:music? (ly:music-property music 'element))\ (pair? (ly:music-property music 'articulations)))))\ \ #(define (noteEvent? music)\ (eq? (name-of music) 'NoteEvent))\ \ #(define (has-notes? music)\ "Return true if there is at least one note in `music, false otherwise."\ (let ((found? #f))\ (let loop ((evt music))\ (cond (found?) ; do nothing : stop loop\ ((noteEvent? evt)(set! found? #t))\ (else ; search deeper\ (let ((e (ly:music-property evt 'element))\ (es (ly:music-property evt 'elements)))\ (if (ly:music? e) (loop e))\ (while (and (pair? es)(not found?))\ \ /Users/kailautenschlager/Documents/02_Musik (SugarSync)/LP/eine kleine fruehlingsweise.dvorak.ttbb/../change-pitch.ly:1:2865: Fehler: GUILE signalisierte einen Fehler f\'fcr den hier beginnenden Ausdruck\ %% version 24/04/2012\ %% for lilypond 2.16 or higher\ \ %% some utility functions\ #(define (name-of music)\ (ly:music-property music 'name))\ \ #(define (good-music? music)\ (and (not (eq? 'Music (name-of music)))\ (or (pair? (ly:music-property music 'elements))\ (ly:music? (ly:music-property music 'element))\ (pair? (ly:music-property music 'articulations)))))\ \ #(define (noteEvent? music)\ (eq? (name-of music) 'NoteEvent))\ \ #(define (has-notes? music)\ "Return true if there is at least one note in `music, false otherwise."\ (let ((found? #f))\ (let loop ((evt music))\ (cond (found?) ; do nothing : stop loop\ ((noteEvent? evt)(set! found? #t))\ (else ; search deeper\ (let ((e (ly:music-property evt 'element))\ (es (ly:music-property evt 'elements)))\ (if (ly:music? e) (loop e))\ (while (and (pair? es)(not found?))\ \ /Users/kailautenschlager/Documents/02_Musik (SugarSync)/LP/eine kleine fruehlingsweise.dvorak.ttbb/../change-pitch.ly:1:2873: Fehler: syntax error, unexpected '(', expecting SCM_FUNCTION or SCM_IDENTIFIER or SCM_TOKEN or '='\ %% version 24/04/2012\ %% for lilypond 2.16 or higher\ \ %% some utility functions\ #(define (name-of music)\ (ly:music-property music 'name))\ \ #(define (good-music? music)\ (and (not (eq? 'Music (name-of music)))\ (or (pair? (ly:music-property music 'elements))\ (ly:music? (ly:music-property music 'element))\ (pair? (ly:music-property music 'articulations)))))\ \ #(define (noteEvent? music)\ (eq? (name-of music) 'NoteEvent))\ \ #(define (has-notes? music)\ "Return true if there is at least one note in `music, false otherwise."\ (let ((found? #f))\ (let loop ((evt music))\ (cond (found?) ; do nothing : stop loop\ ((noteEvent? evt)(set! found? #t))\ (else ; search deeper\ (let ((e (ly:music-property evt 'element))\ (es (ly:music-property evt 'elements)))\ (if (ly:music? e) (loop e))\ (while (and (pair? es)\ /Users/kailautenschlager/Documents/02_Musik (SugarSync)/LP/eine kleine fruehlingsweise.dvorak.ttbb/../change-pitch.ly:1:3359: Fehler: Ung\'fcltige Fluchtsequenz: \'bb\\insert\'ab\ %% version 24/04/2012\ %% for lilypond 2.16 or higher\ \ %% some utility functions\ #(define (name-of music)\ (ly:music-property music 'name))\ \ #(define (good-music? music)\ (and (not (eq? 'Music (name-of music)))\ (or (pair? (ly:music-property music 'elements))\ (ly:music? (ly:music-property music 'element))\ (pair? (ly:music-property music 'articulations)))))\ \ #(define (noteEvent? music)\ (eq? (name-of music) 'NoteEvent))\ \ #(define (has-notes? music)\ "Return true if there is at least one note in `music, false otherwise."\ (let ((found? #f))\ (let loop ((evt music))\ (cond (found?) ; do nothing : stop loop\ ((noteEvent? evt)(set! found? #t))\ (else ; search deeper\ (let ((e (ly:music-property evt 'element))\ (es (ly:music-property evt 'elements)))\ (if (ly:music? e) (loop e))\ (while (and (pair? es)(not found?))\ (begin\ \ /Users/kailautenschlager/Documents/02_Musik (SugarSync)/LP/eine kleine fruehlingsweise.dvorak.ttbb/../change-pitch.ly:1:3597: Fehler: Ung\'fcltige Fluchtsequenz: \'bb\\insert\'ab\ %% version 24/04/2012\ %% for lilypond 2.16 or higher\ \ %% some utility functions\ #(define (name-of music)\ (ly:music-property music 'name))\ \ #(define (good-music? music)\ (and (not (eq? 'Music (name-of music)))\ (or (pair? (ly:music-property music 'elements))\ (ly:music? (ly:music-property music 'element))\ (pair? (ly:music-property music 'articulations)))))\ \ #(define (noteEvent? music)\ (eq? (name-of music) 'NoteEvent))\ \ #(define (has-notes? music)\ "Return true if there is at least one note in `music, false otherwise."\ (let ((found? #f))\ (let loop ((evt music))\ (cond (found?) ; do nothing : stop loop\ ((noteEvent? evt)(set! found? #t))\ (else ; search deeper\ (let ((e (ly:music-property evt 'element))\ (es (ly:music-property evt 'elements)))\ (if (ly:music? e) (loop e))\ (while (and (pair? es)(not found?))\ (begin\ \ /Users/kailautenschlager/Documents/02_Musik (SugarSync)/LP/eine kleine fruehlingsweise.dvorak.ttbb/../change-pitch.ly:1:4071: Fehler: GUILE signalisierte einen Fehler f\'fcr den hier beginnenden Ausdruck\ %% version 24/04/2012\ %% for lilypond 2.16 or higher\ \ %% some utility functions\ #(define (name-of music)\ (ly:music-property music 'name))\ \ #(define (good-music? music)\ (and (not (eq? 'Music (name-of music)))\ (or (pair? (ly:music-property music 'elements))\ (ly:music? (ly:music-property music 'element))\ (pair? (ly:music-property music 'articulations)))))\ \ #(define (noteEvent? music)\ (eq? (name-of music) 'NoteEvent))\ \ #(define (has-notes? music)\ "Return true if there is at least one note in `music, false otherwise."\ (let ((found? #f))\ (let loop ((evt music))\ (cond (found?) ; do nothing : stop loop\ ((noteEvent? evt)(set! found? #t))\ (else ; search deeper\ (let ((e (ly:music-property evt 'element))\ (es (ly:music-property evt 'elements)))\ (if (ly:music? e) (loop e))\ (while (and (pair? es)(not found?))\ \ /Users/kailautenschlager/Documents/02_Musik (SugarSync)/LP/eine kleine fruehlingsweise.dvorak.ttbb/../change-pitch.ly:1:4327: Fehler: Ung\'fcltige Fluchtsequenz: \'bb\\insert\'ab\ %% version 24/04/2012\ %% for lilypond 2.16 or higher\ \ %% some utility functions\ #(define (name-of music)\ (ly:music-property music 'name))\ \ #(define (good-music? music)\ (and (not (eq? 'Music (name-of music)))\ (or (pair? (ly:music-property music 'elements))\ (ly:music? (ly:music-property music 'element))\ (pair? (ly:music-property music 'articulations)))))\ \ #(define (noteEvent? music)\ (eq? (name-of music) 'NoteEvent))\ \ #(define (has-notes? music)\ "Return true if there is at least one note in `music, false otherwise."\ (let ((found? #f))\ (let loop ((evt music))\ (cond (found?) ; do nothing : stop loop\ ((noteEvent? evt)(set! found? #t))\ (else ; search deeper\ (let ((e (ly:music-property evt 'element))\ (es (ly:music-property evt 'elements)))\ (if (ly:music? e) (loop e))\ (while (and (pair? es)(not found?))\ (begin\ \ /Users/kailautenschlager/Documents/02_Musik (SugarSync)/LP/eine kleine fruehlingsweise.dvorak.ttbb/../change-pitch.ly:1:4423: Fehler: GUILE signalisierte einen Fehler f\'fcr den hier beginnenden Ausdruck\ %% version 24/04/2012\ %% for lilypond 2.16 or higher\ \ %% some utility functions\ #(define (name-of music)\ (ly:music-property music 'name))\ \ #(define (good-music? music)\ (and (not (eq? 'Music (name-of music)))\ (or (pair? (ly:music-property music 'elements))\ (ly:music? (ly:music-property music 'element))\ (pair? (ly:music-property music 'articulations)))))\ \ #(define (noteEvent? music)\ (eq? (name-of music) 'NoteEvent))\ \ #(define (has-notes? music)\ "Return true if there is at least one note in `music, false otherwise."\ (let ((found? #f))\ (let loop ((evt music))\ (cond (found?) ; do nothing : stop loop\ ((noteEvent? evt)(set! found? #t))\ (else ; search deeper\ (let ((e (ly:music-property evt 'element))\ (es (ly:music-property evt 'elements)))\ (if (ly:music? e) (loop e))\ (while (and (pair? es)(not found?))\ \ /Users/kailautenschlager/Documents/02_Musik (SugarSync)/LP/eine kleine fruehlingsweise.dvorak.ttbb/../change-pitch.ly:1:4577: Fehler: GUILE signalisierte einen Fehler f\'fcr den hier beginnenden Ausdruck\ %% version 24/04/2012\ %% for lilypond 2.16 or higher\ \ %% some utility functions\ #(define (name-of music)\ (ly:music-property music 'name))\ \ #(define (good-music? music)\ (and (not (eq? 'Music (name-of music)))\ (or (pair? (ly:music-property music 'elements))\ (ly:music? (ly:music-property music 'element))\ (pair? (ly:music-property music 'articulations)))))\ \ #(define (noteEvent? music)\ (eq? (name-of music) 'NoteEvent))\ \ #(define (has-notes? music)\ "Return true if there is at least one note in `music, false otherwise."\ (let ((found? #f))\ (let loop ((evt music))\ (cond (found?) ; do nothing : stop loop\ ((noteEvent? evt)(set! found? #t))\ (else ; search deeper\ (let ((e (ly:music-property evt 'element))\ (es (ly:music-property evt 'elements)))\ (if (ly:music? e) (loop e))\ (while (and (pair? es)(not found?))\ \ /Users/kailautenschlager/Documents/02_Musik (SugarSync)/LP/eine kleine fruehlingsweise.dvorak.ttbb/../change-pitch.ly:1:5324: Fehler: GUILE signalisierte einen Fehler f\'fcr den hier beginnenden Ausdruck\ %% version 24/04/2012\ %% for lilypond 2.16 or higher\ \ %% some utility functions\ #(define (name-of music)\ (ly:music-property music 'name))\ \ #(define (good-music? music)\ (and (not (eq? 'Music (name-of music)))\ (or (pair? (ly:music-property music 'elements))\ (ly:music? (ly:music-property music 'element))\ (pair? (ly:music-property music 'articulations)))))\ \ #(define (noteEvent? music)\ (eq? (name-of music) 'NoteEvent))\ \ #(define (has-notes? music)\ "Return true if there is at least one note in `music, false otherwise."\ (let ((found? #f))\ (let loop ((evt music))\ (cond (found?) ; do nothing : stop loop\ ((noteEvent? evt)(set! found? #t))\ (else ; search deeper\ (let ((e (ly:music-property evt 'element))\ (es (ly:music-property evt 'elements)))\ (if (ly:music? e) (loop e))\ (while (and (pair? es)(not found?))\ \ /Users/kailautenschlager/Documents/02_Musik (SugarSync)/LP/eine kleine fruehlingsweise.dvorak.ttbb/../change-pitch.ly:1:6685: Fehler: GUILE signalisierte einen Fehler f\'fcr den hier beginnenden Ausdruck\ %% version 24/04/2012\ %% for lilypond 2.16 or higher\ \ %% some utility functions\ #(define (name-of music)\ (ly:music-property music 'name))\ \ #(define (good-music? music)\ (and (not (eq? 'Music (name-of music)))\ (or (pair? (ly:music-property music 'elements))\ (ly:music? (ly:music-property music 'element))\ (pair? (ly:music-property music 'articulations)))))\ \ #(define (noteEvent? music)\ (eq? (name-of music) 'NoteEvent))\ \ #(define (has-notes? music)\ "Return true if there is at least one note in `music, false otherwise."\ (let ((found? #f))\ (let loop ((evt music))\ (cond (found?) ; do nothing : stop loop\ ((noteEvent? evt)(set! found? #t))\ (else ; search deeper\ (let ((e (ly:music-property evt 'element))\ (es (ly:music-property evt 'elements)))\ (if (ly:music? e) (loop e))\ (while (and (pair? es)(not found?))\ \ /Users/kailautenschlager/Documents/02_Musik (SugarSync)/LP/eine kleine fruehlingsweise.dvorak.ttbb/../change-pitch.ly:1:7240: Fehler: GUILE signalisierte einen Fehler f\'fcr den hier beginnenden Ausdruck\ %% version 24/04/2012\ %% for lilypond 2.16 or higher\ \ %% some utility functions\ #(define (name-of music)\ (ly:music-property music 'name))\ \ #(define (good-music? music)\ (and (not (eq? 'Music (name-of music)))\ (or (pair? (ly:music-property music 'elements))\ (ly:music? (ly:music-property music 'element))\ (pair? (ly:music-property music 'articulations)))))\ \ #(define (noteEvent? music)\ (eq? (name-of music) 'NoteEvent))\ \ #(define (has-notes? music)\ "Return true if there is at least one note in `music, false otherwise."\ (let ((found? #f))\ (let loop ((evt music))\ (cond (found?) ; do nothing : stop loop\ ((noteEvent? evt)(set! found? #t))\ (else ; search deeper\ (let ((e (ly:music-property evt 'element))\ (es (ly:music-property evt 'elements)))\ (if (ly:music? e) (loop e))\ (while (and (pair? es)(not found?))\ \ /Users/kailautenschlager/Documents/02_Musik (SugarSync)/LP/eine kleine fruehlingsweise.dvorak.ttbb/../change-pitch.ly:1:7591: Fehler: Ung\'fcltige Fluchtsequenz: \'bb\\insert\'ab\ %% version 24/04/2012\ %% for lilypond 2.16 or higher\ \ %% some utility functions\ #(define (name-of music)\ (ly:music-property music 'name))\ \ #(define (good-music? music)\ (and (not (eq? 'Music (name-of music)))\ (or (pair? (ly:music-property music 'elements))\ (ly:music? (ly:music-property music 'element))\ (pair? (ly:music-property music 'articulations)))))\ \ #(define (noteEvent? music)\ (eq? (name-of music) 'NoteEvent))\ \ #(define (has-notes? music)\ "Return true if there is at least one note in `music, false otherwise."\ (let ((found? #f))\ (let loop ((evt music))\ (cond (found?) ; do nothing : stop loop\ ((noteEvent? evt)(set! found? #t))\ (else ; search deeper\ (let ((e (ly:music-property evt 'element))\ (es (ly:music-property evt 'elements)))\ (if (ly:music? e) (loop e))\ (while (and (pair? es)(not found?))\ (begin\ \ /Users/kailautenschlager/Documents/02_Musik (SugarSync)/LP/eine kleine fruehlingsweise.dvorak.ttbb/../change-pitch.ly:1:7663: Fehler: Ung\'fcltige Fluchtsequenz: \'bb\\samePitch\'ab\ %% version 24/04/2012\ %% for lilypond 2.16 or higher\ \ %% some utility functions\ #(define (name-of music)\ (ly:music-property music 'name))\ \ #(define (good-music? music)\ (and (not (eq? 'Music (name-of music)))\ (or (pair? (ly:music-property music 'elements))\ (ly:music? (ly:music-property music 'element))\ (pair? (ly:music-property music 'articulations)))))\ \ #(define (noteEvent? music)\ (eq? (name-of music) 'NoteEvent))\ \ #(define (has-notes? music)\ "Return true if there is at least one note in `music, false otherwise."\ (let ((found? #f))\ (let loop ((evt music))\ (cond (found?) ; do nothing : stop loop\ ((noteEvent? evt)(set! found? #t))\ (else ; search deeper\ (let ((e (ly:music-property evt 'element))\ (es (ly:music-property evt 'elements)))\ (if (ly:music? e) (loop e))\ (while (and (pair? es)(not found?))\ (begin\ \ /Users/kailautenschlager/Documents/02_Musik (SugarSync)/LP/eine kleine fruehlingsweise.dvorak.ttbb/../change-pitch.ly:1:7838: Fehler: syntax error, unexpected ',', expecting SCM_FUNCTION or SCM_IDENTIFIER or SCM_TOKEN or '='\ %% version 24/04/2012\ %% for lilypond 2.16 or higher\ \ %% some utility functions\ #(define (name-of music)\ (ly:music-property music 'name))\ \ #(define (good-music? music)\ (and (not (eq? 'Music (name-of music)))\ (or (pair? (ly:music-property music 'elements))\ (ly:music? (ly:music-property music 'element))\ (pair? (ly:music-property music 'articulations)))))\ \ #(define (noteEvent? music)\ (eq? (name-of music) 'NoteEvent))\ \ #(define (has-notes? music)\ "Return true if there is at least one note in `music, false otherwise."\ (let ((found? #f))\ (let loop ((evt music))\ (cond (found?) ; do nothing : stop loop\ ((noteEvent? evt)(set! found? #t))\ (else ; search deeper\ (let ((e (ly:music-property evt 'element))\ (es (ly:music-property evt 'elements)))\ (if (ly:music? e) (loop e))\ (while (and (pair? es)\ /Users/kailautenschlager/Documents/02_Musik (SugarSync)/LP/eine kleine fruehlingsweise.dvorak.ttbb/../change-pitch.ly:1:7855: Fehler: syntax error, unexpected '('\ %% version 24/04/2012\ %% for lilypond 2.16 or higher\ \ %% some utility functions\ #(define (name-of music)\ (ly:music-property music 'name))\ \ #(define (good-music? music)\ (and (not (eq? 'Music (name-of music)))\ (or (pair? (ly:music-property music 'elements))\ (ly:music? (ly:music-property music 'element))\ (pair? (ly:music-property music 'articulations)))))\ \ #(define (noteEvent? music)\ (eq? (name-of music) 'NoteEvent))\ \ #(define (has-notes? music)\ "Return true if there is at least one note in `music, false otherwise."\ (let ((found? #f))\ (let loop ((evt music))\ (cond (found?) ; do nothing : stop loop\ ((noteEvent? evt)(set! found? #t))\ (else ; search deeper\ (let ((e (ly:music-property evt 'element))\ (es (ly:music-property evt 'elements)))\ (if (ly:music? e) (loop e))\ (while (and (pair? es)(not found?))\ (begin\ (loop (\ /Users/kailautenschlager/Documents/02_Musik (SugarSync)/LP/eine kleine fruehlingsweise.dvorak.ttbb/../change-pitch.ly:1:7951: Fehler: GUILE signalisierte einen Fehler f\'fcr den hier beginnenden Ausdruck\ %% version 24/04/2012\ %% for lilypond 2.16 or higher\ \ %% some utility functions\ #(define (name-of music)\ (ly:music-property music 'name))\ \ #(define (good-music? music)\ (and (not (eq? 'Music (name-of music)))\ (or (pair? (ly:music-property music 'elements))\ (ly:music? (ly:music-property music 'element))\ (pair? (ly:music-property music 'articulations)))))\ \ #(define (noteEvent? music)\ (eq? (name-of music) 'NoteEvent))\ \ #(define (has-notes? music)\ "Return true if there is at least one note in `music, false otherwise."\ (let ((found? #f))\ (let loop ((evt music))\ (cond (found?) ; do nothing : stop loop\ ((noteEvent? evt)(set! found? #t))\ (else ; search deeper\ (let ((e (ly:music-property evt 'element))\ (es (ly:music-property evt 'elements)))\ (if (ly:music? e) (loop e))\ (while (and (pair? es)(not found?))\ \ /Users/kailautenschlager/Documents/02_Musik (SugarSync)/LP/eine kleine fruehlingsweise.dvorak.ttbb/../change-pitch.ly:1:8518: Fehler: Ung\'fcltige Fluchtsequenz: \'bb\\samePitch\'ab\ %% version 24/04/2012\ %% for lilypond 2.16 or higher\ \ %% some utility functions\ #(define (name-of music)\ (ly:music-property music 'name))\ \ #(define (good-music? music)\ (and (not (eq? 'Music (name-of music)))\ (or (pair? (ly:music-property music 'elements))\ (ly:music? (ly:music-property music 'element))\ (pair? (ly:music-property music 'articulations)))))\ \ #(define (noteEvent? music)\ (eq? (name-of music) 'NoteEvent))\ \ #(define (has-notes? music)\ "Return true if there is at least one note in `music, false otherwise."\ (let ((found? #f))\ (let loop ((evt music))\ (cond (found?) ; do nothing : stop loop\ ((noteEvent? evt)(set! found? #t))\ (else ; search deeper\ (let ((e (ly:music-property evt 'element))\ (es (ly:music-property evt 'elements)))\ (if (ly:music? e) (loop e))\ (while (and (pair? es)(not found?))\ (begin\ \ /Users/kailautenschlager/Documents/02_Musik (SugarSync)/LP/eine kleine fruehlingsweise.dvorak.ttbb/../change-pitch.ly:1:8745: Fehler: GUILE signalisierte einen Fehler f\'fcr den hier beginnenden Ausdruck\ %% version 24/04/2012\ %% for lilypond 2.16 or higher\ \ %% some utility functions\ #(define (name-of music)\ (ly:music-property music 'name))\ \ #(define (good-music? music)\ (and (not (eq? 'Music (name-of music)))\ (or (pair? (ly:music-property music 'elements))\ (ly:music? (ly:music-property music 'element))\ (pair? (ly:music-property music 'articulations)))))\ \ #(define (noteEvent? music)\ (eq? (name-of music) 'NoteEvent))\ \ #(define (has-notes? music)\ "Return true if there is at least one note in `music, false otherwise."\ (let ((found? #f))\ (let loop ((evt music))\ (cond (found?) ; do nothing : stop loop\ ((noteEvent? evt)(set! found? #t))\ (else ; search deeper\ (let ((e (ly:music-property evt 'element))\ (es (ly:music-property evt 'elements)))\ (if (ly:music? e) (loop e))\ (while (and (pair? es)(not found?))\ \ /Users/kailautenschlager/Documents/02_Musik (SugarSync)/LP/eine kleine fruehlingsweise.dvorak.ttbb/../change-pitch.ly:1:8832: Fehler: Ung\'fcltige Fluchtsequenz: \'bb\\samePitch\'ab\ %% version 24/04/2012\ %% for lilypond 2.16 or higher\ \ %% some utility functions\ #(define (name-of music)\ (ly:music-property music 'name))\ \ #(define (good-music? music)\ (and (not (eq? 'Music (name-of music)))\ (or (pair? (ly:music-property music 'elements))\ (ly:music? (ly:music-property music 'element))\ (pair? (ly:music-property music 'articulations)))))\ \ #(define (noteEvent? music)\ (eq? (name-of music) 'NoteEvent))\ \ #(define (has-notes? music)\ "Return true if there is at least one note in `music, false otherwise."\ (let ((found? #f))\ (let loop ((evt music))\ (cond (found?) ; do nothing : stop loop\ ((noteEvent? evt)(set! found? #t))\ (else ; search deeper\ (let ((e (ly:music-property evt 'element))\ (es (ly:music-property evt 'elements)))\ (if (ly:music? e) (loop e))\ (while (and (pair? es)(not found?))\ (begin\ \ /Users/kailautenschlager/Documents/02_Musik (SugarSync)/LP/eine kleine fruehlingsweise.dvorak.ttbb/../change-pitch.ly:1:9227: Fehler: Ung\'fcltige Fluchtsequenz: \'bb\\insert\'ab\ %% version 24/04/2012\ %% for lilypond 2.16 or higher\ \ %% some utility functions\ #(define (name-of music)\ (ly:music-property music 'name))\ \ #(define (good-music? music)\ (and (not (eq? 'Music (name-of music)))\ (or (pair? (ly:music-property music 'elements))\ (ly:music? (ly:music-property music 'element))\ (pair? (ly:music-property music 'articulations)))))\ \ #(define (noteEvent? music)\ (eq? (name-of music) 'NoteEvent))\ \ #(define (has-notes? music)\ "Return true if there is at least one note in `music, false otherwise."\ (let ((found? #f))\ (let loop ((evt music))\ (cond (found?) ; do nothing : stop loop\ ((noteEvent? evt)(set! found? #t))\ (else ; search deeper\ (let ((e (ly:music-property evt 'element))\ (es (ly:music-property evt 'elements)))\ (if (ly:music? e) (loop e))\ (while (and (pair? es)(not found?))\ (begin\ \ /Users/kailautenschlager/Documents/02_Musik (SugarSync)/LP/eine kleine fruehlingsweise.dvorak.ttbb/../change-pitch.ly:1:9245: Fehler: syntax error, unexpected STRING, expecting DURATION_IDENTIFIER or UNSIGNED\ %% version 24/04/2012\ %% for lilypond 2.16 or higher\ \ %% some utility functions\ #(define (name-of music)\ (ly:music-property music 'name))\ \ #(define (good-music? music)\ (and (not (eq? 'Music (name-of music)))\ (or (pair? (ly:music-property music 'elements))\ (ly:music? (ly:music-property music 'element))\ (pair? (ly:music-property music 'articulations)))))\ \ #(define (noteEvent? music)\ (eq? (name-of music) 'NoteEvent))\ \ #(define (has-notes? music)\ "Return true if there is at least one note in `music, false otherwise."\ (let ((found? #f))\ (let loop ((evt music))\ (cond (found?) ; do nothing : stop loop\ ((noteEvent? evt)(set! found? #t))\ (else ; search deeper\ (let ((e (ly:music-property evt 'element))\ (es (ly:music-property evt 'elements)))\ (if (ly:music? e) (loop e))\ (while (and (pair? es)(not found?))\ \ /Users/kailautenschlager/Documents/02_Musik (SugarSync)/LP/eine kleine fruehlingsweise.dvorak.ttbb/../change-pitch.ly:1:9466: Fehler: Ung\'fcltige Fluchtsequenz: \'bb\\insert\'ab\ %% version 24/04/2012\ %% for lilypond 2.16 or higher\ \ %% some utility functions\ #(define (name-of music)\ (ly:music-property music 'name))\ \ #(define (good-music? music)\ (and (not (eq? 'Music (name-of music)))\ (or (pair? (ly:music-property music 'elements))\ (ly:music? (ly:music-property music 'element))\ (pair? (ly:music-property music 'articulations)))))\ \ #(define (noteEvent? music)\ (eq? (name-of music) 'NoteEvent))\ \ #(define (has-notes? music)\ "Return true if there is at least one note in `music, false otherwise."\ (let ((found? #f))\ (let loop ((evt music))\ (cond (found?) ; do nothing : stop loop\ ((noteEvent? evt)(set! found? #t))\ (else ; search deeper\ (let ((e (ly:music-property evt 'element))\ (es (ly:music-property evt 'elements)))\ (if (ly:music? e) (loop e))\ (while (and (pair? es)(not found?))\ (begin\ \ /Users/kailautenschlager/Documents/02_Musik (SugarSync)/LP/eine kleine fruehlingsweise.dvorak.ttbb/../change-pitch.ly:1:9543: Fehler: syntax error, unexpected ':', expecting DURATION_IDENTIFIER or UNSIGNED\ %% version 24/04/2012\ %% for lilypond 2.16 or higher\ \ %% some utility functions\ #(define (name-of music)\ (ly:music-property music 'name))\ \ #(define (good-music? music)\ (and (not (eq? 'Music (name-of music)))\ (or (pair? (ly:music-property music 'elements))\ (ly:music? (ly:music-property music 'element))\ (pair? (ly:music-property music 'articulations)))))\ \ #(define (noteEvent? music)\ (eq? (name-of music) 'NoteEvent))\ \ #(define (has-notes? music)\ "Return true if there is at least one note in `music, false otherwise."\ (let ((found? #f))\ (let loop ((evt music))\ (cond (found?) ; do nothing : stop loop\ ((noteEvent? evt)(set! found? #t))\ (else ; search deeper\ (let ((e (ly:music-property evt 'element))\ (es (ly:music-property evt 'elements)))\ (if (ly:music? e) (loop e))\ (while (and (pair? es)(not found?))\ \ /Users/kailautenschlager/Documents/02_Musik (SugarSync)/LP/eine kleine fruehlingsweise.dvorak.ttbb/../change-pitch.ly:1:9604: Fehler: GUILE signalisierte einen Fehler f\'fcr den hier beginnenden Ausdruck\ %% version 24/04/2012\ %% for lilypond 2.16 or higher\ \ %% some utility functions\ #(define (name-of music)\ (ly:music-property music 'name))\ \ #(define (good-music? music)\ (and (not (eq? 'Music (name-of music)))\ (or (pair? (ly:music-property music 'elements))\ (ly:music? (ly:music-property music 'element))\ (pair? (ly:music-property music 'articulations)))))\ \ #(define (noteEvent? music)\ (eq? (name-of music) 'NoteEvent))\ \ #(define (has-notes? music)\ "Return true if there is at least one note in `music, false otherwise."\ (let ((found? #f))\ (let loop ((evt music))\ (cond (found?) ; do nothing : stop loop\ ((noteEvent? evt)(set! found? #t))\ (else ; search deeper\ (let ((e (ly:music-property evt 'element))\ (es (ly:music-property evt 'elements)))\ (if (ly:music? e) (loop e))\ (while (and (pair? es)(not found?))\ \ /Users/kailautenschlager/Documents/02_Musik (SugarSync)/LP/eine kleine fruehlingsweise.dvorak.ttbb/../change-pitch.ly:1:10505: Fehler: GUILE signalisierte einen Fehler f\'fcr den hier beginnenden Ausdruck\ %% version 24/04/2012\ %% for lilypond 2.16 or higher\ \ %% some utility functions\ #(define (name-of music)\ (ly:music-property music 'name))\ \ #(define (good-music? music)\ (and (not (eq? 'Music (name-of music)))\ (or (pair? (ly:music-property music 'elements))\ (ly:music? (ly:music-property music 'element))\ (pair? (ly:music-property music 'articulations)))))\ \ #(define (noteEvent? music)\ (eq? (name-of music) 'NoteEvent))\ \ #(define (has-notes? music)\ "Return true if there is at least one note in `music, false otherwise."\ (let ((found? #f))\ (let loop ((evt music))\ (cond (found?) ; do nothing : stop loop\ ((noteEvent? evt)(set! found? #t))\ (else ; search deeper\ (let ((e (ly:music-property evt 'element))\ (es (ly:music-property evt 'elements)))\ (if (ly:music? e) (loop e))\ (while (and (pair? es)(not found?))\ \ /Users/kailautenschlager/Documents/02_Musik (SugarSync)/LP/eine kleine fruehlingsweise.dvorak.ttbb/../change-pitch.ly:1:11109: Fehler: Ung\'fcltige Fluchtsequenz: \'bb\\insert\'ab\ %% version 24/04/2012\ %% for lilypond 2.16 or higher\ \ %% some utility functions\ #(define (name-of music)\ (ly:music-property music 'name))\ \ #(define (good-music? music)\ (and (not (eq? 'Music (name-of music)))\ (or (pair? (ly:music-property music 'elements))\ (ly:music? (ly:music-property music 'element))\ (pair? (ly:music-property music 'articulations)))))\ \ #(define (noteEvent? music)\ (eq? (name-of music) 'NoteEvent))\ \ #(define (has-notes? music)\ "Return true if there is at least one note in `music, false otherwise."\ (let ((found? #f))\ (let loop ((evt music))\ (cond (found?) ; do nothing : stop loop\ ((noteEvent? evt)(set! found? #t))\ (else ; search deeper\ (let ((e (ly:music-property evt 'element))\ (es (ly:music-property evt 'elements)))\ (if (ly:music? e) (loop e))\ (while (and (pair? es)(not found?))\ (begin\ \ /Users/kailautenschlager/Documents/02_Musik (SugarSync)/LP/eine kleine fruehlingsweise.dvorak.ttbb/../change-pitch.ly:1:11367: Fehler: syntax error, unexpected '?', expecting DURATION_IDENTIFIER or UNSIGNED\ %% version 24/04/2012\ %% for lilypond 2.16 or higher\ \ %% some utility functions\ #(define (name-of music)\ (ly:music-property music 'name))\ \ #(define (good-music? music)\ (and (not (eq? 'Music (name-of music)))\ (or (pair? (ly:music-property music 'elements))\ (ly:music? (ly:music-property music 'element))\ (pair? (ly:music-property music 'articulations)))))\ \ #(define (noteEvent? music)\ (eq? (name-of music) 'NoteEvent))\ \ #(define (has-notes? music)\ "Return true if there is at least one note in `music, false otherwise."\ (let ((found? #f))\ (let loop ((evt music))\ (cond (found?) ; do nothing : stop loop\ ((noteEvent? evt)(set! found? #t))\ (else ; search deeper\ (let ((e (ly:music-property evt 'element))\ (es (ly:music-property evt 'elements)))\ (if (ly:music? e) (loop e))\ (while (and (pair? es)(not found?))\ \ /Users/kailautenschlager/Documents/02_Musik (SugarSync)/LP/eine kleine fruehlingsweise.dvorak.ttbb/../change-pitch.ly:1:11506: Fehler: GUILE signalisierte einen Fehler f\'fcr den hier beginnenden Ausdruck\ %% version 24/04/2012\ %% for lilypond 2.16 or higher\ \ %% some utility functions\ #(define (name-of music)\ (ly:music-property music 'name))\ \ #(define (good-music? music)\ (and (not (eq? 'Music (name-of music)))\ (or (pair? (ly:music-property music 'elements))\ (ly:music? (ly:music-property music 'element))\ (pair? (ly:music-property music 'articulations)))))\ \ #(define (noteEvent? music)\ (eq? (name-of music) 'NoteEvent))\ \ #(define (has-notes? music)\ "Return true if there is at least one note in `music, false otherwise."\ (let ((found? #f))\ (let loop ((evt music))\ (cond (found?) ; do nothing : stop loop\ ((noteEvent? evt)(set! found? #t))\ (else ; search deeper\ (let ((e (ly:music-property evt 'element))\ (es (ly:music-property evt 'elements)))\ (if (ly:music? e) (loop e))\ (while (and (pair? es)(not found?))\ \ /Users/kailautenschlager/Documents/02_Musik (SugarSync)/LP/eine kleine fruehlingsweise.dvorak.ttbb/../change-pitch.ly:1:11690: Fehler: Ung\'fcltige Fluchtsequenz: \'bb\\insert\'ab\ %% version 24/04/2012\ %% for lilypond 2.16 or higher\ \ %% some utility functions\ #(define (name-of music)\ (ly:music-property music 'name))\ \ #(define (good-music? music)\ (and (not (eq? 'Music (name-of music)))\ (or (pair? (ly:music-property music 'elements))\ (ly:music? (ly:music-property music 'element))\ (pair? (ly:music-property music 'articulations)))))\ \ #(define (noteEvent? music)\ (eq? (name-of music) 'NoteEvent))\ \ #(define (has-notes? music)\ "Return true if there is at least one note in `music, false otherwise."\ (let ((found? #f))\ (let loop ((evt music))\ (cond (found?) ; do nothing : stop loop\ ((noteEvent? evt)(set! found? #t))\ (else ; search deeper\ (let ((e (ly:music-property evt 'element))\ (es (ly:music-property evt 'elements)))\ (if (ly:music? e) (loop e))\ (while (and (pair? es)(not found?))\ (begin\ \ /Users/kailautenschlager/Documents/02_Musik (SugarSync)/LP/eine kleine fruehlingsweise.dvorak.ttbb/../change-pitch.ly:1:12067: Fehler: syntax error, unexpected STRING, expecting DURATION_IDENTIFIER or UNSIGNED\ %% version 24/04/2012\ %% for lilypond 2.16 or higher\ \ %% some utility functions\ #(define (name-of music)\ (ly:music-property music 'name))\ \ #(define (good-music? music)\ (and (not (eq? 'Music (name-of music)))\ (or (pair? (ly:music-property music 'elements))\ (ly:music? (ly:music-property music 'element))\ (pair? (ly:music-property music 'articulations)))))\ \ #(define (noteEvent? music)\ (eq? (name-of music) 'NoteEvent))\ \ #(define (has-notes? music)\ "Return true if there is at least one note in `music, false otherwise."\ (let ((found? #f))\ (let loop ((evt music))\ (cond (found?) ; do nothing : stop loop\ ((noteEvent? evt)(set! found? #t))\ (else ; search deeper\ (let ((e (ly:music-property evt 'element))\ (es (ly:music-property evt 'elements)))\ (if (ly:music? e) (loop e))\ (while (and (pair? es)(not found?))\ \ /Users/kailautenschlager/Documents/02_Musik (SugarSync)/LP/eine kleine fruehlingsweise.dvorak.ttbb/../change-pitch.ly:1:12075: Fehler: Ung\'fcltige Fluchtsequenz: \'bb\\insert\'ab\ %% version 24/04/2012\ %% for lilypond 2.16 or higher\ \ %% some utility functions\ #(define (name-of music)\ (ly:music-property music 'name))\ \ #(define (good-music? music)\ (and (not (eq? 'Music (name-of music)))\ (or (pair? (ly:music-property music 'elements))\ (ly:music? (ly:music-property music 'element))\ (pair? (ly:music-property music 'articulations)))))\ \ #(define (noteEvent? music)\ (eq? (name-of music) 'NoteEvent))\ \ #(define (has-notes? music)\ "Return true if there is at least one note in `music, false otherwise."\ (let ((found? #f))\ (let loop ((evt music))\ (cond (found?) ; do nothing : stop loop\ ((noteEvent? evt)(set! found? #t))\ (else ; search deeper\ (let ((e (ly:music-property evt 'element))\ (es (ly:music-property evt 'elements)))\ (if (ly:music? e) (loop e))\ (while (and (pair? es)(not found?))\ (begin\ \ /Users/kailautenschlager/Documents/02_Musik (SugarSync)/LP/eine kleine fruehlingsweise.dvorak.ttbb/../change-pitch.ly:1:12139: Fehler: syntax error, unexpected '?', expecting DURATION_IDENTIFIER or UNSIGNED\ %% version 24/04/2012\ %% for lilypond 2.16 or higher\ \ %% some utility functions\ #(define (name-of music)\ (ly:music-property music 'name))\ \ #(define (good-music? music)\ (and (not (eq? 'Music (name-of music)))\ (or (pair? (ly:music-property music 'elements))\ (ly:music? (ly:music-property music 'element))\ (pair? (ly:music-property music 'articulations)))))\ \ #(define (noteEvent? music)\ (eq? (name-of music) 'NoteEvent))\ \ #(define (has-notes? music)\ "Return true if there is at least one note in `music, false otherwise."\ (let ((found? #f))\ (let loop ((evt music))\ (cond (found?) ; do nothing : stop loop\ ((noteEvent? evt)(set! found? #t))\ (else ; search deeper\ (let ((e (ly:music-property evt 'element))\ (es (ly:music-property evt 'elements)))\ (if (ly:music? e) (loop e))\ (while (and (pair? es)(not found?))\ \ /Users/kailautenschlager/Documents/02_Musik (SugarSync)/LP/eine kleine fruehlingsweise.dvorak.ttbb/../change-pitch.ly:1:12207: Fehler: Ung\'fcltige Fluchtsequenz: \'bb\\insert\'ab\ %% version 24/04/2012\ %% for lilypond 2.16 or higher\ \ %% some utility functions\ #(define (name-of music)\ (ly:music-property music 'name))\ \ #(define (good-music? music)\ (and (not (eq? 'Music (name-of music)))\ (or (pair? (ly:music-property music 'elements))\ (ly:music? (ly:music-property music 'element))\ (pair? (ly:music-property music 'articulations)))))\ \ #(define (noteEvent? music)\ (eq? (name-of music) 'NoteEvent))\ \ #(define (has-notes? music)\ "Return true if there is at least one note in `music, false otherwise."\ (let ((found? #f))\ (let loop ((evt music))\ (cond (found?) ; do nothing : stop loop\ ((noteEvent? evt)(set! found? #t))\ (else ; search deeper\ (let ((e (ly:music-property evt 'element))\ (es (ly:music-property evt 'elements)))\ (if (ly:music? e) (loop e))\ (while (and (pair? es)(not found?))\ (begin\ \ /Users/kailautenschlager/Documents/02_Musik (SugarSync)/LP/eine kleine fruehlingsweise.dvorak.ttbb/../change-pitch.ly:1:12325: Fehler: Ung\'fcltige Fluchtsequenz: \'bb\\insert\'ab\ %% version 24/04/2012\ %% for lilypond 2.16 or higher\ \ %% some utility functions\ #(define (name-of music)\ (ly:music-property music 'name))\ \ #(define (good-music? music)\ (and (not (eq? 'Music (name-of music)))\ (or (pair? (ly:music-property music 'elements))\ (ly:music? (ly:music-property music 'element))\ (pair? (ly:music-property music 'articulations)))))\ \ #(define (noteEvent? music)\ (eq? (name-of music) 'NoteEvent))\ \ #(define (has-notes? music)\ "Return true if there is at least one note in `music, false otherwise."\ (let ((found? #f))\ (let loop ((evt music))\ (cond (found?) ; do nothing : stop loop\ ((noteEvent? evt)(set! found? #t))\ (else ; search deeper\ (let ((e (ly:music-property evt 'element))\ (es (ly:music-property evt 'elements)))\ (if (ly:music? e) (loop e))\ (while (and (pair? es)(not found?))\ (begin\ \ /Users/kailautenschlager/Documents/02_Musik (SugarSync)/LP/eine kleine fruehlingsweise.dvorak.ttbb/../change-pitch.ly:1:12983: Fehler: GUILE signalisierte einen Fehler f\'fcr den hier beginnenden Ausdruck\ %% version 24/04/2012\ %% for lilypond 2.16 or higher\ \ %% some utility functions\ #(define (name-of music)\ (ly:music-property music 'name))\ \ #(define (good-music? music)\ (and (not (eq? 'Music (name-of music)))\ (or (pair? (ly:music-property music 'elements))\ (ly:music? (ly:music-property music 'element))\ (pair? (ly:music-property music 'articulations)))))\ \ #(define (noteEvent? music)\ (eq? (name-of music) 'NoteEvent))\ \ #(define (has-notes? music)\ "Return true if there is at least one note in `music, false otherwise."\ (let ((found? #f))\ (let loop ((evt music))\ (cond (found?) ; do nothing : stop loop\ ((noteEvent? evt)(set! found? #t))\ (else ; search deeper\ (let ((e (ly:music-property evt 'element))\ (es (ly:music-property evt 'elements)))\ (if (ly:music? e) (loop e))\ (while (and (pair? es)(not found?))\ \ /Users/kailautenschlager/Documents/02_Musik (SugarSync)/LP/eine kleine fruehlingsweise.dvorak.ttbb/../change-pitch.ly:1:13124: Fehler: GUILE signalisierte einen Fehler f\'fcr den hier beginnenden Ausdruck\ %% version 24/04/2012\ %% for lilypond 2.16 or higher\ \ %% some utility functions\ #(define (name-of music)\ (ly:music-property music 'name))\ \ #(define (good-music? music)\ (and (not (eq? 'Music (name-of music)))\ (or (pair? (ly:music-property music 'elements))\ (ly:music? (ly:music-property music 'element))\ (pair? (ly:music-property music 'articulations)))))\ \ #(define (noteEvent? music)\ (eq? (name-of music) 'NoteEvent))\ \ #(define (has-notes? music)\ "Return true if there is at least one note in `music, false otherwise."\ (let ((found? #f))\ (let loop ((evt music))\ (cond (found?) ; do nothing : stop loop\ ((noteEvent? evt)(set! found? #t))\ (else ; search deeper\ (let ((e (ly:music-property evt 'element))\ (es (ly:music-property evt 'elements)))\ (if (ly:music? e) (loop e))\ (while (and (pair? es)(not found?))\ \ /Users/kailautenschlager/Documents/02_Musik (SugarSync)/LP/eine kleine fruehlingsweise.dvorak.ttbb/../change-pitch.ly:1:13147: Fehler: syntax error, unexpected '(', expecting SCM_FUNCTION or SCM_IDENTIFIER or SCM_TOKEN or '='\ %% version 24/04/2012\ %% for lilypond 2.16 or higher\ \ %% some utility functions\ #(define (name-of music)\ (ly:music-property music 'name))\ \ #(define (good-music? music)\ (and (not (eq? 'Music (name-of music)))\ (or (pair? (ly:music-property music 'elements))\ (ly:music? (ly:music-property music 'element))\ (pair? (ly:music-property music 'articulations)))))\ \ #(define (noteEvent? music)\ (eq? (name-of music) 'NoteEvent))\ \ #(define (has-notes? music)\ "Return true if there is at least one note in `music, false otherwise."\ (let ((found? #f))\ (let loop ((evt music))\ (cond (found?) ; do nothing : stop loop\ ((noteEvent? evt)(set! found? #t))\ (else ; search deeper\ (let ((e (ly:music-property evt 'element))\ (es (ly:music-property evt 'elements)))\ (if (ly:music? e) (loop e))\ (while (and (pair? es)\ /Users/kailautenschlager/Documents/02_Musik (SugarSync)/LP/eine kleine fruehlingsweise.dvorak.ttbb/../change-pitch.ly:1:13549: Fehler: GUILE signalisierte einen Fehler f\'fcr den hier beginnenden Ausdruck\ %% version 24/04/2012\ %% for lilypond 2.16 or higher\ \ %% some utility functions\ #(define (name-of music)\ (ly:music-property music 'name))\ \ #(define (good-music? music)\ (and (not (eq? 'Music (name-of music)))\ (or (pair? (ly:music-property music 'elements))\ (ly:music? (ly:music-property music 'element))\ (pair? (ly:music-property music 'articulations)))))\ \ #(define (noteEvent? music)\ (eq? (name-of music) 'NoteEvent))\ \ #(define (has-notes? music)\ "Return true if there is at least one note in `music, false otherwise."\ (let ((found? #f))\ (let loop ((evt music))\ (cond (found?) ; do nothing : stop loop\ ((noteEvent? evt)(set! found? #t))\ (else ; search deeper\ (let ((e (ly:music-property evt 'element))\ (es (ly:music-property evt 'elements)))\ (if (ly:music? e) (loop e))\ (while (and (pair? es)(not found?))\ \ /Users/kailautenschlager/Documents/02_Musik (SugarSync)/LP/eine kleine fruehlingsweise.dvorak.ttbb/../change-pitch.ly:1:13956: Fehler: GUILE signalisierte einen Fehler f\'fcr den hier beginnenden Ausdruck\ %% version 24/04/2012\ %% for lilypond 2.16 or higher\ \ %% some utility functions\ #(define (name-of music)\ (ly:music-property music 'name))\ \ #(define (good-music? music)\ (and (not (eq? 'Music (name-of music)))\ (or (pair? (ly:music-property music 'elements))\ (ly:music? (ly:music-property music 'element))\ (pair? (ly:music-property music 'articulations)))))\ \ #(define (noteEvent? music)\ (eq? (name-of music) 'NoteEvent))\ \ #(define (has-notes? music)\ "Return true if there is at least one note in `music, false otherwise."\ (let ((found? #f))\ (let loop ((evt music))\ (cond (found?) ; do nothing : stop loop\ ((noteEvent? evt)(set! found? #t))\ (else ; search deeper\ (let ((e (ly:music-property evt 'element))\ (es (ly:music-property evt 'elements)))\ (if (ly:music? e) (loop e))\ (while (and (pair? es)(not found?))\ \ /Users/kailautenschlager/Documents/02_Musik (SugarSync)/LP/eine kleine fruehlingsweise.dvorak.ttbb/../change-pitch.ly:1:13979: Fehler: syntax error, unexpected '(', expecting SCM_FUNCTION or SCM_IDENTIFIER or SCM_TOKEN or '='\ %% version 24/04/2012\ %% for lilypond 2.16 or higher\ \ %% some utility functions\ #(define (name-of music)\ (ly:music-property music 'name))\ \ #(define (good-music? music)\ (and (not (eq? 'Music (name-of music)))\ (or (pair? (ly:music-property music 'elements))\ (ly:music? (ly:music-property music 'element))\ (pair? (ly:music-property music 'articulations)))))\ \ #(define (noteEvent? music)\ (eq? (name-of music) 'NoteEvent))\ \ #(define (has-notes? music)\ "Return true if there is at least one note in `music, false otherwise."\ (let ((found? #f))\ (let loop ((evt music))\ (cond (found?) ; do nothing : stop loop\ ((noteEvent? evt)(set! found? #t))\ (else ; search deeper\ (let ((e (ly:music-property evt 'element))\ (es (ly:music-property evt 'elements)))\ (if (ly:music? e) (loop e))\ (while (and (pair? es)\ /Users/kailautenschlager/Documents/02_Musik (SugarSync)/LP/eine kleine fruehlingsweise.dvorak.ttbb/../change-pitch.ly:1:14695: Fehler: falscher Typ f\'fcr Argument 2; music erwartet, "mode" gefunden\ %% version 24/04/2012\ %% for lilypond 2.16 or higher\ \ %% some utility functions\ #(define (name-of music)\ (ly:music-property music 'name))\ \ #(define (good-music? music)\ (and (not (eq? 'Music (name-of music)))\ (or (pair? (ly:music-property music 'elements))\ (ly:music? (ly:music-property music 'element))\ (pair? (ly:music-property music 'articulations)))))\ \ #(define (noteEvent? music)\ (eq? (name-of music) 'NoteEvent))\ \ #(define (has-notes? music)\ "Return true if there is at least one note in `music, false otherwise."\ (let ((found? #f))\ (let loop ((evt music))\ (cond (found?) ; do nothing : stop loop\ ((noteEvent? evt)(set! found? #t))\ (else ; search deeper\ (let ((e (ly:music-property evt 'element))\ (es (ly:music-property evt 'elements)))\ (if (ly:music? e) (loop e))\ (while (and (pair? es)(not found?))\ \ /Users/kailautenschlager/Documents/02_Musik (SugarSync)/LP/eine kleine fruehlingsweise.dvorak.ttbb/../change-pitch.ly:1:14720: Fehler: syntax error, unexpected '('\ %% version 24/04/2012\ %% for lilypond 2.16 or higher\ \ %% some utility functions\ #(define (name-of music)\ (ly:music-property music 'name))\ \ #(define (good-music? music)\ (and (not (eq? 'Music (name-of music)))\ (or (pair? (ly:music-property music 'elements))\ (ly:music? (ly:music-property music 'element))\ (pair? (ly:music-property music 'articulations)))))\ \ #(define (noteEvent? music)\ (eq? (name-of music) 'NoteEvent))\ \ #(define (has-notes? music)\ "Return true if there is at least one note in `music, false otherwise."\ (let ((found? #f))\ (let loop ((evt music))\ (cond (found?) ; do nothing : stop loop\ ((noteEvent? evt)(set! found? #t))\ (else ; search deeper\ (let ((e (ly:music-property evt 'element))\ (es (ly:music-property evt 'elements)))\ (if (ly:music? e) (loop e))\ (while (and (pair? es)(not found?))\ (begin\ (loop (\ Interpretation der Musik...\ Interpretation der Musik...[8]\ Vorverarbeitung der grafischen Elemente...\ MIDI-Ausgabe nach \'bbeine kleine fruehlingsweise.dvorak.ttbb.midi\'ab...\ Zeilenumbr\'fcche werden berechnet...\ Zeilenumbr\'fcche werden berechnet...\ Layout nach \'bbeine kleine fruehlingsweise.dvorak.ttbb.ps\'ab ausgeben...\ Konvertierung nach \'bb./eine kleine fruehlingsweise.dvorak.ttbb.pdf\'ab...\ /Users/kailautenschlager/Documents/02_Musik (SugarSync)/LP/eine kleine fruehlingsweise.dvorak.ttbb/../change-pitch.ly:1:1: end of file\ Unbound variable: t\ /Users/kailautenschlager/Documents/02_Musik (SugarSync)/LP/eine kleine fruehlingsweise.dvorak.ttbb/../change-pitch.ly:1:1: end of file\ /Users/kailautenschlager/Documents/02_Musik (SugarSync)/LP/eine kleine fruehlingsweise.dvorak.ttbb/../change-pitch.ly:1:1: end of file\ Unbound variable: t\ /Users/kailautenschlager/Documents/02_Musik (SugarSync)/LP/eine kleine fruehlingsweise.dvorak.ttbb/../change-pitch.ly:1:1: end of file\ /Users/kailautenschlager/Documents/02_Musik (SugarSync)/LP/eine kleine fruehlingsweise.dvorak.ttbb/../change-pitch.ly:1:1: end of file\ Unbound variable: t\ /Users/kailautenschlager/Documents/02_Musik (SugarSync)/LP/eine kleine fruehlingsweise.dvorak.ttbb/../change-pitch.ly:1:1: end of file\ /Users/kailautenschlager/Documents/02_Musik (SugarSync)/LP/eine kleine fruehlingsweise.dvorak.ttbb/../change-pitch.ly:1:1: end of file\ /Users/kailautenschlager/Documents/02_Musik (SugarSync)/LP/eine kleine fruehlingsweise.dvorak.ttbb/../change-pitch.ly:1:1: end of file\ /Users/kailautenschlager/Documents/02_Musik (SugarSync)/LP/eine kleine fruehlingsweise.dvorak.ttbb/../change-pitch.ly:1:1: end of file\ Unbound variable: t\ Unbound variable: t\ Unbound variable: t\ Unbound variable: t\ Unbound variable: t\ Unbound variable: t\ /Users/kailautenschlager/Documents/02_Musik (SugarSync)/LP/eine kleine fruehlingsweise.dvorak.ttbb/../change-pitch.ly:1:1: end of file\ Unbound variable: chord-repeat-events\ /Users/kailautenschlager/Documents/02_Musik (SugarSync)/LP/eine kleine fruehlingsweise.dvorak.ttbb/../change-pitch.ly:1:1: end of file\ schwerer Fehler: gescheiterte Dateien: "/Users/kailautenschlager/Documents/02_Musik (SugarSync)/LP/eine kleine fruehlingsweise.dvorak.ttbb/eine kleine fruehlingsweise.dvorak.ttbb.ly"\ Processing time: 2 seconds\ > }