Home
last modified time | relevance | path

Searched refs:ielemc (Results 1 – 3 of 3) sorted by relevance

/petsc/src/dm/impls/stag/
H A Dstag1d.c55 PetscInt ileftf, ielemf, ileftc, ielemc; in DMStagRestrictSimple_1d() local
72 PetscCall(DMStagGetLocationSlot(dmc, DMSTAG_ELEMENT, 0, &ielemc)); in DMStagRestrictSimple_1d()
79 …if (factorx % 2 == 0) arrc[i][ielemc + d] = 0.5 * (arrf[factorx * i + factorx / 2 - 1][ielemf + d]… in DMStagRestrictSimple_1d()
80 else arrc[i][ielemc + d] = arrf[factorx * i + factorx / 2][ielemf + d]; in DMStagRestrictSimple_1d()
H A Dstag2d.c61 PetscInt idownleftf, ileftf, idownf, ielemf, idownleftc, ileftc, idownc, ielemc; in DMStagRestrictSimple_2d() local
83 PetscCall(DMStagGetLocationSlot(dmc, DMSTAG_ELEMENT, 0, &ielemc)); in DMStagRestrictSimple_2d()
116 …if (factorx % 2 == 0 && factory % 2 == 0) arrc[j][i][ielemc + d] = 0.25 * (arrf[jj - 1][ii - 1][ie… in DMStagRestrictSimple_2d()
117 …else if (factorx % 2 == 0) arrc[j][i][ielemc + d] = 0.5 * (arrf[jj - 1][ii - 1][ielemf + d] + arrf… in DMStagRestrictSimple_2d()
118 …else if (factory % 2 == 0) arrc[j][i][ielemc + d] = 0.5 * (arrf[jj - 1][ii - 1][ielemf + d] + arrf… in DMStagRestrictSimple_2d()
119 else arrc[j][i][ielemc + d] = arrf[jj][ii][ielemf + d]; in DMStagRestrictSimple_2d()
H A Dstag3d.c69 …nt ibackdownleftc, ibackdownc, ibackleftc, ibackc, idownleftc, idownc, ileftc, ielemc; in DMStagRestrictSimple_3d() local
100 PetscCall(DMStagGetLocationSlot(dmc, DMSTAG_ELEMENT, 0, &ielemc)); in DMStagRestrictSimple_3d()
184 …arrc[k][j][i][ielemc + d] = 0.125 * (arrf[kk - 1][jj - 1][ii - 1][ielemf + d] + arrf[kk - 1][jj - … in DMStagRestrictSimple_3d()
185 …else if (factorx % 2 == 0 && factory % 2 == 0) arrc[k][j][i][ielemc + d] = 0.25 * (arrf[kk][jj - 1… in DMStagRestrictSimple_3d()
186 …else if (factorx % 2 == 0 && factorz % 2 == 0) arrc[k][j][i][ielemc + d] = 0.25 * (arrf[kk - 1][jj… in DMStagRestrictSimple_3d()
187 …else if (factory % 2 == 0 && factorz % 2 == 0) arrc[k][j][i][ielemc + d] = 0.25 * (arrf[kk - 1][jj… in DMStagRestrictSimple_3d()
188 …else if (factorx % 2 == 0) arrc[k][j][i][ielemc + d] = 0.5 * (arrf[kk][jj][ii - 1][ielemf + d] + a… in DMStagRestrictSimple_3d()
189 …else if (factory % 2 == 0) arrc[k][j][i][ielemc + d] = 0.5 * (arrf[kk][jj - 1][ii][ielemf + d] + a… in DMStagRestrictSimple_3d()
190 …else if (factorz % 2 == 0) arrc[k][j][i][ielemc + d] = 0.5 * (arrf[kk - 1][jj][ii][ielemf + d] + a… in DMStagRestrictSimple_3d()
191 else arrc[k][j][i][ielemc + d] = arrf[kk][jj][ii][ielemf + d]; in DMStagRestrictSimple_3d()