| /petsc/src/dm/tests/ |
| H A D | ex50.c | 52 Vec cv; in test_3d() local
67 PetscCall(DMGetCoordinatesLocal(dm, &cv)); in test_3d()
79 PetscCall(DMDAVecGetArray(cdm, cv, &_coords)); in test_3d()
95 PetscCall(DMPlexVecGetClosure(dm, cSec, cv, i, NULL, &t)); in test_3d()
99 PetscCall(DMPlexVecRestoreClosure(dm, cSec, cv, i, NULL, &t)); in test_3d()
124 if (!plex) PetscCall(DMDAVecRestoreArray(cdm, cv, &_coords)); in test_3d()
|
| /petsc/src/dm/field/tutorials/ |
| H A D | ex1.c | 312 PetscScalar *cv; in main() local
327 PetscCall(PetscMalloc1(nc * (1 << dim), &cv)); in main()
332 cv[i] = rv; in main()
334 PetscCall(DMFieldCreateDA(dm, nc, cv, &field)); in main()
335 PetscCall(PetscFree(cv)); in main()
|
| /petsc/src/dm/field/impls/da/ |
| H A D | dmfieldda.c | 471 PetscScalar *cv, *cf, *work; in DMFieldCreateDA() local
479 PetscCall(PetscMalloc3(nv, &cv, nv, &cf, nv, &work)); in DMFieldCreateDA()
480 for (i = 0; i < nv; i++) cv[i] = cornerValues[i]; in DMFieldCreateDA()
481 for (i = 0; i < nv; i++) cf[i] = cv[i]; in DMFieldCreateDA()
482 dafield->cornerVals = cv; in DMFieldCreateDA()
|
| /petsc/src/ts/tests/ |
| H A D | ex28.c | 279 …PetscReal n = 0.0, v = 0.0, E = 0.0, T = 0.0, m = 1.0, cn = 0.0, cv = 0.0, cE = 0.0, pE =… in RHSFunctionParticles() local
337 cv += r[p] * m1; in RHSFunctionParticles()
344 … %+.8f energy update: %.8f (%.8f, %.8f)\n", (double)t, (double)cn, (double)cv, (double)cE, (double… in RHSFunctionParticles()
|
| /petsc/src/ksp/pc/impls/gamg/ |
| H A D | classical.c | 560 Vec cv; in PCGAMGProlongator_Classical_Standard() local
607 PetscCall(VecCreateMPI(PetscObjectComm((PetscObject)A), cn, PETSC_DECIDE, &cv)); in PCGAMGProlongator_Classical_Standard()
608 PetscCall(VecGetOwnershipRange(cv, &cs, &ce)); in PCGAMGProlongator_Classical_Standard()
795 PetscCall(VecDestroy(&cv)); in PCGAMGProlongator_Classical_Standard()
|
| /petsc/src/mat/impls/dense/seq/ |
| H A D | dense.c | 2727 PetscScalar *cv; in MatMatMultNumeric_SeqDense_SeqDense() local
2737 PetscCall(MatDenseGetArrayWrite(C, &cv)); in MatMatMultNumeric_SeqDense_SeqDense()
2738 …LASgemm", BLASgemm_("N", "N", &m, &n, &k, &_DOne, av, &a->lda, bv, &b->lda, &_DZero, cv, &c->lda)); in MatMatMultNumeric_SeqDense_SeqDense()
2742 PetscCall(MatDenseRestoreArrayWrite(C, &cv)); in MatMatMultNumeric_SeqDense_SeqDense()
2775 PetscScalar *cv; in MatMatTransposeMultNumeric_SeqDense_SeqDense() local
2786 PetscCall(MatDenseGetArrayWrite(C, &cv)); in MatMatTransposeMultNumeric_SeqDense_SeqDense()
2787 …LASgemm", BLASgemm_("N", "T", &m, &n, &k, &_DOne, av, &a->lda, bv, &b->lda, &_DZero, cv, &c->lda)); in MatMatTransposeMultNumeric_SeqDense_SeqDense()
2790 PetscCall(MatDenseRestoreArrayWrite(C, &cv)); in MatMatTransposeMultNumeric_SeqDense_SeqDense()
2824 PetscScalar *cv; in MatTransposeMatMultNumeric_SeqDense_SeqDense() local
2835 PetscCall(MatDenseGetArrayWrite(C, &cv)); in MatTransposeMatMultNumeric_SeqDense_SeqDense()
[all …]
|
| /petsc/src/mat/impls/dense/mpi/ |
| H A D | mpidense.c | 2269 PetscScalar *sendbuf, *recvbuf = NULL, *cv; in MatMatTransposeMultNumeric_MPIDense_MPIDense_Cyclic() local
2286 PetscCall(MatDenseGetArrayWrite(c->A, &cv)); in MatMatTransposeMultNumeric_MPIDense_MPIDense_Cyclic()
2328 …ASgemm_("N", "T", &cm, &cn, &ck, &_DOne, av, &alda, sendbuf, &cn, &_DZero, cv + clda * ranges[recv… in MatMatTransposeMultNumeric_MPIDense_MPIDense_Cyclic()
2340 PetscCall(MatDenseRestoreArrayWrite(c->A, &cv)); in MatMatTransposeMultNumeric_MPIDense_MPIDense_Cyclic()
2353 PetscScalar *cv, *sendbuf, *recvbuf; in MatMatTransposeMultNumeric_MPIDense_MPIDense_Allgatherv() local
2367 PetscCall(MatDenseGetArrayWrite(c->A, &cv)); in MatMatTransposeMultNumeric_MPIDense_MPIDense_Allgatherv()
2386 …LASgemm", BLASgemm_("N", "N", &cm, &cn, &ck, &_DOne, av, &alda, recvbuf, &ck, &_DZero, cv, &clda)); in MatMatTransposeMultNumeric_MPIDense_MPIDense_Allgatherv()
2389 PetscCall(MatDenseRestoreArrayWrite(c->A, &cv)); in MatMatTransposeMultNumeric_MPIDense_MPIDense_Allgatherv()
|
| /petsc/src/dm/dt/dualspace/impls/lagrange/ |
| H A D | dspacelagrange.c | 443 const PetscScalar *cv = &coords[closureOrder[revlexOrder[v]] * dim]; in PetscLagNodeIndicesComputeVertexOrder() local
448 if ((diff = PetscRealPart(cv[d] - cw[d])) != 0.) break; in PetscLagNodeIndicesComputeVertexOrder()
|
| /petsc/src/dm/impls/plex/ |
| H A D | plexfem.c | 3583 Vec fv, cv; in DMPlexComputeInjectorFEM() local
3702 PetscCall(DMGetGlobalVector(dmc, &cv)); in DMPlexComputeInjectorFEM()
3703 PetscCall(VecGetOwnershipRange(cv, &startC, &endC)); in DMPlexComputeInjectorFEM()
3723 PetscCall(VecScatterCreate(cv, cis, fv, fis, sc)); in DMPlexComputeInjectorFEM()
3727 PetscCall(DMRestoreGlobalVector(dmc, &cv)); in DMPlexComputeInjectorFEM()
|