Lines Matching refs:Jpre

274 static PetscErrorCode TaoSNESJacobian_PDIPM(SNES snes, Vec X, Mat J, Mat Jpre, PetscCtx ctx)  in TaoSNESJacobian_PDIPM()  argument
285 PetscCall(MatGetOwnershipRanges(Jpre, &Jranges)); in TaoSNESJacobian_PDIPM()
286 PetscCall(MatGetOwnershipRange(Jpre, &Jrstart, NULL)); in TaoSNESJacobian_PDIPM()
300 PetscCall(MatSetValues(Jpre, 1, &row, 2, cols, vals, INSERT_VALUES)); in TaoSNESJacobian_PDIPM()
309 PetscCall(MatSetValues(Jpre, 1, &row, 2, cols, vals, INSERT_VALUES)); in TaoSNESJacobian_PDIPM()
324 PetscCall(MatSetValue(Jpre, row, cols[0], aa[j], INSERT_VALUES)); in TaoSNESJacobian_PDIPM()
329 PetscCall(MatSetValue(Jpre, row, row, -pdipm->deltac, INSERT_VALUES)); in TaoSNESJacobian_PDIPM()
344 PetscCall(MatSetValue(Jpre, row, cols[0], -aa[j], INSERT_VALUES)); in TaoSNESJacobian_PDIPM()
349 PetscCall(MatSetValue(Jpre, row, row, -pdipm->deltac, INSERT_VALUES)); in TaoSNESJacobian_PDIPM()
378 PetscCall(MatSetValue(Jpre, row, cols[0], aa[j] + pdipm->deltaw, INSERT_VALUES)); in TaoSNESJacobian_PDIPM()
380 PetscCall(MatSetValue(Jpre, row, cols[0], aa[j], INSERT_VALUES)); in TaoSNESJacobian_PDIPM()
395 PetscCall(MatSetValue(Jpre, row, cols[0], aa[j], INSERT_VALUES)); in TaoSNESJacobian_PDIPM()
410 PetscCall(MatSetValue(Jpre, row, cols[0], -aa[j], INSERT_VALUES)); in TaoSNESJacobian_PDIPM()
418 PetscCall(MatAssemblyBegin(Jpre, MAT_FINAL_ASSEMBLY)); in TaoSNESJacobian_PDIPM()
419 PetscCall(MatAssemblyEnd(Jpre, MAT_FINAL_ASSEMBLY)); in TaoSNESJacobian_PDIPM()
421 if (J != Jpre) { in TaoSNESJacobian_PDIPM()