Statistics
| Revision:

root / trunk / src / linad99 / fvar_ma8.cpp @ 1921

History | View | Annotate | Download (713 Bytes)

1
/*
2
 * $Id: fvar_ma8.cpp 1921 2014-04-23 18:47:05Z johnoel $
3
 *
4
 * Author: David Fournier
5
 * Copyright (c) 2008-2012 Regents of the University of California
6
 */
7
/**
8
 * \file
9
 * Description not yet available.
10
 */
11
//#undef OPT_LIB
12
#include "fvar.hpp"
13

    
14
#if !defined(OPT_LIB)
15

    
16
/**
17
 * Description not yet available.
18
 * \param
19
 */
20
 dvar_vector& dvar_matrix::operator() (int i)
21
 {
22
     if (i<rowmin())
23
     {
24
       cerr << "matrix bound exceeded -- row index too low in "
25
       "dvar_matrix::operator()" << "value was" << i << endl;
26
       ad_exit(21);
27
     }
28
     if (i>rowmax())
29
     {
30
       cerr << "matrix bound exceeded -- row index too high in "
31
       "dvar_matrix::operator()" << "value was" << i << endl;
32
       ad_exit(22);
33
     }
34
   return m[i];
35
 }
36
#endif