Lines Matching refs:xs

66     PetscInt xs, xm
93 PetscCall(DMDAGetCorners(dm, xs, ys, PETSC_NULL_INTEGER, xm, ym, PETSC_NULL_INTEGER, ierr))
113 do i = xs, xs + xm - 1
131 xb = bottom_v(1 + i - xs + 1)
132 xrb = bottom_v(1 + i - xs + 2)
145 xt = top_v(1 + i - xs + 1)
146 xlt = top_v(1 + i - xs)
205 if (xs == 0) then ! left side
214 do i = xs, xs + xm - 1
215 d2 = (bottom_v(1 + i + 1 - xs) - bottom_v(1 + i - xs + 2))*rhx
216 d3 = (bottom_v(1 + i - xs + 1) - x_v(1 + i - gxs))*rhy
221 if (xs + xm == mx) then ! right side
230 do i = xs, xs + xm - 1
231 d1 = (x_v(1 + (gym - 1)*gxm + i - gxs) - top_v(1 + i - xs + 1))*rhy
232 d4 = (top_v(1 + i - xs + 1) - top_v(1 + i - xs))*rhx
237 if ((ys == 0) .and. (xs == 0)) then
243 if ((ys + ym == my) .and. (xs + xm == mx)) then
302 PetscInt xs, xm, gxs, gxm
324 PetscCall(DMDAGetCorners(dm, xs, ys, PETSC_NULL_INTEGER, xm, ym, PETSC_NULL_INTEGER, ierr))
350 do i = xs, xs + xm - 1
370 xb = bottom_v(1 + i - xs + 1)
371 xrb = bottom_v(1 + i - xs + 2)
384 xt = top_v(1 + i - xs + 1)
385 xlt = top_v(1 + i - xs)
514 PetscInt xs, xm, gxs, gxm
541 PetscCall(DMDAGetCorners(dm, xs, ys, PETSC_NULL_INTEGER, xm, ym, PETSC_NULL_INTEGER, ierr))
561 xt = l + hx*xs
567 xt = l + hx*xs
670 PetscInt xs, xm, ys, ym
683 PetscCall(DMDAGetCorners(dm, xs, ys, PETSC_NULL_INTEGER, xm, ym, PETSC_NULL_INTEGER, ierr))
690 do i = xs, xs + xm - 1
694 row = (j - ys)*xm + (i - xs)
725 PetscInt xs, xm, gxs, gxm
755 PetscCall(DMDAGetCorners(dm, xs, ys, PETSC_NULL_INTEGER, xm, ym, PETSC_NULL_INTEGER, ierr))
768 do i = xs, xs + xm - 1
770 …x_v(1 + row) = ((j + 1)*bottom_v(1 + i - xs + 1)/my + (my - j + 1)*top_v(1 + i - xs + 1)/(my + 2) …