Searched refs:dbeta2 (Results 1 – 2 of 2) sorted by relevance
| /petsc/src/snes/tutorials/ |
| H A D | ex48.c | 358 …tic void THIFriction(THI thi, PetscReal rbeta2, PetscReal gam, PetscReal *beta2, PetscReal *dbeta2) in THIFriction() argument
367 *dbeta2 = 0; in THIFriction()
370 …*dbeta2 = thi->friction.exponent * *beta2 / (thi->friction.eps2 + gam * thi->friction.irefgam) * t… in THIFriction()
829 PetscReal beta2, dbeta2; in THIFunctionLocal() local
835 … THIFriction(thi, PetscRealPart(rbeta2), PetscRealPart(u * u + v * v) / 2, &beta2, &dbeta2); in THIFunctionLocal()
991 PetscReal phi[4], dphi[4][2], jw, eta, deta, beta2, dbeta2; in THIJacobianLocal_2D() local
1002 THIFriction(thi, PetscRealPart(rbeta2), PetscRealPart(u * u + v * v) / 2, &beta2, &dbeta2); in THIJacobianLocal_2D()
1016 … + 2. * dv[1]) + dp[1] * jw * deta * dgdu * (du[1] + dv[0]) + pp * jw * (dbeta2 / h) * u * u * ppl… in THIJacobianLocal_2D()
1017 … + 2. * dv[1]) + dp[1] * jw * deta * dgdv * (du[1] + dv[0]) + pp * jw * (dbeta2 / h) * u * v * ppl… in THIJacobianLocal_2D()
1018 … + 2. * du[0]) + dp[0] * jw * deta * dgdu * (du[1] + dv[0]) + pp * jw * (dbeta2 / h) * v * u * ppl… in THIJacobianLocal_2D()
[all …]
|
| /petsc/src/ts/tutorials/ |
| H A D | ex14.c | 408 …tic void THIFriction(THI thi, PetscReal rbeta2, PetscReal gam, PetscReal *beta2, PetscReal *dbeta2) in THIFriction() argument
417 *dbeta2 = 0; in THIFriction()
420 …*dbeta2 = thi->friction.exponent * *beta2 / (thi->friction.eps2 + gam * thi->friction.irefgam) * t… in THIFriction()
833 PetscReal beta2, dbeta2; in THIFunctionLocal_3D() local
839 … THIFriction(thi, PetscRealPart(rbeta2), PetscRealPart(u * u + v * v) / 2, &beta2, &dbeta2); in THIFunctionLocal_3D()
1177 PetscReal beta2, dbeta2; in THIJacobianLocal_Momentum() local
1183 … THIFriction(thi, PetscRealPart(rbeta2), PetscRealPart(u * u + v * v) / 2, &beta2, &dbeta2); in THIJacobianLocal_Momentum()
1188 … Ke[l * 2 + 0][ll * 2 + 0] += pp * jw * beta2 * ppl + pp * jw * dbeta2 * u * u * ppl; in THIJacobianLocal_Momentum()
1189 Ke[l * 2 + 0][ll * 2 + 1] += pp * jw * dbeta2 * u * v * ppl; in THIJacobianLocal_Momentum()
1190 Ke[l * 2 + 1][ll * 2 + 0] += pp * jw * dbeta2 * v * u * ppl; in THIJacobianLocal_Momentum()
[all …]
|