flower/vector.cc

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