(parse_symbol_list): Bugfix.
[lilypond/patrick.git] / flower / include / interval.hh
blob2d3bf4128114466bced1d52c9eb6c69350018410
1 /*
2 interval.hh -- part of flowerlib
4 (c) 1996--2005 Han-Wen Nienhuys
5 */
7 #ifndef INTERVAL_HH
8 #define INTERVAL_HH
10 #include "flower-proto.hh"
11 #include "drul-array.hh"
13 /* A T interval. This represents the closed interval [left,right].
14 No invariants. T must be a totally ordered ring (with division, anyway ..)
15 At instantiation, the function infinity () has to be defined explicitely. */
16 template<class T>
17 struct Interval_t : public Drul_array<T>
19 Drul_array<T>::elem;
20 Drul_array<T>::elem_ref;
22 static T infinity ();
23 static String T_to_string (T arg);
24 T center () const;
25 void translate (T t)
27 elem_ref (LEFT) += t;
28 elem_ref (RIGHT) += t;
30 void widen (T t)
32 elem_ref (LEFT) -= t;
33 elem_ref (RIGHT) += t;
36 T distance (T t) const
38 if (t > elem (RIGHT))
39 return T (t - elem (RIGHT));
40 else if (t < elem (LEFT))
41 return T (elem (LEFT) - t);
42 else
43 return T (0);
45 /**
46 PRE
47 *this and h are comparable
49 void unite (Interval_t<T> h);
50 void intersect (Interval_t<T> h);
51 void add_point (T p)
53 elem_ref (LEFT) = min (elem (LEFT), p);
54 elem_ref (RIGHT) = max (elem (RIGHT), p);
56 T length () const;
57 T delta () const;
58 void set_empty ();
59 void set_full ();
62 TODO: strip hungarian suffix.
64 bool is_empty () const
66 return elem (LEFT) > elem (RIGHT);
68 bool superset (Interval_t<T> const &) const;
69 Interval_t ()
71 set_empty ();
73 Interval_t (Drul_array<T> const &src)
74 : Drul_array<T> (src)
78 Interval_t (T m, T M) : Drul_array<T> (m, M)
81 Interval_t<T> &operator -= (T r)
83 *this += -r;
84 return *this;
87 Interval_t<T> &operator += (T r)
89 elem_ref (LEFT) += r;
90 elem_ref (RIGHT) += r;
91 return *this;
93 Interval_t<T> &operator *= (T r)
95 if (!is_empty ())
97 elem_ref (LEFT) *= r;
98 elem_ref (RIGHT) *= r;
99 if (r < T (0))
100 swap ();
102 return *this;
105 Real linear_combination (Real x) const
107 Drul_array<Real> da (elem (LEFT), elem (RIGHT));
108 return ::linear_combination (da, x);
110 String to_string () const;
112 bool contains (T r);
113 void negate ()
115 T r = -elem (LEFT);
116 T l = -elem (RIGHT);
117 elem_ref (LEFT) = l;
118 elem_ref (RIGHT) = r;
121 void swap ()
123 T t = elem (LEFT);
124 elem_ref (LEFT) = elem (RIGHT);
125 elem_ref (RIGHT) = t;
128 static int left_comparison (Interval_t<T> const &a, Interval_t<T> const &b)
130 return sign (a[LEFT] - b[RIGHT]);
135 inclusion ordering. Crash if not comparable.
137 template<class T>
138 int Interval__compare (const Interval_t<T> &, Interval_t<T> const &);
141 Inclusion ordering. return -2 if not comparable
143 template<class T>
145 _Interval__compare (const Interval_t<T> &a, Interval_t<T> const &b);
148 INLINE
151 #include "compare.hh"
153 TEMPLATE_INSTANTIATE_COMPARE (Interval_t<T> &, Interval__compare, template<class T>);
155 template<class T>
156 inline Interval_t<T>
157 intersection (Interval_t<T> a, Interval_t<T> const &b)
159 a.intersect (b);
160 return a;
163 template<class T>
164 inline
165 Interval_t<T> operator + (T a, Interval_t<T> i)
167 i += a;
168 return i;
171 template<class T>
172 inline
173 Interval_t<T> operator - (Interval_t<T> i, T a)
175 i += -a;
176 return i;
179 template<class T>
180 inline
181 Interval_t<T> operator - (T a, Interval_t<T> i)
183 i.negate ();
184 i += a;
185 return i;
188 template<class T>
189 inline
190 Interval_t<T> operator + (Interval_t<T> i, T a)
192 return a + i;
195 template<class T>
196 inline
197 Interval_t<T> operator * (T a, Interval_t<T> i)
199 i *= a;
200 return i;
203 template<class T>
204 inline
205 Interval_t<T> operator * (Interval_t<T> i, T a)
207 return a * i;
210 template<class T>
211 inline T
212 Interval_t<T>::center () const
214 assert (!is_empty ());
215 return (elem (LEFT) + elem (RIGHT)) / T (2);
218 typedef Interval_t<Real> Interval;
219 typedef Interval_t<int> Slice; // weird name
222 #endif // INTERVAL_HH