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

[Stephane Popinet]

The following commit has been merged in the upstream branch:
commit df7fe9b3684240cdd758e2739b9e00154ee0234f
Author: Stephane Popinet <popinet at users.sf.net>
Date:   Thu Oct 16 12:47:01 2008 +1100

    New "dL" derived variable
    
    darcs-hash:20081016014701-d4795-aef9f4de3aa919492d4ba3c116bb8c01efacb0ce.gz

diff --git a/src/simulation.c b/src/simulation.c
index 5571616..9fd8ab3 100644
--- a/src/simulation.c
+++ b/src/simulation.c
@@ -668,6 +668,13 @@ static gdouble cell_dV (FttCell * cell, FttCellFace * face, GfsSimulation * sim)
   return GFS_IS_MIXED (cell) ? GFS_STATE (cell)->solid->a*dV : dV;
 }
 
+static gdouble cell_dL (FttCell * cell, FttCellFace * face, GfsSimulation * sim)
+{
+  gdouble dL = ftt_cell_size (cell);
+  gdouble L = sim->physical_params.L;
+  return L*dL;
+}
+
 static gdouble cell_t (FttCell * cell, FttCellFace * face, GfsSimulation * sim)
 {
   return sim->time.t;
@@ -799,6 +806,7 @@ static void simulation_init (GfsSimulation * object)
     { "ry", "y-coordinate of the center of the cell (internal)", cell_ry },
     { "rz", "z-coordinate of the center of the cell (internal)", cell_rz },
     { "dV", "volume of the cell", cell_dV},
+    { "dL", "length of the cell", cell_dL},
     { "t",  "Physical time", cell_t },
     { "dt", "Timestep", cell_dt },
     { "Vorticity", "Norm of the vorticity vector of the velocity field", cell_vorticity },

-- 
Gerris Flow Solver