X-Git-Url: https://git.donarmstrong.com/?a=blobdiff_plain;f=Documentation%2Fsnippets%2Fsimultaneous-headword.ly;h=b8462ffabaf850ec8072e68fe96d74fa2d3ac2c5;hb=4051d4410364b9984faa181659a3bfe2763a9736;hp=636276605084ff850ade23f235b48fb74227aba7;hpb=c833f8a341b81466e084ed031362eadeb4a815aa;p=lilypond.git

diff --git a/Documentation/snippets/simultaneous-headword.ly b/Documentation/snippets/simultaneous-headword.ly
index 6362766050..b8462ffaba 100644
--- a/Documentation/snippets/simultaneous-headword.ly
+++ b/Documentation/snippets/simultaneous-headword.ly
@@ -1,10 +1,10 @@
 %% DO NOT EDIT this file manually; it is automatically
-%% generated from LSR http://lsr.dsi.unimi.it
+%% generated from LSR http://lsr.di.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.14.2"
+\version "2.18.0"
 
 \header {
   lsrtags = "headword"
@@ -16,6 +16,9 @@ Simultaneous notes
   doctitle = "Simultaneous headword"
 } % begin verbatim
 
+%% http://lsr.di.unimi.it/LSR/Item?id=825
+%% see also http://lilypond.org/doc/v2.18/Documentation/notation/simultaneous-notes
+
 \include "english.ly"
 
 % NR 1.5 Simultaneous notes
@@ -28,15 +31,15 @@ Simultaneous notes
 \layout {
   \context {
     \Score
-    \override SpacingSpanner #'base-shortest-duration =
-    #(ly:make-moment 1 18)
-    \override NonMusicalPaperColumn #'line-break-system-details =
+    \override SpacingSpanner.base-shortest-duration =
+    #(ly:make-moment 1/18)
+    \override NonMusicalPaperColumn.line-break-system-details =
     #'((alignment-distances . (12)))
   }
 }
 
 trillFlat =
-\once \override TrillSpanner #'(bound-details left text) = \markup {
+\once \override TrillSpanner.bound-details.left.text = \markup {
   \concat {
     \musicglyph #"scripts.trill"
     \translate #'(-0.5 . 1.9)
@@ -57,152 +60,48 @@ trillFlat =
 
     % RH voice 1
     \new Voice {
-
       \voiceOne
-      s4.
-      s8.
-
-      |
-
-      s4.
-      a''8 \p \> [ (
-      g''16 ] )
-
-      |
-
-      g''4.
-      af''8 [ (
-      g''16 ] )
-
-      |
-
-      g''8. [
-      g''8.
-      g''8. \pp ]
-
-      |
-
-      g''8. [
-      af''8.
-      af''8. ]
-
-      |
-
-      af''8. [
-      af''8.
-      af''8. ]
-
-      |
-      \break
-
+      s4. s8. |
+      s4. a''8[( \p \> g''16]) |
+      g''4. af''8[( g''16]) |
+      g''8.[ g''8. g''8.] \pp |
+      g''8.[ af''8.af''8.] |
+      af''8.[ af''8.af''8.] |
       \trillFlat
-      af''4. \startTrillSpan
-      ~
-      af''8.
-      ~
-
-      |
-
-      af''4.
-      ~
-      af''8.
-      ~
-
-      |
-
+      af''4.~ \startTrillSpan
+      af''8.~ |
+      af''4.~ af''8.~ |
       \oneVoice
-      <af'' d''>8. [
-      a''8. \p \<
-      bf''8. ]
-      ~
-
-      |
-
-      bf''8. [
-      b''8.
-      c'''8. ]
-      ~
-
+      <af'' d''>8.[ a''8. \p \< bf''8.]~ |
+      bf''8.[ b''8. c'''8.]~
       \bar "||"
-
       \key ef \major
-      c'''8. [
-      cs'''8. \f ] \stopTrillSpan
+      c'''8.[ cs'''8.] \f \stopTrillSpan
       r8.
-
     }
 
     % RH voice 2
     \new Voice {
       \voiceTwo
-      \override Voice.TrillSpanner #'direction = #DOWN
-      d''4. \f \startTrillSpan
-      ~
-      d''8.
-      ~
-
-      |
-
-      d''4.
-      ~
-      d''8.
-      ~
-
-      |
-
+      \override Voice.TrillSpanner.direction = #DOWN
+      d''4.~ \f \startTrillSpan
+      d''8.~ |
+      d''4.~ d''8.~ |
       d''8. \stopTrillSpan
       \trillFlat
-      d''4. \startTrillSpan
-      ~
-
-      |
-
-      d''4.
-      ~
-      d''8.
-      ~
-
-      |
-
-      d''4.
-      ~
-      d''8.
-      ~
-
-      |
-
-      d''4.
-      ~
-      d''8. \stopTrillSpan
-      ~
-
-      |
-
+      d''4.~ \startTrillSpan |
+      d''4.~ d''8.~ |
+      d''4.~ d''8.~ |
+      d''4.~ d''8.~ \stopTrillSpan |
       \trillFlat
-      d''4. \startTrillSpan
-      ~
-      d''8.
-      ~
-
-      |
-
-      d''4.
-      ~
-      d''8.
-      ~
-
-      |
-
-      \once \override NoteColumn #'ignore-collision = ##t
+      d''4.~ \startTrillSpan
+      d''8. ~ |
+      d''4.~ d''8.~ |
+      \once \override NoteColumn.ignore-collision = ##t
       \hideNotes
       d''8. \stopTrillSpan
-      s4.
-
-      |
-
-      s8.
-      s8.
-
+      s4. |
+      s8. s8.
     }
 
   >>
