met through music.
- Those deserving special mentioning (in no particular order):
-Esther, Marijke, Heike, Inge, Judith, Hannah, Auke, Ilse, Evelyn,
-Maartje, Suzanne, Ilse (gee, again?) and last (but certainly not
-least) Janneke!
+ Those deserving special mentioning (in no particular order): Esther,
+Marijke, Heike, Inge, Judith, Hannah, Auke, Ilse, Evelyn, Maartje, Suzanne,
+Ilse (gee, again?), Irene and last (but certainly not least) Janneke!
HWN
LATEX_FILES =$(wildcard *.latex)
-DVI_FILES = $(addprefix $(outdir)/,$(LATEX_FILES:.latex=.dvi) $(TELY_FILES:.tely=.dvi))
+
+# todo: add latex.
+DVI_FILES = $(addprefix $(outdir)/, $(TELY_FILES:.tely=.dvi))
EXTRA_DIST_FILES= $(LATEX_FILES) $(wildcard *.itexi *.itely)
@end itemize
@code{@@pagesizes} are not supported.
-@subsection{Examples}
+@subsection Examples
Two simple examples. First a complete block:
@mudela[11pt]{<c' e' g'>}
-@subsection{@@example and @@code}
+@subsection @@example and @@code
I'm not sure if this will go into the final documentation, this is
here mostly to remember me on why things are the way they are.
@strong{[UGH: THIS DOES NOT HAPPEN WHEN
YOU USE THE SHORT FORM, \MUDELA@{ ... @}, CHECK OUT WHY]}
-@subsection{@code{landscape} package}
+@subsection @code{landscape} package
There is some simple support for landscape paper format, and this
can be combined with the @code{\twocolumn} command. Only a4 and
letter paper is supported, more to come...
\end@{document@}
@end example
-@subsection{Examples}
+@subsection Examples
@example
\begin[26pt]@{mudela@}
@mudela[11pt]{<c' e' g'>}
-@subsection{\begin@{verbatim@} and \verb|\verb|}
+@subsection \begin@{verbatim@} and \verb|\verb|
There work just as expected. Look at @file{mb-latex.tex} for details.
Ignores almost all La@TeX{} commands that changes margins and linewidths.
-La@TeX{} comments can confuse command{mudela-book}:
+La@TeX{} comments can confuse @command{mudela-book}:
@example
% this music will be displayed: \mudela@{c d e@}
@end example
@end mudela
@item @code{stemLength}@indexcode{stemLength}
- Set length of stems. Unit is `@code{interline}/2', so
+ Set length of stems. Unit is `@code{staffspace}/2', so
@code{stemLength} defaults to 7.
@mudela[verbatim]
g''4 \property Voice.stemLength = #14 g4 \property Voice.stemLength = #3 g4 g,,4
r1 r2 r4 r8 r16 r32 r64 r64
}
\paper {
- loose_column_distance = 2.5 * \interline;
+ loose_column_distance = 2.5 * \staffspace;
linewidth = -1.0;
\translator {
\StaffContext
@item @code{indent}@indexcode{indent}
The indentation of the first line of music.
- @item @code{interline}@indexcode{interline}
+ @item @code{staffspace}@indexcode{staffspace}
The distance between two staff lines, calculated from the center
of the lines. You should use either this or @code{rulethickness}
as a unit for distances you modify.
* Point and click functionality using emacs and Xdvi.
+* Automatic part combining for orchestral scores.
+
* Improved design and implementation: Complete rewrite of the
internals: LilyPond is smaller, cleaner, more flexible, etc.
- Improved speed (undone for now, by .73 + .74),
with comparable memory footprint
+ - More tweakability using less memory with new property push
+ mechanism.
+
- Improved robustness: Lily almost never crashes.
* Piano pedal support
%
\score{
\notes\relative c''{
- \property Staff.textNonEmpty=##t
+%%% \property Staff.textNonEmpty=##t
+%%% burp?
+ \context Staff \property basicTextScriptProperties \pop #'no-spacing-rods
+ \context Staff \property Staff.basicTextScriptProperties \push #'no-spacing-rods = ##f
c4_"longlonglonglonglonglong" c4_"text"
}
\paper{
--- /dev/null
+\score{
+ \notes\relative c''{
+ \slurup
+ a2 () a\break
+ \slurdown
+ a2 () a\break
+ \slurup
+ c2 () c\break
+ \slurdown
+ c2 () c\break
+
+ }
+ \paper{
+ linewidth=-1.\mm;
+ }
+}
+
return SCM_EOL;
}
-/*
- FIXME
- */
Direction
Beam::get_default_dir (Score_element*me)
{
} while (flip(&d) != DOWN);
+ SCM func = me->get_elt_property ("dir-function");
+ SCM s = gh_call2 (func,
+ gh_cons (gh_int2scm (count[UP]),
+ gh_int2scm (count[DOWN])),
+ gh_cons (gh_int2scm (total[UP]),
+ gh_int2scm (total[DOWN])));
- SCM s = scm_eval2 (gh_list (ly_symbol2scm ("beam-dir-algorithm"),
- ly_quote_scm (gh_cons (gh_int2scm (count[UP]),
- gh_int2scm (count[DOWN]))),
- ly_quote_scm (gh_cons (gh_int2scm (total[UP]),
- gh_int2scm (total[DOWN]))),
- SCM_UNDEFINED),
- SCM_EOL);
if (gh_number_p (s) && gh_scm2int (s))
return to_dir (s);
int multiplicity = get_multiplicity (me);
- // grace stems?
- SCM shorten = scm_eval2 (ly_symbol2scm ("beamed-stem-shorten"), SCM_EOL);
-
+ SCM shorten = me->get_elt_property ("beamed-stem-shorten");
if (shorten == SCM_EOL)
return;
Real staffspace = me->paper_l ()->get_var ("staffspace");
- SCM space_proc = me->get_elt_property ("beam-space-function");
+ SCM space_proc = me->get_elt_property ("space-function");
SCM space = gh_call1 (space_proc, gh_int2scm (beam_multiplicity));
- Real thick = gh_scm2double (me->get_elt_property ("beam-thickness")) *staffspace;
+ Real thick = gh_scm2double (me->get_elt_property ("thickness")) *staffspace;
Real interbeam_f = gh_scm2double (space) * staffspace;
// ugh -> use commonx
Beam::quantise_dy_f (Score_element*me,Real dy)
{
Array<Real> a;
- for (SCM s = scm_eval2 (ly_symbol2scm ("beam-height-quants"), SCM_EOL);
- s !=SCM_EOL; s = gh_cdr (s))
+
+ SCM proc = me->get_elt_property ("height-quants");
+ SCM quants = gh_call2 (proc, me->self_scm (),
+ gh_double2scm (me->paper_l ()->get_var ("stafflinethickness")
+ / me->paper_l ()->get_var ("staffspace")));
+
+
+ for (SCM s = quants; gh_pair_p (s); s = gh_cdr (s))
a.push (gh_scm2double (gh_car (s)));
if (a.size () <= 1)
int multiplicity = get_multiplicity (me);
Real staff_space = Staff_symbol_referencer::staff_space (me);
- SCM quants = scm_eval2 (gh_list (ly_symbol2scm ("beam-vertical-position-quants"),
- gh_int2scm (multiplicity),
- gh_double2scm (dy/staff_space),
- SCM_UNDEFINED),
- SCM_EOL);
+ Real thick = me->paper_l ()->get_var ("stafflinethickness");
+
+ SCM proc = me->get_elt_property ("vertical-position-quant-function");
+ SCM quants = scm_apply (proc,
+ me->self_scm (),
+ gh_list (gh_int2scm (multiplicity),
+ gh_double2scm (dy/staff_space),
+ gh_double2scm (thick/staff_space),
+ SCM_EOL, SCM_UNDEFINED));
+
Array<Real> a;
- for (; quants != SCM_EOL; quants = gh_cdr (quants))
+ for (; gh_pair_p (quants); quants = gh_cdr (quants))
a.push (gh_scm2double (gh_car (quants)));
if (a.size () <= 1)
/*
beams to go with one stem.
- BURP
- clean me up.
+ FIXME: clean me up.
*/
Molecule
Beam::stem_beams (Score_element*me,Item *here, Item *next, Item *prev)
int multiplicity = get_multiplicity (me);
Real staffspace =me->paper_l ()->get_var ("staffspace");
- SCM space_proc = me->get_elt_property ("beam-space-function");
+ SCM space_proc = me->get_elt_property ("space-function");
SCM space = gh_call1 (space_proc, gh_int2scm (multiplicity));
- Real thick = gh_scm2double (me->get_elt_property ("beam-thickness")) *staffspace;
+ Real thick = gh_scm2double (me->get_elt_property ("thickness")) *staffspace;
Real interbeam_f = gh_scm2double (space) * staffspace;
Real bdy = interbeam_f;
Molecule leftbeams;
Molecule rightbeams;
- /*
- UGH: make a property of this.
- */
Real nw_f;
if (!Stem::first_head (here))
nw_f = 0;
else {
int t = Stem::type_i (here);
- SCM proc = me->get_elt_property ("beam-flag-width-function");
+ SCM proc = me->get_elt_property ("flag-width-function");
SCM result = gh_call1 (proc, gh_int2scm (t));
nw_f = gh_scm2double (result) * staffspace;
}
int j = 0;
Real gap_f = 0;
- SCM gap = me->get_elt_property ("beam-gap");
+ SCM gap = me->get_elt_property ("gap");
if (gh_number_p (gap))
{
int gap_i = gh_scm2int ( (gap));
/**
This spanner draws the lines of a pstaff.
The bottom line is position 0.
+
+ TODO: add stafflinethickness as parameter.
*/
class Staff_symbol
{
{
Score_element *me = unsmob_element (smob);
Spanner * sp = dynamic_cast<Spanner*> (me);
- Real staff_space
- = Staff_symbol_referencer::staff_space (me);
+ Real staff_space = Staff_symbol_referencer::staff_space (me);
Interval sp_iv;
Direction d = LEFT;
Item * rb = r->find_prebroken_piece (LEFT);
Item* combinations[4][2]={{l,r}, {lb,r}, {l,rb},{lb,rb}};
+ Real staff_space = Staff_symbol_referencer::staff_space (me);
for (int i=0; i < 4; i++)
{
Item * l = combinations[i][0];
should do something more advanced.
*/
rod.distance_f_ = l->extent (X_AXIS)[BIGGER] - r->extent (X_AXIS)[SMALLER]
- + gh_scm2double (me->get_elt_property ("minimum-width"));
+ + gh_scm2double (me->get_elt_property ("minimum-width")) * staff_space;
rod.add_to_cols ();
}
{
if (!gh_symbol_p (index_cell (me->get_elt_property ("attachment"), dir)))
{
-
- // for (SCM s = get_elt_property ("slur-extremity-rules"); s != SCM_EOL; s = gh_cdr (s))
-
- // FIXME: global GUILE scope used!
- for (SCM s = scm_eval2 (ly_symbol2scm ("slur-extremity-rules"),
- SCM_EOL);
+ for (SCM s = me->get_elt_property ("extremity-rules");
s != SCM_EOL; s = gh_cdr (s))
{
SCM r = gh_call2 (gh_caar (s), me->self_scm (),
if (Note_column::has_interface (sp->get_bound (dir)))
{
Score_element * n =sp->get_bound (dir);
- if (Score_element *stem = Note_column::stem_l (n))
+ if ((stem = Note_column::stem_l (n)))
{
if (str == "head")
}
-
- // FIXME
+ SCM alist = me->get_elt_property ("extremity-offset-alist");
+int stemdir = stem ? Stem::get_direction (stem) : 1;
+ int slurdir = gh_scm2int (me->get_elt_property ("direction"));
SCM l = scm_assoc
- (scm_listify (a,
- gh_int2scm (stem ? Stem::get_direction (stem) : 1 * dir),
- gh_int2scm (Directional_element_interface::get (me) * dir),
- SCM_UNDEFINED),
- scm_eval2 (ly_symbol2scm ("slur-extremity-offset-alist"), SCM_EOL));
-
+ (scm_listify (a,
+ gh_int2scm (stemdir * dir),
+ gh_int2scm (slurdir * dir),
+ SCM_UNDEFINED), alist);
+
if (l != SCM_BOOL_F)
{
o += ly_scm2offset (gh_cdr (l)) * ss * dir;
}
else
{
- s = scm_eval2 (ly_symbol2scm ((type_str + "stem-length").ch_C()),
- SCM_EOL);
+ s = me->get_elt_property("lengths");
for (SCM q = s; q != SCM_EOL; q = gh_cdr (q))
a.push (gh_scm2double (gh_car (q)));
a.clear ();
- s = scm_eval2 (ly_symbol2scm ((type_str + "stem-shorten").ch_C()),
- SCM_EOL);
- for (SCM q = s; q != SCM_EOL; q = gh_cdr (q))
+ s = me->get_elt_property ("stem-shorten");
+ for (SCM q = s; gh_pair_p (q); q = gh_cdr (q))
a.push (gh_scm2double (gh_car (q)));
int multiplicity = Beam::get_multiplicity (beam);
- SCM space_proc = beam->get_elt_property ("beam-space-function");
+ SCM space_proc = beam->get_elt_property ("space-function");
SCM space = gh_call1 (space_proc, gh_int2scm (multiplicity));
Real interbeam_f = gh_scm2double (space) * staff_space;
- Real thick = gh_scm2double (beam->get_elt_property ("beam-thickness"));
+ Real thick = gh_scm2double (beam->get_elt_property ("thickness"));
Stem_info info;
info.idealy_f_ = chord_start_f (me);
Array<Real> a;
SCM s;
- String type_str = grace_b ? "grace-" : "";
- s = scm_eval2 (ly_symbol2scm ((type_str + "beamed-stem-minimum-length").ch_C()), SCM_EOL);
+ s = me->get_elt_property("beamed-minimum-lengths");
a.clear ();
for (SCM q = s; q != SCM_EOL; q = gh_cdr (q))
a.push (gh_scm2double (gh_car (q)));
Real minimum_length = a[multiplicity <? (a.size () - 1)] * staff_space;
- s = scm_eval2 (ly_symbol2scm ((type_str + "beamed-stem-length").ch_C()),
- SCM_EOL);
+ s = me->get_elt_property ("beamed-lengths");
a.clear();
for (SCM q = s; q != SCM_EOL; q = gh_cdr (q))
\consists "Property_engraver";
\consists "Multi_measure_rest_engraver";
+
\consists "Bar_engraver";
% Bar_engraver must be first so default bars aren't overwritten
% with empty ones.
basicNoteHeadProperties \push #'font-size = #-1
basicStemProperties \push #'font-size = #-1
+ basicStemProperties \push #'stem-shorten = #'(0)
basicBeamProperties \push #'font-size = #-1
basicTextScriptProperties \push #'font-size = #-1
basicSlurProperties \push #'font-size = #-1
basicLocalKeyProperties \push #'font-size = #-1
basicBeamProperties \push #'beam-thickness = #0.3
basicBeamProperties \push #'beam-space-function = #(lambda (x) 0.5)
-
+
+ basicStemProperties \push #'lengths = #(map (lambda (x) (* 0.8 x)) '(3.5 3.5 3.5 4.5 5.0))
+ basicStemProperties \push #'beamed-lengths =
+ #'(0.0 2.5 2.0 1.5)
+ basicStemProperties \push #'minimum-beamed-lengths
+ = #(map (lambda (x) (* 0.8 x)) '(0.0 2.5 2.0 1.5))
+
weAreGraceContext = ##t
graceAccidentalSpace= 1.5 ; % in staff space
}
\consists "Output_property_engraver";
\consists "System_start_delimiter_engraver";
systemStartDelimiterGlyph = #'bracket
-
-
-
-
-
\name StaffGroup;
\accepts "Staff";
\accepts "RhythmicStaff";
(name . "rehearsal mark")
)
basicMultiMeasureRestProperties = #`(
- (spacing-procedure . ,Multi_measure_rest::set_spacing_rods)
+ (interfaces . (multi-measure-rest-interface))
+ (spacing-procedure . ,Multi_measure_rest::set_spacing_rods)
(molecule-callback . ,Multi_measure_rest::brew_molecule)
(staff-position . 0)
(expand-limit . 10)
(padding . 2.0) ; staffspace
(minimum-width . 12.5) ; staffspace
-
(name . "multi-measure rest")
)
basicNoteColumnProperties = #`(
(axes 0)
(rank . -1)
)
+
+ %% These text props are only used by line-number-engraver...
basicTextProperties = #`( )
+
basicRestProperties = #`(
(interfaces . (rest-interface rhythmic-head-interface))
(after-line-breaking-callback . ,Rest::after_line_breaking)
(before-line-breaking-callback . ,Script_column::before_line_breaking)
(name . "script column")
)
- basicSlurProperties = #`(
- (interfaces . (slur-interface))
- (molecule-callback . ,Slur::brew_molecule)
- (thickness . 1.2)
- (spacing-procedure . ,Slur::set_spacing_rods)
- (minimum-length . 1.5)
- (after-line-breaking-callback . ,Slur::after_line_breaking)
-
- (de-uglify-parameters . ( 1.5 0.8 -2.0))
- (details . ((height-limit . 2.0) (ratio . 0.333) (force-blowfit . 0.5) (beautiful . 0.5)))
- (y-free . 0.75)
- (name . "slur")
- )
+ basicSlurProperties = #default-basic-slur-properties
basicSpacingSpannerProperties =#`(
(spacing-procedure . ,Spacing_spanner::set_springs)
(before-line-breaking-callback . ,Stem::before_line_breaking)
(molecule-callback . ,Stem::brew_molecule)
(thickness . 0.8)
+ (beamed-lengths . (0.0 2.5 2.0 1.5))
+ (beamed-minimum-lengths . (0.0 1.5 1.25 1.0))
+
+;; Stems in unnatural (forced) direction should be shortened,
+;; according to [Roush & Gourlay]. Their suggestion to knock off
+;; a whole staffspace seems a bit drastical: we'll do half.
+ (lengths . (3.5 3.5 3.5 4.5 5.0))
+ (stem-shorten . (0.5))
; if stem is on middle line, choose this direction.
(default-neutral-direction . 1)
(name . "stem")
copyright = "public domain";
}
-\version "1.3.59";
+\version "1.3.88";
\include "bassi.ly"
copyright = "public domain";
}
-\version "1.3.59";
+\version "1.3.88";
\include "global.ly"
\include "violoncello.ly"
--- /dev/null
+\header{
+filename = "c-midi.ly";
+title = "Ouverture";
+subtitle = "Coriolan";
+opus = "Op. 62";
+composer = "Ludwig van Beethoven (1770-1827)";
+enteredby = "JCN";
+copyright = "public domain";
+}
+
+
+%%
+%% Hopefully, this can be junked when part-combiner+midi+dynamics work ok.
+%%
+
+\version "1.3.88";
+
+\include "global.ly"
+
+\include "flauto-1.ly"
+\include "flauto-2.ly"
+\include "oboe-1.ly"
+\include "oboe-2.ly"
+\include "clarinetto-1.ly"
+\include "clarinetto-2.ly"
+\include "fagotto-1.ly"
+\include "fagotto-2.ly"
+\include "corno-1.ly"
+\include "corno-2.ly"
+\include "trombo-1.ly"
+\include "trombo-2.ly"
+\include "timpani.ly"
+\include "violino-1.ly"
+\include "violino-2.ly"
+\include "viola-1.ly"
+\include "viola-2.ly"
+\include "violoncello.ly"
+\include "contrabasso.ly"
+
+
+
+\score{
+ <
+ \global;
+ \context Staff=flauti <
+ \property VoiceCombineStaff.midiInstrument = #"flute"
+ \flautoI
+ \flautoII
+ >
+ \context Staff=oboi <
+ \property VoiceCombineStaff.midiInstrument = #"oboe"
+ \oboeI
+ \oboeII
+ >
+ \context Staff=clarinetti <
+ \property VoiceCombineStaff.midiInstrument = #"clarinet"
+ \property VoiceCombineStaff.transposing = #-2
+ \clarinettoI
+ \clarinettoII
+ >
+ \context Staff=fagotti <
+ \property VoiceCombineStaff.midiInstrument = #"bassoon"
+ \fagottoI
+ \fagottoII
+ >
+ \context Staff=corni <
+ \property VoiceCombineStaff.midiInstrument = #"french horn"
+ \property VoiceCombineStaff.transposing = #3
+ \cornoI
+ \cornoII
+ >
+ \context Staff=trombe <
+ \property VoiceCombineStaff.midiInstrument = #"trumpet"
+ \tromboI
+ \tromboII
+ >
+ \context Staff=timpani <
+ \property Staff.midiInstrument = #"timpani"
+ \timpani
+ >
+ \context Staff=violini <
+ \property Staff.midiInstrument = #"violin"
+ \violinoI
+ \violinoII
+ >
+ \context Staff=violi <
+ \property VoiceCombineStaff.midiInstrument = #"viola"
+ \violaI
+ \violaII
+ >
+ \context Staff=violoncello <
+ \property StaffCombineStaff.midiInstrument = #"cello"
+ \violoncello
+ >
+ \context Staff=contrabasso <
+ \property StaffCombineStaff.midiInstrument = #"contrabass"
+ \property StaffCombineStaff.transposing = #-12
+ \contrabasso
+ >
+ >
+ \include "coriolan-midi.ly"
+}
+
copyright = "public domain";
}
-\version "1.3.59";
+\version "1.3.88";
\include "global.ly"
\include "clarinetti.ly"
composer = "Ludwig van Beethoven (1770-1827)";
enteredby = "JCN";
copyright = "public domain";
-
-
}
-\version "1.3.59";
+\version "1.3.88";
\include "clarinetto-1.ly"
\include "clarinetto-2.ly"
-clarinettiStaff = \context Staff = clarinetti <
- \property Staff.midiInstrument = #"clarinet"
- \property Staff.instrument = #"2 Clarinetti\n(B\\textflat)"
- \property Staff.instr = #"Cl.\n(B\\textflat)"
+clarinettiStaff = \context VoiceCombineStaff = clarinetti <
+ \property VoiceCombineStaff.midiInstrument = #"clarinet"
+ \property VoiceCombineStaff.instrument = #"2 Clarinetti\n(B\\textflat)"
+ \property VoiceCombineStaff.instr = #"Cl.\n(B\\textflat)"
% urg: can't; only My_midi_lexer:<non-static> () parses pitch?
- %\property Staff.transposing = "bes"
- \property Staff.transposing = #-2
+ %\property VoiceCombineStaff.transposing = "bes"
+ \property VoiceCombineStaff.transposing = #-2
\time 4/4;
\notes \key f \major;
\skip 1*314; \bar "|.";
- \context Voice=one \partcombine Voice
- \context Thread=one \clarinettoI
- \context Thread=two \clarinettoII
+ \context VoiceCombineVoice=one \partcombine VoiceCombineVoice
+ \context VoiceCombineThread=one \clarinettoI
+ \context VoiceCombineThread=two \clarinettoII
>
composer = "Ludwig van Beethoven (1770-1827)";
enteredby = "JCN";
copyright = "public domain";
-
-
}
-\version "1.3.59";
+\version "1.3.88";
clarinettoI = \notes \relative c {
R1 *2 |
e4-. r r2 |
R1 *3 |
f4-. r r2 |
- r1 |
+ R1 |
f4-. r r2 |
e4-. r r2 |
R1 *4 |
- \property Voice.crescendoText = "cresc."
- \property Voice.crescendoSpanner = "dashed-line"
+ \property VoiceCombineVoice.crescendoText = "cresc."
+ \property VoiceCombineVoice.crescendoSpanner = "dashed-line"
bes2\p\< ( a |
)gis2. \!a4-.\f |
R1*13 |
c2. c4\sf|
c4 r r2|
R1*5|
- \property Voice.crescendoText = "cresc."
- \property Voice.crescendoSpanner = "dashed-line"
+ \property VoiceCombineVoice.crescendoText = "cresc."
+ \property VoiceCombineVoice.crescendoSpanner = "dashed-line"
a'2.\p\< ( bes4|
a g e)c|
c'2.( d4|
d~|
d~|
d|
- \property Voice.crescendoText = "cresc."
- \property Voice.crescendoSpanner = "dashed-line"
+ \property VoiceCombineVoice.crescendoText = "cresc."
+ \property VoiceCombineVoice.crescendoSpanner = "dashed-line"
bes2.\<( c4|
bes a fis)d|
\!d'2\ff f|
)e2. f4\sf(|
)e4 r r2|
R1*9|
- \property Voice.crescendoText = "cresc."
- \property Voice.crescendoSpanner = "dashed-line"
+ \property VoiceCombineVoice.crescendoText = "cresc."
+ \property VoiceCombineVoice.crescendoSpanner = "dashed-line"
fis2.\p\<(g4|
fis e cis)a|
\!a2\ff c|
r2 r4 d(|
)cis r r2|
r r4 r8 cis|
- \property Voice.crescendoText = "cresc."
- \property Voice.crescendoSpanner = "dashed-line"
+ \property VoiceCombineVoice.crescendoText = "cresc."
+ \property VoiceCombineVoice.crescendoSpanner = "dashed-line"
d4\< r r2|
r r4 r8 d|
e4 r r r8 e|
d4 r8 g f4 r8 c|
bes4 r r2|
R1*11|
- \property Voice.crescendoText = "cresc."
- \property Voice.crescendoSpanner = "dashed-line"
+ \property VoiceCombineVoice.crescendoText = "cresc."
+ \property VoiceCombineVoice.crescendoSpanner = "dashed-line"
f'2.\p\<(g4|
f e cis)a|
a1|
c\f~|
c\p|
d\f~|
- \property Voice.crescendoText = "cresc."
- \property Voice.crescendoSpanner = "dashed-line"
+ \property VoiceCombineVoice.crescendoText = "cresc."
+ \property VoiceCombineVoice.crescendoSpanner = "dashed-line"
d\p\<~|
d~|
d~|
R1|
d4-. d-. r2|
d4-. d-. r2|
- \property Voice.decrescendoText = "dim."
- \property Voice.decrescendoSpanner = "dashed-line"
+ \property VoiceCombineVoice.decrescendoText = "dim."
+ \property VoiceCombineVoice.decrescendoSpanner = "dashed-line"
d4\> r e r|
R1|
\!a,4\p r r2|
composer = "Ludwig van Beethoven (1770-1827)";
enteredby = "JCN";
copyright = "public domain";
-
-
}
-\version "1.3.59";
+\version "1.3.88";
clarinettoII = \notes \relative c {
R1*2 bes''4-.\ff r r2 |
cis4-. r r2 |
R1 *3 |
d4-. r r2 |
- r1 |
+ R1 |
d4-. r r2 |
cis4-. r r2 |
R1 *5 |
d~|
d|
%a deux|
- \property Voice.crescendoText = "cresc."
- \property Voice.crescendoSpanner = "dashed-line"
+ \property VoiceCombineVoice.crescendoText = "cresc."
+ \property VoiceCombineVoice.crescendoSpanner = "dashed-line"
bes'2.\<(c4|
bes a fis)d|
\!d'2\ff f,|
)e2. f4\sf(|
)e4 r r2|
R1*9|
- \property Voice.crescendoText = "cresc."
- \property Voice.crescendoSpanner = "dashed-line"
+ \property VoiceCombineVoice.crescendoText = "cresc."
+ \property VoiceCombineVoice.crescendoSpanner = "dashed-line"
fis2.\p\<( g4|
fis e cis)a|
%a deux; urg|
c1\f~|
c\p|
a1\f|
- \property Voice.crescendoText = "cresc."
- \property Voice.crescendoSpanner = "dashed-line"
+ \property VoiceCombineVoice.crescendoText = "cresc."
+ \property VoiceCombineVoice.crescendoSpanner = "dashed-line"
d,\p\<~|
d~|
d~|
R1|
a4-. c-. r2|
bes4-. c-. r2|
- \property Voice.decrescendoText = "dim."
- \property Voice.decrescendoSpanner = "dashed-line"
+ \property VoiceCombineVoice.decrescendoText = "dim."
+ \property VoiceCombineVoice.decrescendoSpanner = "dashed-line"
bes4\> r a r|
R1|
\!a4\p r r2|
copyright = "public domain";
}
-\version "1.3.59";
+\version "1.3.88";
contrabasso = \notes \relative c {
% copied 21 from cello
c1\ff ~ |
c |
f,4-. r r2 |
- r1 |
+ R1 |
c'1\ff ~ |
c |
f,4-. r r2 |
- r1 |
+ R1 |
c'1\ff ~ |
c |
fis,4-. r r2 |
- r1 |
+ R1 |
g4-. r r2 |
g4-. r r2 |
c4\p r4 r2 |
c4 r4 r2 |
c4 r4 r2 |
- r1 |
+ R1 |
\property StaffCombineVoice.crescendoText = "cresc."
\property StaffCombineVoice.crescendoSpanner = "dashed-line"
c'4.\< c8 bes4. bes8 |
\paper{
\paper_sixteen
- textheight = 295.0\mm;
- linewidth = 180.0\mm;
+ %textheight = 290.0\mm;
+ %linewidth = 195.0\mm;
+ textheight = 285.0\mm;
+ linewidth = 190.0\mm;
\translator{ \HaraKiriStaffContext }
%
soloADue = ##t
soloText = #""
soloIIText = #""
- aDueText = #""
+ % This is non-conventional, but currently it is
+ % the only way to tell the difference.
+ aDueText = #"\\`a2"
splitInterval = #'(1 . 0)
changeMoment = #`(,(make-moment 1 1) . ,(make-moment 1 1))
}
%% URG: this changes dynamics too
%%textStyle = #"italic"
timeSignatureStyle = #"C"
- instrumentScriptPadding = #60 %% urg, this is in pt
- instrScriptPadding = #40 %% urg, this is in pt
marginScriptHorizontalAlignment = #1
maximumRestCount = #1
}
soloADue = ##t
soloText = #""
soloIIText = #""
- aDueText = #""
+ % This is non-conventional, but currently it is
+ % the only way to tell the difference.
+ aDueText = #"\\`a2"
splitInterval = #'(1 . 0)
changeMoment = #`(,(make-moment 1 1) . ,(make-moment 1 1))
}
%% URG: this changes dynamics too
%%textStyle = #"italic"
timeSignatureStyle = #"C"
- instrumentScriptPadding = #60 %% urg, this is in pt
- instrScriptPadding = #40 %% urg, this is in pt
marginScriptHorizontalAlignment = #1
maximumRestCount = #1
}
%% URG: this changes dynamics too
%%textStyle = #"italic"
timeSignatureStyle = #"C"
- instrumentScriptPadding = #60 %% urg, this is in pt
- instrScriptPadding = #40 %% urg, this is in pt
marginScriptHorizontalAlignment = #1
maximumRestCount = #1
}
+%% run this through ly2dvi (afterwards -- urg ly2dvi should tee lily output)
+%% on my printer, I use dvips -O 5mm,0mm -o x.ps coriolan
+
\header{
filename = "coriolan.ly";
title = "Ouverture";
copyright = "public domain";
}
-\version "1.3.59";
+\version "1.3.88";
\include "global.ly"
\include "paper16.ly"
copyright = "public domain";
}
\include "coriolan-paper.ly"
- \include "coriolan-midi.ly"
+% \include "coriolan-midi.ly"
}
copyright = "public domain";
}
-\version "1.3.59";
+\version "1.3.88";
\include "global.ly"
\include "corni.ly"
composer = "Ludwig van Beethoven (1770-1827)";
enteredby = "JCN";
copyright = "public domain";
-
-
}
-\version "1.3.59";
+\version "1.3.88";
\include "corno-1.ly"
\include "corno-2.ly"
-corniStaff = \context Staff = corni <
- \property Staff.midiInstrument = #"french horn"
- \property Staff.instrument = #"2 Corni\n(E\\textflat)"
- \property Staff.instr = #"Cor.\n(E\\textflat)"
+corniStaff = \context VoiceCombineStaff = corni <
+ \property VoiceCombineStaff.midiInstrument = #"french horn"
+ \property VoiceCombineStaff.instrument = #"2 Corni\n(E\\textflat)"
+ \property VoiceCombineStaff.instr = #"Cor.\n(E\\textflat)"
% urg: can't; only My_midi_lexer:<non-static> () parses pitch?
- %\property Staff.transposing = "es"
- \property Staff.transposing = #3
+ %\property VoiceCombineStaff.transposing = "es"
+ \property VoiceCombineStaff.transposing = #3
\time 4/4;
\skip 1*314; \bar "|.";
- \context Voice=one \partcombine Voice
- \context Thread=one \cornoI
- \context Thread=two \cornoII
+ \context VoiceCombineVoice=one \partcombine VoiceCombineVoice
+ \context VoiceCombineThread=one \cornoI
+ \context VoiceCombineThread=two \cornoII
>
copyright = "public domain";
}
-\version "1.3.59";
+\version "1.3.88";
cornoI = \notes \relative c {
R1*2 |
f4-. r r2 |
R1*3 |
c4-. r r2 |
- r1 |
+ R1 |
e4-. r r2 |
e4-. r r2 |
R1*5 |
r4 g-.\f r2 |
R1*2 |
% `a 2
- \property Voice.crescendoText = "cresc."
- \property Voice.crescendoSpanner = "dashed-line"
+ \property VoiceCombineVoice.crescendoText = "cresc."
+ \property VoiceCombineVoice.crescendoSpanner = "dashed-line"
r8 f\p\< f2 e4 |
r8 f f2 e4 |
f4. e8 f4. e8 |
r2 e4 r ||
|
R1*4 |
- e4\f r4 r2 r1|
+ e4\f r4 r2 R1|
e4\f r4 r2|
R1*3|
e4\f r8 e e4 r8 e ||
e r e r|
d r r2 ||
|
- r1|
+ R1|
d4-.\ff r4 r2|
R1*3|
f2\sf r2 f2 \sf r2|
e~|
e~|
e~|
- \property Voice.crescendoText = "cresc."
- \property Voice.crescendoSpanner = "dashed-line"
+ \property VoiceCombineVoice.crescendoText = "cresc."
+ \property VoiceCombineVoice.crescendoSpanner = "dashed-line"
e\<~|
e~|
e|
copyright = "public domain";
}
-\version "1.3.59";
+\version "1.3.88";
cornoII = \notes \relative c {
R1*2 |
d4-. r r2 |
R1*3 |
c4-. r r2 |
- r1 |
+ R1 |
e,4-. r r2 |
e4-. r r2 |
R1*5 |
R1*2 |
% `a 2
% urg, yes this is a-deux, but lily doesn't know about I. / a2 yet.
- \property Voice.crescendoText = "cresc."
- \property Voice.crescendoSpanner = "dashed-line"
+ \property VoiceCombineVoice.crescendoText = "cresc."
+ \property VoiceCombineVoice.crescendoSpanner = "dashed-line"
r8 f'\p\< f2 e4 |
r8 f f2 e4 |
f4. e8 f4. e8 |
e~|
e~|
e~|
- \property Voice.crescendoText = "cresc."
- \property Voice.crescendoSpanner = "dashed-line"
+ \property VoiceCombineVoice.crescendoText = "cresc."
+ \property VoiceCombineVoice.crescendoSpanner = "dashed-line"
e\<~|
e~|
e~|
%a deux|
r4 r8 e,\p e4. e8|
r4 r8 e e4. e8|
- \property Voice.crescendoText = "cresc."
- \property Voice.crescendoSpanner = "dashed-line"
+ \property VoiceCombineVoice.crescendoText = "cresc."
+ \property VoiceCombineVoice.crescendoSpanner = "dashed-line"
r4 r8 e\< e4. e8|
r4 r8 e e4. e8|
r4 r8 e e4. e8|
e~|
e~|
e~|
- \property Voice.crescendoText = "cresc."
- \property Voice.crescendoSpanner = "dashed-line"
+ \property VoiceCombineVoice.crescendoText = "cresc."
+ \property VoiceCombineVoice.crescendoSpanner = "dashed-line"
e\<~|
e~|
e|
copyright = "public domain";
}
-\version "1.3.59";
+\version "1.3.88";
\include "global.ly"
\include "fagotti.ly"
copyright = "public domain";
}
-\version "1.3.59";
+\version "1.3.88";
\include "fagotto-1.ly"
\include "fagotto-2.ly"
-fagottiStaff = \context Staff = fagotti <
- \property Staff.midiInstrument = #"bassoon"
- \property Staff.instrument = #"2 Fagotti"
- \property Staff.instr = #"Fg."
+fagottiStaff = \context VoiceCombineStaff = fagotti <
+ \property VoiceCombineStaff.midiInstrument = #"bassoon"
+ \property VoiceCombineStaff.instrument = #"2 Fagotti"
+ \property VoiceCombineStaff.instr = #"Fg."
\clef "bass";
\global
- \context Voice=one \partcombine Voice
- \context Thread=one \fagottoI
- \context Thread=two \fagottoII
+ \context VoiceCombineVoice=one \partcombine VoiceCombineVoice
+ \context VoiceCombineThread=one \fagottoI
+ \context VoiceCombineThread=two \fagottoII
>
copyright = "public domain";
}
-\version "1.3.59";
+\version "1.3.88";
fagottoI = \notes \relative c {
R1*2 |
as4-. r r2 |
R1*3 |
a4-. r r2 |
- r1 |
+ R1 |
c4-. r r2 |
b4-. r r2 |
R1*5 |
r2 r4 g4-.\f |
R1*5 |
- \property Voice.crescendoText = "cresc."
- \property Voice.crescendoSpanner = "dashed-line"
+ \property VoiceCombineVoice.crescendoText = "cresc."
+ \property VoiceCombineVoice.crescendoSpanner = "dashed-line"
ges'2\p\< f2 ~ |
f4 \!e-.\f r2 |
R1 |
f2\p()es |
- \property Voice.crescendoText = "cresc."
- \property Voice.crescendoSpanner = "dashed-line"
+ \property VoiceCombineVoice.crescendoText = "cresc."
+ \property VoiceCombineVoice.crescendoSpanner = "dashed-line"
d1\< |
d |
d2 d |
)d4 r r2|
R1*9|
\clef "tenor";
- \property Voice.crescendoText = "cresc."
- \property Voice.crescendoSpanner = "dashed-line"
+ \property VoiceCombineVoice.crescendoText = "cresc."
+ \property VoiceCombineVoice.crescendoSpanner = "dashed-line"
g'2.(as4 \p\<|
g f d)bes
\clef "bass";
c~|
c~|
c~|
- \property Voice.crescendoText = "cresc."
- \property Voice.crescendoSpanner = "dashed-line"
+ \property VoiceCombineVoice.crescendoText = "cresc."
+ \property VoiceCombineVoice.crescendoSpanner = "dashed-line"
c\<~|
c|
\!c2\ff bes|
bes(a bes)g|
fis r8 a\pp a4. a8|
r4 r8 a a4. a8|
- \property Voice.crescendoText = "cresc."
- \property Voice.crescendoSpanner = "dashed-line"
+ \property VoiceCombineVoice.crescendoText = "cresc."
+ \property VoiceCombineVoice.crescendoSpanner = "dashed-line"
r4 r8 bes\< bes4. bes8|
r4 r8 bes bes4. bes8|
r4 r8 c8 c4. c8|
e4 r r2|
R1*3|
r4 r8 f' es4 r8 bes|
- \property Voice.crescendoText = "cresc."
- \property Voice.crescendoSpanner = "dashed-line"
+ \property VoiceCombineVoice.crescendoText = "cresc."
+ \property VoiceCombineVoice.crescendoSpanner = "dashed-line"
c4\< r4 r2|
R1*2|
r4 r8 ges' f4 r8 c|
[g,: bes: c: des:][f,: bes: c: des:]||
[e,: g: bes: des:][c: e: g: c:]||
- \property Voice.crescendoText = "cresc."
- \property Voice.crescendoSpanner = "dashed-line"
+ \property VoiceCombineVoice.crescendoText = "cresc."
+ \property VoiceCombineVoice.crescendoSpanner = "dashed-line"
c1\p\< ~|
c1~|
c1~|
es(d es)c|
b r8 d\p d4. d8|
r4 r8 d d4. d8|
- \property Voice.crescendoText = "cresc."
- \property Voice.crescendoSpanner = "dashed-line"
+ \property VoiceCombineVoice.crescendoText = "cresc."
+ \property VoiceCombineVoice.crescendoSpanner = "dashed-line"
r4 r8 es\< es4. es8|
r4 r8 es es4. es8|
r4 r8 %
es d b)g|
g'2.(as4|
g2)f|
- \property Voice.crescendoText = "cresc."
- \property Voice.crescendoSpanner = "dashed-line"
+ \property VoiceCombineVoice.crescendoText = "cresc."
+ \property VoiceCombineVoice.crescendoSpanner = "dashed-line"
es2.\<( f4|
es d b)g|
R1|
d\f|
es\p|
e\f|
- \property Voice.crescendoText = "cresc."
- \property Voice.crescendoSpanner = "dashed-line"
+ \property VoiceCombineVoice.crescendoText = "cresc."
+ \property VoiceCombineVoice.crescendoSpanner = "dashed-line"
as,4.\p\< as8 g4. g8|
f4. f8 es4. es8|
as4. as8 g4. g8|
R1|
g,4-. g-. r2|
as4-. bes-. r2|
- \property Voice.decrescendoText = "dim."
- \property Voice.decrescendoSpanner = "dashed-line"
+ \property VoiceCombineVoice.decrescendoText = "dim."
+ \property VoiceCombineVoice.decrescendoSpanner = "dashed-line"
c4\> r d r|
R1|
\!c,4\p r r2|
g4 r r2|
R1|
c4\pp r r2|
- \property Voice.decrescendoText = "sempre pi\\`u piano"
- \property Voice.decrescendoSpanner = ""
+ \property VoiceCombineVoice.decrescendoText = "sempre pi\\`u piano"
+ % urg, "" is assumed to be hairpin...
+ %\property VoiceCombineVoice.decrescendoSpanner = ""
+ \property VoiceCombineVoice.decrescendoSpanner = "dashed-line"
r r4 g\p\>~|
g1~|
g~|
copyright = "public domain";
}
-\version "1.3.59";
+\version "1.3.88";
fagottoII = \notes \relative c {
R1*2 |
f4-. r r2 |
R1*3 |
fis4-. r r2 |
- r1 |
+ R1 |
g4-. r r2 |
g4-. r r2 |
R1*5 |
)d4 r r2|
R1*9|
\clef "tenor";
- \property Voice.crescendoText = "cresc."
- \property Voice.crescendoSpanner = "dashed-line"
+ \property VoiceCombineVoice.crescendoText = "cresc."
+ \property VoiceCombineVoice.crescendoSpanner = "dashed-line"
g''2.(as4 \p\<||
g f d)bes||
\clef "bass";
c~|
c~|
c~|
- \property Voice.crescendoText = "cresc."
- \property Voice.crescendoSpanner = "dashed-line"
+ \property VoiceCombineVoice.crescendoText = "cresc."
+ \property VoiceCombineVoice.crescendoSpanner = "dashed-line"
c\<~|
c|
\!c2\ff g'|
fis d|
- \property Voice.crescendoText = "cresc."
- \property Voice.crescendoSpanner = "dashed-line"
+ \property VoiceCombineVoice.crescendoText = "cresc."
+ \property VoiceCombineVoice.crescendoSpanner = "dashed-line"
g,4 \p\< r r r8 g(|
)c4 r r r8 c(|
\!)b1\sf\>|
R1*2|
r4 r8 fis\pp fis4. fis8|
r4 r8 fis fis4. fis8|
- \property Voice.crescendoText = "cresc."
- \property Voice.crescendoSpanner = "dashed-line"
+ \property VoiceCombineVoice.crescendoText = "cresc."
+ \property VoiceCombineVoice.crescendoSpanner = "dashed-line"
r4 r8 g\< g4. g8|
r4 r8 g g4. g8|
r4 r8 a a4. a8|
e|
f|
g|
- \property Voice.crescendoText = "cresc."
- \property Voice.crescendoSpanner = "dashed-line"
+ \property VoiceCombineVoice.crescendoText = "cresc."
+ \property VoiceCombineVoice.crescendoSpanner = "dashed-line"
as\<|
g|
as|
g~|
g~|
g~|
- \property Voice.crescendoText = "cresc."
- \property Voice.crescendoSpanner = "dashed-line"
+ \property VoiceCombineVoice.crescendoText = "cresc."
+ \property VoiceCombineVoice.crescendoSpanner = "dashed-line"
g\<~|
g~|
g~|
a~|
a~|
a~|
- \property Voice.crescendoText = "cresc."
- \property Voice.crescendoSpanner = "dashed-line"
+ \property VoiceCombineVoice.crescendoText = "cresc."
+ \property VoiceCombineVoice.crescendoSpanner = "dashed-line"
a\<~|
a|
\!f'2\ff e|
R1*3|
r4 r8 b'' b4. b8|
r4 r8 b b4. b8|
- \property Voice.crescendoText = "cresc."
- \property Voice.crescendoSpanner = "dashed-line"
+ \property VoiceCombineVoice.crescendoText = "cresc."
+ \property VoiceCombineVoice.crescendoSpanner = "dashed-line"
r4 r8 c\< c4. c8|
r4 r8 c c4. c8|
\clef "tenor";
g\p|
bes\f|
%a deux|
- \property Voice.crescendoText = "cresc."
- \property Voice.crescendoSpanner = "dashed-line"
+ \property VoiceCombineVoice.crescendoText = "cresc."
+ \property VoiceCombineVoice.crescendoSpanner = "dashed-line"
as4.\p\< as8 g4. g8|
f4. f8 es4. es8|
as4. as8 g4. g8|
R1|
es,4-. e-. r2|
f4-. g-. r2|
- \property Voice.decrescendoText = "dim."
- \property Voice.decrescendoSpanner = "dashed-line"
+ \property VoiceCombineVoice.decrescendoText = "dim."
+ \property VoiceCombineVoice.decrescendoSpanner = "dashed-line"
as4\> r b r|
R1|
%a deux|
copyright = "public domain";
}
-\version "1.3.59";
+\version "1.3.88";
\include "global.ly"
\include "flauti.ly"
copyright = "public domain";
}
-\version "1.3.59";
+\version "1.3.88";
\include "flauto-1.ly"
\include "flauto-2.ly"
-flautiStaff = \notes \context Staff = flauti <
- \property Staff.midiInstrument = #"flute"
- \property Staff.instrument = #"2 Flauti"
- \property Staff.instr = #"Fl."
+flautiStaff = \notes \context VoiceCombineStaff = flauti <
+ \property VoiceCombineStaff.midiInstrument = #"flute"
+ \property VoiceCombineStaff.instrument = #"2 Flauti"
+ \property VoiceCombineStaff.instr = #"Fl."
\global
- \context Voice=one \partcombine Voice
- \context Thread=one \flautoI
- \context Thread=two \flautoII
+ \context VoiceCombineVoice=one \partcombine VoiceCombineVoice
+ \context VoiceCombineThread=one \flautoI
+ \context VoiceCombineThread=two \flautoII
>
copyright = "public domain";
}
-\version "1.3.59";
+\version "1.3.88";
flautoI = \notes \relative c {
R1 *2 |
d4-. r r2 |
R1 *3 |
es4-. r r2 |
- r1 |
+ R1 |
g4-. r r2 |
b,4-. r r2 |
R1 *4 |
- \property Voice.crescendoText = "cresc."
- \property Voice.crescendoSpanner = "dashed-line"
+ \property VoiceCombineVoice.crescendoText = "cresc."
+ \property VoiceCombineVoice.crescendoSpanner = "dashed-line"
r2 g'\p\< ( |
)fis2. \!g4-.\f |
R1*5 |
- \property Voice.crescendoText = "cresc."
- \property Voice.crescendoSpanner = "dashed-line"
+ \property VoiceCombineVoice.crescendoText = "cresc."
+ \property VoiceCombineVoice.crescendoSpanner = "dashed-line"
r2 f\p\< ~ |
f4 \!e-.\f r2 |
R1 |
f2\p()es |
- \property Voice.crescendoText = "cresc."
- \property Voice.crescendoSpanner = "dashed-line"
+ \property VoiceCombineVoice.crescendoText = "cresc."
+ \property VoiceCombineVoice.crescendoSpanner = "dashed-line"
d1\< |
d1 |
d2 d2 |
)f2. ges4\sf|
f4 r r2 |
R1*9|
- \property Voice.crescendoText = "cresc."
- \property Voice.crescendoSpanner = "dashed-line"
+ \property VoiceCombineVoice.crescendoText = "cresc."
+ \property VoiceCombineVoice.crescendoSpanner = "dashed-line"
g2.\p\<(f4|
as g d)bes
\!bes2\ff des|
c~|
c~|
c~|
- \property Voice.crescendoText = "cresc."
- \property Voice.crescendoSpanner = "dashed-line"
+ \property VoiceCombineVoice.crescendoText = "cresc."
+ \property VoiceCombineVoice.crescendoSpanner = "dashed-line"
c\<~|
c~|
\!c2\ff es|
d1~|
- \property Voice.crescendoText = "cresc."
- \property Voice.crescendoSpanner = "dashed-line"
+ \property VoiceCombineVoice.crescendoText = "cresc."
+ \property VoiceCombineVoice.crescendoSpanner = "dashed-line"
d\p\<~|
d~|
d2.()f4|
\!fis\pp r r2|
r2 r4 r8 a|
bes4 r r2|
- \property Voice.crescendoText = "cresc."
- \property Voice.crescendoSpanner = "dashed-line"
+ \property VoiceCombineVoice.crescendoText = "cresc."
+ \property VoiceCombineVoice.crescendoSpanner = "dashed-line"
r r4 r8 bes\<|
c4 r r r8 c |
d4 r r r8 d|
r4 r8 f' es4 r8 bes|
c4 r r2|
R1*2|
- \property Voice.crescendoText = "cresc."
- \property Voice.crescendoSpanner = ""
+ \property VoiceCombineVoice.crescendoText = "cresc."
+ \property VoiceCombineVoice.crescendoSpanner = "dashed-line"
r4 r8 ges'\< f4 r8 c|
des4 r r2|
R1*5|
)d2. es4\sf(|
)d r r2|
R1*9|
- \property Voice.crescendoText = "cresc."
- \property Voice.crescendoSpanner = "dashed-line"
+ \property VoiceCombineVoice.crescendoText = "cresc."
+ \property VoiceCombineVoice.crescendoSpanner = "dashed-line"
e2.\p\<(f4|
e d b )g|
\!g2\ff bes|
a1~a4\p r r2|
R1*3|
- \property Voice.crescendoText = "cresc."
- \property Voice.crescendoSpanner = "dashed-line"
+ \property VoiceCombineVoice.crescendoText = "cresc."
+ \property VoiceCombineVoice.crescendoSpanner = "dashed-line"
a1\<~|
a|
\!a2\ff c|
c r8 f8 es4 r8 bes|
as4-. des4-. r2|
R1*11|
- \property Voice.crescendoText = "cresc."
- \property Voice.crescendoSpanner = "dashed-line"
+ \property VoiceCombineVoice.crescendoText = "cresc."
+ \property VoiceCombineVoice.crescendoSpanner = "dashed-line"
es2.\p\<(f4|
es d b)g|
g1|
R1|
c4-. c4-. r2|
c4-. c4-. r2|
- \property Voice.decrescendoText = "dim."
- \property Voice.decrescendoSpanner = "dashed-line"
+ \property VoiceCombineVoice.decrescendoText = "dim."
+ \property VoiceCombineVoice.decrescendoSpanner = "dashed-line"
c4\> r d r|
R1|
\!es4\p r r2|
copyright = "public domain";
}
-\version "1.3.59";
+\version "1.3.88";
flautoII = \notes \relative c {
R1 *2 |
b4-. r r2 |
R1 *3 |
c4-. r r2 |
- r1 |
+ R1 |
es4-. r r2 |
d,4-. r r2 |
R1 *4 |
bes\f~|
bes\p|
c1\f~|
- \property Voice.crescendoText = "cresc."
- \property Voice.crescendoSpanner = "dashed-line"
+ \property VoiceCombineVoice.crescendoText = "cresc."
+ \property VoiceCombineVoice.crescendoSpanner = "dashed-line"
c\p\<~|
c~|
c~|
R1|
c4-. g'-. r2|
as4-. e-. r2|
- \property Voice.decrescendoText = "dim."
- \property Voice.decrescendoSpanner = "dashed-line"
+ \property VoiceCombineVoice.decrescendoText = "dim."
+ \property VoiceCombineVoice.decrescendoSpanner = "dashed-line"
f4\> r f r|
R1|
\!es4\p r r2|
composer = "Ludwig van Beethoven (1770-1827)";
enteredby = "JCN";
copyright = "public domain";
-
-
}
-\version "1.3.59";
+\version "1.3.88";
global = \notes {
\time 4/4;
timpani.ly
violino-1.ly
violino-2.ly
-viola.ly
+viola-1.ly
+viola-2.ly
violoncello.ly
contrabasso.ly
copyright = "public domain";
}
-\version "1.3.59";
+\version "1.3.88";
oboeI = \notes \relative c'' {
R1*2 |
as4-. r r2 |
R1*3 |
a4-. r r2 |
- r1 |
+ R1 |
g4-. r r2 |
g4-. r r2 |
R1 *4 |
- \property Voice.crescendoText = "cresc."
- \property Voice.crescendoSpanner = "dashed-line"
+ \property VoiceCombineVoice.crescendoText = "cresc."
+ \property VoiceCombineVoice.crescendoSpanner = "dashed-line"
as2\p\< ( g |
)fis2. \!g4-.\f |
R1*5 |
- \property Voice.crescendoText = "cresc."
- \property Voice.crescendoSpanner = "dashed-line"
+ \property VoiceCombineVoice.crescendoText = "cresc."
+ \property VoiceCombineVoice.crescendoSpanner = "dashed-line"
ges2\p\< f ~ |
f4 \!e\f r2 |
R1 |
f2\p()es |
- \property Voice.crescendoText = "cresc."
- \property Voice.crescendoSpanner = "dashed-line"
+ \property VoiceCombineVoice.crescendoText = "cresc."
+ \property VoiceCombineVoice.crescendoSpanner = "dashed-line"
d1\< |
d |
d2 d |
)f2. ges4(|
)f4 r r2|
R1*9|
- \property Voice.crescendoText = "cresc."
- \property Voice.crescendoSpanner = "dashed-line"
+ \property VoiceCombineVoice.crescendoText = "cresc."
+ \property VoiceCombineVoice.crescendoSpanner = "dashed-line"
g2.\p\<( as4|
g f d)bes|
\!bes'2\ff des|
c bes|
as4\p r r2|
R1*3|
- \property Voice.crescendoText = "cresc."
- \property Voice.crescendoSpanner = "dashed-line"
+ \property VoiceCombineVoice.crescendoText = "cresc."
+ \property VoiceCombineVoice.crescendoSpanner = "dashed-line"
as2.\p\<( bes4|
as g e)c|
\!c'2\ff es,|
d1~|
- \property Voice.crescendoText = "cresc."
- \property Voice.crescendoSpanner = "dashed-line"
+ \property VoiceCombineVoice.crescendoText = "cresc."
+ \property VoiceCombineVoice.crescendoSpanner = "dashed-line"
d\p\< ~|
d~|
\!d2.\sf\>()f4|
fis\pp r r2|
r r4 r8 fis' |
g4 r r2|
- \property Voice.crescendoText = "cresc."
- \property Voice.crescendoSpanner = "dashed-line"
+ \property VoiceCombineVoice.crescendoText = "cresc."
+ \property VoiceCombineVoice.crescendoSpanner = "dashed-line"
r r4 r8 g\<|
a4 r r r8 a|
bes4 r r r8 bes|
des4 r r r8 c|
bes4 r8 es f4 r8 f|
g4 r8 g e4 r 8 e|
- \property Voice.crescendoText = "cresc."
- \property Voice.crescendoSpanner = "dashed-line"
+ \property VoiceCombineVoice.crescendoText = "cresc."
+ \property VoiceCombineVoice.crescendoSpanner = "dashed-line"
c'1\p\< ~|
c~|
c~|
)g2. fis4\sf(|
)g4 r r2|
R1*5|
- \property Voice.crescendoText = "cresc."
- \property Voice.crescendoSpanner = "dashed-line"
+ \property VoiceCombineVoice.crescendoText = "cresc."
+ \property VoiceCombineVoice.crescendoSpanner = "dashed-line"
e2.\p\< (f4|
e d b)g|
g'2.(a4 g2)f|
a~|
a~|
a|
- \property Voice.crescendoText = "cresc."
- \property Voice.crescendoSpanner = "dashed-line"
+ \property VoiceCombineVoice.crescendoText = "cresc."
+ \property VoiceCombineVoice.crescendoSpanner = "dashed-line"
f2.\<( g4|
f e cis)a|
\!a'2\ff c|
es(d es)c|
b r r2|
r r4 r8 d|
- \property Voice.crescendoText = "cresc."
- \property Voice.crescendoSpanner = "dashed-line"
+ \property VoiceCombineVoice.crescendoText = "cresc."
+ \property VoiceCombineVoice.crescendoSpanner = "dashed-line"
es4\< r r2|
r r4 r8 es|
f4 r r r8 f|
es d b)g|
g'2.(as4|
g2)f|
- \property Voice.crescendoText = "cresc."
- \property Voice.crescendoSpanner = "dashed-line"
+ \property VoiceCombineVoice.crescendoText = "cresc."
+ \property VoiceCombineVoice.crescendoSpanner = "dashed-line"
es2.\<( f4|
es d b)g|
c1|
f\f|
g\p|
g\f|
- \property Voice.crescendoText = "cresc."
- \property Voice.crescendoSpanner = "dashed-line"
+ \property VoiceCombineVoice.crescendoText = "cresc."
+ \property VoiceCombineVoice.crescendoSpanner = "dashed-line"
c\p\<~|
c~|
c~|
copyright = "public domain";
}
-\version "1.3.59";
+\version "1.3.88";
oboeII = \notes \relative c{
R1*2|
f4-. r r2 |
R1*3 |
es4-. r r2 |
- r1 |
+ R1 |
es4-. r r2 |
b4-. r r2 |
R1*5 |
bes4 r8 bes bes4 r8 bes|
bes4\p r r2|
R1*15|
- \property Voice.crescendoText = "cresc."
- \property Voice.crescendoSpanner = "dashed-line"
+ \property VoiceCombineVoice.crescendoText = "cresc."
+ \property VoiceCombineVoice.crescendoSpanner = "dashed-line"
r4 r8 as'\< ges4 r8 des|
es4 r8 bes' as4 r8 es|
f4 r r2|
des4 r r r8 c|
bes4 r8 bes bes4 r8 bes|
bes4 r8 bes bes4 r8 bes|
- \property Voice.crescendoText = "cresc."
- \property Voice.crescendoSpanner = "dashed-line"
+ \property VoiceCombineVoice.crescendoText = "cresc."
+ \property VoiceCombineVoice.crescendoSpanner = "dashed-line"
c1\p\< ~||
c~|
c~|
d\f|
es\p|
e\f|
- \property Voice.crescendoText = "cresc."
- \property Voice.crescendoSpanner = "dashed-line"
+ \property VoiceCombineVoice.crescendoText = "cresc."
+ \property VoiceCombineVoice.crescendoSpanner = "dashed-line"
c\p\< ~|
c~|
c~|
R1|
c4-. c-. r2|
c4-. c-. r2|
- \property Voice.decrescendoText = "dim."
- \property Voice.decrescendoSpanner = "dashed-line"
+ \property VoiceCombineVoice.decrescendoText = "dim."
+ \property VoiceCombineVoice.decrescendoSpanner = "dashed-line"
c4\> r d r|
R1|
\!c4\p r r2|
copyright = "public domain";
}
-\version "1.3.59";
+\version "1.3.88";
\include "global.ly"
\include "oboi.ly"
composer = "Ludwig van Beethoven (1770-1827)";
enteredby = "JCN";
copyright = "public domain";
-
-
}
-\version "1.3.59";
+\version "1.3.88";
\include "oboe-1.ly"
\include "oboe-2.ly"
-oboiStaff = \context Staff = oboi <
- \property Staff.midiInstrument = #"oboe"
- \property Staff.instrument = #"2 Oboi"
- \property Staff.instr = #"Ob."
+oboiStaff = \context VoiceCombineStaff = oboi <
+ \property VoiceCombineStaff.midiInstrument = #"oboe"
+ \property VoiceCombineStaff.instrument = #"2 Oboi"
+ \property VoiceCombineStaff.instr = #"Ob."
\global
- \context Voice=one \partcombine Voice
- \context Thread=one \oboeI
- \context Thread=two \oboeII
+ \context VoiceCombineVoice=one \partcombine VoiceCombineVoice
+ \context VoiceCombineThread=one \oboeI
+ \context VoiceCombineThread=two \oboeII
>
copyright = "public domain";
}
-\version "1.3.59";
+\version "1.3.88";
\include "global.ly"
\include "timpani.ly"
composer = "Ludwig van Beethoven (1770-1827)";
enteredby = "JCN";
copyright = "public domain";
-
-
}
-\version "1.3.59";
+\version "1.3.88";
timpani = \notes \relative c {
R1*2 |
c4-. r r2 |
R1*3 |
c4-. r r2 |
- r1 |
+ R1 |
g4-. r r2 |
g4-. r r2 |
R1*5 |
copyright = "public domain";
}
-\version "1.3.59";
+\version "1.3.88";
\include "global.ly"
\include "trombe.ly"
copyright = "public domain";
}
-\version "1.3.59";
+\version "1.3.88";
\include "trombo-1.ly"
\include "trombo-2.ly"
-trombeStaff = \context Staff = trombe <
- \property Staff.midiInstrument = #"trumpet"
- \property Staff.instrument = #"2 Trombe\n(C)"
- \property Staff.instr = #"Tbe.\n(C)"
- \time 4/4;
- \context Voice=one \partcombine Voice
- \context Thread=one \tromboI
- \context Thread=two \tromboII
+trombeStaff = \context VoiceCombineStaff = trombe <
+ \context VoiceCombineStaff=trombe {
+ \property VoiceCombineStaff.midiInstrument = #"trumpet"
+ \property VoiceCombineStaff.instrument = #"2 Trombe\n(C)"
+ \property VoiceCombineStaff.instr = #"Tbe.\n(C)"
+ \skip 1*314;
+ \bar "|.";
+ }
+ \context VoiceCombineVoice=one \partcombine VoiceCombineVoice
+ \context VoiceCombineThread=one \tromboI
+ \context VoiceCombineThread=two \tromboII
>
copyright = "public domain";
}
-\version "1.3.59";
+\version "1.3.88";
tromboI = \notes \relative c {
R1*2 |
c4-. r r2 |
R1*3 |
c4-. r r2 |
- r1 |
+ R1 |
g4-. r r2 |
g4-. r r2 |
R1*5 |
R1*6 |
r4 c-.\f r2 |
R1*2 |
- \property Voice.crescendoText = "cresc."
- \property Voice.crescendoSpanner = "dashed-line"
+ \property VoiceCombineVoice.crescendoText = "cresc."
+ \property VoiceCombineVoice.crescendoSpanner = "dashed-line"
r2 c4\p\< r |
r2 c4 r |
r2 c4 r |
c4 r r2|
R1*18|
e1\f(|
- \property Voice.crescendoText = "cresc."
- \property Voice.crescendoSpanner = "dashed-line"
+ \property VoiceCombineVoice.crescendoText = "cresc."
+ \property VoiceCombineVoice.crescendoSpanner = "dashed-line"
)c\p\< ~|
c~|
c~|
R1|
c4-. c-. r2|
c4-. c-. r2|
- \property Voice.decrescendoText = "dim."
- \property Voice.decrescendoSpanner = "dashed-line"
+ \property VoiceCombineVoice.decrescendoText = "dim."
+ \property VoiceCombineVoice.decrescendoSpanner = "dashed-line"
c4\> r g r|
R1|
\!g4\p r r2|
copyright = "public domain";
}
-\version "1.3.59";
+\version "1.3.88";
tromboII = \notes \relative c {
R1*2 |
c4-. r r2 |
R1*3 |
c4-. r r2 |
- r1 |
+ R1 |
g4-. r r2 |
g4-. r r2 |
R1*5 |
R1*6 |
r4 c-.\f r2 |
R1*2 |
- \property Voice.crescendoText = "cresc."
- \property Voice.crescendoSpanner = "dashed-line"
+ \property VoiceCombineVoice.crescendoText = "cresc."
+ \property VoiceCombineVoice.crescendoSpanner = "dashed-line"
r2 c4\p\< r |
r2 c4 r |
r2 c4 r |
c4 r r2|
R1*18|
c1\f~|
- \property Voice.crescendoText = "cresc."
- \property Voice.crescendoSpanner = "dashed-line"
+ \property VoiceCombineVoice.crescendoText = "cresc."
+ \property VoiceCombineVoice.crescendoSpanner = "dashed-line"
c\p\< ~|
c~|
c~|
R1|
c,4-. c-. r2|
c4-. c-. r2|
- \property Voice.decrescendoText = "dim."
- \property Voice.decrescendoSpanner = "dashed-line"
+ \property VoiceCombineVoice.decrescendoText = "dim."
+ \property VoiceCombineVoice.decrescendoSpanner = "dashed-line"
c4\> r g r|
R1|
\!g4\p r r2|
copyright = "public domain";
}
-\version "1.3.59";
+\version "1.3.88";
violaI = \notes \relative c {
c'1\ff ~ |
c |
f,4-. r r2 |
- r1 |
+ R1 |
% copied 3 bars from three back...
%5
c'1 ~ |
c |
f,4-. r r2 |
- r1 |
+ R1 |
c'1 ~ |
c |
fis,4-. r r2 |
- r1 |
+ R1 |
g'4-. r r2 |
g4-. r r2 |
% copied from violino-1...
[c,8-. es-.] [es()d] [d-. g-.] g4-"ten." |
[c,8-. es-.] [es()d] [d-. as'-.] [as()g] |
[g8-. c-.] [c()b] [b-. f'-.] [f()es] |
- \property StaffCombineVoice.crescendoText = "cresc."
- \property StaffCombineVoice.crescendoSpanner = "dashed-line"
+ \property VoiceCombineVoice.crescendoText = "cresc."
+ \property VoiceCombineVoice.crescendoSpanner = "dashed-line"
es4.\< es8 d4. d8 |
%20
c4. c8 \!b4\f r4 |
r4 [des8\p()c][c-. ges'-.][ges()f] |
%25
[f-. bes-.][bes()a][a-. es'-.][es()des] |
- \property StaffCombineVoice.crescendoText = "cresc."
- \property StaffCombineVoice.crescendoSpanner = "dashed-line"
+ \property VoiceCombineVoice.crescendoText = "cresc."
+ \property VoiceCombineVoice.crescendoSpanner = "dashed-line"
des4.\< des8 c4. c8 |
bes4 \!bes4-.\f r2 |
R1
% same rhythm as violins...
r8 c-.\p c4. c8-. c4~ |
- \property StaffCombineVoice.crescendoText = "cresc."
- \property StaffCombineVoice.crescendoSpanner = "dashed-line"
+ \property VoiceCombineVoice.crescendoText = "cresc."
+ \property VoiceCombineVoice.crescendoSpanner = "dashed-line"
[c8\< c-.]c2.~ |
%30
[c8 c-.]c2.~ |
)g4 r r r8 g(|
%55
)d4 r r r8 d(|
- \property StaffCombineVoice.crescendoText = "cresc."
- \property StaffCombineVoice.crescendoSpanner = "dashed-line"
+ \property VoiceCombineVoice.crescendoText = "cresc."
+ \property VoiceCombineVoice.crescendoSpanner = "dashed-line"
)es4 r\< r r8 es(|
)as4 r r r8 as(|
)g4 r r r8 g(|
)bes4 r r r8 bes(|
)as4 r r r8 as(|
)e4 r r r8 e(|
- \property StaffCombineVoice.crescendoText = "cresc."
- \property StaffCombineVoice.crescendoSpanner = "dashed-line"
+ \property VoiceCombineVoice.crescendoText = "cresc."
+ \property VoiceCombineVoice.crescendoSpanner = "dashed-line"
)f4\< r r r8 f(|
)bes4 r r r8 bes |
%70
\!c2:\ff bes: |
a: fis: |
- \property StaffCombineVoice.crescendoText = "cresc."
- \property StaffCombineVoice.crescendoSpanner = "dashed-line"
+ \property VoiceCombineVoice.crescendoText = "cresc."
+ \property VoiceCombineVoice.crescendoSpanner = "dashed-line"
g4\p\< r r r8 g(|
)c,4 r r r8 c |
[\!f8\sf(\>as f as][f g d)\!g] |
[d,-.\pp d'-.] es4. es8-. d4 ~ |
[d8 d-.] es4. es8-. d4 ~ |
%80
- \property StaffCombineVoice.crescendoText = "cresc."
- \property StaffCombineVoice.crescendoSpanner = "dashed-line"
+ \property VoiceCombineVoice.crescendoText = "cresc."
+ \property VoiceCombineVoice.crescendoSpanner = "dashed-line"
[d8\< d-.] es4. es8-. d4 ~ |
[d8 d-.] es4. es8-. d4 ~ |
[d8 d-.] es4. es8-. d4 ~ |
[e g b c][des c g e]|
[f as c des][c des as f]|
[g bes d es][d es bes g]|
- \property StaffCombineVoice.crescendoText = "cresc."
- \property StaffCombineVoice.crescendoSpanner = "dashed-line"
+ \property VoiceCombineVoice.crescendoText = "cresc."
+ \property VoiceCombineVoice.crescendoSpanner = "dashed-line"
[as\< c d es][f es c as]|
%131
[g bes d es][f es bes g]|
[g,: bes: c: des:][f,: bes: c: des:]|
[e,: g: bes: des:][c,: e: g: c:]|
%shared with cello from here on
- \property StaffCombineVoice.crescendoText = "cresc."
- \property StaffCombineVoice.crescendoSpanner = "dashed-line"
+ \property VoiceCombineVoice.crescendoText = "cresc."
+ \property VoiceCombineVoice.crescendoSpanner = "dashed-line"
[f,8\p\< as c des][es, g b c]|
[des, f a bes][c, es g as]|
% uhuh, still 'same as cello';
%180
)e4 r r r8 e8(|
)b'4 r r r8 b8(|
- \property StaffCombineVoice.crescendoText = "cresc."
- \property StaffCombineVoice.crescendoSpanner = "dashed-line"
+ \property VoiceCombineVoice.crescendoText = "cresc."
+ \property VoiceCombineVoice.crescendoSpanner = "dashed-line"
)c4 r\< r r8 c,8(|
% copied
)f4 r r r8 f8(|
d,4\p r r r8 d8(|
)g4 r r r8 g8(|
)f4 r r r8 f8(|
- \property StaffCombineVoice.crescendoText = "cresc."
- \property StaffCombineVoice.crescendoSpanner = "dashed-line"
+ \property VoiceCombineVoice.crescendoText = "cresc."
+ \property VoiceCombineVoice.crescendoSpanner = "dashed-line"
)cis4\< r r r8 cis8(|
)d4 r r r8 d8(|
%195
r[c\p(as)c]r[c(a)c] |
[b-. g'-.] as4. as8-. g4 ~ |
[g8 g-.] as4. as8-. g4 ~ |
- \property StaffCombineVoice.crescendoText = "cresc."
- \property StaffCombineVoice.crescendoSpanner = "dashed-line"
+ \property VoiceCombineVoice.crescendoText = "cresc."
+ \property VoiceCombineVoice.crescendoSpanner = "dashed-line"
[g8 g-.\<] as4. as8-. g4 ~ |
[g8 g-.] as4. as8-. g4 ~ |
%210
%240
f,4 r r2 |
R1*11 |
- \property StaffCombineVoice.crescendoText = "cresc."
- \property StaffCombineVoice.crescendoSpanner = "dashed-line"
+ \property VoiceCombineVoice.crescendoText = "cresc."
+ \property VoiceCombineVoice.crescendoSpanner = "dashed-line"
c'4\p\< r r r8 c8(|
)f4 r r r8 f,8(|
)es1 |
e'2:16\f e: |
%260
- \property StaffCombineVoice.crescendoText = "cresc."
- \property StaffCombineVoice.crescendoSpanner = "dashed-line"
+ \property VoiceCombineVoice.crescendoText = "cresc."
+ \property VoiceCombineVoice.crescendoSpanner = "dashed-line"
[as,8\p\< f']f4. es8 es4 ~ |
[es8 as]as4. g8 g4 ~ |
[g8 f]f4. es8 es4 ~ |
es4-. e-. r2 |
f4-. g-. r2 |
%290
- \property StaffCombineVoice.decrescendoText = "dim."
- \property StaffCombineVoice.decrescendoSpanner = "dashed-line"
+ \property VoiceCombineVoice.decrescendoText = "dim."
+ \property VoiceCombineVoice.decrescendoSpanner = "dashed-line"
as4\> r g r |
R1 |
\!c4\p r r2 |
copyright = "public domain";
}
-\version "1.3.59";
+\version "1.3.88";
violaII = \notes \relative c {
c1\ff ~ |
c |
f4-. r r2 |
- r1 |
+ R1 |
% copied 3 bars from three back...
%5
c1 ~ |
c |
f4-. r r2 |
- r1 |
+ R1 |
c1 ~ |
c |
fis4-. r r2 |
- r1 |
+ R1 |
g4-. r r2 |
g4-. r r2 |
% copied from violino-1...
[c,8-. es-.] [es()d] [d-. g-.] g4-"ten." |
[c,8-. es-.] [es()d] [d-. as'-.] [as()g] |
[g8-. c-.] [c()b] [b-. f'-.] [f()es] |
- \property StaffCombineVoice.crescendoText = "cresc."
- \property StaffCombineVoice.crescendoSpanner = "dashed-line"
+ \property VoiceCombineVoice.crescendoText = "cresc."
+ \property VoiceCombineVoice.crescendoSpanner = "dashed-line"
es4.\< es8 d4. d8 |
%20
c4. c8 \!b4\f r4 |
r4 [des8\p()c][c-. ges'-.][ges()f] |
%25
[f-. bes-.][bes()a][a-. es'-.][es()des] |
- \property StaffCombineVoice.crescendoText = "cresc."
- \property StaffCombineVoice.crescendoSpanner = "dashed-line"
+ \property VoiceCombineVoice.crescendoText = "cresc."
+ \property VoiceCombineVoice.crescendoSpanner = "dashed-line"
des4.\< des8 c4. c8 |
bes4 \!bes4-.\f r2 |
R1
% same rhythm as violins...
r8 c,-.\p c4. c8-. c4~ |
- \property StaffCombineVoice.crescendoText = "cresc."
- \property StaffCombineVoice.crescendoSpanner = "dashed-line"
+ \property VoiceCombineVoice.crescendoText = "cresc."
+ \property VoiceCombineVoice.crescendoSpanner = "dashed-line"
[c8\< c-.]c2.~ |
%30
[c8 c-.]c2.~ |
)g4 r r r8 g(|
%55
)d4 r r r8 d(|
- \property StaffCombineVoice.crescendoText = "cresc."
- \property StaffCombineVoice.crescendoSpanner = "dashed-line"
+ \property VoiceCombineVoice.crescendoText = "cresc."
+ \property VoiceCombineVoice.crescendoSpanner = "dashed-line"
)es4 r\< r r8 es(|
)as4 r r r8 as(|
)g4 r r r8 g(|
)bes4 r r r8 bes(|
)as4 r r r8 as(|
)e4 r r r8 e(|
- \property StaffCombineVoice.crescendoText = "cresc."
- \property StaffCombineVoice.crescendoSpanner = "dashed-line"
+ \property VoiceCombineVoice.crescendoText = "cresc."
+ \property VoiceCombineVoice.crescendoSpanner = "dashed-line"
)f4\< r r r8 f(|
)bes4 r r r8 bes |
%70
\!as2:\ff g: |
fis: d: |
- \property StaffCombineVoice.crescendoText = "cresc."
- \property StaffCombineVoice.crescendoSpanner = "dashed-line"
+ \property VoiceCombineVoice.crescendoText = "cresc."
+ \property VoiceCombineVoice.crescendoSpanner = "dashed-line"
g4\p\< r r r8 g(|
)c,4 r r r8 c |
[\!f8\sf(\>as f as][f g d)\!g] |
[d-.\pp d'-.] es4. es8-. d4 ~ |
[d8 d-.] es4. es8-. d4 ~ |
%80
- \property StaffCombineVoice.crescendoText = "cresc."
- \property StaffCombineVoice.crescendoSpanner = "dashed-line"
+ \property VoiceCombineVoice.crescendoText = "cresc."
+ \property VoiceCombineVoice.crescendoSpanner = "dashed-line"
[d8\< d-.] es4. es8-. d4 ~ |
[d8 d-.] es4. es8-. d4 ~ |
[d8 d-.] es4. es8-. d4 ~ |
[e g b c][des c g e]|
[f as c des][c des as f]|
[g bes d es][d es bes g]|
- \property StaffCombineVoice.crescendoText = "cresc."
- \property StaffCombineVoice.crescendoSpanner = "dashed-line"
+ \property VoiceCombineVoice.crescendoText = "cresc."
+ \property VoiceCombineVoice.crescendoSpanner = "dashed-line"
[as\< c d es][f es c as]|
%131
[g bes d es][f es bes g]|
[g,: bes: c: des:][f,: bes: c: des:]|
[e,: g: bes: des:][c,: e: g: c:]|
%shared with cello from here on
- \property StaffCombineVoice.crescendoText = "cresc."
- \property StaffCombineVoice.crescendoSpanner = "dashed-line"
+ \property VoiceCombineVoice.crescendoText = "cresc."
+ \property VoiceCombineVoice.crescendoSpanner = "dashed-line"
[f,8\p\< as c des][es, g b c]|
[des, f a bes][c, es g as]|
% uhuh, still 'same as cello';
%180
)e4 r r r8 e8(|
)b'4 r r r8 b8(|
- \property StaffCombineVoice.crescendoText = "cresc."
- \property StaffCombineVoice.crescendoSpanner = "dashed-line"
+ \property VoiceCombineVoice.crescendoText = "cresc."
+ \property VoiceCombineVoice.crescendoSpanner = "dashed-line"
)c4 r\< r r8 c,8(|
% copied
)f4 r r r8 f8(|
d,4\p r r r8 d8(|
)g4 r r r8 g8(|
)f4 r r r8 f8(|
- \property StaffCombineVoice.crescendoText = "cresc."
- \property StaffCombineVoice.crescendoSpanner = "dashed-line"
+ \property VoiceCombineVoice.crescendoText = "cresc."
+ \property VoiceCombineVoice.crescendoSpanner = "dashed-line"
)cis4\< r r r8 cis8(|
)d4 r r r8 d8(|
%195
r[as\p(d,)as']r[a(es)a] |
[g-. g'-.] as4. as8-. g4 ~ |
[g8 g-.] as4. as8-. g4 ~ |
- \property StaffCombineVoice.crescendoText = "cresc."
- \property StaffCombineVoice.crescendoSpanner = "dashed-line"
+ \property VoiceCombineVoice.crescendoText = "cresc."
+ \property VoiceCombineVoice.crescendoSpanner = "dashed-line"
[g8 g-.\<] as4. as8-. g4 ~ |
[g8 g-.] as4. as8-. g4 ~ |
%210
%240
f,4 r r2 |
R1*11 |
- \property StaffCombineVoice.crescendoText = "cresc."
- \property StaffCombineVoice.crescendoSpanner = "dashed-line"
+ \property VoiceCombineVoice.crescendoText = "cresc."
+ \property VoiceCombineVoice.crescendoSpanner = "dashed-line"
c'4\p\< r r r8 c8(|
)f4 r r r8 f,8(|
)es1|
bes2:16\f bes: |
%260
- \property StaffCombineVoice.crescendoText = "cresc."
- \property StaffCombineVoice.crescendoSpanner = "dashed-line"
+ \property VoiceCombineVoice.crescendoText = "cresc."
+ \property VoiceCombineVoice.crescendoSpanner = "dashed-line"
[as8\p\< f']f4. es8 es4 ~ |
[es8 as]as4. g8 g4 ~ |
[g8 f]f4. es8 es4 ~ |
es4-. e-. r2 |
f4-. g-. r2 |
%290
- \property StaffCombineVoice.decrescendoText = "dim."
- \property StaffCombineVoice.decrescendoSpanner = "dashed-line"
+ \property VoiceCombineVoice.decrescendoText = "dim."
+ \property VoiceCombineVoice.decrescendoSpanner = "dashed-line"
as4\> r g r |
R1 |
\!c4\p r r2 |
copyright = "public domain";
}
-\version "1.3.59";
+\version "1.3.88";
\include "violi.ly"
copyright = "public domain";
}
-\version "1.3.59";
+\version "1.3.88";
\include "global.ly"
\include "viola-1.ly"
\include "viola-2.ly"
+%{
violiGroup = \context PianoStaff = violi_group \notes <
\context StaffCombineStaff=oneVioli {
\property StaffCombineStaff.midiInstrument = #"viola"
\context StaffCombineVoice=one \violaI
\context StaffCombineVoice=two \violaII
>
+%}
+
+violiGroup = \notes \context VoiceCombineStaff = violi <
+ \context VoiceCombineStaff=violi {
+ \property VoiceCombineStaff.midiInstrument = #"viola"
+ \property VoiceStaffCombineStaff.instrument = #"Viola"
+ \property VoiceStaffCombineStaff.instr = #"Vla."
+ \clef "alto";
+ \key es \major;
+ \skip 1*314;
+ \bar "|.";
+ }
+ \context VoiceCombineVoice=one \partcombine VoiceCombineVoice
+ \context VoiceCombineThread=one \violaI
+ \context VoiceCombineThread=two \violaII
+>
+
copyright = "public domain";
}
-\version "1.3.59";
+\version "1.3.88";
\include "global.ly"
\include "violino-1.ly"
copyright = "public domain";
}
-\version "1.3.59";
+\version "1.3.88";
violinoI = \notes \relative c {
c'1\ff ~ |
R1 |
\property Voice.decrescendoText = "sempre pi\\`u piano"
- \property Voice.decrescendoSpanner = ""
+ % urg, "" is assumed to be hairpin...
+ %\property Voice.decrescendoSpanner = ""
+ \property Voice.decrescendoSpanner = "dashed-line"
c1^"arco"\> ~ |
c2 b2 |
c1 ~ |
copyright = "public domain";
}
-\version "1.3.59";
+\version "1.3.88";
\include "global.ly"
\include "violino-2.ly"
copyright = "public domain";
}
-\version "1.3.59";
+\version "1.3.88";
violinoII = \notes \relative c {
c'1\ff ~ |
copyright = "public domain";
}
-\version "1.3.59";
+\version "1.3.88";
violoncello = \notes \relative c {
c1\ff ~ |
c |
f,4-. r r2 |
- r1 |
+ R1 |
c'1\ff ~ |
c |
f,4-. r r2 |
- \property StaffCombineStaff.instr = #"Vc.\nCb."
- r1 |
+ R1 |
c'1\ff ~ |
c |
fis,4-. r r2 |
- r1 |
+ R1 |
g4-. r r2 |
g4-. r r2 |
c4\p r4 r2 |
c4 r4 r2 |
c4 r4 r2 |
- r1 |
+ R1 |
\property StaffCombineVoice.crescendoText = "cresc."
\property StaffCombineVoice.crescendoSpanner = "dashed-line"
c'4.\< c8 bes4. bes8 |
[c8-.-"arco" es-.][es()d][d-. as'-.][as()g] |
R1
\property StaffCombineVoice.decrescendoText = "sempre pi\\`u piano"
- \property StaffCombineVoice.decrescendoSpanner = ""
+ % urg, "" is assumed to be hairpin...
+ %\property StaffCombineVoice.decrescendoSpanner = ""
+ \property StaffCombineVoice.decrescendoSpanner = "dashed-line"
\times 2/3 { c,4\> ( es c ~ } \times 2/3 { c as' )g } |
%300
(define mark-visibility end-of-line-invisible)
-; ugh: should calculate from beam-thickness.
-; result in staff-space
-;beam_thickness = 0.52 * (\staffspace - \stafflinethickness);
-;interbeam = (2.0 * \staffspace + \stafflinethickness - \beam_thickness) / 2.0;
-;interbeam4 = (3.0 * \staffspace - \beam_thickness) / 3.0;
+;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
+; BEAMS
+;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
(define (default-beam-space-function multiplicity)
(if (<= multiplicity 3) 0.816 0.844)
))
+; This is a mess : global namespace pollution. We should wait
+; till guile has proper toplevel environment support.
+
+
+;; Beams should be prevented to conflict with the stafflines,
+;; especially at small slopes
+;; ----------------------------------------------------------
+;; ########
+;; ########
+;; ########
+;; --------------########------------------------------------
+;; ########
+;;
+;; hang straddle sit inter hang
+
+;; inter seems to be a modern quirk, we don't use that
+
+
+;; Note: quanting period is take as quants.top () - quants[0],
+;; which should be 1 (== 1 interline)
+(define (mean a b) (* 0.5 (+ a b)))
+(define (default-beam-dy-quants beam stafflinethick)
+ (let ((thick (ly-get-elt-property beam 'thickness))
+ )
+
+ (list 0 (mean thick stafflinethick) (+ thick stafflinethick) 1)
+ ))
+
+;; two popular veritcal beam quantings
+;; see params.ly: #'beam-vertical-quants
+
+; (todo: merge these 2 funcs ? )
+
+(define (default-beam-y-quants beam multiplicity dy staff-line)
+ (let* ((beam-straddle 0)
+ (thick (ly-get-elt-property beam 'thickness))
+ (beam-sit (/ (+ thick staff-line) 2))
+ (beam-hang (- 1 (/ (- thick staff-line) 2)))
+ (quants (list beam-hang))
+ )
+
+ (if (or (<= multiplicity 1) (>= (abs dy) (/ staff-line 2)))
+ (set! quants (cons beam-sit quants)))
+ (if (or (<= multiplicity 2) (>= (abs dy) (/ staff-line 2)))
+ (set! quants (cons beam-straddle quants)))
+ ;; period: 1 (interline)
+ (append quants (list (+ 1 (car quants))))))
+
+(define (beam-traditional-y-quants beam multiplicity dy staff-line)
+ (let* ((beam-straddle 0)
+ (thick (ly-get-elt-property beam 'thickness))
+ (beam-sit (/ (+ thick staff-line) 2))
+ (beam-hang (- 1 (/ (- thick staff-line) 2)))
+ (quants '())
+ )
+ (if (>= dy (/ staff-line -2))
+ (set! quants (cons beam-hang quants)))
+ (if (and (<= multiplicity 1) (<= dy (/ staff-line 2)))
+ (set! quants (cons beam-sit quants)))
+ (if (or (<= multiplicity 2) (>= (abs dy) (/ staff-line 2)))
+ (set! quants (cons beam-straddle quants)))
+ ;; period: 1 (interline)
+ (append quants (list (+ 1 (car quants))))))
+
+
+;; There are several ways to calculate the direction of a beam
+;;
+;; * majority: number count of up or down notes
+;; * mean : mean centre distance of all notes
+;; * median : mean centre distance weighted per note
+
+(define (dir-compare up down)
+ (sign (- up down)))
+
+;; arguments are in the form (up . down)
+(define (beam-dir-majority count total)
+ (dir-compare (car count) (cdr count)))
+
+(define (beam-dir-mean count total)
+ (dir-compare (car total) (cdr total)))
+
+(define (beam-dir-median count total)
+ (if (and (> (car count) 0)
+ (> (cdr count) 0))
+ (dir-compare (/ (car total) (car count)) (/ (cdr total) (cdr count)))
+ (dir-compare (car count) (cdr count))))
+
+
+
+;; [Ross] states that the majority of the notes dictates the
+;; direction (and not the mean of "center distance")
+;;
+;; But is that because it really looks better, or because he wants
+;; to provide some real simple hands-on rules?
+;;
+;; We have our doubts, so we simply provide all sensible alternatives.
+
+
+
+
+
+;; array index multiplicity, last if index>size
+;; beamed stems
+
+
+;; TODO
+;; - take #forced stems into account (now done in C++)?
+;; - take y-position of chord or beam into account
+
+;;;;;;;;;;;;;;;;;;;;;;;
+
+
+;
+; todo: clean this up a bit: the list is getting rather long.
+;
(define basic-beam-properties
`(
(interfaces . (beam-interface))
(molecule-callback . ,Beam::brew_molecule)
- (beam-thickness . 0.42) ; staff-space, should use stafflinethick?
+ (thickness . 0.42) ; in staff-space, should use stafflinethick?
(before-line-breaking-callback . ,Beam::before_line_breaking)
(after-line-breaking-callback . ,Beam::after_line_breaking)
(default-neutral-direction . 1)
+ (dir-function . ,beam-dir-majority)
+ (height-quants . ,default-beam-dy-quants)
+ (vertical-position-quant-function . ,default-beam-y-quants)
+ (beamed-stem-shorten . (0.5))
(outer-stem-length-limit . 0.2)
(slope-limit . 0.2)
- (beam-flag-width-function . ,default-beam-flag-width-function)
- (beam-space-function . ,default-beam-space-function)
+ (flag-width-function . ,default-beam-flag-width-function)
+ (space-function . ,default-beam-space-function)
(damping . 1)
- (name . "beam")
+ (name . "beam")
)
)
(define (sign x)
(if (= x 0)
1
- (inexact->exact (/ x (abs x)))))
+ (if (< x 0) -1 1)))
;;;; AsciiScript as
(define (as-scm action-name)
;;; All dimensions are measured in staff-spaces
-; This is a mess : global namespace pollution. We should wait
-; till guile has proper toplevel environment support.
-
-
-;; Beams should be prevented to conflict with the stafflines,
-;; especially at small slopes
-;; ----------------------------------------------------------
-;; ########
-;; ########
-;; ########
-;; --------------########------------------------------------
-;; ########
-;;
-;; hang straddle sit inter hang
-
-;; inter seems to be a modern quirk, we don't use that
-
-(define staff-line 0.10)
-(define beam-thickness (* 0.52 (- 1 staff-line)))
-(define beam-straddle 0)
-(define beam-sit (/ (+ beam-thickness staff-line) 2))
-(define beam-hang (- 1 (/ (- beam-thickness staff-line) 2)))
-
-;; Note: quanting period is take as quants.top () - quants[0],
-;; which should be 1 (== 1 interline)
-
-(define beam-normal-dy-quants
- (list 0 (/ (+ beam-thickness staff-line) 2) (+ beam-thickness staff-line) 1))
-
-;; two popular veritcal beam quantings
-;; see params.ly: #'beam-vertical-quants
-(define (beam-normal-y-quants multiplicity dy)
- (let ((quants (list beam-hang)))
- (if (or (<= multiplicity 1) (>= (abs dy) (/ staff-line 2)))
- (set! quants (cons beam-sit quants)))
- (if (or (<= multiplicity 2) (>= (abs dy) (/ staff-line 2)))
- (set! quants (cons beam-straddle quants)))
- ;; period: 1 (interline)
- (append quants (list (+ 1 (car quants))))))
-
-(define (beam-traditional-y-quants multiplicity dy)
- (let ((quants '()))
- (if (>= dy (/ staff-line -2))
- (set! quants (cons beam-hang quants)))
- (if (and (<= multiplicity 1) (<= dy (/ staff-line 2)))
- (set! quants (cons beam-sit quants)))
- (if (or (<= multiplicity 2) (>= (abs dy) (/ staff-line 2)))
- (set! quants (cons beam-straddle quants)))
- ;; period: 1 (interline)
- (append quants (list (+ 1 (car quants))))))
-
-
-;; There are several ways to calculate the direction of a beam
-;;
-;; * majority: number count of up or down notes
-;; * mean : mean centre distance of all notes
-;; * median : mean centre distance weighted per note
-
-(define (dir-compare up down)
- (if (= up down)
- 0
- (if (> up down)
- 1
- -1)))
-
-;; (up . down)
-(define (beam-dir-majority count total)
- (dir-compare (car count) (cdr count)))
-
-(define (beam-dir-mean count total)
- (dir-compare (car total) (cdr total)))
-
-(define (beam-dir-median count total)
- (if (and (> (car count) 0)
- (> (cdr count) 0))
- (dir-compare (/ (car total) (car count)) (/ (cdr total) (cdr count)))
- (dir-compare (car count) (cdr count))))
-
-
-;;; Default variables and settings
-
-(define beam-height-quants beam-normal-dy-quants)
-(define beam-vertical-position-quants beam-normal-y-quants)
-
-
-;; [Ross] states that the majority of the notes dictates the
-;; direction (and not the mean of "center distance")
-;;
-;; But is that because it really looks better, or because he wants
-;; to provide some real simple hands-on rules?
-;;
-;; We have our doubts, so we simply provide all sensible alternatives.
-(define beam-dir-algorithm beam-dir-majority)
-
-
-;; array index flag-2 (what a name!!), last if index>size
-;; unbeamed stems
-(define stem-length '(3.5 3.5 3.5 4.5 5.0))
-(define grace-length-factor 0.8)
-(define grace-stem-length
- (map (lambda (x) (* grace-length-factor x)) stem-length))
-
-;; array index multiplicity, last if index>size
-;; beamed stems
-(define beamed-stem-shorten '(0.5))
-(define beamed-stem-length '(0.0 2.5 2.0 1.5))
-(define grace-beamed-stem-length '(0.0 2.5 2.0 1.5))
-(define beamed-stem-minimum-length '(0.0 1.5 1.25 1.0))
-(define grace-beamed-stem-minimum-length
- (map (lambda (x) (* grace-length-factor x)) beamed-stem-minimum-length))
-
-;; Stems in unnatural (forced) direction should be shortened,
-;; according to [Roush & Gourlay]. Their suggestion to knock off
-;; a whole staffspace seems a bit drastical: we'll do half.
-
-;; TODO
-;; - take #forced stems into account (now done in C++)?
-;; - take y-position of chord or beam into account
-
-(define stem-shorten '(0.5))
-(define grace-stem-shorten '(0.0))
-
;; 'head 'along-side-stem 'stem 'loose-end
;;
-(define slur-extremity-rules
+(define default-slur-extremity-rules
(list
;; (cons (lambda (slur dir) (begin (display "before sanity check") (newline))#f) #f)
;; This list defines the offsets for each type of attachment.
;; The format of each element is
-;; (attachment stem-dir * attachment-dir slur-dir)
+;; (stem-dir * dir . slur-dir * dir)
;; Different attachments have different default points:
;;
;; head: Default position is centered in X, on outer side of head Y
;; along-side-stem: Default position is on stem X, on outer side of head Y
;; stem: Default position is on stem X, at stem end Y
-(define slur-extremity-offset-alist
+(define default-slur-extremity-offset-alist
'(
- ((head 1 1) . (-0.25 . 0.2))
+ ((head 1 1) . (-0.25 . 0.25))
((head 1 -1) . (-0.25 . -0.25))
((head -1 1) . (-0.25 . 0.25))
- ((head -1 -1) . (-0.85 . -0.2))
+ ((head -1 -1) . (-0.85 . -0.25))
((stem 1 1) . (0 . 0.5))
((stem -1 -1) . (0 . -0.5))
- ((loose-end -1 1) . (-4 . 0))
- ((loose-end -1 -1) . (-4 . 0))
((loose-end 1 1) . (-0.4 . 0))
((loose-end 1 -1) . (-0.4 . 0))
+ ((loose-end -1 -1) . (-4 . 0))
+ ((loose-end -1 1) . (-4 . 0))
))
+
+
+(define default-basic-slur-properties
+ `(
+ (interfaces . (slur-interface))
+ (molecule-callback . ,Slur::brew_molecule)
+ (thickness . 1.2)
+ (spacing-procedure . ,Slur::set_spacing_rods)
+ (minimum-length . 1.5)
+ (after-line-breaking-callback . ,Slur::after_line_breaking)
+ (extremity-rules . ,default-slur-extremity-rules)
+ (extremity-offset-alist . ,default-slur-extremity-offset-alist)
+ (de-uglify-parameters . ( 1.5 0.8 -2.0))
+ (details . ((height-limit . 2.0) (ratio . 0.333) (force-blowfit . 0.5) (beautiful . 0.5)))
+ (y-free . 0.75)
+ (name . "slur")
+ )
+ )
# Requester Description
# --------- -----------
# init Initial default values
- # file The values found in the lilypond generated TeX files
+ # file The values found in the LilyPond generated TeX files
# environment Envrionment variables LILYINCLUDE, LILYPONDPREFIX
# rcfile $LILYPONDPREFIX/.lilyrc
# rcfile $HOME/.lilyrc
#
def setRoot(this,path, requester):
"""
- Set lilypond root directory
+ Set LilyPond root directory
"""
os.environ['LILYPONDPREFIX'] = path
def program_id ():
- return 'ly2dvi (GNU lilypond) ' + version;
+ return 'ly2dvi (GNU LilyPond) ' + version;
def mailaddress():
sys.stdout.write (
"""Usage: %s [OPTION]... [FILE]...
-Generate dvi file from mudela or lilypond output
+Generate dvi file from LilyPond source/output
Options:
-D,--debug increase verbosity
-F,--headers= name of additional LaTeX headers file
-H,--Height= set paper height (points) (see manual page)
-I,--include=DIR add DIR to LilyPond\'s search path
- -K,--keeplilypond keep lilypond output files
+ -K,--keeplilypond keep LilyPond output files
-L,--landscape set landscape orientation
-N,--nonumber switch off page numbering
- -O,--orientation= set orientation (obsolete - use -L instead)
- -P,--postscript generate postscript file
+ -O,--orientation= set orientation (obsolete -- use -L instead)
+ -P,--postscript generate PostScript file
-W,--Width= set paper width (points) (see manual page)
- -M,--dependencies tell lilypond make a dependencies file
+ -M,--dependencies tell LilyPond to make a dependencies file
-h,--help this help text
-k,--keeply2dvi keep ly2dvi output files
-l,--language= give LaTeX language (babel)
-p,--papersize= give LaTeX papersize (eg. a4)
-s,--separate run all files separately through LaTeX
-files may be (a mix of) input to or output from lilypond(1)
+files may be (a mix of) input to or output from LilyPond(1)
""" % name)
\f
#
def main():
- """Generate dvi files from lilypond source/output"""
+ """Generate dvi files from LilyPond source/output"""
infile = Input()
outfile = TeXOutput()
'help', 'keeply2dvi', 'language=',
'output=', 'version', 'papersize=', 'separate',
'postscript'])
+
for opt in options:
o = opt[0]
a = opt[1]
elif o == '--version':
print_version ()
return 0
+ else:
+ print o
+ raise getopt.error
identify()
Props.read_titledefs ()
'ExitBadWidth' : ['Invalid Width specification', 6 ],
'ExitBadOrient' : ['Invalid Orientation specification', 7 ],
'ExitNoWrite' : ['Permission denied', 8 ],
- 'ExitNoTeXName' : ['hmm, I could not find an output file name', 9 ],
- 'ExitBadLily' : ['Lilypond failed', 10 ],
+ 'ExitNoTeXName' : ['Hmm, I could not find an output file name', 9 ],
+ 'ExitBadLily' : ['LilyPond failed', 10 ],
'ExitBadLatex' : ['Latex failed', 11 ],
'ExitBadPostscript' : ['Postscript failed', 12 ],
'ExitUnknown' : ['Unknown Exit Code', 20 ],