Home
last modified time | relevance | path

Searched refs:scal (Results 1 – 15 of 15) sorted by relevance

/petsc/src/ksp/ksp/impls/qcg/
H A Dqcg.c148 PetscScalar scal, beta, rntrn, step; in KSPSolve_QCG() local
222 scal = pcgP->delta / xnorm; in KSPSolve_QCG()
223 PetscCall(VecScale(X, scal)); in KSPSolve_QCG()
260 scal = pcgP->delta / pcgP->ltsnrm; in KSPSolve_QCG()
261 PetscCall(VecScale(X, scal)); in KSPSolve_QCG()
/petsc/src/ts/event/
H A Dtsevent.c520 PetscReal new_dt, scal = 1.0, scalB = 1.0, threshold = 0.0, power; in RefineAndersonBjorck() local
535 scal = (fright - f) / fright; in RefineAndersonBjorck()
540 scal = (fleft - f) / fleft; in RefineAndersonBjorck()
545 if (scal < threshold) scal = 0.5; in RefineAndersonBjorck()
546 if (reps > 1) *gamma *= scal; // side did not switch since the last time, accumulate gamma in RefineAndersonBjorck()
549 …scal = PetscPowReal(scalB / *gamma, power) * (*gamma); // mix the Anderson-Bjorck scaling and Bis… in RefineAndersonBjorck()
551 if (side == -1) new_dt = scal * fleft / (scal * fleft - f) * (t - tleft); in RefineAndersonBjorck()
552 else new_dt = f / (f - scal * fright) * (tright - t); in RefineAndersonBjorck()
/petsc/src/ts/impls/implicit/alpha/
H A Dalpha1.c258 PetscScalar scal[3]; in TSEvaluateWLTE_Alpha() local
260 scal[0] = +1 / a; in TSEvaluateWLTE_Alpha()
261 scal[1] = -1 / (a - 1); in TSEvaluateWLTE_Alpha()
262 scal[2] = +1 / (a * (a - 1)); in TSEvaluateWLTE_Alpha()
267 PetscCall(VecMAXPY(Y, 3, scal, vecs)); in TSEvaluateWLTE_Alpha()
H A Dalpha2.c329 PetscScalar scal[3]; in TSEvaluateWLTE_Alpha() local
331 scal[0] = +1 / a; in TSEvaluateWLTE_Alpha()
332 scal[1] = -1 / (a - 1); in TSEvaluateWLTE_Alpha()
333 scal[2] = +1 / (a * (a - 1)); in TSEvaluateWLTE_Alpha()
341 PetscCall(VecMAXPY(Y, 3, scal, vecX)); in TSEvaluateWLTE_Alpha()
343 PetscCall(VecMAXPY(Z, 3, scal, vecV)); in TSEvaluateWLTE_Alpha()
/petsc/src/dm/dt/space/impls/subspace/
H A Dspacesubspace.c367 PetscReal rho = 0.0, scal; in PetscSpaceSetUp_Subspace() local
371 scal = 1. / PetscSqrtReal(rho); in PetscSpaceSetUp_Subspace()
373 for (i = 0; i < origNb; i++) V[f * origNb + i] *= scal; in PetscSpaceSetUp_Subspace()
375 for (i = 0, scal = 0.; i < origNb; i++) scal += V[f * origNb + i] * V[j * origNb + i]; in PetscSpaceSetUp_Subspace()
376 for (i = 0; i < origNb; i++) V[j * origNb + i] -= V[f * origNb + i] * scal; in PetscSpaceSetUp_Subspace()
/petsc/src/ksp/pc/impls/is/
H A Dpcis.c87 static PetscErrorCode PCISSetSubdomainScalingFactor_IS(PC pc, PetscScalar scal) in PCISSetSubdomainScalingFactor_IS() argument
92 pcis->scaling_factor = scal; in PCISSetSubdomainScalingFactor_IS()
115 PetscErrorCode PCISSetSubdomainScalingFactor(PC pc, PetscScalar scal) in PCISSetSubdomainScalingFactor() argument
119 PetscTryMethod(pc, "PCISSetSubdomainScalingFactor_C", (PC, PetscScalar), (pc, scal)); in PCISSetSubdomainScalingFactor()
/petsc/include/petsc/private/
H A Dcupmblasinterface.hpp266 PETSC_CUPMBLAS_ALIAS_BLAS_FUNCTION(STANDARD, scal) in PETSC_CUPMBLAS_ALIAS_FUNCTION()
338 PETSC_CUPMBLAS_ALIAS_BLAS_FUNCTION(STANDARD, scal) in PETSC_CUPMBLAS_ALIAS_FUNCTION()
/petsc/include/
H A Dpetscblaslapack_mangle.h131 #define BLASscal_ PETSCBLAS(scal, SCAL)
/petsc/src/ts/impls/implicit/theta/
H A Dtheta.c708 PetscScalar scal[3]; in TSEvaluateWLTE_Theta() local
711 scal[0] = -1 / a; in TSEvaluateWLTE_Theta()
712 scal[1] = +1 / (a - 1); in TSEvaluateWLTE_Theta()
713 scal[2] = -1 / (a * (a - 1)); in TSEvaluateWLTE_Theta()
718 PetscCall(VecMAXPY(Y, 3, scal, vecs)); in TSEvaluateWLTE_Theta()
/petsc/src/mat/impls/is/
H A Dmatis.c389 PetscReal scal = 0.0; in MatISScaleDisassembling_Private() local
394 scal += 1.0; in MatISScaleDisassembling_Private()
399 if (scal) aa[j] /= scal; in MatISScaleDisassembling_Private()
/petsc/src/ksp/pc/impls/bddc/
H A Dbddcprivate.c3498 PetscBool scal = PETSC_FALSE; in PCBDDCAdaptiveSelection() local
3541 scal = PETSC_TRUE; in PCBDDCAdaptiveSelection()
3609 if (scal) { in PCBDDCAdaptiveSelection()
3632 if (!scal) { in PCBDDCAdaptiveSelection()
3649 if (scal) { in PCBDDCAdaptiveSelection()
3691 if (scal) { in PCBDDCAdaptiveSelection()
3696 if (!scal) { in PCBDDCAdaptiveSelection()
3799 if (upart) eigs_start = scal ? 0 : B_neigs - nmax; in PCBDDCAdaptiveSelection()
3808 if (scal) { in PCBDDCAdaptiveSelection()
/petsc/src/mat/impls/htool/
H A Dhtool.cxx366 PetscCallCXX(htool::Blas<PetscScalar>::scal(&bn, &scale, *v, &one)); in MatGetRow_Htool()
/petsc/src/vec/vec/impls/seq/kokkos/
H A Dveckok.kokkos.cxx643 PetscCallCXX(KokkosBlas::scal(exec, xv, alpha, xv)); in VecScale_SeqKokkos()
/petsc/src/mat/impls/aij/seq/kokkos/
H A Daijkok.kokkos.cxx1027 …KokkosBlas::scal(PetscGetKokkosExecutionSpace(), aijkok->a_dual.view_device(), a, aijkok->a_dual.v… in MatScale_SeqAIJKokkos()
/petsc/share/petsc/datafiles/meshes/
H A Dtestcase3D.cas3307 (prepdf/ufla-max-scal-diss 30)