28 PetscErrorCode EventFunction(TS ts, PetscReal t, Vec U, PetscReal *fvalue, PetscCtx ctx)  in EventFunction()  argument
34   PetscCall(VecGetArrayRead(U, &u));  in EventFunction()
40   PetscCall(VecRestoreArrayRead(U, &u));  in EventFunction()
44 PetscErrorCode ShiftGradients(TS ts, Vec U, AppCtx *actx)  in ShiftGradients()  argument
54   PetscCall(VecGetArrayRead(U, &u));  in ShiftGradients()
77   PetscCall(VecRestoreArrayRead(U, &u));  in ShiftGradients()
101 PetscErrorCode PostEventFunction(TS ts, PetscInt nevents, PetscInt event_list[], PetscReal t, Vec U…  in PostEventFunction()  argument
106   if (!forwardsolve) PetscCall(ShiftGradients(ts, U, actx));  in PostEventFunction()
120 static PetscErrorCode IFunction(TS ts, PetscReal t, Vec U, Vec Udot, Vec F, PetscCtx ctx)  in IFunction()  argument
128   PetscCall(VecGetArrayRead(U, &u));  in IFunction()
140   PetscCall(VecRestoreArrayRead(U, &u));  in IFunction()
149 static PetscErrorCode IJacobian(TS ts, PetscReal t, Vec U, Vec Udot, PetscReal a, Mat A, Mat B, Pet…  in IJacobian()  argument
157   PetscCall(VecGetArrayRead(U, &u));  in IJacobian()
173   PetscCall(VecRestoreArrayRead(U, &u));  in IJacobian()
188   Vec          U;  /* solution will be stored here */  in main()  local
228   PetscCall(MatCreateVecs(A, &U, NULL));  in main()
237   PetscCall(VecGetArray(U, &u));  in main()
240   PetscCall(VecRestoreArray(U, &u));  in main()
253   PetscCall(TSSetSolution(ts, U));  in main()
271   PetscCall(TSSolve(ts, U));  in main()
273   PetscCall(VecGetArray(U, &u));  in main()
279   PetscCall(VecRestoreArray(U, &u));  in main()
281   PetscCall(FWDRun(ts, U, (void *)&app));  in main()
283   PetscCall(VecGetArray(U, &u));  in main()
289   PetscCall(VecRestoreArray(U, &u));  in main()
291   PetscCall(FWDRun(ts, U, (void *)&app));  in main()
293   PetscCall(VecGetArray(U, &u));  in main()
300   PetscCall(VecRestoreArray(U, &u));  in main()
302   PetscCall(FWDRun(ts, U, (void *)&app));  in main()
304   PetscCall(VecGetArray(U, &u));  in main()
308   PetscCall(VecRestoreArray(U, &u));  in main()
314   PetscCall(VecDestroy(&U));  in main()
324   Vec     U; /* solution will be stored here */  in FWDRun()  local
328   PetscCall(TSGetSolution(ts, &U));  in FWDRun()
329   PetscCall(VecCopy(U0, U));  in FWDRun()
337   PetscCall(TSSolve(ts, U));  in FWDRun()