input/manual/simultaneous-headword.ly

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