Documentation/snippets/changing--flageolet-mark-size.ly

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