Update of /cvsroot/pure-data/externals/mapping In directory sc8-pr-cvs1.sourceforge.net:/tmp/cvs-serv9148
Modified Files: circular_seat.pd Added Files: circular.pd cubic_seat.pd elliptic.pd quadratic.pd simplified_cubic_seat.pd simplified_quadratic.pd Log Message: went on a curve binge at the Patching Circle. I also discovered that Cyrille's breakpoint_smooth is the same as elliptic.pd
Index: circular_seat.pd =================================================================== RCS file: /cvsroot/pure-data/externals/mapping/circular_seat.pd,v retrieving revision 1.1 retrieving revision 1.2 diff -C2 -d -r1.1 -r1.2 *** circular_seat.pd 3 Apr 2007 04:56:27 -0000 1.1 --- circular_seat.pd 17 Apr 2007 05:25:45 -0000 1.2 *************** *** 1,3 **** ! #N canvas 508 166 591 444 10; #X obj 62 10 inlet; #X obj 195 405 outlet; --- 1,3 ---- ! #N canvas 508 166 595 448 10; #X obj 62 10 inlet; #X obj 195 405 outlet;
--- NEW FILE: cubic_seat.pd --- #N canvas 571 181 589 471 12; #X obj 42 10 inlet; #X obj 349 13 inlet; #X obj 106 405 outlet; #X obj 220 10 loadbang; #X obj 147 9 inlet; #X obj 147 50 purepd/float_argument $1; #X obj 349 54 purepd/float_argument $2; #X obj 42 113 moses; #X obj 147 97 moses 1; #X obj 147 121 + 1e-06; #X text 202 106 prevent divide by 0; #X obj 7 199 expr $f3 - $f3*pow(1 - $f1/$f2 , 3); #X obj 152 275 expr $f3 + (1 - $f3) * pow(($f1 - $f2) / (1 - $f2) , 3); #X obj 349 121 float; #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 13 0; #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; #X connect 13 0 11 2; #X connect 13 0 12 2;
--- NEW FILE: elliptic.pd --- #N canvas 408 22 535 556 12; #X obj 345 96 t b f; #X obj 43 353 pow; #X msg 385 286 1 $1; #X obj 385 311 -; #X obj 43 246 moses; #X obj 43 325 /; #X obj 43 381 *; #X obj 80 323 /; #X msg 211 288 1 $1; #X obj 211 313 -; #X obj 161 314 - 1; #X obj 161 342 * -1; #X obj 161 398 pow; #X obj 161 371 /; #X obj 161 422 *; #X obj 211 369 /; #X obj 161 446 * -1; #X obj 161 470 + 1; #X obj 43 518 outlet; #X obj 43 10 inlet; #X obj 160 12 inlet; #X obj 345 12 inlet; #X text 89 11 input; #X text 205 11 X; #X text 396 13 Y; #X obj 160 152 f; #X obj 250 30 loadbang; #X obj 157 70 purepd/float_argument $1; #X obj 345 70 purepd/float_argument $2; #X connect 0 0 25 0; #X connect 0 1 2 0; #X connect 0 1 6 1; #X connect 0 1 7 1; #X connect 1 0 6 0; #X connect 2 0 3 0; #X connect 3 0 14 1; #X connect 3 0 15 1; #X connect 4 0 5 0; #X connect 4 1 10 0; #X connect 5 0 1 0; #X connect 6 0 18 0; #X connect 7 0 1 1; #X connect 8 0 9 0; #X connect 9 0 15 0; #X connect 9 0 13 1; #X connect 10 0 11 0; #X connect 11 0 13 0; #X connect 12 0 14 0; #X connect 13 0 12 0; #X connect 14 0 16 0; #X connect 15 0 12 1; #X connect 16 0 17 0; #X connect 17 0 18 0; #X connect 19 0 4 0; #X connect 20 0 27 0; #X connect 21 0 28 0; #X connect 25 0 8 0; #X connect 25 0 7 0; #X connect 25 0 4 1; #X connect 25 0 5 1; #X connect 26 0 27 0; #X connect 26 0 28 0; #X connect 27 0 25 0; #X connect 28 0 0 0;
--- NEW FILE: simplified_quadratic.pd --- #N canvas 206 281 589 471 10; #X obj 22 10 inlet; #X obj 174 435 outlet; #X obj 270 10 loadbang; #X obj 167 9 inlet; #X obj 167 50 purepd/float_argument $1; #X obj 167 157 select 0.5; #X obj 224 209 float; #X msg 167 181 0.50001; #X text 225 181 prevent divide by 0; #X obj 271 243 expr 1 - 2*$f1; #X obj 22 280 expr (sqrt($f2*$f2 + $f3*$f1) - $f2) / $f3; #X obj 175 339 expr (1 - 2*$f2)*($f1*$f1) + (2*$f2)*$f1; #X obj 278 82 * 2; #X obj 317 126 - 1; #X obj 278 104 moses 1; #X connect 0 0 10 0; #X connect 2 0 4 0; #X connect 3 0 4 0; #X connect 4 0 12 0; #X connect 5 0 7 0; #X connect 5 1 6 0; #X connect 6 0 9 0; #X connect 6 0 10 1; #X connect 7 0 6 0; #X connect 9 0 10 2; #X connect 10 0 11 0; #X connect 11 0 1 0; #X connect 12 0 14 0; #X connect 13 0 11 1; #X connect 14 0 5 0; #X connect 14 1 13 0;
--- NEW FILE: simplified_cubic_seat.pd --- #N canvas 515 141 585 467 12; #X obj 42 10 inlet; #X obj 349 13 inlet; #X obj 106 405 outlet; #X obj 220 10 loadbang; #X obj 147 9 inlet; #X obj 147 50 purepd/float_argument $1; #X obj 349 54 purepd/float_argument $2; #X obj 42 113 moses; #X obj 349 110 -; #X msg 349 87 1 $1; #X obj 7 199 expr $f3*$f1 + (1-$f3)*$f2*(1 - pow(1 - $f1/$f2 , 3)) ; #X obj 147 97 moses 1; #X obj 147 121 + 1e-06; #X text 202 106 prevent divide by 0; #X obj 152 275 expr $f3*$f1 + (1-$f3)*($f2 + (1-$f2)*pow(($f1-$f2) / (1-$f2) , 3)); #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 11 0; #X connect 6 0 9 0; #X connect 7 0 10 0; #X connect 7 1 14 0; #X connect 8 0 10 2; #X connect 8 0 14 2; #X connect 9 0 8 0; #X connect 10 0 2 0; #X connect 11 0 12 0; #X connect 12 0 10 1; #X connect 12 0 14 1; #X connect 14 0 2 0;
--- NEW FILE: quadratic.pd --- #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;
--- NEW FILE: circular.pd --- #N canvas 577 316 599 452 10; #X obj 62 10 inlet; #X obj 195 405 outlet; #X obj 65 172 expr 1 - sqrt(1 - pow($f1 , 2)); #X connect 0 0 2 0; #X connect 2 0 1 0;