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

[Stephane Popinet]

The following commit has been merged in the upstream branch:
commit 6c69db6794cab63103ab778e95415a3dc9257657
Author: Stephane Popinet <popinet at users.sf.net>
Date:   Fri Mar 2 12:29:57 2007 +1100

    Fix for face interpolation of diffusion coefficients
    
    darcs-hash:20070302012957-d4795-6d555deb8069a6f9b5b28d6eaca5af42ceeae4d0.gz

diff --git a/src/source.c b/src/source.c
index 23cc49c..9cb28f4 100644
--- a/src/source.c
+++ b/src/source.c
@@ -462,7 +462,8 @@ static gboolean diffusion_event (GfsEvent * event, GfsSimulation * sim)
 
 static gdouble diffusion_face (GfsDiffusion * d, FttCellFace * f)
 {
-  return gfs_function_face_value (d->val, f);
+  return d->mu ? gfs_face_interpolated_value (f, d->mu->i) :
+    gfs_function_get_constant_value (d->val);
 }
 
 static gdouble diffusion_cell (GfsDiffusion * d, FttCell * cell)

-- 
Gerris Flow Solver