diff options
author | Hans-Christoph Steiner <eighthave@users.sourceforge.net> | 2007-04-17 05:25:46 +0000 |
---|---|---|
committer | Hans-Christoph Steiner <eighthave@users.sourceforge.net> | 2007-04-17 05:25:46 +0000 |
commit | 271bd5960eb6d11edb21ed7070dc92cbb4aa48a6 (patch) | |
tree | e14a3909c98c2393b83389a0f51649e8bf4812b5 /quadratic.pd | |
parent | 9326d1df4dde05b6ce826d87dd9feef78b3fcb4b (diff) |
went on a curve binge at the Patching Circle. I also discovered that Cyrille's breakpoint_smooth is the same as elliptic.pd
svn path=/trunk/externals/mapping/; revision=7571
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; |