%{
    Chopin/Villa-Lobos Étude No. 1
    for classical guitar
    Arrangement by Steve Yegge

  compile-command:
  /Applications/LilyPond.app/Contents/Resources/bin/lilypond \
       [-f fret-diagrams] --png chopin-villa-lobos.ly \
    && /Users/stevey/bin/refresh-lilypond \
    && /Users/stevey/bin/midi chopin-villa-lobos.midi
%}

\version "2.26.0"  % necessary for upgrading to future LilyPond versions

\include "english.ly"
\include "common.ly"

atempo = {
  \midiTempoChange \tempo 4=150
}

bigC = {
  <<
    \relative c' {
      <g c e g c e>16 ^> \arpeggio \f
      e' c g'
      e c' g e'
      \barre "VII" "2"
      c \startTextSpan
      g' e c' g \stopTextSpan
      e' c e
      |
      \barre "VII" "2"
      g, \startTextSpan
      c e, g
      c, \stopTextSpan
      e
      g,
      c e, g
      c, e
      g, c
      e, ( g )
      |
    }
  >>
  \cleanup
}

bigF = {
  <<
    \relative c' {
      \barre "I" "6"
      f, _> \startTextSpan
      f'-4 c-3 a'-2
      f c' a f'
      c f a, c
      f, a c, f
      \stopTextSpan
      |
    }
  >>
  \cleanup
}

aMinorTransition = {
  <<
    \relative c' {
      fs,-2 _> e'-4 a,-0 a'-3
      e c'-1 a e'-0
      c e a, c
      d,-0 a' c,-4 d
      |
    }
  >>
  \cleanup
}

bigGD = {
  <<
    \relative c' {
      g _> d' b g'
      d b' g g'
      fs,, _> d' b g'
      e, _> d' b g'
      |
    }
  >>
  \cleanup
  <<
    \relative c' {
      fs,16 d' a a'
      d, c' a fs'
      c fs a, c
      d, a' a, d
      |
    }
  >>
  \cleanup
}

mysteriousG = {
  <<
    \relative c' {
      g-3 _> d'-0 c-4
      \barre "I" "3"
      af'-1 \startTextSpan
      d,-0 c'-1 af-1 f'-1
      c f af, c
      d, af' c, d
      \stopTextSpan
      |
    }
  >>
  <<
    \relative c' {
      g-3 d'-0 b-2 g'-0
      d b'-0 g f'-1
      b, f' g, b
      ds,-1 g b, ds
      |
    }
  >>
}

gSus = {
  <<
    %% measure x
    \relative c' {
      \barre "III" "6"
      g16 _> \startTextSpan g'-3 d-2 c'-4
      g d' c g'
      d g c, d
      g, c d, g
      |
      g, g'-4 d-3 b'-2
      g d' b g'
      d g b, d
      g, b d, g \stopTextSpan
    }
  >>
  \cleanup
}

fOverA = {
  <<
    \relative c' {
      \barre "V" "6"
      a16 \startTextSpan a'-3 f-4 c'
      a f'-2 c a'
      f a c, f
      a, c f, a \stopTextSpan
      |
    }
  >>
  \cleanup
}

aminorSixth = {
  <<
    \relative c' {
      e,16 fs'-4 c-3 a'-2
      fs c'-1 a e'-0
      c e a, c
      fs, a c, fs
      |
    }
  >>
  \cleanup  
}

bigEup = {
  <<
    \relative c' {
      \set stringNumberOrientations = #'(down)
      e,16 \f
      e'-3 b-2 gs'-1
      e b'-0 gs e'-0
      \once \override StringNumber.extra-offset = #'(0 . -1.4)
      <b-2\4>
      \once \override StringNumber.extra-offset = #'(0 . -1)
      <gs'-4\2>
      \once \override StringNumber.extra-offset = #'(0 . -0.4)
      <e-3\3>
      <b'-1\1>
      gs
      <e'-4\1> <b-3\2> e-4
      |
    }
  >>
  \cleanup
}

