diff --git a/Algebra/Vector.hs b/Algebra/Vector.hs
index 3444faf..0aea12b 100644
--- a/Algebra/Vector.hs
+++ b/Algebra/Vector.hs
@@ -55,7 +55,7 @@ vec2Pt = p2 . unr2
 vp2 :: PT  -- ^ vector origin
     -> PT  -- ^ vector points here
     -> Vec
-vp2 a b = (pt2Vec b) - (pt2Vec a)
+vp2 a b = pt2Vec b - pt2Vec a
 
 
 -- |Computes the determinant of 3 points.