| /petsc/src/mat/tests/ |
| H A D | ex205.c | 52 Mat S1, S2; in main() local
79 PetscCall(MatCreateShell(PETSC_COMM_WORLD, 2, 2, 2, 2, NULL, &S2)); in main()
80 PetscCall(MatSetUp(S2)); in main()
81 PetscCall(MatShellSetOperation(S2, MATOP_MULT, (PetscErrorCodeFn *)MatMult_User)); in main()
82 PetscCall(MatShellSetOperation(S2, MATOP_COPY, (PetscErrorCodeFn *)MatCopy_User)); in main()
83 PetscCall(MatShellSetOperation(S2, MATOP_DESTROY, (PetscErrorCodeFn *)MatDestroy_User)); in main()
88 PetscCall(MatCopy(S1, S2, SAME_NONZERO_PATTERN)); in main()
91 PetscCall(MatMult(S2, X, Y)); in main()
95 PetscCall(MatDestroy(&S2)); in main()
|
| H A D | ex221.c | 330 Mat A2, S2; in main() local
333 PetscCall(MatDuplicate(S, MAT_COPY_VALUES, &S2)); in main()
337 S = S2; in main()
|
| /petsc/src/ksp/ksp/impls/bcgs/fbcgs/ |
| H A D | fbcgs.c | 19 Vec X, B, V, P, R, RP, T, S, P2, S2; in KSPSolve_FBCGS() local
34 S2 = ksp->work[6]; in KSPSolve_FBCGS()
48 PetscCall(KSP_MatMult(ksp, mat, X, S2)); in KSPSolve_FBCGS()
50 PetscCall(VecAXPY(R, -1.0, S2)); in KSPSolve_FBCGS()
94 PetscCall(KSP_PCApply(ksp, S, S2)); /* s2 <- K s */ in KSPSolve_FBCGS()
95 PetscCall(KSP_MatMult(ksp, mat, S2, T)); /* t <- A s2 */ in KSPSolve_FBCGS()
118 PetscCall(VecAXPBYPCZ(X, alpha, omega, 1.0, P2, S2)); /* x <- alpha * p2 + omega * s2 + x */ in KSPSolve_FBCGS()
|
| /petsc/src/ksp/ksp/impls/bcgs/pipebcgs/ |
| H A D | pipebcgs.c | 19 Vec X, B, S, R, RP, Y, Q, P2, Q2, R2, S2, W, Z, W2, Z2, T, V; in KSPSolve_PIPEBCGS() local
35 S2 = ksp->work[8]; in KSPSolve_PIPEBCGS()
96 PetscCall(VecCopy(W2, S2)); /* s2 <- w2 */ in KSPSolve_PIPEBCGS()
99 …PetscCall(VecAXPBYPCZ(P2, 1.0, -beta * omega, beta, R2, S2)); /* p2 <- beta * p2 + r2 - beta * ome… in KSPSolve_PIPEBCGS()
101 …PetscCall(VecAXPBYPCZ(S2, 1.0, -beta * omega, beta, W2, Z2)); /* s2 <- beta * s2 + w2 - beta * ome… in KSPSolve_PIPEBCGS()
105 PetscCall(VecWAXPY(Q2, -alpha, S2, R2)); /* q2 <- r2 - alpha s2 */ in KSPSolve_PIPEBCGS()
177 PetscCall(KSP_PCApply(ksp, S, S2)); /* s2 <- K s */ in KSPSolve_PIPEBCGS()
178 PetscCall(KSP_MatMult(ksp, pc->mat, S2, Z)); /* z <- A s2 */ in KSPSolve_PIPEBCGS()
|
| /petsc/src/ksp/ksp/impls/bcgs/fbcgsr/ |
| H A D | fbcgsr.c | 23 Vec X, B, P, P2, RP, R, V, S, T, S2; in KSPSolve_FBCGSR() local
58 S2 = ksp->work[7]; in KSPSolve_FBCGSR()
59 PetscCall(VecGetArray(S2, (PetscScalar **)&s2)); in KSPSolve_FBCGSR()
60 PetscCall(VecRestoreArray(S2, NULL)); in KSPSolve_FBCGSR()
133 PetscCall(KSP_PCApply(ksp, S, S2)); /* s2 <- K s */ in KSPSolve_FBCGSR()
134 PetscCall(KSP_MatMult(ksp, mat, S2, T)); /* t <- A s2 */ in KSPSolve_FBCGSR()
175 PetscCall(VecAXPBYPCZ(X, alpha, omega, 1.0, P2, S2)); /* x <- alpha * p2 + omega * s2 + x */ in KSPSolve_FBCGSR()
|
| /petsc/src/ksp/ksp/impls/bcgs/qmrcgs/ |
| H A D | qmrcgs.c | 19 Vec X, B, R, P, PH, V, D2, X2, S, SH, T, D, S2, RP, AX, Z; in KSPSolve_QMRCGS() local
38 S2 = ksp->work[10]; in KSPSolve_QMRCGS()
56 PetscCall(KSP_MatMult(ksp, mat, X, S2)); in KSPSolve_QMRCGS()
58 PetscCall(VecAXPY(R, -1.0, S2)); in KSPSolve_QMRCGS()
|
| /petsc/src/binding/petsc4py/test/ |
| H A D | test_mat_aij.py | 321 (S2,) = self.A.createSubMatrices([rows], [cols])
322 self.assertTrue(S1.equal(S2))
323 S2.zeroEntries()
324 self.A.createSubMatrices([rows], [cols], [S2])
325 self.assertTrue(S1.equal(S2))
327 S2.destroy()
331 S1, S2 = self.A.createSubMatrices([rows, rows], [cols, cols])
332 self.assertTrue(S1.equal(S2))
334 S2.zeroEntries()
335 self.A.createSubMatrices([rows, rows], [cols, cols], [S1, S2])
[all …]
|
| /petsc/src/snes/impls/ms/ |
| H A D | ms.c | 242 …Vec S1 = X, S2 = snes->work[1], S3 = snes->work[2], Y = snes->work[0], S1copy = snes-… in SNESMSStep_3Sstar() local
245 PetscCall(VecZeroEntries(S2)); in SNESMSStep_3Sstar()
248 Vec Ss[] = {S1copy, S2, S3, Y}; in SNESMSStep_3Sstar()
251 PetscCall(VecAXPY(S2, delta[i], S1)); in SNESMSStep_3Sstar()
|
| /petsc/src/ksp/pc/impls/bddc/ |
| H A D | bddcschurs.c | 1134 Mat S2 = NULL, S3 = NULL; /* dbg */ in PCBDDCSubSchursSetUp() local
1149 PetscCall(MatDuplicate(S_all, MAT_DO_NOT_COPY_VALUES, &S2)); in PCBDDCSubSchursSetUp()
1151 PetscCall(MatDenseGetArray(S2, &S2_data)); in PCBDDCSubSchursSetUp()
1213 PetscCall(MatDenseRestoreArray(S2, &S2_data)); in PCBDDCSubSchursSetUp()
1240 PetscCall(PetscObjectSetName((PetscObject)S2, "S2P")); in PCBDDCSubSchursSetUp()
1241 PetscCall(MatView(S2, matl_dbg_viewer)); in PCBDDCSubSchursSetUp()
1248 PetscCall(MatDestroy(&S2)); in PCBDDCSubSchursSetUp()
|
| /petsc/src/mat/impls/baij/seq/ |
| H A D | baij.h | 707 …__m256d S0, S1, S2, S3, S4, S5, S6, S7, S8, B0, B1, B2, B6, B7, B8, A0, A1, A2, A3, A4, A5, A6, A… in PetscKernel_A_gets_A_times_B_9() local
713 S2 = _mm256_setzero_pd(); in PetscKernel_A_gets_A_times_B_9()
729 S2 = _mm256_fmadd_pd(A2, B0, S2); in PetscKernel_A_gets_A_times_B_9()
745 S2 = _mm256_fmadd_pd(A5, B6, S2); in PetscKernel_A_gets_A_times_B_9()
761 S2 = _mm256_fmadd_pd(A8, B0, S2); in PetscKernel_A_gets_A_times_B_9()
777 S2 = _mm256_fmadd_pd(A2, B6, S2); in PetscKernel_A_gets_A_times_B_9()
793 S2 = _mm256_fmadd_pd(A5, B0, S2); in PetscKernel_A_gets_A_times_B_9()
809 S2 = _mm256_fmadd_pd(A2, B6, S2); in PetscKernel_A_gets_A_times_B_9()
825 S2 = _mm256_fmadd_pd(A5, B0, S2); in PetscKernel_A_gets_A_times_B_9()
841 S2 = _mm256_fmadd_pd(A8, B6, S2); in PetscKernel_A_gets_A_times_B_9()
[all …]
|
| /petsc/share/petsc/datafiles/meshes/ |
| H A D | mesh-3d-box-innersphere_bin.msh | 11 …� m�ȿ+��������~��� x� ᧿�u����?,���x�ҝ(��1���������7���ο-����� =��_?����S2ϿGC�b*|�?.����5?�c?…
|