Searched refs:VecsSensiPTemp (Results 1 – 2 of 2) sorted by relevance
| /petsc/src/ts/impls/arkimex/ |
| H A D | arkimex.h | 54 Vec *VecsSensiPTemp; /* Temporary Vectors to store JacobianP-transpose-vector product */ member
|
| H A D | arkimex.c | 1567 …am = ark->VecsDeltaLam, *VecsSensiTemp = ark->VecsSensiTemp, *VecsSensiPTemp = ark->VecsSensiPTemp; in TSAdjointStep_ARKIMEX() local
1612 PetscCall(MatMultTranspose(ts->Jacp, VecsSensiTemp[nadj], VecsSensiPTemp[nadj])); in TSAdjointStep_ARKIMEX()
1614 PetscCall(VecAXPY(ts->vecs_sensip[nadj], adjoint_time_step, VecsSensiPTemp[nadj])); in TSAdjointStep_ARKIMEX()
1633 PetscCall(MatMultTranspose(ts->Jacprhs, VecsSensiTemp[nadj], VecsSensiPTemp[nadj])); in TSAdjointStep_ARKIMEX()
1635 PetscCall(VecAXPY(ts->vecs_sensip[nadj], adjoint_time_step, VecsSensiPTemp[nadj])); in TSAdjointStep_ARKIMEX()
1655 PetscCall(MatMultTranspose(ts->Jacp, VecsDeltaLam[nadj * s + i], VecsSensiPTemp[nadj])); in TSAdjointStep_ARKIMEX()
1657 …etscCall(VecAXPY(ts->vecs_sensip[nadj], -At[i * s + i] * adjoint_time_step, VecsSensiPTemp[nadj])); in TSAdjointStep_ARKIMEX()
1785 PetscCall(VecDestroyVecs(ts->numcost, &ark->VecsSensiPTemp)); in TSAdjointReset_ARKIMEX()
2056 …s->vecs_sensip) PetscCall(VecDuplicateVecs(ts->vecs_sensip[0], ts->numcost, &ark->VecsSensiPTemp)); in TSAdjointSetUp_ARKIMEX()
2408 ark->VecsSensiPTemp = NULL; in TSCreate_ARKIMEX()
|