Lines Matching refs:al
43 SNES_NEWTONAL *al = (SNES_NEWTONAL *)snes->data; in SNESNewtonALCheckArcLength() local
47 arcLength = PetscSqrtReal(PetscSqr(arcLength) + al->psisq * lambdaStep * lambdaStep); in SNESNewtonALCheckArcLength()
66 SNES_NEWTONAL *al = (SNES_NEWTONAL *)snes->data; in SNESNewtonALSetCorrectionType_NEWTONAL() local
69 al->correction_type = ctype; in SNESNewtonALSetCorrectionType_NEWTONAL()
100 SNES_NEWTONAL *al = (SNES_NEWTONAL *)snes->data; in SNESNewtonALSetFunction_NEWTONAL() local
103 al->computealfunction = func; in SNESNewtonALSetFunction_NEWTONAL()
104 al->alctx = ctx; in SNESNewtonALSetFunction_NEWTONAL()
139 SNES_NEWTONAL *al = (SNES_NEWTONAL *)snes->data; in SNESNewtonALGetFunction_NEWTONAL() local
142 if (func) *func = al->computealfunction; in SNESNewtonALGetFunction_NEWTONAL()
143 if (ctx) *(void **)ctx = al->alctx; in SNESNewtonALGetFunction_NEWTONAL()
171 SNES_NEWTONAL *al; in SNESNewtonALGetLoadParameter_NEWTONAL() local
174 al = (SNES_NEWTONAL *)snes->data; in SNESNewtonALGetLoadParameter_NEWTONAL()
175 *lambda = al->lambda; in SNESNewtonALGetLoadParameter_NEWTONAL()
214 SNES_NEWTONAL *al; in SNESNewtonALComputeFunction_NEWTONAL() local
217 al = (SNES_NEWTONAL *)snes->data; in SNESNewtonALComputeFunction_NEWTONAL()
221 …PetscCheck(computealfunction || (snes->vec_rhs && al->scale_rhs), PETSC_COMM_SELF, PETSC_ERR_ARG_W… in SNESNewtonALComputeFunction_NEWTONAL()
227 if (al->scale_rhs && snes->vec_rhs) { in SNESNewtonALComputeFunction_NEWTONAL()
229 if (!al->vec_rhs_orig) PetscCall(VecDuplicate(snes->vec_rhs, &al->vec_rhs_orig)); in SNESNewtonALComputeFunction_NEWTONAL()
230 if (!al->copied_rhs) { in SNESNewtonALComputeFunction_NEWTONAL()
231 PetscCall(VecCopy(snes->vec_rhs, al->vec_rhs_orig)); in SNESNewtonALComputeFunction_NEWTONAL()
232 al->copied_rhs = PETSC_TRUE; in SNESNewtonALComputeFunction_NEWTONAL()
234 PetscCall(VecAXPBY(snes->vec_rhs, al->lambda, 0.0, al->vec_rhs_orig)); in SNESNewtonALComputeFunction_NEWTONAL()
235 PetscCall(VecAXPY(Q, 1, al->vec_rhs_orig)); in SNESNewtonALComputeFunction_NEWTONAL()
569 SNES_NEWTONAL *al = (SNES_NEWTONAL *)snes->data; in SNESReset_NEWTONAL() local
572 PetscCall(VecDestroy(&al->vec_rhs_orig)); in SNESReset_NEWTONAL()