]> git.donarmstrong.com Git - lilypond.git/blobdiff - lily/include/beam.hh
* The grand 2005-2006 replace.
[lilypond.git] / lily / include / beam.hh
index acfb81803bf739d85f6011fc9abd31044e64dac4..d7bccaead9e5195ebcfecaadcec2981814c5d7ee 100644 (file)
 /*
   beam.hh -- part of GNU LilyPond
 
-  (c) 1996--1999 Han-Wen Nienhuys
+  source file of the LilyPond music typesetter
+
+  (c) 1996--2006 Han-Wen Nienhuys <hanwen@xs4all.nl>
+  Jan Nieuwenhuizen <janneke@gnu.org>
 */
 
 #ifndef BEAM_HH
 #define BEAM_HH
 
 #include "lily-proto.hh"
-#include "directional-spanner.hh"
+#include "lily-guile.hh"
 #include "stem-info.hh"
-#include "plist.hh"
 
-/** a beam connects multiple stems.
+/*
+  TODO: move quanting in separate file.
+*/
+struct Beam_quant_parameters
+{
+  Real INTER_QUANT_PENALTY;
+  Real SECONDARY_BEAM_DEMERIT;
+  Real STEM_LENGTH_DEMERIT_FACTOR;
+  Real REGION_SIZE;
+
+  /*
+    threshold to combat rounding errors.
+  */
+  Real BEAM_EPS;
+
+  // possibly ridiculous, but too short stems just won't do
+  Real STEM_LENGTH_LIMIT_PENALTY;
+  Real DAMPING_DIRECTION_PENALTY;
+  Real MUSICAL_DIRECTION_FACTOR;
+  Real IDEAL_SLOPE_FACTOR;
+  Real ROUND_TO_ZERO_SLOPE;
+
+  void fill (Grob *him);
+};
 
-  Beam adjusts the stems its owns to make sure that they reach the
-  beam and that point in the correct direction */
-class Beam:  public Directional_spanner {
+class Beam
+{
 public:
-  /** 
-    The beams should be prevented to conflict with the stafflines, 
-    especially at small slopes.
-    */
-  enum Quantisation { NONE, NORMAL, TRADITIONAL, TEST };
-  enum Dir_algorithm { /* DOWN=-1, UP=1, */ MAJORITY=2, MEAN, MEDIAN };
-
-  Link_array<Stem> stems_;
-  /// the slope of the beam in posns / point (dimension)   
-  Real slope_f_;
-  /// the slope as solved; not quantised or damped
-  Real solved_slope_f_;
-
-  /// position of leftmost end of beam  
-  Real left_y_;
-  /// should beam slope be damped? 0: no, 1: yes, 100000: horizontal beams
-  int damping_i_;
-  /// should beam pos / slope be quantised? 0: no, 1: yes, 2: traditional
-  Quantisation quantisation_;
-  /// maximum number of beams (for opening-up of beam-spacing)
-  int multiple_i_;
-
-  /// vertical align distance between staffs
-  Drul_array<Real> vertical_align_drul_;
-
-  Array<Stem_info> sinfo_;
+  static int visible_stem_count (Grob *);
+  static Grob *first_visible_stem (Grob *);
+  static Grob *last_visible_stem (Grob *);
+  static bool has_interface (Grob *);
+  static void add_stem (Grob *, Grob *);
+  static bool is_knee (Grob *);
+  static void set_beaming (Grob *, Beaming_info_list const *);
+  static void set_stemlens (Grob *);
+  static int get_beam_count (Grob *me);
+  static Real get_beam_translation (Grob *me);
+  static Real get_thickness (Grob *me);
+  static void connect_beams (Grob *me);
+
+  DECLARE_SCHEME_CALLBACK (rest_collision_callback, (SCM element, SCM prev_off));
+  DECLARE_SCHEME_CALLBACK (print, (SCM));
+  DECLARE_SCHEME_CALLBACK (calc_beaming, (SCM));
+  DECLARE_SCHEME_CALLBACK (calc_stem_shorten, (SCM));
+  DECLARE_SCHEME_CALLBACK (calc_direction, (SCM));
+  DECLARE_SCHEME_CALLBACK (calc_positions, (SCM));
+  DECLARE_SCHEME_CALLBACK (calc_least_squares_positions, (SCM, SCM));
+  DECLARE_SCHEME_CALLBACK (calc_concaveness, (SCM));
+  DECLARE_SCHEME_CALLBACK (set_stem_lengths, (SCM));
+
+  /* position callbacks */
+  DECLARE_SCHEME_CALLBACK (shift_region_to_valid, (SCM, SCM));
+  DECLARE_SCHEME_CALLBACK (slope_damping, (SCM, SCM));
+  DECLARE_SCHEME_CALLBACK (quanting, (SCM, SCM));
   
-  Beam();
-  void add_stem (Stem*);
-
-  void set_grouping (Rhythmic_grouping def, Rhythmic_grouping current);
-  void set_stemlens ();
-  VIRTUAL_COPY_CONS(Score_element);
-
-protected:
-  virtual Interval do_width () const;    
-  Offset center () const;
-  void set_default_dir ();
-  void set_steminfo ();
-  virtual void do_pre_processing ();
-  virtual void do_post_processing ();
-  virtual void do_substitute_dependent (Score_element*, Score_element*);
-
-  virtual void do_print() const;
-
-  virtual void quantise_left_y (bool extend_b);
-  virtual Molecule stem_beams (Stem *here, Stem *next, Stem *prev) const;
-  virtual void calculate_slope ();
-  virtual Real check_stemlengths_f (bool set_b);
-  virtual void solve_slope ();
-  virtual void quantise_dy ();
-  virtual Molecule*do_brew_molecule_p () const;
+static Real score_slopes_dy (Real, Real, Real, Real, Real, bool, Beam_quant_parameters const *);
+
+  static Real score_stem_lengths (Link_array<Grob> const &stems,
+                                 Array<Stem_info> const &stem_infos,
+                                 Array<Real> const &base_stem_ys,
+                                 Array<Real> const &stem_xs,
+                                 Real xl, Real xr,
+                                 bool knee,
+                                 Real yl, Real yr, Beam_quant_parameters const *);
+  static Real score_forbidden_quants (Real, Real,
+                                     Real, Real, Real, Real,
+                                     Drul_array<int>, Direction, Direction,
+                                     Beam_quant_parameters const *);
+
+  static int get_direction_beam_count (Grob *me, Direction d);
+private:
+  static Direction get_default_dir (Grob *);
+  static void set_stem_directions (Grob *, Direction);
+  static void consider_auto_knees (Grob *);
+  static void set_stem_shorten (Grob *);
+  static Real calc_stem_y (Grob *, Grob *s, Grob **c,
+                          Real, Real,
+                          Drul_array<Real> pos, bool french);
+  static int forced_stem_count (Grob *);
 };
 
-#endif // BEAM_HH
+#ifndef NDEBUG
+#define DEBUG_QUANTING 1
+#endif
+
+#endif /* BEAM_HH */