diff --git a/Graphics/Gloss/Data/Point.hs b/Graphics/Gloss/Data/Point.hs
--- a/Graphics/Gloss/Data/Point.hs
+++ b/Graphics/Gloss/Data/Point.hs
@@ -20,6 +20,9 @@
 instance Num Point where
 	(+) (x1, y1) (x2, y2)	= (x1 + x2, y1 + y2)
  	(-) (x1, y1) (x2, y2)	= (x1 - x2, y1 - y2)
+        (*) (x1, y1) (x2, y2)   = (x1 * x2, y1 * y2)
+        signum (x, y)           = (signum x, signum y)
+        abs    (x, y)           = (abs x, abs y)
 	negate (x, y)		= (negate x, negate y)	
         fromInteger x           = (fromInteger x, fromInteger x)
 
diff --git a/gloss.cabal b/gloss.cabal
--- a/gloss.cabal
+++ b/gloss.cabal
@@ -1,5 +1,5 @@
 Name:                gloss
-Version:             1.7.5.1
+Version:             1.7.5.2
 License:             MIT
 License-file:        LICENSE
 Author:              Ben Lippmeier