intro = {
  <<
    \relative c' {
      %% measure 1
      \smallFingering
      \set fingeringOrientations = #'(left)
      <g-3 c-4 e-2 g-0 c-1 e-0>16 ^> \arpeggio \f
      ^\markup \bold "Allegro"
      \unset fingeringOrientations
      e' c g'
      e c' g e'
      \barre "VII" "2"
      c-3 \startTextSpan
      g'-1 e-2 c'-1 g \stopTextSpan
      e'-2 <c-3\2> e-2
      |
      %% measure 2
      \barre "VII" "2"
      g, \startTextSpan
      c e, g
      c, \stopTextSpan
      e-0
      g,-0
      c e, g
      c, e
      g, c
      e, ( g )
      |
    }
  >>
  \cleanup

  %% measure 3
  \bigF

  %% measure 4
  \aMinorTransition

  %% measure 5
  <<
    \relative c' {
      g-3 _> d'-0 b-2 g'-0
      d b'-0 g g'-4
      fs,,-1 _> d'-0 b-2 g'-0
      e, _> d' b g'
      |
    }
  >>
  \cleanup
  <<
    %% measure 6
    \relative c' {
      fs,16-2 _> d'-0 a-0 a'-3
      d, c'-1 a fs'-4
      c fs a, c
      d, a a' d,
      |
    }
  >>
  \cleanup

  %% measure7, measure 8
  \mysteriousG

  %% measure 9, measure 10
  \bigC

  %% measure 11
  \fOverA

  %% measure 12
  \aminorSixth

  %% measure 13, measure 14
  \gSus

  <<
    %% measure 15
    \relative c' {
      \barre "VIII" "6"
      c \startTextSpan d'-4 g,-3 e'-2
      d g e c'
      g c e, g
      d e g, d'
      |
      c, c'-4 g-3 e'-2
      c g' e c'
      g c e, g
      c, e g, c \stopTextSpan
    }
  >>
  \cleanup
}

themeOne = {
  \cleanup
  <<
    %% measure 17 (1)
    \relative c' {
      \override TextSpanner.outside-staff-priority = #100
      \override TextScript.outside-staff-priority = #-100
      \barre "III" "5"
      <a-2\6> _> \startTextSpan \mf
      \once \override StringNumber.extra-offset = #'(0 . 1)
      \moveFingering #'(0 . 1)
      <f'-1\5>
      \once \override StringNumber.extra-offset = #'(0 . 1.5)
      \moveFingering #'(0 . 1.5)
      <c-1\4>
      \once \override StringNumber.extra-offset = #'(0 . 1.5)
      \moveFingering #'(0 . 1.5)
      <c'-3\3>
      f, <f'-4\2> c e-0
      f-4
      ^\markup \smaller \center-align { \italic { "(hinge)" } }
      e-0
      c-3 f
      f, c' c, f \stopTextSpan
      |
    }
  >>
  \cleanup

  <<
    %% measure 18 (2)
    \relative c' {
      <b\6> _> d-0
      \once \override StringNumber.extra-offset = #'(0 . 1.5)
      <f\5>
      \once \override StringNumber.extra-offset = #'(0 . 2.2)
      <d'\4>
      d,-0 b'-0 d e-0

      <a,,\6> _> d-0
      \once \override StringNumber.extra-offset = #'(0 . 1.5)
      <f\5>
      \once \override StringNumber.extra-offset = #'(0 . 2.2)
      <d'\4>
      d,-0 b'-0 d e-0
      |
    }
  >>
  \cleanup

  <<
    %% measure 19 (3)
    \relative c' {
      \override TextSpanner.outside-staff-priority = #100
      \override TextScript.outside-staff-priority = #-100
      \barre "II" "5"
      gs-3 _> \startTextSpan
      e'-1 b-1 b'-4
      e, d'-2 b
      e-0
      d
      _\markup \smaller \center-align { \italic { "(hinge)" } }
      e
      b d
      e, b' b, e \stopTextSpan
      |
    }
  >>
  \cleanup

  <<
    %% measure 20 (4)
    \relative c' {
      \barre "V" "6"
      a _> \startTextSpan a' e c'
      a e' c a' \stopTextSpan

      g,,-3 _> e'-2 c-4 g'-0
      e-0 c'-1 g e'
      |
    }
  >>
  \cleanup

  <<
    %% measure 21 (5)
    \relative c' {
      f,-1 _> e'-3 a,-0 a'-4
      e c'-1 a e'-0
      c e a, c
      e, a a, e'
      |
    }
  >>
  \cleanup

  <<
    %% measure 22 (6)
    \relative c' {
      fs,16-2 _> ds'-1 a-0 a'-3
      ds, b'-0 a fs'-4
      b, fs' a, b
      ds, a' a, ds
      |
    }
  >>
  \cleanup

  <<
    \relative c' {
      %% measure 23 (7)
      e, e' b gs'
      e b' gs e'-0
      <b-2\4> <gs'-4\2>
      <e-3\3> <b'-1\1>
      gs e' ds ( e )
      |
      %% measure 24 (8)
      as, \> ( b ) fss ( gs )
      ds ( e ) as, ( b )
      fss ( gs ) ds ( e )
      as, ( b ) fss ( gs ) \!
    }
  >>
  \cleanup
}

