204   PetscInt        xbase, *bases, *ldims, j, x_t, y_t, s_t, base, count;  in DMSetUp_DA_2D()  local
533       x_t = lx[n0 % m];  in DMSetUp_DA_2D()
535       s_t = bases[n0] + x_t * y_t - (s_y - i) * x_t - s_x;  in DMSetUp_DA_2D()
540       x_t = x;  in DMSetUp_DA_2D()
542       s_t = bases[n1] + x_t * y_t - (s_y + 1 - i) * x_t;  in DMSetUp_DA_2D()
543       for (j = 0; j < x_t; j++) idx[nn++] = s_t++;  in DMSetUp_DA_2D()
549       x_t = lx[n2 % m];  in DMSetUp_DA_2D()
551       s_t = bases[n2] + x_t * y_t - (s_y + 1 - i) * x_t;  in DMSetUp_DA_2D()
558       x_t = lx[n3 % m];  in DMSetUp_DA_2D()
560       s_t = bases[n3] + (i + 1) * x_t - s_x;  in DMSetUp_DA_2D()
569       x_t = lx[n5 % m];  in DMSetUp_DA_2D()
571       s_t = bases[n5] + (i)*x_t;  in DMSetUp_DA_2D()
580       x_t = lx[n6 % m];  in DMSetUp_DA_2D()
582       s_t = bases[n6] + (i)*x_t - s_x;  in DMSetUp_DA_2D()
587       x_t = x;  in DMSetUp_DA_2D()
589       s_t = bases[n7] + (i - 1) * x_t;  in DMSetUp_DA_2D()
590       for (j = 0; j < x_t; j++) idx[nn++] = s_t++;  in DMSetUp_DA_2D()
596       x_t = lx[n8 % m];  in DMSetUp_DA_2D()
598       s_t = bases[n8] + (i - 1) * x_t;  in DMSetUp_DA_2D()
625         x_t = lx[n0 % m];  in DMSetUp_DA_2D()
627         s_t = bases[n0] + x_t * y_t - (s_y - i) * x_t - s_x;  in DMSetUp_DA_2D()
633         x_t = x;  in DMSetUp_DA_2D()
635         s_t = bases[n1] + x_t * y_t - (s_y + 1 - i) * x_t;  in DMSetUp_DA_2D()
636         for (j = 0; j < x_t; j++) idx[nn++] = s_t++;  in DMSetUp_DA_2D()
645         x_t = lx[n2 % m];  in DMSetUp_DA_2D()
647         s_t = bases[n2] + x_t * y_t - (s_y + 1 - i) * x_t;  in DMSetUp_DA_2D()
656         x_t = lx[n3 % m];  in DMSetUp_DA_2D()
658         s_t = bases[n3] + (i + 1) * x_t - s_x;  in DMSetUp_DA_2D()
671         x_t = lx[n5 % m];  in DMSetUp_DA_2D()
673         s_t = bases[n5] + (i)*x_t;  in DMSetUp_DA_2D()
686         x_t = lx[n6 % m];  in DMSetUp_DA_2D()
688         s_t = bases[n6] + (i)*x_t - s_x;  in DMSetUp_DA_2D()
694         x_t = x;  in DMSetUp_DA_2D()
696         s_t = bases[n7] + (i - 1) * x_t;  in DMSetUp_DA_2D()
697         for (j = 0; j < x_t; j++) idx[nn++] = s_t++;  in DMSetUp_DA_2D()
706         x_t = lx[n8 % m];  in DMSetUp_DA_2D()
708         s_t = bases[n8] + (i - 1) * x_t;  in DMSetUp_DA_2D()