fvar_a27.cpp

Go to the documentation of this file.

/*
 * $Id$
 *
 * Author: David Fournier
 * Copyright (c) 2008-2012 Regents of the University of California
 */
#include "fvar.hpp"
#if defined(__TURBOC__)
  #pragma hdrstop
  #include <alloc.h>
#endif

#include <stdlib.h>

 dvar_vector& dvar_vector::operator=(const dvector& t)
 {
   if (indexmin() != t.indexmin() || indexmax() != t.indexmax())
   {
     cerr << " Incompatible bounds in "
     "dvar_vector& dvar_vector::operator = (const dvector& t)\n";
     ad_exit(21);
   }

   for ( int i=indexmin(); i<=indexmax(); i++)
   {
     va[i].x=t[i];
   }

   grad_stack* GRAD_STACK1 = gradient_structure::GRAD_STACK1;
   DF_FILE* fp = gradient_structure::fp;
   save_identifier_string("b");
   fp->save_dvar_vector_position(*this);
   save_identifier_string("a");
   GRAD_STACK1->set_gradient_stack(dv_init);

   return *this;
 }