LEFT | RIGHT |
1 % DO NOT EDIT this file manually; it is automatically | 1 % DO NOT EDIT this file manually; it is automatically |
2 % generated from Documentation/snippets/new | 2 % generated from Documentation/snippets/new |
3 % Make any changes in Documentation/snippets/new/ | 3 % Make any changes in Documentation/snippets/new/ |
4 % and then run scripts/auxiliar/makelsr.py | 4 % and then run scripts/auxiliar/makelsr.py |
5 % | 5 % |
6 % This file is in the public domain. | 6 % This file is in the public domain. |
7 %% Note: this file works from version 2.16.0 | 7 %% Note: this file works from version 2.16.0 |
8 \version "2.17.10" | 8 \version "2.17.11" |
9 | 9 |
10 \header { | 10 \header { |
11 lsrtags = "pitches, real-music, really-cool, scheme-language" | 11 lsrtags = "pitches, real-music, really-cool, scheme-language" |
12 | 12 |
13 texidoc = " | 13 texidoc = " |
14 In music that contains many occurrences of the same sequence of notes | 14 In music that contains many occurrences of the same sequence of notes |
15 at different pitches, the following music function may prove useful. | 15 at different pitches, the following music function may prove useful. |
16 It takes a note, of which only the pitch is used. This example | 16 It takes a note, of which only the pitch is used. This example |
17 creates the rhythm used throughout Mars, from Gustav Holst's The | 17 creates the rhythm used throughout Mars, from Gustav Holst's The |
18 Planets. | 18 Planets. |
19 | 19 |
20 " | 20 " |
21 doctitle = "Creating a sequence of notes on various pitches" | 21 doctitle = "Creating a sequence of notes on various pitches" |
22 } % begin verbatim | 22 } % begin verbatim |
23 | 23 |
24 | 24 |
25 rhythm = | 25 rhythm = |
26 #(define-music-function (parser location p) (ly:pitch?) | 26 #(define-music-function (parser location p) (ly:pitch?) |
27 "Make the rhythm in Mars (the Planets) at the given pitch" | 27 "Make the rhythm in Mars (the Planets) at the given pitch" |
28 #{ \tuplet 3/2 { $p 8 $p $p } $p 4 $p $p 8 $p $p 4 #}) | 28 #{ \tuplet 3/2 { $p 8 $p $p } $p 4 $p $p 8 $p $p 4 #}) |
29 | 29 |
30 \new Staff { | 30 \new Staff { |
31 \time 5/4 | 31 \time 5/4 |
32 \rhythm c' | 32 \rhythm c' |
33 \rhythm c'' | 33 \rhythm c'' |
34 \rhythm g | 34 \rhythm g |
35 } | 35 } |
LEFT | RIGHT |