]> git.donarmstrong.com Git - lilypond.git/blobdiff - flower/include/interval.hh
2003 -> 2004
[lilypond.git] / flower / include / interval.hh
index 20f5987e430b53568973814e5d21ecddf99053fe..be5f560d7e1e3bd17d1d76141b5a8f0a4f15eac5 100644 (file)
 /*
   interval.hh -- part of flowerlib
   
-  (c) 1996 Han-Wen Nienhuys
+  (c) 1996--2004 Han-Wen Nienhuys
 */
 
 #ifndef INTERVAL_HH
 #define INTERVAL_HH
 
 #include <assert.h> 
-#include "fproto.hh"
+#include "flower-proto.hh"
 #include "real.hh"
-
+#include "drul-array.hh"
 
 /** a T interval.  this represents the closed interval [left,right].
   No invariants. T must be a totally ordered ring (with division, anyway ..)
-  At instantiation, the function infinity() has to be defined explicitely.
+  At instantiation, the function infinity () has to be defined explicitely.
   
   */
 template<class T>
-struct Interval_t {
-  T left, right;
+struct Interval_t : public Drul_array<T> {
 
   /* ************** */
     
-  static T infinity() ;
-  static String T_to_str (T arg);
-    
-  // ugh, egcs 1.02 ices on this
-//  T center() { return (left + right) / T(2);}
-  // and can't handle this either
-  // anyone want to make a bug report?
-  // better make one soon, egcs in rh5.1 barfs on this!
-  T center() {
-    T two (2);
-//    return (left + right) / two;
-    T result ((left + right) / two);
-    return result;
-  }
-  void translate (T t) {
-    left += t;
-    right += t;
+  static T infinity () ;
+  static String T_to_string (T arg);
+  T center () const {
+    assert (!is_empty ());
+    return (elem (LEFT) + elem (RIGHT)) / T (2);
   }
-  T& idx (int j) {
-    if (j==-1)
-      return left;
-    else if (j==1)
-      return right;
-    else
-      assert (false);
-    return left;               
-  }
-  T& operator[](int j) {
-    return idx (j);
-  }
-  T operator[](int j) const {
-    return ((Interval_t<T> *)this)->idx (j);
+  void translate (T t)
+    {
+      elem (LEFT) += t;
+      elem (RIGHT) += t;
+    }
+  void widen (T t)
+  {
+    elem (LEFT) -= t;
+    elem (RIGHT) += t;    
   }
-  T &max() { return right;}
-  T max() const { return right;}
-  T min() const{ return left; }
-  T &min(){ return left; }
+  
   /**
     PRE
     *this and h are comparable
     */
   void unite (Interval_t<T> h);
   void intersect (Interval_t<T> h);
-
-  T length() const;
-  void set_empty() ;
-  bool empty_b() const { return left > right; }
-  bool contains_b (Interval_t<T> const&) const;
-  Interval_t() {
-    set_empty();
+  void add_point (T p) {
+    elem(LEFT) = elem (LEFT) <? p;
+    elem(RIGHT) = elem (RIGHT) >? p;
   }
-  Interval_t (T m, T M) {
-    left =m;
-    right = M;
+  T length () const;
+  T delta () const;
+  void set_empty () ;
+  void set_full ();
+
+  /*
+    TODO: strip hungarian suffix.
+   */
+  bool is_empty () const { return elem (LEFT) > elem (RIGHT); }
+  bool contains_b (Interval_t<T> const&) const;
+  Interval_t () {
+    set_empty ();
   }
+  Interval_t (T m, T M) : Drul_array<T> (m,M)
+    {
+    }
   Interval_t<T> &operator -= (T r) {
     *this += -r;
     return *this;
   }
 
   Interval_t<T> &operator += (T r) {
-    left += r;
-    right +=r;
+    elem (LEFT) += r;
+    elem (RIGHT) +=r;
     return *this;
   }
-  Interval_t<T> &operator *=(T r) {
-    left *= r;
-    right *= r;
-    if (r < T(0)) {
-      T t = left;
-      left = right;
-      right = t;
-    }
+  Interval_t<T> &operator *= (T r) {
+    if (!is_empty ())
+      {
+       elem (LEFT) *= r;
+       elem (RIGHT) *= r;
+       if (r < T (0))
+         swap();
+
+      }
     return *this;
   }
-  String str() const;    
-  void print () const;
-  bool elem_b (T r);
+
+  Real linear_combination (Real x) const {
+    Drul_array<Real> da (elem (LEFT),
+                        elem (RIGHT));
+    return ::linear_combination (da, x);
+  }
+  String to_string () const;    
+
+  bool contains (T r);
   void negate () {
-    T r = -left;
-    T l = -right;
-    left = l;
-    right =r;
+    T r = -elem (LEFT);
+    T l = -elem (RIGHT);
+    elem (LEFT) = l;
+    elem (RIGHT) =r;
+  }
+  
+  void swap ()
+  {
+    T t = elem (LEFT);
+    elem (LEFT) = elem (RIGHT);
+    elem (RIGHT) = t;
   }
 };
 
 
 /**
-  inclusion ordering. Crash if not comparable.
+  inclusion ordering. Crash if not  comparable.
   */
 template<class T>
 int Interval__compare (const Interval_t<T>&,Interval_t<T> const&);
 
+/**
+   Inclusion ordering.  return -2 if not comparable
+ */
+template<class T>
+int
+_Interval__compare (const Interval_t<T>&a,Interval_t<T> const&b);
+
+
 /*
   INLINE
  */
 
 #include "compare.hh"
 
-TEMPLATE_INSTANTIATE_COMPARE(Interval_t<T>&, Interval__compare, template<class T>);
+TEMPLATE_INSTANTIATE_COMPARE (Interval_t<T>&, Interval__compare, template<class T>);
 
 
 template<class T>
@@ -136,7 +145,7 @@ intersection (Interval_t<T> a, Interval_t<T> const&b)
 
 template<class T>
 inline
-Interval_t<T> operator +(T a,Interval_t<T> i)
+Interval_t<T> operator + (T a,Interval_t<T> i)
 {
   i += a;
   return i;
@@ -161,13 +170,13 @@ Interval_t<T> operator - (T a,Interval_t<T> i)
 
 template<class T>
 inline
-Interval_t<T> operator +(Interval_t<T> i,T a){
+Interval_t<T> operator + (Interval_t<T> i,T a){
   return a+i;
 }
 
 template<class T>
 inline
-Interval_t<T> operator *(T a,Interval_t<T> i)
+Interval_t<T> operator * (T a,Interval_t<T> i)
 {
   i *= a;
   return i;
@@ -175,13 +184,13 @@ Interval_t<T> operator *(T a,Interval_t<T> i)
 
 template<class T>
 inline
-Interval_t<T> operator *(Interval_t<T> i,T a){
+Interval_t<T> operator * (Interval_t<T> i,T a){
   return a*i;
 }
 
-// again? see fproto.hh
+// again? see flower-proto.hh
 typedef Interval_t<Real> Interval;
-typedef Interval_t<int> Slice;
+typedef Interval_t<int> Slice; // weird name
 
 
 #endif // INTERVAL_HH