Searched refs:xsm (Results 1 – 3 of 3) sorted by relevance
| /petsc/src/tao/unconstrained/tutorials/ |
| H A D | eptorsion2.c | 200 PetscInt xe, ye, xsm, ysm, xep, yep; in FormFunctionGradient() local
234 if (xs == 0) xsm = xs - 1; in FormFunctionGradient()
235 else xsm = xs; in FormFunctionGradient()
245 for (i = xsm; i < xe; i++) { /* for (i=-1; i<mx; i++) */ in FormFunctionGradient()
322 PetscCall(PetscLogFlops((ye - ysm) * (xe - xsm) * 20 + (xep - xs) * (yep - ys) * 16)); in FormFunctionGradient()
|
| H A D | eptorsion2f.F90 | 121 PetscInt xe, ye, xsm, ysm
155 xsm = xs - 1
157 xsm = xs
178 do i = xsm, xe - 1
255 PetscCall(PetscLogFlops(20.0d0*(ye - ysm)*(xe - xsm) + 16.0d0*(xep - xs)*(yep - ys), ierr))
|
| /petsc/src/ksp/ksp/tutorials/ |
| H A D | ex54f.F90 | 309 PetscReal xo, xs, xt, yo, ys, yt, xsm, xsp, xtm
363 xsm = xs*sm
373 shp(2, 1) = xtm - xsm
376 shp(2, 4) = xtp + xsm
|