]> git.donarmstrong.com Git - lilypond.git/blobdiff - Documentation/snippets/transcription-of-ancient-music-with-incipit.ly
Doc: run makelsr locally
[lilypond.git] / Documentation / snippets / transcription-of-ancient-music-with-incipit.ly
index c737bf6ab12904907bbaff95b73d9ff805728440..a1d47df0e762c955a8e2a193313a15f3e8652ead 100644 (file)
@@ -1,12 +1,15 @@
-%% Do not edit this file; it is automatically
+%% DO NOT EDIT this file manually; it is automatically
 %% generated from LSR http://lsr.dsi.unimi.it
+%% Make any changes in LSR itself, or in Documentation/snippets/new/ ,
+%% and then run scripts/auxiliar/makelsr.py
+%%
 %% This file is in the public domain.
-\version "2.13.4"
+\version "2.14.2"
 
 \header {
-  lsrtags = "ancient-notation, tweaks-and-overrides"
+  lsrtags = "specific-notation, ancient-notation, workaround, tweaks-and-overrides"
 
-%% Translation of GIT committish: b2d4318d6c53df8469dfa4da09b27c15a374d0ca
+%% Translation of GIT committish: b482c3e5b56c3841a88d957e0ca12964bd3e64fa
   texidoces = "
 A modo de alternativa para obtener auténticos «incipit»
 independientes de la partitura principal, se incluyen como
@@ -29,26 +32,23 @@ main lyrics.
   doctitle = "Transcription of Ancient music with incipit"
 } % begin verbatim
 
+
 global = {
   \set Score.skipBars = ##t
   \key g \major
   \time 4/4
-
   %make the staff lines invisible on staves
   \override Staff.BarLine #'transparent = ##t
   \skip 1*8 % the actual music
-
   % let finis bar go through all staves
   \override Staff.BarLine #'transparent = ##f
-
   % finis bar
   \bar "|."
 }
 