themeTwo = {
  <<
    %% measure 25 (1)
    \relative c' {
      \barre "V" "6"
      a \startTextSpan \mp g' e-3 cs'-2
      g e' cs a'
      e a cs, e
      g, cs e, g \stopTextSpan
      |
    }
  >>
  \cleanup
  <<
    %% measure 26 (2)
    \relative c' {
      \barre "X" "6"
      d \startTextSpan c' a-2 g'-3
      c, a' g
      e'  %% fingering (4) here makes measures too far apart
      a, e' fs,-2 a
      c, fs a,-3 c \stopTextSpan
      |
    }
  >>
  \cleanup
  <<
    \relative c' {
      %% measure 27 (3)
      \barre "III" "6"
      g16 \startTextSpan f' d-3 c'-4
      f, d' c g'
      d g c, d
      f, c' d, f
      |
      %% measure 28 (4)
      g, \< f' d-3 b'-2
      f d' b g'
      d g b, d
      f, b d, f \! \stopTextSpan
      |
    }
  >>
  \cleanup
  <<
    \relative c' {
      %% measure 29 (5)
      \barre "VII" "6"
      c16 \startTextSpan bf' g-3 e'-2
      bf g' e c'
      g c e, g
      bf, e g, bf
      |
      %% measure 30 (6)
      c, bf' gf-2 ef'
      bf bf'-4 ef, ef'-4
      bf ef ef, bf'
      bf, ef gf, bf \stopTextSpan
      |
    }
  >>
  \cleanup

  <<
    \relative c' {
      %% measure 31 (7)
      \barre "I" "6"
      f, \startTextSpan ef' c-3 a'-2
      ef c' a f'
      c f a, c
      ef, a c, ef
      |
      %% measure 32 (8)
      f, ef' cf-2 af'
      ef ef'-4 af, af'-4
      ef af af, ef'
      ef, af cf, ef
      \stopTextSpan
      |
    }
  >>
  \cleanup
  \pageBreak

  <<
    \relative c' {
      %% measure 33 (9)
      \barre "VI" "6"
      bf \startTextSpan af' f-3 d'-2
      af f' d bf'
      f bf d, f
      af, d f, af
      \stopTextSpan
      |
    }
  >>
  \cleanup

  <<
    \relative c' {
      %% measure 34 (10)
      e, \< d'-0 bf-1 gs'-2
      d d'-4 gs, e'-0
      d e gs, d'
      d, gs bf, d \!
      |
    }
  >>
  \cleanup

  <<
    \relative c' {
      %% measure 35 (11)
      <a-4\6>
      \barre "II" "4"
      e' \startTextSpan cs-3 a'
      e cs' a \stopTextSpan
      e'-0 ^\markup \smaller \center-align { \italic { "(hinge)" } } 
      \barre "IX" "3"
      cs-3 \startTextSpan a'-2 e cs'
      a \stopTextSpan e'-4 ds-3 ( e-4 )
      |
      %% measure 36 (12)
      bs ( cs ) gs ( a )
      ds, ( e ) bs ( cs )
      gs ( a ) ds, ( e )
      bs ( cs ) gs ( a )
      |
    }
  >>
  \cleanup
}

