LSR: adding new files.

[lilypond.git] / input / test / staff-size.ly

diff --git a/input/test/staff-size.ly b/input/test/staff-size.ly
index dbc927a9f68b6fcca7fb8aac68a9e354520005b2..6abe3d17d895ae4b58a815e827a1f7aaf6107b32 100644 (file)
--- a/input/test/staff-size.ly
+++ b/input/test/staff-size.ly
@@ -1,33 +1,23 @@
+\version "2.10.0"
 
-\header { texidoc = "Setting staff sizes is a little clumsy.  There
-are two options: using StaffContainer and override/revert, or
-\outputproperty. Both methods are shown in this example."
-}
+\header { texidoc = "@cindex Staff Size
 
-\version "1.7.18"
-\score {
-  \notes \relative c' < \context StaffContainer = SA{
-     \property StaffContainer.StaffSymbol \set #'staff-space = #(/ 16 20)
+In order to change staff sizes, both @code{staff-space} and @code{fontSize}
+must be scaled."
 
-       \property Staff.fontSize = #-1
-       \property Voice.fontSize = #-1
-       
-       \dynamicUp\stemDown
+}
 
-       %\key gis \major
-       c8 d  e-[ f g a] b c -\ff
-  }
+\layout { ragged-right = ##t}
+
+\relative c' <<
+%    \new Staff \relative c'' { \dynamicDown c4 \ff c c c }
+    \new Staff \with {
+       fontSize = #-3
+       \override StaffSymbol #'staff-space = #(magstep -3)
+    } {
+       \clef bass
+       c8 c c c  c c c c
+    }
+>>
 
-\context Staff = SB { \dynamicDown c,,4 -\ff c c c  }
-\context Staff = SC {
-  \context Staff \outputproperty #(make-type-checker 'staff-symbol-interface)
-    #'staff-space =  #0.8
-  \property Staff.fontSize = #-1
-  \clef bass
-  c8 c c c  c c c c
-}
->
-\paper { raggedright = ##t}
-}
 
-%% new-chords-done %%