From 6fdfcbdf8b4ddbf2b63ac6512c692bf9a7081281 Mon Sep 17 00:00:00 2001 From: Davide Madrisan Date: Sat, 14 Dec 2024 11:00:02 +0200 Subject: [PATCH] =?UTF-8?q?J.S.=20Bach:=20Suite=20Anglaise=202=20BWV807:?= =?UTF-8?q?=20Add=20Sarabande=20with=20agr=C3=A9ments?= MIME-Version: 1.0 Content-Type: text/plain; charset=UTF-8 Content-Transfer-Encoding: 8bit Signed-off-by: Davide Madrisan --- CHANGELOG.md | 1 + .../BWV807/JS-Bach-BWV807-Suite-Anglaise-2.ly | 8 +- .../suites-anglaises/BWV807/Makefile.am | 3 +- ...=> bach-suite-anglaise-2-4-sarabande-1.ly} | 1 + .../bach-suite-anglaise-2-4-sarabande-2.ly | 244 ++++++++++++++++++ 5 files changed, 253 insertions(+), 4 deletions(-) rename src/johann-sebastian-bach/suites-anglaises/BWV807/parts/{bach-suite-anglaise-2-4-sarabande.ly => bach-suite-anglaise-2-4-sarabande-1.ly} (99%) create mode 100644 src/johann-sebastian-bach/suites-anglaises/BWV807/parts/bach-suite-anglaise-2-4-sarabande-2.ly diff --git a/CHANGELOG.md b/CHANGELOG.md index 982773e8..9c1a27d5 100644 --- a/CHANGELOG.md +++ b/CHANGELOG.md @@ -8,6 +8,7 @@ The format is based on [Keep a Changelog](https://keepachangelog.com/en/1.0.0/). ### Added - Jan Pieterszoon Sweelinck: Fantasia Cromatica SwWV 258 +- J.S. Bach: Suite Anglaise 2 BWV807: Add Sarabande with agréments ## [v59] - 2024-12-08 diff --git a/src/johann-sebastian-bach/suites-anglaises/BWV807/JS-Bach-BWV807-Suite-Anglaise-2.ly b/src/johann-sebastian-bach/suites-anglaises/BWV807/JS-Bach-BWV807-Suite-Anglaise-2.ly index bf9c4906..1be8f9cf 100644 --- a/src/johann-sebastian-bach/suites-anglaises/BWV807/JS-Bach-BWV807-Suite-Anglaise-2.ly +++ b/src/johann-sebastian-bach/suites-anglaises/BWV807/JS-Bach-BWV807-Suite-Anglaise-2.ly @@ -103,9 +103,11 @@ \include "./parts/bach-suite-anglaise-2-2-allemande.ly" \pageBreak \include "./parts/bach-suite-anglaise-2-3-courante.ly" -%\pageBreak -\include "./parts/bach-suite-anglaise-2-4-sarabande.ly" -%\pageBreak +\pageBreak +\include "./parts/bach-suite-anglaise-2-4-sarabande-1.ly" +\pageBreak +\include "./parts/bach-suite-anglaise-2-4-sarabande-2.ly" +\pageBreak \include "./parts/bach-suite-anglaise-2-5-bourree-1.ly" \pageBreak \include "./parts/bach-suite-anglaise-2-5-bourree-2.ly" diff --git a/src/johann-sebastian-bach/suites-anglaises/BWV807/Makefile.am b/src/johann-sebastian-bach/suites-anglaises/BWV807/Makefile.am index bba28acb..8de1a57a 100644 --- a/src/johann-sebastian-bach/suites-anglaises/BWV807/Makefile.am +++ b/src/johann-sebastian-bach/suites-anglaises/BWV807/Makefile.am @@ -27,7 +27,8 @@ EXTRA_DIST = JS-Bach-BWV807-Suite-Anglaise-2.ly \ parts/bach-suite-anglaise-2-1-prelude.ly \ parts/bach-suite-anglaise-2-2-allemande.ly \ parts/bach-suite-anglaise-2-3-courante.ly \ - parts/bach-suite-anglaise-2-4-sarabande.ly \ + parts/bach-suite-anglaise-2-4-sarabande-1.ly \ + parts/bach-suite-anglaise-2-4-sarabande-2.ly \ parts/bach-suite-anglaise-2-5-bourree-1.ly \ parts/bach-suite-anglaise-2-5-bourree-2.ly \ parts/bach-suite-anglaise-2-6-gigue.ly diff --git a/src/johann-sebastian-bach/suites-anglaises/BWV807/parts/bach-suite-anglaise-2-4-sarabande.ly b/src/johann-sebastian-bach/suites-anglaises/BWV807/parts/bach-suite-anglaise-2-4-sarabande-1.ly similarity index 99% rename from src/johann-sebastian-bach/suites-anglaises/BWV807/parts/bach-suite-anglaise-2-4-sarabande.ly rename to src/johann-sebastian-bach/suites-anglaises/BWV807/parts/bach-suite-anglaise-2-4-sarabande-1.ly index 1049a799..49e68580 100644 --- a/src/johann-sebastian-bach/suites-anglaises/BWV807/parts/bach-suite-anglaise-2-4-sarabande.ly +++ b/src/johann-sebastian-bach/suites-anglaises/BWV807/parts/bach-suite-anglaise-2-4-sarabande-1.ly @@ -25,6 +25,7 @@ Soprano = \context Voice = "one" \relative c'' { | a g a a' ees\prall d | \stemUp b'[\turn c] f,![ e! d c] | c4 c2 + \break } \repeat volta 2 { | g4 g8 f e d diff --git a/src/johann-sebastian-bach/suites-anglaises/BWV807/parts/bach-suite-anglaise-2-4-sarabande-2.ly b/src/johann-sebastian-bach/suites-anglaises/BWV807/parts/bach-suite-anglaise-2-4-sarabande-2.ly new file mode 100644 index 00000000..794cffa3 --- /dev/null +++ b/src/johann-sebastian-bach/suites-anglaises/BWV807/parts/bach-suite-anglaise-2-4-sarabande-2.ly @@ -0,0 +1,244 @@ +Global = { + \key a \minor + \time 3/4 + \include "../global.ly" +} + +Soprano = \context Voice = "one" \relative c'' { + \voiceOne + \stemUp\tieUp + \override MultiMeasureRest.staff-position = #0 + \override Rest.staff-position = #0 + \repeat volta 2 { + %1 + | c4 c8 b a gis\prall + | a16( gis b a) a2 + | 4\arpeggio e8[ d] c16 d b8 + | b4( c8.\mordent) b16 a4 + %5 + | \stemNeutral c8 bes16 a g f8 g32 e f16 a b d32 c + | d8 c16 b a g f g32 e f16. g32 a b c d + | \stemUp e8 d d32[( e f16) e8] d16( f32 e d16 e32 c) + | c16( g'8.) g2 + | \stemNeutral bes,16( a bes) g' e c( bes a) bes( a bes) g' + %10 + | a,( g a) c d( e f g) a ees( d c) + | \stemUp b'!16[ c32 b a b c16] f,!8[(e!) d\prall c] + | c4 c2 +% \break + } + \repeat volta 2 { + | g4 g8( f e d) + | d8.( e32 f) e2 + %15 + | \stemNeutral\slurNeutral dis16( fis a c) b( fis g dis) e( g ais cis) + | \stemUp\slurUp e( dis fis e) fis( e dis cis) b4 + | \stemNeutral\slurNeutral g'16( fis e d!) c!( b ais b) ais( cis e g) + | fis( e dis cis) b( a gis a) gis( b d! f!) + | e( a b c) b( a c b) \stemUp\slurUp a( g a fis) + %20 + | fis8 g \once\slurDown\appoggiatura fis16 e2 + | g8.( a32 bes) \once\slurDown\appoggiatura a16 g2 + | g16 e g f \once\slurUp\appoggiatura f8 g2 + | f8. g32 a \once\slurDown\appoggiatura g16 f2 + | f16 e d f32 e \once\slurDown\appoggiatura e8 f2 + %25 + | e16( d) d( c) c( f) f( e) e( a) a( g) + | g( bes) bes( a) a( gis) gis( a) a( f) f( e) + | e( dis) dis( e) e32[( d16.) c8 b\prall a] + | a4 a2 + } +} + +Alto = \context Voice = "two" \relative c'' { + \voiceTwo + \stemUp + \override Rest.staff-position = #0 + %1 + | \override NoteColumn.force-hshift = #0.3 + a4 + \override NoteColumn.force-hshift = #1 + f + \override NoteColumn.force-hshift = #0.5 + e8 d + | \override NoteColumn.force-hshift = #0.3 c4 c2 + | \revert NoteColumn.force-hshift + \stemDown a'4\arpeggio c8[ b] a[ gis] + | gis4( a4) e + %5 + | s2.*2 + | \once\stemUp \once\override NoteColumn.force-hshift = #0.3 c'4 c a + | c b2 + | s2.*2 + %11 + | \stemUp r4 \override NoteColumn.force-hshift = #0.2 c b + | g4 g2 + | \stemDown \revert NoteColumn.force-hshift e4 e8 d c b + | c4 c2 + %15 + | s2. + | fis4 b d,\rest + | s2.*2 + | s2 s8 b' + %20 + | \once\override NoteColumn.force-hshift = #-1.1 b4 g2 + | g4\rest \stemDown a8\rest f'! e d + | \stemUp \override NoteColumn.force-hshift = #0.4 cis4 cis2 + | \stemDown g4\rest g8\rest e' d c! + | \stemUp \override NoteColumn.force-hshift = #0.3 b4 b2 + \revert NoteColumn.force-hshift + %25 + | \stemDown d,4\rest d\rest g8\rest c8 + | f e d c b c + | a4 a\rest + \stemUp \override NoteColumn.force-hshift = #0.5 + gis + | e4 e2 +} + +Tenor = \context Voice = "three" \relative c' { + \voiceThree + \stemDown + \override Rest.staff-position = #0 + %1 + | \change Staff = "upper" e4 e8 d c b + | \change Staff = "lower" \stemUp a4 a2 + | << { + \stemUp \once\override NoteColumn.force-hshift = #0.8 e4\arpeggio + } \\ { + \stemUp \once\override NoteColumn.force-hshift = #0.4 a\arpeggio + } \\ { + \stemUp \once\override NoteColumn.force-hshift = #0 e'\arpeggio + } >> + << { + \stemUp \once\override NoteColumn.force-hshift = #0.4 a,4 + } \\ { + \stemUp \once\override NoteColumn.force-hshift = #0 f' + } >> + s4 + | e4. d8 c[ b] + %5 + | s2.*2 + | \change Staff = "upper" \stemDown g'4 + \change Staff = "lower" \stemUp c, f8 e + | d4 d2 + | s2.*2 + %11 + | s4 \change Staff = "upper" \stemDown g f + | \once\override NoteColumn.force-hshift = #1 f8[ d] e2 + | \change Staff = "lower" \stemUp + c4 c g + | g g2 + %15 + | s2. + | b8[ cis] dis4 d\rest + | s2.*2 + | \change Staff = "upper" \stemDown + s2 g8\rest \once\stemUp dis' + | \once\override NoteColumn.force-hshift = #0 dis e \once\stemUp b2 + %22 + | s2. + | f8\rest bes a[ g f e] + | \change Staff = "lower" \stemUp + d4 d\rest d\rest + %25 + | \change Staff = "upper" \stemDown + e8\rest a g[ f e d] + | s2.*2 + | s2 d4 + | c4 c2 +} + +Bass = \context Voice = "four" \relative c' { + \voiceFour + \stemDown\tieDown + \override MultiMeasureRest.staff-position = #0 + \override Rest.staff-position = #0 + \repeat volta 2 { + %1 + | a4 d, e + | f e8( d c b) + | c4\arpeggio d e + | a, c e + %5 + |\stemNeutral a a, r + | b' b, r + | \stemDown c'8 b a g f4 + | f8( e g f e d) + | e2 r4 + %10 + | f2 fis4 + | \stemNeutral r4 g^\mordent^\markup { \tiny\sharp } g, + | c c,2 + } + \repeat volta 2 { + | \stemDown c'8 e g4 g, + | c4 c8 b a g + %15 + | fis4 e e' + | b b'8 a g fis + | e4 e' r8 e, + | dis4 dis' r8 d,! + | \stemNeutral c4 g! b + %20 + | e, g b + | e f! g + | a r r + | d, e f + | g r r + %25 + | c8 b a g f e + | d c b! a gis a + | fis4 e e' + | a,8 c16 e a2 + } +} + +forceBreaks = { + % page 1 + \repeat unfold 4 { s2.\noBreak } s2.\break\noPageBreak + \repeat unfold 3 { s2.\noBreak } s2.\break\noPageBreak + \repeat unfold 4 { s2.\noBreak } s2.\break\noPageBreak + \repeat unfold 3 { s2.\noBreak } s2.\break\noPageBreak + \repeat unfold 4 { s2.\noBreak } s2.\break\noPageBreak + \repeat unfold 4 { s2.\noBreak } s2.\pageBreak +} + +\score { + \new PianoStaff \with { connectArpeggios = ##t } + << + \accidentalStyle Score.piano + \context Staff = "upper" << + \set Staff.midiInstrument = #"acoustic grand" + \Global + \clef treble + \Soprano + \Alto + >> + \context Staff = "lower" << + \set Staff.midiInstrument = #"acoustic grand" + \Global + \clef bass + \Tenor + \Bass + >> + \new Devnull \forceBreaks + >> + \header { + composer = ##f % "Johann Sebastian Bach" + opus = ##f % "BWV 807" + title = \markup { \italic "Les agréments de la même Sarabande" } + subtitle = ##f + } + \layout { + \context { + \PianoStaff + \override Parentheses.font-size = #-2 + \override TextScript.font-shape = #'italic + \override TextScript.font-size = #-1 + } + } + \midi { + \tempo 4 = 100 + } +}