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

Stephane Popinet popinet at users.sf.net
Fri May 15 02:55:03 UTC 2009


The following commit has been merged in the upstream branch:
commit 3e2634b10ec2e54e1b5b7f11bb4dc8447eca93e8
Author: Stephane Popinet <popinet at users.sf.net>
Date:   Tue Mar 4 15:11:27 2008 +1100

    Bug fix for VOF patch introducing "_x", "_y" and "_alpha" variables
    
    darcs-hash:20080304041127-d4795-b00772a1de31db0fcd39fd3ece2a9063d2c6038d.gz

diff --git a/src/vof.c b/src/vof.c
index 2a17ec7..ecf0c19 100644
--- a/src/vof.c
+++ b/src/vof.c
@@ -906,6 +906,8 @@ static void variable_tracer_vof_update (GfsVariable * v, GfsDomain * domain)
   }
 }
 
+static void no_coarse_fine (FttCell * cell,  GfsVariable * v) {}
+
 static void allocate_normal_alpha (GfsVariableTracerVOF * t)
 {
   GfsVariable * v = GFS_VARIABLE1 (t);
@@ -917,6 +919,7 @@ static void allocate_normal_alpha (GfsVariableTracerVOF * t)
       g_strdup_printf ("%s-component of the normal to the interface defined by %s",
 		       index[c], v->name);
     t->m[c] = gfs_domain_get_or_add_variable (v->domain, name, description);
+    t->m[c]->fine_coarse = t->m[c]->coarse_fine = no_coarse_fine;
     g_free (name);
     g_free (description);
   }
@@ -924,6 +927,7 @@ static void allocate_normal_alpha (GfsVariableTracerVOF * t)
   gchar * description = 
     g_strdup_printf ("\"alpha\" for the interface defined by %s", v->name);
   t->alpha = gfs_domain_get_or_add_variable (v->domain, name, description);
+  t->alpha->fine_coarse = t->alpha->coarse_fine = no_coarse_fine;
   g_free (name);
   g_free (description);
 }

-- 
Gerris Flow Solver



More information about the debian-science-commits mailing list