Statistics
| Revision:

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

History | View | Annotate | Download (709 Bytes)

1
/*
2
 * $Id: f3arr18.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
#include "fvar.hpp"
12
#ifndef OPT_LIB
13

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