| /petsc/src/ts/tutorials/power_grid/ |
| H A D | ex9adj.c | 137 static PetscErrorCode DRDUJacobianTranspose(TS ts, PetscReal t, Vec U, Mat DRDU, Mat B, AppCtx *ctx) in DRDUJacobianTranspose() argument
147 PetscCall(MatSetValues(DRDU, 1, row, 1, col, ru, INSERT_VALUES)); in DRDUJacobianTranspose()
148 PetscCall(MatAssemblyBegin(DRDU, MAT_FINAL_ASSEMBLY)); in DRDUJacobianTranspose()
149 PetscCall(MatAssemblyEnd(DRDU, MAT_FINAL_ASSEMBLY)); in DRDUJacobianTranspose()
183 Mat DRDU, DRDP; in main() local
221 PetscCall(MatCreateDense(PETSC_COMM_WORLD, PETSC_DECIDE, PETSC_DECIDE, 1, 2, NULL, &DRDU)); in main()
222 PetscCall(MatSetUp(DRDU)); in main()
282 PetscCall(TSSetRHSJacobian(quadts, DRDU, DRDU, (TSRHSJacobianFn *)DRDUJacobianTranspose, &ctx)); in main()
369 PetscCall(MatDestroy(&DRDU)); in main()
|
| H A D | ex9opt.c | 127 static PetscErrorCode DRDUJacobianTranspose(TS ts, PetscReal t, Vec U, Mat DRDU, Mat B, AppCtx *ctx) in DRDUJacobianTranspose() argument
137 PetscCall(MatSetValues(DRDU, 1, row, 1, col, ru, INSERT_VALUES)); in DRDUJacobianTranspose()
138 PetscCall(MatAssemblyBegin(DRDU, MAT_FINAL_ASSEMBLY)); in DRDUJacobianTranspose()
139 PetscCall(MatAssemblyEnd(DRDU, MAT_FINAL_ASSEMBLY)); in DRDUJacobianTranspose()
180 Mat DRDU, DRDP; in main() local
237 PetscCall(MatCreateDense(PETSC_COMM_WORLD, PETSC_DECIDE, PETSC_DECIDE, 1, 2, NULL, &DRDU)); in main()
238 PetscCall(MatSetUp(DRDU)); in main()
267 PetscCall(TSSetRHSJacobian(quadts, DRDU, DRDU, (TSRHSJacobianFn *)DRDUJacobianTranspose, &ctx)); in main()
322 PetscCall(MatDestroy(&DRDU)); in main()
|
| H A D | ex3opt.c | 112 PetscCall(MatCreateDense(PETSC_COMM_WORLD, PETSC_DECIDE, PETSC_DECIDE, 2, 1, NULL, &ctx.DRDU)); in main()
113 PetscCall(MatSetUp(ctx.DRDU)); in main()
132 …PetscCall(TSSetRHSJacobian(ctx.quadts, ctx.DRDU, ctx.DRDU, (TSRHSJacobianFn *)DRDUJacobianTranspos… in main()
142 …PetscCall(TSSetRHSJacobian(ctx.quadts, ctx.DRDU, ctx.DRDU, (TSRHSJacobianFn *)DRDUJacobianTranspos… in main()
204 PetscCall(MatDestroy(&ctx.DRDU)); in main()
|
| H A D | ex3sa.c | 67 PetscCall(MatCreateDense(PETSC_COMM_WORLD, PETSC_DECIDE, PETSC_DECIDE, 2, 1, NULL, &ctx.DRDU)); in main()
68 PetscCall(MatSetUp(ctx.DRDU)); in main()
139 …PetscCall(TSSetRHSJacobian(quadts, ctx.DRDU, ctx.DRDU, (TSRHSJacobianFn *)DRDUJacobianTranspose, &… in main()
248 PetscCall(MatDestroy(&ctx.DRDU)); in main()
|
| H A D | ex3.h | 18 Mat DRDU, DRDP; member
186 PetscErrorCode DRDUJacobianTranspose(TS ts, PetscReal t, Vec U, Mat DRDU, Mat B, AppCtx *ctx) in DRDUJacobianTranspose() argument
196 PetscCall(MatSetValues(DRDU, 2, row, 1, col, ru, INSERT_VALUES)); in DRDUJacobianTranspose()
198 PetscCall(MatAssemblyBegin(DRDU, MAT_FINAL_ASSEMBLY)); in DRDUJacobianTranspose()
199 PetscCall(MatAssemblyEnd(DRDU, MAT_FINAL_ASSEMBLY)); in DRDUJacobianTranspose()
|
| /petsc/src/ts/tutorials/optimal_control/ |
| H A D | ex1.c | 11 Mat Jacp, DRDU, DRDP; member
199 static PetscErrorCode DRDUJacobianTranspose(TS ts, PetscReal t, Vec U, Mat DRDU, Mat B, PetscCtx ct… in DRDUJacobianTranspose() argument
213 PetscCall(MatSetValues(DRDU, 2, row, 1, col, &drdu[0][0], INSERT_VALUES)); in DRDUJacobianTranspose()
215 PetscCall(MatAssemblyBegin(DRDU, MAT_FINAL_ASSEMBLY)); in DRDUJacobianTranspose()
216 PetscCall(MatAssemblyEnd(DRDU, MAT_FINAL_ASSEMBLY)); in DRDUJacobianTranspose()
277 …PetscCall(MatCreateDense(PETSC_COMM_WORLD, PETSC_DECIDE, PETSC_DECIDE, 2, 1, NULL, &aircraft.DRDU)… in main()
278 PetscCall(MatSetUp(aircraft.DRDU)); in main()
309 …PetscCall(TSSetRHSJacobian(aircraft.quadts, aircraft.DRDU, aircraft.DRDU, (TSRHSJacobian)DRDUJacob… in main()
318 PetscCall(MatCreateVecs(aircraft.DRDU, &aircraft.inthp1[0], NULL)); in main()
319 PetscCall(MatCreateVecs(aircraft.DRDU, &aircraft.inthp2[0], NULL)); in main()
[all …]
|
| /petsc/src/ts/tutorials/power_grid/stability_9bus/ |
| H A D | ex9busopt.c | 107 Mat DRDU, DRDP; member
963 static PetscErrorCode DRDUJacobianTranspose(TS ts, PetscReal t, Vec U, Mat DRDU, Mat B, Userctx *us… in DRDUJacobianTranspose() argument
974 PetscCall(MatDenseGetColumn(DRDU, 0, &xarr)); in DRDUJacobianTranspose()
998 PetscCall(MatDenseRestoreColumn(DRDU, &xarr)); in DRDUJacobianTranspose()
1136 …atCreateDense(PETSC_COMM_WORLD, PETSC_DECIDE, PETSC_DECIDE, user.neqs_pgrid, 1, NULL, &user.DRDU)); in main()
1137 PetscCall(MatSetUp(user.DRDU)); in main()
1201 PetscCall(MatDestroy(&user.DRDU)); in main()
1265 …PetscCall(TSSetRHSJacobian(quadts, ctx->DRDU, ctx->DRDU, (TSRHSJacobianFn *)DRDUJacobianTranspose,… in FormFunctionGradient()
|
| /petsc/src/ts/interface/sensitivity/ |
| H A D | tssen.c | 395 PetscErrorCode TSComputeDRDUFunction(TS ts, PetscReal t, Vec U, Vec *DRDU) in TSComputeDRDUFunction() argument
398 if (!DRDU) PetscFunctionReturn(PETSC_SUCCESS); in TSComputeDRDUFunction()
402 …PetscCallBack("TS callback DRDU for sensitivity analysis", (*ts->drdufunction)(ts, t, U, DRDU, ts-… in TSComputeDRDUFunction()
1203 PetscErrorCode TSAdjointComputeDRDYFunction(TS ts, PetscReal t, Vec U, Vec *DRDU) in TSAdjointComputeDRDYFunction() argument
1209 …PetscCallBack("TS callback DRDY for sensitivity analysis", (*ts->drdufunction)(ts, t, U, DRDU, ts-… in TSAdjointComputeDRDYFunction()
|
| /petsc/doc/manual/ |
| H A D | ts.md | 1207 TSSetRHSJacobian(TS quadts,Vec DRDU,Vec DRDU,PetscErrorCode (*drdyf)(TS,PetscReal,Vec,Vec*,PetscCtx…
1208 TSSetRHSJacobianP(TS quadts,Vec DRDU,Vec DRDU,PetscErrorCode (*drdyp)(TS,PetscReal,Vec,Vec*,PetscCt…
|