| /petsc/src/mat/impls/baij/seq/ |
| H A D | baijsolvtrannat4.c | 7 PetscInt i, nz, idx, idt, oidx; in MatSolveTranspose_SeqBAIJ_4_NaturalOrdering_inplace() local
33 oidx = 4 * (*vi++); in MatSolveTranspose_SeqBAIJ_4_NaturalOrdering_inplace()
34 x[oidx] -= v[0] * s1 + v[1] * s2 + v[2] * s3 + v[3] * s4; in MatSolveTranspose_SeqBAIJ_4_NaturalOrdering_inplace()
35 x[oidx + 1] -= v[4] * s1 + v[5] * s2 + v[6] * s3 + v[7] * s4; in MatSolveTranspose_SeqBAIJ_4_NaturalOrdering_inplace()
36 x[oidx + 2] -= v[8] * s1 + v[9] * s2 + v[10] * s3 + v[11] * s4; in MatSolveTranspose_SeqBAIJ_4_NaturalOrdering_inplace()
37 x[oidx + 3] -= v[12] * s1 + v[13] * s2 + v[14] * s3 + v[15] * s4; in MatSolveTranspose_SeqBAIJ_4_NaturalOrdering_inplace()
74 PetscInt nz, idx, idt, j, i, oidx; in MatSolveTranspose_SeqBAIJ_4_NaturalOrdering() local
101 oidx = bs * vi[j]; in MatSolveTranspose_SeqBAIJ_4_NaturalOrdering()
102 x[oidx] -= v[0] * s1 + v[1] * s2 + v[2] * s3 + v[3] * s4; in MatSolveTranspose_SeqBAIJ_4_NaturalOrdering()
103 x[oidx + 1] -= v[4] * s1 + v[5] * s2 + v[6] * s3 + v[7] * s4; in MatSolveTranspose_SeqBAIJ_4_NaturalOrdering()
[all …]
|
| H A D | baijsolvtrannat5.c | 7 PetscInt i, nz, idx, idt, oidx; in MatSolveTranspose_SeqBAIJ_5_NaturalOrdering_inplace() local
35 oidx = 5 * (*vi++); in MatSolveTranspose_SeqBAIJ_5_NaturalOrdering_inplace()
36 x[oidx] -= v[0] * s1 + v[1] * s2 + v[2] * s3 + v[3] * s4 + v[4] * s5; in MatSolveTranspose_SeqBAIJ_5_NaturalOrdering_inplace()
37 x[oidx + 1] -= v[5] * s1 + v[6] * s2 + v[7] * s3 + v[8] * s4 + v[9] * s5; in MatSolveTranspose_SeqBAIJ_5_NaturalOrdering_inplace()
38 x[oidx + 2] -= v[10] * s1 + v[11] * s2 + v[12] * s3 + v[13] * s4 + v[14] * s5; in MatSolveTranspose_SeqBAIJ_5_NaturalOrdering_inplace()
39 x[oidx + 3] -= v[15] * s1 + v[16] * s2 + v[17] * s3 + v[18] * s4 + v[19] * s5; in MatSolveTranspose_SeqBAIJ_5_NaturalOrdering_inplace()
40 x[oidx + 4] -= v[20] * s1 + v[21] * s2 + v[22] * s3 + v[23] * s4 + v[24] * s5; in MatSolveTranspose_SeqBAIJ_5_NaturalOrdering_inplace()
80 PetscInt nz, idx, idt, j, i, oidx; in MatSolveTranspose_SeqBAIJ_5_NaturalOrdering() local
109 oidx = bs * vi[j]; in MatSolveTranspose_SeqBAIJ_5_NaturalOrdering()
110 x[oidx] -= v[0] * s1 + v[1] * s2 + v[2] * s3 + v[3] * s4 + v[4] * s5; in MatSolveTranspose_SeqBAIJ_5_NaturalOrdering()
[all …]
|
| H A D | baijsolvtrannat3.c | 7 PetscInt i, nz, idx, idt, oidx; in MatSolveTranspose_SeqBAIJ_3_NaturalOrdering_inplace() local
31 oidx = 3 * (*vi++); in MatSolveTranspose_SeqBAIJ_3_NaturalOrdering_inplace()
32 x[oidx] -= v[0] * s1 + v[1] * s2 + v[2] * s3; in MatSolveTranspose_SeqBAIJ_3_NaturalOrdering_inplace()
33 x[oidx + 1] -= v[3] * s1 + v[4] * s2 + v[5] * s3; in MatSolveTranspose_SeqBAIJ_3_NaturalOrdering_inplace()
34 x[oidx + 2] -= v[6] * s1 + v[7] * s2 + v[8] * s3; in MatSolveTranspose_SeqBAIJ_3_NaturalOrdering_inplace()
68 PetscInt nz, idx, idt, j, i, oidx; in MatSolveTranspose_SeqBAIJ_3_NaturalOrdering() local
93 oidx = bs * vi[j]; in MatSolveTranspose_SeqBAIJ_3_NaturalOrdering()
94 x[oidx] -= v[0] * s1 + v[1] * s2 + v[2] * s3; in MatSolveTranspose_SeqBAIJ_3_NaturalOrdering()
95 x[oidx + 1] -= v[3] * s1 + v[4] * s2 + v[5] * s3; in MatSolveTranspose_SeqBAIJ_3_NaturalOrdering()
96 x[oidx + 2] -= v[6] * s1 + v[7] * s2 + v[8] * s3; in MatSolveTranspose_SeqBAIJ_3_NaturalOrdering()
|
| H A D | baijsolvtrannat6.c | 7 PetscInt i, nz, idx, idt, oidx; in MatSolveTranspose_SeqBAIJ_6_NaturalOrdering_inplace() local
37 oidx = 6 * (*vi++); in MatSolveTranspose_SeqBAIJ_6_NaturalOrdering_inplace()
38 x[oidx] -= v[0] * s1 + v[1] * s2 + v[2] * s3 + v[3] * s4 + v[4] * s5 + v[5] * s6; in MatSolveTranspose_SeqBAIJ_6_NaturalOrdering_inplace()
39 x[oidx + 1] -= v[6] * s1 + v[7] * s2 + v[8] * s3 + v[9] * s4 + v[10] * s5 + v[11] * s6; in MatSolveTranspose_SeqBAIJ_6_NaturalOrdering_inplace()
40 x[oidx + 2] -= v[12] * s1 + v[13] * s2 + v[14] * s3 + v[15] * s4 + v[16] * s5 + v[17] * s6; in MatSolveTranspose_SeqBAIJ_6_NaturalOrdering_inplace()
41 x[oidx + 3] -= v[18] * s1 + v[19] * s2 + v[20] * s3 + v[21] * s4 + v[22] * s5 + v[23] * s6; in MatSolveTranspose_SeqBAIJ_6_NaturalOrdering_inplace()
42 x[oidx + 4] -= v[24] * s1 + v[25] * s2 + v[26] * s3 + v[27] * s4 + v[28] * s5 + v[29] * s6; in MatSolveTranspose_SeqBAIJ_6_NaturalOrdering_inplace()
43 x[oidx + 5] -= v[30] * s1 + v[31] * s2 + v[32] * s3 + v[33] * s4 + v[34] * s5 + v[35] * s6; in MatSolveTranspose_SeqBAIJ_6_NaturalOrdering_inplace()
86 PetscInt nz, idx, idt, j, i, oidx; in MatSolveTranspose_SeqBAIJ_6_NaturalOrdering() local
117 oidx = bs * vi[j]; in MatSolveTranspose_SeqBAIJ_6_NaturalOrdering()
[all …]
|
| H A D | baijsolvtrannat2.c | 6 PetscInt i, nz, idx, idt, oidx; in MatSolveTranspose_SeqBAIJ_2_NaturalOrdering_inplace() local
29 oidx = 2 * (*vi++); in MatSolveTranspose_SeqBAIJ_2_NaturalOrdering_inplace()
30 x[oidx] -= v[0] * s1 + v[1] * s2; in MatSolveTranspose_SeqBAIJ_2_NaturalOrdering_inplace()
31 x[oidx + 1] -= v[2] * s1 + v[3] * s2; in MatSolveTranspose_SeqBAIJ_2_NaturalOrdering_inplace()
62 PetscInt nz, idx, idt, j, i, oidx; in MatSolveTranspose_SeqBAIJ_2_NaturalOrdering() local
85 oidx = bs * vi[j]; in MatSolveTranspose_SeqBAIJ_2_NaturalOrdering()
86 x[oidx] -= v[0] * s1 + v[1] * s2; in MatSolveTranspose_SeqBAIJ_2_NaturalOrdering()
87 x[oidx + 1] -= v[2] * s1 + v[3] * s2; in MatSolveTranspose_SeqBAIJ_2_NaturalOrdering()
|
| H A D | baijsolvtrannat7.c | 7 PetscInt i, nz, idx, idt, oidx; in MatSolveTranspose_SeqBAIJ_7_NaturalOrdering_inplace() local
39 oidx = 7 * (*vi++); in MatSolveTranspose_SeqBAIJ_7_NaturalOrdering_inplace()
40 x[oidx] -= v[0] * s1 + v[1] * s2 + v[2] * s3 + v[3] * s4 + v[4] * s5 + v[5] * s6 + v[6] * s7; in MatSolveTranspose_SeqBAIJ_7_NaturalOrdering_inplace()
41 …x[oidx + 1] -= v[7] * s1 + v[8] * s2 + v[9] * s3 + v[10] * s4 + v[11] * s5 + v[12] * s6 + v[13] * … in MatSolveTranspose_SeqBAIJ_7_NaturalOrdering_inplace()
42 …x[oidx + 2] -= v[14] * s1 + v[15] * s2 + v[16] * s3 + v[17] * s4 + v[18] * s5 + v[19] * s6 + v[20]… in MatSolveTranspose_SeqBAIJ_7_NaturalOrdering_inplace()
43 …x[oidx + 3] -= v[21] * s1 + v[22] * s2 + v[23] * s3 + v[24] * s4 + v[25] * s5 + v[26] * s6 + v[27]… in MatSolveTranspose_SeqBAIJ_7_NaturalOrdering_inplace()
44 …x[oidx + 4] -= v[28] * s1 + v[29] * s2 + v[30] * s3 + v[31] * s4 + v[32] * s5 + v[33] * s6 + v[34]… in MatSolveTranspose_SeqBAIJ_7_NaturalOrdering_inplace()
45 …x[oidx + 5] -= v[35] * s1 + v[36] * s2 + v[37] * s3 + v[38] * s4 + v[39] * s5 + v[40] * s6 + v[41]… in MatSolveTranspose_SeqBAIJ_7_NaturalOrdering_inplace()
46 …x[oidx + 6] -= v[42] * s1 + v[43] * s2 + v[44] * s3 + v[45] * s4 + v[46] * s5 + v[47] * s6 + v[48]… in MatSolveTranspose_SeqBAIJ_7_NaturalOrdering_inplace()
91 PetscInt nz, idx, idt, j, i, oidx; in MatSolveTranspose_SeqBAIJ_7_NaturalOrdering() local
[all …]
|
| H A D | baijsolvtran5.c | 10 PetscInt i, nz, idx, idt, ii, ic, ir, oidx; in MatSolveTranspose_SeqBAIJ_5_inplace() local
57 oidx = 5 * (*vi++); in MatSolveTranspose_SeqBAIJ_5_inplace()
58 t[oidx] -= v[0] * s1 + v[1] * s2 + v[2] * s3 + v[3] * s4 + v[4] * s5; in MatSolveTranspose_SeqBAIJ_5_inplace()
59 t[oidx + 1] -= v[5] * s1 + v[6] * s2 + v[7] * s3 + v[8] * s4 + v[9] * s5; in MatSolveTranspose_SeqBAIJ_5_inplace()
60 t[oidx + 2] -= v[10] * s1 + v[11] * s2 + v[12] * s3 + v[13] * s4 + v[14] * s5; in MatSolveTranspose_SeqBAIJ_5_inplace()
61 t[oidx + 3] -= v[15] * s1 + v[16] * s2 + v[17] * s3 + v[18] * s4 + v[19] * s5; in MatSolveTranspose_SeqBAIJ_5_inplace()
62 t[oidx + 4] -= v[20] * s1 + v[21] * s2 + v[22] * s3 + v[23] * s4 + v[24] * s5; in MatSolveTranspose_SeqBAIJ_5_inplace()
120 PetscInt nz, idx, idt, j, i, oidx, ii, ic, ir; in MatSolveTranspose_SeqBAIJ_5() local
167 oidx = bs * vi[j]; in MatSolveTranspose_SeqBAIJ_5()
168 t[oidx] -= v[0] * s1 + v[1] * s2 + v[2] * s3 + v[3] * s4 + v[4] * s5; in MatSolveTranspose_SeqBAIJ_5()
[all …]
|
| H A D | baijsolvtran7.c | 10 PetscInt i, nz, idx, idt, ii, ic, ir, oidx; in MatSolveTranspose_SeqBAIJ_7_inplace() local
63 oidx = 7 * (*vi++); in MatSolveTranspose_SeqBAIJ_7_inplace()
64 t[oidx] -= v[0] * s1 + v[1] * s2 + v[2] * s3 + v[3] * s4 + v[4] * s5 + v[5] * s6 + v[6] * s7; in MatSolveTranspose_SeqBAIJ_7_inplace()
65 …t[oidx + 1] -= v[7] * s1 + v[8] * s2 + v[9] * s3 + v[10] * s4 + v[11] * s5 + v[12] * s6 + v[13] * … in MatSolveTranspose_SeqBAIJ_7_inplace()
66 …t[oidx + 2] -= v[14] * s1 + v[15] * s2 + v[16] * s3 + v[17] * s4 + v[18] * s5 + v[19] * s6 + v[20]… in MatSolveTranspose_SeqBAIJ_7_inplace()
67 …t[oidx + 3] -= v[21] * s1 + v[22] * s2 + v[23] * s3 + v[24] * s4 + v[25] * s5 + v[26] * s6 + v[27]… in MatSolveTranspose_SeqBAIJ_7_inplace()
68 …t[oidx + 4] -= v[28] * s1 + v[29] * s2 + v[30] * s3 + v[31] * s4 + v[32] * s5 + v[33] * s6 + v[34]… in MatSolveTranspose_SeqBAIJ_7_inplace()
69 …t[oidx + 5] -= v[35] * s1 + v[36] * s2 + v[37] * s3 + v[38] * s4 + v[39] * s5 + v[40] * s6 + v[41]… in MatSolveTranspose_SeqBAIJ_7_inplace()
70 …t[oidx + 6] -= v[42] * s1 + v[43] * s2 + v[44] * s3 + v[45] * s4 + v[46] * s5 + v[47] * s6 + v[48]… in MatSolveTranspose_SeqBAIJ_7_inplace()
135 PetscInt nz, idx, idt, j, i, oidx, ii, ic, ir; in MatSolveTranspose_SeqBAIJ_7() local
[all …]
|
| H A D | baijsolvtran4.c | 10 PetscInt i, nz, idx, idt, ii, ic, ir, oidx; in MatSolveTranspose_SeqBAIJ_4_inplace() local
54 oidx = 4 * (*vi++); in MatSolveTranspose_SeqBAIJ_4_inplace()
55 t[oidx] -= v[0] * s1 + v[1] * s2 + v[2] * s3 + v[3] * s4; in MatSolveTranspose_SeqBAIJ_4_inplace()
56 t[oidx + 1] -= v[4] * s1 + v[5] * s2 + v[6] * s3 + v[7] * s4; in MatSolveTranspose_SeqBAIJ_4_inplace()
57 t[oidx + 2] -= v[8] * s1 + v[9] * s2 + v[10] * s3 + v[11] * s4; in MatSolveTranspose_SeqBAIJ_4_inplace()
58 t[oidx + 3] -= v[12] * s1 + v[13] * s2 + v[14] * s3 + v[15] * s4; in MatSolveTranspose_SeqBAIJ_4_inplace()
112 PetscInt nz, idx, idt, j, i, oidx, ii, ic, ir; in MatSolveTranspose_SeqBAIJ_4() local
156 oidx = bs * vi[j]; in MatSolveTranspose_SeqBAIJ_4()
157 t[oidx] -= v[0] * s1 + v[1] * s2 + v[2] * s3 + v[3] * s4; in MatSolveTranspose_SeqBAIJ_4()
158 t[oidx + 1] -= v[4] * s1 + v[5] * s2 + v[6] * s3 + v[7] * s4; in MatSolveTranspose_SeqBAIJ_4()
[all …]
|
| H A D | baijsolvtran6.c | 10 PetscInt i, nz, idx, idt, ii, ic, ir, oidx; in MatSolveTranspose_SeqBAIJ_6_inplace() local
60 oidx = 6 * (*vi++); in MatSolveTranspose_SeqBAIJ_6_inplace()
61 t[oidx] -= v[0] * s1 + v[1] * s2 + v[2] * s3 + v[3] * s4 + v[4] * s5 + v[5] * s6; in MatSolveTranspose_SeqBAIJ_6_inplace()
62 t[oidx + 1] -= v[6] * s1 + v[7] * s2 + v[8] * s3 + v[9] * s4 + v[10] * s5 + v[11] * s6; in MatSolveTranspose_SeqBAIJ_6_inplace()
63 t[oidx + 2] -= v[12] * s1 + v[13] * s2 + v[14] * s3 + v[15] * s4 + v[16] * s5 + v[17] * s6; in MatSolveTranspose_SeqBAIJ_6_inplace()
64 t[oidx + 3] -= v[18] * s1 + v[19] * s2 + v[20] * s3 + v[21] * s4 + v[22] * s5 + v[23] * s6; in MatSolveTranspose_SeqBAIJ_6_inplace()
65 t[oidx + 4] -= v[24] * s1 + v[25] * s2 + v[26] * s3 + v[27] * s4 + v[28] * s5 + v[29] * s6; in MatSolveTranspose_SeqBAIJ_6_inplace()
66 t[oidx + 5] -= v[30] * s1 + v[31] * s2 + v[32] * s3 + v[33] * s4 + v[34] * s5 + v[35] * s6; in MatSolveTranspose_SeqBAIJ_6_inplace()
128 PetscInt nz, idx, idt, j, i, oidx, ii, ic, ir; in MatSolveTranspose_SeqBAIJ_6() local
178 oidx = bs * vi[j]; in MatSolveTranspose_SeqBAIJ_6()
[all …]
|
| H A D | baijsolvtran3.c | 10 PetscInt i, nz, idx, idt, ii, ic, ir, oidx; in MatSolveTranspose_SeqBAIJ_3_inplace() local
51 oidx = 3 * (*vi++); in MatSolveTranspose_SeqBAIJ_3_inplace()
52 t[oidx] -= v[0] * s1 + v[1] * s2 + v[2] * s3; in MatSolveTranspose_SeqBAIJ_3_inplace()
53 t[oidx + 1] -= v[3] * s1 + v[4] * s2 + v[5] * s3; in MatSolveTranspose_SeqBAIJ_3_inplace()
54 t[oidx + 2] -= v[6] * s1 + v[7] * s2 + v[8] * s3; in MatSolveTranspose_SeqBAIJ_3_inplace()
104 PetscInt nz, idx, idt, j, i, oidx, ii, ic, ir; in MatSolveTranspose_SeqBAIJ_3() local
145 oidx = bs * vi[j]; in MatSolveTranspose_SeqBAIJ_3()
146 t[oidx] -= v[0] * s1 + v[1] * s2 + v[2] * s3; in MatSolveTranspose_SeqBAIJ_3()
147 t[oidx + 1] -= v[3] * s1 + v[4] * s2 + v[5] * s3; in MatSolveTranspose_SeqBAIJ_3()
148 t[oidx + 2] -= v[6] * s1 + v[7] * s2 + v[8] * s3; in MatSolveTranspose_SeqBAIJ_3()
|
| H A D | baijsolvtran2.c | 10 PetscInt i, nz, idx, idt, ii, ic, ir, oidx; in MatSolveTranspose_SeqBAIJ_2_inplace() local
48 oidx = 2 * (*vi++); in MatSolveTranspose_SeqBAIJ_2_inplace()
49 t[oidx] -= v[0] * s1 + v[1] * s2; in MatSolveTranspose_SeqBAIJ_2_inplace()
50 t[oidx + 1] -= v[2] * s1 + v[3] * s2; in MatSolveTranspose_SeqBAIJ_2_inplace()
96 PetscInt nz, idx, idt, j, i, oidx, ii, ic, ir; in MatSolveTranspose_SeqBAIJ_2() local
134 oidx = bs * vi[j]; in MatSolveTranspose_SeqBAIJ_2()
135 t[oidx] -= v[0] * s1 + v[1] * s2; in MatSolveTranspose_SeqBAIJ_2()
136 t[oidx + 1] -= v[2] * s1 + v[3] * s2; in MatSolveTranspose_SeqBAIJ_2()
|
| /petsc/src/binding/petsc4py/src/petsc4py/PETSc/ |
| H A D | IS.pyx | 1499 cdef PetscInt noidx = 0, *oidx = NULL
1502 result = oarray_i(result, &noidx, &oidx)
1505 self.lgm, niidx, iidx, oidx))
1536 cdef PetscInt noidx = 0, *oidx = NULL
1539 result = oarray_i(result, &noidx, &oidx)
1542 self.lgm, niidx, iidx, oidx))
|
| /petsc/src/mat/impls/htool/ |
| H A D | htool.cxx | 120 PetscInt *oidx, size, bs[2]; in MatIncreaseOverlap_Htool() local
150 PetscCall(PetscMalloc1(size, &oidx)); in MatIncreaseOverlap_Htool()
151 for (const PetscInt j : set) *oidx++ = j; in MatIncreaseOverlap_Htool()
152 oidx -= size; in MatIncreaseOverlap_Htool()
153 PetscCall(ISCreateGeneral(PETSC_COMM_SELF, size, oidx, PETSC_OWN_POINTER, is + i)); in MatIncreaseOverlap_Htool()
|
| /petsc/src/ksp/pc/impls/gasm/ |
| H A D | gasm.c | 312 PetscInt *oidx; /* Indices in the disjoint union of local outer subdomains. */ in PCSetUp_GASM() local
412 PetscCall(PetscMalloc1(on, &oidx)); in PCSetUp_GASM()
418 PetscCall(PetscArraycpy(oidx + on, oidxi, oni)); in PCSetUp_GASM()
422 PetscCall(ISCreateGeneral(((PetscObject)pc)->comm, on, oidx, PETSC_OWN_POINTER, &gois)); in PCSetUp_GASM()
|