| Line 54... |
Line 54... |
|
|
PetscFunctionBegin;
|
PetscFunctionBegin;
|
if (st->B) {
|
if (st->B) {
|
ierr = KSPSetOperators(st->ksp,st->B,st->B,DIFFERENT_NONZERO_PATTERN);CHKERRQ(ierr);
|
ierr = KSPSetOperators(st->ksp,st->B,st->B,DIFFERENT_NONZERO_PATTERN);CHKERRQ(ierr);
|
ierr = KSPSetUp(st->ksp);CHKERRQ(ierr);
|
ierr = KSPSetUp(st->ksp);CHKERRQ(ierr);
|
|
}
|
|
PetscFunctionReturn(0);
|
|
}
|
|
|
|
|
|
#undef __FUNCT__
|
|
#define __FUNCT__ "STView_Shift"
|
|
static int STView_Shift(ST st,PetscViewer viewer)
|
|
{
|
|
int ierr;
|
|
|
|
PetscFunctionBegin;
|
|
if (st->B) {
|
|
ierr = STView_Default(st,viewer);CHKERRQ(ierr);
|
}
|
}
|
PetscFunctionReturn(0);
|
PetscFunctionReturn(0);
|
}
|
}
|
|
|
EXTERN_C_BEGIN
|
EXTERN_C_BEGIN
|
| Line 69... |
Line 83... |
st->ops->apply = STApply_Shift;
|
st->ops->apply = STApply_Shift;
|
st->ops->applyB = STApplyB_Shift;
|
st->ops->applyB = STApplyB_Shift;
|
st->ops->applynoB = STApply_Shift;
|
st->ops->applynoB = STApply_Shift;
|
st->ops->backtr = STBackTransform_Shift;
|
st->ops->backtr = STBackTransform_Shift;
|
st->ops->setup = STSetUp_Shift;
|
st->ops->setup = STSetUp_Shift;
|
|
st->ops->view = STView_Shift;
|
st->checknullspace = 0;
|
st->checknullspace = 0;
|
PetscFunctionReturn(0);
|
PetscFunctionReturn(0);
|
}
|
}
|
EXTERN_C_END
|
EXTERN_C_END
|
|
|