displayLilyMusic =
#(define-music-function (parser location music) (ly:music?)
- (_i "Display @var{music} to the console in LilyPond input notation.")
+ (_i "Display the LilyPond input representation of @var{music}
+to the console.")
(newline)
(display-lily-music music parser)
music)
featherDurations=
#(define-music-function (parser location factor argument) (ly:moment? ly:music?)
- (_i "Rearrange durations in ARGUMENT so there is an
-acceleration/deceleration. ")
-
+ (_i "Adjust durations of music in @var{argument} by rational @var{factor}. ")
(let*
((orig-duration (ly:music-length argument))
(multiplier (ly:make-moment 1 1)))
argument))
grace =
-#(def-grace-function startGraceMusic stopGraceMusic)
-
+#(def-grace-function startGraceMusic stopGraceMusic
+ (_i "Insert @var{music} as grace notes."))
"instrument-definitions" = #'()
instrumentSwitch =
#(define-music-function
(parser location name) (string?)
+ (_i "Switch instrument to @var{name}, which must be predefined with
+@var{\addInstrumentDefinition}.")
(let*
((handle (assoc name instrument-definitions))
(instrument-def (if handle (cdr handle) '()))
includePageLayoutFile =
#(define-music-function (parser location) ()
- (_i "If page breaks and tweak dump is not asked, and the file
-<basename>-page-layout.ly exists, include it.")
+ (_i "Include the file @var{<basename>-page-layout.ly}. Deprecated as
+part of two-pass spacing.")
(if (not (ly:get-option 'dump-tweaks))
(let ((tweak-filename (format #f "~a-page-layout.ly"
(ly:parser-output-name parser))))
tweak-filename))))))
(make-music 'SequentialMusic 'void #t))
-
-
keepWithTag =
#(define-music-function
(parser location tag music) (symbol? ly:music?)
+ (_i "Include only elements of @var{music} that are tagged with @var{tag}.")
(music-filter
(lambda (m)
(let* ((tags (ly:music-property m 'tags))
removeWithTag =
#(define-music-function
(parser location tag music) (symbol? ly:music?)
+ (_i "Remove elements of @var{music} that are tagged with @var{tag}.")
(music-filter
(lambda (m)
(let* ((tags (ly:music-property m 'tags))
#(define-music-function
(parser location music)
(ly:music?)
+ (_i "Remove cue notes from @var{music}.")
(music-map
(lambda (mus)
(if (string? (ly:music-property mus 'quoted-music-name))
label =
#(define-music-function (parser location label) (symbol?)
- (_i "Place a bookmarking label, either at top-level or inside music.")
+ (_i "Create @var{label} as a bookmarking label")
(make-music 'EventChord
'page-marker #t
'page-label label
makeClusters =
#(define-music-function
(parser location arg) (ly:music?)
+ (_i "Display chords in @var{arg} as clusters")
(music-map note-to-cluster arg))
musicMap =