1 files changed, 99 insertions, 0 deletions
diff --git a/examples/ann_mlp_example2/stereo.pd b/examples/ann_mlp_example2/stereo.pd
new file mode 100755
index 0000000..d9cc202
--- /dev/null
+++ b/examples/ann_mlp_example2/stereo.pd
@@ -0,0 +1,99 @@
+#N canvas 425 165 329 158 12;
+#X obj 113 -1 inlet~;
+#N canvas 0 0 524 249 graph23 0;
+#X obj 9 6 inlet~;
+#X obj 28 33 hsl 60 20 0 1 0 0 empty empty empty -2 -6 0 8 -262144
+-1 -1 3617 1;
+#X obj 18 193 outlet~;
+#X obj 89 193 outlet~;
+#N canvas 117 45 762 354 guts 0;
+#X obj 160 -30 inlet;
+#X obj 212 167 outlet;
+#X obj 61 191 outlet;
+#X obj 89 71 -;
+#X msg 89 45 1;
+#X obj 86 20 bang;
+#X text 329 -24 calcola i fattori di moltiplicazione;
+#X text 329 -7 usando la formula (x*x);
+#X obj 212 92 expr sqrt($f1);
+#X obj 61 103 expr sqrt($f1);
+#X msg 61 135 \$1 5;
+#X obj 61 160 line;
+#X msg 212 119 \$1 5;
+#X obj 212 144 line;
+#X connect 0 0 3 1;
+#X connect 0 0 5 0;
+#X connect 0 0 8 0;
+#X connect 3 0 9 0;
+#X connect 4 0 3 0;
+#X connect 5 0 4 0;
+#X connect 8 0 12 0;
+#X connect 9 0 10 0;
+#X connect 10 0 11 0;
+#X connect 11 0 2 0;
+#X connect 12 0 13 0;
+#X connect 13 0 1 0;
+#X restore 109 87 pd guts;
+#X obj 39 136 *~;
+#X obj 78 135 *~;
+#N canvas 143 79 506 267 help 0;
+#X text 31 23 this abstraction splits one signal into a 2 channels
+(stereo). uses 1/(x*x) formula;
+#X text 115 137 info@davidemorelli.it;
+#X restore 230 87 pd help;
+#X text 154 137 info@davidemorelli.it;
+#X obj 78 7 inlet;
+#N canvas 226 183 486 430 randomswalk 0;
+#X obj 57 44 inlet;
+#X obj 54 387 outlet;
+#X obj 126 44 inlet;
+#X obj 58 130 f;
+#X obj 98 168 +;
+#X obj 161 219 clip 0 1;
+#X obj 128 105 randF 0.2;
+#X obj 126 131 - 0.1;
+#X obj 92 294 line;
+#X obj 128 72 metro 1000;
+#X msg 92 269 \$1 700;
+#X connect 0 0 3 0;
+#X connect 2 0 9 0;
+#X connect 3 0 1 0;
+#X connect 3 0 4 1;
+#X connect 4 0 5 0;
+#X connect 5 0 10 0;
+#X connect 5 0 4 1;
+#X connect 6 0 7 0;
+#X connect 7 0 4 0;
+#X connect 8 0 1 0;
+#X connect 9 0 6 0;
+#X connect 10 0 8 0;
+#X restore 125 59 pd randomswalk;
+#X obj 436 100 tgl 15 0 empty empty r_walk -15 -6 0 8 -262144 -1 -1
+0 1;
+#X msg 132 12 set \$1;
+#X obj 252 10 loadbang;
+#X msg 253 32 0.5;
+#X connect 0 0 5 0;
+#X connect 0 0 6 0;
+#X connect 1 0 10 0;
+#X connect 4 0 5 1;
+#X connect 4 1 6 1;
+#X connect 5 0 2 0;
+#X connect 6 0 3 0;
+#X connect 9 0 1 0;
+#X connect 10 0 4 0;
+#X connect 10 0 12 0;
+#X connect 11 0 10 1;
+#X connect 12 0 1 0;
+#X connect 13 0 14 0;
+#X connect 14 0 1 0;
+#X coords 0 1 100 -1 90 30 1;
+#X restore 2 1 graph;
+#X obj 1 37 outlet~;
+#X obj 63 37 outlet~;
+#X obj 171 -1 inlet;
+#X connect 0 0 1 0;
+#X connect 1 0 2 0;
+#X connect 1 1 3 0;
+#X connect 4 0 1 1;
+#X coords 0 0 1 1 70 30 1;