Searched refs:p_diff (Results 1 – 3 of 3) sorted by relevance
| /petsc/src/ts/tutorials/power_grid/ |
| H A D | ex8.c | 209 PetscErrorCode diffuse(PetscScalar **p, PetscInt i, PetscInt j, PetscReal t, PetscScalar *p_diff, A… in diffuse() argument
213 … *p_diff = user->disper_coe * ((p[j - 1][i] - 2 * p[j][i] + p[j + 1][i]) / (user->dy * user->dy)); in diffuse()
215 …*p_diff = user->disper_coe * ((-p[j - 2][i] + 16 * p[j - 1][i] - 30 * p[j][i] + 16 * p[j + 1][i] -… in diffuse()
217 …*p_diff = user->disper_coe * ((2 * p[j - 3][i] - 27 * p[j - 2][i] + 270 * p[j - 1][i] - 490 * p[j]… in diffuse()
231 PetscScalar p_adv1 = 0.0, p_adv2 = 0.0, p_diff = 0; in IFunction() local
262 PetscCall(diffuse(p, i, j, t, &p_diff, user)); in IFunction()
263 f[j][i] = -p_adv1 - p_adv2 + p_diff - pdot[j][i]; in IFunction()
|
| H A D | ex7.c | 237 PetscErrorCode diffuse(PetscScalar **p, PetscInt i, PetscInt j, PetscReal t, PetscScalar *p_diff, A… in diffuse() argument
241 … *p_diff = user->disper_coe * ((p[j - 1][i] - 2 * p[j][i] + p[j + 1][i]) / (user->dy * user->dy)); in diffuse()
243 …*p_diff = user->disper_coe * ((-p[j - 2][i] + 16 * p[j - 1][i] - 30 * p[j][i] + 16 * p[j + 1][i] -… in diffuse()
245 …*p_diff = user->disper_coe * ((2 * p[j - 3][i] - 27 * p[j - 2][i] + 270 * p[j - 1][i] - 490 * p[j]… in diffuse()
259 …PetscScalar p_adv1 = 0.0, p_adv2 = 0.0, p_diff; /* initialize to prevent incorrect compiler warn… in IFunction() local
286 PetscCall(diffuse(p, i, j, t, &p_diff, user)); in IFunction()
287 f[j][i] = -p_adv1 - p_adv2 + p_diff - pdot[j][i]; in IFunction()
|
| H A D | ex6.c | 212 PetscErrorCode diffuse(PetscScalar **p, PetscInt i, PetscInt j, PetscReal t, PetscScalar *p_diff, A… in diffuse() argument
215 *p_diff = user->disper_coe * ((p[j - 1][i] - 2 * p[j][i] + p[j + 1][i]) / (user->dy * user->dy)); in diffuse()
260 PetscScalar p_adv1, p_adv2, p_diff; in IFunction() local
290 PetscCall(diffuse(p, i, j, t, &p_diff, user)); in IFunction()
291 f[j][i] = -p_adv1 - p_adv2 + p_diff - pdot[j][i]; in IFunction()
|