diff options
Diffstat (limited to 'lib/GSL/Compat.hs')
-rw-r--r-- | lib/GSL/Compat.hs | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/lib/GSL/Compat.hs b/lib/GSL/Compat.hs index 1d6f7b9..8a59915 100644 --- a/lib/GSL/Compat.hs +++ b/lib/GSL/Compat.hs | |||
@@ -234,10 +234,10 @@ instance Mul (Complex Double) (Complex Double) (Complex Double) where | |||
234 | --------------------------------- matrix matrix | 234 | --------------------------------- matrix matrix |
235 | 235 | ||
236 | instance Mul (Matrix Double) (Matrix Double) (Matrix Double) where | 236 | instance Mul (Matrix Double) (Matrix Double) (Matrix Double) where |
237 | (<>) = mXm | 237 | (<>) = multiply |
238 | 238 | ||
239 | instance Mul (Matrix (Complex Double)) (Matrix (Complex Double)) (Matrix (Complex Double)) where | 239 | instance Mul (Matrix (Complex Double)) (Matrix (Complex Double)) (Matrix (Complex Double)) where |
240 | (<>) = mXm | 240 | (<>) = multiply |
241 | 241 | ||
242 | instance Mul (Matrix (Complex Double)) (Matrix Double) (Matrix (Complex Double)) where | 242 | instance Mul (Matrix (Complex Double)) (Matrix Double) (Matrix (Complex Double)) where |
243 | c <> r = c <> liftMatrix comp r | 243 | c <> r = c <> liftMatrix comp r |