| /petsc/src/dm/impls/da/ |
| H A D | da2.c | 201 PetscMPIInt rank, size, n0, n1, n2, n3, n5, n6, n7, n8; in DMSetUp_DA_2D() local
442 n0 = n1 - 1; in DMSetUp_DA_2D()
444 n0 = -1; in DMSetUp_DA_2D()
473 if ((n0 < 0) && (n3 < 0) && (n1 < 0)) n0 = size - 1; in DMSetUp_DA_2D()
478 if ((n3 >= 0) && (n0 < 0)) n0 = size - m + rank - 1; in DMSetUp_DA_2D()
486 if ((n1 >= 0) && (n0 < 0)) n0 = rank - 1; in DMSetUp_DA_2D()
493 if ((n3 >= 0) && (n0 < 0)) n0 = size - m + rank - 1; in DMSetUp_DA_2D()
500 if ((n1 >= 0) && (n0 < 0)) n0 = rank - 1; in DMSetUp_DA_2D()
508 dd->neighbors[0] = n0; in DMSetUp_DA_2D()
520 sn0 = n0; in DMSetUp_DA_2D()
[all …]
|
| H A D | da3.c | 211 PetscMPIInt n0, n1, n2, n3, n4, n5, n6, n7, n8, n9, n10, n11, n12, n14; in DMSetUp_DA_3D() local
547 n0 = rank - m * n - m - 1; in DMSetUp_DA_3D()
579 n0 = rank - 1 - (m * n); in DMSetUp_DA_3D()
603 n0 = rank + m * (n - 1) - 1 - (m * n); in DMSetUp_DA_3D()
627 n0 = size - (m * n) + rank - m - 1; in DMSetUp_DA_3D()
651 n0 = size - m * n + rank + m - 1 - m; in DMSetUp_DA_3D()
663 n0 = rank + m * n - 1 - m * n; in DMSetUp_DA_3D()
699 n0 = size - m + rank - 1; in DMSetUp_DA_3D()
723 if ((xs == 0) && (ys == 0) && (zs == 0)) n0 = size - 1; in DMSetUp_DA_3D()
736 if (xs == 0) n0 = n3 = n6 = n9 = n12 = n15 = n18 = n21 = n24 = -2; in DMSetUp_DA_3D()
[all …]
|
| /petsc/src/dm/dt/interface/ |
| H A D | dtweakform.c | 477 …Form wf, DMLabel label, PetscInt val, PetscInt f, PetscInt part, PetscInt *n0, void (***f0)(PetscI… in PetscWeakFormGetResidual() argument
480 …PetscCall(PetscWeakFormGetFunction_Private(wf, wf->form[PETSC_WF_F0], label, val, f, part, n0, (vo… in PetscWeakFormGetResidual()
493 …kForm wf, DMLabel label, PetscInt val, PetscInt f, PetscInt part, PetscInt n0, void (**f0)(PetscIn… in PetscWeakFormSetResidual() argument
496 …PetscCall(PetscWeakFormSetFunction_Private(wf, wf->form[PETSC_WF_F0], label, val, f, part, n0, (Pe… in PetscWeakFormSetResidual()
509 …Form wf, DMLabel label, PetscInt val, PetscInt f, PetscInt part, PetscInt *n0, void (***f0)(PetscI… in PetscWeakFormGetBdResidual() argument
512 …PetscCall(PetscWeakFormGetFunction_Private(wf, wf->form[PETSC_WF_BDF0], label, val, f, part, n0, (… in PetscWeakFormGetBdResidual()
525 …kForm wf, DMLabel label, PetscInt val, PetscInt f, PetscInt part, PetscInt n0, void (**f0)(PetscIn… in PetscWeakFormSetBdResidual() argument
528 …PetscCall(PetscWeakFormSetFunction_Private(wf, wf->form[PETSC_WF_BDF0], label, val, f, part, n0, (… in PetscWeakFormSetBdResidual()
543 PetscInt n0, n1, n2, n3; in PetscWeakFormHasJacobian() local
548 PetscCall(PetscHMapFormGetSize(wf->form[PETSC_WF_G0], &n0)); in PetscWeakFormHasJacobian()
[all …]
|
| H A D | dtds.c | 1354 PetscInt n0, n1; in PetscDSGetResidual() local
1359 PetscCall(PetscWeakFormGetResidual(ds->wf, NULL, 0, f, 0, &n0, &tmp0, &n1, &tmp1)); in PetscDSGetResidual()
1417 PetscInt n0, n1; in PetscDSGetRHSResidual() local
1422 PetscCall(PetscWeakFormGetResidual(ds->wf, NULL, 0, f, 100, &n0, &tmp0, &n1, &tmp1)); in PetscDSGetRHSResidual()
1511 PetscInt n0, n1, n2, n3; in PetscDSGetJacobian() local
1517 …PetscCall(PetscWeakFormGetJacobian(ds->wf, NULL, 0, f, g, 0, &n0, &tmp0, &n1, &tmp1, &n2, &tmp2, &… in PetscDSGetJacobian()
1649 PetscInt n0, n1, n2, n3; in PetscDSGetJacobianPreconditioner() local
1655 …PetscCall(PetscWeakFormGetJacobianPreconditioner(ds->wf, NULL, 0, f, g, 0, &n0, &tmp0, &n1, &tmp1,… in PetscDSGetJacobianPreconditioner()
1761 PetscInt n0, n1, n2, n3; in PetscDSGetDynamicJacobian() local
1767 …PetscCall(PetscWeakFormGetDynamicJacobian(ds->wf, NULL, 0, f, g, 0, &n0, &tmp0, &n1, &tmp1, &n2, &… in PetscDSGetDynamicJacobian()
[all …]
|
| /petsc/src/dm/dt/fe/impls/basic/ |
| H A D | febasic.c | 395 PetscInt n0, n1, i; in PetscFEIntegrateResidual_Basic() local
418 …PetscCall(PetscWeakFormGetResidual(wf, key.label, key.value, key.field, key.part, &n0, &f0_func, &… in PetscFEIntegrateResidual_Basic()
419 if (!n0 && !n1) PetscFunctionReturn(PETSC_SUCCESS); in PetscFEIntegrateResidual_Basic()
460 …for (i = 0; i < n0; ++i) f0_func[i](dE, Nf, NfAux, uOff, uOff_x, u, u_t, u_x, aOff, aOff_x, a, NUL… in PetscFEIntegrateResidual_Basic()
501 PetscInt n0, n1, i; in PetscFEIntegrateBdResidual_Basic() local
524 …PetscCall(PetscWeakFormGetBdResidual(wf, key.label, key.value, key.field, key.part, &n0, &f0_func,… in PetscFEIntegrateBdResidual_Basic()
525 if (!n0 && !n1) PetscFunctionReturn(PETSC_SUCCESS); in PetscFEIntegrateBdResidual_Basic()
577 …for (i = 0; i < n0; ++i) f0_func[i](dE, Nf, NfAux, uOff, uOff_x, u, u_t, u_x, aOff, aOff_x, a, NUL… in PetscFEIntegrateBdResidual_Basic()
585 …if (n0) PetscCall(PetscPrintf(PETSC_COMM_SELF, " f0[%" PetscInt_FMT "] %g\n", c, (double)PetscRea… in PetscFEIntegrateBdResidual_Basic()
615 PetscInt n0, n1, i; in PetscFEIntegrateHybridResidual_Basic() local
[all …]
|
| /petsc/src/ts/tutorials/ |
| H A D | ex10.c | 652 RDNode n, n0, nx, n0x, nt, ntx; in RDIFunction_FE() local
654 RDEvaluate(interp, deriv, q, x0, i, &n0, &n0x); in RDIFunction_FE()
657 rad = (1. - Theta) * RDRadiation(rd, &n0, 0) + Theta * RDRadiation(rd, &n, 0); in RDIFunction_FE()
660 RDMaterialEnergy(rd, &n0, &Em0, NULL); in RDIFunction_FE()
668 RDDiffusionCoefficient(rd, PETSC_TRUE, &n0, &n0x, &D0_R, 0, 0); in RDIFunction_FE()
934 RDNode n0[3], n1[3], d[3], fd[3]; in RDTestDifferentiation() local
936 n0[0].E = 1.; in RDTestDifferentiation()
937 n0[0].T = 1.; in RDTestDifferentiation()
938 n0[1].E = 5.; in RDTestDifferentiation()
939 n0[1].T = 3.; in RDTestDifferentiation()
[all …]
|
| /petsc/src/dm/dt/tests/ |
| H A D | ex12.c | 28 PetscInt n0, n1, i; in CheckResidual() local
31 …PetscCall(PetscWeakFormGetResidual(wf, key.label, key.value, key.field, key.part, &n0, &f0, &n1, &… in CheckResidual()
32 …PetscCheck(n0 == in0, PETSC_COMM_SELF, PETSC_ERR_ARG_SIZ, "Found %" PetscInt_FMT " f0 functions !=… in CheckResidual()
33 …for (i = 0; i < n0; ++i) PetscCheck(f0[i] == if0[i], PETSC_COMM_SELF, PETSC_ERR_ARG_SIZ, "f0[%" Pe… in CheckResidual()
34 …ERR_ARG_SIZ, "Found %" PetscInt_FMT " f1 functions != %" PetscInt_FMT " functions input", n0, in0); in CheckResidual()
|
| /petsc/src/mat/tests/ |
| H A D | ex23.c | 587 PetscInt *idx0, *idx1, n0, n1; in main() local
620 n0 = (ren - rst) / 2; in main()
622 PetscCall(PetscMalloc1(n0, &idx0)); in main()
624 for (i = 0; i < n0; i++) idx0[i] = ren - i - 1; in main()
626 PetscCall(ISCreateGeneral(PETSC_COMM_WORLD, n0, idx0, PETSC_OWN_POINTER, &Ais[0])); in main()
628 PetscCall(ISCreateGeneral(PETSC_COMM_WORLD, n0, idx0, PETSC_COPY_VALUES, &Bis[0])); in main()
|
| /petsc/src/dm/impls/plex/hdf5/ |
| H A D | plexhdf5.c | 2396 PetscInt n0; in PlexLayerCreateSFs_Private() local
2398 PetscCall(ISGetLocalSize(cellVertexData, &n0)); in PlexLayerCreateSFs_Private()
2399 …n0, PETSC_COMM_SELF, PETSC_ERR_ARG_SIZ, "Local size of IS cellVertexData = %" PetscInt_FMT " != %"… in PlexLayerCreateSFs_Private()
2403 PetscInt n0; in PlexLayerCreateSFs_Private() local
2405 PetscCall(ISGetLocalSize(coneOrientations, &n0)); in PlexLayerCreateSFs_Private()
2406 …n0, PETSC_COMM_SELF, PETSC_ERR_ARG_SIZ, "Local size of IS coneOrientations = %" PetscInt_FMT " != … in PlexLayerCreateSFs_Private()
|
| /petsc/src/ksp/pc/impls/mg/ |
| H A D | mg.c | 1311 PetscLogDouble nnz0 = 0, sgc = 0, soc = 0, n0 = 0; in PCMGGetGridComplexity() local
1333 n0 = N; in PCMGGetGridComplexity()
1336 …PetscCheck(n0 > 0 && gc, PETSC_COMM_SELF, PETSC_ERR_PLIB, "Number for grid points on finest level … in PCMGGetGridComplexity()
1337 *gc = (PetscReal)(sgc / n0); in PCMGGetGridComplexity()
|
| /petsc/src/ts/utils/dmplexlandau/ |
| H A D | plexland.c | 1916 PetscInt N = ctx->mat_offset[ctx->num_grids], n0 = ctx->mat_offset[grid] + b_id * N; in LandauCreateJacobianMatrix() local
1917 for (PetscInt ii = 0; ii < n; ++ii) idxs[n0 + ii] = values[ii] + n0; in LandauCreateJacobianMatrix()
1919 PetscInt n0 = ctx->mat_offset[grid] * ctx->batch_sz + b_id * n; in LandauCreateJacobianMatrix()
1920 for (PetscInt ii = 0; ii < n; ++ii) idxs[n0 + ii] = values[ii] + n0; in LandauCreateJacobianMatrix()
|