[SCM] Gerris Flow Solver branch, upstream, updated. b3aa46814a06c9cb2912790b23916ffb44f1f203
Stephane Popinet
popinet at users.sf.net
Fri May 15 02:53:11 UTC 2009
The following commit has been merged in the upstream branch:
commit 12f94c6bd3a997c956035b9e81b50c59d8c5beff
Author: Stephane Popinet <popinet at users.sf.net>
Date: Fri Mar 24 11:13:50 2006 +1100
Implicit Coriolis should now work with the Navier-Stokes solver
darcs-hash:20060324001350-d4795-32cbb50335e73dec50067b55d1897c5441030b05.gz
diff --git a/src/simulation.c b/src/simulation.c
index c6282f2..5bfbe84 100644
--- a/src/simulation.c
+++ b/src/simulation.c
@@ -518,6 +518,15 @@ static void simulation_run (GfsSimulation * sim)
g,
sim->physical_params.alpha);
+ if (gfs_has_source_coriolis (domain)) {
+ gfs_poisson_coefficients (domain, sim->physical_params.alpha);
+ gfs_correct_normal_velocities (domain, 2, p, g, 0., NULL);
+ gfs_correct_centered_velocities (domain, 2, g, sim->advection_params.dt);
+ gfs_source_coriolis_implicit (domain, sim->advection_params.dt);
+ gfs_correct_normal_velocities (domain, 2, p, g, 0., NULL);
+ gfs_correct_centered_velocities (domain, 2, g, -sim->advection_params.dt);
+ }
+
gfs_simulation_adapt (sim, NULL);
gfs_approximate_projection (domain,
&sim->approx_projection_params,
--
Gerris Flow Solver
More information about the debian-science-commits
mailing list