Searched refs:ilast (Results 1 – 1 of 1) sorted by relevance
| /petsc/src/ts/tutorials/network/ |
| H A D | pipeImpls.c | 38 static inline PetscScalar dqdx(PipeField *x, PetscInt i, PetscInt ilast, PetscReal dx) in dqdx() argument
42 } else if (i == ilast) { in dqdx()
49 static inline PetscScalar dhdx(PipeField *x, PetscInt i, PetscInt ilast, PetscReal dx) in dhdx() argument
53 } else if (i == ilast) { in dhdx()
62 PetscInt i, start, n, ilast; in PipeIFunctionLocal_Lax() local
72 ilast = start + n - 1; in PipeIFunctionLocal_Lax()
82 …f[2 * (i - 1) + 2] = (x[i].q - xold_i) + dt * (GRAV * pipe->A * dhdx(xold, i, ilast, dx) + pipe->R… in PipeIFunctionLocal_Lax()
86 f[2 * (i - 1) + 3] = (x[i].h - xold_i) + dt * c * dqdx(xold, i, ilast, dx); in PipeIFunctionLocal_Lax()
91 … ilast] = x[ilast].q - xold[ilast - 1].q + ((GRAV * A) / a) * (x[ilast].h - xold[ilast - 1].h) + d… in PipeIFunctionLocal_Lax()
|