diff options
| author | Justin Le <justin@jle.im> | 2016-05-25 08:46:54 -0700 |
|---|---|---|
| committer | Justin Le <justin@jle.im> | 2016-05-25 08:46:54 -0700 |
| commit | 5a23359dfea4f11a83d17d6aa7ec139003084782 (patch) | |
| tree | 0ba78f2d8adf76c6de6ed57beec72a0768af0aaf /packages | |
| parent | d272e5428b3bb9acf3e9680c38d18d099dca7890 (diff) | |
The conjugate transpose of a symmetric real matrix is itself
Diffstat (limited to 'packages')
| -rw-r--r-- | packages/base/src/Numeric/LinearAlgebra/Static.hs | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/packages/base/src/Numeric/LinearAlgebra/Static.hs b/packages/base/src/Numeric/LinearAlgebra/Static.hs index c764038..64c0f14 100644 --- a/packages/base/src/Numeric/LinearAlgebra/Static.hs +++ b/packages/base/src/Numeric/LinearAlgebra/Static.hs | |||
| @@ -844,8 +844,8 @@ instance KnownNat n => Additive (Sym n) where | |||
| 844 | add = (+) | 844 | add = (+) |
| 845 | 845 | ||
| 846 | instance KnownNat n => Transposable (Sym n) (Sym n) where | 846 | instance KnownNat n => Transposable (Sym n) (Sym n) where |
| 847 | tr (Sym m) = Sym (tr m) | 847 | tr = id |
| 848 | tr' = id | 848 | tr' = id |
| 849 | 849 | ||
| 850 | instance KnownNat n => Transposable (Her n) (Her n) where | 850 | instance KnownNat n => Transposable (Her n) (Her n) where |
| 851 | tr = id | 851 | tr = id |