release: 1.3.53

[lilypond.git] / lily / idealspacing.cc

diff --git a/lily/idealspacing.cc b/lily/idealspacing.cc
index d7379218f162c57b43c29b8d84ecd083d8bb2198..90cfa1dbae38da7848f33a3eccc5bd50e20525fd 100644 (file)
--- a/lily/idealspacing.cc
+++ b/lily/idealspacing.cc
@@ -11,15 +11,6 @@
 #include "paper-score.hh"
 #include "debug.hh"
 
-void
-Idealspacing::print() const
-{
-#ifndef NPRINT
-  DEBUG_OUT << "idealspacing {" ;
-  DEBUG_OUT << "distance " << space_f_ << " strength " << hooke_f_;
-  DEBUG_OUT << "left " << cols_drul_[LEFT] << " right " << cols_drul_[RIGHT] << "}\n";
-#endif
-}
 
 Idealspacing::Idealspacing()
 {
@@ -27,21 +18,3 @@ Idealspacing::Idealspacing()
   hooke_f_ = 0.0;
   cols_drul_[LEFT] = cols_drul_[RIGHT] = -1;
 }
-
-void
-Idealspacing::OK() const
-{
-  assert (hooke_f_ >= 0);
-}
-
-Real
-Idealspacing::energy_f(Real x) const
-{
-  Real dx = (space_f_ - x);
-  
-  Real e =  sqr(dx);
-  if ( dx < 0)
-    e *= 4;                    // ugh.
-  
-  return hooke_f_ * e;
-}