View source for “Schleifer” ornament implemented as modified grace note

Implementation by Martin Straeten of the Schleifer ornament as used by Johann Sebastian Bach, contributed to the user mailing list [https://lists.gnu.org/archive/html/lilypond-user/2021-09/msg00352.html here]. In this case, it functions like a set of (always?) two grace notes, hence using a modified grace note to represent it in LilyPond makes sense.

Code styling and user interface by Simon Albrecht 2024.

<lilypond version="2.24">
schleiferMarkup = \markup {
  \large \halign #.2 \raise #0.0
  \combine
  \halign #.8 \musicglyph "scripts.prall"
  \rotate #140 \normalsize \raise #2.4 \musicglyph "flags.u3"
}
schleiferGrace =
#(define-music-function (note) (ly:music?)
   #{
     \grace {
       \once\override NoteHead.stencil = #ly:text-interface::print
       \once\override NoteHead.X-extent = #'(-2 . -0)
       \once\override NoteHead.text = \schleiferMarkup
       \once\omit Stem
       \once\omit Flag
       $note
     }
   #})

\relative {
  \time 3/8
  \partial 8
  \clef bass
  \key c \minor
  g8
  \schleiferGrace c es8. d16 c8
  c4
}
\addlyrics {
  Ich ha -- be ge -- nug
}
</lilypond>

[[Category:Ancient notation]]
[[Category:Expressive marks]]
[[Category:Symbols and glyphs]]
[[Category:Snippet]]