diff options
Diffstat (limited to 'quadratic.pd')
-rw-r--r-- | quadratic.pd | 30 |
1 files changed, 30 insertions, 0 deletions
diff --git a/quadratic.pd b/quadratic.pd new file mode 100644 index 0000000..32d46a4 --- /dev/null +++ b/quadratic.pd @@ -0,0 +1,30 @@ +#N canvas 79 279 589 471 10; +#X obj 22 10 inlet; +#X obj 412 9 inlet; +#X obj 174 405 outlet; +#X obj 270 10 loadbang; +#X obj 167 9 inlet; +#X obj 167 50 purepd/float_argument \$1; +#X obj 412 50 purepd/float_argument \$2; +#X obj 167 97 select 0.5; +#X obj 224 149 float; +#X msg 167 121 0.50001; +#X text 225 121 prevent divide by 0; +#X obj 271 213 expr 1 - 2*$f1; +#X obj 22 250 expr (sqrt($f2*$f2 + $f3*$f1) - $f2) / $f3; +#X obj 175 309 expr (1 - 2*$f2)*($f1*$f1) + (2*$f2)*$f1; +#X connect 0 0 12 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 7 0; +#X connect 6 0 13 1; +#X connect 7 0 9 0; +#X connect 7 1 8 0; +#X connect 8 0 11 0; +#X connect 8 0 12 1; +#X connect 9 0 8 0; +#X connect 11 0 12 2; +#X connect 12 0 13 0; +#X connect 13 0 2 0; |