Searched refs:xwork (Results 1 – 7 of 7) sorted by relevance
| /petsc/src/ksp/pc/impls/lmvm/ |
| H A D | lmvmpc.c | 10 Vec xwork, ywork; member 190 if (!ctx->xwork) PetscCall(MatCreateVecs(B, &ctx->xwork, &ctx->ywork)); in PCApply_LMVM() 191 PetscCall(VecZeroEntries(ctx->xwork)); in PCApply_LMVM() 192 PetscCall(VecGetSubVector(ctx->xwork, ctx->inactive, &xsub)); in PCApply_LMVM() 194 PetscCall(VecRestoreSubVector(ctx->xwork, ctx->inactive, &xsub)); in PCApply_LMVM() 195 Bx = ctx->xwork; in PCApply_LMVM() 212 PetscCall(VecDestroy(&ctx->xwork)); in PCReset_LMVM() 290 PetscCall(VecDestroy(&ctx->xwork)); in PCDestroy_LMVM()
|
| /petsc/src/vec/vec/tutorials/ |
| H A D | ex4f.F90 | 16 PetscScalar xwork(6) 37 xwork(i) = 10.0*real(i) 45 PetscCallA(VecSetValues(x, isix, loc, xwork, INSERT_VALUES, ierr))
|
| H A D | ex4f90.F90 | 18 PetscScalar, dimension(n) :: xwork 38 xwork(i) = 10.0*real(i) 46 PetscCallA(VecSetValues(x, n, loc, xwork, INSERT_VALUES, ierr))
|
| /petsc/src/mat/impls/aij/seq/crl/ |
| H A D | crl.h | 13 Vec xwork, fwork; member
|
| H A D | crl.c | 104 PetscCall(VecCopy(xx, aijcrl->xwork)); in MatMult_AIJCRL() 108 xx = aijcrl->xwork; in MatMult_AIJCRL()
|
| /petsc/src/mat/impls/aij/mpi/crl/ |
| H A D | mcrl.c | 25 PetscCall(VecDestroy(&aijcrl->xwork)); in MatDestroy_MPIAIJCRL() 76 PetscCall(VecDestroy(&aijcrl->xwork)); in MatMPIAIJCRL_create_aijcrl() 77 …ecCreateMPIWithArray(PetscObjectComm((PetscObject)A), 1, nd, PETSC_DECIDE, array, &aijcrl->xwork)); in MatMPIAIJCRL_create_aijcrl()
|
| /petsc/src/ksp/pc/impls/redistribute/ |
| H A D | redistribute.c | 337 PetscScalar *xwork; in PCApply_Redistribute() local 351 PetscCall(VecGetArray(x, &xwork)); in PCApply_Redistribute() 363 for (i = 0; i < dcnt; i++) xwork[drows[i]] = diag[i] * bwork[drows[i]]; in PCApply_Redistribute() 365 PetscCall(VecRestoreArray(red->work, &xwork)); in PCApply_Redistribute() 385 PetscScalar *xwork; in PCApplyTranspose_Redistribute() local 401 PetscCall(VecGetArray(x, &xwork)); in PCApplyTranspose_Redistribute() 413 for (i = 0; i < dcnt; i++) xwork[drows[i]] = diag[i] * bwork[drows[i]]; in PCApplyTranspose_Redistribute() 415 PetscCall(VecRestoreArray(red->work, &xwork)); in PCApplyTranspose_Redistribute()
|