diff options
| author | Alberto Ruiz <aruiz@um.es> | 2010-09-09 07:55:32 +0000 |
|---|---|---|
| committer | Alberto Ruiz <aruiz@um.es> | 2010-09-09 07:55:32 +0000 |
| commit | c1441ca0451f34e5615b3861175f9eef312dfc62 (patch) | |
| tree | e1c38a11c0111b21e1b17ef969700540d65af926 /lib/Numeric/Vector.hs | |
| parent | 945ae28d720ab6367a293d8f6a5723b8f7bf835d (diff) | |
joined Vectors and Product
Diffstat (limited to 'lib/Numeric/Vector.hs')
| -rw-r--r-- | lib/Numeric/Vector.hs | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/lib/Numeric/Vector.hs b/lib/Numeric/Vector.hs index 9427243..7ecd0eb 100644 --- a/lib/Numeric/Vector.hs +++ b/lib/Numeric/Vector.hs | |||
| @@ -99,7 +99,7 @@ linspace n (a,b) = addConstant a $ scale s $ fromList [0 .. fromIntegral n-1] | |||
| 99 | where s = (b-a)/fromIntegral (n-1) | 99 | where s = (b-a)/fromIntegral (n-1) |
| 100 | 100 | ||
| 101 | -- | Dot product: @u \<.\> v = dot u v@ | 101 | -- | Dot product: @u \<.\> v = dot u v@ |
| 102 | (<.>) :: Vectors Vector t => Vector t -> Vector t -> t | 102 | (<.>) :: Product t => Vector t -> Vector t -> t |
| 103 | infixl 7 <.> | 103 | infixl 7 <.> |
| 104 | (<.>) = dot | 104 | (<.>) = dot |
| 105 | 105 | ||