fvar_o10.cpp

Go to the documentation of this file.

/*
 * $Id$
 *
 * Author: David Fournier
 * Copyright (c) 2008-2012 Regents of the University of California
 */
// file: fvar_ops.cpp
// operators involving prevariables

#include "fvar.hpp"

#ifdef __TURBOC__
  #pragma hdrstop
  #include <iostream.h>
#endif

#ifdef __ZTC__
  #include <iostream.hpp>
#endif

#include <stdio.h>
#include <math.h>

#if defined(__BORLANDC__)
#  if (__BORLANDC__  >= 0x0540)

prevariable& prevariable::operator=(const double t) const
{
  (*v).x=t;
  gradient_structure::GRAD_STACK1->
    set_gradient_stack0(df_eq_pvdoub,&(v->x));
  return((prevariable&)(*this));
}

prevariable& prevariable::operator=(const prevariable& t) const
{
  (*v).x=(*t.v).x;
  gradient_structure::GRAD_STACK1->
    set_gradient_stack1(default_evaluation1,&(v->x),&(t.v->x));
  return((prevariable&)(*this));
}
#  endif
#endif

prevariable& prevariable::operator=(const prevariable& t)
{
  (*v).x = (*t.v).x;
  gradient_structure::GRAD_STACK1->
    set_gradient_stack1(default_evaluation1,&(v->x),&(t.v->x));

  return *this;
}

prevariable& prevariable::operator=(const double t)
{
  (*v).x = t;
  gradient_structure::GRAD_STACK1->
    set_gradient_stack0(default_evaluation0, &(v->x));
  return *this;
}