[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