input/manual/simultaneous-headword.ly

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