%% Generated by lilypond-book.py
%% Options: [indent=0\mm,quote]
\include "lilypond-book-preamble.ly"


% ****************************************************************
% Start cut-&-pastable-section
% ****************************************************************



\paper {
  indent = 0\mm
  line-width = 160\mm - 2.0 * 0.4\in
  force-assignment = #""
  line-width = #(- line-width (* mm  3.000000))
}

\layout {
  
}





% ****************************************************************
% ly snippet:
% ****************************************************************
\sourcefilename "simultaneous-headword.ly"
\sourcefileline 0
% DO NOT EDIT this file manually; it is automatically
% generated from Documentation/snippets/new
% Make any changes in Documentation/snippets/new/
% and then run scripts/auxiliar/makelsr.py
%
% This file is in the public domain.
%% Note: this file works from version 2.13.36
\version "2.14.0"
\include "english.ly"
#(set-global-staff-size 15)
\paper {
  ragged-right = ##t
  line-width = 17\cm
  indent = 0\cm
}

\header {
  lsrtags = "headwords"
  texidoc = ""
  doctitle = "headword"
} % begin verbatim


% NR 1.5 Simultaneous notes

% L. v. Beethoven, Op. 111
% Piano sonata 32
% Movt II - Arietta - Adagio molto semplice e cantabile
% measures 108 - 118

\layout {
  \context {
    \Score
    \override SpacingSpanner #'base-shortest-duration =
    #(ly:make-moment 1 18)
    \override NonMusicalPaperColumn #'line-break-system-details =
    #'((alignment-distances . (12)))
  }
}

trillFlat =
\once \override TrillSpanner #'(bound-details left text) = \markup {
  \concat {
    \musicglyph #"scripts.trill"
    \translate #'(-0.5 . 1.9)
    \fontsize #-7
    \with-dimensions #'(0 . 0) #'(0 . 0)
    \flat
  }
}

\new PianoStaff <<

  % RH
  \new Staff <<
    \clef treble
    \key c \major
    \time 9/16
    \set Score.currentBarNumber = #108

    % RH voice 1
    \new Voice {

      \voiceOne
      s4.
      s8.

      |

      s4.
      a''8 \p \> [ (
      g''16 ] )

      |

      g''4.
      af''8 [ (
      g''16 ] )

      |

      g''8. [
      g''8.
      g''8. \pp ]

      |

      g''8. [
      af''8.
      af''8. ]

      |

      af''8. [
      af''8.
      af''8. ]

      |
      \break

      \trillFlat
      af''4. \startTrillSpan
      ~
      af''8.
      ~

      |

      af''4.
      ~
      af''8.
      ~

      |

      \oneVoice
      <af'' d''>8. [
      a''8. \p \<
      bf''8. ]
      ~

      |

      bf''8. [
      b''8.
      c'''8. ]
      ~

      \bar "||"

      \key ef \major
      c'''8. [
      cs'''8. \f ] \stopTrillSpan
      r8.

    }

    % RH voice 2
    \new Voice {
      \voiceTwo
      \override Voice.TrillSpanner #'direction = #DOWN
      d''4. \f \startTrillSpan
      ~
      d''8.
      ~

      |

      d''4.
      ~
      d''8.
      ~

      |

      d''8. \stopTrillSpan
      \trillFlat
      d''4. \startTrillSpan
      ~

      |

      d''4.
      ~
      d''8.
      ~

      |

      d''4.
      ~
      d''8.
      ~

      |

      d''4.
      ~
      d''8. \stopTrillSpan
      ~

      |

      \trillFlat
      d''4. \startTrillSpan
      ~
      d''8.
      ~

      |

      d''4.
      ~
      d''8.
      ~

      |

      \once \override NoteColumn #'ignore-collision = ##t
      \hideNotes
      d''8. \stopTrillSpan
      s4.

      |

      s8.
      s8.

    }

  >>

  % LH staff
  \new Staff {
    \clef bass
    \key c \major
    \time 9/16

    r8.
    r8.
    <c! c,!>8 [ (
    <g, g,,>16 ] )

    |

    <g, g,,>4.
    \clef treble
    c''8 [ (
    b'16 ] )

    |

    b'4.
    c''8 [ (
    b'16 ] )

    |

    b'8. [
    b'8.
    b'8. ]

    |

    b'8. [
    bf'8. ]
    \clef bass
    <f f,>8 [ (
    <bf, bf,,>16 ] )

    |

    <bf, bf,,>4.
    \clef treble
    f'8 [ (
    bf16 ] )

    |

    <<

      \new Voice {
        \voiceOne
        \override Voice.TrillSpanner #'direction = #UP
        f'4. \startTrillSpan
        ~
        f'8.
        ~

        |

        f'4.
        ~
        f'8.
        ~

        |

        f'8. \stopTrillSpan
      }

      \new Voice {
        \voiceTwo
        \override Voice.TrillSpanner #'direction = #DOWN
        bf8. [
        bf8.
        bf8. ]

        |

        bf8. [
        bf8.
        bf8. ]

        |

        bf8.
      }

    >>

    \oneVoice
    r8.
    r8.

    |

    r8.
    r8.
    r8.
    \clef bass

    |

    \key ef \major
    r8.
    r8.
    r8.

  }

>>



% ****************************************************************
% end ly snippet
% ****************************************************************
