chiark / gitweb /
compiles
[moebius2.git] / common.h
index 3978b5bc83ef8fa06bc3001276483831cf31beac..f890f840420fac32d9dacb4e4d437429d1ecd3f1 100644 (file)
--- a/common.h
+++ b/common.h
@@ -25,6 +25,11 @@ double hypotD2plus(const double p[D3], const double q[D3], double add);
 double magnD(const double pq[D3]);
 void xprod(double r[D3], const double a[D3], const double b[D3]);
 
+#define FOR_COORD(k) \
+  for ((k)=0; (k)<D3; (k)++)
+
+#define K FOR_COORD(k)
+
 #ifdef FP_FAST_FMA
 # define fma_fast fma
 #else