Home
last modified time | relevance | path

Searched refs:comp (Results 1 – 25 of 64) sorted by relevance

123

/petsc/src/vec/vec/tutorials/
H A Dex11f.F9011 PetscInt n, bs, comp
46 comp = 0
47 PetscCallA(VecStrideNorm(x, comp, NORM_2, norm, ierr))
53 comp = 1
54 PetscCallA(VecStrideNorm(x, comp, NORM_2, norm, ierr))
60 PetscCallA(VecStrideNorm(x, comp, NORM_1, norm, ierr))
66 PetscCallA(VecStrideNorm(x, comp, NORM_INFINITY, norm, ierr))
/petsc/src/snes/utils/dm/
H A Ddminterpolatesnes.c374 PetscInt xSize, comp; in DMInterpolate_Segment_Private() local
384 …for (comp = 0; comp < dof; ++comp) a[p * dof + comp] = x[0 * dof + comp] * (1 - xir[0]) + x[1 * do… in DMInterpolate_Segment_Private()
386 for (comp = 0; comp < dof; ++comp) a[p * dof + comp] = x[0 * dof + comp]; in DMInterpolate_Segment_Private()
410 for (PetscInt comp = 0; comp < ctx->dof; ++comp) a[p * ctx->dof + comp] = x[0 * ctx->dof + comp]; in DMInterpolate_Triangle_Private() local
414 …or (PetscInt comp = 0; comp < ctx->dof; ++comp) a[p * ctx->dof + comp] += PetscRealPart(x[(d + 1) … in DMInterpolate_Triangle_Private() local
440 for (PetscInt comp = 0; comp < ctx->dof; ++comp) a[p * ctx->dof + comp] = x[0 * ctx->dof + comp]; in DMInterpolate_Tetrahedron_Private() local
444 …r (PetscInt comp = 0; comp < ctx->dof; ++comp) a[p * ctx->dof + comp] += PetscRealPart(x[order[d] … in DMInterpolate_Tetrahedron_Private() local
595 …comp = 0; comp < dof; ++comp) a[p * dof + comp] = x[0 * dof + comp] * (1 - xir[0]) * (1 - xir[1]) … in DMInterpolate_Quad_Private() local
597 for (PetscInt comp = 0; comp < dof; ++comp) a[p * dof + comp] = x[0 * dof + comp]; in DMInterpolate_Quad_Private() local
603 for (PetscInt comp = 0; comp < dof; ++comp) { in DMInterpolate_Quad_Private() local
[all …]
/petsc/src/snes/tutorials/
H A Dex77.c100 PetscInt comp; in zero_vector() local
101 for (comp = 0; comp < Ncomp; ++comp) u[comp] = 0.0; in zero_vector()
109 PetscInt comp; in coordinates() local
110 for (comp = 0; comp < Ncomp; ++comp) u[comp] = x[comp]; in coordinates()
133 PetscInt comp, d; in f1_u_3d() local
140 for (comp = 0; comp < Ncomp; ++comp) { in f1_u_3d()
141 …for (d = 0; d < dim; ++d) f1[comp * dim + d] = mu * u_x[comp * dim + d] + p * cofu_x[comp * dim + … in f1_u_3d()
179 PetscInt comp, d; in f0_bd_u_3d() local
182 for (comp = 0; comp < Ncomp; ++comp) { in f0_bd_u_3d()
183 for (d = 0, f0[comp] = 0.0; d < dim; ++d) f0[comp] += cofu_x[comp * dim + d] * n[d]; in f0_bd_u_3d()
[all …]
H A Dex56.c27 PetscInt comp, d; in f1_bd_u() local
28 for (comp = 0; comp < Ncomp; ++comp) { in f1_bd_u()
29 for (d = 0; d < dim; ++d) f1[comp * dim + d] = 0.0; in f1_bd_u()
169 PetscInt comp; in f0_u() local
171 for (comp = 0; comp < Ncomp; ++comp) f0[comp] = 0.0; in f0_u()
177 for (int comp = 0; comp < Nf; ++comp) { in f0_u_x4() local
178 f0[comp] = 1e5; in f0_u_x4()
179 …for (int i = 0; i < dim; ++i) f0[comp] *= /* (comp+1)* */ (x[i] * x[i] * x[i] * x[i] - x[i] * x[i]… in f0_u_x4()
186 PetscInt comp; in zero() local
188 for (comp = 0; comp < Ncomp; ++comp) u[comp] = 0; in zero()
/petsc/src/dm/impls/network/tests/
H A Dex1.c96 PetscInt *compprev, *comp, compkey; in main() local
114 PetscCall(DMNetworkGetComponent(dm, eStart, 0, NULL, (void **)&comp, &ndofs)); in main()
115 …comp == *compprev, PETSC_COMM_WORLD, PETSC_ERR_PLIB, "Cloning changed the Original, comp (previous… in main()
122 PetscCall(PetscMalloc1(eEnd - eStart, &comp)); in main()
124 comp[e - eStart] = e; in main()
125 PetscCall(DMNetworkAddComponent(dmclone, e, compkey, &comp[e - eStart], 2)); in main()
128 PetscCall(PetscFree(comp)); in main()
/petsc/src/dm/impls/plex/
H A Dplexorient.c351 PetscMPIInt rank, size, numComponents, comp = 0; in DMPlexOrient() local
427 if (PetscBTLookup(seenCells, cell)) cellComp[cell] = comp; in DMPlexOrient()
430 if (PetscBTLookup(seenFaces, face)) faceComp[face] = comp; in DMPlexOrient()
435 ++comp; in DMPlexOrient()
437 numComponents = comp; in DMPlexOrient()
497 for (comp = 0; comp < numComponents; ++comp) { in DMPlexOrient()
500 numNeighbors[comp] = 0; in DMPlexOrient()
501 PetscCall(PetscMalloc1(PetscMax(numLeaves, 0), &neighbors[comp])); in DMPlexOrient()
507 …if ((face >= fStart) && (face < fEnd) && (faceComp[face - fStart] == comp) && rorntComp[face].rank… in DMPlexOrient()
511 for (n = 0; n < numNeighbors[comp]; ++n) in DMPlexOrient()
[all …]
H A Dplexsection.c204 const PetscInt *comp; in DMPlexCreateSectionBCDof() local
213 if (bcComps && bcComps[bc]) PetscCall(ISGetIndices(bcComps[bc], &comp)); in DMPlexCreateSectionBCDof()
242 if (bcComps && bcComps[bc]) PetscCall(ISRestoreIndices(bcComps[bc], &comp)); in DMPlexCreateSectionBCDof()
292 const PetscInt *comp, *idx; in DMPlexCreateSectionBCIndicesField() local
297 if (bcComps && bcComps[bc]) PetscCall(ISGetIndices(bcComps[bc], &comp)); in DMPlexCreateSectionBCIndicesField()
322 for (c = 0; c < cNc; ++c) indices[d++] = j * Nc + comp[c]; in DMPlexCreateSectionBCIndicesField()
332 if (bcComps && bcComps[bc]) PetscCall(ISRestoreIndices(bcComps[bc], &comp)); in DMPlexCreateSectionBCIndicesField()
/petsc/src/ts/tutorials/
H A Dex18.c181 PetscInt comp; in f0_zero_u() local
182 for (comp = 0; comp < dim; ++comp) f0[comp] = u[comp]; in f0_zero_u()
188 PetscInt comp; in f0_constant_u() local
191 for (comp = 0; comp < dim && comp < 3; ++comp) f0[comp] = u[comp] - wind[comp]; in f0_constant_u()
196 PetscInt comp; in f1_constant_u() local
197 for (comp = 0; comp < dim * dim; ++comp) f1[comp] = 0.0; in f1_constant_u()
213 PetscInt comp; in f0_lap_u() local
214 for (comp = 0; comp < dim; ++comp) f0[comp] = 4.0; in f0_lap_u()
219 PetscInt comp, d; in f1_lap_u() local
220 for (comp = 0; comp < dim; ++comp) { in f1_lap_u()
[all …]
H A Dex46.c109 PetscInt comp, d; in f1_u() local
111 for (comp = 0; comp < Ncomp; ++comp) { in f1_u()
112 for (d = 0; d < dim; ++d) f1[comp * dim + d] = 1.0 / Re * u_x[comp * dim + d]; in f1_u()
113 f1[comp * dim + comp] -= u[Ncomp]; in f1_u()
/petsc/src/dm/impls/plex/tutorials/output/
H A Dex8_1d_q1_periodic.out27 DM box offsets: num_elem 3, size 2, comp 1, dof 3
31 DM coords offsets: num_elem 3, size 2, comp 1, dof 3
H A Dex8_2d_q1_periodic_sparse.out65 DM box offsets: num_elem 6, size 4, comp 1, dof 9
72 DM coords offsets: num_elem 6, size 4, comp 2, dof 18
103 DM cell coords offsets: num_elem 6, size 4, comp 2, dof 48
H A Dex8_2d_q1_periodic.out65 DM box offsets: num_elem 6, size 4, comp 1, dof 9
72 DM coords offsets: num_elem 6, size 4, comp 2, dof 18
H A Dex8_3d_q1_periodic_project.out67 DM box offsets: num_elem 3, size 8, comp 1, dof 12
71 DM coords offsets: num_elem 3, size 8, comp 3, dof 36
H A Dex8_3d_q1_periodic.out106 DM box offsets: num_elem 6, size 8, comp 1, dof 18
113 DM coords offsets: num_elem 6, size 8, comp 3, dof 54
/petsc/src/dm/dt/fe/impls/composite/
H A Dfecomposite.c108 PetscInt comp; /* Field components */ in PetscFEComputeTabulation_Composite() local
122 PetscCall(PetscFEGetNumComponents(fem, &comp)); in PetscFEComputeTabulation_Composite()
150 if (K >= 0) PetscCall(PetscArrayzero(B, npoints * pdim * comp)); in PetscFEComputeTabulation_Composite()
151 if (K >= 1) PetscCall(PetscArrayzero(D, npoints * pdim * comp * dim)); in PetscFEComputeTabulation_Composite()
152 if (K >= 2) PetscCall(PetscArrayzero(H, npoints * pdim * comp * dim * dim)); in PetscFEComputeTabulation_Composite()
159 const PetscInt i = (p * pdim + cmp->embedding[s * spdim + j]) * comp; in PetscFEComputeTabulation_Composite()
169 const PetscInt i = ((p * pdim + cmp->embedding[s * spdim + j]) * comp + 0) * dim + d; in PetscFEComputeTabulation_Composite()
180 … const PetscInt i = ((p * pdim + cmp->embedding[s * spdim + j]) * comp + 0) * dim * dim + d; in PetscFEComputeTabulation_Composite()
/petsc/src/mat/impls/aij/mpi/strumpack/
H A Dstrumpack.c255 static PetscErrorCode MatSTRUMPACKSetCompression_STRUMPACK(Mat F, MatSTRUMPACKCompressionType comp) in MatSTRUMPACKSetCompression_STRUMPACK() argument
261 …PetscCheck(comp != MAT_STRUMPACK_COMPRESSION_TYPE_HODLR && comp != MAT_STRUMPACK_COMPRESSION_TYPE_… in MatSTRUMPACKSetCompression_STRUMPACK()
264 …PetscCheck(comp != MAT_STRUMPACK_COMPRESSION_TYPE_ZFP_BLR_HODLR && comp != MAT_STRUMPACK_COMPRESSI… in MatSTRUMPACKSetCompression_STRUMPACK()
266 …Void("STRUMPACK_set_compression", STRUMPACK_set_compression(*S, (STRUMPACK_COMPRESSION_TYPE)comp)); in MatSTRUMPACKSetCompression_STRUMPACK()
269 static PetscErrorCode MatSTRUMPACKGetCompression_STRUMPACK(Mat F, MatSTRUMPACKCompressionType *comp) in MatSTRUMPACKGetCompression_STRUMPACK() argument
274 …PetscStackCallExternalVoid("STRUMPACK_compression", *comp = (MatSTRUMPACKCompressionType)STRUMPACK… in MatSTRUMPACKGetCompression_STRUMPACK()
296 PetscErrorCode MatSTRUMPACKSetCompression(Mat F, MatSTRUMPACKCompressionType comp) in MatSTRUMPACKSetCompression() argument
300 PetscValidLogicalCollectiveEnum(F, comp, 2); in MatSTRUMPACKSetCompression()
301 PetscTryMethod(F, "MatSTRUMPACKSetCompression_C", (Mat, MatSTRUMPACKCompressionType), (F, comp)); in MatSTRUMPACKSetCompression()
320 PetscErrorCode MatSTRUMPACKGetCompression(Mat F, MatSTRUMPACKCompressionType *comp) in MatSTRUMPACKGetCompression() argument
[all …]
/petsc/src/ts/characteristic/interface/
H A Dcharacteristic.c340 PetscInt n, is, ie, js, je, comp; in CharacteristicSolve() local
498 for (comp = 0; comp < c->numFieldComp; comp++) c->queue[n].field[comp] = fieldValues[comp]; in CharacteristicSolve()
524 … for (comp = 0; comp < c->numFieldComp; comp++) c->queueRemote[n].field[comp] = fieldValues[comp]; in CharacteristicSolve()
543 …for (comp = 0; comp < c->numFieldComp; comp++) solArray[Qi.j][Qi.i * dof + c->fieldComp[comp]] = Q… in CharacteristicSolve()
/petsc/src/dm/impls/plex/tests/output/
H A Dex65_ext_coord_space.out2 cell total dim 2 total comp 1
18 cell total dim 8 total comp 2
H A Dex5_tri_1.out23 cell total dim 6 total comp 2
H A Dex5_tet_1.out47 cell total dim 12 total comp 3
H A Dex5_tri_t3_0.out30 cell total dim 6 total comp 2
/petsc/include/petsc/private/
H A Dsectionimpl.h116 …ne PetscSectionCheckValidFieldComponent(comp, nfieldcomp) PetscSectionCheckValid_("section field c… argument
/petsc/src/binding/petsc4py/src/petsc4py/PETSc/
H A DFE.pyx265 cdef PetscInt comp = 0
266 CHKERR(PetscFEGetNumComponents(self.fe, &comp))
267 return toInt(comp)
269 def setNumComponents(self, comp: int) -> None:
276 comp
284 cdef PetscInt ccomp = asInt(comp)
/petsc/src/dm/dt/fv/interface/
H A Dfv.c1238 PetscErrorCode PetscFVSetNumComponents(PetscFV fvm, PetscInt comp) in PetscFVSetNumComponents() argument
1242 if (fvm->numComponents != comp) { in PetscFVSetNumComponents()
1247 PetscCall(PetscCalloc1(comp, &fvm->componentNames)); in PetscFVSetNumComponents()
1249 fvm->numComponents = comp; in PetscFVSetNumComponents()
1251 PetscCall(PetscMalloc1(comp, &fvm->fluxWork)); in PetscFVSetNumComponents()
1270 PetscErrorCode PetscFVGetNumComponents(PetscFV fvm, PetscInt *comp) in PetscFVGetNumComponents() argument
1274 PetscAssertPointer(comp, 2); in PetscFVGetNumComponents()
1275 *comp = fvm->numComponents; in PetscFVGetNumComponents()
1293 PetscErrorCode PetscFVSetComponentName(PetscFV fvm, PetscInt comp, const char *name) in PetscFVSetComponentName() argument
1296 PetscCall(PetscFree(fvm->componentNames[comp])); in PetscFVSetComponentName()
[all …]
/petsc/config/BuildSystem/
H A DsourceDatabase.py296 comp = s.split(os.sep)
297 for i in range(len(comp)):
298 if not components[i] == comp[i]: break

123