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

Stephane Popinet popinet at users.sf.net
Fri May 15 02:54:13 UTC 2009


The following commit has been merged in the upstream branch:
commit d73f2eaba9892217a9e5851defa95ad41a567649
Author: Stephane Popinet <popinet at users.sf.net>
Date:   Thu Apr 12 12:33:04 2007 +1000

    curvature_coarse_fine() did not work when using a VariableDistance
    
    darcs-hash:20070412023304-d4795-9f790a32b57f14b1722e5255dcc3b83fd9833fb4.gz

diff --git a/src/tension.c b/src/tension.c
index 6fc778e..6086278 100644
--- a/src/tension.c
+++ b/src/tension.c
@@ -566,15 +566,9 @@ static void curvature_coarse_fine (FttCell * parent, GfsVariable * v)
   guint n;
 
   ftt_cell_children (parent, &child);
-  for (n = 0; n < FTT_CELLS; n++) 
-    if (child.c[n]) {
-      GfsVariableCurvature * k = GFS_VARIABLE_CURVATURE (v);
-      gdouble f = GFS_VARIABLE (child.c[n], k->f->i);
-      
+  for (n = 0; n < FTT_CELLS; n++)
+    if (child.c[n])
       GFS_VARIABLE (child.c[n], v->i) = GFS_VARIABLE (parent, v->i);
-      if (!GFS_IS_FULL (f))
-	g_assert (fabs (GFS_VARIABLE (child.c[n], v->i)) < G_MAXDOUBLE);
-    }
 }
 
 static void curvature_fine_coarse (FttCell * parent, GfsVariable * v)

-- 
Gerris Flow Solver



More information about the debian-science-commits mailing list