Searched refs:yy3 (Results 1 – 1 of 1) sorted by relevance
| /petsc/src/vec/vec/impls/seq/ |
| H A D | dvec2.c | 15 const PetscScalar *yy0, *yy1, *yy2, *yy3, *x; in VecMDot_Seq() local
63 PetscCall(VecGetArrayRead(yy[3], &yy3)); in VecMDot_Seq()
64 fortranmdot4_(x, yy0, yy1, yy2, yy3, &n, &sum0, &sum1, &sum2, &sum3); in VecMDot_Seq()
68 PetscCall(VecRestoreArrayRead(yy[3], &yy3)); in VecMDot_Seq()
88 const PetscScalar *yy0, *yy1, *yy2, *yy3, *x, *xbase; in VecMDot_Seq() local
234 PetscCall(VecGetArrayRead(yy[3], &yy3)); in VecMDot_Seq()
244 sum3 += x2 * PetscConj(yy3[2]); /* fall through */ in VecMDot_Seq()
250 sum3 += x1 * PetscConj(yy3[1]); /* fall through */ in VecMDot_Seq()
256 sum3 += x0 * PetscConj(yy3[0]); /* fall through */ in VecMDot_Seq()
262 yy3 += j_rem; in VecMDot_Seq()
[all …]
|