From: tucker johnson <tucker@newer.systems>
Date: Mon, 16 Sep 2024 00:44:20 +0000 (-0400)
Subject: two pages
X-Git-Url: https://git.newer.systems/?a=commitdiff_plain;h=d765823755fe4b796f13195d7fb510d72eac0ef5;p=choruses.git

two pages
---

diff --git a/choruses.ly b/choruses.ly
new file mode 100644
index 0000000..2e7ee3f
--- /dev/null
+++ b/choruses.ly
@@ -0,0 +1,241 @@
+\version "2.24.3"
+
+\include "general/info.ly"
+\include "general/aliases.ly"
+\include "general/scripts.ly"
+\include "general/umbel.ly"
+
+fingeringSize = #'(size . 0.6)
+
+\paper {
+  line-width = 120
+  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 = ##f
+  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 . 9))
+  score-system-spacing = #'((basic-distance . 2) (minimum-distance . 1) (padding . 0))
+  last-bottom-spacing = #'((basic-distance . 5) (minimum-distance . 5) (padding . 0))
+  tocTitleMarkup = \markup { \hbracket \sans \bold " contents " }
+
+  tocItemMarkup = \markup \fill-line {
+    \fill-with-pattern #1.5 #CENTER .
+    \line {
+      \fromproperty #'toc:indent \fromproperty #'toc:text
+    }
+    \tiny \number \fromproperty #'toc:page
+  }
+
+  oddHeaderMarkup = \markup {
+    \concat { \if \on-page #5 \oddhead }
+    \concat { \if \on-page #7 \oddhead }
+    \concat { \if \on-page #9 \oddhead }
+    \concat { \if \on-page #11 \oddhead }
+    \concat { \if \on-page #13 \oddhead }
+    \concat { \if \on-page #15 \oddhead }
+    \concat { \if \on-page #17 \oddhead }
+    \concat { \if \on-page #19 \oddhead }
+    \concat { \if \on-page #21 \oddhead }
+    \concat { \if \on-page #23 \oddhead }
+    \concat { \if \on-page #25 \oddhead }
+
+  }
+  evenHeaderMarkup = \markup {
+    \concat { \if \on-page #4 \evhead }
+    \concat { \if \on-page #6 \evhead }
+    \concat { \if \on-page #8 \evhead }
+    \concat { \if \on-page #10 \evhead }
+    \concat { \if \on-page #12 \evhead }
+    \concat { \if \on-page #14 \evhead }
+    \concat { \if \on-page #16 \evhead }
+    \concat { \if \on-page #18 \evhead }
+    \concat { \if \on-page #20 \evhead }
+    \concat { \if \on-page #22 \evhead }
+    \concat { \if \on-page #24 \evhead }
+    \concat { \if \on-page #26 \evhead }
+  }
+  oddFooterMarkup = \markup {
+    \concat { \if \on-page #3 \fill-line { \null \xcr \null } }
+    \concat { \if \on-page #5 \oddfoot }
+    \concat { \if \on-page #7 \oddfoot }
+    \concat { \if \on-page #9 \oddfoot }
+    \concat { \if \on-page #11 \oddfoot }
+    \concat { \if \on-page #13 \oddfoot }
+    \concat { \if \on-page #15 \oddfoot }
+    \concat { \if \on-page #17 \oddfoot }
+    \concat { \if \on-page #19 \oddfoot }
+    \concat { \if \on-page #21 \oddfoot }
+    \concat { \if \on-page #23 \oddfoot }
+    \concat { \if \on-page #25 \oddfoot }
+  }
+  evenFooterMarkup = \markup {
+    \concat { \if \on-page #2 \evfoot }
+    \concat { \if \on-page #4 \evfoot }
+    \concat { \if \on-page #6 \evfoot }
+    \concat { \if \on-page #8 \evfoot }
+    \concat { \if \on-page #10 \evfoot }
+    \concat { \if \on-page #12 \evfoot }
+    \concat { \if \on-page #14 \evfoot }
+    \concat { \if \on-page #16 \evfoot }
+    \concat { \if \on-page #18 \evfoot }
+    \concat { \if \on-page #20 \evfoot }
+    \concat { \if \on-page #22 \evfoot }
+    \concat { \if \on-page #24 \evfoot }
+    \concat { \if \on-page #26 \fill-line { \null \tiny \typewriter \longHash \null } }
+  }
+
+}
+
+\book {
+
+  \markuplist { %Outside Cover
+    \fill-line {
+      \line { \null }
+      \center-column {
+	\line { \with-url #"https://newer.systems" \fontsize #1 \hbracket \sans \bold "  https://newer.systems  " }
+      }
+      \line { \null }
+      \line { \null }
+      \line { \null }
+      \line { \null }
+    }
+    \fill-line {
+        \line { \null }
+        \center-column {
+            \line { \null }
+          }
+        \right-column {
+            \vspace #15
+            \line { \fontsize #8 \bold \underline \xtitle }
+	    \vspace #-0.1
+            \line { \fontsize #3 \sans \xcomp }
+	    \vspace #3
+	    \line { \fontsize #2 \sans \concat { "for " \xinst } }
+      }
+    }
+    \vspace #26.25
+    \fill-line {
+      \line { \null }
+      \line { \null }
+      \line { \null }
+      \line { \null }
+      \center-column {
+	\xumbel
+	\vspace #0.3
+	  \line { \fontsize #1 \hbracket \sans \bold "  umbel press  " }
+      }
+      \line { \null }
+    }
+  }
+
+  \pageBreak
+  \markup { \vspace #5 }
+
+  \pageBreak
+  \markuplist { %Inside Cover
+    \fill-line {
+        \line { \null }
+        \center-column {
+            \vspace #10
+            \line { \hbracket \fontsize #10 \number 2019/24 }
+            \vspace #4
+            \line { \xcomp  }
+            \vspace #1
+            \line { \fontsize #5 \bold  \xtitle }
+            \line { \italic \xsub }
+            \vspace #4
+          }
+        \right-column {
+            \line { \null }
+      }
+    }
+  }
+
+  \pageBreak
+  \markuplist { %Front Matter
+    \fill-line {
+      \left-column {
+        \line { \bold \xtitle " [2019/24]" }
+        \line { \xinst " | " 10 minutes }
+        \line { \xcomp }
+        \vspace #25
+      }
+      \center-column {
+        \vspace #5
+        \line { \hbracket \bold \sans " program notes "}
+        \vspace #0.2
+          \center-column {
+            \override #'(line-width . 100)
+            \justify {
+              Underlying \bold "Choruses" is a cyclic harmonic structure who's
+              features and intervals influence its ever-changing,
+              improvisation-like surface. The musical surface recasts this
+              underlying structure during the 29 repetitions that make up the
+              work \char #8211 29 "\"choruses\"" that present many allusions to
+              Jazz and Free Jazz. The initial version of \bold "Choruses" was
+              completed during one of the latter covid lock-downs as a work for
+              unaccompanied alto saxophone. This new version, created for
+              Floris Van der Veken, incorporates an ambisonic, electroacoustic
+              component: a geometric, resonant expression of the work's
+              structure that transforms and interacts with the soloist. I want
+              to dedicate this work to Tampa Bay saxophonist David Pate, who's
+              tremendous impact on my early musical life resonates far beyond
+              then.
+            }
+          }
+        \vspace #3
+        \override #'(thickness . 5)
+        \draw-squiggle-line #0.5 #'(20 . 0) ##t
+      }
+
+      \right-column {
+        \vspace #-0.5
+        \right-column \fontsize #-1 {
+          \line { \fontsize #-2 \typewriter { \shortHash - \subject } }
+          \vspace #-0.4
+          \line { \fontsize #-2 \typewriter { \commitDate } }
+          \vspace #-0.4
+          \line { \fontsize #-2 \typewriter { \branchName } }
+        }
+        \vspace #2
+      }
+    }
+  }
+
+  \pageBreak
+
+  \bookpart {
+    \header {
+      title = \markup { \fontsize #1 \xtitle }
+      subtitle = \markup { \medium \italic \xsub }
+      composer = \xcomp
+      poet = \markup { \xinst }
+    }
+    \score {
+      <<
+        \include "manuscripts/altoSaxophone.ly"
+      >>
+      %\midi { }
+      \layout {
+        \context {
+          \Score
+          \override RehearsalMark.break-visibility = #begin-of-line-invisible
+          \override SpacingSpanner.base-shortest-duration = #(ly:make-moment 1/20)
+          \override Hairpin.to-barline = ##f
+        }
+      }
+    }
+  }
+
+  \pageBreak
+  \markup { \null }
+}
diff --git a/general/aliases.ly b/general/aliases.ly
index d116780..98479a8 100644
--- a/general/aliases.ly
+++ b/general/aliases.ly
@@ -26,6 +26,9 @@ sD = \stemDown
 sU = \stemUp
 sN = \stemNeutral
 
+rTT = \set stemRightBeamCount = 2
+lTT = \set stemLeftBeamCount = 2
+
 ffsempre =
     #(make-dynamic-script (markup #:combine #:transparent "f" "ff" #:combine
 #:transparent "f" #:normal-text #:italic "sempre" ) )
diff --git a/manuscripts/altoSaxophone.ly b/manuscripts/altoSaxophone.ly
index 48cfb24..6f231fe 100644
--- a/manuscripts/altoSaxophone.ly
+++ b/manuscripts/altoSaxophone.ly
@@ -1,23 +1,93 @@
-% root = ../net-clarity.ly
+% root = ../choruses.ly
 
 \new Staff \with {
-  instrumentName = \markup { clarinet in \concat { \bold "B" \tiny \flat " " } }
-  shortInstrumentName = \markup { cl }
+  instrumentName = \markup {
+    \right-column {
+      \line { "alto saxophone " }
+      \line { in \concat { \bold "E" \tiny \flat " " } }
+    }
+  }
   \override DynamicLineSpanner.staff-padding = \sods
-  fontSize = \clarinetFont
-  \override StaffSymbol.staff-space = \clarinetMagstep
   \consists Text_mark_engraver
 }
 
-\transpose bes c'
 \relative {
   \compressEmptyMeasures
   \numericTimeSignature
   \clef treble
-  \tempo "Allegro energico" 4=104
-  \time 5/4 R1*5/4 | %001
-  \time 4/4 R1*5
-  \time 5/4 R1*5/4 |
-  \time 4/4 R1*13 |
+  \tempo "Poco rubato" 4=100
+  \time 4/4
+  a''32(\f\> fis e \rTT ees \lTT d c a16 d, e fis) e(\mp\< g fis' gis e g) gis32( \rTT a \lTT b  c e fis
+  g gis)\ff r8. r4 r4 r16 ees,16-.\p fis,-. c'-.
+  b,-. r8.  <ceh' eeh cis' gis'>8 \offset Y-offset 5 ^\markup {
+    \center-column { \override #'(graphical . #f) \override \fingeringSize
+      \woodwind-diagram
+        #'saxophone
+        #'((cc . (two three five)) (lh . ()) (rh . (c)))
+    }
+  }
+  b,16-. g''-. des,-. ges'-. r8 r8 fis16-. g,-.
+  f'-. d'-. <d a' cisih,,>8 \offset Y-offset 5 ^\markup {
+    \center-column { \override #'(graphical . #f) \override \fingeringSize
+      \woodwind-diagram
+        #'saxophone
+        #'((cc . (two three five)) (lh . (f)) (rh . ()))
+    }
+  }
+  r4 r4 r8 des,,16-. g'-. |
+  \time 3/4 ges-. aes,-. r8 r4 r8 aes''16-. fis,-. |
+  g-. e'-. r8 r4 r4 |
+  \time 4/4 r16 c,16(\f\> b d g, c b d g,)\p g'(\f\> des fis, c g'' des fis, |
+  c g'')\p e,-.\mf d-. a''-. fis-. des(\p\< fis, c g'' des fis, c)\f fis-.\mf c''-. b,-. |
+  d'8-- r8 \tuplet 3/2 { g8(\mp fis4) } fis,8.( c'16) b8( a) |
+  \time 3/16 d,,16[-. a''-. ges,]-. |
+  \time 3/4 f'2~ f8 r8
+  \time 4/4  r16 bes8.~\pp bes4~ bes8 r8 r8. f16-.\mp |
+  bes,,-. b''! g8~( \tuplet 3/2 { g4 cis8 } cis8) g16-. ges,-. aes'-. ees,-. r8 |
+  \time 3/8 des'4. |
+  \time 4/4 \tuplet 3/2 { ges4\< c,4 b' } \tuplet 3/2 { b g' cis,~\f } |
+  \time 5/8 cis4 a'4. |
+  \time 3/16 r16 ges,,8\mp |
+  \time 4/4 aes'8 ges c,4 \breathe g''4~(\< g8 \tuplet 3/2 { cis,16 a dis,-.)\f } |
+  r8 <ceh eeh cis' gis'>8 \offset Y-offset 5 ^\markup {
+    \center-column { \override #'(graphical . #f) \override \fingeringSize
+      \woodwind-diagram
+        #'saxophone
+        #'((cc . (two three five)) (lh . ()) (rh . (c)))
+    }
+  }
+  b4~\mp b8 g8~ g16 <d d' e beh' gih'>8.~ \offset Y-offset 5 ^\markup {
+    \center-column { \override #'(graphical . #f) \override \fingeringSize
+      \woodwind-diagram
+        #'saxophone
+        #'((cc . (one two three four five six)) (lh . (b)) (rh . (c ees)))
+    }
+  }
+  \time 2/4 16 r16 cis4 \tuplet 3/2 { cis'16(\< a' f' }
+  \time 3/8 ges16)-.\f <gih c, ceh,>8. \offset Y-offset 5 ^\markup {
+    \center-column { \override #'(graphical . #f) \override \fingeringSize
+      \woodwind-diagram
+        #'saxophone
+        #'((cc . (two three five six)) (lh . (low-bes)) (rh . ()))
+    }
+  }
+  r8 |
+  \time 4/4 \tuplet 3/2 { fis,,4 gis'8( } \tuplet 3/2 { dis4) b'8( } <b, c' geh'>8) \offset Y-offset 5 ^\markup {
+    \center-column { \override #'(graphical . #f) \override \fingeringSize
+      \woodwind-diagram
+        #'saxophone
+        #'((cc . (one two three four five)) (lh . (low-bes)) (rh . (c)))
+    }
+  }
 
+  a'4( aes16 ges ges, f8. bes,2~\> bes8)\mp r8 |
+  \time 3/4 b16-. g''-. cis,,-. fis'-. r4 fis16-. g,-. e'-. d'-. |
+  R1*3/4 |
+  d,,16-. g'-. fis-. e,-. r8 g16(\pp fis c' des g, fis) |
+  a'-.\mp fis,-. g'-. e,-. c(\pp^"subtone" des g fis c' des g fis |
+  c' des g) c,( b d, g\< c, b fis g c,)\mp |
+  \time 2/4 des4 \tuplet 3/2 { ges8( c, b) } |
+  \time 3/16 e16[-. d''-. a,]-. |
+  \time 4/4 fis'16 r8 \once \override TupletNumber.text = #tuplet-number::calc-fraction-text \tuplet 4/5 { b,,16(\f g' cis a') }
+  fis,-. c''-. cis,,-. d'-. r4 |
 }
diff --git a/net-clarity.ly b/net-clarity.ly
deleted file mode 100644
index 06e83c6..0000000
--- a/net-clarity.ly
+++ /dev/null
@@ -1,242 +0,0 @@
-\version "2.24.3"
-
-\include "general/info.ly"
-\include "general/aliases.ly"
-\include "general/scripts.ly"
-\include "general/umbel.ly"
-
-clarinetFont = #-2
-clarinetMagstep = #(magstep -2)
-
-\paper {
-  line-width = 120
-  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 = ##f
-  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 { \hbracket \sans \bold " contents " }
-
-  tocItemMarkup = \markup \fill-line {
-    \fill-with-pattern #1.5 #CENTER .
-    \line {
-      \fromproperty #'toc:indent \fromproperty #'toc:text
-    }
-    \tiny \number \fromproperty #'toc:page
-  }
-
-  oddHeaderMarkup = \markup {
-    \concat { \if \on-page #5 \oddhead }
-    \concat { \if \on-page #7 \oddhead }
-    \concat { \if \on-page #9 \oddhead }
-    \concat { \if \on-page #11 \oddhead }
-    \concat { \if \on-page #13 \oddhead }
-    \concat { \if \on-page #15 \oddhead }
-    \concat { \if \on-page #17 \oddhead }
-    \concat { \if \on-page #19 \oddhead }
-    \concat { \if \on-page #21 \oddhead }
-    \concat { \if \on-page #23 \oddhead }
-    \concat { \if \on-page #25 \oddhead }
-
-  }
-  evenHeaderMarkup = \markup {
-    \concat { \if \on-page #4 \evhead }
-    \concat { \if \on-page #6 \evhead }
-    \concat { \if \on-page #8 \evhead }
-    \concat { \if \on-page #10 \evhead }
-    \concat { \if \on-page #12 \evhead }
-    \concat { \if \on-page #14 \evhead }
-    \concat { \if \on-page #16 \evhead }
-    \concat { \if \on-page #18 \evhead }
-    \concat { \if \on-page #20 \evhead }
-    \concat { \if \on-page #22 \evhead }
-    \concat { \if \on-page #24 \evhead }
-    \concat { \if \on-page #26 \evhead }
-  }
-  oddFooterMarkup = \markup {
-    \concat { \if \on-page #3 \fill-line { \null \xcr \null } }
-    \concat { \if \on-page #5 \oddfoot }
-    \concat { \if \on-page #7 \oddfoot }
-    \concat { \if \on-page #9 \oddfoot }
-    \concat { \if \on-page #11 \oddfoot }
-    \concat { \if \on-page #13 \oddfoot }
-    \concat { \if \on-page #15 \oddfoot }
-    \concat { \if \on-page #17 \oddfoot }
-    \concat { \if \on-page #19 \oddfoot }
-    \concat { \if \on-page #21 \oddfoot }
-    \concat { \if \on-page #23 \oddfoot }
-    \concat { \if \on-page #25 \oddfoot }
-  }
-  evenFooterMarkup = \markup {
-    \concat { \if \on-page #2 \evfoot }
-    \concat { \if \on-page #4 \evfoot }
-    \concat { \if \on-page #6 \evfoot }
-    \concat { \if \on-page #8 \evfoot }
-    \concat { \if \on-page #10 \evfoot }
-    \concat { \if \on-page #12 \evfoot }
-    \concat { \if \on-page #14 \evfoot }
-    \concat { \if \on-page #16 \evfoot }
-    \concat { \if \on-page #18 \evfoot }
-    \concat { \if \on-page #20 \evfoot }
-    \concat { \if \on-page #22 \evfoot }
-    \concat { \if \on-page #24 \evfoot }
-    \concat { \if \on-page #26 \fill-line { \null \tiny \typewriter \longHash \null } }
-  }
-
-}
-
-\book {
-
-  \markuplist { %Outside Cover
-    \fill-line {
-      \line { \null }
-      \center-column {
-	\line { \with-url #"https://newer.systems" \fontsize #1 \hbracket \sans \bold "  https://newer.systems  " }
-      }
-      \line { \null }
-      \line { \null }
-      \line { \null }
-      \line { \null }
-    }
-    \fill-line {
-        \line { \null }
-        \center-column {
-            \line { \null }
-          }
-        \right-column {
-            \vspace #15
-            \line { \fontsize #8 \bold \underline \xtitle }
-	    \vspace #-0.1
-            \line { \fontsize #3 \sans \xcomp }
-	    \vspace #3
-	    \line { \fontsize #2 \sans \concat { "for " \xinst } }
-      }
-    }
-    \vspace #26.25
-    \fill-line {
-      \line { \null }
-      \line { \null }
-      \line { \null }
-      \line { \null }
-      \center-column {
-	\xumbel
-	\vspace #0.3
-	  \line { \fontsize #1 \hbracket \sans \bold "  umbel press  " }
-      }
-      \line { \null }
-    }
-  }
-
-  \pageBreak
-  \markup { \vspace #5 }
-
-  \pageBreak
-  \markuplist { %Inside Cover
-    \fill-line {
-        \line { \null }
-        \center-column {
-            \vspace #10
-            \line { \hbracket \fontsize #10 \number 2019/24 }
-            \vspace #4
-            \line { \xcomp  }
-            \vspace #1
-            \line { \fontsize #5 \bold  \xtitle }
-            \line { \italic \xsub }
-            \vspace #4
-          }
-        \right-column {
-            \line { \null }
-      }
-    }
-  }
-
-  \pageBreak
-  \markuplist { %Front Matter
-    \fill-line {
-      \left-column {
-        \line { \bold \xtitle " [2019/24]" }
-        \line { \xinst " | " 10 minutes }
-        \line { \xcomp }
-        \vspace #25
-      }
-      \center-column {
-        \vspace #5
-        \line { \hbracket \bold \sans " program notes "}
-        \vspace #0.2
-          \center-column {
-            \override #'(line-width . 100)
-            \justify {
-              I was struck by the idea of writing \bold "Net Clarity" while listening
-              to my partner, Amber Lucas, practice one of the Reger clarinet sonatas.
-              The work extends a technical approach I employed to compose short
-              keyboard inventions in my recent piece Circumnutation and explores
-              further the structural potentialities of the diatonic set (equivalent to
-              the major scale) and its relationship to the aggregate (the collection of
-              all 12 notes). These (my) technical proclivities notwithstanding, \bold
-              "Net Clarity" also indulges in the diatonic set as a referential
-              collection \char #8211 hinting at other music, without necessarily
-              quoting. Because of its design, the work creates the sensation of a hazy
-              memory \char #8211 remembering music with varying levels of clarity.
-            }
-          }
-        \vspace #3
-        \override #'(thickness . 5)
-        \draw-squiggle-line #0.5 #'(20 . 0) ##t
-      }
-
-      \right-column {
-        \vspace #-0.5
-        \right-column \fontsize #-1 {
-          \line { \fontsize #-2 \typewriter { \shortHash - \subject } }
-          \vspace #-0.4
-          \line { \fontsize #-2 \typewriter { \commitDate } }
-          \vspace #-0.4
-          \line { \fontsize #-2 \typewriter { \branchName } }
-        }
-        \vspace #2
-      }
-    }
-  }
-
-  \pageBreak
-  \header {
-    tagline = "test"
-  }
-
-  \bookpart {
-    \header {
-      title = \markup { \fontsize #1 \xtitle }
-      subtitle = \markup { \medium \italic \xsub }
-      composer = \xcomp
-      poet = \markup { \xinst }
-    }
-    \score {
-      <<
-        \include "manuscripts/altoSaxophone.ly"
-      >>
-      %\midi { }
-      \layout {
-        \context {
-          \Score
-          \override RehearsalMark.break-visibility = #begin-of-line-invisible
-          \override SpacingSpanner.base-shortest-duration = #(ly:make-moment 1/8)
-          \override Hairpin.to-barline = ##f
-        }
-      }
-    }
-  }
-
-  \pageBreak
-  \markup { \null }
-}