externals/mapping elliptic_seat.pd,NONE,1.1 - Pd-cvs

10 Apr 2007


      Update of /cvsroot/pure-data/externals/mapping
In directory sc8-pr-cvs1.sourceforge.net:/tmp/cvs-serv24816
Added Files:
    elliptic_seat.pd 
Log Message:
lots of curves inspired by Golan Levin's processing shapers
--- NEW FILE: elliptic_seat.pd ---
#N canvas 422 253 573 455 10;
#X obj 62 10 inlet;
#X obj 327 9 inlet;
#X obj 106 405 outlet;
#X obj 240 10 loadbang;
#X obj 167 9 inlet;
#X obj 167 50 purepd/float_argument $1;
#X obj 327 50 purepd/float_argument $2;
#X obj 74 113 moses;
#X obj 167 97 moses 1;
#X obj 167 118 + 1e-06;
#X text 217 104 prevent divide by 0;
#X obj 7 199 expr ($f3/$f2) * sqrt(pow($f2 , 2) - pow($f1 - $f2 ,
2));
#X obj 152 275 expr 1 - ( (1 - $f3)/(1 - $f2) * sqrt(pow(1 - $f2 ,
2) - pow($f1 - $f2 , 2)) );
#X connect 0 0 7 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 1;
#X connect 5 0 8 0;
#X connect 6 0 11 2;
#X connect 6 0 12 2;
#X connect 7 0 11 0;
#X connect 7 1 12 0;
#X connect 8 0 9 0;
#X connect 9 0 11 1;
#X connect 9 0 12 1;
#X connect 11 0 2 0;
#X connect 12 0 2 0;