- lsrtags = "expressive-marks"
- texidoc = "
-To make the \\flageolet circle smaller you can use the following scheme
-code (found in the Lilypond-user-archive)
-" }
-% begin verbatim
-F = #(let ((m (make-music 'ArticulationEvent
+ 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"
+} % begin verbatim
+
+smallFlageolet = #(let ((m (make-music 'ArticulationEvent