input/lsr/changing--flageolet-mark-size.ly

   1 %% Do not edit this file; it is auto-generated from LSR http://lsr.dsi.unimi.it
   2 %% This file is in the public domain.
   3 \version "2.13.1"
   4
   5 \header {
   6   lsrtags = "expressive-marks, unfretted-strings"
   7
   8   texidoces = "
   9 Para hacer más pequeño el círculo de @code{\\flageolet} (armónico)
  10 utilice la siguiente función de Scheme.
  11
  12 "
  13   doctitlees = "Cambiar el tamaño de la marca de \\flageolet"
  14
  15 %% Translation of GIT committish: 0099693675b95c7ec6664d7277f22411a14e9c1b
  16
  17   texidocfr = "
  18 Il est possible de rapetisser le cercle d'un @code{\\flageolet} grâce
  19 à une fonction Scheme.
  20
  21 "
  22   doctitlefr = "Modifier la taille d'un \\flageolet"
  23
  24 %% Translation of GIT committish :33f623301a41fcc53efadf96bca1c72834763415
  25   texidocde = "
  26 Um den @code{\\flageolet}-Kreis kleiner zu machen, kann diese
  27 Scheme-Funktion eingesetzt werden.
  28
  29 "
  30   doctitlede = "\\flageolet-Zeichen verkleinern"
  31
  32   texidoc = "
  33 To make the @code{\\flageolet} circle smaller use the following Scheme
  34 function.
  35
  36 "
  37   doctitle = "Changing \\flageolet mark size"
  38 } % begin verbatim
  39
  40 smallFlageolet =
  41 #(let ((m (make-music 'ArticulationEvent
  42                       'articulation-type "flageolet")))
  43    (ly:music-set-property! m 'tweaks
  44      (acons 'font-size -3
  45        (ly:music-property m 'tweaks)))
  46   m)
  47
  48 \layout { ragged-right = ##f }
  49
  50 \relative c'' {
  51   d4^\flageolet_\markup { default size } d_\flageolet
  52   c4^\smallFlageolet_\markup { smaller } c_\smallFlageolet
  53 }