60   PetscViewer_Mathematica *vmath = (PetscViewer_Mathematica *)viewer->data;  in PetscViewerDestroy_Mathematica()  local
63   MLClose(vmath->link);  in PetscViewerDestroy_Mathematica()
64   PetscCall(PetscFree(vmath->linkname));  in PetscViewerDestroy_Mathematica()
65   PetscCall(PetscFree(vmath->linkhost));  in PetscViewerDestroy_Mathematica()
66   PetscCall(PetscFree(vmath));  in PetscViewerDestroy_Mathematica()
79   PetscViewer_Mathematica *vmath = (PetscViewer_Mathematica *)v->data;  in PetscViewerMathematicaSetupConnection_Private()  local
93   if (!vmath->linkname) argv[1] = "math -mathlink";  in PetscViewerMathematicaSetupConnection_Private()
94   else argv[1] = vmath->linkname;  in PetscViewerMathematicaSetupConnection_Private()
98   if (!vmath->linkhost) {  in PetscViewerMathematicaSetupConnection_Private()
101   } else argv[3] = vmath->linkhost;  in PetscViewerMathematicaSetupConnection_Private()
106   switch (vmath->linkmode) {  in PetscViewerMathematicaSetupConnection_Private()
118   switch (vmath->linkmode) {  in PetscViewerMathematicaSetupConnection_Private()
130   vmath->link = MLOpenInEnv(mathematicaEnv, argc, argv, &lerr);  in PetscViewerMathematicaSetupConnection_Private()
137   PetscViewer_Mathematica *vmath;  in PetscViewerCreate_Mathematica()  local
142   PetscCall(PetscNew(&vmath));  in PetscViewerCreate_Mathematica()
143   v->data         = (void *)vmath;  in PetscViewerCreate_Mathematica()
148   vmath->linkname     = NULL;  in PetscViewerCreate_Mathematica()
149   vmath->linkhost     = NULL;  in PetscViewerCreate_Mathematica()
150   vmath->linkmode     = MATHEMATICA_LINK_CONNECT;  in PetscViewerCreate_Mathematica()
151   vmath->graphicsType = GRAPHICS_MOTIF;  in PetscViewerCreate_Mathematica()
152   vmath->plotType     = MATHEMATICA_TRIANGULATION_PLOT;  in PetscViewerCreate_Mathematica()
153   vmath->objName      = NULL;  in PetscViewerCreate_Mathematica()
177   PetscViewer_Mathematica *vmath = (PetscViewer_Mathematica *)v->data;  in PetscViewerMathematicaSetFromOptions()  local
237     if (isMotif) vmath->graphicsType = GRAPHICS_MOTIF;  in PetscViewerMathematicaSetFromOptions()
238     else if (isPS) vmath->graphicsType = GRAPHICS_PS_STDOUT;  in PetscViewerMathematicaSetFromOptions()
239     else if (isPSFile) vmath->graphicsType = GRAPHICS_PS_FILE;  in PetscViewerMathematicaSetFromOptions()
250     if (isTri) vmath->plotType = MATHEMATICA_TRIANGULATION_PLOT;  in PetscViewerMathematicaSetFromOptions()
251     else if (isVecTri) vmath->plotType = MATHEMATICA_VECTOR_TRIANGULATION_PLOT;  in PetscViewerMathematicaSetFromOptions()
252     else if (isVec) vmath->plotType = MATHEMATICA_VECTOR_PLOT;  in PetscViewerMathematicaSetFromOptions()
253     else if (isSurface) vmath->plotType = MATHEMATICA_SURFACE_PLOT;  in PetscViewerMathematicaSetFromOptions()
260   PetscViewer_Mathematica *vmath = (PetscViewer_Mathematica *)v->data;  in PetscViewerMathematicaSetLinkName()  local
265   PetscCall(PetscStrallocpy(name, &vmath->linkname));  in PetscViewerMathematicaSetLinkName()
281   PetscViewer_Mathematica *vmath = (PetscViewer_Mathematica *)v->data;  in PetscViewerMathematicaSetLinkHost()  local
286   PetscCall(PetscStrallocpy(host, &vmath->linkhost));  in PetscViewerMathematicaSetLinkHost()
292   PetscViewer_Mathematica *vmath = (PetscViewer_Mathematica *)v->data;  in PetscViewerMathematicaSetLinkMode()  local
295   vmath->linkmode = mode;  in PetscViewerMathematicaSetLinkMode()
366   PetscViewer_Mathematica *vmath = (PetscViewer_Mathematica *)viewer->data;  in PetscViewerMathematicaGetLink()  local
370   *link = vmath->link;  in PetscViewerMathematicaGetLink()
387   PetscViewer_Mathematica *vmath = (PetscViewer_Mathematica *)viewer->data;  in PetscViewerMathematicaSkipPackets()  local
388   MLINK                    link  = vmath->link; /* The link to Mathematica */  in PetscViewerMathematicaSkipPackets()
415   PetscViewer_Mathematica *vmath = (PetscViewer_Mathematica *)viewer->data;  in PetscViewerMathematicaGetName()  local
420   *name = vmath->objName;  in PetscViewerMathematicaGetName()
437   PetscViewer_Mathematica *vmath = (PetscViewer_Mathematica *)viewer->data;  in PetscViewerMathematicaSetName()  local
442   vmath->objName = name;  in PetscViewerMathematicaSetName()
458   PetscViewer_Mathematica *vmath = (PetscViewer_Mathematica *)viewer->data;  in PetscViewerMathematicaClearName()  local
462   vmath->objName = NULL;  in PetscViewerMathematicaClearName()
468   PetscViewer_Mathematica *vmath = (PetscViewer_Mathematica *)viewer->data;  in PetscViewerMathematicaPutMatrix()  local
469   MLINK                    link  = vmath->link; /* The link to Mathematica */  in PetscViewerMathematicaPutMatrix()
474   if (!vmath->objName) name = "mat";  in PetscViewerMathematicaPutMatrix()
475   else name = (char *)vmath->objName;  in PetscViewerMathematicaPutMatrix()
495   PetscViewer_Mathematica *vmath = (PetscViewer_Mathematica *)viewer->data;  in PetscViewerMathematicaPutCSRMatrix()  local
496   MLINK                    link  = vmath->link; /* The link to Mathematica */  in PetscViewerMathematicaPutCSRMatrix()
503   if (!vmath->objName) name = "mat";  in PetscViewerMathematicaPutCSRMatrix()
504   else name = (char *)vmath->objName;  in PetscViewerMathematicaPutCSRMatrix()