diff options
Diffstat (limited to 'packages/hmatrix/src/Numeric/ContainerBoot.hs')
-rw-r--r-- | packages/hmatrix/src/Numeric/ContainerBoot.hs | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/packages/hmatrix/src/Numeric/ContainerBoot.hs b/packages/hmatrix/src/Numeric/ContainerBoot.hs index ef21763..bb65166 100644 --- a/packages/hmatrix/src/Numeric/ContainerBoot.hs +++ b/packages/hmatrix/src/Numeric/ContainerBoot.hs | |||
@@ -403,7 +403,7 @@ emptyVal f v = | |||
403 | else 0 | 403 | else 0 |
404 | 404 | ||
405 | -- FIXME remove unused C wrappers | 405 | -- FIXME remove unused C wrappers |
406 | -- | (unconjugated) dot product | 406 | -- | unconjugated dot product |
407 | udot :: Product e => Vector e -> Vector e -> e | 407 | udot :: Product e => Vector e -> Vector e -> e |
408 | udot u v | 408 | udot u v |
409 | | dim u == dim v = val (asRow u `multiply` asColumn v) | 409 | | dim u == dim v = val (asRow u `multiply` asColumn v) |