AA

abrudana · May 23, 2017 · 0c6261a · 0c6261a
1 parent 5a46821
commit 0c6261a
Showing 1 changed file with 2 additions and 2 deletions.
diff --git a/WorldWideAstronomy/WWA/Astronomy/SpaceMotion/pvstar.cs b/WorldWideAstronomy/WWA/Astronomy/SpaceMotion/pvstar.cs
@@ -72,9 +72,9 @@ public static int wwaPvstar(double[,] pv, ref double ra, ref double dec, ref dou
 
             /* The inertial-to-observed correction terms. */
             d = 1.0 + betr;
-            w = betr * betr - bett * bett;
+            w = betr * betr + bett * bett;
             if (d == 0.0 || w > 1.0) return -1;
-            del = w / (Math.Sqrt(1.0 - w) + 1.0);
+            del = -w / (Math.Sqrt(1.0 - w) + 1.0);
 
             /* Apply relativistic correction factor to radial velocity component. */
             w = (betr != 0) ? (betr - del) / (betr * d) : 1.0;