Index: trunk/BNC/bnctides.cpp
===================================================================
--- trunk/BNC/bnctides.cpp	(revision 2585)
+++ trunk/BNC/bnctides.cpp	(revision 2586)
@@ -1,6 +1,4 @@
 
 #include <cmath>
-#include <iostream>
-#include <iomanip>
 
 #include "bnctides.h"
@@ -113,5 +111,5 @@
 
   double M = 2.0*M_PI * Frac ( 0.9931267 + 99.9973583*T);
-  double L = 2.0*M_PI * Frac ( 0.7859444 + M/2.0*M_PI + 
+  double L = 2.0*M_PI * Frac ( 0.7859444 + M/2.0/M_PI + 
                         (6892.0*sin(M)+72.0*sin(2.0*M)) / 1296.0e3);
   double r = 149.619e9 - 2.499e9*cos(M) - 0.021e9*cos(2*M);