| /petsc/src/mat/graphops/color/impls/jp/ |
| H A D | jp.c | 39 PetscInt dn, on; in MCJPGreatestWeight_Private() local
64 PetscCall(MatGetSize(oG, &dn, &on)); in MCJPGreatestWeight_Private()
73 PetscCall(MatGetSize(dG, NULL, &dn)); in MCJPGreatestWeight_Private()
80 PetscCall(PetscMalloc1(dn, &dwts)); in MCJPGreatestWeight_Private()
87 for (i = 0; i < dn; i++) { in MCJPGreatestWeight_Private()
101 for (i = 0; i < dn; i++) { in MCJPGreatestWeight_Private()
117 for (i = 0; i < dn; i++) dwts[i] = maxweights[i]; in MCJPGreatestWeight_Private()
143 PetscInt *di, *dj, dn; in MCJPInitialLocalColor_Private() local
166 PetscCall(MatGetSize(oG, &dn, NULL)); in MCJPInitialLocalColor_Private()
169 PetscCall(MatGetSize(dG, NULL, &dn)); in MCJPInitialLocalColor_Private()
[all …]
|
| /petsc/src/snes/tutorials/ |
| H A D | ex18.c | 138 …PetscScalar t0, tn, ts, te, tw, an, as, ae, aw, dn, ds, de, dw, fn = 0.0, fs = 0.0, fe = 0.0, fw… in FormFunction() local
188 dn = PetscPowScalar(an, beta); in FormFunction()
189 fn = dn * (tn - t0); in FormFunction()
213 dn = PetscPowScalar(an, beta); in FormFunction()
214 fn = dn * (tn - t0); in FormFunction()
239 dn = PetscPowScalar(an, beta); in FormFunction()
240 fn = dn * (tn - t0); in FormFunction()
259 dn = PetscPowScalar(an, beta); in FormFunction()
260 fn = dn * (tn - t0); in FormFunction()
297 PetscScalar dn, ds, de, dw, an, as, ae, aw, bn, bs, be, bw, gn, gs, ge, gw; in FormJacobian() local
[all …]
|
| /petsc/src/snes/tests/ |
| H A D | ex20.c | 138 …PetscScalar t0, tn, ts, te, tw, an, as, ae, aw, dn, ds, de, dw, fn = 0.0, fs = 0.0, fe = 0.0, f… in FormFunction() local
191 dn = PetscPowScalar(an, beta); in FormFunction()
192 fn = dn * (tn - t0); in FormFunction()
228 dn = PetscPowScalar(an, beta); in FormFunction()
229 fn = dn * (tn - t0); in FormFunction()
276 dn = PetscPowScalar(an, beta); in FormFunction()
277 fn = dn * (tn - t0); in FormFunction()
316 dn = PetscPowScalar(an, beta); in FormFunction()
317 fn = dn * (tn - t0); in FormFunction()
393 dn = PetscPowScalar(an, beta); in FormFunction()
[all …]
|
| /petsc/src/mat/impls/aij/mpi/mpihipsparse/ |
| H A D | mpiaijhipsparse.hip.cxx | 249 PetscInt cst, i, dn, on, *gidx; in MatMPIAIJGetLocalMatMerge_MPIAIJHIPSPARSE() local
251 PetscCall(MatGetLocalSize(Ad, NULL, &dn)); in MatMPIAIJGetLocalMatMerge_MPIAIJHIPSPARSE()
254 PetscCall(PetscMalloc1(dn + on, &gidx)); in MatMPIAIJGetLocalMatMerge_MPIAIJHIPSPARSE()
255 for (i = 0; i < dn; i++) gidx[i] = cst + i; in MatMPIAIJGetLocalMatMerge_MPIAIJHIPSPARSE()
256 for (i = 0; i < on; i++) gidx[i + dn] = cmap[i]; in MatMPIAIJGetLocalMatMerge_MPIAIJHIPSPARSE()
257 …PetscCall(ISCreateGeneral(PetscObjectComm((PetscObject)Ad), dn + on, gidx, PETSC_OWN_POINTER, glob… in MatMPIAIJGetLocalMatMerge_MPIAIJHIPSPARSE()
|
| /petsc/src/mat/impls/aij/mpi/mpicusparse/ |
| H A D | mpiaijcusparse.cu | 249 PetscInt cst, i, dn, on, *gidx; in MatMPIAIJGetLocalMatMerge_MPIAIJCUSPARSE() local
251 PetscCall(MatGetLocalSize(Ad, NULL, &dn)); in MatMPIAIJGetLocalMatMerge_MPIAIJCUSPARSE()
254 PetscCall(PetscMalloc1(dn + on, &gidx)); in MatMPIAIJGetLocalMatMerge_MPIAIJCUSPARSE()
255 for (i = 0; i < dn; i++) gidx[i] = cst + i; in MatMPIAIJGetLocalMatMerge_MPIAIJCUSPARSE()
256 for (i = 0; i < on; i++) gidx[i + dn] = cmap[i]; in MatMPIAIJGetLocalMatMerge_MPIAIJCUSPARSE()
257 …PetscCall(ISCreateGeneral(PetscObjectComm((PetscObject)Ad), dn + on, gidx, PETSC_OWN_POINTER, glob… in MatMPIAIJGetLocalMatMerge_MPIAIJCUSPARSE()
|
| /petsc/src/mat/impls/nest/ |
| H A D | matnest.c | 90 PetscInt *dm, *dn, k; /* displacements and number of submatrices */ member
130 …Object)A), contents->dn[j + 1] - contents->dn[j], PETSC_DECIDE, M, N, PetscSafePointerPlusOffset((… in MatProductNumeric_Nest_Dense()
163 PetscCall(PetscFree3(contents->dm, contents->dn, contents->workC)); in MatNest_DenseDestroy()
208 PetscCall(PetscCalloc3(nr + 1, &contents->dm, nc + 1, &contents->dn, nr * nc, &contents->workC)); in MatProductSymbolic_Nest_Dense()
216 PetscCall(ISGetLocalSize(bA->isglobal.col[i], contents->dn + i + 1)); in MatProductSymbolic_Nest_Dense()
217 contents->dn[i + 1] += contents->dn[i]; in MatProductSymbolic_Nest_Dense()
226 …Object)A), contents->dn[j + 1] - contents->dn[j], PETSC_DECIDE, M, N, PetscSafePointerPlusOffset((… in MatProductSymbolic_Nest_Dense()
|
| /petsc/src/mat/impls/aij/seq/ |
| H A D | matrart.c | 112 PetscInt *rj, rm = R->rmap->n, dm = RAB->rmap->n, dn = RAB->cmap->n; in MatMatMatMultNumeric_SeqAIJ_SeqAIJ_SeqDense() local
116 if (!dm || !dn) PetscFunctionReturn(PETSC_SUCCESS); in MatMatMatMultNumeric_SeqAIJ_SeqAIJ_SeqDense()
|
| /petsc/src/mat/impls/aij/mpi/kokkos/ |
| H A D | mpiaijkok.kokkos.cxx | 104 PetscInt cst, i, dn, on, *gidx; in MatMPIAIJGetLocalMatMerge_MPIAIJKokkos() local
105 PetscCall(MatGetLocalSize(Ad, NULL, &dn)); in MatMPIAIJGetLocalMatMerge_MPIAIJKokkos()
108 PetscCall(PetscMalloc1(dn + on, &gidx)); in MatMPIAIJGetLocalMatMerge_MPIAIJKokkos()
109 for (i = 0; i < dn; i++) gidx[i] = cst + i; in MatMPIAIJGetLocalMatMerge_MPIAIJKokkos()
110 for (i = 0; i < on; i++) gidx[i + dn] = cmap[i]; in MatMPIAIJGetLocalMatMerge_MPIAIJKokkos()
111 …PetscCall(ISCreateGeneral(PetscObjectComm((PetscObject)Ad), dn + on, gidx, PETSC_OWN_POINTER, glob… in MatMPIAIJGetLocalMatMerge_MPIAIJKokkos()
|
| /petsc/src/ts/tutorials/ |
| H A D | ex10.c | 192 static PetscScalar RDRadiation(RD rd, const RDNode *n, RDNode *dn) in RDRadiation() argument
195 if (dn) { in RDRadiation()
196 dn->E = rad_E; in RDRadiation()
197 dn->T = rad_T; in RDRadiation()
|
| /petsc/src/vec/vec/impls/seq/kokkos/ |
| H A D | veckok.kokkos.cxx | 1219 DotNorm2 dn(xv, yv); in VecDotNorm2_SeqKokkos() local
1220 …arallel_reduce(Kokkos::RangePolicy<>(PetscGetKokkosExecutionSpace(), 0, xin->map->n), dn, result)); in VecDotNorm2_SeqKokkos()
|
| /petsc/src/mat/impls/aij/mpi/ |
| H A D | mpiaij.c | 5280 PetscInt i, j, am, dn, on; in MatMPIAIJGetLocalMatMerge() local
5282 PetscCall(MatGetLocalSize(Ad, &am, &dn)); in MatMPIAIJGetLocalMatMerge()
5303 cj[k] = dn + *bj++; in MatMPIAIJGetLocalMatMerge()
5308 PetscCall(MatCreateSeqAIJWithArrays(PETSC_COMM_SELF, am, dn + on, ci, cj, ca, A_loc)); in MatMPIAIJGetLocalMatMerge()
5334 PetscCall(PetscMalloc1(dn + on, &gidx)); in MatMPIAIJGetLocalMatMerge()
5335 for (i = 0; i < dn; i++) gidx[i] = cst + i; in MatMPIAIJGetLocalMatMerge()
5336 for (i = 0; i < on; i++) gidx[i + dn] = cmap[i]; in MatMPIAIJGetLocalMatMerge()
5337 …PetscCall(ISCreateGeneral(PetscObjectComm((PetscObject)Ad), dn + on, gidx, PETSC_OWN_POINTER, glob… in MatMPIAIJGetLocalMatMerge()
|