Home
last modified time | relevance | path

Searched refs:rho0 (Results 1 – 8 of 8) sorted by relevance

/petsc/src/ts/adapt/impls/dsp/
H A Dadaptdsp.c130 PetscReal rho0; in TSAdaptChoose_DSP() local
137 rho0 = PetscPowReal(ctr0, b1); in TSAdaptChoose_DSP()
138 rho0 *= PetscPowReal(ctr1, b2); in TSAdaptChoose_DSP()
139 rho0 *= PetscPowReal(ctr2, b3); in TSAdaptChoose_DSP()
140 rho0 *= PetscPowReal(rho1, -a2); in TSAdaptChoose_DSP()
141 rho0 *= PetscPowReal(rho2, -a3); in TSAdaptChoose_DSP()
142 rho0 = Limiter(rho0, 1); in TSAdaptChoose_DSP()
145 if (rho0 >= safety) *accept = PETSC_TRUE; in TSAdaptChoose_DSP()
157 dsp->hratio[0] = rho0; in TSAdaptChoose_DSP()
161 hfac = rho0; in TSAdaptChoose_DSP()
/petsc/src/dm/tests/
H A Dex30.c12 PetscReal alpha = 1, K = 1, rho0 = 1, u0 = 0, sigma = 0.2; in main() local
32 PetscCall(PetscOptionsReal("-rho0", "Reference density", "", rho0, &rho0, NULL)); in main()
100 v[6] = -0.5 / rho0; in main()
104 v[10] = 0.5 / rho0; in main()
/petsc/src/ksp/ksp/impls/symmlq/
H A Dsymmlq.c18 PetscScalar c = 1.0, cold = 1.0, s = 0.0, sold = 0.0, coold, soold, rho0, rho1, rho2, rho3; in KSPSolve_SYMMLQ() local
149 rho0 = cold * alpha - coold * sold * betaold; /* gamma_bar */ in KSPSolve_SYMMLQ()
150 rho1 = PetscSqrtScalar(rho0 * rho0 + beta * beta); /* gamma */ in KSPSolve_SYMMLQ()
155 c = rho0 / rho1; in KSPSolve_SYMMLQ()
/petsc/src/ksp/ksp/impls/bcgsl/
H A Dbcgsl.c15 PetscScalar rho0, rho1; in KSPSolve_BCGSL() local
63 rho0 = omega = 1; in KSPSolve_BCGSL()
97 rho0 = -omega * rho0; in KSPSolve_BCGSL()
107 beta = alpha * (rho1 / rho0); in KSPSolve_BCGSL()
108 rho0 = rho1; in KSPSolve_BCGSL()
/petsc/src/tao/pde_constrained/impls/lcl/
H A Dlcl.h70 PetscReal rho0; member
H A Dlcl.c71 …PetscCall(PetscOptionsReal("-tao_lcl_rho0", "init value for rho", "", lclP->rho0, &lclP->rho0, NUL… in TaoSetFromOptions_LCL()
183 lclP->rho = lclP->rho0; in TaoSolve_LCL()
589 lclP->rho0 = 1.0e-4; in TaoCreate_LCL()
/petsc/src/ksp/ksp/impls/minres/
H A Dminres.c481 PetscScalar rho0, rho1, rho2, rho3, dp = 0.0; in KSPSolve_MINRES_OLD() local
595 rho0 = cold * alpha - coold * sold * betaold; in KSPSolve_MINRES_OLD()
596 rho1 = PetscSqrtScalar(rho0 * rho0 + beta * beta); in KSPSolve_MINRES_OLD()
601 if (ksp->converged_neg_curve && PetscRealPart(cold * rho0) <= 0.0) { in KSPSolve_MINRES_OLD()
602 …gative curvature c_nm1=%g, gbar %g\n", (double)PetscRealPart(cold), -(double)PetscRealPart(rho0))); in KSPSolve_MINRES_OLD()
609 c = rho0 / rho1; in KSPSolve_MINRES_OLD()
/petsc/src/ts/tutorials/
H A Dex11.c1629 PetscReal eps, ueq[3], rho0, twopi; in initLinearWave() local
1634 rho0 = 1e3; /* density of water */ in initLinearWave()
1637 ueq[0] = rho0; in initLinearWave()