tao/snes/taosnes.c

10   Tao_SNES *taosnes = (Tao_SNES *)tao->data;
15   PetscCall(SNESSolve(taosnes->snes, NULL, tao->solution));
18   PetscCall(SNESGetIterationNumber(taosnes->snes, &its));
25   Tao_SNES *taosnes = (Tao_SNES *)tao->data;
28   PetscCall(SNESDestroy(&taosnes->snes));
76   Tao_SNES   *taosnes = (Tao_SNES *)tao->data;
82   PetscCall(SNESSetOptionsPrefix(taosnes->snes, prefix));
83   PetscCall(SNESSetSolution(taosnes->snes, tao->solution));
84   PetscCall(SNESSetObjective(taosnes->snes, TAOSNESObj, tao));
85   PetscCall(SNESSetFunction(taosnes->snes, NULL, TAOSNESFunc, tao));
86   PetscCall(SNESMonitorSet(taosnes->snes, TAOSNESMonitor, tao, NULL));
88   if (A) PetscCall(SNESSetJacobian(taosnes->snes, A, P, TAOSNESJac, tao));
89   if (taosnes->setfromoptionscalled) PetscCall(SNESSetFromOptions(taosnes->snes));
90   taosnes->setfromoptionscalled = PETSC_FALSE;
91   PetscCall(SNESSetUp(taosnes->snes));
97   Tao_SNES *taosnes = (Tao_SNES *)tao->data;
100   taosnes->setfromoptionscalled = PETSC_TRUE;
106   Tao_SNES *taosnes = (Tao_SNES *)tao->data;
109   PetscCall(SNESView(taosnes->snes, viewer));
122   Tao_SNES *taosnes;
133   PetscCall(PetscNew(&taosnes));
134   tao->data = (void *)taosnes;
135   PetscCall(SNESCreate(PetscObjectComm((PetscObject)tao), &taosnes->snes));
136   PetscCall(PetscObjectIncrementTabLevel((PetscObject)taosnes->snes, (PetscObject)tao, 1));