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.11.38"
   4
   5 \header {
   6   lsrtags = "expressive-marks"
   7  texidoc = "
   8 To make the \\flageolet circle smaller you can use the following scheme
   9 code (found in the Lilypond-user-archive)
  10 " }
  11 % begin verbatim
  12 F = #(let ((m (make-music 'ArticulationEvent
  13                           'articulation-type "flageolet")))
  14        (set! (ly:music-property m 'tweaks)
  15              (acons 'font-size -3
  16                     (ly:music-property m 'tweaks)))
  17        m)
  18
  19 \relative c'' { d4^\flageolet_\markup {"orginal \flageolet "} d4_\flageolet
  20   c4^\F_\markup {smaller } c4_\F
  21 }