Searched refs:j2a (Results 1 – 1 of 1) sorted by relevance
| /petsc/src/snes/interface/ |
| H A D | snesj.c | 50 Vec j1a, j2a, x2; in SNESComputeJacobianDefault() local
77 PetscCall(DMGetGlobalVector(snes->dm, &j2a)); in SNESComputeJacobianDefault()
83 j2a = snes->vwork[1]; in SNESComputeJacobianDefault()
130 PetscCall(SNESComputeMFFunction(snes, x2, j2a)); in SNESComputeJacobianDefault()
132 …PetscCall(SNESComputeFunction(snes, x2, j2a)); /* does not handle use of SNESSetFunctionDomainErro… in SNESComputeJacobianDefault()
134 PetscCall(VecAXPY(j2a, -1.0, j1a)); in SNESComputeJacobianDefault()
143 PetscCall(VecScale(j2a, wscale)); in SNESComputeJacobianDefault()
144 PetscCall(VecNorm(j2a, NORM_INFINITY, &amax)); in SNESComputeJacobianDefault()
146 PetscCall(VecGetArray(j2a, &y)); in SNESComputeJacobianDefault()
150 PetscCall(VecRestoreArray(j2a, &y)); in SNESComputeJacobianDefault()
[all …]
|