\header {
   title             = "Invention 2"
   subtitle          = "arranged for two guitars"
   opus              = "BWV 773"
   composer          = "Johann Sebastian Bach (1685-1750)"
   
   mutopiatitle      = "Invention 2"
   mutopiacomposer   = "J. S. Bach (1685-1750)"
   mutopiaopus       = "BWV 773"
   mutopiainstrument = "Harpsichord, Piano"
   source            = "Bach-Gesellschaft"
   style             = "Baroque"
   copyright         = "Public Domain"
   maintainer        = "jeff covey"
   maintainerEmail   = "jeff.covey@pobox.com"
   maintainerWeb     = "http://pobox.com/~jeff.covey/"
   lastupdated       = "2006/09/09"
}

% this is based on bach-invention-02.ly by Allen Garvin.

\version "2.7.40"

global = {
   % lilytidy template: guitar
   \transposition c
   \set Staff.midiInstrument = "acoustic guitar (nylon)"
   % lilytidy template end
   \key e \minor
}

voiceone =  \relative c'' {
   r8  e16[ dis]  e[ fis g b,]  c[ d c a]  a'[ g fis e]                    | % 1
   dis[ c' b a]  g[ fis e dis]  e[ fis e fis]  fis8.[\downprall e32 fis]   | % 2
   g16[ fis e fis]  g[ a b8]  b[\prall a] r a                              | % 3
   a[\prall g] r fis  g[ c,] ~  c16[ a d a]                                | % 4
   b8[ g'] ~  g16[ fis g d]  e[ g c b]  a[ g fis e]                        | % 5
   d[ fis b a]  g[ fis e d]  c[ e a e]  fis8.[\prall  fis16]               | % 6
   g[ d e d] b'4 ~  b16[ d, e d] c'4 ~                                     | % 7
   c16[ d, g fis]  b[(  a) c b]  e[ d c b]  a[ d c d]                      | % 8
   b[ d c d]  g,[ b a b]  e,[ fis g a]  fis[ g a b]                        | % 9
   g[ a b c]  d[ c e d]  c[ b a c] fis,4 ~                                 | % 10
   fis16[ fis b fis]  g[ e fis d] e4 ~  e16[ b' ais cis]                   | % 11
   e,[ d e8] ~  e16[ ais gis fis]  d'8.[ gis,16]  ais8.[ b16]              | % 12
   b8[ b,16 ais]  b[ cis d fis,]  g[ a g e]  e'[ d cis b]                  | % 13
   ais[ g' fis e]  d[ cis b ais]  b[ cis b cis]  cis8.[\downprall b32 cis] | % 14
   d16[ cis b cis]  d[ e fis8]  fis[\prall e] r e                          | % 15
   e[\prall d] r cis  d[ g,] ~  g16[ e a e]                                | % 16
   fis8[ d'] ~  d16[ cis d a]  b[ d g fis]  e[ d cis b]                    | % 17
   a[ cis fis e]  d[ cis b a]  g[ b e b]  cis8.[\prall cis16]              | % 18
   d[ a b a] fis'4 ~  fis16[ a, b a] g'4 ~                                 | % 19
   g16[ a, d cis]  fis[ e g fis]  b[ a g fis]  e[ a g a]                   | % 20
   fis[ e d cis]  fis[ e g fis]  e[ d cis e] a4 ~                          | % 21
   a16[ b, e dis]  g[ fis a g]  c[ b a g]  fis[ b a b]                     | % 22
   g[ fis e dis]  e[ fis g b,]  c[ d c a]  a'[ g fis e]                    | % 23
   dis[ c' b a]  g[ fis e dis]  e[ fis e fis]  fis8.[\downprall e32 fis]   | % 24
   g16[ fis e fis]  g[ a b8]  b[\prall a] r a                              | % 25
   a[\prall g16 fis]  b[ a c b]  b8.[ c16]  fis,8.[\prall e16]             | % 26
   e1^\fermata                                                             | % 27
   \bar "|."
}


voicetwo =  \relative c' {
   r1                                                                      | % 1
   r1                                                                      | % 2
   r8  e16[ dis]  e[ fis g b,]  c[ d c a]  a'[ g fis e]                    | % 3
   dis[ c' b a]  g[ fis e dis]  e[ fis e fis]  fis8.[\downprall e32 fis]   | % 4
   g16[ fis e fis]  g[ a b8]  b[\prall a] r a                              | % 5
   a[\prall g] r fis  g[ c,] ~  c16[ a d a]                                | % 6
   b8[ g'] ~  g16[ fis g d]  e[ g c b]  a[ g fis e]                        | % 7
   d[ fis b a]  g[ fis e d]  c[ e a e]  fis8.[\prall fis16]                | % 8
   g[ d e d] b'4 ~  b16[ d, e d] c'4 ~                                     | % 9
   c16[ d, g fis]  b[ a c b]  e[ d c b]  a[ d c d]                         | % 10
   b8[ g,16 a]  b[ cis d fis,]  g[ a g e]  e'[ d cis b]                    | % 11
   ais[ g' fis e]  d[ cis b ais]  b[ cis b cis]  cis8.[\downprall b32 cis] | % 12
   d16[ cis b cis]  d[ e fis8]  fis[\prall e] r e                          | % 13
   e[\prall d] r cis  d[ g,] ~  g16[ e a! e]                               | % 14
   fis8[ d'] ~  d16[ cis d a]  b[ d g fis]  e[ d cis b]                    | % 15
   a[ cis fis e]  d[ cis b a]  g[ b e g,]  cis8.[\prall cis16]             | % 16
   d[ a b a] fis'4 ~  fis16[ a, b a] g'4 ~                                 | % 17
   g16[ a, d cis]  fis[ e g fis]  b[ a g fis]  e[ a g a]                   | % 18
   fis[ a g a]  d,[ fis e fis]  b,[ cis d e]  cis[ d e fis]                | % 19
   d[ e fis g]  a[ g b a]  g[ fis e g] cis,4 ~                             | % 20
   cis16[ fis, b ais]  d[ cis e d]  g[ fis e d]  cis[ fis e fis]           | % 21
   dis[ a' g fis]  e[ d c! b]  a[ g fis e]  b''8[ b,]                      | % 22
   e8.[ fis16]  g[ a b8]  b[\prall a] r a                                  | % 23
   a[\prall g] ~  g16[ a g fis]  e[ d c b]  a[ g a b]                      | % 24
   e,8[ e'16 dis]  e[ fis g b,]  c[ d! c a]  a'[ g fis e]                  | % 25
   dis[ c' b a]  g[ fis e dis]  e[ b c a]  b8[ b]                          | % 26
   e,1_\fermata                                                            | % 27
   \bar "|."
}

\score {
   \context GrandStaff <<
      \context Staff = "one" <<
         \global
         \voiceone
      >>
      \context Staff = "two" <<
         \global
         \voicetwo
      >>
   >>
   
   \layout{ }
   \midi { \tempo 4 = 50 }
}