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 }