From ee9a8fdc5910f2673e215d5c31b8edbce9c4b713 Mon Sep 17 00:00:00 2001
From: =?UTF-8?q?B=C3=A5rd=20Skaflestad?= <Bard.Skaflestad@sintef.no>
Date: Thu, 18 Mar 2010 16:31:10 +0000
Subject: [PATCH] Implement G.type for OPM processing.

---
 processgrid.c | 9 ++++++++-
 1 file changed, 8 insertions(+), 1 deletion(-)

diff --git a/processgrid.c b/processgrid.c
index c6b008c1..f15ee344 100644
--- a/processgrid.c
+++ b/processgrid.c
@@ -48,7 +48,7 @@ along with OpenRS.  If not, see <http://www.gnu.org/licenses/>.
 
 void fill_grid(mxArray **out, struct processed_grid *grid)
 {
-  const char *names[] = {"nodes", "faces", "cells", "cartDims"};
+  const char *names[] = {"nodes", "faces", "cells", "cartDims", "type"};
   mxArray *G = mxCreateStructMatrix(1,1,sizeof names / sizeof names[0],names);
 
   int i,j;
@@ -218,6 +218,7 @@ void fill_grid(mxArray **out, struct processed_grid *grid)
 
   free(counter);
 
+  /* cartDims */
   mxArray *cartDims = mxCreateDoubleMatrix(1, 3, mxREAL);
   ptr    = mxGetPr(cartDims);
   ptr[0] = grid->dimensions[0];
@@ -226,6 +227,12 @@ void fill_grid(mxArray **out, struct processed_grid *grid)
 
   mxSetField(G, 0, "cartDims", cartDims);
 
+  /* type */
+  mxArray *type = mxCreateCellMatrix(1, 1);
+  mxSetCell(type, 0, mxCreateString("processgrid"));
+
+  mxSetField(G, 0, "type", type);
+
   out[0] = G;
 }