Skip to content

HTTPS clone URL

Subversion checkout URL

You can clone with
or
.
Download ZIP
Browse files

change construction operators

  • Loading branch information...
commit 1a6d3168d0182b868ac3a87ab69a88f22e03b836 1 parent a53bfb6
@albertoruiz authored
Showing with 7 additions and 7 deletions.
  1. +7 −7 lib/Numeric/LinearAlgebra/Real.hs
View
14 lib/Numeric/LinearAlgebra/Real.hs
@@ -88,19 +88,19 @@ ones :: Int -- ^ rows
ones r c = konst 1 (r,c)
-- | Concatenation of real vectors.
-infixl 9 #
+infixl 3 #
(#) :: Vector Double -> Vector Double -> Vector Double
a # b = join [a,b]
-- | Horizontal concatenation of real matrices.
-infixl 8 &
-(&) :: Matrix Double -> Matrix Double -> Matrix Double
-a & b = fromBlocks [[a,b]]
+infixl 3 !
+(!) :: Matrix Double -> Matrix Double -> Matrix Double
+a ! b = fromBlocks [[a,b]]
-- | Vertical concatenation of real matrices.
-(//) :: Matrix Double -> Matrix Double -> Matrix Double
-infixl 7 //
-a // b = fromBlocks [[a],[b]]
+(#) :: Matrix Double -> Matrix Double -> Matrix Double
+infixl 2 #
+a # b = fromBlocks [[a],[b]]
-- | Real block matrix from a rectangular list of lists.

0 comments on commit 1a6d316

Please sign in to comment.
Something went wrong with that request. Please try again.