themeThree = {
  <<
    %% measure 37 (1)
    \relative c' {
      fs,16-2 \mf d'-0 a-0 a'-3
      d, c'-1 a e'-0
      c e a, c
      d, a' a, d
      |
    }
  >>
  \cleanup
  <<
    %% measure 38 (2)
    \relative c' {
      g-2 d'-0 c-3 g'-0
      f-4 \barre "I" "2"
      c'-1 \startTextSpan g f'-1
      c f g, c
      d,-0 g c, d \stopTextSpan
      |
    }
  >>
  \cleanup
  <<
    %% measure 39 (3)
    \relative c' {
      \set stringNumberOrientations = #'(down)
      <c-1\6>
      \moveFingering #'(0 . 1)
      <b'-2\4>
      \moveFingering #'(0 . 1.5)
      <g-4\5>
      \moveFingering #'(0 . 2)
      <e'-3\3>
      b-2 b-0 e-3 e-0
      b-0 e-0 e-3 b-0
      b-2 e-3 g,-4 b-2
      |
    }
  >>
  \cleanup
  <<
    %% measure 40 (4)
    \relative c' {
      f,-1 e'-2 c-4 a'-3
      e-3 b'-0 a e'-0
      b e a, b
      e, a c, e
      |
    }
  >>
  \cleanup
  <<
    %% measure 41 (5)
    \relative c' {
      <b-3\6> d-0 a-0 d'-4
      d,-0 f'-2 d a'-1
      f a d, f
      d, d' a, d
      |
    }
  >>
  \cleanup
  <<
    %% measure 42 (6)
    \relative c' {
      d'16-3 g-4 g,-0 b-0
      e,-2 g b,-1 e
      r a-3 e-2 c'-1
      a e'-0 c g'-4
      |
    } \\
    \relative c' {
      e,2
      a-0
    }
  >>
  \cleanup
  <<
    %% measure 43 (7)
    \relative c' {
      c'16-2 f-3 a,-4 c
      d,-0 a' a,-0 d
      r d-0 b-3 g'-0
      d b' g f'-1
      |
    } \\
    \relative c' {
      f,2-1
      g-4
    }
  >>
  \cleanup
  <<
    %% measure 44 (8)
    \relative c' {
      b'16-0 e-0 g,-0 b
      e,-3 b' c, e
      r e-3 a,-0 a'-4
      e c'-2 a e'-0
      |
    } \\
    \relative c' {
      c4.-4 s8
      f,2-1
      |
    }
  >>
  \cleanup
  <<
    %% measure 45 (9)
    \relative c' {
      b'16-0 f'-2 a,-4 b-0
      d,-0 a' b,-3 d
      r d b a'
      d, b' a f'
      |
    } \\
    \relative c' {
      f,2-1 f
    }
  >>
  \cleanup
  <<
    %% measure 46 (10)
    \relative c' {
      b'16-0 \< fs'-4 a,-3 b
      ds,-1 a' a, ds
      r ds a a'
      ds, b' a fs' \!
      |
    } \\
    \relative c' {
      fs,2-2 fs
    }
  >>
  \cleanup

  %% measure 47 (11)
  \bigEup

  <<
    %% measure 48 (12)
    \relative c' {
      \set stringNumberOrientations = #'(down)
      \stemDown
      <gs''-3\2>16 <b-1\1> <e,-2\3> gs
      b,-0 e-0
      \once \override StringNumber.extra-offset = #'(0 . -2)
      <gs,-1\3> b
      e,-3 gs b,-2 e
      \midiTempoChange \tempo 4=120
      \stemUp
      <g, b d g b f'>4 _> \arpeggio
      ^\markup { \italic { rit. } }
      |
    } \\
    \relative c' {
      s2 s4 s16
      \stemDown
      b'-0 g-0 d-0
    }
  >>
  \cleanup
  \atempo
}

reprise = {
  %% measures 49-50 (1-2)
  %% only different from \bigC due to the {a tempo} (sigh)
  <<
    \relative c' {
      <g c e g c e>16 ^> \arpeggio \f
      ^\markup { \italic { a tempo } }
      e' c g'
      e c' g e'
      \barre "VII" "2"
      c \startTextSpan
      g' e c' g \stopTextSpan
      e' c e
      |
      \barre "VII" "2"
      g, \startTextSpan
      c e, g
      c, \stopTextSpan
      e
      g,
      c e, g
      c, e
      g, c
      e, ( g )
      |
    }
  >>
  \cleanup
  
  %% measure 51 (3)
  \bigF

  %% measure 52 (4)
  \aMinorTransition

  %% measures 53-54 (5-6)
  \bigGD

  %% measures 55-56 (7-8)
  \mysteriousG

  %% measures 57-58 (9-10)
  \bigC

  %% measure 59 (11)
  \fOverA

  %% measure 60 (12)
  <<
    \relative c' {
      e,16 fs'-4 c-3 a'-2
      fs c'-1 a e'-0
      \barre "IV" "6"
      c \startTextSpan
      ef fs, c'
      ef, fs af, ef' \stopTextSpan
      |
    }
  >>
  \cleanup

  %% measures 61-62 (13-14)
  \gSus

  %% measure 63 (15)
  <<
    \relative c' {
      fs,16-1 d'-0 c-2 c'-4
      d, e'-4 c a'-4
      e a c, e
      d, c' c, d
      |
    }
  >>
  \cleanup

  %% measure 64 (16)
  <<
    \relative c' {
      \barre "I" "6"
      f,16 \startTextSpan
      ef' c a'
      ef c' a f' \stopTextSpan
      b,-0 _> e-0 a, b
      ds, a' b, ds
      |
    }
  >>
  \cleanup
  \pageBreak
}

