| Line 90... |
Line 90... |
#endif
|
#endif
|
PetscFunctionReturn(0);
|
PetscFunctionReturn(0);
|
}
|
}
|
|
|
#undef __FUNCT__
|
#undef __FUNCT__
|
#define __FUNCT__ "STPost_Sinvert"
|
#define __FUNCT__ "STPostSolve_Sinvert"
|
PetscErrorCode STPost_Sinvert(ST st)
|
PetscErrorCode STPostSolve_Sinvert(ST st)
|
{
|
{
|
PetscErrorCode ierr;
|
PetscErrorCode ierr;
|
|
|
PetscFunctionBegin;
|
PetscFunctionBegin;
|
if (st->shift_matrix == STMATMODE_INPLACE) {
|
if (st->shift_matrix == STMATMODE_INPLACE) {
|
| Line 216... |
Line 216... |
|
|
st->ops->apply = STApply_Sinvert;
|
st->ops->apply = STApply_Sinvert;
|
st->ops->applyB = STApplyB_Sinvert;
|
st->ops->applyB = STApplyB_Sinvert;
|
st->ops->applynoB = STApplyNoB_Sinvert;
|
st->ops->applynoB = STApplyNoB_Sinvert;
|
st->ops->applytrans = STApplyTranspose_Sinvert;
|
st->ops->applytrans = STApplyTranspose_Sinvert;
|
st->ops->postsolve = STPost_Sinvert;
|
st->ops->postsolve = STPostSolve_Sinvert;
|
st->ops->backtr = STBackTransform_Sinvert;
|
st->ops->backtr = STBackTransform_Sinvert;
|
st->ops->setup = STSetUp_Sinvert;
|
st->ops->setup = STSetUp_Sinvert;
|
st->ops->setshift = STSetShift_Sinvert;
|
st->ops->setshift = STSetShift_Sinvert;
|
st->ops->view = STView_Default;
|
st->ops->view = STView_Default;
|
|
|