src/snark/quad_nextr.cpp

   1 /*
   2  ***********************************************************
   3  $SNARK_Header: S N A R K  1 4 - A PICTURE RECONSTRUCTION PROGRAM $
   4  $HeadURL: svn://dig.cs.gc.cuny.edu/snark/trunk/src/snark/quad_nextr.cpp $
   5  $LastChangedRevision: 89 $
   6  $Date: 2014-07-02 17:24:53 -0400 (Wed, 02 Jul 2014) $
   7  $Author: agulati $
   8  ***********************************************************
   9
  10  FOR AOPT 2 AND 4 NEXT R IS COMPUTED
  11  COMPUTE THE NEXT GRADIENT BY THE INDIRECT METHOD
  12  USED BY QUADRATIC OPTIMIZATION ALGORITHM.
  13  */
  14
  15 #include <cstdio>
  16
  17 #include "blkdta.h"
  18
  19 #include "quad.h"
  20
  21 void quad_class::nextr(REAL* r, REAL* v, REAL delta, INTEGER area)
  22 {
  23         INTEGER i;
  24
  25         for (i = 0; i < area; i++)
  26         {
  27                 r[i] -= delta * v[i];
  28         }
  29
  30         return;
  31 }