/*@C PetscViewerMathematicaFinalizePackage - This function destroys everything in the Petsc interface to Mathematica. It is called from PetscFinalize(). Level: developer .keywords: Petsc, destroy, package, mathematica .seealso: PetscFinalize() @*/ PetscErrorCode PetscViewerMathematicaFinalizePackage(void) { PetscFunctionBegin; if (mathematicaEnv) MLDeinitialize((MLEnvironment) mathematicaEnv); PetscViewerMathematicaPackageInitialized = PETSC_TRUE; PetscFunctionReturn(0); }
static int cleanupConnection(MLENV env, MLINK link) { PetscFunctionBegin; MLClose(link); MLDeinitialize(env); PetscFunctionReturn(0); }