| Line 383... |
Line 383... |
ST_CAYLEY *ctx = (ST_CAYLEY *) st->data;
|
ST_CAYLEY *ctx = (ST_CAYLEY *) 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,"STCayleySetAntishift_C","",PETSC_NULL);CHKERRQ(ierr);
|
PetscFunctionReturn(0);
|
PetscFunctionReturn(0);
|
}
|
}
|
|
|
EXTERN_C_BEGIN
|
EXTERN_C_BEGIN
|
#undef __FUNCT__
|
#undef __FUNCT__
|
| Line 415... |
Line 416... |
st->checknullspace = STCheckNullSpace_Default;
|
st->checknullspace = STCheckNullSpace_Default;
|
|
|
ctx->tau = 0.0;
|
ctx->tau = 0.0;
|
ctx->tau_set = PETSC_FALSE;
|
ctx->tau_set = PETSC_FALSE;
|
|
|
ierr = PetscObjectComposeFunctionDynamic((PetscObject)st,"STCayleySetAntishift_C","STCayleySetAntishift_Cayley",
|
ierr = PetscObjectComposeFunctionDynamic((PetscObject)st,"STCayleySetAntishift_C","STCayleySetAntishift_Cayley",STCayleySetAntishift_Cayley);CHKERRQ(ierr);
|
STCayleySetAntishift_Cayley);CHKERRQ(ierr);
|
|
|
|
PetscFunctionReturn(0);
|
PetscFunctionReturn(0);
|
}
|
}
|
EXTERN_C_END
|
EXTERN_C_END
|
|
|