| /petsc/src/vec/is/tests/ |
| H A D | ex2.c | 16 PetscViewer vx, vl; in main() local 33 PetscCall(PetscViewerBinaryOpen(PETSC_COMM_WORLD, "testfile", FILE_MODE_READ, &vl)); in main() 35 PetscCall(ISLoad(il, vl)); in main() 39 PetscCall(PetscViewerDestroy(&vl)); in main() 46 PetscCall(PetscViewerBinaryOpen(PETSC_COMM_WORLD, "testfile", FILE_MODE_READ, &vl)); in main() 49 PetscCall(ISLoad(il, vl)); in main() 54 PetscCall(PetscViewerDestroy(&vl)); in main() 56 PetscCall(PetscViewerBinaryOpen(PETSC_COMM_WORLD, "testfile", FILE_MODE_READ, &vl)); in main() 59 PetscCall(ISLoad(il, vl)); in main() 64 PetscCall(PetscViewerDestroy(&vl)); in main() [all …]
|
| /petsc/src/binding/petsc4py/test/ |
| H A D | test_dmda.py | 100 vl = self.da.createLocalVec() 107 self.da.globalToLocal(vg, vl) 108 self.assertEqual(vl.max()[1], 1.0) 109 self.assertTrue(vl.min()[1] in (1.0, 0.0)) 115 self.da.localToLocal(vl, vl2) 129 vl = self.da.getLocalVec() 134 self.da.globalToLocal(vg, vl) 135 self.assertEqual(vl.max()[1], 1.0) 136 self.assertTrue(vl.min()[1] in (1.0, 0.0)) 137 vl.set(2.0) [all …]
|
| H A D | test_dmstag.py | 77 vl = self.da.getLocalVec() 82 self.da.globalToLocal(vg, vl) 83 self.assertEqual(vl.max()[1], 1.0) 84 self.assertTrue(vl.min()[1] in (1.0, 0.0)) 86 vl.set(2.0) 87 self.da.localToGlobal(vl, vg) 92 self.da.restoreLocalVec(vl)
|
| H A D | test_mat_py.py | 285 def diagonalScale(self, mat, vl, vr): argument 286 if vl: 287 self.D.pointwiseMult(self.D, vl)
|
| /petsc/src/sys/utils/ |
| H A D | sortip.c | 25 PetscInt tmp, i, vl, last; in PetscSortIntWithPermutation_Private() local 35 vl = v[vdx[0]]; in PetscSortIntWithPermutation_Private() 38 if (v[vdx[i]] < vl) { in PetscSortIntWithPermutation_Private() 95 PetscReal vl; in PetscSortRealWithPermutation_Private() local 106 vl = v[vdx[0]]; in PetscSortRealWithPermutation_Private() 109 if (v[vdx[i]] < vl) { in PetscSortRealWithPermutation_Private() 169 const char *vl; in PetscSortStrWithPermutation_Private() local 180 vl = v[vdx[0]]; in PetscSortStrWithPermutation_Private() 183 PetscCall(PetscStrgrt(vl, v[vdx[i]], >)); in PetscSortStrWithPermutation_Private()
|
| H A D | sortd.c | 44 PetscReal vl, tmp; in PetscSortReal_Private() local 54 vl = v[0]; in PetscSortReal_Private() 57 if (v[i] < vl) { in PetscSortReal_Private()
|
| /petsc/src/ts/tutorials/ |
| H A D | ex20opt_p.c | 88 const PetscScalar *vl, *vr, *u; in RHSHessianProductUU() local 96 PetscCall(VecGetArrayRead(Vl[0], &vl)); in RHSHessianProductUU() 106 for (i = 0; i < 2; i++) vhv[j] += vl[i] * dJdU[i][j][k] * vr[k]; in RHSHessianProductUU() 110 PetscCall(VecRestoreArrayRead(Vl[0], &vl)); in RHSHessianProductUU() 118 const PetscScalar *vl, *vr, *u; in RHSHessianProductUP() local 125 PetscCall(VecGetArrayRead(Vl[0], &vl)); in RHSHessianProductUP() 134 for (i = 0; i < 2; i++) vhv[j] += vl[i] * dJdP[i][j][k] * vr[k]; in RHSHessianProductUP() 138 PetscCall(VecRestoreArrayRead(Vl[0], &vl)); in RHSHessianProductUP() 146 const PetscScalar *vl, *vr, *u; in RHSHessianProductPU() local 153 PetscCall(VecGetArrayRead(Vl[0], &vl)); in RHSHessianProductPU() [all …]
|
| H A D | ex20opt_ic.c | 80 const PetscScalar *vl, *vr, *u; in RHSHessianProductUU() local 88 PetscCall(VecGetArrayRead(Vl[0], &vl)); in RHSHessianProductUU() 98 for (i = 0; i < 2; i++) vhv[j] += vl[i] * dJdU[i][j][k] * vr[k]; in RHSHessianProductUU() 101 PetscCall(VecRestoreArrayRead(Vl[0], &vl)); in RHSHessianProductUU() 177 const PetscScalar *vl, *vr, *u; in IHessianProductUU() local 185 PetscCall(VecGetArrayRead(Vl[0], &vl)); in IHessianProductUU() 194 for (i = 0; i < 2; i++) vhv[j] += vl[i] * dJdU[i][j][k] * vr[k]; in IHessianProductUU() 197 PetscCall(VecRestoreArrayRead(Vl[0], &vl)); in IHessianProductUU()
|
| /petsc/src/tao/unconstrained/tutorials/ |
| H A D | eptorsion3.c | 261 PetscReal zero = 0.0, vb, vl, vr, vt, dvdx, dvdy, flin = 0.0, fquad = 0.0; in FormFunction() local 292 vl = zero; in FormFunction() 295 if (i > 0 && j < ny) vl = x[k - 1]; in FormFunction() 297 dvdx = (v - vl) / hx; in FormFunction() 300 flin = flin - cdiv3 * (vb + vl + v); in FormFunction() 333 PetscReal vb, vl, vr, vt, dvdx, dvdy; in FormGradient() local 379 vl = zero; in FormGradient() 382 if (i > 0 && j < ny) vl = x[k - 1]; in FormGradient() 384 dvdx = (v - vl) / hx; in FormGradient() 537 PetscReal v, vb, vl, vr, vt, hxhx, hyhy; in HessianProduct() local [all …]
|
| H A D | eptorsion1.c | 245 PetscReal zero = 0.0, vb, vl, vr, vt, dvdx, dvdy, flin = 0.0, fquad = 0.0; in FormFunction() local 276 vl = zero; in FormFunction() 279 if (i > 0 && j < ny) vl = x[k - 1]; in FormFunction() 281 dvdx = (v - vl) / hx; in FormFunction() 284 flin = flin - cdiv3 * (vb + vl + v); in FormFunction() 317 PetscReal vb, vl, vr, vt, dvdx, dvdy; in FormGradient() local 363 vl = zero; in FormGradient() 366 if (i > 0 && j < ny) vl = x[k - 1]; in FormGradient() 368 dvdx = (v - vl) / hx; in FormGradient() 521 PetscReal v, vb, vl, vr, vt, hxhx, hyhy; in HessianProduct() local [all …]
|
| H A D | eptorsion2.c | 205 PetscReal v, vb, vl, vr, vt, dvdx, dvdy; in FormFunctionGradient() local 280 vl = zero; in FormFunctionGradient() 283 if (i > 0 && j < my) vl = x[k - 1]; in FormFunctionGradient() 285 dvdx = (v - vl) / hx; in FormFunctionGradient() 303 flin -= cdiv3 * (vb + vl + v); in FormFunctionGradient()
|
| H A D | eptorsion2f.F90 | 119 PetscReal v, vb, vl, vr, vt, dvdx 214 vl = zero 217 if (i > 0 .and. j < my) vl = lx_v(k) 219 dvdx = (v - vl)/hx 237 flin = flin - cdiv3*(vb + vl + v)
|
| /petsc/src/sys/classes/draw/impls/x/ |
| H A D | ximage.c | 11 PetscDrawXiPixVal vl; in PetscArgSortPixVal() local 27 vl = v[idx[0]]; in PetscArgSortPixVal() 30 if (v[idx[i]] < vl) { in PetscArgSortPixVal()
|
| /petsc/src/mat/tests/ |
| H A D | ex120.c | 19 PetscReal vl, vu, abstol = 1.e-8; in main() local 160 vl = 0.0; in main() 163 …LAPACKsyevx_("V", "I", "U", &bn, arrayA, &bn, &vl, &vu, &il, &iu, &abstol, &nevs, evals, evecs_arr… in main() 189 vl = 0.0; in main() 192 …LAPACKsygvx_(&one, "V", "I", "U", &bn, arrayA, &bn, arrayB, &bn, &vl, &vu, &il, &iu, &abstol, &nev… in main()
|
| H A D | ex221.c | 289 Vec vr, vl; in main() local 291 PetscCall(MatCreateVecs(A, &vr, &vl)); in main() 294 PetscCall(VecSetRandom(vl, NULL)); in main() 297 PetscCall(VecSet(vl, test % 2 ? -1.2 : 1.0 / -1.2)); in main() 299 PetscCall(MatDiagonalScale(A, vl, vr)); in main() 300 PetscCall(MatDiagonalScale(S, vl, vr)); in main() 302 PetscCall(VecDestroy(&vl)); in main()
|
| H A D | ex116.c | 27 PetscReal vl, vu, abstol = 1.e-8; in main() local 88 vl = 0.0; in main() 90 …LAPACKsyevx_("V", "I", "U", &bn, arrayA, &bn, &vl, &vu, &il, &iu, &abstol, &nevs, evals, evecs_arr… in main()
|
| H A D | ex118.c | 23 PetscReal vl = 0.0, vu = 4.0, tol = 1000 * PETSC_MACHINE_EPSILON; in main() 49 …LAPACKstebz_("I", "E", &n, &vl, &vu, &il, &iu, &tol, (PetscReal *)D, (PetscReal *)E, &nevs, &nspli… in main()
|
| /petsc/src/snes/tutorials/ |
| H A D | ex33.c | 15 PetscReal sl, vl, pl; member 87 f[i].v = u[i].v - user->vl; in FormFunctionLocal() 144 user.vl = 0.1; in main()
|
| /petsc/src/binding/petsc4py/src/petsc4py/PETSc/ |
| H A D | DM.pyx | 859 cdef Vec vl = Vec() 860 CHKERR(DMCreateLocalVector(self.dm, &vl.vec)) 861 return vl 936 cdef Vec vl = Vec() 940 CHKERR(DMGetNamedLocalVector(self.dm, cname, &vl.vec)) 942 CHKERR(DMGetLocalVector(self.dm, &vl.vec)) 943 CHKERR(PetscINCREF(vl.obj)) 944 return vl 946 def restoreLocalVec(self, Vec vl, name : str | None = None) -> None: argument 953 vl [all …]
|
| H A D | DMSwarm.pyx | 184 cdef Vec vl = Vec() 186 CHKERR(DMSwarmCreateLocalVectorFromField(self.dm, cfieldname, &vl.vec)) 187 return vl 235 cdef Vec vl = Vec() 236 CHKERR(DMSwarmCreateLocalVectorFromFields(self.dm, nf, cfieldnames, &vl.vec)) 237 return vl
|
| H A D | TS.pyx | 2649 vl: Vec | Sequence[Vec] | None, 2657 vl 2674 if isinstance(vl, Vec): vl = [vl] 2676 if vl is not None: 2677 n = <PetscInt>len(vl) 2680 if vl is not None: 2681 assert len(vl) == <Py_ssize_t>n 2684 vecl[i] = (<Vec?>vl[i]).vec 2707 cdef object vl = None, vm = None 2709 vl = [ref_Vec(vecl[i]) for i from 0 <= i < n] [all …]
|
| H A D | KSP.pyx | 2033 cdef PetscVec *vr=NULL, *vl=NULL 2043 vecsl.append(ref_Vec(vl[i])) 2047 if nl > 0 and vl !=NULL: 2048 VecDestroyVecs(nl, &vl) # XXX errors?
|
| /petsc/src/ts/tutorials/optimal_control/ |
| H A D | ex1.c | 99 const PetscScalar *v, *w, *vl, *vr, *u; in RHSHessianProductPP() local 109 PetscCall(VecGetArrayRead(Vl[0], &vl)); in RHSHessianProductPP() 124 for (i = 0; i < 2; i++) vhv[2 * step + j] += vl[i] * dJpdP[i][j][k] * vr[2 * step + k]; in RHSHessianProductPP() 127 PetscCall(VecRestoreArrayRead(Vl[0], &vl)); in RHSHessianProductPP()
|
| /petsc/src/ksp/ksp/impls/cg/gltr/ |
| H A D | gltr.c | 72 PetscReal vl, vu; in KSPCGSolve_GLTR() 651 vl = 0.0; in KSPCGSolve_GLTR() 656 …PetscCallBLAS("LAPACKstebz", LAPACKstebz_("I", "E", &t_size, &vl, &vu, &il, &iu, &cg->eigen_tol, c… in KSPCGSolve_GLTR()
|
| /petsc/config/BuildSystem/config/ |
| H A D | package.py | 1229 vl = version.split('.') 1230 if len(vl) > 2: 1231 vl[-1] = re.compile(r'^[0-9]+').search(vl[-1]).group(0) 1232 return tuple(map(int,vl))
|