-
 discantusNotes = {
   \transpose c' c'' {
-    \clef "treble"
+    \clef treble
     d'2. d'4 |
     b e' d'2 |
     c'4 e'4.( d'8 c' b |
@@ -71,7 +71,7 @@ discantusLyrics = \lyricmode {
 
 altusNotes = {
   \transpose c' c'' {
-    \clef "treble"
+    \clef treble
     r2 g2. e4 fis g | % two bars
     a2 g4 e |
     fis g4.( fis16 e fis4) |
@@ -109,7 +109,7 @@ tenorLyrics = \lyricmode {
 
 bassusNotes = {
   \transpose c' c' {
-    \clef "bass"
+    \clef bass
     R1 |
     R1 |
     R1 |
@@ -126,137 +126,143 @@ bassusLyrics = \lyricmode {
   -us.
 }
 
-incipitDiscantus = \markup{
-       \score{
-               {
-               \set Staff.instrumentName="Discantus "
-               \override NoteHead   #'style = #'neomensural
-               \override Rest #'style = #'neomensural
-               \override Staff.TimeSignature #'style = #'neomensural
-               \cadenzaOn
-               \clef "neomensural-c1"
-               \key f \major
-               \time 2/2
-               c''1._"IV-" s2  %two bars
-               \skip 1*8 % eight bars
-       }
-       \layout {
-               \context {\Voice
-                       \remove Ligature_bracket_engraver
-                       \consists Mensural_ligature_engraver
-               }
-               line-width=4.5\cm
-       }
-       }
+incipitDiscantus = \markup {
+  \score {
+    {
+      \set Staff.instrumentName = #"Discantus "
+      \override NoteHead #'style = #'neomensural
+      \override Rest #'style = #'neomensural
+      \override Staff.TimeSignature #'style = #'neomensural
+      \cadenzaOn
+      \clef "neomensural-c1"
+      \key f \major
+      \time 2/2
+      c''1._"IV-" s2  %two bars
+      \skip 1*8 % eight bars
+    }
+    \layout {
+      \context {
+        \Voice
+        \remove "Ligature_bracket_engraver"
+        \consists "Mensural_ligature_engraver"
+      }
+      line-width = 4.5\cm
+    }
+  }
 }
 
-incipitAltus = \markup{
-       \score{
-               {
-               \set Staff.instrumentName="Altus "
-               \override NoteHead   #'style = #'neomensural
-               \override Rest #'style = #'neomensural
-               \override Staff.TimeSignature #'style = #'neomensural
-               \cadenzaOn
-               \clef "neomensural-c3"
-               \key f \major
-               \time 2/2
-               r1        % one bar
-        f'1._"IV-" s2   % two bars
-        \skip 1*7 % seven bars
-               }
-       \layout {
-               \context {\Voice
-                       \remove Ligature_bracket_engraver
-                       \consists Mensural_ligature_engraver
-               }
-               line-width=4.5\cm
-       }
-       }
+incipitAltus = \markup {
+  \score {
+    {
+      \set Staff.instrumentName = #"Altus "
+      \override NoteHead #'style = #'neomensural
+      \override Rest #'style = #'neomensural
+      \override Staff.TimeSignature #'style = #'neomensural
+      \cadenzaOn
+      \clef "neomensural-c3"
+      \key f \major
+      \time 2/2
+      r1        % one bar
+      f'1._"IV-" s2   % two bars
+      \skip 1*7 % seven bars
+    }
+    \layout {
+      \context {
+        \Voice
+        \remove "Ligature_bracket_engraver"
+        \consists "Mensural_ligature_engraver"
+      }
+      line-width = 4.5\cm
+    }
+  }
 }
 
-incipitTenor = \markup{
-    \score{ {
-    \set Staff.instrumentName = "Tenor  "
-    \override NoteHead   #'style = #'neomensural
-       \override Rest #'style = #'neomensural
-       \override Staff.TimeSignature #'style = #'neomensural
-       \cadenzaOn
-       \clef "neomensural-c4"
-       \key f \major
-       \time 2/2
-    r\longa   % four bars
-    r\breve   % two bars
-    r1        % one bar
-    c'1._"IV-" s2   % two bars
-    \skip 1   % one bar
+incipitTenor = \markup {
+  \score {
+    {
+      \set Staff.instrumentName = #"Tenor  "
+      \override NoteHead #'style = #'neomensural
+      \override Rest #'style = #'neomensural
+      \override Staff.TimeSignature #'style = #'neomensural
+      \cadenzaOn
+      \clef "neomensural-c4"
+      \key f \major
+      \time 2/2
+      r\longa   % four bars
+      r\breve   % two bars
+      r1        % one bar
+      c'1._"IV-" s2   % two bars
+      \skip 1   % one bar
     }
     \layout {
-               \context {\Voice
-                       \remove Ligature_bracket_engraver
-                       \consists Mensural_ligature_engraver
-               }
-               line-width=4.5\cm
-}
-}
+      \context {
+        \Voice
+        \remove "Ligature_bracket_engraver"
+        \consists "Mensural_ligature_engraver"
+      }
+      line-width = 4.5\cm
+    }
+  }
 }
 
-incipitBassus = \markup{
-    \score{ {
-    \set Staff.instrumentName = "Bassus  "
-    \override NoteHead   #'style = #'neomensural
-       \override Rest #'style = #'neomensural
-       \override Staff.TimeSignature #'style = #'neomensural
-       \cadenzaOn
-       \clef "bass"
-       \key f \major
-       \time 2/2
-    % incipit
-    r\maxima  % eight bars
-    f1._"IV-" s2    % two bars
+incipitBassus = \markup {
+  \score {
+    {
+      \set Staff.instrumentName = #"Bassus  "
+      \override NoteHead #'style = #'neomensural
+      \override Rest #'style = #'neomensural
+      \override Staff.TimeSignature #'style = #'neomensural
+      \cadenzaOn
+      \clef "bass"
+      \key f \major
+      \time 2/2
+      % incipit
+      r\maxima  % eight bars
+      f1._"IV-" s2    % two bars
     }
     \layout {
-               \context {\Voice
-                       \remove Ligature_bracket_engraver
-                       \consists Mensural_ligature_engraver
-               }
-               line-width=4.5\cm
-            }
-     }
+      \context {
+        \Voice
+        \remove "Ligature_bracket_engraver"
+        \consists "Mensural_ligature_engraver"
+      }
+      line-width = 4.5\cm
+    }
+  }
 }
 
 %StaffGroup is used instead of ChoirStaff to get bar lines between systems
 \score {
   <<
-  \new StaffGroup = choirStaff <<
-    \new Voice =
-      "discantusNotes" << \global
-      \set Staff.instrumentName=\incipitDiscantus
-      \discantusNotes >>
-    \new Lyrics =
-      "discantusLyrics" \lyricsto discantusNotes { \discantusLyrics }
+    \new StaffGroup = choirStaff <<
+      \new Voice = "discantusNotes" <<
+        \global
+        \set Staff.instrumentName = \incipitDiscantus
+        \discantusNotes
+      >>
+      \new Lyrics = "discantusLyrics" \lyricsto discantusNotes { \discantusLyrics }
 
-    \new Voice =
-      "altusNotes" << \global
-      \set Staff.instrumentName=\incipitAltus
-      \altusNotes >>
-    \new Lyrics =
-      "altusLyrics" \lyricsto altusNotes { \altusLyrics }
+      \new Voice = "altusNotes" <<
+        \global
+        \set Staff.instrumentName = \incipitAltus
+        \altusNotes
+      >>
+      \new Lyrics = "altusLyrics" \lyricsto altusNotes { \altusLyrics }
 
-    \new Voice =
-      "tenorNotes" << \global
-      \set Staff.instrumentName=\incipitTenor
-      \tenorNotes >>
-    \new Lyrics =
-      "tenorLyrics" \lyricsto tenorNotes { \tenorLyrics }
+      \new Voice = "tenorNotes" <<
+        \global
+        \set Staff.instrumentName = \incipitTenor
+        \tenorNotes
+      >>
+      \new Lyrics = "tenorLyrics" \lyricsto tenorNotes { \tenorLyrics }
 
-    \new Voice =
-      "bassusNotes" << \global
-      \set Staff.instrumentName=\incipitBassus
-      \bassusNotes >>
+      \new Voice = "bassusNotes" <<
+        \global
+        \set Staff.instrumentName = \incipitBassus
+        \bassusNotes
       >>
-    \new Lyrics =
-      "bassusLyrics" \lyricsto bassusNotes { \bassusLyrics }
+    >>
+    \new Lyrics = "bassusLyrics" \lyricsto bassusNotes { \bassusLyrics }
     %Keep the bass lyrics outside of the staff group to avoid bar lines
     %between the lyrics.
   >>
@@ -264,21 +270,23 @@ incipitBassus = \markup{
   \layout {
     \context {
       \Score
-
       % no bars in staves
       \override BarLine #'transparent = ##t
     }
-    % the next three instructions keep the lyrics between the barlines
-       \context { \Lyrics
-          \consists "Bar_engraver"
-          \override BarLine #'transparent = ##t }
-       \context { \StaffGroup \consists "Separating_line_group_engraver" }
+    % the next three instructions keep the lyrics between the bar lines
+    \context {
+      \Lyrics
+      \consists "Bar_engraver"
+      \override BarLine #'transparent = ##t
+    }
+    \context {
+      \StaffGroup
+      \consists "Separating_line_group_engraver"
+    }
     \context {
       \Voice
-
       % no slurs
       \override Slur #'transparent = ##t
-
       % Comment in the below "\remove" command to allow line
       % breaking also at those barlines where a note overlaps
       % into the next bar.  The command is commented out in this
@@ -287,7 +295,7 @@ incipitBassus = \markup{
       % overall spacing if you comment in the following command.
       %\remove "Forbid_line_break_engraver"
     }
-       indent=5\cm
+    indent = 5\cm
   }
 }