| Line 236... |
Line 236... |
ST_FOLD *ctx = (ST_FOLD *) st->data;
|
ST_FOLD *ctx = (ST_FOLD *) st->data;
|
|
|
PetscFunctionBegin;
|
PetscFunctionBegin;
|
if (ctx->w2) { ierr = VecDestroy(ctx->w2);CHKERRQ(ierr); }
|
if (ctx->w2) { ierr = VecDestroy(ctx->w2);CHKERRQ(ierr); }
|
ierr = PetscFree(ctx);CHKERRQ(ierr);
|
ierr = PetscFree(ctx);CHKERRQ(ierr);
|
|
ierr = PetscObjectComposeFunctionDynamic((PetscObject)st,"STFoldSetLeftSide_C","",PETSC_NULL);CHKERRQ(ierr);
|
PetscFunctionReturn(0);
|
PetscFunctionReturn(0);
|
}
|
}
|
|
|
EXTERN_C_BEGIN
|
EXTERN_C_BEGIN
|
#undef __FUNCT__
|
#undef __FUNCT__
|
| Line 265... |
Line 266... |
st->ops->destroy = STDestroy_Fold;
|
st->ops->destroy = STDestroy_Fold;
|
st->checknullspace = 0;
|
st->checknullspace = 0;
|
|
|
ctx->left = PETSC_FALSE;
|
ctx->left = PETSC_FALSE;
|
|
|
ierr = PetscObjectComposeFunctionDynamic((PetscObject)st,"STFoldSetLeftSide_C","STFoldSetLeftSide_Fold",
|
ierr = PetscObjectComposeFunctionDynamic((PetscObject)st,"STFoldSetLeftSide_C","STFoldSetLeftSide_Fold",STFoldSetLeftSide_Fold);CHKERRQ(ierr);
|
STFoldSetLeftSide_Fold);CHKERRQ(ierr);
|
|
|
|
PetscFunctionReturn(0);
|
PetscFunctionReturn(0);
|
}
|
}
|
EXTERN_C_END
|
EXTERN_C_END
|
|
|