From 95a5b90c683bb257dbf3fb8e3bc43ef348e4c7fb Mon Sep 17 00:00:00 2001 From: Franz Zotter Date: Tue, 5 Sep 2006 12:50:05 +0000 Subject: a lot of complex valued matrix computation abstractions: complex matrix inverse via real valued hermitian matrix, complex-valued division, complex absolute square, complex multiplication... and linear and logarithmic sweep abstractions. svn path=/trunk/externals/iem/iemmatrix/; revision=5871 --- abs/mtx_cabs2.pd | 25 +++++++++++++++++++++++++ 1 file changed, 25 insertions(+) create mode 100644 abs/mtx_cabs2.pd (limited to 'abs/mtx_cabs2.pd') diff --git a/abs/mtx_cabs2.pd b/abs/mtx_cabs2.pd new file mode 100644 index 0000000..51f3091 --- /dev/null +++ b/abs/mtx_cabs2.pd @@ -0,0 +1,25 @@ +#N canvas 0 0 450 300 10; +#X obj 71 135 mtx_*; +#X obj 71 39 inlet realA; +#X obj 152 39 inlet imagA; +#X obj 71 256 outlet real; +#X obj 71 204 mtx_+; +#X obj 71 82 t a a; +#X obj 152 83 t a a; +#X text 175 66 complex squared absolute value; +#X obj 71 109 mtx_transpose; +#X obj 152 131 mtx_transpose; +#X obj 152 155 mtx_* -1; +#X obj 152 175 mtx_*; +#X connect 0 0 4 0; +#X connect 1 0 5 0; +#X connect 2 0 6 0; +#X connect 4 0 3 0; +#X connect 5 0 8 0; +#X connect 5 1 0 1; +#X connect 6 0 9 0; +#X connect 6 1 11 1; +#X connect 8 0 0 0; +#X connect 9 0 10 0; +#X connect 10 0 11 0; +#X connect 11 0 4 1; -- cgit v1.2.1