[SCM] Gerris Flow Solver branch, upstream, updated. b3aa46814a06c9cb2912790b23916ffb44f1f203

[Stephane Popinet]

The following commit has been merged in the upstream branch:
commit cdbe2af782746e59770a7ee6edfc731c155563e7
Author: Stephane Popinet <popinet at users.sf.net>
Date:   Wed Aug 29 09:33:14 2007 +1000

    Bug fix for adaptation with 'maxcells' set
    
    darcs-hash:20070828233314-d4795-c6e7c67437af4cf68f9d5dcd1e6610f7a80468ed.gz

diff --git a/THANKS b/THANKS
index 1cfaf05..42adeb3 100644
--- a/THANKS
+++ b/THANKS
@@ -6,3 +6,4 @@ R Sai Kiran
 David Sterling
 Frank Griessbaum
 Ben Moat
+Vladimir Kolobov
diff --git a/src/adaptive.c b/src/adaptive.c
index 7b9e627..a17b7b7 100644
--- a/src/adaptive.c
+++ b/src/adaptive.c
@@ -762,7 +762,8 @@ static void cell_fine_init (FttCell * cell, AdaptParams * p)
   gfs_cell_fine_init (cell, GFS_DOMAIN (p->sim));
   ftt_cell_children (cell, &child);
   for (n = 0; n < FTT_CELLS; n++)
-    CELL_COST (child.c[n]) = G_MAXDOUBLE;
+    if (child.c[n])
+      CELL_COST (child.c[n]) = G_MAXDOUBLE;
   if (!GFS_CELL_IS_BOUNDARY (cell))
     p->nc += FTT_CELLS;
 }

-- 
Gerris Flow Solver