From 6cabffae61b0858870ca8fbd7c1a48953b28bc34 Mon Sep 17 00:00:00 2001
From: jleightcap <jack@leightcap.com>
Date: Thu, 3 Jun 2021 23:35:00 -0400
Subject: [PATCH] theme

---
 Vexations.ly | 10 +++++++++-
 piano.ly     | 14 ++++++++++----
 2 files changed, 19 insertions(+), 5 deletions(-)

diff --git a/Vexations.ly b/Vexations.ly
index 91e6a93..75f024e 100644
--- a/Vexations.ly
+++ b/Vexations.ly
@@ -3,6 +3,7 @@
 \header {
   title = "VEXATIONS"
   composer = "ERIK SATIE"
+  meter = "Très lent"
 }
 
 \include "piano.ly"
@@ -11,9 +12,16 @@
   <<
     \new PianoStaff
     <<
-      \set PianoStaff.instrumentName = #"Piano  "
+      \set PianoStaff.instrumentName = #""
       \new Staff = "rightHand" << \rightHand >>
       \new Staff = "leftHand" << \leftHand >>
     >>
   >>
+
+  \layout {
+    \context {
+      \Score
+      \omit BarNumber
+    }
+  }
 }
diff --git a/piano.ly b/piano.ly
index 206c86e..e18eee3 100644
--- a/piano.ly
+++ b/piano.ly
@@ -24,7 +24,7 @@ rightHand = \relative c'' {
   <cis g'!>8
   <cis g'!>~
   <cis g'!>8
-  r8 |
+  r8 \bar "||"
 
   \break % variation 2
   <ees, a>4
@@ -46,7 +46,7 @@ rightHand = \relative c'' {
   <g! cis>8
   <g! cis>~
   <g! cis>8
-  r8 |
+  r8 \bar "||"
 }
 
 leftHand = \relative c' {
@@ -73,7 +73,7 @@ leftHand = \relative c' {
   e!8
   e8~
   e8
-  s8 |
+  s8 \bar "||"
 
   \break % variation 2
   \stemUp \change Staff = "leftHand" c4
@@ -95,5 +95,11 @@ leftHand = \relative c' {
   e!8
   e8~
   e8
-  s8 |
+  s8 \bar "||"
+
+  \break % theme
+  \stemDown \change Staff = "leftHand"
+  c4^\markup{"THÈME"}
+  a8[ cis] bes4 dis g,8[ d'!] c![ dis] ges,4 cis f,!8[ b!] ges[ dis'] ces4 e!8 e8~ e8
+  \bar "||"
 }
-- 
2.38.4