source:
issm/oecreview/Archive/12321-12677/ISSM-12577-12578.diff
Last change on this file was 12679, checked in by , 13 years ago | |
---|---|
File size: 970 bytes |
-
u/astrid-r1b/morlighe/issmuci/trunk-jpl/../trunk-jpl/src/c/modules/Solverx/SolverxGsl.cpp
42 42 gsl_vector_view b; 43 43 gsl_vector *x = NULL; 44 44 gsl_permutation *p = NULL; 45 45 #ifdef _HAVE_ADOLC_ 46 // if we use Adol-C then the IssmDouble will be an adouble 47 // and the calls to gsl_... will not work 48 // and we should call a suitable wrapped solve instead 49 _error2_("SolverxGsl: should not be here with Adol-C"); 50 #else 46 51 /*A will be modified by LU decomposition. Use copy*/ 47 52 IssmDouble* Acopy = xNew<IssmDouble>(n*n); 48 53 xMemCpy<IssmDouble>(Acopy,A,n*n); … … 69 74 gsl_permutation_free(p); 70 75 gsl_vector_free(x); 71 76 *pX=X; 77 #endif 72 78 }/*}}}*/
Note:
See TracBrowser
for help on using the repository browser.