quartic.pd


1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23

#N canvas 213 136 569 383 10;
#X obj 52 10 inlet;
#X obj 387 9 inlet;
#X obj 52 324 outlet;
#X obj 300 10 loadbang;
#X obj 227 9 inlet;
#X obj 227 50 purepd/float_argument \$1;
#X obj 387 50 purepd/float_argument \$2;
#X obj 227 95 -;
#X msg 227 73 1 \$1;
#X obj 52 159 expr (1-2*$f2)*pow($f1 \, 2) + (2*$f2)*$f1;
#X obj 52 190 expr (1-2*$f2)*pow($f1 \, 2) + (2*$f2)*$f1;
#X connect 0 0 9 0;
#X connect 1 0 6 0;
#X connect 3 0 5 0;
#X connect 3 0 6 0;
#X connect 4 0 5 0;
#X connect 5 0 8 0;
#X connect 6 0 10 1;
#X connect 7 0 9 1;
#X connect 8 0 7 0;
#X connect 9 0 10 0;
#X connect 10 0 2 0;