++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++ */
| 347 | |
| 348 | /* ++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++ */ |
| 349 | int snoptProblemA::solve(int starttype, int neF, int n, double ObjAdd, |
| 350 | int ObjRow, snFunA usrfunA, |
| 351 | double *xlow, double *xupp, double *Flow, double *Fupp, |
| 352 | double *x, int *xstate, double *xmul, |
| 353 | double *F, int *Fstate, double *Fmul, |
| 354 | int &nS, int &nInf, double &sInf) { |
| 355 | assert(initCalled == 1); |
| 356 | |
| 357 | int inform, miniw, minrw, neA, neG, snObjRow; |
| 358 | int *iAfun, *jAvar, *iGfun, *jGvar; |
| 359 | double *A; |
| 360 | |
| 361 | iAfun = new int[n*neF]; |
| 362 | jAvar = new int[n*neF]; |
| 363 | A = new double[n*neF]; |
| 364 | |
| 365 | iGfun = new int[n*neF]; |
| 366 | jGvar = new int[n*neF]; |
| 367 | |
| 368 | // computeJac will check for memCalled. |
| 369 | computeJac(neF, n, usrfunA, x, xlow, xupp, |
| 370 | iAfun, jAvar, A, neA, |
| 371 | iGfun, jGvar, neG); |
| 372 | |
| 373 | snObjRow = ObjRow+1; |
| 374 | |
| 375 | f_snkera(starttype, Prob, neF, n, ObjAdd, snObjRow, usrfunA, |
| 376 | snLog, snLog2, sqLog, snSTOP, |
| 377 | iAfun, jAvar, neA, A, iGfun, jGvar, neG, |
| 378 | xlow, xupp, Flow, Fupp, |
| 379 | x, xstate, xmul, F, Fstate, Fmul, |
| 380 | &inform, &nS, &nInf, &sInf, |
| 381 | &miniw, &minrw, |
| 382 | iu, leniu, ru, lenru, |
| 383 | iw, leniw, rw, lenrw); |
| 384 | |
| 385 | delete []iAfun; |
| 386 | delete []jAvar; |
| 387 | delete []A; |
| 388 | |
| 389 | delete []iGfun; |
| 390 | delete []jGvar; |
| 391 | |
| 392 | return inform; |
| 393 | } |
| 394 | |
| 395 | /* ++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++ */ |
| 396 | int snoptProblemA::solve(int starttype, int neF, int n, double ObjAdd, |
no test coverage detected