| /petsc/src/vec/vec/tests/ |
| H A D | ex2.c | 8 PetscInt n = 5, idx1[2] = {0, 3}, idx2[2] = {1, 4}; in main() local 24 PetscCall(ISCreateGeneral(PETSC_COMM_SELF, 2, idx2, PETSC_COPY_VALUES, &is2)); in main()
|
| H A D | ex4.c | 8 PetscInt n = 5, idx1[2] = {0, 3}, idx2[2] = {1, 4}; in main() local 29 PetscCall(ISCreateGeneral(PETSC_COMM_SELF, 2, idx2, PETSC_COPY_VALUES, &is2)); in main()
|
| H A D | ex9.c | 7 PetscInt n = 5, i, idx2[3] = {0, 2, 3}, idx1[3] = {0, 1, 2}; in main() local 27 PetscCall(ISCreateGeneral(PETSC_COMM_SELF, 3, idx2, PETSC_COPY_VALUES, &is2)); in main()
|
| /petsc/src/dm/tutorials/ |
| H A D | ex20.c | 125 PetscInt idx, idx0, idx1, idx2, idx3; in pic_insert_DMPLEX_with_cell_list() local 130 idx2 = idx1 + nx[0]; in pic_insert_DMPLEX_with_cell_list() 135 tricells[3 * cnt + 2] = idx2; in pic_insert_DMPLEX_with_cell_list() 139 tricells[3 * cnt + 1] = idx2; in pic_insert_DMPLEX_with_cell_list()
|
| /petsc/src/vec/is/tests/ |
| H A D | ex8.c | 9 const PetscInt *idx1, *idx2; in TestEqual() local 18 PetscCall(ISLocalToGlobalMappingGetIndices(m2, &idx2)); in TestEqual() 24 PetscCall(PetscArraycmp(idx1, idx2, n1, &flg)); in TestEqual() 33 PetscCall(ISLocalToGlobalMappingRestoreIndices(m2, &idx2)); in TestEqual()
|
| /petsc/src/ksp/pc/impls/redundant/ |
| H A D | redundant.c | 126 PetscInt *idx1, *idx2, i, j, k; in PCSetUp_Redundant() local 132 PetscCall(PetscMalloc2(red->psubcomm->n * mlocal, &idx1, red->psubcomm->n * mlocal, &idx2)); in PCSetUp_Redundant() 137 idx2[j++] = i + M * k; in PCSetUp_Redundant() 141 PetscCall(ISCreateGeneral(comm, red->psubcomm->n * mlocal, idx2, PETSC_COPY_VALUES, &is2)); in PCSetUp_Redundant() 152 PetscCall(PetscFree2(idx1, idx2)); in PCSetUp_Redundant()
|
| /petsc/src/ts/tutorials/power_grid/stability_9bus/ |
| H A D | ex9busadj.c | 779 PetscInt *idx2; in main() local 795 PetscCall(PetscMalloc1(7 * ngen, &idx2)); in main() 797 idx2[7 * i] = 9 * i; in main() 798 idx2[7 * i + 1] = 9 * i + 1; in main() 799 idx2[7 * i + 2] = 9 * i + 2; in main() 800 idx2[7 * i + 3] = 9 * i + 3; in main() 801 idx2[7 * i + 4] = 9 * i + 6; in main() 802 idx2[7 * i + 5] = 9 * i + 7; in main() 803 idx2[7 * i + 6] = 9 * i + 8; in main() 805 PetscCall(ISCreateGeneral(PETSC_COMM_WORLD, 7 * ngen, idx2, PETSC_COPY_VALUES, &user.is_diff)); in main() [all …]
|
| H A D | ex9busoptfd.c | 830 PetscInt *idx2; in main() local 847 PetscCall(PetscMalloc1(7 * ngen, &idx2)); in main() 849 idx2[7 * i] = 9 * i; in main() 850 idx2[7 * i + 1] = 9 * i + 1; in main() 851 idx2[7 * i + 2] = 9 * i + 2; in main() 852 idx2[7 * i + 3] = 9 * i + 3; in main() 853 idx2[7 * i + 4] = 9 * i + 6; in main() 854 idx2[7 * i + 5] = 9 * i + 7; in main() 855 idx2[7 * i + 6] = 9 * i + 8; in main() 857 PetscCall(ISCreateGeneral(PETSC_COMM_WORLD, 7 * ngen, idx2, PETSC_COPY_VALUES, &user.is_diff)); in main() [all …]
|
| H A D | ex9bus.c | 1062 PetscInt i, idx, *idx2; in main() local 1084 PetscCall(PetscMalloc1(7 * ngen, &idx2)); in main() 1086 idx2[7 * i] = 9 * i; in main() 1087 idx2[7 * i + 1] = 9 * i + 1; in main() 1088 idx2[7 * i + 2] = 9 * i + 2; in main() 1089 idx2[7 * i + 3] = 9 * i + 3; in main() 1090 idx2[7 * i + 4] = 9 * i + 6; in main() 1091 idx2[7 * i + 5] = 9 * i + 7; in main() 1092 idx2[7 * i + 6] = 9 * i + 8; in main() 1094 PetscCall(ISCreateGeneral(PETSC_COMM_WORLD, 7 * ngen, idx2, PETSC_COPY_VALUES, &user.is_diff)); in main() [all …]
|
| H A D | ex9busopt.c | 1036 PetscInt *idx2; in main() local 1053 PetscCall(PetscMalloc1(7 * ngen, &idx2)); in main() 1055 idx2[7 * i] = 9 * i; in main() 1056 idx2[7 * i + 1] = 9 * i + 1; in main() 1057 idx2[7 * i + 2] = 9 * i + 2; in main() 1058 idx2[7 * i + 3] = 9 * i + 3; in main() 1059 idx2[7 * i + 4] = 9 * i + 6; in main() 1060 idx2[7 * i + 5] = 9 * i + 7; in main() 1061 idx2[7 * i + 6] = 9 * i + 8; in main() 1063 PetscCall(ISCreateGeneral(PETSC_COMM_WORLD, 7 * ngen, idx2, PETSC_COPY_VALUES, &user.is_diff)); in main() [all …]
|
| /petsc/src/dm/impls/plex/ |
| H A D | plexpreallocate.c | 155 …iewPairs(PetscInt N, PetscInt Ncol, const PetscInt idx1[], const PetscInt idx2[], PetscViewer view… in PetscIntViewPairs() argument 165 if (N) PetscAssertPointer(idx2, 4); in PetscIntViewPairs() 180 …Printf(viewer, " (%" PetscInt_FMT ", %" PetscInt_FMT ")", idx1[i * Ncol + j], idx2[i * Ncol + j])); in PetscIntViewPairs() 189 …Printf(viewer, " (%" PetscInt_FMT ", %" PetscInt_FMT ")", idx1[Ncol * n + i], idx2[Ncol * n + i])); in PetscIntViewPairs()
|
| H A D | plexinterpolate.c | 1293 PetscInt idx, idx2; in DMPlexInterpolatePointSF() local 1297 for (r = 0, idx = 0, idx2 = 0; r < Nr; ++r) { in DMPlexInterpolatePointSF() 1371 for (deg = 0; deg < rootdegree[r]; ++deg, ++idx2) { in DMPlexInterpolatePointSF() 1374 PetscCall(PetscSectionGetDof(candidateRemoteSection, idx2, &dof)); in DMPlexInterpolatePointSF() 1375 PetscCall(PetscSectionGetOffset(candidateRemoteSection, idx2, &offset)); in DMPlexInterpolatePointSF() 1402 …RR_PLIB, "Root %" PetscInt_FMT " Idx %" PetscInt_FMT " ought to have an associated face", r, idx2); in DMPlexInterpolatePointSF()
|
| /petsc/src/dm/dt/interface/ |
| H A D | dtweakform.c | 964 PetscInt *values, *idx1, *idx2, *idx; in PetscWeakFormViewTable_Ascii() local 968 PetscCall(PetscMalloc6(Nk, &keys, Nk, &names, Nk, &values, Nk, &idx1, Nk, &idx2, Nk, &idx)); in PetscWeakFormViewTable_Ascii() 982 idx2[k] = k; in PetscWeakFormViewTable_Ascii() 984 PetscCall(PetscSortStrWithPermutation(Nk, names, idx2)); in PetscWeakFormViewTable_Ascii() 988 idx[k] = idx1[idx2[k]]; in PetscWeakFormViewTable_Ascii() 1039 PetscCall(PetscFree6(keys, names, values, idx1, idx2, idx)); in PetscWeakFormViewTable_Ascii()
|
| /petsc/src/ksp/pc/impls/asm/ |
| H A D | asm.c | 358 PetscInt *idx1, *idx2, nout; in PCSetUp_ASM() local 371 PetscCall(PetscMalloc1(m_local, &idx2)); in PCSetUp_ASM() 372 … PetscCall(ISGlobalToLocalMappingApply(ltog, IS_GTOLM_DROP, m_local, idx_local, &nout, idx2)); in PCSetUp_ASM() 375 PetscCall(ISCreateGeneral(PETSC_COMM_SELF, m_local, idx2, PETSC_OWN_POINTER, &isll_local)); in PCSetUp_ASM()
|
| /petsc/src/ts/utils/dmplexlandau/kokkos/ |
| H A D | landau.kokkos.cxx | 374 for (int q = 0, idx2 = idx0; q < nr; q++) { in landau_mat_assemble() local 375 for (int d = 0; d < nc; d++, idx2++) coo_vals[idx2] = row_scale[q] * col_scale[d] * Aij; in landau_mat_assemble()
|
| /petsc/src/vec/is/section/interface/ |
| H A D | section.c | 253 const PetscInt *idx1, *idx2; in PetscSectionCompare() local 295 PetscCall(PetscSectionGetConstraintIndices(s2, p, &idx2)); in PetscSectionCompare() 296 PetscCall(PetscArraycmp(idx1, idx2, ncdof, congruent)); in PetscSectionCompare() 323 PetscCall(PetscSectionGetFieldConstraintIndices(s2, p, f, &idx2)); in PetscSectionCompare() 324 PetscCall(PetscArraycmp(idx1, idx2, nfcdof, congruent)); in PetscSectionCompare()
|
| /petsc/src/ts/utils/dmplexlandau/ |
| H A D | plexland.c | 523 for (PetscInt q = 0, idx2 = idx0; q < nr; q++) { in LandauFormJacobian_Internal() local 524 … for (PetscInt d = 0; d < nc; d++, idx2++) coo_vals[idx2] = row_scale[q] * col_scale[d] * Aij; in LandauFormJacobian_Internal()
|