| /petsc/src/ts/tutorials/ |
| H A D | ex77.c | 836 TS sts; in AdvectParticles() local
845 PetscCall(PetscObjectQuery((PetscObject)ts, "_SwarmTS", (PetscObject *)&sts)); in AdvectParticles()
846 PetscCall(TSGetDM(sts, &sdm)); in AdvectParticles()
847 PetscCall(TSGetRHSFunction(sts, NULL, NULL, &adv)); in AdvectParticles()
853 PetscCall(TSSetMaxTime(sts, time)); in AdvectParticles()
855 PetscCall(TSSolve(sts, coordinates)); in AdvectParticles()
864 …allMPI(MPIU_Allreduce(&lreset, &reset, 1, MPI_C_BOOL, MPI_LOR, PetscObjectComm((PetscObject)sts))); in AdvectParticles()
866 PetscCall(TSReset(sts)); in AdvectParticles()
876 TS ts, sts; in main() local
921 PetscCall(TSCreate(PETSC_COMM_WORLD, &sts)); in main()
[all …]
|
| /petsc/src/ksp/ksp/utils/lmvm/rescale/ |
| H A D | symbrdnrescale.c | 27 for (PetscInt i = 0; i < next - oldest; ++i) signew += ldb->sts[i] / ldb->yty[i]; in SymBroydenRescaleUpdateScalar()
30 for (PetscInt i = 0; i < next - oldest; ++i) signew += ldb->sts[i] / ldb->yts[i]; in SymBroydenRescaleUpdateScalar()
37 c += ldb->sts[i]; in SymBroydenRescaleUpdateScalar()
236 ss_sum += ldb->sts[i]; // ||s||_{D^(2*(1-beta))}^2 in SymBroydenRescaleUpdateDiagonal()
332 ldb->sts[i - new_oldest] = ldb->sts[i - ldb_oldest]; in SymBroydenRescaleUpdate()
336 PetscScalar yty, sts, yts; in SymBroydenRescaleUpdate() local
340 PetscCall(MatLMVMProductsGetDiagonalValue(B, LMBASIS_S, LMBASIS_S, i, &sts)); in SymBroydenRescaleUpdate()
343 ldb->sts[i - new_oldest] = PetscRealPart(sts); in SymBroydenRescaleUpdate()
438 …(PetscMalloc3(ldb->sigma_hist, &ldb->yty, ldb->sigma_hist, &ldb->yts, ldb->sigma_hist, &ldb->sts)); in SymBroydenRescaleAllocate()
512 PetscCall(PetscFree3(ldb->yty, ldb->yts, ldb->sts)); in SymBroydenRescaleReset()
|
| H A D | symbrdnrescale.h | 12 …PetscReal *yty, *sts, *yts; /* scalar arrays for recycling dot product… member
|
| /petsc/src/ksp/ksp/impls/qcg/ |
| H A D | qcg.c | 22 PetscReal dsq, ptp, pts, rad, sts; in KSPQCGQuadraticRoots() local
27 PetscCall(VecDotRealPart(s, s, &sts)); in KSPQCGQuadraticRoots()
29 rad = PetscSqrtReal((pts * pts) - ptp * (sts - dsq)); in KSPQCGQuadraticRoots()
32 *step1 = (sts - dsq) / (ptp * *step2); in KSPQCGQuadraticRoots()
35 *step2 = (sts - dsq) / (ptp * *step1); in KSPQCGQuadraticRoots()
|
| /petsc/src/tao/bound/impls/bncg/ |
| H A D | bncg.c | 257 PetscErrorCode TaoBNCGComputeScalarScaling(PetscReal yty, PetscReal yts, PetscReal sts, PetscReal *… in TaoBNCGComputeScalarScaling() argument
264 else if (0.0 == alpha) *scale = sts / yts; in TaoBNCGComputeScalarScaling()
269 c = sts; in TaoBNCGComputeScalarScaling()
502 cg->sts = step * step * dnorm * dnorm; in TaoBNCGStepDirectionUpdate()
503 PetscCall(TaoBNCGComputeScalarScaling(ynorm2, step * dk_yk, cg->sts, &tau_k, cg->alpha)); in TaoBNCGStepDirectionUpdate()
518 cg->sts = step * step * dnorm * dnorm; in TaoBNCGStepDirectionUpdate()
520 PetscCall(TaoBNCGComputeScalarScaling(ynorm2, step * dk_yk, cg->sts, &tau_k, cg->alpha)); in TaoBNCGStepDirectionUpdate()
635 cg->sts = snorm * snorm; in TaoBNCGStepDirectionUpdate()
678 cg->sts = snorm * snorm; in TaoBNCGStepDirectionUpdate()
731 cg->sts = snorm * snorm; in TaoBNCGStepDirectionUpdate()
[all …]
|
| H A D | bncg.h | 28 PetscReal as_step, as_tol, yts, yty, sts; member
|
| /petsc/src/mat/tests/ |
| H A D | ex23.c | 739 const PetscInt *sts, *idxs; in main() local
748 PetscCall(MatGetOwnershipRanges(A, &sts)); in main()
752 st = sts[size - rank - 1]; in main()
753 en = sts[size - rank]; in main()
764 st = sts[rank]; in main()
765 en = sts[rank + 1]; in main()
|
| /petsc/src/ksp/ksp/utils/lmvm/tests/ |
| H A D | ex1.c | 200 PetscScalar sts; in BroydenUpdate_Explicit() local
204 PetscCall(VecDot(s, s, &sts)); in BroydenUpdate_Explicit()
208 PetscCall(RankOneAXPY(B, 1.0 / sts, ymBs, s)); in BroydenUpdate_Explicit()
|