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 |