From 9b32ba059b9a2c4393d844cfb10e6a7e08814059 Mon Sep 17 00:00:00 2001
From: "tuckerajohnsonmusic@gmail.com" <tuckerajohnsonmusic@gmail.com>
Date: Tue, 10 Jan 2023 20:53:12 -0500
Subject: [PATCH] 9i

---
 book.ly                    |  7 +++++++
 front-matter/back cover.ly |  2 +-
 manuscripts/9i.ly          | 39 ++++++++++++++++++++++++++++++++++++++
 variables/variables.ly     |  6 ++++++
 4 files changed, 53 insertions(+), 1 deletion(-)
 create mode 100644 manuscripts/9i.ly

diff --git a/book.ly b/book.ly
index 0a88ac5..e528d3b 100644
--- a/book.ly
+++ b/book.ly
@@ -59,6 +59,13 @@ piece = \markup { \large { \bold "panicle" \number 3 } }
 \include "manuscripts/8i.ly"
 }
 
+\score {
+\header {
+piece = \markup { \large { \bold "anisomery" \number 2 } }
+}
+\include "manuscripts/9i.ly"
+}
+
 \score {
 \header {
 piece = \markup { \large { \bold "cyme" \number 2 } }
diff --git a/front-matter/back cover.ly b/front-matter/back cover.ly
index 6eac7e8..73b97c8 100644
--- a/front-matter/back cover.ly	
+++ b/front-matter/back cover.ly	
@@ -10,7 +10,7 @@ backcover = \markuplist { \fill-line {
         \vspace #1.3
         \line { ================================= }
         \vspace #1.3
-        \override #'(line-width . 75) \justify \typewriter \tiny { This score was engraved on #(strftime "%m-%d-%Y" (localtime (current-time))), using LilyPond version 2.22.2. If you would like to view the most recent version of the input documents that generated it, visit \sans \bold https://github.com/tuckerjohnson/fifteen-inventions.}
+        \override #'(line-width . 75) \justify \typewriter \tiny { This score was engraved on #(string-append (strftime "%m-%d-%Y" (localtime (current-time))) ",") using LilyPond version #(string-append (lilypond-version) ".") If you would like to view the most recent version of the input documents that generated it, visit \sans \bold https://github.com/tuckerjohnson/fifteen-inventions.}
     }
     \line { \null }
     }
diff --git a/manuscripts/9i.ly b/manuscripts/9i.ly
new file mode 100644
index 0000000..9e0a056
--- /dev/null
+++ b/manuscripts/9i.ly
@@ -0,0 +1,39 @@
+%fifteen inventions project
+\new PianoStaff <<
+\set PianoStaff.connectArpeggios = ##t
+\override PianoStaff.Arpeggio.arpeggio-direction = #UP
+\new Staff = "u" {
+\accidentalStyle modern
+<<
+\relative { \tmarkfi \override Hairpin.to-barline = ##f %\tempo Lento 4=40
+\override DynamicLineSpanner.staff-padding = \phds
+\time 6/4
+\stemNeutral <b' e a>2\arpeggio\mf^\markup { \smaller \italic "dolce; espr." }_\markup { \lower #4 \tiny { "[roll chords slowly]" } } fis'4(~\p \tuplet 3/2 { fis8 <f, c'>4)\<\arpeggio } <cis dis' gis>2\arpeggio |
+<d' g>8[(\f\arpeggio aes,~]\p aes4) <fis' cis' b'>4~\<\arpeggio \tuplet 3/2 { 4 ais8~ } 8[ <dis, e'>8]~\f\arpeggio 4~\fermata |
+8[ <bes' a'>8~]\>_( \tuplet 3/2 { 8 e,4) } <g c f>2\mp\arpeggio d4.\>_( <cis' gis'>8)\arpeggio |
+<a, d' g>4~\pp\arpeggio \tuplet 3/2 { 8 <b' fis'>4\<~(\arpeggio^"molto rit." } 4 c,4) <bes ees f'>4~\mf\arpeggio 4\fermata |
+}
+>>
+}
+\new Staff = "d" { \clef bass
+\accidentalStyle modern
+<<
+\relative { %\tmarkfi
+\time 6/4
+<g d>4(_\ppsempre <f c>) <ees bes>( <des aes>) <b fis>( <a e>) |
+bes8( ees,8 <c' f,>4) <d g,>4( <e a,>) <fis b,>( <gis cis,>)\fermata |
+<g d>4( <f c>) <ees bes>( <des aes>) <b fis>( a8[ e8]) |
+<bes' ees,>4( <c f,>4) <d g,>4( <e a,>) <fis b,>( <gis cis,>)\fermata \bar "|."
+}
+>>
+}
+>>
+%\midi { }
+\layout {
+\context {
+\Score
+\override BarNumber.font-size = #1
+\override SpacingSpanner.base-shortest-duration = #(ly:make-moment 1/16)
+\override TimeSignature.stencil = ##f
+}
+}
diff --git a/variables/variables.ly b/variables/variables.ly
index 7e967cd..c22196a 100644
--- a/variables/variables.ly
+++ b/variables/variables.ly
@@ -35,7 +35,13 @@ rord = \once \override TextSpanner.bound-details.right.text = " ord"
 ffsempre =
     #(make-dynamic-script (markup #:combine #:transparent "f" "ff" #:combine
 #:transparent "f" #:normal-text #:italic "sempre" ) )
+ppsempre =
+    #(make-dynamic-script (markup #:combine #:transparent "f" "pp" #:combine
+#:transparent "f" #:normal-text #:italic "sempre" ) )
 
 
 utwo = \change Staff = "ui2"
 dtwo = \change Staff = "di2"
+
+U = \change Staff = "u"
+D = \change Staff = "d"
-- 
2.39.5