X-Git-Url: https://git.donarmstrong.com/?a=blobdiff_plain;f=input%2Flsr%2Fchanging--flageolet-mark-size.ly;h=2009bb2528e7be93efc9de296e6934e1e04456b7;hb=9072fef54417606d8e3f972ce0c07da2e0a84abb;hp=179f87fcc85d310c1517e8796c74411723aaf759;hpb=0cd61a3be7ca856b584973217944eea1b9cbedac;p=lilypond.git diff --git a/input/lsr/changing--flageolet-mark-size.ly b/input/lsr/changing--flageolet-mark-size.ly index 179f87fcc8..2009bb2528 100644 --- a/input/lsr/changing--flageolet-mark-size.ly +++ b/input/lsr/changing--flageolet-mark-size.ly @@ -1,17 +1,25 @@ %% Do not edit this file; it is auto-generated from LSR http://lsr.dsi.unimi.it %% This file is in the public domain. -\version "2.11.38" +\version "2.12.0" \header { - lsrtags = "expressive-marks" + lsrtags = "expressive-marks, unfretted-strings" + + texidoces = " +Para hacer más pequeño el círculo de @code{\\flageolet} (armónico) +utilice la siguiente función de Scheme. + +" + doctitlees = "Cambiar el tamaño de la marca de \\flageolet" texidoc = " To make the @code{\\flageolet} circle smaller use the following Scheme function. " - doctitle = "Changing \flageolet mark size" + doctitle = "Changing \\flageolet mark size" } % begin verbatim + smallFlageolet = #(let ((m (make-music 'ArticulationEvent 'articulation-type "flageolet"))) (set! (ly:music-property m 'tweaks) @@ -19,7 +27,9 @@ smallFlageolet = #(let ((m (make-music 'ArticulationEvent (ly:music-property m 'tweaks))) m) +\layout { ragged-right = ##f } + \relative c'' { - d4^\flageolet_\markup { default size } d4_\flageolet - c4^\smallFlageolet_\markup { smaller } c4_\smallFlageolet + d4^\flageolet_\markup { default size } d_\flageolet + c4^\smallFlageolet_\markup { smaller } c_\smallFlageolet }