blob: a0ae6d02b5e73eca038e364f6038dc6f1a86baeb (
plain)
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
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
89
90
91
92
93
94
95
96
97
98
99
100
101
102
103
104
105
106
107
108
109
110
111
112
113
114
115
116
117
118
119
120
121
122
123
124
125
126
127
128
129
130
131
132
133
134
135
136
137
138
139
140
141
142
|
#N canvas 79 32 859 673 10;
#X obj 87 360 mtx_mul;
#X obj 157 360 mtx_*;
#X obj 88 163 mtx_add;
#X obj 167 166 mtx_+;
#X obj 155 134 mtx_diag 1 2 3 4 5;
#X obj 88 134 mtx_ones 5;
#X obj 88 111 t b b;
#X obj 88 185 mtx_print;
#X msg 88 92 bang;
#X text 142 165 ==;
#X obj 305 134 mtx_eye 4;
#X obj 305 159 mtx_add 10;
#X msg 305 107 bang;
#X obj 305 186 mtx_print;
#X floatatom 374 101 4 0 0 0 - - -;
#X obj 374 119 t b f;
#X obj 392 160 mtx_+ 10;
#X text 371 161 ==;
#X obj 87 394 mtx_print;
#X msg 87 270 bang;
#X obj 133 332 mtx_diag 1 2;
#X obj 87 297 t b b;
#X obj 87 332 mtx_+ 3;
#X text 137 361 ==;
#X obj 87 314 mtx_eye 3 2;
#X obj 249 399 mtx_print;
#X obj 249 292 t b f;
#X floatatom 249 274 4 0 0 0 - - -;
#X msg 249 315 4 2 1 3;
#X obj 249 335 mtx_diag;
#X obj 249 363 mtx_mul 2;
#X obj 328 363 mtx_* 2;
#X obj 393 363 mtx_.* 2;
#X text 310 363 ==;
#X text 376 364 ==;
#X obj 522 366 mtx_.*;
#X obj 522 401 mtx_print;
#X obj 522 304 mtx_diag 1 2 3;
#X obj 553 322 mtx_ones 3;
#X obj 522 283 t b b;
#X msg 522 264 bang;
#X obj 553 341 mtx_* 2;
#X text 80 214 add 2 matrices;
#X text 274 218 add an offset to a matrix;
#X text 70 423 multiply 2 matrices;
#X text 245 422 multiply a matrix with a scalar;
#X text 506 425 multiply 2 matrices element by element;
#X text 334 19 matrix arithmetic;
#X obj 88 599 mtx_print;
#X obj 88 492 t b f;
#X floatatom 88 474 4 0 0 0 - - -;
#X msg 88 515 4 2 1 3;
#X obj 88 535 mtx_diag;
#X obj 323 600 mtx_print;
#X obj 323 503 mtx_diag 1 2 3;
#X obj 354 521 mtx_ones 3;
#X obj 354 540 mtx_* 2;
#X text 84 622 divide a matrix by a scalar;
#X obj 88 563 mtx_./ 2;
#X obj 323 565 mtx_./;
#X text 307 624 divide 2 matrices element by element;
#X obj 323 482 t b b f;
#X floatatom 323 463 4 0 0 0 - - -;
#X obj 709 538 matrix;
#X text 592 538 see also help for;
#X obj 550 141 mtx_diag 1 2 3 4 5;
#X obj 483 141 mtx_ones 5;
#X obj 483 118 t b b;
#X obj 483 192 mtx_print;
#X msg 483 99 bang;
#X text 537 172 ==;
#X obj 700 141 mtx_eye 4;
#X msg 700 114 bang;
#X obj 700 193 mtx_print;
#X floatatom 769 108 4 0 0 0 - - -;
#X obj 769 126 t b f;
#X text 762 168 ==;
#X obj 483 170 mtx_sub;
#X obj 562 173 mtx_-;
#X obj 779 169 mtx_sub 10;
#X obj 700 166 mtx_- 10;
#X text 481 221 subtract 2 matrices;
#X text 669 225 subtract an offset from a matrix;
#X connect 0 0 18 0;
#X connect 2 0 7 0;
#X connect 4 0 2 1;
#X connect 5 0 2 0;
#X connect 6 0 5 0;
#X connect 6 1 4 0;
#X connect 8 0 6 0;
#X connect 10 0 11 0;
#X connect 11 0 13 0;
#X connect 12 0 10 0;
#X connect 14 0 15 0;
#X connect 15 0 10 0;
#X connect 15 1 11 1;
#X connect 19 0 21 0;
#X connect 20 0 0 1;
#X connect 21 0 24 0;
#X connect 21 1 20 0;
#X connect 22 0 0 0;
#X connect 24 0 22 0;
#X connect 26 0 28 0;
#X connect 26 1 30 1;
#X connect 27 0 26 0;
#X connect 28 0 29 0;
#X connect 29 0 30 0;
#X connect 30 0 25 0;
#X connect 35 0 36 0;
#X connect 37 0 35 0;
#X connect 38 0 41 0;
#X connect 39 0 37 0;
#X connect 39 1 38 0;
#X connect 40 0 39 0;
#X connect 41 0 35 1;
#X connect 49 0 51 0;
#X connect 49 1 58 1;
#X connect 50 0 49 0;
#X connect 51 0 52 0;
#X connect 52 0 58 0;
#X connect 54 0 59 0;
#X connect 55 0 56 0;
#X connect 56 0 59 1;
#X connect 58 0 48 0;
#X connect 59 0 53 0;
#X connect 61 0 54 0;
#X connect 61 1 55 0;
#X connect 61 2 56 1;
#X connect 62 0 61 0;
#X connect 65 0 77 1;
#X connect 66 0 77 0;
#X connect 67 0 66 0;
#X connect 67 1 65 0;
#X connect 69 0 67 0;
#X connect 71 0 80 0;
#X connect 72 0 71 0;
#X connect 74 0 75 0;
#X connect 75 0 71 0;
#X connect 75 1 80 1;
#X connect 77 0 68 0;
#X connect 80 0 73 0;
|
