Searched refs:jw (Results 1 – 4 of 4) sorted by relevance
| /petsc/src/snes/tutorials/ |
| H A D | ex48.c | 204 …T], PetscReal phi[PETSC_RESTRICT], PetscReal dphi[PETSC_RESTRICT][3], PetscReal *PETSC_RESTRICT jw) in HexComputeGeometry() argument
226 *jw = 1.0 * jdet; in HexComputeGeometry()
791 PetscReal dz[3], phi[8], dphi[8][3], jw, eta, deta; in THIFunctionLocal() local
794 HexComputeGeometry(q, hx, hy, dz, phi, dphi, &jw); in THIFunctionLocal()
796 jw /= thi->rhog; /* scales residuals to be O(1) */ in THIFunctionLocal()
802 …fn[l]->u += dp[0] * jw * eta * (4. * du[0] + 2. * dv[1]) + dp[1] * jw * eta * (du[1] + dv[0]) + dp… in THIFunctionLocal()
803 …fn[l]->v += dp[1] * jw * eta * (2. * du[0] + 4. * dv[1]) + dp[0] * jw * eta * (du[1] + dv[0]) + dp… in THIFunctionLocal()
827 const PetscReal jw = 0.25 * hx * hy / thi->rhog, *phi = QuadQInterp[q]; in THIFunctionLocal() local
839 fn[ls + l]->u += pp * jw * beta2 * u; in THIFunctionLocal()
840 fn[ls + l]->v += pp * jw * beta2 * v; in THIFunctionLocal()
[all …]
|
| /petsc/src/ts/tutorials/ |
| H A D | ex14.c | 192 …tscReal dz[restrict], PetscReal phi[restrict], PetscReal dphi[restrict][3], PetscReal *restrict jw) in HexComputeGeometry() argument
210 *jw = 1.0 * jdet; in HexComputeGeometry()
789 PetscReal dz[3], phi[8], dphi[8][3], jw, eta, deta; in THIFunctionLocal_3D() local
796 HexComputeGeometry(q, hx, hy, dz, phi, dphi, &jw); in THIFunctionLocal_3D()
798 jw /= thi->rhog; /* scales residuals to be O(1) */ in THIFunctionLocal_3D()
804 …fn[l]->u += dp[0] * jw * eta * (4. * du[0] + 2. * dv[1]) + dp[1] * jw * eta * (du[1] + dv[0]) + dp… in THIFunctionLocal_3D()
805 …fn[l]->v += dp[1] * jw * eta * (2. * du[0] + 4. * dv[1]) + dp[0] * jw * eta * (du[1] + dv[0]) + dp… in THIFunctionLocal_3D()
806 fn[l]->u += pp * jw * udot * thi->inertia * pp; in THIFunctionLocal_3D()
807 fn[l]->v += pp * jw * vdot * thi->inertia * pp; in THIFunctionLocal_3D()
831 const PetscReal jw = 0.25 * hx * hy, *phi = QuadQInterp[q]; in THIFunctionLocal_3D() local
[all …]
|
| /petsc/src/ksp/ksp/tutorials/ |
| H A D | ex45f.F90 | 107 PetscInt is, js, iw, jw
125 PetscCallA(DMDAGetCorners(dm, is, js, PETSC_NULL_INTEGER, iw, jw, PETSC_NULL_INTEGER, ierr))
|
| /petsc/src/tao/unconstrained/impls/bmrm/ |
| H A D | bmrm.c | 306 PetscReal jtwt = 0.0, max_jtwt, pre_epsilon, epsilon, jw, min_jw; in TaoSolve_BMRM() local
405 jw = reg + f; /* J(w) = regularizer + Remp(w) */ in TaoSolve_BMRM()
406 if (jw < min_jw) min_jw = jw; in TaoSolve_BMRM()
|