flower/vector.cc

   1 #include "vector.hh"
   2 #include "string.hh"
   3
   4 Vector::Vector(const Vector&n)
   5           :dat(n.dat)
   6 {
   7 }
   8
   9 Vector
  10 Vector::operator-() const
  11 {
  12     Vector v(*this); v*=-1; return v;
  13 }
  14
  15 void
  16 Vector::set_unit(int j)
  17 {
  18     fill(0.0);
  19     dat[j] = 1.0;
  20 }