diff --git a/Numeric/FastMath/Approximation.hs b/Numeric/FastMath/Approximation.hs
--- a/Numeric/FastMath/Approximation.hs
+++ b/Numeric/FastMath/Approximation.hs
@@ -57,7 +57,7 @@
 
 
 
-"double /,+ distribute" forall x y1 y2. (y1 *## x) +## (y2 *## x) 
+"double /,+ distribute" forall x y1 y2. (y1 /## x) +## (y2 /## x) 
     = (y1 +## y2) /## x
 
 "double /,- distribute" forall x y1 y2. (y1 /## x) -## (y2 /## x) 
@@ -113,7 +113,7 @@
 
 {-# RULES
 
-"double **,* distribute" forall x y1 y2. (y1 **## x) *## (y2 **## x) = (y1 *## y2) *## x
+"double **,* distribute" forall x y1 y2. (y1 **## x) *## (y2 **## x) = (y1 *## y2) **## x
 
 "double **,log distribute" forall x y. logDouble# (x **## y) = y *## (logDouble# x)
 
diff --git a/fast-math.cabal b/fast-math.cabal
--- a/fast-math.cabal
+++ b/fast-math.cabal
@@ -1,5 +1,5 @@
 name:           fast-math
-version:        1.0
+version:        1.0.1
 synopsis:       Non IEEE-754 compliant compile-time floating-point optimisations
 description:
     The "Numeric.FastMath" module brings into scope many unsafe @RULES@ for 
