\version "2.13.46"
\include "deutsch.ly"

#(set-default-paper-size "a4")
#(ly:set-option 'point-and-click #f)

% ########################## 	Makros	 ###################
% kleine Noten
kl =  \tiny
  
% normal große Noten
nm =   \normalsize

% Trillersymbol = Pluszeichen
tr = ^\markup { \bold {+}}

% bei Verzierungen: Hälse kürzen, Hals nach unten, kleine Noten
sk =  { \once \override Stem #'length-fraction = #0.6 \once \override Stem #'direction = #DOWN \once \set fontSize = #-3   }
ska = { \once \override Stem #'length-fraction = #0.6 \once \override Stem #'direction = #DOWN \once \set fontSize = #-3   }
skn = { \once \override Stem #'length-fraction = #1 \once \override Stem #'direction = #DOWN \once \set fontSize = #-3   }
sn =     \override Stem #'length-fraction = #1  %normale Länge

% Hälse verlängern
lh = { \once \override Stem #'length-fraction = #0.5  }
nh = { \once \override Stem #'length-fraction = #1  }  
% ########################## 	Ende Makros	 ###################


\paper {
  myStaffSize = #20
  
  #(define fonts
    (make-pango-font-tree 
      "Times New Roman"
      "Arial"
      "Luxi Mono"
      (/ myStaffSize 20)))
  line-width = 18\cm
  ragged-last-bottom = ##f
%   page-count = 3
}

#(set-global-staff-size 18)

\header  { 
  title =  \markup  { "Septième Suite"
  }
  subtitle =  \markup   { 
    "de Pièces a deux flutes traversières sans basse (1713)"    
  }
    instrument = \markup \center-column {  
     \small "(pour 2 flûtes traversière / für 2 Flöten /  for 2 flutes)"
  }
  composer = \markup \override #'(baseline-skip . 2) \right-column {
    "\n" "\n" "\n" "\n" "\n" "\n" 
    "Michel de La Barre" 
    \tiny "(1675? - 1745)"
    "\n"
  }
  arranger =   \markup  \right-column {  
    \tiny "Published by Fr.-R. Kuhnen"
    "\n" "\n" "\n" "\n" "\n" "\n" "\n" "\n" "\n" "\n" "\n" "\n" 
  }
  copyright = 
  \markup  {
    \teeny "Published under Creative Commons Attribution-ShareAlike 3.0 (http://creativecommons.org) 
    -
    2007 - http://noten.kuhnen-musik.de (Rev.: 02-20110131)"  }
}



%  #############################################################
%               1. Mouvement
%  #############################################################

\score {
  
  \new ChoirStaff
  \relative c'' << 
    \override Score.BarNumber #'font-shape =  #'italic
    \override Score.BarNumber #'padding = #2.3
    \override Score.RehearsalMark
    #'break-visibility = #begin-of-line-invisible
    
    \new Staff {
      \time 4/4
      \key a \major
      
      R1 |
      r4 a'2 g4 ~ |
      g fis g a ~ |
      a gis fis fis \tr |
      
      %   5
      e2 r4 a8 gis |
      fis2 r4 gis8 fis |
      eis4 \tr fis2 eis4 \tr |
      fis4 fis8 cis d2  |
      r4 e8 h cis4 h8 \tr a |
      
      %   10
      e'4 fis \afterGrace gis4 \tr ( {\stemDown fis16[ gis])} a4 |
      d,4 r16 e d \tr cis fis8. h,16 h8. \tr a16 |
      a2 fis' |
      gis4 a a( gis8. \tr) a16 |
      a1 \bar "|." \pageBreak
    }
    
    
    \new Staff {
      \time 4/4
      \key a \major
      
      r4 e2 d4 ~ |
      d4 cis h e |
      a, d2 cis4 |
      dis e2 dis4 \tr |
      
      %  5
      e4 e8 d cis4 r |
      r d8 cis h2 ~ |
      h4 a h cis |
      fis, r r h8 fis |
      gis2 \tr a4 gis8 \tr fis |
      
      %  10
      e8 e'~ e d ~ d cis16 \tr h cis4 ~|
      cis8 h16 \tr a gis8. \tr a16 d,4 e |
      a e'2 d4 ~ |
      d cis cis( h8. \tr) a16 |
      a1 \bar "|."
      
      
    }
  >>
  \layout {
    indent = 0\cm
    % \context {
    %    \Staff
    %   \override TimeSignature #'style = #'single-digit
    % }
  }
  
  \header {
    piece=   \markup \column { 
      \italic\override #'(font-size . 3) "Prelude"
    }
  }  
}



%  #############################################################
%               2. Mouvement
%  #############################################################

\score {
  
  \new ChoirStaff
  \relative c'' << 
    \override Score.BarNumber #'font-shape =  #'italic
    \override Score.BarNumber #'padding = #2.3
    \override Score.RehearsalMark
    #'break-visibility = #begin-of-line-invisible
    
    \new Staff {
      \time 4/4
      \set beamExceptions =
      #'((end . (( (1 . 8) . (2 2 2 2) )) ))
      \key a \major
      
      \partial 8*1 r16 a' |
      \repeat volta 2
      {
	a8. gis16 fis e d fis e8 d16 \tr cis h8 e |
	cis \tr a cis d e d16 cis h8 \tr a |
	gis \tr e e' fis16 g fis8 \tr d fis gis16 a |
	gis8 \tr h4 a gis16 \tr fis gis8 fis16 \tr e |
	
	%         5
	dis8 \tr h16 cis dis e fis8 h,8. h16 e8. e16 |
	a4 ~ a16 a gis \tr fis gis h a gis fis8. \tr e16 |
	e gis fis \tr e fis a gis \tr fis gis h a gis fis8.[ \tr e16] | }
      \alternative {{ e8[ e,] gis[ h] e,4. r16 a' }{ e2 ~ e4. r16 h' }}
      
      \repeat volta 2
      {
	h8. cis16 h a gis h a8 gis16 a fis8 \tr gis |
	
	%           10
	eis8 \tr fis16 cis d8 cis16 \tr h cis8 h16 \tr a gis a h gis |
	a8 \tr fis cis' dis16 eis fis8 gis16 a gis8. \tr fis16 |
	fis8. fis16 e d cis e d8 e16 fis e d cis h |
	ais8 fis  fis' g16 fis e g fis e d8 \tr cis16 d |
	cis4 \tr fis8 g16 a g fis e d cis d e cis |
	
	%         15
	d8 \tr h e16 fis g e fis8 e16 \tr d cis8. \tr h16 |
	h4 h16 cis h cis d e d e fis gis fis gis |
	a4 a,16 h a h cis d cis d e fis gis a |
	gis8 \tr e16 fis g4 ~ g16 g fis \tr e fis8 gis16 a |
	d,4 ~ d16 d cis \tr h cis e d cis h8. \tr a16 |
	
	%         20
	a16 e' fis gis a4. fis8 h16 fis gis a |
	gis8 \tr e16 fis g4~ g16 g fis \tr e fis8 gis16 a |
	d,4 ~ d16 d cis \tr h cis e d cis h8. \tr a16 |
      }
      \alternative {{ a2 r8 e'16 fis gis a gis a | }{ a,1 \bar"|." }} \pageBreak
    }
    
    
    \new Staff {
      \time 4/4
      \set beamExceptions =
      #'((end . (( (1 . 8) . (2 2 2 2) )) ))
      \key a \major
      
      \partial 8*1 r16 a |      
      \repeat volta 2
      {
	a8. a16 d cis h d cis8 h16 a gis8 \tr e |
	a4 a8 h cis h16 a gis8 \tr a |
	e8 e'16 d cis8 \tr a d fis16 e dis8 \tr h |
	e gis a fis h4 e, |
	
	%         5
	h8 fis' h a16 h gis8 \tr e16 fis gis a h8 |
	dis,8 \tr h cis dis e a, h4 |
	cis16 e dis \tr cis dis fis e \tr dis e gis fis e dis8.[ \tr e16]  }
      \alternative {{ e2 r16 e d cis h8 e }{ e8 e, gis h e,4. r16 e' }}
      
      \repeat volta 2
      {
	e4 eis fis8 e d16 cis h d |
	
	%         10
	cis8 a16 fis h8 a16 \tr gis a8 gis16 \tr fis fis8 eis |
	fis cis'16 h a8 h16 cis d8 h \tr cis8. cis16 |
	fis,8. fis16 gis8 ais h cis16 d cis d e8 ~ |
	e d16 \tr cis d8 e16 d cis e d cis h8 \tr ais16 h |
	ais4 \tr d8 h e16 d cis h ais  h cis ais |
	
	%         15
	h8 d cis16 d e cis d8 cis16 \tr h ais8. \tr h16 |
	h2 h16 cis h cis d e d e |
	fis gis fis gis a4 a,16 h a h cis cis h \tr a |
	e8 e'16 d cis8 \tr d16 e a,4 r8 d16 cis |
	h8 cis16 d gis, e fis gis a cis h a gis8. \tr a16 |
	
	%         20
	a4 r16 a h cis d8. cis16 h a gis fis |
	e8 e'16 d cis8 \tr d16 e a,4 r8 d16 cis |
	h8 cis16 d gis, e fis gis a cis h a gis8. \tr a16 | }
      \alternative {{ a8 a16 h cis d cis d e2 }{ a,1 }}
    }
  >>
  \layout {
    indent = 0\cm
    % \context {
    %    \Staff
    %   \override TimeSignature #'style = #'single-digit
    % }
  }
  
  \header {
    piece=   \markup \column 
    { 
      \italic\override #'(font-size . 3) "Allemande"
    }
  }  
}



%  #############################################################
%               3. Mouvement
%  #############################################################

\score {
  
  \new ChoirStaff
  \relative c'' << 
    \override Score.BarNumber #'font-shape =  #'italic
    \override Score.BarNumber #'padding = #2.3
    \override Score.RehearsalMark
    #'break-visibility = #begin-of-line-invisible
    
    \new Staff {
      \time 3/4
      \key a \major
      
      R2. |
      R2. |
      r4e gis |
      fis h4. a8 |
      
      %       5
      gis4 \tr e a ~ |
      a \afterGrace gis2 \tr ( {\stemDown fis16[ gis])} |
      a8 gis fis e d cis |
      \afterGrace h4 \tr ( {\stemDown a16[ h])} cis8 d e4 ~ |
      e8 fis e cis d4 ~ |
      
      %       10
      d8 e d h cis4 ~ |
      cis8 d h4. \tr a8 |
      a4 r r |
      R2. |
      r4 cis e |
      
      %       15
      dis gis4. fis8 |
      eis4 \tr cis fis ~ |
      fis eis2 \tr |
      fis8 e d cis d cis |
      h a gis4. \tr fis8 |
      
      %       20
      fis4 fis' a |
      gis cis4. h8 |
      ais4 \tr fis h ~ |
      h ais2 \tr |
      h2 fis4 |
      
      %       25
      g8 a g fis e g |
      fis g fis e d fis |
      e d cis4.  \tr h8 |
      h cis d e fis g |
      fis \tr e d e fis gis |
      
      %       30
      a2 a4 |
      a4 gis8 a h4 |
      e,2 cis8 cis |
      fis gis a gis fis e |
      dis e fis e dis \tr cis |
      
      %       35
      h cis h a gis \tr fis |
      e2. |
      r4 e' gis |
      fis h4. a8 |
      gis a gis fis gis e |
      
      %       40
      fis4 dis8 fis h4  ~ |
      h8 e, a2 ~ |
      a8 gis a fis gis h |
      a gis fis4. \tr e8 |
      e2. |
      
      %       45
      R2. |
      r4 e8 fis e d |
      cis d cis h a h |
      gis2. \tr |
      r4 a cis |
      
      %       50
      h4 e4. d8 |
      cis4 \tr a8 cis h gis |
      a h gis4. \tr a8 |
      a8 gis a h cis d |
      e d cis d e fis |
      
      %       55
      gis fis gis a h gis |
      a4 a a |
      a gis2 \tr |
      a4. e8 d e |
      cis d h4. \tr a8 |
      
      %       60
      a2.   \bar "|." \pageBreak
    }
    
    
    \new Staff {
      \time 3/4
      \key a \major
      
      r4 a cis |
      h e4. h8 |
      cis4 \tr a e' ~ |
      e \afterGrace dis2 \tr  ( {\stemDown cis16[ dis])} |
      
      %       5
      e2 cis4 |
      d \afterGrace e2 \tr ( {\stemDown d16[ e])} |
      fis8 e d cis h a |
      gis4 \tr a8 h cis4 |
      fis,4 gis8 a h4 |
      
      %       10
      e,4 fis8 gis a4 |
      d, e2 |
      a4 fis a |
      gis cis4. h8 |
      a4 \tr fis cis' ~ |
      
      %       15
      cis h2 ~ |
      h4 cis8 h a4 |
      h cis2 |
      d8 cis h a h a |
      gis fis eis4. \tr fis8 |
      
      %       20
      fis2. |
      R2. |
      r4 h d |
      cis fis4. e8 |
      d4 \tr h dis |
      
      %       25
      e8 fis e d cis e |
      d e d cis h d |
      cis h ais4. \tr h8 |
      h2 r4 |
      R2. |
      
      %       30
      r4 a cis |
      h e4. d8 |
      cis4 \tr a e' ~ |
      e dis8 e dis e |
      fis gis a gis fis e |
      
      %       35
      dis e dis cis h a |
      gis a h a gis \tr fis |
      e2. |
      R2. |
      R2. |
      
      %       40
      r4 h' dis |
      cis fis4. e8 |
      dis4 \tr h e |
      a, h2 |
      e,4 e'8 fis e d |
      
      %       45
      cis d cis h a h |
      gis2. \tr |
      r4 a cis |
      h e4. d8 |
      cis h cis d e cis |
      
      %       50
      fis4 gis e |
      a4. e8 d e |
      cis d h4. \tr a8 |
      a e fis gis a h |
      cis h a h cis d |
      
      %       55
      e2. |
      r4 a, cis |
      h e4. d8 |
      cis4 \tr a8 cis h gis |
      a h gis4. \tr a8 |
      a2.   \bar "|."
      
    }
  >>
  \layout {
    indent = 0\cm
    \context {
      \Staff
      \override TimeSignature #'style = #'single-digit
    }
  }
  
  \header { 
    piece=   \markup \column { 
      \italic\override #'(font-size . 3) "Fugue"
    }
  }  
}



%  #############################################################
%               4. Mouvement
%  #############################################################

\score {
  
  \new ChoirStaff
  \relative c'' <<
    \override Score.BarNumber #'font-shape =  #'italic
    \override Score.RehearsalMark #'break-visibility = #begin-of-line-invisible
    \override Score.RehearsalMark #'self-alignment-X = #right
    
    \new Staff {
      \time 2/2
      \key a \major
      
      \partial 2*1 cis4 \afterGrace h \tr  ( {\stemDown a16[ h])}|
      cis4 h cis8 d h d  |
      cis4 \tr h e8 d e fis |
      d \tr cis d e cis \tr h cis d |
      h2 \tr  cis4 \afterGrace h \tr  ( {\stemDown a16[ h])}|
      
      %       5
      cis4 h cis8 d h d | \break
      cis4 \tr h e8 fis e d |
      cis \tr h cis d h4. \tr a8 |
      a2 \once \override  Score.RehearsalMark #'self-alignment-X = #right
      \once \override  Score.RehearsalMark  #'padding = #1.5 
      \mark \markup {\small \italic  \vcenter "Fine."  } \bar "||" 
      
      
      cis4 \afterGrace d \tr  ( {\stemDown cis16[ d])} |
      e4 cis cis8 d cis d |
      e4 cis e8 cis d e |
      
      %       10
      fis e fis gis fis \kl gis32( fis e fis) \nm gis8 a | 
      gis4 \tr e gis \afterGrace fis \tr ( {\stemDown e16[ fis])}|
      gis4 fis gis8 a fis a |
      gis4 \tr fis h8 cis h a |
      gis8 \tr fis gis a fis4. \tr e8 | \break
      
      %       15
      e2 cis4 \afterGrace h \tr  ( {\stemDown a16[ h])}|
      cis4 h cis8 d h d  |
      cis4 \tr h e8 d e fis |
      d \tr cis d e cis \tr h cis d |
      h2 \tr  cis4 \afterGrace h \tr  ( {\stemDown a16[ h])}|
      
      %       20
      cis4 h cis8 d h d | \break
      cis4 \tr h e8 fis e d |
      cis \tr h cis d h4. \tr a8 |
      a2 e'4 \afterGrace e \tr  ( {\stemDown d16[ e])}|
      fis4 e fis8 g e g |
      
      %       25
      fis4 \tr e a8 h a g |
      fis \tr e fis g e4. \tr d8|
      d2 fis4 \afterGrace gis \tr  ( {\stemDown fis16[ gis])}|
      a4 gis a8 h gis h |
      a4 \tr gis a8 gis fis e |
      
      %       30
      fis8 e d cis d cis h a |
      gis2 \tr \bar "|." \once \override  Score.RehearsalMark #'self-alignment-X = #right
      \once \override  Score.RehearsalMark  #'padding = #1.5 
      \mark \markup {\small \italic  \vcenter "D.C. al Fine"  }
    }
    
    
    \new Staff {
      \time 2/2
      \key a \major
      
      \partial 2*1 a4 gis \tr |
      a4 e a8 h gis h |
      a4 e cis'8 h cis d |
      h \tr a h cis a \tr gis a h |
      gis2 a4 gis \tr |
      
      %       5
      a4 e a8 h gis h |
      a4 e cis'8 d cis h |
      a gis a h gis4. \tr a8 |
      a2 
      
      a4 \afterGrace h \tr ( {\stemDown a16[ h])}|
      cis4 a a8 h a h |
      cis4 a cis8 a h cis |
      
      %       10
      d cis d e d cis h \tr a |
      e'4 e, e' \afterGrace dis \tr ( {\stemDown cis16[ dis])}|
      e4 h e8 fis dis fis |
      e4 h gis'8 a gis fis |
      e dis e fis dis4. \tr e8 |
      
      %       15
      e2 a,4 gis \tr |
      a4 e a8 h gis h |
      a4 e cis'8 h cis d |
      h \tr a h cis a \tr gis a h |
      gis2 a4 gis \tr |
      
      %       20
      a4 e a8 h gis h |
      a4 e cis'8 d cis h |
      a gis a h gis4. \tr a8 |
      a2 cis4 \afterGrace cis \tr ( {\stemDown h16[ cis])}|
      d4 a d8 e cis e |
      
      %       25
      d4 a fis'8 g fis e |
      d cis d e cis4. d8 |
      d2 d4 d |
      cis4 \tr h cis8 d h d |
      cis4 \tr h cis8 h cis a |
      
      %       30
      d cis h a gis a gis fis |
      e2 
    } 
  >>
  \layout {
    indent = 0\cm
    \context {
      \Staff
      \override TimeSignature #'style = #'single-digit
    }
  }
  
  \header { 
    piece=   \markup \column { 
      \italic \override #'(font-size . 3) "Gavotte en Rondeau"
    }
  }  
}