Searched refs:quadJp (Results 1 – 1 of 1) sorted by relevance
| /petsc/src/ts/impls/implicit/theta/ |
| H A D | theta.c | 278 Mat J, Jpre, quadJ = NULL, quadJp = NULL; in TSAdjointStepBEuler_Private() local
297 PetscCall(TSGetRHSJacobianP(quadts, &quadJp, NULL, NULL)); in TSAdjointStepBEuler_Private()
381 if (quadts) PetscCall(TSComputeRHSJacobianP(quadts, th->stage_time, ts->vec_sol, quadJp)); in TSAdjointStepBEuler_Private()
392 if (quadJp) { in TSAdjointStepBEuler_Private()
393 PetscCall(MatDenseGetColumn(quadJp, nadj, &xarr)); in TSAdjointStepBEuler_Private()
397 PetscCall(MatDenseRestoreColumn(quadJp, &xarr)); in TSAdjointStepBEuler_Private()
423 Mat J, Jpre, quadJ = NULL, quadJp = NULL; in TSAdjointStep_Theta() local
439 PetscCall(TSGetRHSJacobianP(quadts, &quadJp, NULL, NULL)); in TSAdjointStep_Theta()
570 if (quadts) PetscCall(TSComputeRHSJacobianP(quadts, th->stage_time, ts->vec_sol, quadJp)); in TSAdjointStep_Theta()
574 if (quadJp) { in TSAdjointStep_Theta()
[all …]
|