From 3cc2cd02efdf1996f15565d544aada8f84d9045d Mon Sep 17 00:00:00 2001
From: rekado <rekado@elephly.net>
Date: Fri, 9 Dec 2016 10:07:46 +0100
Subject: white noise: compress pauses.

---
 04-white-noise/music/common.ly |  2 +-
 04-white-noise/music/stick.ly  | 13 ++++++-------
 2 files changed, 7 insertions(+), 8 deletions(-)

(limited to '04-white-noise')

diff --git a/04-white-noise/music/common.ly b/04-white-noise/music/common.ly
index 8cd6d21..6fd1176 100644
--- a/04-white-noise/music/common.ly
+++ b/04-white-noise/music/common.ly
@@ -1 +1 @@
-whiteNoise = \repeat unfold 3 { r1 }
+whiteNoise = { R1*3 }
diff --git a/04-white-noise/music/stick.ly b/04-white-noise/music/stick.ly
index eecb6fe..37378d9 100644
--- a/04-white-noise/music/stick.ly
+++ b/04-white-noise/music/stick.ly
@@ -5,12 +5,11 @@ stickIntro = {
   %% silly but I have to mimick the repeats for the other voices to
   %% make the notes line up.
   \time 5/4 \repeat volta 2 {
-    r2. r2 | r2. r2 | r2. r2 | r2. r2 |
-    r2. r2 | r2. r2 | r2. r2 |
+    R4*35
   }
   \alternative {
-    {r2. r2 | }
-    {\time 2/4 r2 | }
+    {R4*5 | }
+    {\time 2/4 R4*2 | }
   }
 }
 
@@ -48,10 +47,10 @@ stickThemeRight = \relative c {
 %% TODO
 stickBeautyLeft = \relative c {
   \repeat volta 2 {
-    r1 | r1 | r1 | r1 |
+    R1*4
   }
   \repeat unfold 2 {
-    r1 | r1 | r1 | r1 |
+    R1*4
   }
 }
 stickBeautyRight = \relative c'' {
@@ -173,7 +172,7 @@ stickLeft = {
 stickRight = {
   \key fis \minor
   \stickIntro
-  \time 4/4 r1
+  \time 4/4 R1
   \whiteNoise
 
   \time 4/4                 \stickThunderRight
-- 
cgit v1.2.3