Statistics
| Revision:

## root / trunk / src / linad99 / dvect18.cpp @ 1609

1 2 3 417 arnima ```/* ``` ``` * \$Id\$ ``` ``` * ``` ``` * Author: David Fournier ``` 1112 johnoel ``` * Copyright (c) 2008-2012 Regents of the University of California ``` 417 arnima ``` */ ``` ```/** ``` ``` * \file ``` ``` * Description not yet available. ``` ``` */ ``` ```// file fvar_fn.cpp ``` ```// math.h functions involving prevariables ``` ```#include "fvar.hpp" ``` ```#ifdef __TURBOC__ ``` ``` #pragma hdrstop ``` ``` #include ``` ``` #include ``` ```#endif ``` ```#ifdef __ZTC__ ``` ``` #include ``` ``` #include ``` ```#endif ``` ```#include ``` ```#include ``` ```/** ``` 1609 stevenmartell ``` * Determine if the lower and upper bounds of two evctors match in a specified function. ``` ``` * \param v1 a data vector ``` ``` * \param v2 a data vector ``` ``` * \param function_nam a pointer to the name of the function in question. ``` 417 arnima ``` */ ``` 441 johnoel ```void shape_check(const dvector& v1, const dvector& v2, const char *function_name) ``` 1112 johnoel ```{ ``` ``` if (v1.indexmin() != v2.indexmin() || v1.indexmax() != v2.indexmax()) ``` ``` { ``` ``` cerr << " Vector sizes do no match in" << function_name << "\n"; ``` ``` ad_exit(1); ``` ``` } ``` `}`