finale = {
  %% measure 65 (1)
  \bigEup

  <<
    %% measure 66 (2)
    \relative c' {
      \set stringNumberOrientations = #'(down)
      <gs''-3\2>16 <b-1\1> <e,-2\3> gs
      b,-0 e-0
      \once \override StringNumber.extra-offset = #'(0 . -2)
      <gs,-1\3> b
      e,-3 gs b,-2 e
      gs,-4 b-1 e, b'
      |
    }
  >>
  \cleanup

  %% measure 67 (3)
  <<
    \relative c' {
      f,-1 \mp d'-0 a-0 a'-4
      d, c'-2 a f'-3
      c f a, c
      d, a' a, d
      |
    }
  >>
  \cleanup

  %% measure 68 (4)
  <<
    \relative c' {
      \barre "III" "6"
      g \< \startTextSpan f' d-3 b'-2
      f d' b g'
      d g b, d
      f, b d, f \!
      \stopTextSpan
      |
    }
  >>
  \cleanup

  %% measure 69 (5)
  <<
    \relative c' {
      \smallFingering
      \set fingeringOrientations = #'(left)
      <g-3 c-4 e-2 g c-1 e>16 ^> \arpeggio \mf
      \unset fingeringOrientations
      e' c g'
      e c' g e'-0
      c-1 e-0 bf-4 c
      e,-2 bf' c,-3 e
      |
    }
  >>
  \cleanup

  %% measure 70 (6)
  <<
    \relative c' {
      \set stringNumberOrientations = #'(down)
      e,
      \moveFingering #'(0 . 1)
      <a'-3\4>
      \moveFingering #'(0 . 1.5)
      <ef-2\5>
      \moveFingering #'(0 . 2)
      <c'-1\3>
      \revert Fingering.extra-offset
      \override StringNumber.extra-offset = #'(0 . -0.5)
      a <fs'-4\2> c e-0
      \revert StringNumber.extra-offset
      e,,
      \moveFingering #'(0 . 0.8)
      <gs'-3\4>
      \moveFingering #'(0 . 1.2)
      <d-2\5>
      \moveFingering #'(0 . 1.6)
      <b'-1\3>
      gs
      \revert Fingering.extra-offset
      \override StringNumber.extra-offset = #'(0 . -1.2)
      <f'-4\2>
      \revert StringNumber.extra-offset
      b, e-0
      |
    }
  >>
  \cleanup

  %% measure 71 (7)
  <<
    \relative c' {
      e, e'-2 c-3 g'-0
      e c'-1 g e'-0
      c e g, c
      e, g c, e
      |
    }
  >>
  \cleanup

  %% measure 72 (8)
  <<
    \relative c' {
      \set stringNumberOrientations = #'(down)
      e,
      \moveFingering #'(0 . 0.3)
      <fs'-3\4>
      \moveFingering #'(0 . 0.6)
      <c-2\5>
      \moveFingering #'(0 . 1)
      <a'-1\3>
      \revert Fingering.extra-offset
      fs
      \override StringNumber.extra-offset = #'(0 . -2)
      <ef'-4\2>
      \revert StringNumber.extra-offset
      a, e'-0
      e,,
      <f'-3\4>
      <b,-2\5>
      \moveFingering #'(0 . 0.2)
      <af'-1\3>
      f
      \override StringNumber.extra-offset = #'(0 . -2)
      <d'-4\2>
      \revert StringNumber.extra-offset
      af e'-0
      |
    }
  >>
  \cleanup

  %% measure 73 (9)
  <<
    \relative c' {
      e, e'-3 bf-2 g'-0
      e df'-4 g, e'-0
      df e g, df'
      e, g bf, e
      |
    }
  >>
  \cleanup


  %% measure 74 (10)
  <<
    \relative c' {
      \set stringNumberOrientations = #'(down)
      e,
      \moveFingering #'(0 . 1)
      <a'-3\4>
      \moveFingering #'(0 . 1.5)
      <ef-1\5>
      \moveFingering #'(0 . 2)
      <df'-2\3>
      \revert Fingering.extra-offset
      \override StringNumber.extra-offset = #'(0 . -0.5)
      a <fs'-4\2> df e-0
      \revert StringNumber.extra-offset
      fs e df fs
      a, df ef, a
      |
    }
  >>
  \cleanup

  %% measure 75 (11)
  <<
    \relative c' {
      \set stringNumberOrientations = #'(down)
      e,
      \moveFingering #'(0 . 1)
      <af'-3\4>
      \moveFingering #'(0 . 1.5)
      <d,-1\5>
      \moveFingering #'(0 . 1.9)
      <c'-2\3>
      \revert Fingering.extra-offset
      \override StringNumber.extra-offset = #'(0 . -0.5)
      af <f'-4\2> c e-0
      \revert StringNumber.extra-offset
      f e c f
      af, c d, af'
      |
    }
  >>
  \cleanup

  %% measure 76 (12)
  <<
    \relative c' {
      \set stringNumberOrientations = #'(down)
      g-1 \< ^\markup \barnum #"III" #"2"
      f'-1
      \moveFingering #'(0 . 1.2)
      <d-3\5>
      \moveFingering #'(0 . 1.7)
      <b'-2\3>
      f
      \once \override StringNumber.extra-offset = #'(0 . -1.7)
      <f'-4\2> b,
      e-0
      f ^\markup \smaller \center-align { \italic { "(hinge)" } } e 
      b f'
      f, b d, f \!
      |
    }
  >>
  \cleanup

  <<
    \relative c' {
      %% measure 77 (13)
      <g c e g c e>16 \f
      e' c g'
      e c' g e'
      \barre "VII" "2"
      c \startTextSpan
      g' e c' g \stopTextSpan
      e' c e
      |
      %% measure 78 (14)
      \midiTempoChange \tempo 4=140
      \barre "VII" "2"
      g, \startTextSpan
      c e, g
      \midiTempoChange \tempo 4=130
      c, \stopTextSpan
      e
      g,
      c
      \midiTempoChange \tempo 4=110
      \once \override TextSpanner.bound-details.left.text = "rall. "
      e, \startTextSpan
      g c, e
      \midiTempoChange \tempo 4=90
      g, c e, g \stopTextSpan
      |
    }
  >>
  \cleanup
  <<
    \relative c' {
      %% measure 79 (15)
      <g c e g c e>1 \fermata
    }
  >>
}

