X-Git-Url: https://git.donarmstrong.com/?a=blobdiff_plain;f=input%2Ftest%2Ftransposition.ly;h=152a07f57ae309188c2e790578292886e760b6b6;hb=70048d99398924e7ca0eb481925145ec243700c5;hp=18f742d1273ddb22f7bd05949b0d64492f999360;hpb=5626b34b525c4979eec5e9461a4560d9cdd5b36d;p=lilypond.git

diff --git a/input/test/transposition.ly b/input/test/transposition.ly
index 18f742d127..152a07f57a 100644
--- a/input/test/transposition.ly
+++ b/input/test/transposition.ly
@@ -1,64 +1,75 @@
+
+\version "1.9.4"
+
+\header{ texidoc = "@cindex Transposition
+Transposition test file."
+}
+
+
 %{
 Hi all,
 
 I have extend Mats' patches to allow accidental transposition:
-        \keysignature bes es fis;
-		= \transpose d =>
-        \keysignature gis;
+        \keysignature bes es fis
+		= \transpose c' d =>>
+        \keysignature gis
 
-As you can see in output the example file "test.ly" there are a few problems left:
+As you can see in output =  the example file "test.ly" there are a few problems left:
 - key undo (already in the Todo)
-- "wrong" transposition: e.g. \transpose d of fis-major = gis-major (better as-major?).
+- "wrong" transposition: e.g. \transpose c' d of fis-major = gis-major (better as-major?).
 	The solution gis=as etc. would concern both note and key transposistion
 
 Eric
+
+- Note that transpose eses of fis-major = as-major 
+- Note also that key signatures specified with \property keySignature 
+  are not transposed!
+
+  /Mats B, March 21, 2001
 %}
 
-\header{
-title =	 "Test it";
-description =	 "Transposition Test file";
-enteredby =	 "Eric Bullinger";
-copyright =	 "public domain";
-}
 
 
-\version "1.0.4";
 
-vOne = \notes \relative c''{
-        \clef"violin";
-        \key d;
-        \time 2/4 ;
+vOne =  \notes \relative c''{
+        \clef"violin"
+        \key d \major
+        \time 2/4 
         d4 d |       
-        \key fis;
+        \key fis \major
         fis4 fis |         
-        \key es;
+        \key es \major
         c4 c |
 }
 
-vTwo = \notes \transpose d' { \vOne }
+vTwo =  \notes \transpose c d { \vOne }
 
-vThree = \notes \relative c''{
-        \clef"violin";
-        \keysignature fis cis;
-        \time 2/4 ;
+vThree =  \notes \relative c''{
+        \clef"violin"
+%        \keysignature fis cis
+	\property Staff.keySignature = #'((0 . 1)(3 . 1))
+        \time 2/4 
         d4 d |       
-        \keysignature bes es fis;
+%        \keysignature bes es fis
+	\property Staff.keySignature = #'((3 . 1)(2 . -1)(6 . -1))
         fis4 fis |         
-        \keysignature fis cis gis dis ais eis;
+%        \keysignature fis cis gis dis ais eis
+	\property Staff.keySignature = #'((2 . -1)(5 . -1)(1 . 1)(4 . 1)(0 . 1)(3 . 1))
         cis4 ais4 |
 }
 
-vFour = \notes \transpose d' \vThree
+vFour =  \notes \transpose c d \vThree
 
 \score {
-  \type StaffGroup <
-         \vOne
-         \vTwo
-         \vThree
-         \vFour
-  >
-        \paper { linewidth= 130.\mm; }
+  \context StaffGroup <<
+         \new Staff \vOne
+         \new Staff \vTwo
+         \new Staff \vThree
+         \new Staff \vFour
+  >>
+        \paper { linewidth= 130.\mm raggedright = ##t }
 }
 
 
 
+