Arrachez de mon cœur

Échos de FranceA. Durand & Fils1 (p. 74).


\version "2.14.0"

\header {
  title = "Arrachez de mon cœur un trait qui le déchire "
  subtitle = "AIR"
  composer = "RAMEAU"
  meter = "DARDANUS "
  piece = "Opéra (1739)"
  % Supprimer le pied de page par défaut
  tagline = ##f
}

\layout {
  \context {
    \Score
    \remove "Bar_number_engraver"
  }
}

global = {
  \key g \major
  \numericTimeSignature
  \time 3/4
  \tempo "Andante"
}

melody = \relative c''' {
  \global
  \autoBeamOff
  \clef "treble^8"
  \set Staff.midiInstrument = #"piccolo"
  r4 r b8. c16
  d4.( \acciaccatura d8 c) c b
  b4.( a8) c4-^
  b4( b16[ a]) g[ fis] g8 a

  \acciaccatura a b4 \acciaccatura a8 g4 r8 b
  d4. c8 b a
  g2 c4
  c4.-^ \acciaccatura c8 b a8. b16

  \appoggiatura b4 a2
  \repeat volta 2 {
    a8 d
    d4( \acciaccatura d8 c d) c[( b])
    e-.\( d-. c-. b-. a-. g-.\)
    \acciaccatura g a4 \acciaccatura g8 fis4. r8

    a2 b8. c16
    b4.( \acciaccatura b8 a) g[( fis])
    \acciaccatura e8 d4 r4 \tempo "rall." g8. c16
    b4.( a8) g8. fis16 |
  }
  \alternative {
    {
      \set Timing.measureLength = #(ly:make-moment 2 4)
      \appoggiatura fis4 g2
    }
    {
      \set Timing.measureLength = #(ly:make-moment 3 4)
      \appoggiatura fis4 g2 r4
    }
  }
  \bar "|."
}

verse = \lyricmode {
  Ar -- ra -- chez de mon cœur un trait qui le dé --
  chi -- re, Je sens que ma fai -- blesse aug -- men -- te cha -- que
  jour     De ma triste rai -- son é -- ta -- blis -- sez l’em -- pi -- re
  Et ren -- dez- lui ses droits u -- sur -- pés par l’a --
  mour -- mour
}

right = \relative c' {
  \global
  r8 d[ <g b> d] r <d g b>
  r c[ <g' c> c,] r <d g b>
  r e[ < g a> e] r <c g' a>
  r d[ <g b> d] r <d a' c>

  r d[ <g b> d <g b> d]
  r d[ b' <c, a'> <b g'> <c fis>]
  r b[ <e g> b]  r  <d a' c>
  r d[ <g b> d] r <d g b>

  r d[ <fis a> d]
  \repeat volta 2 {
    <fis a>8 <d d'>
    <g d'> d <a' c> d, r <d g b>
    <e g a> r <d g b> r <c g' c> r
    r d[ <fis a> d] <fis a>4

    R2.
    r4 <e g a>2
    r4 <d fis a> <d g>8 <d g a>
    r d <d b'> <c a'> <b g'> <a fis'>
  }
  \alternative {
    {
      \set Timing.measureLength = #(ly:make-moment 2 4)
      \grace s4 r8 d <b g'> d
    }
    {
      \set Timing.measureLength = #(ly:make-moment 3 4)
      \grace s4 <b g'>2 r4
    }
  }
  \bar "|."
}


dyna =  \new Dynamics {
  \global
  s2.\p
}


left = \relative c' {
  \global
  g2 g4
  e2 e4
  c2 e4
  d2 d4

  g2 r4
  g2~ g8 d
  e2 fis4
  g2 g,4

  d'2
  \repeat volta 2 {
    r4
    <e, e'> <fis dis'> <g g'>
    <c, c'>8 r <d d'> r < e e'> r
    <d d'>2 r4

    R2.
    <c c'>2.
    <c c'>2 <b b'>8 <c c'>
    <d d'>2 <d d'>4
  }
  \alternative {
    {
      \set Timing.measureLength = #(ly:make-moment 2 4)
      \grace s4 <g, g'>2
    }
    {
      \set Timing.measureLength = #(ly:make-moment 3 4)
      \grace s4 <g g'>2 r4
    }
  }
  \bar "|."
}

leadSheetPart = \new Staff  \with {
  instrumentName = "Chant"
} { \melody }
\addlyrics { \verse }

pianoPart = \new PianoStaff \with {
  instrumentName = "Piano"
} <<
  \new Staff = "right" \with {
    midiInstrument = "acoustic grand"
  } \right
  \dyna
  \new Staff = "left" \with {
    midiInstrument = "acoustic grand"
  } { \clef bass \left }
>>

\score {
  <<
    \leadSheetPart
    \pianoPart
  >>
  \layout { }
}

\score {
  \unfoldRepeats
  <<
    \leadSheetPart
    \pianoPart
  >>
  \midi {
    \context {
      \Score
      tempoWholesPerMinute = #(ly:make-moment 76 4)
    }
  }
}