X-Git-Url: https://git.donarmstrong.com/?a=blobdiff_plain;f=input%2Fmutopia%2FJ.S.Bach%2Fbwv940.ly;fp=input%2Fmutopia%2FJ.S.Bach%2Fbwv940.ly;h=0000000000000000000000000000000000000000;hb=941dff9d2a67080e0dd8474f1e70f0c72ace6424;hp=8ba1bb45af8c88ba2783f38094be297679389a30;hpb=5a22d6233a39d3164e1ca043244794c268be4ad0;p=lilypond.git diff --git a/input/mutopia/J.S.Bach/bwv940.ly b/input/mutopia/J.S.Bach/bwv940.ly deleted file mode 100644 index 8ba1bb45af..0000000000 --- a/input/mutopia/J.S.Bach/bwv940.ly +++ /dev/null @@ -1,172 +0,0 @@ -#(ly:set-option 'old-relative) -\version "2.12.0" - -%{ - Header for Petites Preludes. - - Six Petits Preludes, - Collection Johann Peter Kellner - ca 1703 - 1707 - - Kellner was a student of Bach's that copied some 90 works of his master. -%} - - - - -\header{ - title = "Praeludium" - composer = "Johann Sebastian Bach (1685-1750)" - enteredby = "JCN,HWN" - opus= "BWV 940" - - - % mutopia headers. - mutopiacomposer = "J.S.Bach (1685-1750)" - mutopiaopus = "BWV940" - - mutopiainstrument = "Harpsichord,Clavichord" - date = "1700s" - source = "Ed. Henry Lemoine Urtext" - style = "Baroque" - copyright = "Public Domain" - maintainer = "Jan Nieuwenhuizen" - maintainerEmail = "janneke@gnu.org" - lastupdated = "2003/Aug/22" - mutopiapublicdomain = "\\parbox{\paper-width}{\\thefooter\\quad\\small - \\\\This music is part of the Mutopia project, - \\texttt{http://www.mutopiaproject.org/}\\\\It has been typeset - and placed in the public domain by " + \maintainer + - ".\\\\Unrestricted modification and redistribution is permitted - and encouraged---copy this music and share it.}" - tagline = \mutopiapublicdomain - footer = "Mutopia-2003/08/22-nr" -} - -one = \relative c{ - \skip 1 | - \stemUp - r4 d''2 cis4 | - \stemNeutral - d16 a' g f e f cis d - e8.\mordent f16 d8.\prall cis16 | - \stemUp\tieUp - cis4 ~ cis16 a d8 ~ d4 a | - %5 - b2 ~ b4 a ~ | - a16 a \stemUp g! f g4 ~ g f ~ | - f16 a g f e16 g8. ~ g16 g f e d f8. ~ | - f16 f e d b'4 a g | - - fis4 g r8 g16 bes e4 | - %10 - d1 - \bar "|." -} - -two = \relative c{ - r16 d'' c bes a bes f g - a8.\mordent bes16 g8.\prall f16 | - \stemDown - f2 e2 | - \change Staff=lower \stemUp - r4 a, bes b | - \change Staff=upper \stemDown\tieDown - r16 b' a g f8. f16 e2 ~ | - %5 - e2 ~ e4 ~ e16 e f! d | - s4 e4_\mordent~ e4 d4 ~ | - d4. cis16 d cis4 d ~ | - d8 r r16 e f d r16 e f d r d e cis | - r16 e d c! bes! d8. s4 r16 bes' a g | - %10 - fis1 -} - -three = \relative c{ - \stemUp - f2 e | - \stemNeutral - d16 d' c bes a bes f g - a8.\mordent bes16 - g8.\prall f16 | - f2 g4 gis | - a2 ~ a16 a g f e f c d | - %5 - e8.\mordent f16 d8.\prall c16 \stemNeutral c4. d8 | - \stemDown \tieDown - - e4 ~ e16 f e d cis a b cis d e f d | - \override TextScript #'font-style = #'finger - bes2 a ~ | - a a | - d, cis' | - %10 - a'1 - \bar "|." -} - -four = \relative c{ - \stemDown - d2 cis | - \skip 1*2 | - \skip 4*3 - \change Staff=upper \stemUp - \override NoteColumn #'horizontal-shift = #1 - c''4 | - %5 - a gis ~ gis16 gis fis e - \skip 4*1 - \change Staff=lower \stemDown - \override NoteColumn #'horizontal-shift = #0 - \stemUp\tieUp - b2 a | - g a4. gis16 a | - gis2 < g cis,>8 e4 | - d4. fis16 g r16 bes8. ~ bes4 | - %10 - \stemDown - << d,1 { \textLengthOn s4^\markup { \hspace #20 } - s4^\markup { \hspace #1 } s4 } - >> -} - -global = { - \time 4/4 - \key f \major -} - -\score{ - % Allegretto - \new PianoStaff << - \new Staff = "upper" << - \global - \new Voice = "i"\one - \new Voice = "ii" \two - >> - \new Staff = "lower" << - \global - \clef "bass" - \new Voice = "iii" \three - \new Voice = "iv" \four - >> - >> - \layout{ - line-width = 17.0 \cm - \context { - \Score - \override SpacingSpanner #'spacing-increment = #2.0 - } - } - - \midi { - \context { - \Score - tempoWholesPerMinute = #(ly:make-moment 40 4) - } - } - - -} - -