Lines Matching refs:pipe
10 PetscErrorCode PipeComputeSteadyState(Pipe pipe, PetscScalar Q0, PetscScalar H0) in PipeComputeSteadyState() argument
16 PetscScalar *coords, c = pipe->R / (GRAV * pipe->A); in PipeComputeSteadyState()
19 PetscCall(DMGetCoordinateDM(pipe->da, &cda)); in PipeComputeSteadyState()
20 PetscCall(DMGetCoordinatesLocal(pipe->da, &local)); in PipeComputeSteadyState()
21 PetscCall(DMDAVecGetArray(pipe->da, pipe->x, &x)); in PipeComputeSteadyState()
23 PetscCall(DMDAGetCorners(pipe->da, &start, 0, 0, &n, 0, 0)); in PipeComputeSteadyState()
30 PetscCall(DMDAVecRestoreArray(pipe->da, pipe->x, &x)); in PipeComputeSteadyState()
60 …Lax(DMDALocalInfo *info, PetscReal ptime, PipeField *x, PipeField *xdot, PetscScalar *f, Pipe pipe) in PipeIFunctionLocal_Lax() argument
63 PetscReal a = pipe->a, A = pipe->A, R = pipe->R, c = a * a / (GRAV * A); in PipeIFunctionLocal_Lax()
64 PetscReal dx = pipe->length / (info->mx - 1), dt = pipe->dt; in PipeIFunctionLocal_Lax()
66 PipeField *xold = pipe->xold; in PipeIFunctionLocal_Lax()
69 PetscCall(DMDAGetCorners(pipe->da, &start, 0, 0, &n, 0, 0)); 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()