X-Git-Url: http://gitweb.michael.orlitzky.com/?a=blobdiff_plain;f=src%2FVector.hs;h=97bb5d8aea2c94a8100ed981bff988d6a9df60ab;hb=d3b5d9259dd9f0650d51447d7f57ed6d782dfdeb;hp=e608a509c505a35f1294618f5d83924a57d0ec30;hpb=5b5be1dc37fee3c869f1fc4a5803a9789cfab5a2;p=numerical-analysis.git

diff --git a/src/Vector.hs b/src/Vector.hs
index e608a50..97bb5d8 100644
--- a/src/Vector.hs
+++ b/src/Vector.hs
@@ -7,7 +7,7 @@ where
 
 import Data.Number.BigFloat
 
-class Vector a where
+class (Num a) => Vector a where
   norm :: RealFrac b => a -> b
 
 -- Define instances for common numeric types.