| Line 502... |
Line 502... |
{
|
{
|
PetscErrorCode ierr;
|
PetscErrorCode ierr;
|
SVD_CYCLIC *cyclic;
|
SVD_CYCLIC *cyclic;
|
|
|
PetscFunctionBegin;
|
PetscFunctionBegin;
|
ierr = PetscNew(SVD_CYCLIC,&cyclic);CHKERRQ(ierr);
|
ierr = PetscNewLog(svd,SVD_CYCLIC,&cyclic);CHKERRQ(ierr);
|
PetscLogObjectMemory(svd,sizeof(SVD_CYCLIC));
|
|
svd->data = (void *)cyclic;
|
svd->data = (void *)cyclic;
|
svd->ops->solve = SVDSolve_Cyclic;
|
svd->ops->solve = SVDSolve_Cyclic;
|
svd->ops->setup = SVDSetUp_Cyclic;
|
svd->ops->setup = SVDSetUp_Cyclic;
|
svd->ops->setfromoptions = SVDSetFromOptions_Cyclic;
|
svd->ops->setfromoptions = SVDSetFromOptions_Cyclic;
|
svd->ops->destroy = SVDDestroy_Cyclic;
|
svd->ops->destroy = SVDDestroy_Cyclic;
|