OilfieldToolsNet/opm-core
4
0
Fork 0
Code Issues Pull Requests Packages Projects Releases Wiki Activity

free->mxFree. createNumericMatrix->createDoubleMatrix.

Browse Source
This commit is contained in:
Jostein R. Natvig
2010-08-05 12:16:15 +00:00
parent 10582ea32a
commit f7e93692f9
1 changed files with 6 additions and 6 deletions
Download Patch File Download Diff File Expand all files Collapse all files
mex_compute_geometry.c
+6 -6
View File
@@ -29,7 +29,7 @@ static void compute_geometry(const mxArray *G, double *a, double *fc, double *fn
/* Clean up */
free(coords); free(facenodes); free(nodepos); free(cellfaces); free(facepos);
mxFree(coords); mxFree(facenodes); mxFree(nodepos); mxFree(cellfaces); mxFree(facepos);
}
void
@@ -38,11 +38,11 @@ mexFunction(int nlhs, mxArray *plhs[],
{
const mxArray *G = prhs[0];
mxArray *fa = mxCreateNumericMatrix(getNumberOfFaces(G), 1, mxDOUBLE_CLASS, mxREAL);
mxArray *fc = mxCreateNumericMatrix(getNumberOfDimensions(G), getNumberOfFaces(G), mxDOUBLE_CLASS, mxREAL);
mxArray *fn = mxCreateNumericMatrix(getNumberOfDimensions(G), getNumberOfFaces(G), mxDOUBLE_CLASS, mxREAL);
mxArray *cc = mxCreateNumericMatrix(getNumberOfDimensions(G), getNumberOfCells(G), mxDOUBLE_CLASS, mxREAL);
mxArray *cv = mxCreateNumericMatrix(getNumberOfCells(G), 1, mxDOUBLE_CLASS, mxREAL);
mxArray *fa = mxCreateDoubleMatrix(getNumberOfFaces(G), 1, mxREAL);
mxArray *fc = mxCreateDoubleMatrix(getNumberOfDimensions(G), getNumberOfFaces(G), mxREAL);
mxArray *fn = mxCreateDoubleMatrix(getNumberOfDimensions(G), getNumberOfFaces(G), mxREAL);
mxArray *cc = mxCreateDoubleMatrix(getNumberOfDimensions(G), getNumberOfCells(G), mxREAL);
mxArray *cv = mxCreateDoubleMatrix(getNumberOfCells(G), 1, mxREAL);
compute_geometry(G, mxGetPr(fa), mxGetPr(fc), mxGetPr(fn), mxGetPr(cc), mxGetPr(cv));