deprecate <|> and <->

1 files changed, 4 insertions, 0 deletions

diff --git a/lib/Numeric/LinearAlgebra/Interface.hs b/lib/Numeric/LinearAlgebra/Interface.hs
index 509b91c..b74180f 100644
--- a/lib/Numeric/LinearAlgebra/Interface.hs
+++ b/lib/Numeric/LinearAlgebra/Interface.hs
@@ -72,6 +72,9 @@ m <\> v = flatten (linearSolveSVD m (reshape 1 v))
 
 ------------------------------------------------
 
+{-# DEPRECATED (<|>) "define operator a & b = fromBlocks[[a,b]] and use asRow/asColumn to join vectors" #-}
+{-# DEPRECATED (<->) "define operator a // b = fromBlocks[[a],[b]] and use asRow/asColumn to join vectors" #-}
+
 class Joinable a b where
     joinH :: Element t => a t -> b t -> Matrix t
     joinV :: Element t => a t -> b t -> Matrix t
@@ -108,3 +111,4 @@ a <|> b = joinH a b
 -- | Vertical concatenation of matrices and vectors.
 (<->) :: (Element t, Joinable a b) => a t -> b t -> Matrix t
 a <-> b = joinV a b
+