Documentation/snippets/simultaneous-headword.ly

   1 % DO NOT EDIT this file manually; it is automatically
   2 % generated from Documentation/snippets/new
   3 % Make any changes in Documentation/snippets/new/
   4 % and then run scripts/auxiliar/makelsr.py
   5 %
   6 % This file is in the public domain.
   7 %% Note: this file works from version 2.13.36
   8 \version "2.14.0"
   9 \include "english.ly"
  10 #(set-global-staff-size 15)
  11 \paper {
  12   ragged-right = ##t
  13   line-width = 17\cm
  14   indent = 0\cm
  15 }
  16
  17 \header {
  18   lsrtags = "headwords"
  19   texidoc = ""
  20   doctitle = "headword"
  21 } % begin verbatim
  22
  23
  24 % NR 1.5 Simultaneous notes
  25
  26 % L. v. Beethoven, Op. 111
  27 % Piano sonata 32
  28 % Movt II - Arietta - Adagio molto semplice e cantabile
  29 % measures 108 - 118
  30
  31 \layout {
  32   \context {
  33     \Score
  34     \override SpacingSpanner #'base-shortest-duration =
  35     #(ly:make-moment 1 18)
  36     \override NonMusicalPaperColumn #'line-break-system-details =
  37     #'((alignment-distances . (12)))
  38   }
  39 }
  40
  41 trillFlat =
  42 \once \override TrillSpanner #'(bound-details left text) = \markup {
  43   \concat {
  44     \musicglyph #"scripts.trill"
  45     \translate #'(-0.5 . 1.9)
  46     \fontsize #-7
  47     \with-dimensions #'(0 . 0) #'(0 . 0)
  48     \flat
  49   }
  50 }
  51
  52 \new PianoStaff <<
  53
  54   % RH
  55   \new Staff <<
  56     \clef treble
  57     \key c \major
  58     \time 9/16
  59     \set Score.currentBarNumber = #108
  60
  61     % RH voice 1
  62     \new Voice {
  63
  64       \voiceOne
  65       s4.
  66       s8.
  67
  68       |
  69
  70       s4.
  71       a''8 \p \> [ (
  72       g''16 ] )
  73
  74       |
  75
  76       g''4.
  77       af''8 [ (
  78       g''16 ] )
  79
  80       |
  81
  82       g''8. [
  83       g''8.
  84       g''8. \pp ]
  85
  86       |
  87
  88       g''8. [
  89       af''8.
  90       af''8. ]
  91
  92       |
  93
  94       af''8. [
  95       af''8.
  96       af''8. ]
  97
  98       |
  99       \break
 100
 101       \trillFlat
 102       af''4. \startTrillSpan
 103       ~
 104       af''8.
 105       ~
 106
 107       |
 108
 109       af''4.
 110       ~
 111       af''8.
 112       ~
 113
 114       |
 115
 116       \oneVoice
 117       <af'' d''>8. [
 118       a''8. \p \<
 119       bf''8. ]
 120       ~
 121
 122       |
 123
 124       bf''8. [
 125       b''8.
 126       c'''8. ]
 127       ~
 128
 129       \bar "||"
 130
 131       \key ef \major
 132       c'''8. [
 133       cs'''8. \f ] \stopTrillSpan
 134       r8.
 135
 136     }
 137
 138     % RH voice 2
 139     \new Voice {
 140       \voiceTwo
 141       \override Voice.TrillSpanner #'direction = #DOWN
 142       d''4. \f \startTrillSpan
 143       ~
 144       d''8.
 145       ~
 146
 147       |
 148
 149       d''4.
 150       ~
 151       d''8.
 152       ~
 153
 154       |
 155
 156       d''8. \stopTrillSpan
 157       \trillFlat
 158       d''4. \startTrillSpan
 159       ~
 160
 161       |
 162
 163       d''4.
 164       ~
 165       d''8.
 166       ~
 167
 168       |
 169
 170       d''4.
 171       ~
 172       d''8.
 173       ~
 174
 175       |
 176
 177       d''4.
 178       ~
 179       d''8. \stopTrillSpan
 180       ~
 181
 182       |
 183
 184       \trillFlat
 185       d''4. \startTrillSpan
 186       ~
 187       d''8.
 188       ~
 189
 190       |
 191
 192       d''4.
 193       ~
 194       d''8.
 195       ~
 196
 197       |
 198
 199       \once \override NoteColumn #'ignore-collision = ##t
 200       \hideNotes
 201       d''8. \stopTrillSpan
 202       s4.
 203
 204       |
 205
 206       s8.
 207       s8.
 208
 209     }
 210
 211   >>
 212
 213   % LH staff
 214   \new Staff {
 215     \clef bass
 216     \key c \major
 217     \time 9/16
 218
 219     r8.
 220     r8.
 221     <c! c,!>8 [ (
 222     <g, g,,>16 ] )
 223
 224     |
 225
 226     <g, g,,>4.
 227     \clef treble
 228     c''8 [ (
 229     b'16 ] )
 230
 231     |
 232
 233     b'4.
 234     c''8 [ (
 235     b'16 ] )
 236
 237     |
 238
 239     b'8. [
 240     b'8.
 241     b'8. ]
 242
 243     |
 244
 245     b'8. [
 246     bf'8. ]
 247     \clef bass
 248     <f f,>8 [ (
 249     <bf, bf,,>16 ] )
 250
 251     |
 252
 253     <bf, bf,,>4.
 254     \clef treble
 255     f'8 [ (
 256     bf16 ] )
 257
 258     |
 259
 260     <<
 261
 262       \new Voice {
 263         \voiceOne
 264         \override Voice.TrillSpanner #'direction = #UP
 265         f'4. \startTrillSpan
 266         ~
 267         f'8.
 268         ~
 269
 270         |
 271
 272         f'4.
 273         ~
 274         f'8.
 275         ~
 276
 277         |
 278
 279         f'8. \stopTrillSpan
 280       }
 281
 282       \new Voice {
 283         \voiceTwo
 284         \override Voice.TrillSpanner #'direction = #DOWN
 285         bf8. [
 286         bf8.
 287         bf8. ]
 288
 289         |
 290
 291         bf8. [
 292         bf8.
 293         bf8. ]
 294
 295         |
 296
 297         bf8.
 298       }
 299
 300     >>
 301
 302     \oneVoice
 303     r8.
 304     r8.
 305
 306     |
 307
 308     r8.
 309     r8.
 310     r8.
 311     \clef bass
 312
 313     |
 314
 315     \key ef \major
 316     r8.
 317     r8.
 318     r8.
 319
 320   }
 321
 322 >>