Shamusworld >> Repos - music/blob - come-now-is-the-time-to-worship.ly

   1 \version "2.16.0"
   2 \include "pop-chords.ly"
   3 \include "english.ly"
   4
   5 % Good sizes are 16, 18, & 20
   6 staffSize = #20
   7 #(set-default-paper-size "letter")
   8 #(set-global-staff-size staffSize)
   9 #(ly:set-option (quote no-point-and-click))
  10
  11 %{ Some useful characters: ‘ ’ “ ” – — † ‡ • … %}
  12
  13 \header
  14 {
  15 %Let's bump up the title size and switch to the chord font. :-)
  16
  17         title    = \markup { \override #'(font-family . sans) \fontsize #3.5 "Come, Now is the Time to Worship" }
  18 %       composer = \markup { \override #'(font-family . sans) \fontsize #1.3 "M. Barnett" }
  19         arranger = \markup { \override #'(font-family . sans) \fontsize #1.3 "arr. Ed Smart" }
  20         tagline  = $(string-append "Engraved by JLH and Lilypond " (lilypond-version))
  21 % Let's try a chord dictionary
  22 %       subtitle =  \markup { \center-align { "F#m" \fret-diagram-terse #"x;x;4;2;2;2;" } "       " \center-align { "F#m/F" \fret-diagram-terse #"x;x;3;2;2;2;" } "       " \center-align { "F#m/E" \fret-diagram-terse #"x;x;2;2;2;2;" }  "       " \center-align { "F#m/Eb" \fret-diagram-terse #"x;x;1;2;2;2;" }  "       " \center-align { "Em7" \fret-diagram-terse #"o;2;2;o;3;o;" }  "       " \center-align { "A13" \fret-diagram-terse #"x;o;2;o;2;2;" }  }
  23 }
  24
  25 % Useful tweak abbreviations (hn = harmony note)
  26
  27 hn = #(define-music-function (parser location arg) (ly:music?)
  28 ;; Harmony Note: Set the tweaks property of the passed in note to use a smaller font
  29
  30   (set! (ly:music-property arg 'tweaks)
  31     (acons 'font-size -3.0 (ly:music-property arg 'tweaks))) arg)
  32
  33
  34 %
  35 % Song's structure
  36 %
  37 Global =
  38 {
  39         \key d \major
  40         \override Staff.TimeSignature #'style = #'()
  41         \time 4/4
  42
  43 %       \once \override TextScript #'padding = #2.0
  44         s1*0^\markup { \italic \bold { Spacey, but imply 16ths } }
  45 % Capo 4 version
  46 %       s1*0^\markup { \hspace #0.0 \raise #2.0 \bigger \bold { "Moderate pop (*** CAPO 4 ***)" } }
  47
  48         % Intro
  49
  50         s1*4 |   % 1-4
  51
  52         % Verse
  53
  54         \repeat volta 2
  55         {
  56                 \mark \markup { \override #'(font-family . sans) { \box { A } } }
  57                 s1*16 |   % 5-20
  58         }
  59         \alternative
  60         {
  61                 {
  62                         s1*2 |   % 21-22
  63                 }
  64                 {
  65                         s1 |   % 23
  66                 }
  67         }
  68
  69         s1 \bar "||"   % 24
  70
  71         % Chorus
  72
  73         \mark \markup { \override #'(font-family . sans) { \box { B } } }
  74         s1*9 \bar "||"   % 25-33
  75
  76         \key e \major
  77
  78         % Verse
  79
  80         \mark \markup { \override #'(font-family . sans) { \box { C } } }
  81         s1*18 |   % 34-51
  82
  83         % Chorus
  84
  85         \repeat volta 2
  86         {
  87                 \mark \markup { \override #'(font-family . sans) { \box { D } } }
  88                 s1*8 |   % 52-59
  89         }
  90         \alternative
  91         {
  92                 {
  93                         s1 |   % 60
  94                 }
  95                 {
  96                         s1 \bar "||"   % 61
  97                 }
  98         }
  99
 100         \mark \markup { \override #'(font-family . sans) { \box { E } } }
 101         s1*16 |   % 62-77
 102
 103         \repeat volta 2
 104         {
 105                 \mark \markup { \override #'(font-family . sans) { \box { F } } }
 106                 s1*4 |   % 78-81
 107         }
 108
 109         s1 \bar "|."   % 82
 110 }
 111
 112
 113 %
 114 % Lead vocal
 115 %
 116 LeadVox = \relative c'
 117 {
 118 %       \set Staff.instrument = #"Lead vox"
 119         \clef G
 120         \override Staff.TimeSignature #'style = #'()
 121 %Hm. Needed anymore?
 122 %       \override Score.SpacingSpanner #'average-spacing-wishes = ##f
 123         \set tupletSpannerDuration = #(ly:make-moment 1 4)
 124
 125         % Intro
 126
 127         r1 |   % 1
 128         r1 |   % 2
 129         r1 |   % 3
 130         r1 |   % 4
 131
 132         % Verse
 133
 134         <fs \hn d \hn a>2 r |   % 5
 135         <e \hn b \hn g>8 <fs \hn d \hn a> <g \hn e \hn b> <fs \hn d \hn a> ( ~ <fs \hn d \hn a> <e \hn b \hn g> ) <e \hn b \hn g> <g \hn e \hn b> ( ~ |   % 6
 136         <g \hn e \hn b>2. <fs \hn d \hn a>8 ) <fs \hn d \hn a> ~ |   % 7
 137         <fs \hn d \hn a>2. r4 |   % 8
 138         <e \hn cs \hn a>2 r |   % 9
 139         <e \hn cs \hn a>8 <fs \hn d \hn a> <g \hn e \hn b> <fs \hn d \hn a> ( ~ <fs \hn d \hn a> <e \hn cs \hn a> ) <e \hn cs \hn a> <g \hn e \hn b> ~ |   % 10
 140         <g \hn e \hn b>2 <fs \hn d \hn a>4. ( <d \hn b \hn g>8 ) |   % 11
 141         <d \hn a \hn g>2. r4 |   % 12
 142         <fs \hn d \hn a>2 r |   % 13
 143         <e \hn b \hn g>8 <fs \hn d \hn a> <g \hn e \hn b> <fs \hn d \hn a> ( ~ <fs \hn d \hn a> <e \hn b \hn g> ) <e \hn b \hn g> <g \hn e \hn b> ( ~ |   % 14
 144         <g \hn e \hn b>2. <fs \hn d \hn a>8 ) <fs \hn d \hn a> ~ |   % 15
 145         <fs \hn d \hn a>2. r4 |   % 16
 146         <e \hn cs \hn a>1 |   % 17
 147         <e \hn cs \hn a>8 <fs \hn d \hn a> <g \hn e \hn b> <fs \hn d \hn a> ( ~ <fs \hn d \hn a> <e \hn cs \hn a> ) <e \hn cs \hn a> <g \hn e \hn b> ~ |   % 18
 148         <g \hn e \hn b>2 <fs \hn d \hn a>4. ( <d \hn b \hn g>8 ) |   % 19
 149         <d \hn a \hn g>2. r4 |   % 20
 150
 151         d1 |   % 21
 152         r1 |   % 22
 153
 154         <d \hn a \hn fs>1 |   % 23
 155
 156         r1 |   % 24
 157
 158         % Chorus
 159
 160         <b' \hn g \hn d>8 <b \hn g \hn d> <b \hn g \hn d> <b \hn g \hn d> <b \hn g \hn d> <a \hn fs \hn d> <g \hn e \hn b> <a \hn fs \hn d> ~ |   % 25
 161         <a \hn fs \hn d>8 <a \hn fs \hn d> <a \hn fs \hn d> <fs \hn d \hn a> ~ <fs \hn d \hn a>4 r |   % 26
 162         <b \hn g \hn d>8 <b \hn g \hn d> <b \hn g \hn d> <b \hn g \hn d> <b \hn g \hn d> <a \hn fs \hn d> <g \hn d \hn b>16 ( <a \hn fs \hn d> ) <a \hn fs \hn d>8 ~ |   % 27
 163         <a \hn fs \hn d>2. r4 |   % 28
 164         <b \hn g \hn d>8 <b \hn g \hn d> <b \hn g \hn d> <b \hn g \hn d> <b \hn g \hn d> <b \hn g \hn d> <cs \hn a \hn e> <d \hn b \hn fs> ~ |   % 29
 165         <d \hn b \hn fs>8 <cs \hn a \hn e>4 <b \hn fs \hn d>8 ~ <b \hn fs \hn d>4 <a \hn fs \hn d>8 <b \hn g \hn d> ~ |   % 30
 166         <b \hn g \hn d>8 <a \hn fs \hn d> r <a \hn d, \hn b> ~ <a \hn d, \hn b>4 <a \hn d, \hn b>8 <a \hn e \hn d> ~ |   % 31
 167         <a \hn e \hn d>1 |   % 32
 168         r1 |   % 33
 169
 170         % Verse
 171
 172         <gs \hn e \hn b>2 r |   % 34
 173         <fs \hn cs \hn a>8 <gs \hn e \hn b> <a \hn fs \hn cs> <gs \hn e \hn b> ( ~ <gs \hn e \hn b> <fs \hn cs \hn a> ) <fs \hn cs \hn a> <a \hn fs \hn cs> ( ~ |   % 35
 174         <a \hn fs \hn cs>2. <gs \hn e \hn b>8 ) <gs \hn e \hn b> ~ |   % 36
 175         <gs \hn e \hn b>2. r4 |   % 37
 176         <fs \hn ds \hn b>2 r |   % 38
 177         <fs \hn ds \hn b>8 <gs \hn e \hn b> <a \hn fs \hn cs> <gs \hn e \hn b> ( ~ <gs \hn e \hn b> <fs \hn ds \hn b> ) <fs \hn ds \hn b> <a \hn fs \hn cs> ~ |   % 39
 178         <a \hn fs \hn cs>2 <gs \hn e \hn b>4. ( <e \hn cs \hn a>8 ) |   % 40
 179         <e \hn b \hn a>2. r4 |   % 41
 180         <gs \hn e \hn b>2 r |   % 42
 181         <fs \hn cs \hn a>8 <gs \hn e \hn b> <a \hn fs \hn cs> <gs \hn e \hn b> ( ~ <gs \hn e \hn b> <fs \hn cs \hn a> ) <fs \hn cs \hn a> <a \hn fs \hn cs> ( ~ |   % 43
 182         <a \hn fs \hn cs>2. <gs \hn e \hn b>8 ) <gs \hn e \hn b> ~ |   % 44
 183         <gs \hn e \hn b>2. r4 |   % 45
 184         <fs \hn ds \hn b>1 |   % 46
 185         <fs \hn ds \hn b>8 <gs \hn e \hn b> <a \hn fs \hn cs> <gs \hn e \hn b> ( ~ <gs \hn e \hn b> <fs \hn ds \hn b> ) <fs \hn ds \hn b> <a \hn fs \hn cs> ~ |   % 47
 186         <a \hn fs \hn cs>2 <gs \hn e \hn b>4. ( <e \hn cs \hn a>8 ) |   % 48
 187         <e \hn b \hn a>2. r4 |   % 49
 188         <e \hn b \hn gs>2. r4 |   % 50
 189         r1 |   % 51
 190
 191         % Chorus
 192
 193         <cs' \hn a \hn e>8 <cs \hn a \hn e> <cs \hn a \hn e> <cs \hn a \hn e> <cs \hn a \hn e> <b \hn gs \hn e> <a \hn fs \hn cs> <b \hn gs \hn e> ~ |   % 52
 194         <b \hn gs \hn e>8 <b \hn gs \hn e> <b \hn gs \hn e> <gs \hn e \hn b> ~ <gs \hn e \hn b>4 r |   % 53
 195         <cs \hn a \hn e>8 <cs \hn a \hn e> <cs \hn a \hn e> <cs \hn a \hn e> <cs \hn a \hn e> <b \hn gs \hn e> <a \hn e \hn cs>16 ( <b \hn gs \hn e> ) <b \hn gs \hn e>8 ~ |   % 54
 196         <b \hn gs \hn e>2. r4 |   % 55
 197         <cs \hn a \hn e>8 <cs \hn a \hn e> <cs \hn a \hn e> <cs \hn a \hn e> <cs \hn a \hn e> <cs \hn a \hn e> <ds \hn b \hn fs> <e \hn cs \hn gs> ~ |   % 56
 198         <e \hn cs \hn gs>8 <ds \hn b \hn fs>4 <cs \hn gs \hn e>8 ~ <cs \hn gs \hn e>4 <b \hn gs \hn e>8 <cs \hn a \hn e> ~ |   % 57
 199         <cs \hn a \hn e>8 <b \hn gs \hn e> r <b \hn e, \hn cs> ~ <b \hn e, \hn cs>4 <b \hn e, \hn cs>8 <b \hn fs \hn e> ~ |   % 58
 200         <b \hn fs \hn e>1 |   % 59
 201
 202         r1 |   % 60
 203
 204         r1 |   % 61
 205
 206         <gs \hn e \hn b>2 r |   % 62
 207         <fs \hn cs \hn a>8 <gs \hn e \hn b> <a \hn fs \hn cs> <gs \hn e \hn b> ( ~ <gs \hn e \hn b> <fs \hn cs \hn a> ) <fs \hn cs \hn a> <a \hn fs \hn cs> ( ~ |   % 63
 208         <a \hn fs \hn cs>2. <gs \hn e \hn b>8 ) <gs \hn e \hn b> ~ |   % 64
 209         <gs \hn e \hn b>2. r4 |   % 65
 210         <fs \hn ds \hn b>2 r |   % 66
 211         <fs \hn ds \hn b>8 <gs \hn e \hn b> <a \hn fs \hn cs> <gs \hn e \hn b> ( ~ <gs \hn e \hn b> <fs \hn ds \hn b> ) <fs \hn ds \hn b> <a \hn fs \hn cs> ~ |   % 67
 212         <a \hn fs \hn cs>2 <gs \hn e \hn b>4. ( <e \hn cs \hn a>8 ) |   % 68
 213         <e \hn b \hn a>2. r4 |   % 69
 214         gs1 |   % 70
 215         fs8 gs a gs ( ~ gs fs ) fs a ( ~ |   % 71
 216         a2. gs8 ) gs ~ |   % 72
 217         gs1 |   % 73
 218         fs1 |   % 74
 219         fs8 gs a gs ( ~ gs fs ) fs a ~ |   % 75
 220         a2 gs4. ( e8 ) |   % 76
 221         e1 |   % 77
 222
 223         <e \hn b \hn gs>1 |   % 78
 224         s1 |   % 79
 225         <e \hn b \hn gs>1 |   % 80
 226         s1 |   % 81
 227
 228         <e \hn b \hn gs>1-\fermata |   % 82
 229 }
 230
 231
 232 LeadVoxText = \lyricmode
 233 {
 234         Come, now is the time _ _ to wor -- _ _ ship, _
 235         Come, now is the time _ _ to give _ your _ heart,
 236         Come, just as you are _ _ to wor -- _ _ ship, _
 237         Come, just as you are _ _ be -- fore _ your _ God,
 238         Come,
 239
 240         Come.
 241
 242         One day ev’ -- ry tongue will con -- fess _ you are God, _
 243         One day ev’ -- ry knee will bow _ down, _
 244         Still the great -- est trea -- sure re -- mains _ for those _
 245         who glad -- _ ly choose _ you now. _
 246
 247         Come, now is the time _ _ to wor -- _ _ ship, _
 248         Come, now is the time _ _ to give _ your _ heart,
 249         Come, just as you are _ _ to wor -- _ _ ship, _
 250         Come, just as you are _ _ be -- fore _ your _ God,
 251         Come,
 252
 253         One day ev’ -- ry tongue will con -- fess _ you are God, _
 254         One day ev’ -- ry knee will bow _ down, _
 255         Still the great -- est trea -- sure re -- mains _ for those _
 256         who glad -- _ ly choose _ you now. _
 257
 258         Come, now is the time _ _ to wor -- _ _ ship, _
 259         Come, now is the time _ _ to give _ your _ heart,
 260         Come, just as you are _ _ to wor -- _ _ ship, _
 261         Come, just as you are _ _ be -- fore _ your _ God,
 262         Come,
 263         Come,
 264         Come.
 265 }
 266
 267
 268 Riffs = \relative c'
 269 {
 270 %       \clef G
 271 %Hm. Needed anymore?
 272 %       \override Score.SpacingSpanner #'average-spacing-wishes = ##f
 273         \set tupletSpannerDuration = #(ly:make-moment 1 4)
 274
 275         % Intro
 276
 277         \tiny
 278         s1*78 |   % 1-78
 279         fs8 gs a gs ~ gs fs ~ fs4 |   % 79
 280         s1 |   % 80
 281         fs8 gs a gs ~ gs fs ~ fs4 |   % 81
 282         \normalsize
 283 }
 284
 285
 286 %
 287 % Chord names
 288 %
 289 Chords = \chordmode
 290 {
 291         % Intro
 292
 293         d1:sus2 |   % 1
 294         s1 |   % 2
 295         s1 |   % 3
 296         s1 |   % 4
 297
 298         % Verse
 299
 300         d1 |   % 5
 301         s2.. e8:m7/d |   % 6
 302         s2.. d8 |   % 7
 303         s1 |   % 8
 304         a1 |   % 9
 305         s2.. e8:m7 |   % 10
 306         s2 d/e |   % 11
 307         g1:sus2 |   % 12
 308         d1 |   % 13
 309         s2.. e8:m7/d |   % 14
 310         s2.. d8 |   % 15
 311         s1 |   % 16
 312         a1 |   % 17
 313         s2.. e8:m7 |   % 18
 314         s2 d/e |   % 19
 315         g1:sus2 |   % 20
 316
 317         d1:sus2 |   % 21
 318         s2 e:m7/d |   % 22
 319
 320         d1:sus2 |   % 23
 321
 322         s2 d/fs |   % 24
 323
 324         % Chorus
 325
 326         g1 |   % 25
 327         d1 |   % 26
 328         g1 |   % 27
 329         d1 |   % 28
 330         g2.. b8:m7 |   % 29
 331         s2.. e8:m7 |   % 30
 332         s4. g8:sus2 s4. a8:sus4 |   % 31
 333         s1 |   % 32
 334         a2 b4:sus4 b |   % 33
 335
 336         % Verse
 337
 338         e1 |   % 34
 339         s2.. fs8:m7/e |   % 35
 340         s2.. e8 |   % 36
 341         s1 |   % 37
 342         b1 |   % 38
 343         s2.. fs8:m7 |   % 39
 344         s2 e/fs |   % 40
 345         a1:sus2 |   % 41
 346         e1 |   % 42
 347         s2.. fs8:m7/e |   % 43
 348         s2.. e8 |   % 44
 349         s1 |   % 45
 350         b1 |   % 46
 351         s2.. fs8:m7 |   % 47
 352         s2 e/fs |   % 48
 353         a1:sus2 |   % 49
 354         e1 |   % 50
 355         s2 e/gs |   % 51
 356
 357         % Chorus
 358
 359         a1 |   % 52
 360         e1 |   % 53
 361         a1 |   % 54
 362         e1 |   % 55
 363         a2.. cs8:m7 |   % 56
 364         s2.. fs8:m7 |   % 57
 365         s4. a2:sus2 b8:sus4 |   % 58
 366         s1 |   % 59
 367
 368         b2 e/gs |   % 60
 369
 370         b1 |   % 61
 371
 372         e1 |   % 62
 373         s2.. fs8:m7/e |   % 63
 374         s2.. e8 |   % 64
 375         s1 |   % 65
 376         b1 |   % 66
 377         s2.. fs8:m7 |   % 67
 378         s2 e/fs |   % 68
 379         a1:sus2 |   % 69
 380         e1 |   % 70
 381         s2.. fs8:m7/e |   % 71
 382         s2.. e8 |   % 72
 383         s1 |   % 73
 384         b1 |   % 74
 385         s2.. fs8:m7 |   % 75
 386         s2 e/fs |   % 76
 387         a1:sus2 |   % 77
 388
 389         e1 |   % 78
 390         s1 |   % 79
 391         s1 |   % 80
 392         s1 |   % 81
 393
 394         e1 |   % 82
 395 }
 396
 397
 398 %
 399 % Chord rhythms
 400 %
 401 % Use a RhythmicStaff on the chords instead of this?
 402 % It almost works, but not quite. Doesn't collapse chords above to single notes...
 403 %
 404 Rhythm = \relative c
 405 {
 406 %%      \set Voice.autoBeaming = ##f
 407 %%      \set Staff.instrument = #"Rhythm"
 408         \override Staff.TimeSignature #'style = #'()
 409         \override NoteHead #'style = #'slash
 410
 411 %Not small enough...
 412         \teeny
 413 %       \magnify #0.3
 414
 415         % Intro
 416
 417         c1 ~ |   % 1
 418         c1 |   % 2
 419         c1 ~ |   % 3
 420         c1 |   % 4
 421
 422         % Verse
 423
 424          |   % 5
 425          |   % 6
 426          |   % 7
 427          |   % 8
 428          |   % 9
 429          |   % 10
 430          |   % 11
 431          |   % 12
 432          |   % 13
 433          |   % 14
 434          |   % 15
 435          |   % 16
 436          |   % 17
 437          |   % 18
 438          |   % 19
 439          |   % 20
 440
 441          |   % 21
 442          |   % 22
 443
 444          |   % 23
 445
 446          |   % 24
 447
 448         % Chorus
 449
 450          |   % 25
 451          |   % 26
 452          |   % 27
 453          |   % 28
 454          |   % 29
 455          |   % 30
 456          |   % 31
 457          |   % 32
 458          |   % 33
 459
 460         % Verse
 461
 462          |   % 34
 463          |   % 35
 464          |   % 36
 465          |   % 37
 466          |   % 38
 467          |   % 39
 468          |   % 40
 469          |   % 41
 470          |   % 42
 471          |   % 43
 472          |   % 44
 473          |   % 45
 474          |   % 46
 475          |   % 47
 476          |   % 48
 477          |   % 49
 478          |   % 50
 479          |   % 51
 480
 481         % Chorus
 482
 483          |   % 52
 484          |   % 53
 485          |   % 54
 486          |   % 55
 487          |   % 56
 488          |   % 57
 489          |   % 58
 490          |   % 59
 491
 492          |   % 60
 493
 494          |   % 61
 495
 496          |   % 62
 497          |   % 63
 498          |   % 64
 499          |   % 65
 500          |   % 66
 501          |   % 67
 502          |   % 68
 503          |   % 69
 504          |   % 70
 505          |   % 71
 506          |   % 72
 507          |   % 73
 508          |   % 74
 509          |   % 75
 510          |   % 76
 511          |   % 77
 512
 513          |   % 78
 514          |   % 79
 515          |   % 80
 516          |   % 81
 517
 518          |   % 82
 519 }
 520
 521
 522 Dynamics =
 523 {
 524 %       s1*4 |   % 1-4
 525 %       s4_\markup { \italic { 1st X: Melody, 2nd X+: Solos } } s2. |   % 5
 526 %       s1*38 |   % 1-38
 527 %       s4_\markup { \bold \italic { Double Chorus 2nd X } } s2. |   % 39
 528 %       s1*7 |   % 40-46
 529 %       s4_\markup { \bold { Tutti } } s2. |   % 47
 530 %       s4 |   % 0
 531 %       s2.*39 |   % 1-39
 532 %       s4_\markup { \large \bold \italic { Solo } } s2 |   % 40
 533 }
 534
 535
 536 \score
 537 {
 538         <<
 539                 \set Score.skipBars = ##t
 540                 \set Score.melismaBusyProperties = #'()
 541
 542 %               \new Staff
 543                 <<
 544                         \new ChordNames \Chords
 545 %Capo 4 edition
 546 %                       \new ChordNames \transpose b g \Chords
 547                         \new RhythmicStaff << \Rhythm \Dynamics >>
 548                 >>
 549
 550                 \new Staff
 551                 <<
 552                         \Global                 % The "roadmap" that everything else depends on
 553                         \new Voice = "lead" \LeadVox
 554                         \new Voice \Riffs
 555                         \new Lyrics \lyricsto "lead" \LeadVoxText
 556                 >>
 557         >>
 558 }
 559
 560
 561 \paper
 562 {
 563   #(define fonts (make-pango-font-tree
 564     "Times New Roman"
 565     "DomCasual BT"
 566     "Luxi Mono"
 567     (/ staffSize 20)))
 568
 569 % Spread staves vertically across last page (default: t)
 570         ragged-last-bottom = ##f
 571 % Don't spread staves vertically across the page (default: f)
 572 %       ragged-bottom = ##t
 573 % Allow partial line for last stave (default: f)
 574         ragged-last = ##t
 575
 576 % To find out what's eating the space at the top...
 577 %       annotate-spacing = ##t
 578 %let's try this: [It works! Huzzah!]
 579         obsolete-page-top-space = 0  top-system-spacing #'basic-distance = #(/ obsolete-page-top-space staff-space)
 580 }