abs/mtx_cabs2.pd


1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
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;