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

[Stephane Popinet]

The following commit has been merged in the upstream branch:
commit 5f044445187aa686b717db1b65674947493ed514
Author: Stephane Popinet <popinet at users.sf.net>
Date:   Thu Feb 21 09:48:23 2008 +1100

    Bug fixes for VTK/Tecplot output
    
    darcs-hash:20080220224823-d4795-909a6454dd96d7411bad5f547b04388b74699844.gz

diff --git a/THANKS b/THANKS
index 06dc1a3..50e3164 100644
--- a/THANKS
+++ b/THANKS
@@ -9,3 +9,5 @@ Ben Moat
 Vladimir Kolobov
 Philip Rubini
 Geordie McBain
+Ruhollah Tavakoli
+Wolfgang Betz
diff --git a/src/unstructured.c b/src/unstructured.c
index 1cfbcfa..b74f1b1 100644
--- a/src/unstructured.c
+++ b/src/unstructured.c
@@ -54,7 +54,7 @@ static void vertex_pos (Vertex * v, FttVector * p)
   ftt_corner_pos (v->cell, d[v->i], p);
 }
 
-static gdouble vertex_value (Vertex * vertex, GfsVariable * v, gint max_depth)
+static float vertex_value (Vertex * vertex, GfsVariable * v, gint max_depth)
 {
   return gfs_cell_corner_value (vertex->cell, d[vertex->i], v, max_depth);
 }
@@ -321,7 +321,7 @@ void gfs_domain_write_tecplot (GfsDomain * domain, gint max_depth, GSList * vari
 
   /* header */
   fprintf (fp,
-	   " TITLE = 'Gerris simulation version %s (%s)'\n",
+	   " TITLE = \"Gerris simulation version %s (%s)\"\n",
 	   GFS_VERSION,
 	   GFS_BUILD_VERSION);
 
@@ -345,7 +345,11 @@ void gfs_domain_write_tecplot (GfsDomain * domain, gint max_depth, GSList * vari
     Vertex * vertex = j->data;
     FttVector p;
     vertex_pos (vertex, &p);
+#if FTT_2D
+    fprintf (fp, "%g %g", p.x, p.y);
+#else
     fprintf (fp, "%g %g %g", p.x, p.y, p.z);
+#endif
     GSList * k = variables;
     while (k) {
       fprintf (fp, " %g", vertex_value (vertex, k->data, max_depth));

-- 
Gerris Flow Solver