| /petsc/src/snes/tutorials/ |
| H A D | ex5m.m | 1 function localF = ex5m(localX,hx,hy,lambda) 6 [m,n] = size(localX); 12 localF = localX; 16 u = localX(2:m-1,2:n-1); 17 uxx = (2.0*u - localX(1:m-2,2:n-1) - localX(3:m,2:n-1))*hydhx; 18 uyy = (2.0*u - localX(2:m-1,1:n-2) - localX(2:m-1,3:n))*hxdhy;
|
| H A D | ex14.c | 270 PetscErrorCode FormFunctionLocal(SNES snes, Vec localX, Vec F, void *ptr) in FormFunctionLocal() argument 294 PetscCall(DMDAVecGetArrayRead(da, localX, &x)); in FormFunctionLocal() 330 PetscCall(DMDAVecRestoreArrayRead(da, localX, &x)); in FormFunctionLocal() 349 Vec localX; in FormFunction() local 354 PetscCall(DMGetLocalVector(da, &localX)); in FormFunction() 362 PetscCall(DMGlobalToLocalBegin(da, X, INSERT_VALUES, localX)); in FormFunction() 363 PetscCall(DMGlobalToLocalEnd(da, X, INSERT_VALUES, localX)); in FormFunction() 365 PetscCall(FormFunctionLocal(snes, localX, F, ptr)); in FormFunction() 366 PetscCall(DMRestoreLocalVector(da, &localX)); in FormFunction() 386 Vec localX; in FormJacobian() local [all …]
|
| H A D | ex5f90t.F90 | 78 type(tVec) localX 84 PetscCall(DMGetLocalVector(ctx%da, localX, ierr)) 85 PetscCall(DMGlobalToLocalBegin(ctx%da, X, INSERT_VALUES, localX, ierr)) 86 PetscCall(DMGlobalToLocalEnd(ctx%da, X, INSERT_VALUES, localX, ierr)) 93 PetscCall(VecGetArray(localX, lx_v, ierr)) 100 PetscCall(VecRestoreArray(localX, lx_v, ierr)) 105 PetscCall(DMRestoreLocalVector(ctx%da, localX, ierr)) 312 type(tVec) localX 319 PetscCallA(DMGetLocalVector(ctx%da, localX, ierr)) 320 PetscCallA(DMGlobalToLocalBegin(ctx%da, X, INSERT_VALUES, localX, ierr)) [all …]
|
| H A D | ex5f90.F90 | 81 Vec localX 88 PetscCall(DMGetLocalVector(da, localX, ierr)) 89 PetscCall(DMGlobalToLocalBegin(da, X, INSERT_VALUES, localX, ierr)) 90 PetscCall(DMGlobalToLocalEnd(da, X, INSERT_VALUES, localX, ierr)) 99 PetscCall(VecGetArray(localX, lx_v, ierr)) 106 PetscCall(VecRestoreArray(localX, lx_v, ierr)) 111 PetscCall(DMRestoreLocalVector(da, localX, ierr)) 321 Vec localX 329 PetscCallA(DMGetLocalVector(da, localX, ierr)) 330 PetscCallA(DMGlobalToLocalBegin(da, X, INSERT_VALUES, localX, ierr)) [all …]
|
| H A D | ex35.c | 251 Vec localX; in NonlinearGS() local 264 PetscCall(DMGetLocalVector(da, &localX)); in NonlinearGS() 267 PetscCall(DMGlobalToLocalBegin(da, X, INSERT_VALUES, localX)); in NonlinearGS() 268 PetscCall(DMGlobalToLocalEnd(da, X, INSERT_VALUES, localX)); in NonlinearGS() 276 PetscCall(DMDAVecGetArray(da, localX, &x)); in NonlinearGS() 307 PetscCall(DMDAVecRestoreArray(da, localX, &x)); in NonlinearGS() 308 PetscCall(DMLocalToGlobalBegin(da, localX, INSERT_VALUES, X)); in NonlinearGS() 309 PetscCall(DMLocalToGlobalEnd(da, localX, INSERT_VALUES, X)); in NonlinearGS() 311 PetscCall(DMRestoreLocalVector(da, &localX)); in NonlinearGS()
|
| H A D | ex58.c | 153 Vec localX; in FormGradient() local 168 PetscCall(DMGetLocalVector(da, &localX)); in FormGradient() 170 PetscCall(DMGlobalToLocalBegin(da, X, INSERT_VALUES, localX)); in FormGradient() 171 PetscCall(DMGlobalToLocalEnd(da, X, INSERT_VALUES, localX)); in FormGradient() 173 PetscCall(DMDAVecGetArray(da, localX, &x)); in FormGradient() 250 PetscCall(DMDAVecRestoreArray(da, localX, &x)); in FormGradient() 252 PetscCall(DMRestoreLocalVector(da, &localX)); in FormGradient() 282 Vec localX; in FormJacobian() local 299 PetscCall(DMGetLocalVector(da, &localX)); in FormJacobian() 301 PetscCall(DMGlobalToLocalBegin(da, X, INSERT_VALUES, localX)); in FormJacobian() [all …]
|
| /petsc/src/snes/tutorials/network/water/ |
| H A D | waterfunctions.c | 21 PetscErrorCode FormFunction_Water(DM networkdm, Vec localX, Vec localF, PetscInt nv, PetscInt ne, c… in FormFunction_Water() argument 37 PetscCall(VecGetArrayRead(localX, &xarr)); in FormFunction_Water() 95 PetscCall(VecRestoreArrayRead(localX, &xarr)); in FormFunction_Water() 103 Vec localX, localF; in WaterFormFunction() local 115 PetscCall(DMGetLocalVector(networkdm, &localX)); in WaterFormFunction() 119 PetscCall(DMGlobalToLocalBegin(networkdm, X, INSERT_VALUES, localX)); in WaterFormFunction() 120 PetscCall(DMGlobalToLocalEnd(networkdm, X, INSERT_VALUES, localX)); in WaterFormFunction() 126 PetscCall(FormFunction_Water(networkdm, localX, localF, nv, ne, v, e, NULL)); in WaterFormFunction() 128 PetscCall(DMRestoreLocalVector(networkdm, &localX)); in WaterFormFunction() 140 Vec localX; in WaterSetInitialGuess() local [all …]
|
| /petsc/src/snes/tutorials/network/power/ |
| H A D | power.c | 16 Vec localX, localF; in FormFunction() local 22 PetscCall(DMGetLocalVector(networkdm, &localX)); in FormFunction() 27 PetscCall(DMGlobalToLocalBegin(networkdm, X, INSERT_VALUES, localX)); in FormFunction() 28 PetscCall(DMGlobalToLocalEnd(networkdm, X, INSERT_VALUES, localX)); in FormFunction() 31 PetscCall(FormFunction_Power(networkdm, localX, localF, nv, ne, vtx, edges, User)); in FormFunction() 33 PetscCall(DMRestoreLocalVector(networkdm, &localX)); in FormFunction() 45 Vec localX; in SetInitialValues() local 51 PetscCall(DMGetLocalVector(networkdm, &localX)); in SetInitialValues() 54 PetscCall(DMGlobalToLocalBegin(networkdm, X, INSERT_VALUES, localX)); in SetInitialValues() 55 PetscCall(DMGlobalToLocalEnd(networkdm, X, INSERT_VALUES, localX)); in SetInitialValues() [all …]
|
| H A D | power2.c | 11 PetscErrorCode FormFunction_Subnet(DM networkdm, Vec localX, Vec localF, PetscInt nv, PetscInt ne, … in FormFunction_Subnet() argument 20 PetscCall(VecGetArrayRead(localX, &xarr)); in FormFunction_Subnet() 118 PetscCall(VecRestoreArrayRead(localX, &xarr)); in FormFunction_Subnet() 126 Vec localX, localF; in FormFunction() local 132 PetscCall(DMGetLocalVector(networkdm, &localX)); in FormFunction() 136 PetscCall(DMGlobalToLocalBegin(networkdm, X, INSERT_VALUES, localX)); in FormFunction() 137 PetscCall(DMGlobalToLocalEnd(networkdm, X, INSERT_VALUES, localX)); in FormFunction() 144 PetscCall(FormFunction_Subnet(networkdm, localX, localF, nv, ne, vtx, edges, appctx)); in FormFunction() 148 PetscCall(FormFunction_Subnet(networkdm, localX, localF, nv, ne, vtx, edges, appctx)); in FormFunction() 150 PetscCall(DMRestoreLocalVector(networkdm, &localX)); in FormFunction() [all …]
|
| H A D | pffunctions.c | 32 PetscErrorCode FormJacobian_Power_private(DM networkdm, Vec localX, Mat J, PetscInt nv, PetscInt ne… in FormJacobian_Power_private() argument 47 PetscCall(VecGetArrayRead(localX, &xarr)); in FormJacobian_Power_private() 210 PetscCall(VecRestoreArrayRead(localX, &xarr)); in FormJacobian_Power_private() 217 Vec localX; in FormJacobian_Power() local 225 PetscCall(DMGetLocalVector(networkdm, &localX)); in FormJacobian_Power() 227 PetscCall(DMGlobalToLocalBegin(networkdm, X, INSERT_VALUES, localX)); in FormJacobian_Power() 228 PetscCall(DMGlobalToLocalEnd(networkdm, X, INSERT_VALUES, localX)); in FormJacobian_Power() 231 PetscCall(FormJacobian_Power_private(networkdm, localX, J, nv, ne, vtx, edges, appctx)); in FormJacobian_Power() 233 PetscCall(DMRestoreLocalVector(networkdm, &localX)); in FormJacobian_Power() 240 PetscErrorCode FormFunction_Power(DM networkdm, Vec localX, Vec localF, PetscInt nv, PetscInt ne, c… in FormFunction_Power() argument [all …]
|
| /petsc/src/binding/petsc4py/demo/legacy/wrap-f2py/ |
| H A D | Bratu2D.F90 | 207 Vec :: localX 211 PetscCall(DMGetLocalVector(da, localX, ierr)) 212 PetscCall(DMGlobalToLocalBegin(da, X, INSERT_VALUES, localX, ierr)) 213 PetscCall(DMGlobalToLocalEnd(da, X, INSERT_VALUES, localX, ierr)) 215 PetscCall(VecGetArray(localX, xx, ierr)) 222 PetscCall(VecRestoreArray(localX, xx, ierr)) 223 PetscCall(DMRestoreLocalVector(da, localX, ierr)) 237 Vec :: localX 240 PetscCall(DMGetLocalVector(da, localX, ierr)) 241 PetscCall(DMGlobalToLocalBegin(da, X, INSERT_VALUES, localX, ierr)) [all …]
|
| /petsc/src/binding/petsc4py/demo/legacy/wrap-swig/ |
| H A D | Bratu3D.c | 87 Vec localX; in FormFunction() local 100 PetscCall(DMGetLocalVector(da,&localX)); in FormFunction() 108 PetscCall(DMGlobalToLocalBegin(da,X,INSERT_VALUES,localX)); in FormFunction() 109 PetscCall(DMGlobalToLocalEnd(da,X,INSERT_VALUES,localX)); in FormFunction() 114 PetscCall(DMDAVecGetArray(da,localX,&x)); in FormFunction() 153 PetscCall(DMDAVecRestoreArray(da,localX,&x)); in FormFunction() 154 PetscCall(DMRestoreLocalVector(da,&localX)); in FormFunction() 165 Vec localX; in FormJacobian() local 178 PetscCall(DMGetLocalVector(da,&localX)); in FormJacobian() 186 PetscCall(DMGlobalToLocalBegin(da,X,INSERT_VALUES,localX)); in FormJacobian() [all …]
|
| /petsc/src/binding/petsc4py/demo/legacy/wrap-cython/ |
| H A D | Bratu3Dimpl.c | 88 Vec localX; in FormFunction() local 104 PetscCall(DMGetLocalVector(da,&localX)); in FormFunction() 112 PetscCall(DMGlobalToLocalBegin(da,X,INSERT_VALUES,localX)); in FormFunction() 113 PetscCall(DMGlobalToLocalEnd(da,X,INSERT_VALUES,localX)); in FormFunction() 118 PetscCall(DMDAVecGetArray(da,localX,&x)); in FormFunction() 157 PetscCall(DMDAVecRestoreArray(da,localX,&x)); in FormFunction() 158 PetscCall(DMRestoreLocalVector(da,&localX)); in FormFunction() 169 Vec localX; in FormJacobian() local 185 PetscCall(DMGetLocalVector(da,&localX)); in FormJacobian() 193 PetscCall(DMGlobalToLocalBegin(da,X,INSERT_VALUES,localX)); in FormJacobian() [all …]
|
| /petsc/src/ksp/ksp/tests/ |
| H A D | ex14.c | 63 Vec localX; /* ghosted local vector */ member 143 PetscCall(DMCreateLocalVector(user.da, &user.localX)); in main() 258 PetscCall(VecDestroy(&user.localX)); in main() 346 Vec localX = user->localX; in ComputeFunction() local 363 PetscCall(DMGlobalToLocalBegin(user->da, X, INSERT_VALUES, localX)); in ComputeFunction() 364 PetscCall(DMGlobalToLocalEnd(user->da, X, INSERT_VALUES, localX)); in ComputeFunction() 369 PetscCall(VecGetArray(localX, &x)); in ComputeFunction() 399 PetscCall(VecRestoreArray(localX, &x)); in ComputeFunction() 424 Vec localX = user->localX; /* local vector */ in ComputeJacobian() local 446 PetscCall(DMGlobalToLocalBegin(user->da, X, INSERT_VALUES, localX)); in ComputeJacobian() [all …]
|
| /petsc/src/ts/tutorials/advection-diffusion-reaction/ |
| H A D | ex5adj_mf.c | 67 Vec localX; in MyRHSMatMultTranspose() local 73 PetscCall(DMGetLocalVector(da, &localX)); in MyRHSMatMultTranspose() 84 PetscCall(DMGlobalToLocalBegin(da, X, INSERT_VALUES, localX)); in MyRHSMatMultTranspose() 85 PetscCall(DMGlobalToLocalEnd(da, X, INSERT_VALUES, localX)); in MyRHSMatMultTranspose() 88 PetscCall(DMDAVecGetArrayRead(da, localX, &x)); in MyRHSMatMultTranspose() 110 PetscCall(DMDAVecRestoreArrayRead(da, localX, &x)); in MyRHSMatMultTranspose() 113 PetscCall(DMRestoreLocalVector(da, &localX)); in MyRHSMatMultTranspose() 126 Vec localX; in MyIMatMultTranspose() local 132 PetscCall(DMGetLocalVector(da, &localX)); in MyIMatMultTranspose() 143 PetscCall(DMGlobalToLocalBegin(da, X, INSERT_VALUES, localX)); in MyIMatMultTranspose() [all …]
|
| /petsc/src/tao/complementarity/tutorials/ |
| H A D | blackscholes.c | 129 Vec localX; in main() local 231 PetscCall(DMGetLocalVector(user.dm, &localX)); in main() 232 PetscCall(DMGlobalToLocalBegin(user.dm, x, INSERT_VALUES, localX)); in main() 233 PetscCall(DMGlobalToLocalEnd(user.dm, x, INSERT_VALUES, localX)); in main() 234 PetscCall(VecGetArray(localX, &x_array)); in main() 237 PetscCall(DMRestoreLocalVector(user.dm, &localX)); in main() 312 Vec localX, localF; in FormConstraints() local 316 PetscCall(DMGetLocalVector(user->dm, &localX)); in FormConstraints() 318 PetscCall(DMGlobalToLocalBegin(user->dm, X, INSERT_VALUES, localX)); in FormConstraints() 319 PetscCall(DMGlobalToLocalEnd(user->dm, X, INSERT_VALUES, localX)); in FormConstraints() [all …]
|
| /petsc/src/snes/tutorials/ex10d/ |
| H A D | ex10.c | 57 Vec localX, localF; /* local solution (u) and f(u) vectors */ member 351 PetscCall(VecCreateSeq(MPI_COMM_SELF, bs * nvertices, &user.localX)); in main() 352 PetscCall(VecDuplicate(user.localX, &user.localF)); in main() 360 PetscCall(VecScatterCreate(x, isglobal, user.localX, islocal, &user.scatter)); in main() 475 PetscCall(VecDestroy(&user.localX)); in main() 555 Vec localX = user->localX; in FormFunction() local 583 PetscCall(VecScatterBegin(scatter, X, localX, INSERT_VALUES, SCATTER_FORWARD)); in FormFunction() 584 PetscCall(VecScatterEnd(scatter, X, localX, INSERT_VALUES, SCATTER_FORWARD)); in FormFunction() 589 PetscCall(VecGetArray(localX, &x)); in FormFunction() 606 PetscCall(VecRestoreArray(localX, &x)); in FormFunction() [all …]
|
| /petsc/src/snes/tutorials/network/ |
| H A D | ex1.c | 90 Vec localX; in FormJacobian_subPower() local 100 PetscCall(DMGetLocalVector(networkdm, &localX)); in FormJacobian_subPower() 105 PetscCall(DMGlobalToLocalBegin(networkdm, X, INSERT_VALUES, localX)); in FormJacobian_subPower() 106 PetscCall(DMGlobalToLocalEnd(networkdm, X, INSERT_VALUES, localX)); in FormJacobian_subPower() 112 PetscCall(FormJacobian_Power_private(networkdm, localX, J, nv, ne, vtx, edges, appctx)); in FormJacobian_subPower() 130 PetscCall(DMRestoreLocalVector(networkdm, &localX)); in FormJacobian_subPower() 135 PetscErrorCode FormFunction_Dummy(DM networkdm, Vec localX, Vec localF, PetscInt nv, PetscInt ne, c… in FormFunction_Dummy() argument 145 PetscCall(VecGetArrayRead(localX, &xarr)); in FormFunction_Dummy() 158 PetscCall(VecRestoreArrayRead(localX, &xarr)); in FormFunction_Dummy() 167 Vec localX, localF; in FormFunction() local [all …]
|
| /petsc/src/ksp/ksp/tutorials/ |
| H A D | ex14f.F90 | 51 Vec localX 171 PetscCall(DMGlobalToLocalBegin(da, X, INSERT_VALUES, localX, ierr)) 172 PetscCall(DMGlobalToLocalEnd(da, X, INSERT_VALUES, localX, ierr)) 176 PetscCall(VecGetArrayRead(localX, xx, ierr)) 206 PetscCall(VecRestoreArrayRead(localX, xx, ierr)) 260 PetscCall(DMGlobalToLocalBegin(da, X, INSERT_VALUES, localX, ierr)) 261 PetscCall(DMGlobalToLocalEnd(da, X, INSERT_VALUES, localX, ierr)) 265 PetscCall(VecGetArrayRead(localX, xx, ierr)) 319 PetscCall(VecRestoreArrayRead(localX, xx, ierr)) 392 PetscCallA(DMCreateLocalVector(da, localX, ierr)) [all …]
|
| /petsc/src/ts/tutorials/ |
| H A D | ex7.c | 130 Vec localX; in FormFunction() local 134 PetscCall(DMGetLocalVector(da, &localX)); in FormFunction() 148 PetscCall(DMGlobalToLocalBegin(da, X, INSERT_VALUES, localX)); in FormFunction() 149 PetscCall(DMGlobalToLocalEnd(da, X, INSERT_VALUES, localX)); in FormFunction() 154 PetscCall(DMDAVecGetArrayRead(da, localX, &x)); in FormFunction() 182 PetscCall(DMDAVecRestoreArrayRead(da, localX, &x)); in FormFunction() 184 PetscCall(DMRestoreLocalVector(da, &localX)); in FormFunction()
|
| H A D | ex12.c | 137 Vec localX; in FormFunction() local 140 PetscCall(DMGetLocalVector(da, &localX)); in FormFunction() 156 PetscCall(DMGlobalToLocalBegin(da, X, INSERT_VALUES, localX)); in FormFunction() 157 PetscCall(DMGlobalToLocalEnd(da, X, INSERT_VALUES, localX)); in FormFunction() 162 PetscCall(DMDAVecGetArrayDOF(da, localX, &x)); in FormFunction() 192 PetscCall(DMDAVecRestoreArrayDOF(da, localX, &x)); in FormFunction() 194 PetscCall(DMRestoreLocalVector(da, &localX)); in FormFunction()
|
| /petsc/src/tao/bound/tutorials/ |
| H A D | plate2.c | 32 Vec localX, localV; /* ghosted local vector */ member 104 PetscCall(DMCreateLocalVector(user.dm, &user.localX)); in main() 105 PetscCall(VecDuplicate(user.localX, &user.localV)); in main() 164 PetscCall(VecDestroy(&user.localX)); in main() 210 Vec localX = user->localX, localG = user->localV; in FormFunctionGradient() local 218 PetscCall(DMGlobalToLocalBegin(user->dm, X, INSERT_VALUES, localX)); in FormFunctionGradient() 219 PetscCall(DMGlobalToLocalEnd(user->dm, X, INSERT_VALUES, localX)); in FormFunctionGradient() 225 PetscCall(VecGetArray(localX, &x)); in FormFunctionGradient() 362 PetscCall(VecRestoreArray(localX, &x)); in FormFunctionGradient() 427 Vec localX = user->localX; in FormHessian() local [all …]
|
| /petsc/src/tao/unconstrained/tutorials/ |
| H A D | eptorsion2.c | 55 Vec localX; /* local vectors */ member 98 PetscCall(DMCreateLocalVector(user.dm, &user.localX)); in main() 138 PetscCall(VecDestroy(&user.localX)); in main() 208 Vec localX = user->localX; in FormFunctionGradient() local 221 PetscCall(DMGlobalToLocalBegin(user->dm, X, INSERT_VALUES, localX)); in FormFunctionGradient() 222 PetscCall(DMGlobalToLocalEnd(user->dm, X, INSERT_VALUES, localX)); in FormFunctionGradient() 225 PetscCall(VecGetArray(localX, &x)); in FormFunctionGradient() 308 PetscCall(VecRestoreArray(localX, &x)); in FormFunctionGradient()
|
| H A D | minsurf2.c | 172 Vec localX; in FormFunction() local 176 PetscCall(DMGetLocalVector(user->dm, &localX)); in FormFunction() 181 PetscCall(DMGlobalToLocalBegin(user->dm, X, INSERT_VALUES, localX)); in FormFunction() 182 PetscCall(DMGlobalToLocalEnd(user->dm, X, INSERT_VALUES, localX)); in FormFunction() 185 PetscCall(DMDAVecGetArray(user->dm, localX, (void **)&x)); in FormFunction() 277 PetscCall(DMDAVecRestoreArray(user->dm, localX, (void **)&x)); in FormFunction() 278 PetscCall(DMRestoreLocalVector(user->dm, &localX)); in FormFunction() 307 Vec localX; in FormFunctionGradient() local 311 PetscCall(DMGetLocalVector(user->dm, &localX)); in FormFunctionGradient() 316 PetscCall(DMGlobalToLocalBegin(user->dm, X, INSERT_VALUES, localX)); in FormFunctionGradient() [all …]
|
| /petsc/src/ts/tutorials/phasefield/ |
| H A D | biharmonic2.c | 189 Vec localX, localXdot; in FormFunction() local 194 PetscCall(DMGetLocalVector(da, &localX)); in FormFunction() 207 PetscCall(DMGlobalToLocalBegin(da, X, INSERT_VALUES, localX)); in FormFunction() 208 PetscCall(DMGlobalToLocalEnd(da, X, INSERT_VALUES, localX)); in FormFunction() 215 PetscCall(DMDAVecGetArrayRead(da, localX, &x)); in FormFunction() 251 PetscCall(DMDAVecRestoreArrayRead(da, localX, &x)); in FormFunction() 253 PetscCall(DMRestoreLocalVector(da, &localX)); in FormFunction()
|