]> git.donarmstrong.com Git - lilypond.git/blob - lily/rod.cc
release: 0.1.54
[lilypond.git] / lily / rod.cc
1 /*   
2   rod.cc --  implement Rod, Column_rod
3   
4   source file of the GNU LilyPond music typesetter
5   
6   (c) 1998 Han-Wen Nienhuys <hanwen@cs.ruu.nl>
7   
8  */
9 #include "rod.hh"
10 #include "p-col.hh"
11 #include "debug.hh"
12 #include "single-malt-grouping-item.hh"
13
14 Rod::Rod (Single_malt_grouping_item *l, Single_malt_grouping_item *r)
15 {
16   item_l_drul_[LEFT] =l;
17   item_l_drul_[RIGHT]=r;
18
19   Interval li (l->my_width ());
20   Interval ri (r->my_width ());
21   if (li.empty_b () || ri.empty_b ())
22     distance_f_ = 0;
23   else
24     distance_f_ = li[RIGHT] + ri[LEFT];
25 }
26           
27 Rod::Rod ()
28 {
29   distance_f_ = 0.0;
30   item_l_drul_[LEFT] = item_l_drul_[RIGHT] =0;
31 }
32
33 void
34 Column_rod::print () const
35 {
36 #ifndef NDEBUG
37   DOUT << "Column_rod { rank = "
38        << other_l_->rank_i () << ", dist = " << distance_f_ << "}\n";   
39 #endif
40 }
41
42 Column_rod::Column_rod ()
43 {
44   distance_f_ = 0;
45   other_l_ = 0;
46 }
47   
48 int
49 Column_rod::compare (const Column_rod &r1, const Column_rod &r2)
50 {
51   return r1.other_l_->rank_i() - r2.other_l_->rank_i();
52 }
53 void
54 Rod::add_to_cols ()
55 {
56   item_l_drul_[RIGHT]->column_l ()->add_rod
57     (item_l_drul_[LEFT]->column_l (), distance_f_);
58   item_l_drul_[LEFT]->column_l ()->add_rod
59     (item_l_drul_[RIGHT]->column_l (), distance_f_);
60 }