| /petsc/src/vec/vec/tests/output/ |
| H A D | ex36_1.out | 2 0: idx[0] == 0; val[0] == 0.000000
3 0: idx[1] == 1; val[1] == 2.000000
4 0: idx[2] == -2; val[2] == 4.000000
6 1: idx[0] == 3; val[0] == 12.000000
7 1: idx[1] == -4; val[1] == 16.000000
8 1: idx[2] == 5; val[2] == 20.000000
10 0: idx[0] == 0
11 0: idx[1] == 1
12 0: idx[2] == -2
14 1: idx[0] == 3
[all …]
|
| /petsc/src/mat/tests/ |
| H A D | ex156.c | 7 PetscInt idx[4], i; in Assemble() local
16 idx[0] = 0; in Assemble()
17 idx[1] = 1; in Assemble()
18 idx[2] = 2; in Assemble()
19 idx[3] = 3; in Assemble()
20 PetscCall(MatSetValues(mat, 4, idx, 4, idx, vals, ADD_VALUES)); in Assemble()
22 idx[0] = 3; in Assemble()
23 idx[1] = 2; in Assemble()
24 idx[2] = 4; in Assemble()
25 idx[3] = 5; in Assemble()
[all …]
|
| /petsc/src/benchmarks/streams/ |
| H A D | CUDAVersion.cu | 44 size_t idx = threadIdx.x + blockIdx.x * blockDim.x; in set_array() local
45 while (idx < len) { in set_array()
46 a[idx] = value; in set_array()
47 idx += blockDim.x * gridDim.x; in set_array()
53 size_t idx = threadIdx.x + blockIdx.x * blockDim.x; in set_array_double() local
54 while (idx < len) { in set_array_double()
55 a[idx] = value; in set_array_double()
56 idx += blockDim.x * gridDim.x; in set_array_double()
62 size_t idx = threadIdx.x + blockIdx.x * blockDim.x; in STREAM_Copy() local
63 while (idx < len) { in STREAM_Copy()
[all …]
|
| /petsc/src/mat/impls/baij/seq/ |
| H A D | baijsolv.c | 69 PetscInt i, nz, idx, idt, idc; in MatSolve_SeqBAIJ_7_inplace() local
85 idx = 7 * (*r++); in MatSolve_SeqBAIJ_7_inplace()
86 t[0] = b[idx]; in MatSolve_SeqBAIJ_7_inplace()
87 t[1] = b[1 + idx]; in MatSolve_SeqBAIJ_7_inplace()
88 t[2] = b[2 + idx]; in MatSolve_SeqBAIJ_7_inplace()
89 t[3] = b[3 + idx]; in MatSolve_SeqBAIJ_7_inplace()
90 t[4] = b[4 + idx]; in MatSolve_SeqBAIJ_7_inplace()
91 t[5] = b[5 + idx]; in MatSolve_SeqBAIJ_7_inplace()
92 t[6] = b[6 + idx]; in MatSolve_SeqBAIJ_7_inplace()
98 idx = 7 * (*r++); in MatSolve_SeqBAIJ_7_inplace()
[all …]
|
| H A D | baijsolvnat5.c | 8 PetscInt i, nz, idx, idt, jdx; in MatSolve_SeqBAIJ_5_NaturalOrdering_inplace() local
17 idx = 0; in MatSolve_SeqBAIJ_5_NaturalOrdering_inplace()
18 x[0] = b[idx]; in MatSolve_SeqBAIJ_5_NaturalOrdering_inplace()
19 x[1] = b[1 + idx]; in MatSolve_SeqBAIJ_5_NaturalOrdering_inplace()
20 x[2] = b[2 + idx]; in MatSolve_SeqBAIJ_5_NaturalOrdering_inplace()
21 x[3] = b[3 + idx]; in MatSolve_SeqBAIJ_5_NaturalOrdering_inplace()
22 x[4] = b[4 + idx]; in MatSolve_SeqBAIJ_5_NaturalOrdering_inplace()
27 idx = 5 * i; in MatSolve_SeqBAIJ_5_NaturalOrdering_inplace()
28 s1 = b[idx]; in MatSolve_SeqBAIJ_5_NaturalOrdering_inplace()
29 s2 = b[1 + idx]; in MatSolve_SeqBAIJ_5_NaturalOrdering_inplace()
[all …]
|
| H A D | baijsolvnat6.c | 7 PetscInt i, nz, idx, idt, jdx; in MatSolve_SeqBAIJ_6_NaturalOrdering_inplace() local
17 idx = 0; in MatSolve_SeqBAIJ_6_NaturalOrdering_inplace()
18 x[0] = b[idx]; in MatSolve_SeqBAIJ_6_NaturalOrdering_inplace()
19 x[1] = b[1 + idx]; in MatSolve_SeqBAIJ_6_NaturalOrdering_inplace()
20 x[2] = b[2 + idx]; in MatSolve_SeqBAIJ_6_NaturalOrdering_inplace()
21 x[3] = b[3 + idx]; in MatSolve_SeqBAIJ_6_NaturalOrdering_inplace()
22 x[4] = b[4 + idx]; in MatSolve_SeqBAIJ_6_NaturalOrdering_inplace()
23 x[5] = b[5 + idx]; in MatSolve_SeqBAIJ_6_NaturalOrdering_inplace()
28 idx = 6 * i; in MatSolve_SeqBAIJ_6_NaturalOrdering_inplace()
29 s1 = b[idx]; in MatSolve_SeqBAIJ_6_NaturalOrdering_inplace()
[all …]
|
| H A D | baijsolvnat7.c | 8 PetscInt i, nz, idx, idt, jdx; in MatSolve_SeqBAIJ_7_NaturalOrdering_inplace() local
17 idx = 0; in MatSolve_SeqBAIJ_7_NaturalOrdering_inplace()
18 x[0] = b[idx]; in MatSolve_SeqBAIJ_7_NaturalOrdering_inplace()
19 x[1] = b[1 + idx]; in MatSolve_SeqBAIJ_7_NaturalOrdering_inplace()
20 x[2] = b[2 + idx]; in MatSolve_SeqBAIJ_7_NaturalOrdering_inplace()
21 x[3] = b[3 + idx]; in MatSolve_SeqBAIJ_7_NaturalOrdering_inplace()
22 x[4] = b[4 + idx]; in MatSolve_SeqBAIJ_7_NaturalOrdering_inplace()
23 x[5] = b[5 + idx]; in MatSolve_SeqBAIJ_7_NaturalOrdering_inplace()
24 x[6] = b[6 + idx]; in MatSolve_SeqBAIJ_7_NaturalOrdering_inplace()
29 idx = 7 * i; in MatSolve_SeqBAIJ_7_NaturalOrdering_inplace()
[all …]
|
| H A D | baijsolvtrannat5.c | 7 PetscInt i, nz, idx, idt, oidx; in MatSolveTranspose_SeqBAIJ_5_NaturalOrdering_inplace() local
16 idx = 0; in MatSolveTranspose_SeqBAIJ_5_NaturalOrdering_inplace()
20 x1 = x[idx]; in MatSolveTranspose_SeqBAIJ_5_NaturalOrdering_inplace()
21 x2 = x[1 + idx]; in MatSolveTranspose_SeqBAIJ_5_NaturalOrdering_inplace()
22 x3 = x[2 + idx]; in MatSolveTranspose_SeqBAIJ_5_NaturalOrdering_inplace()
23 x4 = x[3 + idx]; in MatSolveTranspose_SeqBAIJ_5_NaturalOrdering_inplace()
24 x5 = x[4 + idx]; in MatSolveTranspose_SeqBAIJ_5_NaturalOrdering_inplace()
43 x[idx] = s1; in MatSolveTranspose_SeqBAIJ_5_NaturalOrdering_inplace()
44 x[1 + idx] = s2; in MatSolveTranspose_SeqBAIJ_5_NaturalOrdering_inplace()
45 x[2 + idx] = s3; in MatSolveTranspose_SeqBAIJ_5_NaturalOrdering_inplace()
[all …]
|
| H A D | baijsolvtrannat4.c | 7 PetscInt i, nz, idx, idt, oidx; in MatSolveTranspose_SeqBAIJ_4_NaturalOrdering_inplace() local
16 idx = 0; in MatSolveTranspose_SeqBAIJ_4_NaturalOrdering_inplace()
20 x1 = x[idx]; in MatSolveTranspose_SeqBAIJ_4_NaturalOrdering_inplace()
21 x2 = x[1 + idx]; in MatSolveTranspose_SeqBAIJ_4_NaturalOrdering_inplace()
22 x3 = x[2 + idx]; in MatSolveTranspose_SeqBAIJ_4_NaturalOrdering_inplace()
23 x4 = x[3 + idx]; in MatSolveTranspose_SeqBAIJ_4_NaturalOrdering_inplace()
40 x[idx] = s1; in MatSolveTranspose_SeqBAIJ_4_NaturalOrdering_inplace()
41 x[1 + idx] = s2; in MatSolveTranspose_SeqBAIJ_4_NaturalOrdering_inplace()
42 x[2 + idx] = s3; in MatSolveTranspose_SeqBAIJ_4_NaturalOrdering_inplace()
43 x[3 + idx] = s4; in MatSolveTranspose_SeqBAIJ_4_NaturalOrdering_inplace()
[all …]
|
| H A D | baijsolvnat3.c | 16 PetscInt jdx, idt, idx, nz, i; in MatSolve_SeqBAIJ_3_NaturalOrdering_inplace() local
23 idx = 0; in MatSolve_SeqBAIJ_3_NaturalOrdering_inplace()
31 idx += 3; in MatSolve_SeqBAIJ_3_NaturalOrdering_inplace()
32 s1 = b[idx]; in MatSolve_SeqBAIJ_3_NaturalOrdering_inplace()
33 s2 = b[1 + idx]; in MatSolve_SeqBAIJ_3_NaturalOrdering_inplace()
34 s3 = b[2 + idx]; in MatSolve_SeqBAIJ_3_NaturalOrdering_inplace()
45 x[idx] = s1; in MatSolve_SeqBAIJ_3_NaturalOrdering_inplace()
46 x[1 + idx] = s2; in MatSolve_SeqBAIJ_3_NaturalOrdering_inplace()
47 x[2 + idx] = s3; in MatSolve_SeqBAIJ_3_NaturalOrdering_inplace()
59 idx = 3 * (*vi++); in MatSolve_SeqBAIJ_3_NaturalOrdering_inplace()
[all …]
|
| H A D | baijsolvnat4.c | 33 PetscInt jdx, idt, idx, nz, i, ai16; in MatSolve_SeqBAIJ_4_NaturalOrdering_inplace() local
37 idx = 0; in MatSolve_SeqBAIJ_4_NaturalOrdering_inplace()
46 idx += 4; in MatSolve_SeqBAIJ_4_NaturalOrdering_inplace()
47 s1 = b[idx]; in MatSolve_SeqBAIJ_4_NaturalOrdering_inplace()
48 s2 = b[1 + idx]; in MatSolve_SeqBAIJ_4_NaturalOrdering_inplace()
49 s3 = b[2 + idx]; in MatSolve_SeqBAIJ_4_NaturalOrdering_inplace()
50 s4 = b[3 + idx]; in MatSolve_SeqBAIJ_4_NaturalOrdering_inplace()
63 x[idx] = s1; in MatSolve_SeqBAIJ_4_NaturalOrdering_inplace()
64 x[1 + idx] = s2; in MatSolve_SeqBAIJ_4_NaturalOrdering_inplace()
65 x[2 + idx] = s3; in MatSolve_SeqBAIJ_4_NaturalOrdering_inplace()
[all …]
|
| H A D | baijsolvtrannat6.c | 7 PetscInt i, nz, idx, idt, oidx; in MatSolveTranspose_SeqBAIJ_6_NaturalOrdering_inplace() local
16 idx = 0; in MatSolveTranspose_SeqBAIJ_6_NaturalOrdering_inplace()
20 x1 = x[idx]; in MatSolveTranspose_SeqBAIJ_6_NaturalOrdering_inplace()
21 x2 = x[1 + idx]; in MatSolveTranspose_SeqBAIJ_6_NaturalOrdering_inplace()
22 x3 = x[2 + idx]; in MatSolveTranspose_SeqBAIJ_6_NaturalOrdering_inplace()
23 x4 = x[3 + idx]; in MatSolveTranspose_SeqBAIJ_6_NaturalOrdering_inplace()
24 x5 = x[4 + idx]; in MatSolveTranspose_SeqBAIJ_6_NaturalOrdering_inplace()
25 x6 = x[5 + idx]; in MatSolveTranspose_SeqBAIJ_6_NaturalOrdering_inplace()
46 x[idx] = s1; in MatSolveTranspose_SeqBAIJ_6_NaturalOrdering_inplace()
47 x[1 + idx] = s2; in MatSolveTranspose_SeqBAIJ_6_NaturalOrdering_inplace()
[all …]
|
| H A D | baijsolvtrannat3.c | 7 PetscInt i, nz, idx, idt, oidx; in MatSolveTranspose_SeqBAIJ_3_NaturalOrdering_inplace() local
16 idx = 0; in MatSolveTranspose_SeqBAIJ_3_NaturalOrdering_inplace()
20 x1 = x[idx]; in MatSolveTranspose_SeqBAIJ_3_NaturalOrdering_inplace()
21 x2 = x[1 + idx]; in MatSolveTranspose_SeqBAIJ_3_NaturalOrdering_inplace()
22 x3 = x[2 + idx]; in MatSolveTranspose_SeqBAIJ_3_NaturalOrdering_inplace()
37 x[idx] = s1; in MatSolveTranspose_SeqBAIJ_3_NaturalOrdering_inplace()
38 x[1 + idx] = s2; in MatSolveTranspose_SeqBAIJ_3_NaturalOrdering_inplace()
39 x[2 + idx] = s3; in MatSolveTranspose_SeqBAIJ_3_NaturalOrdering_inplace()
40 idx += 3; in MatSolveTranspose_SeqBAIJ_3_NaturalOrdering_inplace()
52 idx = 3 * (*vi--); in MatSolveTranspose_SeqBAIJ_3_NaturalOrdering_inplace()
[all …]
|
| H A D | baijsolvnat2.c | 19 PetscInt jdx, idt, idx, nz, i; in MatSolve_SeqBAIJ_2_NaturalOrdering_inplace() local
26 idx = 0; in MatSolve_SeqBAIJ_2_NaturalOrdering_inplace()
33 idx += 2; in MatSolve_SeqBAIJ_2_NaturalOrdering_inplace()
34 s1 = b[idx]; in MatSolve_SeqBAIJ_2_NaturalOrdering_inplace()
35 s2 = b[1 + idx]; in MatSolve_SeqBAIJ_2_NaturalOrdering_inplace()
44 x[idx] = s1; in MatSolve_SeqBAIJ_2_NaturalOrdering_inplace()
45 x[1 + idx] = s2; in MatSolve_SeqBAIJ_2_NaturalOrdering_inplace()
56 idx = 2 * (*vi++); in MatSolve_SeqBAIJ_2_NaturalOrdering_inplace()
57 x1 = x[idx]; in MatSolve_SeqBAIJ_2_NaturalOrdering_inplace()
58 x2 = x[1 + idx]; in MatSolve_SeqBAIJ_2_NaturalOrdering_inplace()
[all …]
|
| H A D | baijsolvtrannat7.c | 7 PetscInt i, nz, idx, idt, oidx; in MatSolveTranspose_SeqBAIJ_7_NaturalOrdering_inplace() local
16 idx = 0; in MatSolveTranspose_SeqBAIJ_7_NaturalOrdering_inplace()
20 x1 = x[idx]; in MatSolveTranspose_SeqBAIJ_7_NaturalOrdering_inplace()
21 x2 = x[1 + idx]; in MatSolveTranspose_SeqBAIJ_7_NaturalOrdering_inplace()
22 x3 = x[2 + idx]; in MatSolveTranspose_SeqBAIJ_7_NaturalOrdering_inplace()
23 x4 = x[3 + idx]; in MatSolveTranspose_SeqBAIJ_7_NaturalOrdering_inplace()
24 x5 = x[4 + idx]; in MatSolveTranspose_SeqBAIJ_7_NaturalOrdering_inplace()
25 x6 = x[5 + idx]; in MatSolveTranspose_SeqBAIJ_7_NaturalOrdering_inplace()
26 x7 = x[6 + idx]; in MatSolveTranspose_SeqBAIJ_7_NaturalOrdering_inplace()
49 x[idx] = s1; in MatSolveTranspose_SeqBAIJ_7_NaturalOrdering_inplace()
[all …]
|
| H A D | baijsolvtrannat2.c | 6 PetscInt i, nz, idx, idt, oidx; in MatSolveTranspose_SeqBAIJ_2_NaturalOrdering_inplace() local
16 idx = 0; in MatSolveTranspose_SeqBAIJ_2_NaturalOrdering_inplace()
20 x1 = x[idx]; in MatSolveTranspose_SeqBAIJ_2_NaturalOrdering_inplace()
21 x2 = x[1 + idx]; in MatSolveTranspose_SeqBAIJ_2_NaturalOrdering_inplace()
34 x[idx] = s1; in MatSolveTranspose_SeqBAIJ_2_NaturalOrdering_inplace()
35 x[1 + idx] = s2; in MatSolveTranspose_SeqBAIJ_2_NaturalOrdering_inplace()
36 idx += 2; in MatSolveTranspose_SeqBAIJ_2_NaturalOrdering_inplace()
47 idx = 2 * (*vi--); in MatSolveTranspose_SeqBAIJ_2_NaturalOrdering_inplace()
48 x[idx] -= v[0] * s1 + v[1] * s2; in MatSolveTranspose_SeqBAIJ_2_NaturalOrdering_inplace()
49 x[idx + 1] -= v[2] * s1 + v[3] * s2; in MatSolveTranspose_SeqBAIJ_2_NaturalOrdering_inplace()
[all …]
|
| H A D | baijsolvtran7.c | 10 PetscInt i, nz, idx, idt, ii, ic, ir, oidx; in MatSolveTranspose_SeqBAIJ_7_inplace() local
40 idx = 0; in MatSolveTranspose_SeqBAIJ_7_inplace()
44 x1 = t[idx]; in MatSolveTranspose_SeqBAIJ_7_inplace()
45 x2 = t[1 + idx]; in MatSolveTranspose_SeqBAIJ_7_inplace()
46 x3 = t[2 + idx]; in MatSolveTranspose_SeqBAIJ_7_inplace()
47 x4 = t[3 + idx]; in MatSolveTranspose_SeqBAIJ_7_inplace()
48 x5 = t[4 + idx]; in MatSolveTranspose_SeqBAIJ_7_inplace()
49 x6 = t[5 + idx]; in MatSolveTranspose_SeqBAIJ_7_inplace()
50 x7 = t[6 + idx]; in MatSolveTranspose_SeqBAIJ_7_inplace()
73 t[idx] = s1; in MatSolveTranspose_SeqBAIJ_7_inplace()
[all …]
|
| H A D | baijsolvtran5.c | 10 PetscInt i, nz, idx, idt, ii, ic, ir, oidx; in MatSolveTranspose_SeqBAIJ_5_inplace() local
38 idx = 0; in MatSolveTranspose_SeqBAIJ_5_inplace()
42 x1 = t[idx]; in MatSolveTranspose_SeqBAIJ_5_inplace()
43 x2 = t[1 + idx]; in MatSolveTranspose_SeqBAIJ_5_inplace()
44 x3 = t[2 + idx]; in MatSolveTranspose_SeqBAIJ_5_inplace()
45 x4 = t[3 + idx]; in MatSolveTranspose_SeqBAIJ_5_inplace()
46 x5 = t[4 + idx]; in MatSolveTranspose_SeqBAIJ_5_inplace()
65 t[idx] = s1; in MatSolveTranspose_SeqBAIJ_5_inplace()
66 t[1 + idx] = s2; in MatSolveTranspose_SeqBAIJ_5_inplace()
67 t[2 + idx] = s3; in MatSolveTranspose_SeqBAIJ_5_inplace()
[all …]
|
| H A D | baijsolvtran6.c | 10 PetscInt i, nz, idx, idt, ii, ic, ir, oidx; in MatSolveTranspose_SeqBAIJ_6_inplace() local
39 idx = 0; in MatSolveTranspose_SeqBAIJ_6_inplace()
43 x1 = t[idx]; in MatSolveTranspose_SeqBAIJ_6_inplace()
44 x2 = t[1 + idx]; in MatSolveTranspose_SeqBAIJ_6_inplace()
45 x3 = t[2 + idx]; in MatSolveTranspose_SeqBAIJ_6_inplace()
46 x4 = t[3 + idx]; in MatSolveTranspose_SeqBAIJ_6_inplace()
47 x5 = t[4 + idx]; in MatSolveTranspose_SeqBAIJ_6_inplace()
48 x6 = t[5 + idx]; in MatSolveTranspose_SeqBAIJ_6_inplace()
69 t[idx] = s1; in MatSolveTranspose_SeqBAIJ_6_inplace()
70 t[1 + idx] = s2; in MatSolveTranspose_SeqBAIJ_6_inplace()
[all …]
|
| /petsc/src/vec/is/is/impls/block/ |
| H A D | block.c | 11 PetscInt *idx; member
19 if (sub->allocated) PetscCall(PetscFree(sub->idx)); in ISDestroy_Block()
48 PetscCall(PetscFindInt(bkey, numIdx, sub->idx, location)); in ISLocate_Block()
50 const PetscInt *idx = sub->idx; in ISLocate_Block() local
54 if (idx[i] == bkey) { in ISLocate_Block()
64 static PetscErrorCode ISGetIndices_Block(IS in, const PetscInt *idx[]) in ISGetIndices_Block() argument
73 if (bs == 1) *idx = sub->idx; in ISGetIndices_Block()
77 *idx = jj; in ISGetIndices_Block()
79 ii = sub->idx; in ISGetIndices_Block()
84 *idx = NULL; in ISGetIndices_Block()
[all …]
|
| /petsc/src/sys/utils/ |
| H A D | sortip.c | 15 #define PetscCheckIdentity(n, idx) \ argument
17 …for (PetscInt i = 0; i < n; ++i) PetscCheck(idx[i] == i, PETSC_COMM_SELF, PETSC_ERR_ARG_WRONG, "In…
20 #define PetscCheckIdentity(n, idx) (void)0 argument
67 PetscErrorCode PetscSortIntWithPermutation(PetscInt n, const PetscInt i[], PetscInt idx[]) in PetscSortIntWithPermutation() argument
74 PetscAssertPointer(idx, 3); in PetscSortIntWithPermutation()
75 PetscCheckIdentity(n, idx); in PetscSortIntWithPermutation()
79 ik = i[idx[k]]; in PetscSortIntWithPermutation()
81 if (ik > i[idx[j]]) { in PetscSortIntWithPermutation()
82 SWAP(idx[k], idx[j], tmp); in PetscSortIntWithPermutation()
83 ik = i[idx[k]]; in PetscSortIntWithPermutation()
[all …]
|
| /petsc/src/mat/impls/baij/seq/ftn-kernels/ |
| H A D | fsolvebaij.F90 | 20 PetscInt :: idx, ax, jdx
34 idx = 0
39 idx = idx + 4
40 s(0:3) = b(idx + 0:idx + 3)
50 x(idx + 0:idx + 3) = s(0:3)
60 s(0:3) = x(idx + 0:idx + 3)
70 x(idx + 0) = a(ax + 0)*s(0) + a(ax + 4)*s(1) + a(ax + 8)*s(2) + a(ax + 12)*s(3)
71 x(idx + 1) = a(ax + 1)*s(0) + a(ax + 5)*s(1) + a(ax + 9)*s(2) + a(ax + 13)*s(3)
72 x(idx + 2) = a(ax + 2)*s(0) + a(ax + 6)*s(1) + a(ax + 10)*s(2) + a(ax + 14)*s(3)
73 x(idx + 3) = a(ax + 3)*s(0) + a(ax + 7)*s(1) + a(ax + 11)*s(2) + a(ax + 15)*s(3)
[all …]
|
| /petsc/src/ts/tutorials/advection-diffusion-reaction/ |
| H A D | ex3.c | 261 PetscInt i, idx[3], M, xm; in RHSMatrixHeat() local
283 idx[0] = M - 1; in RHSMatrixHeat()
284 idx[1] = 0; in RHSMatrixHeat()
285 idx[2] = 1; in RHSMatrixHeat()
286 PetscCall(MatSetValues(A, 1, &mstart, 3, idx, v, INSERT_VALUES)); in RHSMatrixHeat()
292 idx[0] = M - 2; in RHSMatrixHeat()
293 idx[1] = M - 1; in RHSMatrixHeat()
294 idx[2] = 0; in RHSMatrixHeat()
295 PetscCall(MatSetValues(A, 1, &mend, 3, idx, v, INSERT_VALUES)); in RHSMatrixHeat()
303 idx[0] = i - 1; in RHSMatrixHeat()
[all …]
|
| /petsc/src/vec/is/utils/ |
| H A D | isltog.h | 7 …pping mapping, ISGlobalToLocalMappingMode type, PetscInt n, const PetscInt idx[], PetscInt *nout, … in ISGlobalToLocalMappingApply() argument
25 if (idx[i] < 0) idxout[i] = idx[i]; in ISGlobalToLocalMappingApply()
26 else if (idx[i] < bs * start) idxout[i] = -1; in ISGlobalToLocalMappingApply()
27 else if (idx[i] > bs * (end + 1) - 1) idxout[i] = -1; in ISGlobalToLocalMappingApply()
28 else GTOL(idx[i], idxout[i]); in ISGlobalToLocalMappingApply()
35 if (idx[i] < 0) continue; in ISGlobalToLocalMappingApply()
36 if (idx[i] < bs * start) continue; in ISGlobalToLocalMappingApply()
37 if (idx[i] > bs * (end + 1) - 1) continue; in ISGlobalToLocalMappingApply()
38 GTOL(idx[i], tmp); in ISGlobalToLocalMappingApply()
44 if (idx[i] < 0) continue; in ISGlobalToLocalMappingApply()
[all …]
|
| /petsc/src/ksp/pc/impls/bjacobi/bjkokkos/ |
| H A D | bjkokkos.kokkos.cxx | 92 int Nblk = end - start, it, m, stride = stride_shared, idx = 0; in BJSolve_TFQMR() local
97 if (idx++ == nShareVec) { in BJSolve_TFQMR()
103 if (idx++ == nShareVec) { in BJSolve_TFQMR()
109 if (idx++ == nShareVec) { in BJSolve_TFQMR()
115 if (idx++ == nShareVec) { in BJSolve_TFQMR()
121 if (idx++ == nShareVec) { in BJSolve_TFQMR()
127 if (idx++ == nShareVec) { in BJSolve_TFQMR()
133 if (idx++ == nShareVec) { in BJSolve_TFQMR()
139 if (idx++ == nShareVec) { in BJSolve_TFQMR()
145 if (idx++ == nShareVec) { in BJSolve_TFQMR()
[all …]
|