Lines Matching refs:vreduced
25 …e TaoVecGetSubVec(Vec vfull, IS is, TaoSubsetType reduced_type, PetscReal maskvalue, Vec *vreduced) in TaoVecGetSubVec() argument
44 PetscCall(VecDestroy(vreduced)); in TaoVecGetSubVec()
45 PetscCall(VecDuplicate(vfull, vreduced)); in TaoVecGetSubVec()
46 PetscCall(VecCopy(vfull, *vreduced)); in TaoVecGetSubVec()
54 if (*vreduced) PetscCall(VecDestroy(vreduced)); in TaoVecGetSubVec()
55 PetscCall(VecCreate(comm, vreduced)); in TaoVecGetSubVec()
56 PetscCall(VecSetType(*vreduced, vtype)); in TaoVecGetSubVec()
58 PetscCall(VecSetSizes(*vreduced, nreduced_local, nreduced)); in TaoVecGetSubVec()
59 PetscCall(VecGetOwnershipRange(*vreduced, &rlow, &rhigh)); in TaoVecGetSubVec()
61 PetscCall(VecScatterCreate(vfull, is, *vreduced, ident, &scatter)); in TaoVecGetSubVec()
62 PetscCall(VecScatterBegin(scatter, vfull, *vreduced, INSERT_VALUES, SCATTER_FORWARD)); in TaoVecGetSubVec()
63 PetscCall(VecScatterEnd(scatter, vfull, *vreduced, INSERT_VALUES, SCATTER_FORWARD)); in TaoVecGetSubVec()
72 if (!*vreduced) PetscCall(VecDuplicate(vfull, vreduced)); in TaoVecGetSubVec()
74 PetscCall(VecSet(*vreduced, maskvalue)); in TaoVecGetSubVec()
78 PetscCall(VecGetArray(*vreduced, &rv)); in TaoVecGetSubVec()
84 PetscCall(VecRestoreArray(*vreduced, &rv)); in TaoVecGetSubVec()