patch::: 1.3.15.jcn2

[lilypond.git] / ly / params.ly

diff --git a/ly/params.ly b/ly/params.ly
index 96b0057fa82b2a8893ccdb8b23b5765cb45313da..07ec6cf89d872aa684a3809d6d15116c258fea31 100644 (file)
--- a/ly/params.ly
+++ b/ly/params.ly
@@ -13,9 +13,15 @@ stafflinethickness = \interline / 10.0;
 
 % urg, need grace_ versions of these too?
 beam_thickness = 0.52 * (\interline - \stafflinethickness);
+
+#'beam-thickness = \beam_thickness;  %% UGR
+
+
 interbeam = (2.0 * \interline + \stafflinethickness - \beam_thickness) / 2.0;
 interbeam4 = (3.0 * \interline - \beam_thickness) / 3.0;
 
+
+
 % stems and beams
 %
 % poor man's array size
@@ -23,7 +29,7 @@ stem_max = 3.0;
 
 %{ Specify length of stems for notes in the staff
 that don't have beams. 
- Measured in staff positions.
+   Measured in staff positions.
 %}
 stem_length0 = 7.;
 stem_length1 = 5.;
@@ -57,7 +63,7 @@ grace_stem_length3 = \stem_length3 * \grace_factor;
 
 % only used for beams
 minimum_stem_length0 = 0.0 ; % not used
-minimum_stem_length1 = 3. ;
+minimum_stem_length1 = 3.;
 minimum_stem_length2 = 2.5;
 minimum_stem_length3 = 2.0;
 
@@ -89,24 +95,15 @@ grace_forced_stem_shorten3 = \grace_forced_stem_shorten2;
 % * MEAN     : mean centre distance of all notes
 % * MEDIAN   : mean centre distance weighted per note
 %
-% enum Dir_algorithm { DOWN=-1, UP=1, MAJORITY=2, MEAN, MEDIAN };
-%
-DOWN = -1.0;
-UP = 1.0;
-MAJORITY = 2.0;
-MEAN = 3.0;
-MEDIAN = 4.0;
 
-%{
-dit(code(beam_dir_algorithm)) Specify algorithm for determining
-whether beams go up or down.  It is real valued.  If set to 2.0 then
-majority selection is used.  If set to 3.0, then mean selection is
-used based on the mean center distance.  If set to 4.0 then median
-selection is used, based on the median center distance.
-%}
+#'beam-dir-algorithm = #'majority      %urg.
+
+
+#'Stem_tremolo::beam-width = 1.5 * \quartwidth ; 
 
-% [Ross]: majority
-beam_dir_algorithm = \MAJORITY;
+#'Clef_item::visibility-lambda = #postbreak-only-visibility
+#'Key_item::visibility-lambda = #postbreak-only-visibility
+#'Breathing_sign::visibility-lambda = #non-postbreak-visibility
 
 % catch suspect beam slopes, set slope to zero if
 % outer stem is lengthened more than
@@ -202,6 +199,13 @@ barthick_thick = 6.0* \stafflinethickness;
 barthick_thin = 1.6*\stafflinethickness;
 barthick_score = 1.6*\stafflinethickness;
 
+bracket_arch_thick = \interline / 3.0;
+bracket_width = 2.0 * \interline;
+bracket_thick = 2.0 * \stafflinethickness;
+bracket_arch_height = 1.5 * \interline;
+bracket_arch_width = \bracket_arch_height;
+bracket_arch_angle = 50.0;
+
 tuplet_spanner_gap = 2.0 * \interline;
 tuplet_thick = 1.0*\stafflinethickness;
 volta_thick = 1.6*\stafflinethickness;
@@ -225,7 +229,7 @@ mmrest_x_minimum = 1.4*\staffheight;
 % chop off this much when next to pp / ff sign.
 crescendo_shorten = 4.0 * \interline;
 crescendo_thickness   = \stafflinethickness;
-crescendo_height = 1.5 * \interline;
+crescendo_height = 0.666 * \interline;
 
 % in internote.
 restcollision_minimum_dist = 3.0;
@@ -289,4 +293,9 @@ Wordwrap =0.0;
 \include "engraver.ly";
 
 
+#'margin-shape = #'()
+
 
+% 
+#'Local_key_item::left-padding = #'0.2
+#'Local_key_item::right-padding = #'0.4