| /petsc/src/vec/vec/impls/mpi/ |
| H A D | pvec2.c | 7 PetscErrorCode VecDot_MPI(Vec xin, Vec yin, PetscScalar *z) in VecDot_MPI() argument 10 PetscCall(VecXDot_MPI_Default(xin, yin, z, VecDot_Seq)); in VecDot_MPI() 14 PetscErrorCode VecTDot_MPI(Vec xin, Vec yin, PetscScalar *z) in VecTDot_MPI() argument 17 PetscCall(VecXDot_MPI_Default(xin, yin, z, VecTDot_Seq)); in VecTDot_MPI() 21 PetscErrorCode VecMDot_MPI(Vec xin, PetscInt nv, const Vec y[], PetscScalar *z) in VecMDot_MPI() argument 24 PetscCall(VecMXDot_MPI_Default(xin, nv, y, z, VecMDot_Seq)); in VecMDot_MPI() 28 PetscErrorCode VecMDot_MPI_GEMV(Vec xin, PetscInt nv, const Vec y[], PetscScalar *z) in VecMDot_MPI_GEMV() argument 31 PetscCall(VecMXDot_MPI_Default(xin, nv, y, z, VecMDot_Seq_GEMV)); in VecMDot_MPI_GEMV() 35 PetscErrorCode VecMTDot_MPI(Vec xin, PetscInt nv, const Vec y[], PetscScalar *z) in VecMTDot_MPI() argument 38 PetscCall(VecMXDot_MPI_Default(xin, nv, y, z, VecMTDot_Seq)); in VecMTDot_MPI() [all …]
|
| H A D | pdvec.c | 54 static PetscErrorCode VecView_MPI_ASCII(Vec xin, PetscViewer viewer) in VecView_MPI_ASCII() argument 56 PetscInt i, work = xin->map->n, cnt, nLen; in VecView_MPI_ASCII() 65 PetscCallMPI(MPI_Comm_size(PetscObjectComm((PetscObject)xin), &size)); in VecView_MPI_ASCII() 68 PetscInt nmax = 0, nmin = xin->map->n, navg; in VecView_MPI_ASCII() 70 nmax = PetscMax(nmax, xin->map->range[i + 1] - xin->map->range[i]); in VecView_MPI_ASCII() 71 nmin = PetscMin(nmin, xin->map->range[i + 1] - xin->map->range[i]); in VecView_MPI_ASCII() 73 navg = xin->map->N / size; in VecView_MPI_ASCII() 78 PetscCall(VecGetArrayRead(xin, &xarray)); in VecView_MPI_ASCII() 80 PetscCallMPI(MPI_Comm_rank(PetscObjectComm((PetscObject)xin), &rank)); in VecView_MPI_ASCII() 81 …e(rank ? &work : MPI_IN_PLACE, &work, 1, MPIU_INT, MPI_MAX, 0, PetscObjectComm((PetscObject)xin))); in VecView_MPI_ASCII() [all …]
|
| H A D | pvecimpl.h | 98 static inline PetscErrorCode VecMXDot_MPI_Default(Vec xin, PetscInt nv, const Vec y[], PetscScalar … in VecMXDot_MPI_Default() argument 101 PetscCall(VecMXDot_SeqFn(xin, nv, y, z)); in VecMXDot_MPI_Default() 102 …MPI(MPIU_Allreduce(MPI_IN_PLACE, z, nv, MPIU_SCALAR, MPIU_SUM, PetscObjectComm((PetscObject)xin))); in VecMXDot_MPI_Default() 106 static inline PetscErrorCode VecXDot_MPI_Default(Vec xin, Vec yin, PetscScalar *z, PetscErrorCode (… in VecXDot_MPI_Default() argument 109 PetscCall(VecXDot_SeqFn(xin, yin, z)); in VecXDot_MPI_Default() 110 …lMPI(MPIU_Allreduce(MPI_IN_PLACE, z, 1, MPIU_SCALAR, MPIU_SUM, PetscObjectComm((PetscObject)xin))); in VecXDot_MPI_Default() 114 static inline PetscErrorCode VecMinMax_MPI_Default(Vec xin, PetscInt *idx, PetscReal *z, PetscError… in VecMinMax_MPI_Default() argument 118 PetscCall(VecMinMax_SeqFn(xin, idx, z)); in VecMinMax_MPI_Default() 125 } in = {*z, *idx + xin->map->rstart}; in VecMinMax_MPI_Default() 127 …PI(MPIU_Allreduce(MPI_IN_PLACE, &in, 1, MPIU_REAL_INT, ops[0], PetscObjectComm((PetscObject)xin))); in VecMinMax_MPI_Default() [all …]
|
| /petsc/src/vec/vec/impls/seq/ |
| H A D | bvec1.c | 10 static PetscErrorCode VecXDot_Seq_Private(Vec xin, Vec yin, PetscScalar *z, double (*const BLASfn)(… in VecXDot_Seq_Private() argument 12 static PetscErrorCode VecXDot_Seq_Private(Vec xin, Vec yin, PetscScalar *z, PetscScalar (*const BLA… in VecXDot_Seq_Private() 15 const PetscInt n = xin->map->n; in VecXDot_Seq_Private() 23 PetscCall(VecGetArrayRead(xin, &xa)); in VecXDot_Seq_Private() 28 PetscCall(VecRestoreArrayRead(xin, &xa)); in VecXDot_Seq_Private() 33 PetscErrorCode VecDot_Seq(Vec xin, Vec yin, PetscScalar *z) in VecDot_Seq() argument 36 PetscCall(VecXDot_Seq_Private(xin, yin, z, BLASdot_)); in VecDot_Seq() 40 PetscErrorCode VecTDot_Seq(Vec xin, Vec yin, PetscScalar *z) in VecTDot_Seq() argument 47 PetscCall(VecXDot_Seq_Private(yin, xin, z, BLASdotu_)); in VecTDot_Seq() 51 PetscErrorCode VecScale_Seq(Vec xin, PetscScalar alpha) in VecScale_Seq() argument [all …]
|
| H A D | bvec2.c | 11 static PetscErrorCode VecPointwiseApply_Seq(Vec win, Vec xin, Vec yin, PetscScalar (*const func)(Pe… in VecPointwiseApply_Seq() argument 17 PetscCall(VecGetArrayRead(xin, (const PetscScalar **)&xx)); in VecPointwiseApply_Seq() 21 PetscCall(VecRestoreArrayRead(xin, (const PetscScalar **)&xx)); in VecPointwiseApply_Seq() 36 PetscErrorCode VecPointwiseMax_Seq(Vec win, Vec xin, Vec yin) in VecPointwiseMax_Seq() argument 39 PetscCall(VecPointwiseApply_Seq(win, xin, yin, MaxRealPart)); in VecPointwiseMax_Seq() 51 PetscErrorCode VecPointwiseMin_Seq(Vec win, Vec xin, Vec yin) in VecPointwiseMin_Seq() argument 54 PetscCall(VecPointwiseApply_Seq(win, xin, yin, MinRealPart)); in VecPointwiseMin_Seq() 63 PetscErrorCode VecPointwiseMaxAbs_Seq(Vec win, Vec xin, Vec yin) in VecPointwiseMaxAbs_Seq() argument 66 PetscCall(VecPointwiseApply_Seq(win, xin, yin, MaxAbs)); in VecPointwiseMaxAbs_Seq() 72 PetscErrorCode VecPointwiseMult_Seq(Vec win, Vec xin, Vec yin) in VecPointwiseMult_Seq() argument [all …]
|
| H A D | dvec2.c | 10 PetscErrorCode VecMDot_Seq(Vec xin, PetscInt nv, const Vec yin[], PetscScalar *z) in VecMDot_Seq() argument 12 const PetscInt n = xin->map->n; in VecMDot_Seq() 19 PetscCall(VecGetArrayRead(xin, &x)); in VecMDot_Seq() 77 PetscCall(VecRestoreArrayRead(xin, &x)); in VecMDot_Seq() 83 PetscErrorCode VecMDot_Seq(Vec xin, PetscInt nv, const Vec yin[], PetscScalar *z) in VecMDot_Seq() argument 85 const PetscInt n = xin->map->n; in VecMDot_Seq() 96 PetscCall(VecGetArrayRead(xin, &xbase)); in VecMDot_Seq() 295 PetscCall(VecRestoreArrayRead(xin, &xbase)); in VecMDot_Seq() 301 PetscErrorCode VecMTDot_Seq(Vec xin, PetscInt nv, const Vec yin[], PetscScalar *z) in VecMTDot_Seq() argument 303 const PetscInt n = xin->map->n; in VecMTDot_Seq() [all …]
|
| /petsc/src/vec/vec/impls/seq/seqviennacl/ |
| H A D | vecviennacl.cxx | 254 static PetscErrorCode VecCopy_SeqViennaCL_Private(Vec xin, Vec yin) in VecCopy_SeqViennaCL_Private() argument 260 PetscCall(VecViennaCLAllocateCheckHost(xin)); in VecCopy_SeqViennaCL_Private() 262 if (xin != yin) { in VecCopy_SeqViennaCL_Private() 263 PetscCall(VecGetArrayRead(xin, &xa)); in VecCopy_SeqViennaCL_Private() 265 PetscCall(PetscArraycpy(ya, xa, xin->map->n)); in VecCopy_SeqViennaCL_Private() 266 PetscCall(VecRestoreArrayRead(xin, &xa)); in VecCopy_SeqViennaCL_Private() 272 static PetscErrorCode VecSetRandom_SeqViennaCL_Private(Vec xin, PetscRandom r) in VecSetRandom_SeqViennaCL_Private() argument 274 PetscInt n = xin->map->n, i; in VecSetRandom_SeqViennaCL_Private() 278 PetscCall(VecGetArray(xin, &xx)); in VecSetRandom_SeqViennaCL_Private() 280 PetscCall(VecRestoreArray(xin, &xx)); in VecSetRandom_SeqViennaCL_Private() [all …]
|
| /petsc/src/vec/vec/utils/ |
| H A D | vecio.c | 119 static PetscErrorCode VecLoad_HDF5(Vec xin, PetscViewer viewer) in VecLoad_HDF5() argument 126 …PetscCheck(((PetscObject)xin)->name, PetscObjectComm((PetscObject)xin), PETSC_ERR_SUP, "Vec name m… in VecLoad_HDF5() 136 PetscCall(PetscObjectGetName((PetscObject)xin, &vecname)); in VecLoad_HDF5() 137 PetscCall(PetscViewerHDF5Load(viewer, vecname, xin->map, scalartype, (void **)&x)); in VecLoad_HDF5() 138 …PetscCall(VecSetUp(xin)); /* VecSetSizes might have not been called so ensure ops->create has been… in VecLoad_HDF5() 139 if (!xin->ops->replacearray) { in VecLoad_HDF5() 140 PetscCall(VecGetArray(xin, &arr)); in VecLoad_HDF5() 141 PetscCall(PetscArraycpy(arr, x, xin->map->n)); in VecLoad_HDF5() 143 PetscCall(VecRestoreArray(xin, &arr)); in VecLoad_HDF5() 145 PetscCall(VecReplaceArray(xin, x)); in VecLoad_HDF5() [all …]
|
| H A D | comb.c | 75 struct PetscScalarInt *xin = (struct PetscScalarInt *)in; in PetscSplitReduction_Local() local 85 if (xin[i].i == PETSC_SR_REDUCE_SUM) xout[i].v += xin[i].v; in PetscSplitReduction_Local() 86 …else if (xin[i].i == PETSC_SR_REDUCE_MAX) xout[i].v = PetscMax(PetscRealPart(xout[i].v), PetscReal… in PetscSplitReduction_Local() 87 …else if (xin[i].i == PETSC_SR_REDUCE_MIN) xout[i].v = PetscMin(PetscRealPart(xout[i].v), PetscReal… in PetscSplitReduction_Local()
|
| /petsc/src/vec/vec/impls/seq/kokkos/ |
| H A D | veckok.kokkos.cxx | 106 PetscErrorCode VecSetRandom_SeqKokkos(Vec xin, PetscRandom r) in VecSetRandom_SeqKokkos() argument 108 const PetscInt n = xin->map->n; in VecSetRandom_SeqKokkos() 112 PetscCall(VecGetArrayWrite(xin, &xx)); /* TODO: generate randoms directly on device */ in VecSetRandom_SeqKokkos() 114 PetscCall(VecRestoreArrayWrite(xin, &xx)); in VecSetRandom_SeqKokkos() 119 PetscErrorCode VecAbs_SeqKokkos(Vec xin) in VecAbs_SeqKokkos() argument 126 PetscCall(VecGetKokkosView(xin, &xv)); in VecAbs_SeqKokkos() 128 PetscCall(VecRestoreKokkosView(xin, &xv)); in VecAbs_SeqKokkos() 134 PetscErrorCode VecReciprocal_SeqKokkos(Vec xin) in VecReciprocal_SeqKokkos() argument 140 PetscCall(VecGetKokkosView(xin, &xv)); in VecReciprocal_SeqKokkos() 142 …"VecReciprocal", Kokkos::RangePolicy<>(PetscGetKokkosExecutionSpace(), 0, xin->map->n), KOKKOS_LAM… in VecReciprocal_SeqKokkos() [all …]
|
| /petsc/src/vec/vec/impls/seq/cupm/ |
| H A D | vecseqcupm_impl.hpp | 185 inline PetscErrorCode VecSeq_CUPM<T>::PointwiseBinary_(BinaryFuncT &&binary, Vec xin, Vec yin, Vec … in PointwiseBinary_() argument 195 const auto dxptr = thrust::device_pointer_cast(DeviceArrayRead(dctx, xin).data()); in PointwiseBinary_() 217 …Code (*VecSeqFunction)(Vec, Vec, Vec), BinaryFuncT &&binary, Vec wout, Vec xin, Vec yin, PetscDevi… in PointwiseBinaryDispatch_() argument 220 if (xin->boundtocpu || yin->boundtocpu) { in PointwiseBinaryDispatch_() 221 PetscCall((*VecSeqFunction)(wout, xin, yin)); in PointwiseBinaryDispatch_() 224 PetscCall(PointwiseBinary_(std::forward<BinaryFuncT>(binary), xin, yin, wout, dctx)); in PointwiseBinaryDispatch_() 446 inline PetscErrorCode VecSeq_CUPM<T>::AYPXAsync(Vec yin, PetscScalar alpha, Vec xin, PetscDeviceCon… in AYPXAsync() argument 452 …PetscCall(PetscObjectTypeCompareAny(PetscObjectCast(xin), &xiscupm, VECSEQCUPM(), VECMPICUPM(), ""… in AYPXAsync() 454 PetscCall(VecAYPX_Seq(yin, alpha, xin)); in AYPXAsync() 463 …PetscCall(PetscCUPMMemcpyAsync(DeviceArrayWrite(dctx, yin).data(), DeviceArrayRead(dctx, xin).data… in AYPXAsync() [all …]
|
| /petsc/src/dm/impls/da/ |
| H A D | gr2.c | 116 static PetscErrorCode VecView_MPI_Draw_DA2d(Vec xin, PetscViewer viewer) in VecView_MPI_Draw_DA2d() argument 145 PetscCall(VecGetDM(xin, &da)); in VecView_MPI_Draw_DA2d() 146 …PetscCheck(da, PetscObjectComm((PetscObject)xin), PETSC_ERR_ARG_WRONG, "Vector not generated from … in VecView_MPI_Draw_DA2d() 148 PetscCall(PetscObjectGetComm((PetscObject)xin, &comm)); in VecView_MPI_Draw_DA2d() 197 PetscCall(DMGlobalToLocalBegin(dac, xin, INSERT_VALUES, xlocal)); in VecView_MPI_Draw_DA2d() 198 PetscCall(DMGlobalToLocalEnd(dac, xin, INSERT_VALUES, xlocal)); in VecView_MPI_Draw_DA2d() 277 PetscCall(VecStrideMin(xin, zctx.k, NULL, &zctx.min)); in VecView_MPI_Draw_DA2d() 278 PetscCall(VecStrideMax(xin, zctx.k, NULL, &zctx.max)); in VecView_MPI_Draw_DA2d() 317 static PetscErrorCode VecGetHDF5ChunkSize(DM_DA *da, Vec xin, PetscInt dimension, PetscInt timestep… in VecGetHDF5ChunkSize() argument 328 PetscCallMPI(MPI_Comm_size(PetscObjectComm((PetscObject)xin), &comm_size)); in VecGetHDF5ChunkSize() [all …]
|
| H A D | gr1.c | 144 PetscErrorCode VecView_MPI_Draw_DA1d(Vec xin, PetscViewer v) in VecView_MPI_Draw_DA1d() argument 172 PetscCall(VecGetDM(xin, &da)); in VecView_MPI_Draw_DA1d() 173 …PetscCheck(da, PetscObjectComm((PetscObject)xin), PETSC_ERR_ARG_WRONG, "Vector not generated from … in VecView_MPI_Draw_DA1d() 174 PetscCall(PetscObjectGetComm((PetscObject)xin, &comm)); in VecView_MPI_Draw_DA1d() 182 PetscCall(VecGetArrayRead(xin, &array)); in VecView_MPI_Draw_DA1d() 183 PetscCall(VecGetLocalSize(xin, &n)); in VecView_MPI_Draw_DA1d() 218 PetscCall(VecStrideMin(xin, j, NULL, &min)); in VecView_MPI_Draw_DA1d() 219 PetscCall(VecStrideMax(xin, j, NULL, &max)); in VecView_MPI_Draw_DA1d() 247 PetscCall(PetscObjectGetNewTag((PetscObject)xin, &tag)); in VecView_MPI_Draw_DA1d() 281 PetscCall(VecRestoreArrayRead(xin, &array)); in VecView_MPI_Draw_DA1d()
|
| /petsc/src/vec/vec/impls/mpi/mpiviennacl/ |
| H A D | mpiviennacl.cxx | 34 static PetscErrorCode VecNorm_MPIViennaCL(Vec xin, NormType type, PetscReal *z) in VecNorm_MPIViennaCL() argument 40 PetscCall(VecNorm_SeqViennaCL(xin, NORM_2, &work)); in VecNorm_MPIViennaCL() 42 …tscCallMPI(MPIU_Allreduce(&work, &sum, 1, MPIU_REAL, MPIU_SUM, PetscObjectComm((PetscObject)xin))); in VecNorm_MPIViennaCL() 46 PetscCall(VecNorm_SeqViennaCL(xin, NORM_1, &work)); in VecNorm_MPIViennaCL() 48 … PetscCallMPI(MPIU_Allreduce(&work, z, 1, MPIU_REAL, MPIU_SUM, PetscObjectComm((PetscObject)xin))); in VecNorm_MPIViennaCL() 51 PetscCall(VecNorm_SeqViennaCL(xin, NORM_INFINITY, &work)); in VecNorm_MPIViennaCL() 53 … PetscCallMPI(MPIU_Allreduce(&work, z, 1, MPIU_REAL, MPIU_MAX, PetscObjectComm((PetscObject)xin))); in VecNorm_MPIViennaCL() 56 PetscCall(VecNorm_SeqViennaCL(xin, NORM_1, temp)); in VecNorm_MPIViennaCL() 57 PetscCall(VecNorm_SeqViennaCL(xin, NORM_2, temp + 1)); in VecNorm_MPIViennaCL() 59 … PetscCallMPI(MPIU_Allreduce(temp, z, 2, MPIU_REAL, MPIU_SUM, PetscObjectComm((PetscObject)xin))); in VecNorm_MPIViennaCL() [all …]
|
| /petsc/src/vec/vec/interface/ |
| H A D | dlregisvec.c | 102 struct PetscRealInt *xin = (struct PetscRealInt *)in; in MPIU_MaxIndex_Local() local 112 if (xin[c].v > xout[c].v) { in MPIU_MaxIndex_Local() 113 xout[c].v = xin[c].v; in MPIU_MaxIndex_Local() 114 xout[c].i = xin[c].i; in MPIU_MaxIndex_Local() 115 } else if (xin[c].v == xout[c].v) { in MPIU_MaxIndex_Local() 116 xout[c].i = PetscMin(xin[c].i, xout[c].i); in MPIU_MaxIndex_Local() 128 struct PetscRealInt *xin = (struct PetscRealInt *)in; in MPIU_MinIndex_Local() local 138 if (xin[c].v < xout[c].v) { in MPIU_MinIndex_Local() 139 xout[c].v = xin[c].v; in MPIU_MinIndex_Local() 140 xout[c].i = xin[c].i; in MPIU_MinIndex_Local() [all …]
|
| H A D | vector.c | 2051 PetscErrorCode VecFlag(Vec xin, PetscInt flg) in VecFlag() argument 2058 if (!xin) PetscFunctionReturn(PETSC_SUCCESS); in VecFlag() 2059 PetscValidHeaderSpecific(xin, VEC_CLASSID, 1); in VecFlag() 2060 PetscCall(PetscObjectStateIncrease((PetscObject)xin)); in VecFlag() 2065 if (xin->ops->set) { in VecFlag() 2066 PetscUseTypeMethod(xin, set, inf); in VecFlag() 2071 PetscCall(VecGetLocalSize(xin, &n)); in VecFlag() 2072 PetscCall(VecGetArrayWrite(xin, &xx)); in VecFlag() 2074 PetscCall(VecRestoreArrayWrite(xin, &xx)); in VecFlag() 2100 PetscErrorCode VecSetInf(Vec xin) in VecSetInf() argument [all …]
|
| /petsc/src/mat/tests/ |
| H A D | ex73.c | 27 Vec xin, xout; in main() local 58 PetscCall(VecCreate(PETSC_COMM_WORLD, &xin)); in main() 59 PetscCall(VecLoad(xin, fd)); in main() 61 PetscCall(MatCreateVecs(A, &xin, NULL)); in main() 62 PetscCall(VecSetRandom(xin, NULL)); in main() 71 PetscCall(VecView(xin, PETSC_VIEWER_STDOUT_WORLD)); in main() 123 PetscCall(VecScatterCreate(xin, is, xout, NULL, &scat)); in main() 124 PetscCall(VecScatterBegin(scat, xin, xout, INSERT_VALUES, SCATTER_FORWARD)); in main() 125 PetscCall(VecScatterEnd(scat, xin, xout, INSERT_VALUES, SCATTER_FORWARD)); in main() 189 PetscCall(VecDestroy(&xin)); in main()
|
| /petsc/src/vec/vec/impls/mpi/kokkos/ |
| H A D | mpikok.kokkos.cxx | 20 static PetscErrorCode VecNorm_MPIKokkos(Vec xin, NormType type, PetscReal *z) in VecNorm_MPIKokkos() argument 23 PetscCall(VecNorm_MPI_Default(xin, type, z, VecNorm_SeqKokkos)); in VecNorm_MPIKokkos() 35 static PetscErrorCode VecDot_MPIKokkos(Vec xin, Vec yin, PetscScalar *z) in VecDot_MPIKokkos() argument 38 PetscCall(VecXDot_MPI_Default(xin, yin, z, VecDot_SeqKokkos)); in VecDot_MPIKokkos() 43 static PetscErrorCode VecTDot_MPIKokkos(Vec xin, Vec yin, PetscScalar *z) in VecTDot_MPIKokkos() argument 46 PetscCall(VecXDot_MPI_Default(xin, yin, z, VecTDot_SeqKokkos)); in VecTDot_MPIKokkos() 50 static PetscErrorCode VecMDot_MPIKokkos(Vec xin, PetscInt nv, const Vec y[], PetscScalar *z) in VecMDot_MPIKokkos() argument 53 PetscCall(VecMXDot_MPI_Default(xin, nv, y, z, VecMDot_SeqKokkos)); in VecMDot_MPIKokkos() 57 static PetscErrorCode VecMTDot_MPIKokkos(Vec xin, PetscInt nv, const Vec y[], PetscScalar *z) in VecMTDot_MPIKokkos() argument 60 PetscCall(VecMXDot_MPI_Default(xin, nv, y, z, VecMTDot_SeqKokkos)); in VecMTDot_MPIKokkos() [all …]
|
| /petsc/src/sys/objects/ |
| H A D | pinit.c | 190 …struct petsc_mpiu_int_mpiint *xin = (struct petsc_mpiu_int_mpiint *)in, *xout = (struct petsc_mpiu… in MPIU_MaxSum_Local() local 194 xout[i].a = PetscMax(xout[i].a, xin[i].a); in MPIU_MaxSum_Local() 195 xout[i].b += xin[i].b; in MPIU_MaxSum_Local() 199 PetscInt *xin = (PetscInt *)in, *xout = (PetscInt *)out; in MPIU_MaxSum_Local() local 203 xout[2 * i] = PetscMax(xout[2 * i], xin[2 * i]); in MPIU_MaxSum_Local() 204 xout[2 * i + 1] += xin[2 * i + 1]; in MPIU_MaxSum_Local() 276 PetscReal *xin = (PetscReal *)in, *xout = (PetscReal *)out; in PetscSum_Local() local 277 for (i = 0; i < count; i++) xout[i] += xin[i]; in PetscSum_Local() 281 PetscComplex *xin = (PetscComplex *)in, *xout = (PetscComplex *)out; in PetscSum_Local() local 282 for (i = 0; i < count; i++) xout[i] += xin[i]; in PetscSum_Local() [all …]
|
| /petsc/src/ksp/pc/impls/tfs/ |
| H A D | tfs.c | 61 static PetscErrorCode PCTFSLocalMult_TFS(PC pc, PetscScalar *xin, PetscScalar *xout) in PCTFSLocalMult_TFS() argument 69 PetscCall(VecPlaceArray(tfs->xd, xin)); in PCTFSLocalMult_TFS() 70 PetscCall(VecPlaceArray(tfs->xo, xin + tfs->nd)); in PCTFSLocalMult_TFS()
|
| /petsc/src/ksp/pc/impls/bjacobi/ |
| H A D | bjacobi.c | 880 const PetscScalar *xin; in PCApply_BJacobi_Multiblock() local 883 PetscCall(VecGetArrayRead(x, &xin)); in PCApply_BJacobi_Multiblock() 891 PetscCall(VecPlaceArray(bjac->x[i], xin + bjac->starts[i])); in PCApply_BJacobi_Multiblock() 902 PetscCall(VecRestoreArrayRead(x, &xin)); in PCApply_BJacobi_Multiblock() 913 const PetscScalar *xin; in PCApplySymmetricLeft_BJacobi_Multiblock() local 917 PetscCall(VecGetArrayRead(x, &xin)); in PCApplySymmetricLeft_BJacobi_Multiblock() 925 PetscCall(VecPlaceArray(bjac->x[i], xin + bjac->starts[i])); in PCApplySymmetricLeft_BJacobi_Multiblock() 938 PetscCall(VecRestoreArrayRead(x, &xin)); in PCApplySymmetricLeft_BJacobi_Multiblock() 949 const PetscScalar *xin; in PCApplySymmetricRight_BJacobi_Multiblock() local 953 PetscCall(VecGetArrayRead(x, &xin)); in PCApplySymmetricRight_BJacobi_Multiblock() [all …]
|
| /petsc/src/sys/classes/draw/interface/ |
| H A D | dtri.c | 135 int xin = 1, yin = 1, i; in PetscDrawTensorContour() local 170 xin = 0; in PetscDrawTensorContour() 187 if (!xin) PetscCall(PetscFree(ctx.x)); in PetscDrawTensorContour()
|
| /petsc/src/ksp/ksp/tests/ |
| H A D | ex27.c | 127 PetscErrorCode PCShellApply_Matinv(PC pc, Vec xin, Vec xout) in PCShellApply_Matinv() argument 133 PetscCall(MatMult(X, xin, xout)); in PCShellApply_Matinv()
|
| /petsc/src/ksp/ksp/tutorials/ |
| H A D | ex60.c | 37 PetscErrorCode PCApply_Noise(PC pc, Vec xin, Vec xout) in PCApply_Noise() argument 48 PetscCall(VecNorm(xin, NORM_2, &nrmin)); in PCApply_Noise()
|
| /petsc/src/ksp/pc/impls/shell/ |
| H A D | shellpc.c | 550 PetscErrorCode PCShellSetApply(PC pc, PetscErrorCode (*apply)(PC pc, Vec xin, Vec xout)) in PCShellSetApply() argument 608 PetscErrorCode PCShellSetApplySymmetricLeft(PC pc, PetscErrorCode (*apply)(PC pc, Vec xin, Vec xout… in PCShellSetApplySymmetricLeft() argument 637 PetscErrorCode PCShellSetApplySymmetricRight(PC pc, PetscErrorCode (*apply)(PC pc, Vec xin, Vec xou… in PCShellSetApplySymmetricRight() argument 668 PetscErrorCode PCShellSetApplyBA(PC pc, PetscErrorCode (*applyBA)(PC pc, PCSide side, Vec xin, Vec … in PCShellSetApplyBA() argument 697 PetscErrorCode PCShellSetApplyTranspose(PC pc, PetscErrorCode (*applytranspose)(PC pc, Vec xin, Vec… in PCShellSetApplyTranspose() argument 726 …e PCShellSetMatApplyTranspose(PC pc, PetscErrorCode (*matapplytranspose)(PC pc, Mat xin, Mat xout)) in PCShellSetMatApplyTranspose() argument
|