| /petsc/src/mat/graphops/color/interface/ |
| H A D | matcoloring.c | 71 MatColoring mc; in MatColoringCreate() local 78 …PetscCall(PetscHeaderCreate(mc, MAT_COLORING_CLASSID, "MatColoring", "Matrix coloring", "MatColori… in MatColoringCreate() 80 mc->mat = m; in MatColoringCreate() 81 mc->dist = 2; /* default to Jacobian computation case */ in MatColoringCreate() 82 mc->maxcolors = IS_COLORING_MAX; in MatColoringCreate() 83 *mcptr = mc; in MatColoringCreate() 84 mc->valid = PETSC_FALSE; in MatColoringCreate() 85 mc->weight_type = MAT_COLORING_WEIGHT_RANDOM; in MatColoringCreate() 86 mc->user_weights = NULL; in MatColoringCreate() 87 mc->user_lperm = NULL; in MatColoringCreate() [all …]
|
| /petsc/src/mat/graphops/color/impls/power/ |
| H A D | power.c | 3 static PetscErrorCode MatColoringApply_Power(MatColoring mc, ISColoring *iscoloring) in MatColoringApply_Power() argument 5 Mat m = mc->mat, mp, ms; in MatColoringApply_Power() 12 if (mc->dist == 1) { in MatColoringApply_Power() 16 for (i = 2; i < mc->dist; i++) { in MatColoringApply_Power() 23 PetscCall(PetscObjectGetOptionsPrefix((PetscObject)mc, &optionsprefix)); in MatColoringApply_Power() 28 PetscCall(MatColoringSetWeightType(imc, mc->weight_type)); in MatColoringApply_Power() 48 PETSC_EXTERN PetscErrorCode MatColoringCreate_Power(MatColoring mc) in MatColoringCreate_Power() argument 51 mc->ops->apply = MatColoringApply_Power; in MatColoringCreate_Power() 52 mc->ops->view = NULL; in MatColoringCreate_Power() 53 mc->ops->destroy = NULL; in MatColoringCreate_Power() [all …]
|
| /petsc/src/mat/graphops/color/impls/jp/ |
| H A D | jp.c | 11 static PetscErrorCode MatColoringDestroy_JP(MatColoring mc) in MatColoringDestroy_JP() argument 14 PetscCall(PetscFree(mc->data)); in MatColoringDestroy_JP() 18 static PetscErrorCode MatColoringSetFromOptions_JP(MatColoring mc, PetscOptionItems PetscOptionsObj… in MatColoringSetFromOptions_JP() argument 20 MC_JP *jp = (MC_JP *)mc->data; in MatColoringSetFromOptions_JP() 29 static PetscErrorCode MCJPGreatestWeight_Private(MatColoring mc, const PetscReal *weights, PetscRea… in MCJPGreatestWeight_Private() argument 31 MC_JP *jp = (MC_JP *)mc->data; in MCJPGreatestWeight_Private() 32 Mat G = mc->mat, dG, oG; in MCJPGreatestWeight_Private() 66 PetscCall(PetscSFCreate(PetscObjectComm((PetscObject)mc), &sf)); in MCJPGreatestWeight_Private() 93 PetscCall(PetscLogEventBegin(MATCOLORING_Comm, mc, 0, 0, 0)); in MCJPGreatestWeight_Private() 96 PetscCall(PetscLogEventEnd(MATCOLORING_Comm, mc, 0, 0, 0)); in MCJPGreatestWeight_Private() [all …]
|
| /petsc/src/snes/interface/ |
| H A D | snesj2.c | 65 MatColoring mc; in SNESComputeJacobianDefaultColor() local 83 PetscCall(MatColoringCreate(B, &mc)); in SNESComputeJacobianDefaultColor() 84 PetscCall(MatColoringSetDistance(mc, 2)); in SNESComputeJacobianDefaultColor() 85 PetscCall(MatColoringSetType(mc, MATCOLORINGSL)); in SNESComputeJacobianDefaultColor() 86 PetscCall(MatColoringSetFromOptions(mc)); in SNESComputeJacobianDefaultColor() 87 PetscCall(MatColoringApply(mc, &iscoloring)); in SNESComputeJacobianDefaultColor() 88 PetscCall(MatColoringDestroy(&mc)); in SNESComputeJacobianDefaultColor() 147 MatColoring mc; in SNESPruneJacobianColor() local 154 PetscCall(MatColoringCreate(B, &mc)); in SNESPruneJacobianColor() 155 PetscCall(MatColoringSetDistance(mc, 2)); in SNESPruneJacobianColor() [all …]
|
| /petsc/src/mat/graphops/color/impls/minpack/ |
| H A D | color.c | 27 static PetscErrorCode MatColoringApply_SL(MatColoring mc, ISColoring *iscoloring) in MatColoringApply_SL() argument 33 Mat mat = mc->mat; in MatColoringApply_SL() 43 PetscCheck(mc->dist == 2, PETSC_COMM_SELF, PETSC_ERR_SUP, "SL may only do distance 2 coloring"); in MatColoringApply_SL() 115 PETSC_EXTERN PetscErrorCode MatColoringCreate_SL(MatColoring mc) in MatColoringCreate_SL() argument 118 mc->dist = 2; in MatColoringCreate_SL() 119 mc->data = NULL; in MatColoringCreate_SL() 120 mc->ops->apply = MatColoringApply_SL; in MatColoringCreate_SL() 121 mc->ops->view = NULL; in MatColoringCreate_SL() 122 mc->ops->destroy = NULL; in MatColoringCreate_SL() 123 mc->ops->setfromoptions = NULL; in MatColoringCreate_SL() [all …]
|
| /petsc/src/mat/graphops/color/utils/ |
| H A D | weights.c | 4 static PetscErrorCode MatColoringCreateLexicalWeights(MatColoring mc, PetscReal *weights) in MatColoringCreateLexicalWeights() argument 7 Mat G = mc->mat; in MatColoringCreateLexicalWeights() 15 static PetscErrorCode MatColoringCreateRandomWeights(MatColoring mc, PetscReal *weights) in MatColoringCreateRandomWeights() argument 20 Mat G = mc->mat; in MatColoringCreateRandomWeights() 24 PetscCall(PetscRandomCreate(PetscObjectComm((PetscObject)mc), &rand)); in MatColoringCreateRandomWeights() 108 static PetscErrorCode MatColoringCreateLargestFirstWeights(MatColoring mc, PetscReal *weights) in MatColoringCreateLargestFirstWeights() argument 114 Mat G = mc->mat; in MatColoringCreateLargestFirstWeights() 118 PetscCall(PetscRandomCreate(PetscObjectComm((PetscObject)mc), &rand)); in MatColoringCreateLargestFirstWeights() 123 PetscCall(MatColoringGetDegrees(G, mc->dist, degrees)); in MatColoringCreateLargestFirstWeights() 135 static PetscErrorCode MatColoringCreateSmallestLastWeights(MatColoring mc, PetscReal *weights) in MatColoringCreateSmallestLastWeights() argument [all …]
|
| H A D | valid.c | 6 PETSC_EXTERN PetscErrorCode MatColoringTest(MatColoring mc, ISColoring coloring) in MatColoringTest() argument 8 Mat m = mc->mat; in MatColoringTest() 17 PetscInt dist = mc->dist; in MatColoringTest() 23 PetscCall(MatColoringGetMaxColors(mc, &maxcolors)); in MatColoringTest() 25 PetscCall(MatColoringCreateBipartiteGraph(mc, &etoc, &etor)); in MatColoringTest() 57 …PetscCheck(idx == nentries, PetscObjectComm((PetscObject)mc), PETSC_ERR_NOT_CONVERGED, "Bad number… in MatColoringTest() 58 PetscCall(PetscLogEventBegin(MATCOLORING_Comm, mc, 0, 0, 0)); in MatColoringTest() 61 PetscCall(PetscLogEventEnd(MATCOLORING_Comm, mc, 0, 0, 0)); in MatColoringTest() 76 …PetscCheck(idx == nentries, PetscObjectComm((PetscObject)mc), PETSC_ERR_NOT_CONVERGED, "Bad number… in MatColoringTest() 77 PetscCall(PetscLogEventBegin(MATCOLORING_Comm, mc, 0, 0, 0)); in MatColoringTest() [all …]
|
| H A D | bipartite.c | 4 PETSC_EXTERN PetscErrorCode MatColoringCreateBipartiteGraph(MatColoring mc, PetscSF *etoc, PetscSF … in MatColoringCreateBipartiteGraph() argument 13 Mat m = mc->mat; in MatColoringCreateBipartiteGraph()
|
| /petsc/src/mat/graphops/color/impls/greedy/ |
| H A D | greedy.c | 10 static PetscErrorCode MatColoringDestroy_Greedy(MatColoring mc) in MatColoringDestroy_Greedy() argument 13 PetscCall(PetscFree(mc->data)); in MatColoringDestroy_Greedy() 17 static PetscErrorCode GreedyColoringLocalDistanceOne_Private(MatColoring mc, PetscReal *wts, PetscI… in GreedyColoringLocalDistanceOne_Private() argument 20 Mat m = mc->mat; in GreedyColoringLocalDistanceOne_Private() 41 …PetscCheck(isMPIAIJ || isSEQAIJ, PetscObjectComm((PetscObject)mc), PETSC_ERR_ARG_WRONG, "Matrix mu… in GreedyColoringLocalDistanceOne_Private() 68 PetscCall(MatColoringGetMaxColors(mc, &maxcolors)); in GreedyColoringLocalDistanceOne_Private() 90 PetscCall(PetscLogEventBegin(MATCOLORING_Local, mc, 0, 0, 0)); in GreedyColoringLocalDistanceOne_Private() 138 PetscCall(PetscLogEventEnd(MATCOLORING_Local, mc, 0, 0, 0)); in GreedyColoringLocalDistanceOne_Private() 141 PetscCall(PetscLogEventBegin(MATCOLORING_Comm, mc, 0, 0, 0)); in GreedyColoringLocalDistanceOne_Private() 158 …scCallMPI(MPIU_Allreduce(&nd, &nd_global, 1, MPIU_INT, MPI_SUM, PetscObjectComm((PetscObject)mc))); in GreedyColoringLocalDistanceOne_Private() [all …]
|
| /petsc/src/mat/graphops/color/impls/natural/ |
| H A D | natural.c | 4 static PetscErrorCode MatColoringApply_Natural(MatColoring mc, ISColoring *iscoloring) in MatColoringApply_Natural() argument 10 Mat mat = mc->mat; in MatColoringApply_Natural() 11 Mat mat_seq = mc->mat; in MatColoringApply_Natural() 71 PETSC_EXTERN PetscErrorCode MatColoringCreate_Natural(MatColoring mc) in MatColoringCreate_Natural() argument 74 mc->data = NULL; in MatColoringCreate_Natural() 75 mc->ops->apply = MatColoringApply_Natural; in MatColoringCreate_Natural() 76 mc->ops->view = NULL; in MatColoringCreate_Natural() 77 mc->ops->destroy = NULL; in MatColoringCreate_Natural() 78 mc->ops->setfromoptions = NULL; in MatColoringCreate_Natural()
|
| /petsc/src/mat/tutorials/ |
| H A D | ex16.c | 90 MatColoring mc; in main() local 94 PetscCall(MatColoringCreate(Asp, &mc)); in main() 95 PetscCall(MatColoringSetType(mc, MATCOLORINGSL)); in main() 96 PetscCall(MatColoringSetFromOptions(mc)); in main() 97 PetscCall(MatColoringApply(mc, &iscoloring)); in main() 98 PetscCall(MatColoringDestroy(&mc)); in main()
|
| /petsc/src/mat/tests/ |
| H A D | ex161.c | 11 MatColoring mc; in main() local 85 PetscCall(MatColoringCreate(C, &mc)); in main() 86 PetscCall(MatColoringSetDistance(mc, 2)); in main() 88 PetscCall(MatColoringSetFromOptions(mc)); in main() 89 PetscCall(MatColoringApply(mc, &iscoloring)); in main() 90 PetscCall(MatColoringDestroy(&mc)); in main()
|
| /petsc/src/snes/impls/gs/ |
| H A D | gssecant.c | 10 MatColoring mc; in SNESComputeNGSDefaultSecant() local 42 PetscCall(MatColoringCreate(snes->jacobian, &mc)); in SNESComputeNGSDefaultSecant() 43 PetscCall(MatColoringSetDistance(mc, 1)); in SNESComputeNGSDefaultSecant() 44 PetscCall(MatColoringSetFromOptions(mc)); in SNESComputeNGSDefaultSecant() 45 PetscCall(MatColoringApply(mc, &coloring)); in SNESComputeNGSDefaultSecant() 46 PetscCall(MatColoringDestroy(&mc)); in SNESComputeNGSDefaultSecant()
|
| /petsc/src/snes/tests/ |
| H A D | ex1f.F90 | 440 MatColoring mc 546 PetscCallA(MatColoringCreate(J, mc, ierr)) 547 PetscCallA(MatColoringSetType(mc, MATCOLORINGNATURAL, ierr)) 548 PetscCallA(MatColoringSetFromOptions(mc, ierr)) 549 PetscCallA(MatColoringApply(mc, iscoloring, ierr)) 550 PetscCallA(MatColoringDestroy(mc, ierr))
|
| H A D | ex1.c | 159 MatColoring mc; in main() local 181 PetscCall(MatColoringCreate(J, &mc)); in main() 182 PetscCall(MatColoringSetType(mc, MATCOLORINGSL)); in main() 183 PetscCall(MatColoringSetFromOptions(mc)); in main() 184 PetscCall(MatColoringApply(mc, &iscoloring)); in main() 185 PetscCall(MatColoringDestroy(&mc)); in main()
|
| /petsc/src/snes/tutorials/ex10d/ |
| H A D | ex10.c | 397 MatColoring mc; in main() local 402 PetscCall(MatColoringCreate(Jac, &mc)); in main() 403 PetscCall(MatColoringSetType(mc, MATCOLORINGSL)); in main() 404 PetscCall(MatColoringSetFromOptions(mc)); in main() 405 PetscCall(MatColoringApply(mc, &iscoloring)); in main() 406 PetscCall(MatColoringDestroy(&mc)); in main()
|
| /petsc/src/dm/impls/stag/ |
| H A D | stagmulti.c | 995 PetscInt xc, mc, nExtraxc, i, d, ii, count; in DMStagPopulateRestriction1d_Internal() local 1017 PetscCall(DMStagGetCorners(dmc, &xc, NULL, NULL, &mc, NULL, NULL, &nExtraxc, NULL, NULL)); in DMStagPopulateRestriction1d_Internal() 1020 for (i = xc; i < xc + mc + nExtraxc; ++i) { in DMStagPopulateRestriction1d_Internal() 1042 for (i = xc; i < xc + mc; ++i) { in DMStagPopulateRestriction1d_Internal() 1067 PetscInt xc, yc, mc, nc, nExtraxc, nExtrayc, i, j, d, ii, jj, count; in DMStagPopulateRestriction2d_Internal() local 1092 PetscCall(DMStagGetCorners(dmc, &xc, &yc, NULL, &mc, &nc, NULL, &nExtraxc, &nExtrayc, NULL)); in DMStagPopulateRestriction2d_Internal() 1096 for (i = xc; i < xc + mc + nExtraxc; ++i) { in DMStagPopulateRestriction2d_Internal() 1126 for (i = xc; i < xc + mc + nExtraxc; ++i) { in DMStagPopulateRestriction2d_Internal() 1154 for (i = xc; i < xc + mc; ++i) { in DMStagPopulateRestriction2d_Internal() 1182 for (i = xc; i < xc + mc; ++i) { in DMStagPopulateRestriction2d_Internal() [all …]
|
| H A D | stag1d.c | 54 PetscInt xc, mc, nExtraxc, i, d; in DMStagRestrictSimple_1d() local 65 PetscCall(DMStagGetCorners(dmc, &xc, NULL, NULL, &mc, NULL, NULL, &nExtraxc, NULL, NULL)); in DMStagRestrictSimple_1d() 75 for (i = xc; i < xc + mc + nExtraxc; ++i) arrc[i][ileftc + d] = arrf[factorx * i][ileftf + d]; in DMStagRestrictSimple_1d() 78 for (i = xc; i < xc + mc; ++i) { in DMStagRestrictSimple_1d()
|
| H A D | stag2d.c | 60 PetscInt xc, yc, mc, nc, nExtraxc, nExtrayc, i, j, d; in DMStagRestrictSimple_2d() local 72 PetscCall(DMStagGetCorners(dmc, &xc, &yc, NULL, &mc, &nc, NULL, &nExtraxc, &nExtrayc, NULL)); in DMStagRestrictSimple_2d() 87 for (i = xc; i < xc + mc + nExtraxc; ++i) { in DMStagRestrictSimple_2d() 95 for (i = xc; i < xc + mc + nExtraxc; ++i) { in DMStagRestrictSimple_2d() 104 for (i = xc; i < xc + mc; ++i) { in DMStagRestrictSimple_2d() 113 for (i = xc; i < xc + mc; ++i) { in DMStagRestrictSimple_2d()
|
| H A D | stag3d.c | 67 PetscInt xc, yc, zc, mc, nc, pc, nExtraxc, nExtrayc, nExtrazc, i, j, k, d; in DMStagRestrictSimple_3d() local 81 PetscCall(DMStagGetCorners(dmc, &xc, &yc, &zc, &mc, &nc, &pc, &nExtraxc, &nExtrayc, &nExtrazc)); in DMStagRestrictSimple_3d() 105 for (i = xc; i < xc + mc + nExtraxc; ++i) { in DMStagRestrictSimple_3d() 114 for (i = xc; i < xc + mc; ++i) { in DMStagRestrictSimple_3d() 124 for (i = xc; i < xc + mc + nExtraxc; ++i) { in DMStagRestrictSimple_3d() 134 for (i = xc; i < xc + mc + nExtraxc; ++i) { in DMStagRestrictSimple_3d() 144 for (i = xc; i < xc + mc; ++i) { in DMStagRestrictSimple_3d() 156 for (i = xc; i < xc + mc; ++i) { in DMStagRestrictSimple_3d() 168 for (i = xc; i < xc + mc + nExtraxc; ++i) { in DMStagRestrictSimple_3d() 180 for (i = xc; i < xc + mc; ++i) { in DMStagRestrictSimple_3d()
|
| /petsc/src/ts/tests/ |
| H A D | ex4.c | 48 MatColoring mc; in main() local 122 PetscCall(MatColoringCreate(J, &mc)); in main() 123 PetscCall(MatColoringSetType(mc, MATCOLORINGSL)); in main() 124 PetscCall(MatColoringSetFromOptions(mc)); in main() 125 PetscCall(MatColoringApply(mc, &iscoloring)); in main() 126 PetscCall(MatColoringDestroy(&mc)); in main()
|
| /petsc/src/ts/interface/ |
| H A D | ts.c | 5594 MatColoring mc; in TSComputeIJacobianDefaultColor() local 5596 PetscCall(MatColoringCreate(B, &mc)); in TSComputeIJacobianDefaultColor() 5597 PetscCall(MatColoringSetDistance(mc, 2)); in TSComputeIJacobianDefaultColor() 5598 PetscCall(MatColoringSetType(mc, MATCOLORINGSL)); in TSComputeIJacobianDefaultColor() 5599 PetscCall(MatColoringSetFromOptions(mc)); in TSComputeIJacobianDefaultColor() 5600 PetscCall(MatColoringApply(mc, &iscoloring)); in TSComputeIJacobianDefaultColor() 5601 PetscCall(MatColoringDestroy(&mc)); in TSComputeIJacobianDefaultColor() 6145 MatColoring mc = NULL; in TSPruneIJacobianColor() local 6152 PetscCall(MatColoringCreate(B, &mc)); in TSPruneIJacobianColor() 6153 PetscCall(MatColoringSetDistance(mc, 2)); in TSPruneIJacobianColor() [all …]
|
| /petsc/src/dm/impls/da/ |
| H A D | dainterp.c | 1009 PetscInt dimc, Mc, Nc, Pc, mc, nc, pc, dofc, sc, dimf, Mf, Nf, Pf, mf, nf, pf, doff, sf; in DMCreateInterpolation_DA() local 1020 …PetscCall(DMDAGetInfo(dac, &dimc, &Mc, &Nc, &Pc, &mc, &nc, &pc, &dofc, &sc, &bxc, &byc, &bzc, &stc… in DMCreateInterpolation_DA() 1266 PetscInt dimc, Mc, Nc, Pc, mc, nc, pc, dofc, sc, dimf, Mf, Nf, Pf, mf, nf, pf, doff, sf; in DMCreateInjection_DA() local 1276 …PetscCall(DMDAGetInfo(dac, &dimc, &Mc, &Nc, &Pc, &mc, &nc, &pc, &dofc, &sc, &bxc, &byc, &bzc, &stc… in DMCreateInjection_DA() 1334 PetscInt dimc, Mc, Nc, Pc, mc, nc, pc, dofc, sc; in DMDACreateAggregates() local 1359 …PetscCall(DMDAGetInfo(dac, &dimc, &Mc, &Nc, &Pc, &mc, &nc, &pc, &dofc, &sc, &bxc, &byc, &bzc, &stc… in DMDACreateAggregates()
|
| /petsc/share/petsc/datafiles/meshes/ |
| H A D | testcase3D.cas | 2057 (dpm/allow-mc-boiling-failure? #f) 2058 (dpm/mc-film-boiling-formulation 1) 2059 (dpm/mc-boiling-formulation 1) 2262 (dpm/linearize-trap-mc-particles-factor-m 0.05) 2263 (dpm/linearize-trap-mc-particles-factor 0.1) 2459 (dpm/coupled-update-mc-reacting? #f) 5614 (montecarlo/mc-cpvc 1) 5623 (montecarlo/mc-urf 0.5) 9847 (mc-bsource-p? . #f) 9848 (mc-poldfun-p? . #f) [all …]
|
| /petsc/src/binding/petsc4py/src/petsc4py/PETSc/ |
| H A D | Mat.pyx | 1498 cdef Py_ssize_t j, mc = len(mats[0]) 1500 cdef PetscInt nc = <PetscInt>mc 1507 for j from 0 <= j < mc: 1509 cmats[i*mc+j] = (<Mat?>mat).mat if mat is not None else NULL 1515 for j from 0 <= j < mc: ciscols[j] = (<IS?>iscols[j]).iset
|