diff options
Diffstat (limited to 'examples/tests.hs')
| -rw-r--r-- | examples/tests.hs | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/examples/tests.hs b/examples/tests.hs index 56bd2ab..0d8361e 100644 --- a/examples/tests.hs +++ b/examples/tests.hs | |||
| @@ -92,8 +92,8 @@ epsTol = 1E-8::Double | |||
| 92 | asFortran m = (rows m >|< cols m) $ toList (fdat m) | 92 | asFortran m = (rows m >|< cols m) $ toList (fdat m) |
| 93 | asC m = (rows m >< cols m) $ toList (cdat m) | 93 | asC m = (rows m >< cols m) $ toList (cdat m) |
| 94 | 94 | ||
| 95 | mulC a b = multiply RowMajor a b | 95 | mulC a b = multiply' RowMajor a b |
| 96 | mulF a b = multiply ColumnMajor a b | 96 | mulF a b = multiply' ColumnMajor a b |
| 97 | 97 | ||
| 98 | infixl 7 <> | 98 | infixl 7 <> |
| 99 | a <> b = mulF a b | 99 | a <> b = mulF a b |