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 }