diff options
| author | Alberto Ruiz <aruiz@um.es> | 2010-09-11 09:10:24 +0000 |
|---|---|---|
| committer | Alberto Ruiz <aruiz@um.es> | 2010-09-11 09:10:24 +0000 |
| commit | ec9965371be5b37234684ba392f55a1a1e24f053 (patch) | |
| tree | fae00b984fc8499e19952200f1b3f9f7ee5f2d20 /lib/Data/Packed/Matrix.hs | |
| parent | ae6d18808cef554979b99cc55f46d5324518df01 (diff) | |
optimized conjugate
Diffstat (limited to 'lib/Data/Packed/Matrix.hs')
| -rw-r--r-- | lib/Data/Packed/Matrix.hs | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/lib/Data/Packed/Matrix.hs b/lib/Data/Packed/Matrix.hs index af937f4..0fc7876 100644 --- a/lib/Data/Packed/Matrix.hs +++ b/lib/Data/Packed/Matrix.hs | |||
| @@ -270,7 +270,7 @@ asColumn v = reshape 1 v | |||
| 270 | 270 | ||
| 271 | -- | conjugate transpose | 271 | -- | conjugate transpose |
| 272 | ctrans :: Element e => Matrix e -> Matrix e | 272 | ctrans :: Element e => Matrix e -> Matrix e |
| 273 | ctrans = ctrans' | 273 | ctrans = liftMatrix conjugateD . trans |
| 274 | 274 | ||
| 275 | 275 | ||
| 276 | {- | creates a Matrix of the specified size using the supplied function to | 276 | {- | creates a Matrix of the specified size using the supplied function to |