Searched refs:HyHzdHx (Results 1 – 5 of 5) sorted by relevance
| /petsc/src/ksp/ksp/tutorials/ |
| H A D | ex45.c | 78 PetscScalar Hx, Hy, Hz, HxHydHz, HyHzdHx, HxHzdHy; in ComputeRHS() local
90 HyHzdHx = Hy * Hz / Hx; in ComputeRHS()
98 barray[k][j][i] = 2.0 * (HxHydHz + HxHzdHy + HyHzdHx); in ComputeRHS()
121 PetscScalar v[7], Hx, Hy, Hz, HxHydHz, HyHzdHx, HxHzdHy; in ComputeMatrix() local
133 HyHzdHx = Hy * Hz / Hx; in ComputeMatrix()
143 v[0] = 2.0 * (HxHydHz + HxHzdHy + HyHzdHx); in ComputeMatrix()
154 v[2] = -HyHzdHx; in ComputeMatrix()
158 v[3] = 2.0 * (HxHydHz + HxHzdHy + HyHzdHx); in ComputeMatrix()
162 v[4] = -HyHzdHx; in ComputeMatrix()
|
| H A D | ex22f.F90 | 45 PetscScalar HxHydHz, HyHzdHx
59 HyHzdHx = Hy*Hz/Hx
69 v(1) = 2.0*(HxHydHz + HxHzdHy + HyHzdHx)
80 v(3) = -HyHzdHx
84 v(4) = 2.0*(HxHydHz + HxHzdHy + HyHzdHx)
88 v(5) = -HyHzdHx
|
| H A D | ex34.c | 136 PetscScalar v[7], Hx, Hy, Hz, HyHzdHx, HxHzdHy, HxHydHz; in ComputeMatrix() local
148 HyHzdHx = Hy * Hz / Hx; in ComputeMatrix()
184 v[num] = -HyHzdHx; in ComputeMatrix()
193 v[num] = -HyHzdHx; in ComputeMatrix()
219 … v[num] = (PetscReal)numk * HxHydHz + (PetscReal)numj * HxHzdHy + (PetscReal)numi * HyHzdHx; in ComputeMatrix()
237 v[2] = -HyHzdHx; in ComputeMatrix()
242 v[3] = 2.0 * (HyHzdHx + HxHzdHy + HxHydHz); in ComputeMatrix()
247 v[4] = -HyHzdHx; in ComputeMatrix()
|
| /petsc/src/ksp/ksp/tests/ |
| H A D | ex32.c | 128 PetscScalar *v, *v_neighbor, Hx, Hy, Hz, HxHydHz, HyHzdHx, HxHzdHy; in ComputeMatrix() local
141 HyHzdHx = Hy * Hz / Hx; in ComputeMatrix()
150 v[k3] = 2.0 * (HxHydHz + HxHzdHy + HyHzdHx); in ComputeMatrix()
|
| /petsc/src/mat/tests/ |
| H A D | ex129.c | 186 PetscScalar *v, *v_neighbor, Hx, Hy, Hz, HxHydHz, HyHzdHx, HxHzdHy, r1, r2; in ComputeMatrix() local
205 HyHzdHx = Hy * Hz / Hx; in ComputeMatrix()
214 v[k3] = 2.0 * (HxHydHz + HxHzdHy + HyHzdHx); in ComputeMatrix()
|