diff --git a/src/LIB/BITREP/br_transcendentals.cpp b/src/LIB/BITREP/br_transcendentals.cpp
index 8b1fdfc6c917983e8e783235cf99dc1b779e4a59..2bbbb4daef5b688dcea8e673e336ece3935b9fcf 100644
--- a/src/LIB/BITREP/br_transcendentals.cpp
+++ b/src/LIB/BITREP/br_transcendentals.cpp
@@ -823,7 +823,13 @@ double __internal_exp_kernel(double x, int scale)
   double t, z;
   int i;
 
+#if 0
   t = std::floor (x*1.4426950408889634e+0 + 4.99999999999999945e-1);
+#else
+  t = x*1.4426950408889634e+0 + 4.99999999999999945e-1;
+  if (t<0) {t=t-1.;}
+  t=(int)t;
+#endif
   i = (int)t;
   z = __BITREPFMA(t, -6.9314718055994529e-1, x);
   z = __BITREPFMA(t, -2.3190468138462996e-17, z);