input/manual/keyboard-headword.ly

   1 % Sergei Rachmaninoff, Prelude Op. 3 No. 5, mm. 44–47
   2
   3 \version "2.11.49"
   4 \include "english.ly"
   5
   6 #(set-global-staff-size 15)
   7 \paper{
   8   ragged-right=##t
   9   line-width=17\cm
  10   indent=0\cm
  11 }
  12
  13 rh = { \change Staff = RH \voiceFour }
  14 lh = { \change Staff = LH \voiceOne }
  15
  16 \new PianoStaff <<
  17   \set Score.currentBarNumber = #44
  18   \new Staff = "RH" {
  19     <<
  20       \override Staff.NoteCollision #'merge-differently-dotted = ##t
  21       \relative c''' {
  22         \key g \minor
  23         r8 <a fs>--( <a fs>-- <bf fs d bf>-- <c g ef c>4-- <bf bf,>8 <a
  24           a,>8)
  25         <g g,>8( <a a,> <bf bf,>4)-- <fs d c fs,>8(-- <g g,> <a d, c a>4)
  26         r8 <bf bf,>(_\markup \italic cresc. <bf g d> <c c,>
  27           <d bf af d,>4) <c c,>8( <bf bf,>)
  28         <c ef, c>\mf( <d d,> <ef ef,> <f f,>) <g g,>( <a a,>4\> <bf
  29           bf,>8)\!
  30         <fs, fs,>8\p
  31       }
  32       \\
  33       \relative c'' {
  34         s8 a16( c d4)-- s4 <ef c>
  35         <e cs>4 <e cs> s2
  36         s1
  37         s4 <bf' g> <d bf>2
  38       }
  39     >>
  40   }
  41   \new Staff = "LH" <<
  42     \override Staff.NoteCollision #'merge-differently-dotted = ##t
  43     \clef bass
  44     \key g \minor
  45     \new Voice \relative c' {
  46       \rh <c~ fs,>2-- c8 \lh d ef f
  47       g4 fs8-- \rh g^- a4.-- a16( c
  48       \showStaffSwitch
  49       <d bf d,>2--) r8 d-- ef-- f--
  50       g4-- \lh g,~-- g8 \clef treble a-- bf-- c--
  51       \rh d2*1/4
  52     }
  53     \new Voice \relative c, {
  54       \times 4/6 {d16[( a' d fs c' d]}
  55       \override TupletNumber #'transparent = ##t
  56       \times 4/6 {fs d c fs, d a)}
  57       \voiceTwo
  58       \times 4/6 {d,[ a' g' d'( c g)]}
  59       \times 4/6 {ef'( c g) f'( c g)}
  60
  61       \times 4/6 {d,[( a' g' a bf cs])}
  62       \times 4/6 {fs( cs bf g a, d,~)}
  63       \oneVoice
  64       \times 4/6 {d[( a' d d a' d]}
  65       \times 4/6 {c a d, d d, d')}
  66
  67       \times 4/6 {g,[( d' g bf \clef treble d g]}
  68       \times 4/6 {bf g d \clef bass bf g d)}
  69       \times 4/6 {f,([ d' g af bf \clef treble d]}
  70       \times 4/6 {af' ef bf d \clef bass af bf,)}
  71
  72       \times 4/6 {ef,([ bf' g' bf ef f])}
  73       \voiceTwo
  74       \times 4/6 {g( ef bf g bf, ef,)}
  75       \times 4/6 {e[( g' <d' bf>) a'( g d)]}
  76       \times 4/6 {bf'( g d) c'( g d)}
  77
  78       \oneVoice
  79       \clef bass a,,16
  80     }
  81   >>
  82 >>