music = {
  \intro
  \pageBreak
  \themeOne
  \themeTwo
  \themeThree
  \pageBreak
  \reprise
  \finale
  \bar "||"
}

\header {
  title = "Chopin/Villa-Lobos Étude No. 1"
  arranger = "Arranged by Steve Yegge"
  opus = #(strftime "%Y-%m-%d" (localtime (current-time)))
  copyright = "sites.google.com/site/steveysguitarsite"
}

\score {
  {
    \transposition c  % magically puts midi output in correct octave
    \key c \major
    \set Staff.instrumentName = #"Guitar"
    \override Score.Fingering.font-name = "MaestroTimes"
    \override Score.Fingering.font-size = #-5
    \override Score.StringNumber.font-name = "Times New Roman"
    \override Score.StringNumber.font-size = #-5

    % can use invisible piano-pedal instructions to make the midi notes ring
    % (though I've turned it off since it creates lots of compiler warnings)
    \override Staff.SustainPedal.transparent = ##t
    \override Staff.SustainPedal.stencil = ##f

    \atempo
    \maybeFretDiagrams \music
  }

  \layout { }
}

\score {
  {
    \transposition c  % magically puts midi output in correct octave
    \unfoldRepeats
    \music
  }
  \midi {
    \tempo 4 = 144
    \context {
      \Score
      midiInstrument = #"acoustic guitar (nylon)"
    }
  }
}