Documentation/snippets/simultaneous-headword.ly

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