]> git.donarmstrong.com Git - lilypond.git/blob - lily/idealspacing.cc
release: 0.0.78
[lilypond.git] / lily / idealspacing.cc
1 /*
2   idealspacing.cc -- implement Idealspacing
3
4   source file of the GNU LilyPond music typesetter
5
6   (c) 1996,1997 Han-Wen Nienhuys <hanwen@stack.nl>
7 */
8
9 #include "idealspacing.hh"
10 #include "p-col.hh"
11 #include "p-score.hh"
12 #include "debug.hh"
13
14 void
15 Idealspacing::print() const
16 {
17 #ifndef NPRINT
18     mtor << "idealspacing {" ;
19     mtor << "distance "<<space_f_<< " strength " << hooke_f_ ;
20     mtor << "left " << left_i_ << " right " << right_i_ << "}\n";
21 #endif
22 }
23
24 Idealspacing::Idealspacing()
25 {
26     space_f_ = 0.0;
27     hooke_f_ = 0.0;
28     left_i_ = -1;
29     right_i_ = -1;
30 }
31
32 void
33 Idealspacing::OK() const
34 {
35     assert(hooke_f_ >= 0);
36 }