| author | Francesco Abbate <francesco.bbt@gmail.com> | 2012年05月26日 19:18:30 +0200 |
|---|---|---|
| committer | Francesco Abbate <francesco.bbt@gmail.com> | 2012年05月26日 19:18:30 +0200 |
| commit | d061fef574ec14abc877ee94a278f24ff5ae1ddd (patch) | |
| tree | 746b0e68588b0bb219ce4a728962726c1c30f5b5 /matrix.lua | |
| parent | 45777d4dff3d7dfb414117552e88ede61cc6bb98 (diff) | |
| parent | efab31466d5b5b10c650b7bbec0e833c8b20dfff (diff) | |
| download | gsl-shell-d061fef574ec14abc877ee94a278f24ff5ae1ddd.tar.gz | |
| -rw-r--r-- | matrix.lua | 15 |
diff --git a/matrix.lua b/matrix.lua index ac570eba..2ea5ff2f 100644 --- a/matrix.lua +++ b/matrix.lua @@ -724,6 +724,17 @@ local matrix_mt = { ffi.metatype(gsl_matrix, matrix_mt) +matrix_complex = { + alloc = matrix_calloc, + col = matrix_complex_col, + row = matrix_complex_row, + get = matrix_complex_get, + set = matrix_complex_set, + copy = matrix_complex_copy, + norm = matrix_complex_norm, + slice = matrix_complex_slice +} + local matrix_complex_methods = { alloc = matrix_calloc, col = matrix_complex_col, @@ -732,7 +743,7 @@ local matrix_complex_methods = { set = matrix_complex_set, copy = matrix_complex_copy, norm = matrix_complex_norm, - slice = matrix_complex_slice, + slice = matrix_complex_slice } local function matrix_complex_index(m, i) @@ -943,8 +954,6 @@ function matrix.svd(a) return u, s, v end -matrix.sv_decomp = matrix_sv_decomp - matrix.diag = function(d) local n = #d local m = d.alloc(n, n) |