Lines Matching refs:dd
8 DM_DA *dd = (DM_DA *)da->data; in DMView_DA_2d() local
50 …t_FMT " w %" PetscInt_FMT " s %" PetscInt_FMT "\n", rank, dd->M, dd->N, dd->m, dd->n, dd->w, dd->s… in DMView_DA_2d()
57 double ymin = -1 * dd->s - 1, ymax = dd->N + dd->s; in DMView_DA_2d()
58 double xmin = -1 * dd->s - 1, xmax = dd->M + dd->s; in DMView_DA_2d()
77 ymax = dd->N - 1; in DMView_DA_2d()
78 …for (xmin = 0; xmin < dd->M; xmin++) PetscCall(PetscDrawLine(draw, xmin, ymin, xmin, ymax, PETSC_D… in DMView_DA_2d()
80 xmax = dd->M - 1; in DMView_DA_2d()
81 …for (ymin = 0; ymin < dd->N; ymin++) PetscCall(PetscDrawLine(draw, xmin, ymin, xmax, ymin, PETSC_D… in DMView_DA_2d()
89 xmin = dd->xs / dd->w; in DMView_DA_2d()
90 xmax = (dd->xe - 1) / dd->w; in DMView_DA_2d()
91 ymin = dd->ys; in DMView_DA_2d()
92 ymax = dd->ye - 1; in DMView_DA_2d()
98 base = (dd->base) / dd->w; in DMView_DA_2d()
113 xmin = dd->Xs; in DMView_DA_2d()
114 xmax = dd->Xe; in DMView_DA_2d()
115 ymin = dd->Ys; in DMView_DA_2d()
116 ymax = dd->Ye; in DMView_DA_2d()
119 if ((base % dd->w) == 0) { in DMView_DA_2d()
120 PetscCall(PetscSNPrintf(node, sizeof(node), "%d", (int)(idx[base / dd->w]))); in DMView_DA_2d()
121 PetscCall(PetscDrawString(draw, x / dd->w, y, PETSC_DRAW_BLUE, node)); in DMView_DA_2d()
189 DM_DA *dd = (DM_DA *)da->data; in DMSetUp_DA_2D() local
190 const PetscInt M = dd->M; in DMSetUp_DA_2D()
191 const PetscInt N = dd->N; in DMSetUp_DA_2D()
193 const PetscInt dof = dd->w; in DMSetUp_DA_2D()
194 const PetscInt s = dd->s; in DMSetUp_DA_2D()
195 DMBoundaryType bx = dd->bx; in DMSetUp_DA_2D()
196 DMBoundaryType by = dd->by; in DMSetUp_DA_2D()
197 DMDAStencilType stencil_type = dd->stencil_type; in DMSetUp_DA_2D()
198 PetscInt *lx = dd->lx; in DMSetUp_DA_2D()
199 PetscInt *ly = dd->ly; in DMSetUp_DA_2D()
217 PetscCall(PetscMPIIntCast(dd->m, &m)); in DMSetUp_DA_2D()
218 PetscCall(PetscMPIIntCast(dd->n, &n)); in DMSetUp_DA_2D()
223 dd->p = 1; in DMSetUp_DA_2D()
264 PetscCall(PetscMalloc1(m, &dd->lx)); in DMSetUp_DA_2D()
265 lx = dd->lx; in DMSetUp_DA_2D()
282 PetscCall(PetscMalloc1(n, &dd->ly)); in DMSetUp_DA_2D()
283 ly = dd->ly; in DMSetUp_DA_2D()
382 dd->Nlocal = x * y * dof; in DMSetUp_DA_2D()
383 PetscCall(VecCreateMPIWithArray(comm, dof, dd->Nlocal, PETSC_DECIDE, NULL, &global)); in DMSetUp_DA_2D()
384 dd->nlocal = (Xe - Xs) * (Ye - Ys) * dof; in DMSetUp_DA_2D()
385 PetscCall(VecCreateSeqWithArray(PETSC_COMM_SELF, dof, dd->nlocal, NULL, &local)); in DMSetUp_DA_2D()
506 PetscCall(PetscMalloc1(9, &dd->neighbors)); in DMSetUp_DA_2D()
508 dd->neighbors[0] = n0; in DMSetUp_DA_2D()
509 dd->neighbors[1] = n1; in DMSetUp_DA_2D()
510 dd->neighbors[2] = n2; in DMSetUp_DA_2D()
511 dd->neighbors[3] = n3; in DMSetUp_DA_2D()
512 dd->neighbors[4] = rank; in DMSetUp_DA_2D()
513 dd->neighbors[5] = n5; in DMSetUp_DA_2D()
514 dd->neighbors[6] = n6; in DMSetUp_DA_2D()
515 dd->neighbors[7] = n7; in DMSetUp_DA_2D()
516 dd->neighbors[8] = n8; in DMSetUp_DA_2D()
722 dd->m = m; in DMSetUp_DA_2D()
723 dd->n = n; in DMSetUp_DA_2D()
725 dd->xs = xs * dof; in DMSetUp_DA_2D()
726 dd->xe = xe * dof; in DMSetUp_DA_2D()
727 dd->ys = ys; in DMSetUp_DA_2D()
728 dd->ye = ye; in DMSetUp_DA_2D()
729 dd->zs = 0; in DMSetUp_DA_2D()
730 dd->ze = 1; in DMSetUp_DA_2D()
731 dd->Xs = Xs * dof; in DMSetUp_DA_2D()
732 dd->Xe = Xe * dof; in DMSetUp_DA_2D()
733 dd->Ys = Ys; in DMSetUp_DA_2D()
734 dd->Ye = Ye; in DMSetUp_DA_2D()
735 dd->Zs = 0; in DMSetUp_DA_2D()
736 dd->Ze = 1; in DMSetUp_DA_2D()
741 dd->gtol = gtol; in DMSetUp_DA_2D()
742 dd->base = base; in DMSetUp_DA_2D()
744 dd->ltol = NULL; in DMSetUp_DA_2D()
745 dd->ao = NULL; in DMSetUp_DA_2D()