Lines Matching refs:xm
52 PetscInt i, M, xs, xm; in CpuFunction() local
62 PetscCall(DMDAGetCorners(da, &xs, NULL, NULL, &xm, NULL, NULL)); in CpuFunction()
68 xm--; in CpuFunction()
70 if (xs + xm == M) { /* right boundary */ in CpuFunction()
71 R[xs + xm - 1] = X[xs + xm - 1] - 1.0; in CpuFunction()
72 xm--; in CpuFunction()
75 for (i = xs; i < xs + xm; i++) R[i] = d * (X[i - 1] - 2.0 * X[i] + X[i + 1]) + X[i] * X[i] - F[i]; in CpuFunction()
155 PetscInt i, j[3], M, xs, xm; in FormJacobian() local
163 PetscCall(DMDAGetCorners(da, &xs, NULL, NULL, &xm, NULL, NULL)); in FormJacobian()
181 xm--; in FormJacobian()
183 if (xs + xm == M) { /* right boundary */ in FormJacobian()
187 xm--; in FormJacobian()
196 for (i = xs; i < xs + xm; i++) { in FormJacobian()