\version "2.10.25"
\include "english.ly"

\header
{
  title    	    = "Polonaise in F major"
  composer 	    = "Johann Sebastian Bach"
  opus     	    = "BWV Anh. 117a"
  mutopiacomposer   = "BachJS"
  mutopiainstrument = "piano"
  source	    = "Bach-Gesellschaft Ausgabe 1851-1899 Band 43 (1894)"
  sourceurl         = "http://imslp.org/wiki/Notebook_for_Anna_Magdalena_Bach_(Bach,_Johann_Sebastian)"
  style	            = "Baroque"
  copyright	    = "Public Domain"
  maintainer	    = "Steven McDougall"
  maintainerEmail   = "swmcd@world.std.com"
  maintainerWeb     = "http://world.std.com/~swmcd/steven/"
}


upper = \relative c''
{
  \clef treble 
  \key f \major
  \time 3/4

  \repeat volta 2
  {
    f8\mordent f16 g \appoggiatura g16 a8 g16 a bf a g f                 | % 1
    g8\mordent g16 a \appoggiatura g16 f8 e16 d e8\mordent c             | % 2

    << { \appoggiatura bf8 a 4 \stemUp d c } \\
       {                   f,4         f f } >>                          | % 3

    bf8 c16\mordent d \appoggiatura c16 bf8 a16 g a8\mordent f           | % 4

    a8( 
        \once \override Script #'padding = #0.5
        bf16\mordent c) d8 d16 e \appoggiatura d8 c4                     | % 5

    \appoggiatura c16 bf8( 
                           \once \override Script #'padding = #1
                           c16\prall d) \appoggiatura c16 bf8 a16 g a8 f | % 6
    f'8 f16 e d8 c bf a                                                  | % 7
    g16 bf a g \appoggiatura g8 f2                                       | % 8
  }

  \repeat volta 2
  {
    a'8\mordent a16 g \appoggiatura g16 a8 g16 a bf a g f                | % 9
    g8\mordent g16 f \appoggiatura f16 g8 f16 g a g f e                  | % 10
    a8 a16 g f8 e d c                                                    | % 11
    b16 c d b c4\mordent bf\prallmordent                                 | % 12
    a8 c c\prall bf16 c \appoggiatura c8 d4                              | % 13
    g,8 bf bf\prall a16 bf \appoggiatura bf8 c4                          | % 14
    f8 f16 e d8 c bf a                                                   | % 15
    g16 bf a g \appoggiatura g8 f2                                       | % 16
  }

  \override Score.RehearsalMark #'break-visibility = #begin-of-line-invisible
  \override Score.RehearsalMark #'extra-offset = #'( -0.6 . 0.0 )
  \mark \markup { \musicglyph #"scripts.ufermata" }
}

lower = \relative f
{
  \clef bass
  \key f \major
  \time 3/4
  
  \repeat volta 2
  {
    << { a8 bf c4 c  } \\
       { f,4   f  f  } >>            | % 1

    << { c'4 b c     } \\
       { e,4 d c     } >>            | % 2

    d16 ef d c bf8 bf' a a,          | % 3
    g8 f' e c f16 c  bf c            | % 4

    << { f4  f  f    } \\
       { f,4 bf a    } >>            | % 5

    << { f'4 g       } \\
       { d4  e       } >> f16 e f g  | % 6

    a8 f bf c d bf                   | % 7
    c8 c, f c16 a f4                 | % 8
  }

  \repeat volta 2
  {
    << { c''4 c c    } \\
       { f, 4 f f    } >>            | % 9

    << { c'4  c    c } \\
       { e,4  c    e } \\
       { s 4 <e g> s } >>            | % 10

    << { c'4 c a     } \\
       { f4  a f     } >>            | % 11

    g8 g, c c, d e                   | % 12
    f8 f'16 g a8 f bf bf,            | % 13
    c8 d c bf a g                    | % 14
    a8 f bf c d bf                   | % 15
    c8 c, f a16 c f4                 | % 16
  }

  \override Staff.RehearsalMark #'direction = #-1
  \override Score.RehearsalMark #'extra-offset = #'( -0.6 . 0.0 )
  \mark \markup { \musicglyph #"scripts.dfermata" }
}

\score 
{
  \new PianoStaff
  <<
    \new Staff = upper \upper
    \new Staff = lower \lower
  >>
  
  \layout
  {
    \context 
    {
      \Score
      \remove "Mark_engraver"
    }
    \context 
    {
      \Staff
      \consists "Mark_engraver"
    }
  } 

  \midi   { }
}