summaryrefslogtreecommitdiff
path: root/packages/base/src/Numeric/Vector.hs
diff options
context:
space:
mode:
Diffstat (limited to 'packages/base/src/Numeric/Vector.hs')
-rw-r--r--packages/base/src/Numeric/Vector.hs2
1 files changed, 1 insertions, 1 deletions
diff --git a/packages/base/src/Numeric/Vector.hs b/packages/base/src/Numeric/Vector.hs
index 6cac5dc..6245cf7 100644
--- a/packages/base/src/Numeric/Vector.hs
+++ b/packages/base/src/Numeric/Vector.hs
@@ -32,7 +32,7 @@ adaptScalar f1 f2 f3 x y
32 32
33------------------------------------------------------------------ 33------------------------------------------------------------------
34 34
35instance Num (Vector CInt) where 35instance Num (Vector I) where
36 (+) = adaptScalar addConstant add (flip addConstant) 36 (+) = adaptScalar addConstant add (flip addConstant)
37 negate = scale (-1) 37 negate = scale (-1)
38 (*) = adaptScalar scale mul (flip scale) 38 (*) = adaptScalar scale mul (flip scale)