]> git.newer.systems - net-clarity.git/commitdiff
changes
authorTucker Johnson <tucker@newer.systems>
Wed, 15 May 2024 02:45:32 +0000 (22:45 -0400)
committerTucker Johnson <tucker@newer.systems>
Wed, 15 May 2024 02:45:32 +0000 (22:45 -0400)
eng-files/paper.ly
manuscripts/IV-piano.ly

index 7efebaa896a2d1a3a03e8b12f3cc6f0f1551ec6c..d81da35d5a6ed74a73bfb2c17cc68922147c79e6 100644 (file)
@@ -5,6 +5,28 @@
   first-page-number = -1
   footnote-separator-markup = \markup { \left-column { \vspace #0.5 \draw-line #'(6 . 0) } }
   print-page-number = ##f
+  #(set-paper-size "arch a")
+  print-all-headers = ##t
+  top-margin = 0.5\in
+  bottom-margin = 0.5\in
+  left-margin = 0.9\in
+  right-margin = 0.9\in
+  indent = 0.75\in
+  short-indent = 0\cm
+  #(define fonts (set-global-fonts #:music "scorlatti" #:brace "scorlatti" #:roman "Junicode" #:sans "syne"))
+  max-systems-per-page = #10
+  system-system-spacing = #'((basic-distance . 10) (minimum-distance . 8) (padding . 12))
+  score-system-spacing = #'((basic-distance . 2) (minimum-distance . 1) (padding . 0))
+  last-bottom-spacing = #'((basic-distance . 5) (minimum-distance . 5) (padding . 0))
+  tocTitleMarkup = \markup { \null }
+  tocItemMarkup = \markup {
+    \center-column {
+      \fill-line {
+        \left-column { \concat { "                                " "       " \bold \fromproperty #'toc:text } }
+        \right-column { \concat { \tiny \number { \fromproperty #'toc:page } "                                " "       " } }
+      }
+    }
+  }
   oddHeaderMarkup = \markup {
     \concat { \if \on-page #5 \oddhead }
     \concat { \if \on-page #7 \oddhead }
     \concat { \if \on-page #22 \evfoot }
   }
 
-  #(set-paper-size "arch a")
-  print-all-headers = ##t
-  top-margin = 0.5\in
-  bottom-margin = 0.5\in
-  left-margin = 0.9\in
-  right-margin = 0.9\in
-  indent = 0.75\in
-  short-indent = 0\cm
-  #(define fonts (set-global-fonts #:music "haydn" #:brace "haydn" #:roman "Junicode" #:sans "syne"))
-  max-systems-per-page = #10
-  system-system-spacing = #'((basic-distance . 10) (minimum-distance . 8) (padding . 12))
-  score-system-spacing = #'((basic-distance . 2) (minimum-distance . 1) (padding . 0))
-  last-bottom-spacing = #'((basic-distance . 5) (minimum-distance . 5) (padding . 0))
-  tocTitleMarkup = \markup { \null }
-  tocItemMarkup = \markup {
-    \center-column {
-      \fill-line {
-        \left-column { \concat { "                                " "       " \bold \fromproperty #'toc:text } }
-        \right-column { \concat { \tiny \number { \fromproperty #'toc:page } "                                " "       " } }
-      }
-    }
-  }
+
 }
index c92cbf0eead4dd78d494f2cecc84c6fd99c8b869..bfd29bbb99fd181c250feba476dbe718e7a67501 100644 (file)
       1~ | %006
       \time 5/4 4~ 16 c8.~ 16 g'8.~^\mp 2) | %007
       \time 4/4 R1 | %008
-      r2 r4 r16[ d16(^\pp e8] | %009
+      r2 r4 r16 d16(^\pp e8 | %009
       b1~ | %010
       4~ 8) 8~(^\mf 8. a16~ 4~ | %011
-      4) r8.[ d16](^\> a4~ 8 bes8 | %012
+      4) r8. d16(^\> a4~ 8 bes8 | %012
       c1)^\mp | %013
       r4 g'2( f8^\< e8~ | %014
       e8 fis16 dis16 b8 gis'8 cis,2~^\mf | %015
       cis2) r4 r8 b8(~ | %016
       b8. cis16 f8 d8~ d8 ees8~ ees4~ | %017
       ees8) r8 a16(^\f gis8.~  gis4) g8 e8 | %018
-      c4-- r16 bes8.~^\mp bes16[ bes16-. r8] r4 | %019
+      c4-- r16 bes8.~^\mp bes16 bes16-. r8 r4 | %019
       r4 r16 ges'8.~^\mf ges4~ ges8 ges8--^\f | %020
 
       \sectionLabel \markup { \box \number 21 }