diff options
| author | Alberto Ruiz <aruiz@um.es> | 2015-06-24 17:07:29 +0200 |
|---|---|---|
| committer | Alberto Ruiz <aruiz@um.es> | 2015-06-24 17:07:29 +0200 |
| commit | 624046d6b55d37104f950e8888ab68c53a2e6bf0 (patch) | |
| tree | 664fa33c2c995078439f277c0d6147ca0ad8ffe4 /packages/base/src/Internal/LAPACK.hs | |
| parent | fbff5949bba157b0da08a4b59124c7976289fb65 (diff) | |
initial support of sliceMatrix, remove transdata
Diffstat (limited to 'packages/base/src/Internal/LAPACK.hs')
| -rw-r--r-- | packages/base/src/Internal/LAPACK.hs | 2 |
1 files changed, 2 insertions, 0 deletions
diff --git a/packages/base/src/Internal/LAPACK.hs b/packages/base/src/Internal/LAPACK.hs index fc9e3ad..5319e95 100644 --- a/packages/base/src/Internal/LAPACK.hs +++ b/packages/base/src/Internal/LAPACK.hs | |||
| @@ -418,6 +418,8 @@ linearSolveSVDC Nothing a b = linearSolveSVDC (Just (-1)) (fmat a) (fmat b) | |||
| 418 | 418 | ||
| 419 | ----------------------------------------------------------------------------------- | 419 | ----------------------------------------------------------------------------------- |
| 420 | 420 | ||
| 421 | type TMM t = t ..> t ..> Ok | ||
| 422 | |||
| 421 | foreign import ccall unsafe "chol_l_H" zpotrf :: TMM C | 423 | foreign import ccall unsafe "chol_l_H" zpotrf :: TMM C |
| 422 | foreign import ccall unsafe "chol_l_S" dpotrf :: TMM R | 424 | foreign import ccall unsafe "chol_l_S" dpotrf :: TMM R |
| 423 | 425 | ||