@@ -212,108 +111,41 @@ trillFlat =
     \clef bass
     \key c \major
     \time 9/16
-
-    r8.
-    r8.
-    <c! c,!>8 [ (
-    <g, g,,>16 ] )
-
-    |
-
+    r8. r8. <c! c,!>8[( <g, g,,>16]) |
     <g, g,,>4.
     \clef treble
-    c''8 [ (
-    b'16 ] )
-
-    |
-
-    b'4.
-    c''8 [ (
-    b'16 ] )
-
-    |
-
-    b'8. [
-    b'8.
-    b'8. ]
-
-    |
-
-    b'8. [
-    bf'8. ]
+    c''8[( b'16]) |
+    b'4. c''8[( b'16]) |
+    b'8.[ b'8. b'8.] |
+    b'8.[ bf'8.]
     \clef bass
-    <f f,>8 [ (
-    <bf, bf,,>16 ] )
-
-    |
-
+    <f f,>8[( <bf, bf,,>16]) |
     <bf, bf,,>4.
     \clef treble
-    f'8 [ (
-    bf16 ] )
-
-    |
-
+    f'8[( bf16]) |
     <<
-
       \new Voice {
         \voiceOne
-        \override Voice.TrillSpanner #'direction = #UP
-        f'4. \startTrillSpan
-        ~
-        f'8.
-        ~
-
-        |
-
-        f'4.
-        ~
-        f'8.
-        ~
-
-        |
-
+        \override Voice.TrillSpanner.direction = #UP
+        f'4.~ \startTrillSpan
+        f'8.~ |
+        f'4.~ f'8.~ |
         f'8. \stopTrillSpan
       }
-
       \new Voice {
         \voiceTwo
-        \override Voice.TrillSpanner #'direction = #DOWN
-        bf8. [
-        bf8.
-        bf8. ]
-
-        |
-
-        bf8. [
-        bf8.
-        bf8. ]
-
-        |
-
+        \override Voice.TrillSpanner.direction = #DOWN
+        bf8.[ bf8. bf8.] |
+        bf8.[ bf8. bf8.] |
         bf8.
       }
-
     >>
-
     \oneVoice
-    r8.
-    r8.
-
-    |
-
-    r8.
-    r8.
-    r8.
+    r8. r8. |
+    r8. r8. r8.
     \clef bass
-
     |
-
     \key ef \major
-    r8.
-    r8.
-    r8.
-
+    r8. r8. r8.
   }
-
 >>