diff --git a/cdar-mBound.cabal b/cdar-mBound.cabal
--- a/cdar-mBound.cabal
+++ b/cdar-mBound.cabal
@@ -2,7 +2,7 @@
 -- see http://haskell.org/cabal/users-guide/
 
 name:                cdar-mBound
-version:             0.1.0.0
+version:             0.1.0.1
 synopsis:            Exact real arithmetic using Centred Dyadic Approximations
 description:         Please see https://github.com/michalkonecny/cdar/tree/mBound#readme
 license:             BSD3
diff --git a/src/Data/CDAR/Approx.hs b/src/Data/CDAR/Approx.hs
--- a/src/Data/CDAR/Approx.hs
+++ b/src/Data/CDAR/Approx.hs
@@ -404,7 +404,7 @@
     | abs m <= 1 = a
     | otherwise = Approx mb m' e'' (s + d)
     where
-    m_size = 1+integerLog2 (abs m - 1) -- |m| <= 2^m_size
+    m_size = 1+integerLog2 (abs m - 1) --- |m| <= 2^m_size
     d = m_size - mb
     m' = unsafeShiftR m d -- we have: m' * 2^d <= m
     e' = 1 + (unsafeShiftR (e-1) d) -- we have: 0 <= e <= e' * 2^d