-/*
- spring.hh -- declare Spring, Column_spring
-
- source file of the GNU LilyPond music typesetter
-
- (c) 1999--2001 Han-Wen Nienhuys <hanwen@cs.uu.nl>
-
- */
+/*
+ This file is part of LilyPond, the GNU music typesetter.
+
+ Copyright (C) 1999--2015 Han-Wen Nienhuys <hanwen@xs4all.nl>
+
+ LilyPond is free software: you can redistribute it and/or modify
+ it under the terms of the GNU General Public License as published by
+ the Free Software Foundation, either version 3 of the License, or
+ (at your option) any later version.
+
+ LilyPond is distributed in the hope that it will be useful,
+ but WITHOUT ANY WARRANTY; without even the implied warranty of
+ MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
+ GNU General Public License for more details.
+
+ You should have received a copy of the GNU General Public License
+ along with LilyPond. If not, see <http://www.gnu.org/licenses/>.
+*/
#ifndef SPRING_HH
#define SPRING_HH
#include "lily-proto.hh"
-#include "drul-array.hh"
-
-struct Column_spring {
- Paper_column *other_l_;
- Real distance_f_;
-
- /*
- TODO: make 2 strengths: one for stretching, and one for shrinking.
- */
- Real strength_f_;
-
- Column_spring ();
-};
+#include "smobs.hh"
+
+class Spring : public Simple_smob<Spring>
+{
+public:
+ static SCM equal_p (SCM, SCM);
+ static const char type_p_name_[];
+private:
+ Real distance_;
+ Real min_distance_;
+
+ Real inverse_stretch_strength_;
+ Real inverse_compress_strength_;
-struct Spring{
- Drul_array<Item*> item_l_drul_;
- Real distance_f_;
+ Real blocking_force_;
- /*
- TODO: make 2 strengths: one for stretching, and one for shrinking.
- */
- Real strength_f_;
- void add_to_cols ();
- void set_to_cols ();
+ void update_blocking_force ();
+
+public:
Spring ();
+ Spring (Real distance, Real min_distance);
+
+ Real distance () const {return distance_;}
+ Real min_distance () const {return min_distance_;}
+ Real inverse_stretch_strength () const {return inverse_stretch_strength_;}
+ Real inverse_compress_strength () const {return inverse_compress_strength_;}
+ Real blocking_force () const {return blocking_force_;}
+
+ Real length (Real f) const;
+
+ void set_distance (Real);
+ void set_min_distance (Real);
+ void ensure_min_distance (Real);
+ void set_inverse_stretch_strength (Real);
+ void set_inverse_compress_strength (Real);
+ void set_blocking_force (Real);
+ void set_default_strength ();
+ void set_default_compress_strength ();
+ void set_default_stretch_strength ();
+
+ void operator *= (Real);
+ bool operator > (Spring const &) const;
};
+Spring merge_springs (vector<Spring> const &springs);
#endif /* SPRING_HH */
-