| /petsc/src/mat/utils/ |
| H A D | isltog.c | 27 Vec v, lv; in MatCreateFromISLocalToGlobalMapping() local
36 PetscCall(VecCreate(PETSC_COMM_SELF, &lv)); in MatCreateFromISLocalToGlobalMapping()
37 PetscCall(VecSetSizes(lv, msize, PETSC_DECIDE)); in MatCreateFromISLocalToGlobalMapping()
38 PetscCall(VecSetType(lv, vtype)); in MatCreateFromISLocalToGlobalMapping()
40 if (trans) PetscCall(VecScatterCreate(lv, NULL, v, is, &sct)); in MatCreateFromISLocalToGlobalMapping()
41 else PetscCall(VecScatterCreate(v, is, lv, NULL, &sct)); in MatCreateFromISLocalToGlobalMapping()
52 PetscCall(VecDestroy(&lv)); in MatCreateFromISLocalToGlobalMapping()
|
| /petsc/src/dm/tutorials/ |
| H A D | ex5.c | 18 PetscScalar *lv; in main() local
44 PetscCall(VecGetArray(local, &lv)); in main()
47 lv[e[3 * i]] = i; in main()
50 PetscCall(VecRestoreArray(local, &lv)); in main()
|
| /petsc/src/dm/impls/redundant/ |
| H A D | dmredundant.c | 90 const PetscScalar *lv; in DMLocalToGlobalBegin_Redundant() local
96 PetscCall(VecGetArrayRead(l, &lv)); in DMLocalToGlobalBegin_Redundant()
108 for (i = 0; i < red->N; i++) buffer[i] = gv[i] + lv[i]; in DMLocalToGlobalBegin_Redundant()
111 for (i = 0; i < red->N; i++) buffer[i] = PetscMax(gv[i], lv[i]); in DMLocalToGlobalBegin_Redundant()
113 } else source = (void *)lv; in DMLocalToGlobalBegin_Redundant()
118 PetscCall(PetscArraycpy(gv, lv, red->n)); in DMLocalToGlobalBegin_Redundant()
123 PetscCall(VecRestoreArrayRead(l, &lv)); in DMLocalToGlobalBegin_Redundant()
138 PetscScalar *lv; in DMGlobalToLocalBegin_Redundant() local
143 PetscCall(VecGetArray(l, &lv)); in DMGlobalToLocalBegin_Redundant()
146 if (red->n) PetscCall(PetscArraycpy(lv, gv, red->n)); in DMGlobalToLocalBegin_Redundant()
[all …]
|
| /petsc/config/ |
| H A D | configure.py | 15 lv = os.environ[lang]
17 try: lv,enc = lv.split('.')
19 if lv not in ['en_US','C']: lv = 'en_US'
20 if enc: lv = lv+'.'+enc
21 os.environ[lang] = lv
|
| /petsc/src/snes/tutorials/ |
| H A D | ex36.c | 224 Vec v[2], lv[2], exact; in CompareView() local
243 PetscCall(DMGetLocalVector(dm, &lv[i])); in CompareView()
245 PetscCall(PetscObjectSetName((PetscObject)lv[i], name)); in CompareView()
246 PetscCall(DMGlobalToLocalBegin(dm, v[i], INSERT_VALUES, lv[i])); in CompareView()
247 PetscCall(DMGlobalToLocalEnd(dm, v[i], INSERT_VALUES, lv[i])); in CompareView()
248 PetscCall(DMPlexInsertBoundaryValues(dm, PETSC_TRUE, lv[i], 0., NULL, NULL, NULL)); in CompareView()
250 PetscCall(DMPlexVecView1D(dm, 2, lv, viewer)); in CompareView()
251 for (i = 0; i < 2; ++i) PetscCall(DMRestoreLocalVector(dm, &lv[i])); in CompareView()
|
| H A D | ex12.c | 838 Vec lv; in main() local
839 PetscCall(DMGetLocalVector(dm, &lv)); in main()
840 PetscCall(DMGlobalToLocalBegin(dm, u, INSERT_VALUES, lv)); in main()
841 PetscCall(DMGlobalToLocalEnd(dm, u, INSERT_VALUES, lv)); in main()
842 PetscCall(DMPrintLocalVec(dm, "Local function", 1.0e-10, lv)); in main()
843 PetscCall(DMRestoreLocalVector(dm, &lv)); in main()
|
| /petsc/src/dm/impls/plex/adaptors/parmmg/ |
| H A D | parmmgadapt.c | 38 PetscInt r, lv, gv; in DMAdaptMetric_ParMmg_Plex() local
426 lv = facesNew[i * dim + j]; in DMAdaptMetric_ParMmg_Plex()
427 gv = gv_new[lv] - 1; in DMAdaptMetric_ParMmg_Plex()
428 PetscCall(PetscFindInt(gv, numVerticesNew, verticesNewSorted, &lv)); in DMAdaptMetric_ParMmg_Plex()
429 facePoints[j] = lv + vStart; in DMAdaptMetric_ParMmg_Plex()
|
| /petsc/src/ts/tutorials/optimal_control/ |
| H A D | ex1.c | 14 PetscReal lv, lw; member
191 dx = u[0] - actx->lv * t * PetscCosReal(actx->lw); in CostIntegrand()
192 dy = u[1] - actx->lv * t * PetscSinReal(actx->lw); in CostIntegrand()
209 dx = u[0] - actx->lv * t * PetscCosReal(actx->lw); in DRDUJacobianTranspose()
210 dy = u[1] - actx->lv * t * PetscSinReal(actx->lw); in DRDUJacobianTranspose()
247 aircraft.lv = 2.0; /* leader speed in kmph */ in main()
|
| /petsc/src/ts/tutorials/ |
| H A D | ex11.c | 1570 int projecteqstate(PetscReal wc[], const PetscReal ueq[], PetscReal lv[][3]) in projecteqstate()
1576 for (j = 0; j < 3; ++j) wc[k] += lv[k][j] * ueq[j]; in projecteqstate()
1592 int eigenvectors(PetscReal rv[][3], PetscReal lv[][3], const PetscReal ueq[], PetscReal gamma) in eigenvectors()
1600 lv[k][j] = 0.; in eigenvectors()
1607 lv[0][1] = rho * .5; in eigenvectors()
1608 lv[0][2] = -.5 / csnd; in eigenvectors()
1609 lv[1][0] = csnd; in eigenvectors()
1610 lv[1][2] = -1. / csnd; in eigenvectors()
1611 lv[2][1] = rho * .5; in eigenvectors()
1612 lv[2][2] = .5 / csnd; in eigenvectors()
[all …]
|
| /petsc/src/vec/vec/impls/nest/ |
| H A D | vecnest.c | 349 PetscReal lv; in VecMin_Nest() local
356 PetscCall(VecMin(bx->v[i], &tp, &lv)); in VecMin_Nest()
357 if (lv < *v) { in VecMin_Nest()
358 *v = lv; in VecMin_Nest()
382 PetscReal lv; in VecMax_Nest() local
389 PetscCall(VecMax(bx->v[i], &tp, &lv)); in VecMax_Nest()
390 if (lv > *v) { in VecMax_Nest()
391 *v = lv; in VecMax_Nest()
|
| /petsc/src/binding/petsc4py/src/petsc4py/PETSc/ |
| H A D | DMShell.pyx | 59 def setLocalVector(self, Vec lv) -> None: argument
66 lv
74 CHKERR(DMShellSetLocalVector(self.dm, lv.vec))
|
| /petsc/src/mat/impls/aij/seq/kokkos/ |
| H A D | aijkok.kokkos.cxx | 1096 ConstPetscScalarKokkosView lv, rv; in MatDiagonalScale_SeqAIJKokkos() local
1108 PetscCall(VecGetKokkosView(ll, &lv)); in MatDiagonalScale_SeqAIJKokkos()
1114 …Kokkos::parallel_for(Kokkos::TeamThreadRange(t, len), [&](PetscInt j) { Aa(Ai(i) + j) *= lv(i); }); in MatDiagonalScale_SeqAIJKokkos()
1116 PetscCall(VecRestoreKokkosView(ll, &lv)); in MatDiagonalScale_SeqAIJKokkos()
1125 PetscCall(VecRestoreKokkosView(rr, &lv)); in MatDiagonalScale_SeqAIJKokkos()
|
| /petsc/src/dm/impls/plex/ |
| H A D | plexcreate.c | 6010 PetscInt lv; in DMPlexBuildFromCellListParallel() local
6014 PetscCall(PetscFindInt(gv, numVerticesAdj, verticesAdj, &lv)); in DMPlexBuildFromCellListParallel()
6015 …PetscCheck(lv >= 0, PETSC_COMM_SELF, PETSC_ERR_ARG_OUTOFRANGE, "Could not find global vertex %" Pe… in DMPlexBuildFromCellListParallel()
6016 cones[c * numCorners + p] = lv + numCells; in DMPlexBuildFromCellListParallel()
6164 PetscInt lv; in DMPlexBuildFromCellSectionParallel() local
6168 PetscCall(PetscFindInt(gv, numVerticesAdj, verticesAdj, &lv)); in DMPlexBuildFromCellSectionParallel()
6169 …PetscCheck(lv >= 0, PETSC_COMM_SELF, PETSC_ERR_ARG_OUTOFRANGE, "Could not find global vertex %" Pe… in DMPlexBuildFromCellSectionParallel()
6170 cones[p] = lv + numCells; in DMPlexBuildFromCellSectionParallel()
|
| H A D | plexfem.c | 768 static PetscErrorCode DMPlexBasisTransform_Internal(DM dm, Vec lv, PetscBool l2g) in DMPlexBasisTransform_Internal() argument
784 PetscCall(VecGetArray(lv, &a)); in DMPlexBasisTransform_Internal()
792 PetscCall(VecRestoreArray(lv, &a)); in DMPlexBasisTransform_Internal()
814 PetscErrorCode DMPlexGlobalToLocalBasis(DM dm, Vec lv) in DMPlexGlobalToLocalBasis() argument
818 PetscValidHeaderSpecific(lv, VEC_CLASSID, 2); in DMPlexGlobalToLocalBasis()
819 PetscCall(DMPlexBasisTransform_Internal(dm, lv, PETSC_FALSE)); in DMPlexGlobalToLocalBasis()
840 PetscErrorCode DMPlexLocalToGlobalBasis(DM dm, Vec lv) in DMPlexLocalToGlobalBasis() argument
844 PetscValidHeaderSpecific(lv, VEC_CLASSID, 2); in DMPlexLocalToGlobalBasis()
845 PetscCall(DMPlexBasisTransform_Internal(dm, lv, PETSC_TRUE)); in DMPlexLocalToGlobalBasis()
|
| /petsc/src/mat/impls/is/ |
| H A D | matis.c | 2522 const PetscScalar *lv; in MatInvertBlockDiagonal_IS() local
2529 PetscCall(MatInvertBlockDiagonal(is->A, &lv)); in MatInvertBlockDiagonal_IS()
2534 PetscCall(PetscSFReduceBegin(is->sf, nodeType, lv, is->bdiag, MPI_REPLACE)); in MatInvertBlockDiagonal_IS()
2535 PetscCall(PetscSFReduceEnd(is->sf, nodeType, lv, is->bdiag, MPI_REPLACE)); in MatInvertBlockDiagonal_IS()
|