| /petsc/src/sys/classes/draw/interface/ |
| H A D | dviewp.c | 25 PetscErrorCode PetscDrawSetViewPort(PetscDraw draw, PetscReal xl, PetscReal yl, PetscReal xr, Petsc… in PetscDrawSetViewPort() argument 29 …yl >= 0.0 && yr <= 1.0 && xr > xl && yr > yl, PETSC_COMM_SELF, PETSC_ERR_ARG_OUTOFRANGE, "ViewPort… in PetscDrawSetViewPort() 31 draw->port_yl = yl; in PetscDrawSetViewPort() 34 PetscTryTypeMethod(draw, setviewport, xl, yl, xr, yr); in PetscDrawSetViewPort() 62 PetscErrorCode PetscDrawGetViewPort(PetscDraw draw, PetscReal *xl, PetscReal *yl, PetscReal *xr, Pe… in PetscDrawGetViewPort() argument 67 PetscAssertPointer(yl, 3); in PetscDrawGetViewPort() 71 *yl = draw->port_yl; in PetscDrawGetViewPort() 95 PetscReal xl, xr, yl, yr, h; in PetscDrawSplitViewPort() local 110 yl = ((PetscReal)(rank / n)) * h; in PetscDrawSplitViewPort() 111 yr = yl + h; in PetscDrawSplitViewPort() [all …]
|
| H A D | dcoor.c | 23 PetscErrorCode PetscDrawSetCoordinates(PetscDraw draw, PetscReal xl, PetscReal yl, PetscReal xr, Pe… in PetscDrawSetCoordinates() argument 28 draw->coor_yl = yl; in PetscDrawSetCoordinates() 31 PetscTryTypeMethod(draw, setcoordinates, xl, yl, xr, yr); in PetscDrawSetCoordinates() 54 PetscErrorCode PetscDrawGetCoordinates(PetscDraw draw, PetscReal *xl, PetscReal *yl, PetscReal *xr,… in PetscDrawGetCoordinates() argument 59 PetscAssertPointer(yl, 3); in PetscDrawGetCoordinates() 63 *yl = draw->coor_yl; in PetscDrawGetCoordinates()
|
| H A D | dline.c | 24 PetscErrorCode PetscDrawGetBoundingBox(PetscDraw draw, PetscReal *xl, PetscReal *yl, PetscReal *xr,… in PetscDrawGetBoundingBox() argument 29 if (yl) PetscAssertPointer(yl, 3); in PetscDrawGetBoundingBox() 33 if (yl) *yl = draw->boundbox_yl; in PetscDrawGetBoundingBox() 151 PetscErrorCode PetscDrawLine(PetscDraw draw, PetscReal xl, PetscReal yl, PetscReal xr, PetscReal yr… in PetscDrawLine() argument 155 PetscUseTypeMethod(draw, line, xl, yl, xr, yr, cl); in PetscDrawLine() 177 PetscErrorCode PetscDrawArrow(PetscDraw draw, PetscReal xl, PetscReal yl, PetscReal xr, PetscReal y… in PetscDrawArrow() argument 181 PetscUseTypeMethod(draw, arrow, xl, yl, xr, yr, cl); in PetscDrawArrow()
|
| H A D | dmarker.c | 22 PetscErrorCode PetscDrawMarker(PetscDraw draw, PetscReal xl, PetscReal yl, int cl) in PetscDrawMarker() argument 29 PetscUseTypeMethod(draw, coordinatetopixel, xl, yl, &i, &j); in PetscDrawMarker() 34 } else PetscUseTypeMethod(draw, string, xl, yl, cl, "x"); in PetscDrawMarker() 38 PetscUseTypeMethod(draw, coordinatetopixel, xl, yl, &i, &j); in PetscDrawMarker() 43 } else PetscUseTypeMethod(draw, string, xl, yl, cl, "+"); in PetscDrawMarker() 47 PetscUseTypeMethod(draw, coordinatetopixel, xl, yl, &i, &j); in PetscDrawMarker() 54 } else PetscUseTypeMethod(draw, string, xl, yl, cl, "+"); in PetscDrawMarker() 55 } else PetscUseTypeMethod(draw, point, xl, yl, cl); in PetscDrawMarker()
|
| H A D | dtext.c | 21 PetscErrorCode PetscDrawString(PetscDraw draw, PetscReal xl, PetscReal yl, int cl, const char text[… in PetscDrawString() argument 26 PetscUseTypeMethod(draw, string, xl, yl, cl, text); in PetscDrawString() 47 PetscErrorCode PetscDrawStringVertical(PetscDraw draw, PetscReal xl, PetscReal yl, int cl, const ch… in PetscDrawStringVertical() argument 56 if (draw->ops->stringvertical) PetscUseTypeMethod(draw, stringvertical, xl, yl, cl, text); in PetscDrawStringVertical() 59 …for (int i = 0; (chr[0] = text[i]); i++) PetscCall(PetscDrawString(draw, xl, yl - th * ((PetscReal… in PetscDrawStringVertical() 81 PetscErrorCode PetscDrawStringCentered(PetscDraw draw, PetscReal xc, PetscReal yl, int cl, const ch… in PetscDrawStringCentered() argument 93 PetscCall(PetscDrawString(draw, xc, yl, cl, text)); in PetscDrawStringCentered()
|
| H A D | dpoint.c | 19 PetscErrorCode PetscDrawPoint(PetscDraw draw, PetscReal xl, PetscReal yl, int cl) in PetscDrawPoint() argument 23 PetscUseTypeMethod(draw, point, xl, yl, cl); in PetscDrawPoint()
|
| H A D | drect.c | 124 PetscErrorCode PetscDrawRectangle(PetscDraw draw, PetscReal xl, PetscReal yl, PetscReal xr, PetscRe… in PetscDrawRectangle() argument 128 PetscUseTypeMethod(draw, rectangle, xl, yl, xr, yr, c1, c2, c3, c4); in PetscDrawRectangle()
|
| H A D | dtri.c | 52 PetscReal xl = 0.0, yl = 0.0, xr = 1.0, yr = 1.0; in PetscDrawScalePopup() local 67 PetscCall(PetscDrawSetCoordinates(popup, xl, yl, xr, yr)); in PetscDrawScalePopup() 72 PetscCall(PetscDrawRectangle(popup, xl, yl, xr, yr, c, c, c, c)); in PetscDrawScalePopup() 73 yl += 0.1; in PetscDrawScalePopup()
|
| /petsc/src/sys/classes/draw/utils/ |
| H A D | zoom.c | 20 PetscReal dpause, xc, yc, scale = 1.0, w, h, xr, xl, yr, yl, xmin, xmax, ymin, ymax; in PetscDrawZoom() local 42 PetscCall(PetscDrawGetCoordinates(draw, &xl, &yl, &xr, &yr)); in PetscDrawZoom() 46 ymin = yl; in PetscDrawZoom() 48 h = yr - yl; in PetscDrawZoom() 69 yl = scale * (yl + h - yc) + yc - h * scale; in PetscDrawZoom() 74 PetscCall(PetscDrawSetCoordinates(draw, xl, yl, xr, yr)); in PetscDrawZoom()
|
| H A D | lgc.c | 510 PetscReal xl, yl, xr, yr, tw, th; in PetscDrawLGDraw() local 513 PetscCall(PetscDrawAxisGetLimits(lg->axis, &xl, &xr, &yl, &yr)); in PetscDrawLGDraw() 527 yl = yr - (dim + 1) * th; in PetscDrawLGDraw() 528 PetscCall(PetscDrawLine(draw, xl, yl, xr, yl, PETSC_DRAW_BLACK)); in PetscDrawLGDraw() 529 PetscCall(PetscDrawLine(draw, xr, yl, xr, yr, PETSC_DRAW_BLACK)); in PetscDrawLGDraw() 531 PetscCall(PetscDrawLine(draw, xl, yr, xl, yl, PETSC_DRAW_BLACK)); in PetscDrawLGDraw()
|
| H A D | axisc.c | 254 PetscReal xl, xr, yl, yr, dxl = 0, dyl = 0, dxr = 0, dyr = 0; in PetscDrawAxisDraw() local 303 yl = (dyl * axis->yhigh + dyr * axis->ylow - axis->ylow) / (dyl + dyr - 1); in PetscDrawAxisDraw() 305 PetscCall(PetscDrawSetCoordinates(draw, xl, yl, xr, yr)); in PetscDrawAxisDraw()
|
| /petsc/src/sys/classes/draw/impls/tikz/ |
| H A D | tikz.c | 86 static PetscErrorCode PetscDrawLine_TikZ(PetscDraw draw, PetscReal xl, PetscReal yl, PetscReal xr, … in PetscDrawLine_TikZ() argument 92 …s] (%g,%g) --(%g,%g);\n", TikZColorMap(cl), XTRANS(draw, xl), YTRANS(draw, yl), XTRANS(draw, xr), … in PetscDrawLine_TikZ() 96 static PetscErrorCode PetscDrawRectangle_TikZ(PetscDraw draw, PetscReal xl, PetscReal yl, PetscReal… in PetscDrawRectangle_TikZ() argument 102 …g);\n", TikZColorMap(c1), TikZColorMap(c4), XTRANS(draw, xl), YTRANS(draw, yl), XTRANS(draw, xr), … in PetscDrawRectangle_TikZ() 129 static PetscErrorCode PetscDrawString_TikZ(PetscDraw draw, PetscReal xl, PetscReal yl, int cl, cons… in PetscDrawString_TikZ() argument 135 …above right, %s] at (%g,%g) {%s};\n", TikZColorMap(cl), XTRANS(draw, xl), YTRANS(draw, yl), text)); in PetscDrawString_TikZ() 139 static PetscErrorCode PetscDrawStringVertical_TikZ(PetscDraw draw, PetscReal xl, PetscReal yl, int … in PetscDrawStringVertical_TikZ() argument 149 …yl = yl - ((PetscReal)len) * width * (draw->coor_yr - draw->coor_yl) / (draw->coor_xr - draw->coor… in PetscDrawStringVertical_TikZ() 150 … [rotate=90, %s] at (%g,%g) {%s};\n", TikZColorMap(cl), XTRANS(draw, xl), YTRANS(draw, yl), text)); in PetscDrawStringVertical_TikZ() 157 static PetscErrorCode PetscDrawStringBoxed_TikZ(PetscDraw draw, PetscReal xl, PetscReal yl, int cl,… in PetscDrawStringBoxed_TikZ() argument [all …]
|
| /petsc/src/dm/tutorials/ |
| H A D | ex11f90.F90 | 14 PetscInt ys, yl 53 PetscCallA(DMDAGetCorners(ada, xs, ys, PETSC_NULL_INTEGER, xl, yl, PETSC_NULL_INTEGER, ierr)) 56 do j = ys, ys + yl - 1 76 PetscCallA(DMDAGetCorners(ada, xs, ys, zs, xl, yl, zl, ierr)) 79 do j = ys, ys + yl - 1 126 PetscCallA(DMDAGetCorners(ada, xs, ys, PETSC_NULL_INTEGER, xl, yl, PETSC_NULL_INTEGER, ierr)) 129 do j = ys, ys + yl - 1 145 PetscCallA(DMDAGetCorners(ada, xs, ys, zs, xl, yl, zl, ierr)) 148 do j = ys, ys + yl - 1
|
| /petsc/src/mat/impls/lrc/ |
| H A D | lrc.c | 10 Vec xl, yl; /* auxiliary sequential vectors for matmult operation */ member 38 Vec yl, xl; in MatMult_LRC_kernel() local 43 xl = transpose ? Na->yl : Na->xl; in MatMult_LRC_kernel() 44 yl = transpose ? Na->xl : Na->yl; in MatMult_LRC_kernel() 45 PetscCall(VecGetLocalVector(y, yl)); in MatMult_LRC_kernel() 75 PetscCall(MatMultAdd(Uloc, Na->work2, yl, yl)); in MatMult_LRC_kernel() 78 PetscCall(MatMult(Uloc, Na->work2, yl)); in MatMult_LRC_kernel() 81 PetscCall(VecRestoreLocalVector(y, yl)); in MatMult_LRC_kernel() 112 PetscCall(VecDestroy(&Na->yl)); in MatDestroy_LRC() 287 PetscCall(MatCreateVecs(Uloc, NULL, &Na->yl)); in MatSetUp_LRC()
|
| /petsc/src/vec/vec/tutorials/ |
| H A D | ex3f.F90 | 22 integer4 xl, yl, w, h 64 yl = 0 67 …DrawOpen(PETSC_COMM_WORLD, PETSC_NULL_CHARACTER, PETSC_NULL_CHARACTER, xl, yl, w, h, viewer, ierr))
|
| /petsc/src/ts/tests/ |
| H A D | ex4.c | 277 PetscReal dx, dy, a, epsilon, xc, xl, xr, yl, yr; in RHSJacobian() local 291 yl = 0.5 * a / dy + epsilon / (dy * dy); in RHSJacobian() 329 v[2] = yl; in RHSJacobian() 340 v[2] = yl; in RHSJacobian() 353 v[3] = yl; in RHSJacobian() 367 v[2] = 2.0 * yl; in RHSJacobian() 376 v[2] = 2.0 * yl; in RHSJacobian() 387 v[3] = 2.0 * yl; in RHSJacobian() 406 PetscReal xc, xl, xr, yl, yr; in RHSFunction() local 428 yl = 0.5 * a / dy + epsilon / (dy * dy); in RHSFunction() [all …]
|
| /petsc/src/sys/classes/draw/impls/null/ |
| H A D | drawnull.c | 36 static PetscErrorCode PetscDrawLine_Null(PetscDraw draw, PetscReal xl, PetscReal yl, PetscReal xr, … in PetscDrawLine_Null() argument 42 static PetscErrorCode PetscDrawArrow_Null(PetscDraw draw, PetscReal xl, PetscReal yl, PetscReal xr,… in PetscDrawArrow_Null() argument 48 static PetscErrorCode PetscDrawRectangle_Null(PetscDraw draw, PetscReal xl, PetscReal yl, PetscReal… in PetscDrawRectangle_Null() argument
|
| /petsc/src/sys/classes/draw/impls/image/ |
| H A D | drawimage.c | 19 static PetscErrorCode PetscDrawSetViewport_Image(PetscDraw draw, PetscReal xl, PetscReal yl, PetscR… in PetscDrawSetViewport_Image() argument 27 int xb = (int)(xr * xmax), yb = ymax - (int)(yl * ymax); in PetscDrawSetViewport_Image() 116 static PetscErrorCode PetscDrawLine_Image(PetscDraw draw, PetscReal xl, PetscReal yl, PetscReal xr,… in PetscDrawLine_Image() argument 123 int y_1 = YTRANS(draw, img, yl), y_2 = YTRANS(draw, img, yr); in PetscDrawLine_Image() 129 static PetscErrorCode PetscDrawArrow_Image(PetscDraw draw, PetscReal xl, PetscReal yl, PetscReal xr… in PetscDrawArrow_Image() argument 137 int y_1 = YTRANS(draw, img, yl), y_2 = YTRANS(draw, img, yr); in PetscDrawArrow_Image() 162 static PetscErrorCode PetscDrawRectangle_Image(PetscDraw draw, PetscReal xl, PetscReal yl, PetscRea… in PetscDrawRectangle_Image() argument 173 int y = YTRANS(draw, img, yr), h = YTRANS(draw, img, yl) + 1 - y; in PetscDrawRectangle_Image()
|
| /petsc/src/ts/tutorials/ |
| H A D | ex50.c | 328 PetscScalar *yl; in MatMult_Laplacian() local 345 PetscCall(DMDAVecGetArray(appctx->da, ylocal, &yl)); in MatMult_Laplacian() 348 …"BLASgemv", BLASgemv_("N", &n, &n, &_DOne, &temp[0][0], &n, &xl[j], &_One, &_DOne, &yl[j], &_One)); in MatMult_Laplacian() 350 PetscCall(DMDAVecRestoreArray(appctx->da, ylocal, &yl)); in MatMult_Laplacian() 368 PetscScalar *yl; in MatMult_Advection() local 381 PetscCall(DMDAVecGetArray(appctx->da, ylocal, &yl)); in MatMult_Advection() 384 …"BLASgemv", BLASgemv_("N", &n, &n, &_DOne, &temp[0][0], &n, &xl[j], &_One, &_DOne, &yl[j], &_One)); in MatMult_Advection() 386 PetscCall(DMDAVecRestoreArray(appctx->da, ylocal, &yl)); in MatMult_Advection()
|
| /petsc/src/sys/classes/draw/impls/x/ |
| H A D | xops.c | 16 static PetscErrorCode PetscDrawSetViewport_X(PetscDraw draw, PetscReal xl, PetscReal yl, PetscReal … in PetscDrawSetViewport_X() argument 26 yb = ymax - (int)(yl * (PetscReal)ymax); in PetscDrawSetViewport_X() 82 static PetscErrorCode PetscDrawLine_X(PetscDraw draw, PetscReal xl, PetscReal yl, PetscReal xr, Pet… in PetscDrawLine_X() argument 91 y_1 = YTRANS(draw, XiWin, yl); in PetscDrawLine_X() 97 static PetscErrorCode PetscDrawArrow_X(PetscDraw draw, PetscReal xl, PetscReal yl, PetscReal xr, Pe… in PetscDrawArrow_X() argument 106 y_1 = YTRANS(draw, XiWin, yl); in PetscDrawArrow_X() 131 static PetscErrorCode PetscDrawRectangle_X(PetscDraw draw, PetscReal xl, PetscReal yl, PetscReal xr… in PetscDrawRectangle_X() argument 142 h = YTRANS(draw, XiWin, yl) + 1 - y; in PetscDrawRectangle_X() 291 PetscReal xl = draw->port_xl, yl = draw->port_yl; in PetscDrawClear_X() local 307 int xb = (int)(xr * xmax), yb = ymax - (int)(yl * ymax); in PetscDrawClear_X()
|
| /petsc/src/ts/interface/ |
| H A D | tsmon.c | 603 PetscReal xl, yl, xr, yr, h; in TSMonitorDrawSolution() local 608 PetscCall(PetscDrawGetCoordinates(draw, &xl, &yl, &xr, &yr)); in TSMonitorDrawSolution() 609 h = yl + .95 * (yr - yl); in TSMonitorDrawSolution() 645 PetscReal U0, U1, xl, yl, xr, yr, h; in TSMonitorDrawSolutionPhase() local 657 PetscCall(PetscDrawAxisGetLimits(axis, &xl, &xr, &yl, &yr)); in TSMonitorDrawSolutionPhase() 667 if ((U0 < xl) || (U1 < yl) || (U0 > xr) || (U1 > yr)) PetscFunctionReturn(PETSC_SUCCESS); in TSMonitorDrawSolutionPhase() 672 PetscCall(PetscDrawGetCoordinates(draw, &xl, &yl, &xr, &yr)); in TSMonitorDrawSolutionPhase() 674 h = yl + .95 * (yr - yl); in TSMonitorDrawSolutionPhase()
|
| /petsc/src/snes/tests/ |
| H A D | ex1f.F90 | 455 integer4 xl, yl, width, height 611 yl = 0 614 …PetscCallA(PetscDrawCreate(PETSC_COMM_WORLD, PETSC_NULL_CHARACTER, 'Solution', xl, yl, width, heig…
|
| /petsc/src/mat/matfd/ |
| H A D | fdmatrix.c | 48 PetscReal xr, yr, xl, yl, h, w; in MatFDColoringView_Draw() local 62 yl = -h; in MatFDColoringView_Draw() 63 PetscCall(PetscDrawSetCoordinates(draw, xl, yl, xr, yr)); in MatFDColoringView_Draw()
|
| /petsc/src/dm/impls/da/ |
| H A D | gr2.c | 81 PetscReal xl, yl, xr, yr, x, y; in VecView_MPI_Draw_DA2d_Zoom() local 82 PetscCall(PetscDrawGetCoordinates(draw, &xl, &yl, &xr, &yr)); in VecView_MPI_Draw_DA2d_Zoom() 85 y = yr - .30 * (yr - yl); in VecView_MPI_Draw_DA2d_Zoom() 86 yl = yl + .01 * (yr - yl); in VecView_MPI_Draw_DA2d_Zoom() 87 if (zctx->name0) PetscCall(PetscDrawString(draw, x, yl, PETSC_DRAW_BLACK, zctx->name0)); in VecView_MPI_Draw_DA2d_Zoom()
|
| /petsc/src/sys/classes/draw/impls/win32/ |
| H A D | win32draw.c | 175 static PetscErrorCode PetscDrawRectangle_Win32(PetscDraw draw, PetscReal xl, PetscReal yl, PetscRea… in PetscDrawRectangle_Win32() argument 186 yone = YTRANS(draw, windraw, yl); in PetscDrawRectangle_Win32() 203 static PetscErrorCode PetscDrawLine_Win32(PetscDraw draw, PetscReal xl, PetscReal yl, PetscReal xr,… in PetscDrawLine_Win32() argument 214 yone = YTRANS(draw, windraw, yl); in PetscDrawLine_Win32()
|