| Line 133... |
Line 133... |
eps->which_func = data.which_func;
|
eps->which_func = data.which_func;
|
eps->which_ctx = data.which_ctx;
|
eps->which_ctx = data.which_ctx;
|
}
|
}
|
|
|
/* finished iteration, truncate the Schur decomposition */
|
/* finished iteration, truncate the Schur decomposition */
|
if (!eps->which==EPS_ALL) { /* cannot change dimension in spectrum slicing */
|
if (!(eps->which==EPS_ALL)) { /* cannot change dimension in spectrum slicing */
|
ierr = PSSetDimensions(eps->ps,eps->nconv,0,0);CHKERRQ(ierr);
|
ierr = PSSetDimensions(eps->ps,eps->nconv,0,0);CHKERRQ(ierr);
|
/* change the state to raw so that PSVectors() computes eigenvectors from scratch */
|
/* change the state to raw so that PSVectors() computes eigenvectors from scratch */
|
ierr = PSSetState(eps->ps,PS_STATE_RAW);CHKERRQ(ierr);
|
ierr = PSSetState(eps->ps,PS_STATE_RAW);CHKERRQ(ierr);
|
}
|
}
|
|
|