From 15f3989dbff1810314a328c1886808e358aeecf9 Mon Sep 17 00:00:00 2001 From: =?UTF-8?q?B=C3=A5rd=20Skaflestad?= Date: Sun, 4 Dec 2011 16:21:24 +0100 Subject: [PATCH] Acknowledge original author. While here, remove two functions that are no longer needed. --- cgridinterface.c | 71 +++++++++--------------------------------------- 1 file changed, 13 insertions(+), 58 deletions(-) diff --git a/cgridinterface.c b/cgridinterface.c index 8405ef5b..09c91755 100644 --- a/cgridinterface.c +++ b/cgridinterface.c @@ -1,3 +1,16 @@ +/*=========================================================================== +// +// File: cgridinterface.c +// +// Author: Jostein R. Natvig +// +//==========================================================================*/ + + +/* + Copyright 2011 SINTEF ICT, Applied Mathematics. +*/ + #include #include @@ -5,64 +18,6 @@ #include "cgridinterface.h" -#if 0 -static int *compute_cell_facepos(grid_t *g) -{ - int i,j,k; - int *facepos = malloc((g->number_of_cells + 1) * sizeof *facepos); - int *fcells = g->face_cells; - - for (i=0; inumber_of_cells; ++i) { - facepos [i] = 0; - } - - for (i=0; i<2*g->number_of_faces; ++i) { - if (*fcells != -1) { - (facepos[*fcells])++; - } - fcells++; - } - - /* cumsum */ - j=0; - for (i=0; inumber_of_cells; ++i) { - k = j + facepos[i]; - facepos[i] = j; - j = k; - } - facepos[i] = j; - - return facepos; -} - - -static int *compute_cell_faces(grid_t *g) -{ - int *cfaces = malloc(g->cell_facepos[g->number_of_cells] * sizeof *cfaces); - int *work = malloc(g->number_of_cells * sizeof *work); - int *fcells = g->face_cells; - int i,k,cell; - for(i=0; inumber_of_cells; ++i) { - work[i] = 0; - } - - for (i=0; inumber_of_faces; ++i) { - for (k=0;k<2; ++k) { - - if (*fcells != -1) { - cell = *fcells; - cfaces[g->cell_facepos[cell] + work[cell]] = i; - work[cell]++; - } - fcells++; - } - } - free(work); - - return cfaces; -} -#endif - static int fill_cell_topology(struct processed_grid *pg, struct CornerpointGrid *G )