From 8d33afc5d947d8ae530c205a8e06732eb2964811 Mon Sep 17 00:00:00 2001
From: hanwen <hanwen>
Date: Wed, 4 Sep 2002 23:47:32 +0000
Subject: [PATCH] new file.

---
 ChangeLog                       |  2 ++
 Documentation/user/refman.itely |  6 +++---
 input/test/poly-metric.ly       | 30 ++++++++++++++++++++++++++++++
 3 files changed, 35 insertions(+), 3 deletions(-)
 create mode 100644 input/test/poly-metric.ly

diff --git a/ChangeLog b/ChangeLog
index c0703d4baf..1d459f469f 100644
--- a/ChangeLog
+++ b/ChangeLog
@@ -1,5 +1,7 @@
 2002-09-05  Han-Wen Nienhuys  <hanwen@cs.uu.nl>
 
+	* input/test/poly-metric.ly: new file.
+
 	* scripts/lilypond-book.py (output_verbatim): python 2.2 workaround.
 
 	* scm/documentation-lib.scm (scm->string): print procedure name in
diff --git a/Documentation/user/refman.itely b/Documentation/user/refman.itely
index cce9320f13..0d981ae70c 100644
--- a/Documentation/user/refman.itely
+++ b/Documentation/user/refman.itely
@@ -1939,9 +1939,9 @@ special symbols in text scripts.
 @cindex ornaments
 @cindex grace notes
 
-Grace notes are ornaments  are written out ornaments
-@lilypond[relative=2,verbatim,ifragment] 
-  c4  \grace c16  c4 \grace { [c16 d16] } c4 
+Grace notes are ornaments that are written out
+@lilypond[relative=2,verbatim,ifragment] c4 \grace c16 c4 \grace {
+[c16 d16] } c4
 @end lilypond
 
 In normal notation, grace notes are supposed to take up no logical
diff --git a/input/test/poly-metric.ly b/input/test/poly-metric.ly
new file mode 100644
index 0000000000..d8e920375d
--- /dev/null
+++ b/input/test/poly-metric.ly
@@ -0,0 +1,30 @@
+\header {
+    texidoc = "Polymetric music with aligned note values can be written
+ by moving the timing engraver to staff context."
+}
+
+\score {
+
+    \notes
+    <
+	\context Staff = SA
+	{ % \time hardcodes \property Score.XXX = YYY
+	\property Staff.timeSignatureFraction = #'(4 . 4)
+	\property Staff.measureLength = #(make-moment 1 1)
+	\property Staff.beatLength = #(make-moment 1 4)
+	c1 c1 c1  }
+	\context Staff= SB {
+	\property Staff.timeSignatureFraction = #'(3 . 4)
+	\property Staff.measureLength = #(make-moment 3 4)
+	\property Staff.beatLength = #(make-moment 1 4)
+	c2. c2.  c2. c2.  }
+
+    >		 
+
+    \paper{
+    \translator{ \ScoreContext
+    \remove "Timing_engraver" }
+    \translator{ \StaffContext
+    \consists "Timing_engraver"}
+}
+}
-- 
2.11.4.GIT