From acbce0c1258023b256786b3f0f6da2214d966567 Mon Sep 17 00:00:00 2001
From: Grzegorz Kowal <grzegorz@gkowal.info>
Date: Tue, 17 May 2011 20:29:41 -0300
Subject: [PATCH] Fix initial angular velocity in init_binaries().

---
 src/problem.F90 | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/src/problem.F90 b/src/problem.F90
index ceb2987..3d55479 100644
--- a/src/problem.F90
+++ b/src/problem.F90
@@ -781,7 +781,7 @@ module problem
 
 ! angular speed and triginometric functions
 !
-      om     = dpi / tsat
+      om     = dpi / tsat / (1.0d0 - esat)
       sn     = 0.0d0
       cs     = 1.0d0