Lines Matching refs:i2
863 PetscInt i, j, k, i2, bs, bs2, nz; in MatSOR_SeqKAIJ() local
898 i2 = bs; in MatSOR_SeqKAIJ()
910 PetscKernel_w_gets_w_minus_Ar_times_v(bs, bs, w, T, &t[i2]); in MatSOR_SeqKAIJ()
911 for (k = 0; k < bs; k++) t[i2 + k] += b[i2 + k]; in MatSOR_SeqKAIJ()
913 PetscCall(PetscArraycpy(t + i2, b + i2, bs)); in MatSOR_SeqKAIJ()
915 for (k = 0; k < bs; k++) t[i2 + k] -= v[j] * x[vi[j] * bs + k]; in MatSOR_SeqKAIJ()
918 PetscCall(PetscArraycpy(t + i2, b + i2, bs)); in MatSOR_SeqKAIJ()
921 PetscKernel_w_gets_Ar_times_v(bs, bs, t + i2, idiag, y); in MatSOR_SeqKAIJ()
922 for (j = 0; j < bs; j++) x[i2 + j] = omega * y[j]; in MatSOR_SeqKAIJ()
925 i2 += bs; in MatSOR_SeqKAIJ()
933 i2 = bs * (m - 1); in MatSOR_SeqKAIJ()
934 PetscCall(PetscArraycpy(w, xb + i2, bs)); in MatSOR_SeqKAIJ()
935 PetscKernel_w_gets_Ar_times_v(bs, bs, w, idiag, x + i2); in MatSOR_SeqKAIJ()
936 i2 -= bs; in MatSOR_SeqKAIJ()
944 PetscCall(PetscArraycpy(w, xb + i2, bs)); in MatSOR_SeqKAIJ()
959 PetscCall(PetscArraycpy(w, t + i2, bs)); in MatSOR_SeqKAIJ()
966 for (j = 0; j < bs; j++) x[i2 + j] = (1.0 - omega) * x[i2 + j] + omega * y[j]; in MatSOR_SeqKAIJ()
969 i2 -= bs; in MatSOR_SeqKAIJ()
977 i2 = 0; in MatSOR_SeqKAIJ()
980 PetscCall(PetscArraycpy(w, b + i2, bs)); in MatSOR_SeqKAIJ()
1006 PetscCall(PetscArraycpy(t + i2, w, bs)); in MatSOR_SeqKAIJ()
1034 for (j = 0; j < bs; j++) *(x + i2 + j) = (1.0 - omega) * *(x + i2 + j) + omega * *(y + j); in MatSOR_SeqKAIJ()
1037 i2 += bs; in MatSOR_SeqKAIJ()
1043 i2 = bs * (m - 1); in MatSOR_SeqKAIJ()
1046 PetscCall(PetscArraycpy(w, b + i2, bs)); in MatSOR_SeqKAIJ()
1099 for (j = 0; j < bs; j++) *(x + i2 + j) = (1.0 - omega) * *(x + i2 + j) + omega * *(y + j); in MatSOR_SeqKAIJ()
1103 PetscCall(PetscArraycpy(w, xb + i2, bs)); in MatSOR_SeqKAIJ()
1129 for (j = 0; j < bs; j++) *(x + i2 + j) = (1.0 - omega) * *(x + i2 + j) + omega * *(y + j); in MatSOR_SeqKAIJ()