]> git.donarmstrong.com Git - lilypond.git/blob - Documentation/snippets/wind-headword.ly
Fix white space
[lilypond.git] / Documentation / snippets / wind-headword.ly
1 % DO NOT EDIT this file manually; it is automatically
2 % generated from Documentation/snippets/new
3 % Make any changes in Documentation/snippets/new/
4 % and then run scripts/auxiliar/makelsr.py
5 %
6 % This file is in the public domain.
7 %% Note: this file works from version 2.13.36
8 \version "2.14.0"
9 #(set-global-staff-size 15)
10 \paper {
11   line-width = 16\cm
12   indent = 0\cm
13 }
14
15 % NR 2.whatever  Wind
16
17 \header {
18   lsrtags = "headwords"
19   texidoc = ""
20   doctitle = "headword"
21 } % begin verbatim
22
23
24 % Tchaikovsky
25 % Nutcracker Suite, VII Dance of the Merlitons
26 \score {
27   \new StaffGroup <<
28     \new Staff \relative c'' {
29       \set Staff.instrumentName = "Flauto I,II"
30       \once \override Score.RehearsalMark #'self-alignment-X = #-1
31       \once \override Score.RehearsalMark #'break-align-symbols =
32 #'(time-signature)
33       \once \override Score.TimeSignature
34 #'break-align-anchor-alignment = #LEFT
35       \once \override Score.RehearsalMark #'padding = #4
36       \mark \markup \large \bold {Moderato assai}
37       \key d \major
38       \time 2/4
39       \compressFullBarRests
40       R2*2
41       <d a>16-.\p <cis g>-. <d a>-. <cis g>-. <d a>8-. <cis g>-.
42       <e a,>-.\< <d a>32( <fis d> <a fis> <d a> <fis d>4--)\mf
43       <g d>16-. <fis cis>-. <g d>-. <fis cis>-.
44         <e b>(\> <d a>) <a fis>-. <fis d>-.\!
45       <d bes>4--\sf \acciaccatura {<d' bes>8} <cis a>4--\mf
46     }
47     \new Staff \relative c' {
48       \set Staff.instrumentName = "Flauto III"
49       \key d \major
50       \time 2/4
51       \compressFullBarRests
52       R2*2_\markup{Gr.Fl.}
53       fis16-.\p e-. fis-. e-. fis8-. e-.
54       g8-.\< fis32( a d fis a4--)\mf
55       b16-. a-. b-. a-. g(\> fis) d-. a-.\!
56       g4--\sf \acciaccatura fis'8 g4--\mf
57     }
58   >>
59 }
60