| Line 120... |
Line 120... |
PetscErrorCode ierr;
|
PetscErrorCode ierr;
|
|
|
PetscFunctionBegin;
|
PetscFunctionBegin;
|
/* Load the Davidson solver */
|
/* Load the Davidson solver */
|
ierr = EPSCreate_Davidson(eps);CHKERRQ(ierr);
|
ierr = EPSCreate_Davidson(eps);CHKERRQ(ierr);
|
|
ierr = EPSDavidsonSetFix_Davidson(eps,0.0);CHKERRQ(ierr);
|
|
|
/* Overload the GD properties */
|
/* Overload the GD properties */
|
eps->ops->setfromoptions = EPSSetFromOptions_GD;
|
eps->ops->setfromoptions = EPSSetFromOptions_GD;
|
eps->ops->setup = EPSSetUp_GD;
|
eps->ops->setup = EPSSetUp_GD;
|
eps->ops->destroy = EPSDestroy_GD;
|
eps->ops->destroy = EPSDestroy_GD;
|