| /petsc/src/ksp/pc/impls/tfs/ |
| H A D | gs.c | 127 static PetscErrorCode gsi_via_bit_mask(PCTFS_gs_id *gs); 128 static PetscErrorCode get_ngh_buf(PCTFS_gs_id *gs); 129 static PetscErrorCode set_pairwise(PCTFS_gs_id *gs); 131 static PetscErrorCode set_tree(PCTFS_gs_id *gs); 134 static PetscErrorCode PCTFS_gs_gop_local_out(PCTFS_gs_id *gs, PetscScalar *vals); 136 static PetscErrorCode PCTFS_gs_gop_vec_local_out(PCTFS_gs_id *gs, PetscScalar *vals, PetscInt step); 138 static PetscErrorCode PCTFS_gs_gop_vec_plus(PCTFS_gs_id *gs, PetscScalar *in_vals, PetscInt step); 139 static PetscErrorCode PCTFS_gs_gop_vec_pairwise_plus(PCTFS_gs_id *gs, PetscScalar *in_vals, PetscIn… 140 static PetscErrorCode PCTFS_gs_gop_vec_local_plus(PCTFS_gs_id *gs, PetscScalar *vals, PetscInt step… 141 static PetscErrorCode PCTFS_gs_gop_vec_local_in_plus(PCTFS_gs_id *gs, PetscScalar *vals, PetscInt s… [all …]
|
| /petsc/src/snes/impls/gs/ |
| H A D | snesgs.c | 35 SNES_NGS *gs = (SNES_NGS *)snes->data; in SNESNGSSetTolerances() local 42 gs->abstol = abstol; in SNESNGSSetTolerances() 46 gs->rtol = rtol; in SNESNGSSetTolerances() 50 gs->stol = stol; in SNESNGSSetTolerances() 54 gs->max_its = maxit; in SNESNGSSetTolerances() 81 SNES_NGS *gs = (SNES_NGS *)snes->data; in SNESNGSGetTolerances() local 85 if (atol) *atol = gs->abstol; in SNESNGSGetTolerances() 86 if (rtol) *rtol = gs->rtol; in SNESNGSGetTolerances() 87 if (stol) *stol = gs->stol; in SNESNGSGetTolerances() 88 if (maxit) *maxit = gs->max_its; in SNESNGSGetTolerances() [all …]
|
| H A D | gssecant.c | 5 SNES_NGS *gs = (SNES_NGS *)snes->data; in SNESComputeNGSDefaultSecant() local 9 ISColoring coloring = gs->coloring; in SNESComputeNGSDefaultSecant() 12 PetscScalar h = gs->h; in SNESComputeNGSDefaultSecant() 22 PetscBool mat = gs->secant_mat, equal, isdone, alldone; in SNESComputeNGSDefaultSecant() 48 gs->coloring = coloring; in SNESComputeNGSDefaultSecant()
|
| /petsc/src/mat/tests/ |
| H A D | ex183.c | 7 PetscErrorCode MyISView(IS *rowis, IS *colis, PetscInt gs, PetscInt ss, PetscViewer viewer) in MyISView() argument 13 PetscCall(PetscViewerASCIIPrintf(viewer, "Row IS %" PetscInt_FMT "\n", gs)); in MyISView() 17 PetscCall(PetscViewerASCIIPrintf(viewer, "Col IS %" PetscInt_FMT "\n", gs)); in MyISView() 30 PetscInt nis, *cols, gnsubdomains, gsubdomainnums[1], gsubdomainperm[1], s, gs; in main() local 127 for (gs = 0, s = 0; gs < gnsubdomains; ++gs) { in main() 131 …if (gs == gsubdomainnums[ss]) { /* Global subdomain gs being viewed is my subdomain with local num… in main() 135 PetscCall(MyISView(rowis, colis, gs, ss, viewer)); in main() 151 for (gs = 0, s = 0; gs < gnsubdomains; ++gs) { in main() 156 …if (gs == gsubdomainnums[ss]) { /* Global subdomain gs being viewed is my subdomain with local num… in main() 182 for (gs = 0, s = 0; gs < gnsubdomains; ++gs) { in main() [all …]
|
| /petsc/src/snes/tutorials/ |
| H A D | ex18.c | 297 PetscScalar dn, ds, de, dw, an, as, ae, aw, bn, bs, be, bw, gn, gs, ge, gw; in FormJacobian() local 351 gs = coef * bs * (t0 - ts); in FormJacobian() 360 v[0] = -hxdhy * (ds - gs); in FormJacobian() 366 v[2] = hxdhy * (ds + dn + gs - gn) + hydhx * (dw + de + gw - ge); in FormJacobian() 420 gs = coef * bs * (t0 - ts); in FormJacobian() 429 v[0] = -hxdhy * (ds - gs); in FormJacobian() 432 v[1] = hxdhy * (ds + dn + gs - gn) + hydhx * (dw + de + gw - ge); in FormJacobian() 449 gs = coef * bs * (t0 - ts); in FormJacobian() 451 v[0] = -hxdhy * (ds - gs); in FormJacobian() 454 v[1] = hxdhy * (ds + gs) + hydhx * (dw + de + gw - ge); in FormJacobian() [all …]
|
| /petsc/src/snes/tests/ |
| H A D | ex20.c | 452 PetscScalar ***x, bn, bs, be, bw, bu, bd, gn, gs, ge, gw, gu, gd; in FormJacobian() local 509 gs = coef * bs * (t0 - ts); in FormJacobian() 539 v[1] = -hzhxdhy * (ds - gs); in FormJacobian() 547 …v[3] = hzhxdhy * (ds + dn + gs - gn) + hyhzdhx * (dw + de + gw - ge) + hxhydhz * (dd + du + gd -… in FormJacobian() 687 gs = coef * bs * (ts - t0); in FormJacobian() 701 v[0] = -hzhxdhy * (ds - gs); in FormJacobian() 705 v[1] = hzhxdhy * (ds + gs) + hyhzdhx * (dw + de + gw - ge) + hxhydhz * (du - gu); in FormJacobian() 739 v[1] = -hzhxdhy * (ds - gs); in FormJacobian() 743 … v[2] = hzhxdhy * (ds + gs) + hyhzdhx * (dw + de + gw - ge) + hxhydhz * (dd + du + gd - gu); in FormJacobian() 770 v[1] = -hzhxdhy * (ds - gs); in FormJacobian() [all …]
|
| /petsc/src/dm/impls/plex/tests/ |
| H A D | ex55.c | 215 PetscSection gs; in main() local 223 PetscCall(DMGetGlobalSection(dm, &gs)); in main() 224 PetscCall(PetscSectionGetChart(gs, &pStart, &pEnd)); in main() 230 PetscCall(PetscSectionGetDof(gs, p, &dof)); in main() 231 PetscCall(PetscSectionGetOffset(gs, p, &off)); in main()
|
| /petsc/src/vec/vec/utils/ |
| H A D | vsection.c | 257 PetscErrorCode PetscSectionVecNorm(PetscSection s, PetscSection gs, Vec x, NormType type, PetscReal… in PetscSectionVecNorm() argument 263 PetscValidHeaderSpecific(gs, PETSC_SECTION_CLASSID, 2); in PetscSectionVecNorm() 274 PetscCall(PetscSectionGetField_Internal(s, gs, x, f, pStart, pEnd, &is, &subv)); in PetscSectionVecNorm() 276 PetscCall(PetscSectionRestoreField_Internal(s, gs, x, f, pStart, pEnd, &is, &subv)); in PetscSectionVecNorm()
|
| /petsc/src/vec/is/section/interface/ |
| H A D | section.c | 1477 PetscSection gs; in PetscSectionCreateGlobalSection() local 1492 PetscCall(PetscSectionCreate(PetscObjectComm((PetscObject)s), &gs)); in PetscSectionCreateGlobalSection() 1494 if (numFields > 0) PetscCall(PetscSectionSetNumFields(gs, numFields)); in PetscSectionCreateGlobalSection() 1496 PetscCall(PetscSectionSetChart(gs, pStart, pEnd)); in PetscSectionCreateGlobalSection() 1497 gs->includesConstraints = includeConstraints; in PetscSectionCreateGlobalSection() 1511 PetscCall(PetscSectionSetDof(gs, p, dof)); in PetscSectionCreateGlobalSection() 1513 if (!includeConstraints && cdof > 0) PetscCall(PetscSectionSetConstraintDof(gs, p, cdof)); in PetscSectionCreateGlobalSection() 1516 PetscCall(PetscSectionSetUpBC(gs)); in PetscSectionCreateGlobalSection() 1517 …gs->bcIndices) PetscCall(PetscArraycpy(gs->bcIndices, s->bcIndices, gs->bc->atlasOff[gs->bc->pEnd … in PetscSectionCreateGlobalSection() 1524 gs->atlasDof[p - pStart] = recv[p]; in PetscSectionCreateGlobalSection() [all …]
|
| /petsc/src/dm/interface/ |
| H A D | dmi.c | 78 static PetscErrorCode PetscSectionSelectFields_Private(PetscSection s, PetscSection gs, PetscInt nu… in PetscSectionSelectFields_Private() argument 87 PetscCall(PetscSectionGetChart(gs, &pStart, &pEnd)); in PetscSectionSelectFields_Private() 113 PetscCall(PetscSectionGetDof(gs, point, &gdof)); in PetscSectionSelectFields_Private() 158 PetscCall(PetscGlobalMinMaxInt(PetscObjectComm((PetscObject)gs), bsLocal, bsMinMax)); in PetscSectionSelectFields_Private() 170 PetscCall(PetscSectionGetDof(gs, point, &gdof)); in PetscSectionSelectFields_Private() 174 PetscCall(PetscSectionGetOffset(gs, point, &goff)); in PetscSectionSelectFields_Private() 216 …PetscCall(ISCreateGeneral(PetscObjectComm((PetscObject)gs), subSize, subIndices, PETSC_OWN_POINTER… in PetscSectionSelectFields_Private() 228 …PetscCallMPI(MPIU_Allreduce(&set, &rset, 1, MPIU_INT, MPI_PROD, PetscObjectComm((PetscObject)gs))); in PetscSectionSelectFields_Private()
|
| H A D | dm.c | 3107 PetscSection s, gs; in DMLocalToGlobalBegin() local 3161 PetscCall(DMGetGlobalSection(dm, &gs)); in DMLocalToGlobalBegin() 3168 PetscCall(PetscSectionGetDof(gs, p, &gdof)); in DMLocalToGlobalBegin() 3170 PetscCall(PetscSectionGetConstraintDof(gs, p, &gcdof)); in DMLocalToGlobalBegin() 3172 PetscCall(PetscSectionGetOffset(gs, p, &goff)); in DMLocalToGlobalBegin()
|
| /petsc/src/dm/impls/plex/ |
| H A D | plexnatural.c | 309 PetscSection gs; in DMPlexGlobalToNaturalBegin() local 316 PetscCall(DMGetGlobalSection(dm, &gs)); in DMPlexGlobalToNaturalBegin() 317 PetscCall(PetscSectionGetConstrainedStorageSize(gs, &Nl)); in DMPlexGlobalToNaturalBegin()
|
| /petsc/src/snes/interface/ |
| H A D | snesut.c | 677 PetscSection s, gs; in SNESMonitorDefaultField() local 681 PetscCall(DMGetGlobalSection(dm, &gs)); in SNESMonitorDefaultField() 682 if (!s || !gs) PetscCall(SNESMonitorDefault(snes, its, fgnorm, vf)); in SNESMonitorDefaultField() 685 PetscCall(PetscSectionVecNorm(s, gs, r, NORM_2, res)); in SNESMonitorDefaultField()
|
| /petsc/include/petsc/private/ |
| H A D | dmimpl.h | 521 const PetscSection gs = dm->globalSection; in DMGetGlobalFieldOffset_Private() local 523 const PetscInt goff = gs->atlasOff[point - s->pStart]; in DMGetGlobalFieldOffset_Private()
|
| /petsc/ |
| H A D | gmakefile.test | 382 ifdef gs 383 gmakesearch = $(gs)
|
| /petsc/src/dm/impls/swarm/ |
| H A D | swarm.c | 1072 PetscSection gs; in DMCreateGradientMatrix_Swarm() local 1082 PetscCall(DMGetGlobalSection(dm, &gs)); in DMCreateGradientMatrix_Swarm() 1083 PetscCall(PetscSectionGetConstrainedStorageSize(gs, &n)); in DMCreateGradientMatrix_Swarm()
|
| /petsc/src/mat/impls/aij/mpi/mumps/ |
| H A D | mumps.c | 2708 PetscBool gs; /* gs is false if any rank other than root has non-empty IS */ in MatSetFromOptions_MUMPS() local 2711 …gs = mumps->myid ? (mumps->id.size_schur ? PETSC_FALSE : PETSC_TRUE) : PETSC_TRUE… in MatSetFromOptions_MUMPS() 2712 PetscCallMPI(MPIU_Allreduce(MPI_IN_PLACE, &gs, 1, MPI_C_BOOL, MPI_LAND, mumps->petsc_comm)); in MatSetFromOptions_MUMPS() 2713 …PetscCheck(gs, PETSC_COMM_SELF, PETSC_ERR_SUP, "MUMPS distributed parallel Schur complements not y… in MatSetFromOptions_MUMPS()
|
| /petsc/systems/Apple/iOS/PETSc/PETSc.xcodeproj/ |
| H A D | project.pbxproj | 286 …D89D1D97207AA1AB00FACC19 /* gs.c in Sources */ = {isa = PBXBuildFile; fileRef = D89D1AAF207AA1A900… 1038 …89D1AAF207AA1A900FACC19 /* gs.c */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType … 1809 D89D1AAF207AA1A900FACC19 /* gs.c */, 2911 D89D1D97207AA1AB00FACC19 /* gs.c in Sources */,
|
| /petsc/doc/ |
| H A D | petsc.bib | 7612 …url = {http://md1.csa.com/partners/viewrecord.php?requester=gs&collection=TRD&recid=A032…
|