- Fixed sign problems with om in tasub

- Mended tasdrive to drive energy even if Q is askew
- Fixed QM values
- Fixed problems in mesure: om2th, wrong theta selection
- Fixed core dump when driving h,kl, failed

trigd.c

@@ -53,6 +53,16 @@ extern double Atand (double x)
   return (data);
 }
 /*******************************************************************************
+* Atan of angle in degrees.
+*******************************************************************************/
+extern double Atan2d (double x, double y)
+{
+  double data;
+
+  data = (atan2(x,y)/DEGREE_RAD);
+  return (data);
+}
+/*******************************************************************************
 * Atan2 of angle in degrees.
 *******************************************************************************/
 extern double Atand2 (double x)