]> git.donarmstrong.com Git - lilypond.git/blobdiff - input/tutorial/brahms-tweaked.ly
Imported sources
[lilypond.git] / input / tutorial / brahms-tweaked.ly
index f25b3299f15dd56973a1762f2d795c0015304921..b0afd9c5141ac45e7c0b996a989c62ac8596dbd5 100644 (file)
@@ -1,32 +1,37 @@
+#(ly:set-option 'old-relative)
+\version "2.1.7"
 \score {
-    \notes\context PianoStaff <
+    \notes\context PianoStaff <<
     \context Staff = up
-    \relative c'' <
+    \relative c'' <<
         {   \key d\major 
             \property Voice.Slur \set #'attachment = #'(stem . stem)
 
-            \property Voice.Fingering \set #'extra-offset = #'(-0.3 . -1.8) 
-            fis4-3_\p ( ~
+           \once \property Voice.Fingering
+             \override #'extra-offset = #'(-0.3 . -1.8) 
+           fis4-3_\p(~
+   
 
-            \property Voice.Fingering \revert #'extra-offset
-            fis16 )a^" "^#'(finger "5") } \\
+            fis16 a)^" "^\markup { \finger "5" } } \\
         {
             \dynamicUp
-            \property Voice.DynamicLineSpanner \override #'padding = #5.0
+            \property Voice.DynamicLineSpanner
+             \override #'padding = #5.0
             \tieUp
-            fis16( \> d \! b \translator Staff = down
+            fis16(\> d b\! \change Staff = down
            \stemUp
-           \clef treble g ~ < g8 )e> } \\
+           \clef treble g~ <g e>8) } \\
         { s16
-          \property Voice.Stem \set #'transparent = ##t
+         \once \property Voice.Stem \set #'transparent = ##t
           d'
-          \property Voice.Stem \revert #'transparent
-          ~ < d4 b4  > }
-    >
+          ~ <d b>4 }
+    >>
     \context Staff = down {
         \key d \major
         \time 3/8 \clef bass s4. }
-    >
-    \paper { linewidth = -1. }
+    >>
+    \paper { raggedright = ##t}
 }
 
+
+