Update of /cvsroot/pure-data/abstractions/pureunity/generics In directory sc8-pr-cvs1.sourceforge.net:/tmp/cvs-serv8005
Modified Files: associative-test.pd commutative-test.pd distributive-test.pd invertible-test.pd Added Files: fnorm.pd Log Message: .
Index: associative-test.pd =================================================================== RCS file: /cvsroot/pure-data/abstractions/pureunity/generics/associative-test.pd,v retrieving revision 1.2 retrieving revision 1.3 diff -C2 -d -r1.2 -r1.3 *** associative-test.pd 31 Dec 2005 18:44:00 -0000 1.2 --- associative-test.pd 31 Dec 2005 19:22:14 -0000 1.3 *************** *** 1,6 **** ! #N canvas 736 151 452 362 10; #X obj 40 15 inlet bang; - #X obj 40 112 abs; - #X obj 126 112 abs; #X obj 40 131 /; #X obj 40 150 t a a; --- 1,4 ---- ! #N canvas 736 151 452 267 10; #X obj 40 15 inlet bang; #X obj 40 131 /; #X obj 40 150 t a a; *************** *** 14,30 **** #X msg 40 207 list associative1 $1 $2 -; #X obj 40 93 associator $2; ! #X connect 0 0 10 0; ! #X connect 1 0 3 0; ! #X connect 2 0 3 1; ! #X connect 3 0 4 0; ! #X connect 4 0 8 0; ! #X connect 4 1 5 1; ! #X connect 5 0 12 0; ! #X connect 8 0 5 0; ! #X connect 10 0 11 0; ! #X connect 11 0 13 0; ! #X connect 11 1 13 1; ! #X connect 11 2 13 2; ! #X connect 12 0 6 0; ! #X connect 13 0 1 0; ! #X connect 13 1 2 0; --- 12,30 ---- #X msg 40 207 list associative1 $1 $2 -; #X obj 40 93 associator $2; ! #X obj 40 112 $1norm; ! #X obj 126 112 $1norm; ! #X connect 0 0 8 0; ! #X connect 1 0 2 0; ! #X connect 2 0 6 0; ! #X connect 2 1 3 1; ! #X connect 3 0 10 0; ! #X connect 6 0 3 0; ! #X connect 8 0 9 0; ! #X connect 9 0 11 0; ! #X connect 9 1 11 1; ! #X connect 9 2 11 2; ! #X connect 10 0 4 0; ! #X connect 11 0 12 0; ! #X connect 11 1 13 0; ! #X connect 12 0 1 0; ! #X connect 13 0 1 1;
Index: distributive-test.pd =================================================================== RCS file: /cvsroot/pure-data/abstractions/pureunity/generics/distributive-test.pd,v retrieving revision 1.1 retrieving revision 1.2 diff -C2 -d -r1.1 -r1.2 *** distributive-test.pd 31 Dec 2005 18:43:44 -0000 1.1 --- distributive-test.pd 31 Dec 2005 19:22:14 -0000 1.2 *************** *** 1,5 **** #N canvas 665 86 452 291 10; #X obj 40 15 inlet bang; - #X obj 37 122 abs; #X obj 37 151 /; #X obj 37 170 t a a; --- 1,4 ---- *************** *** 8,12 **** #X text 157 24 with tolerance 0; #X obj 37 189 <= 0; - #X obj 130 122 abs; #X text 156 9 This test verifies that 3*(4+5)=3*4+3*5; #X msg 40 34 3 4 5; --- 7,10 ---- *************** *** 14,30 **** #X msg 37 227 list distributive1 $1 $2 -; #X obj 37 103 distributor $2; ! #X connect 0 0 10 0; #X connect 1 0 2 0; ! #X connect 2 0 3 0; ! #X connect 3 0 7 0; ! #X connect 3 1 4 1; ! #X connect 4 0 12 0; ! #X connect 7 0 4 0; ! #X connect 8 0 2 1; ! #X connect 10 0 11 0; ! #X connect 11 0 13 0; ! #X connect 11 1 13 1; ! #X connect 11 2 13 2; ! #X connect 12 0 5 0; ! #X connect 13 0 1 0; ! #X connect 13 1 8 0; --- 12,30 ---- #X msg 37 227 list distributive1 $1 $2 -; #X obj 37 103 distributor $2; ! #X obj 37 122 $1norm; ! #X obj 130 122 $1norm; ! #X connect 0 0 8 0; #X connect 1 0 2 0; ! #X connect 2 0 6 0; ! #X connect 2 1 3 1; ! #X connect 3 0 10 0; ! #X connect 6 0 3 0; ! #X connect 8 0 9 0; ! #X connect 9 0 11 0; ! #X connect 9 1 11 1; ! #X connect 9 2 11 2; ! #X connect 10 0 4 0; ! #X connect 11 0 12 0; ! #X connect 11 1 13 0; ! #X connect 12 0 1 0; ! #X connect 13 0 1 1;
Index: commutative-test.pd =================================================================== RCS file: /cvsroot/pure-data/abstractions/pureunity/generics/commutative-test.pd,v retrieving revision 1.4 retrieving revision 1.5 diff -C2 -d -r1.4 -r1.5 *** commutative-test.pd 31 Dec 2005 18:44:00 -0000 1.4 --- commutative-test.pd 31 Dec 2005 19:22:14 -0000 1.5 *************** *** 2,6 **** #X obj 40 15 inlet bang; #X obj 40 79 unpack 0 0; - #X obj 33 122 abs; #X obj 33 151 /; #X msg 40 34 1 3; --- 2,5 ---- *************** *** 12,30 **** #X obj 33 189 <= 0; #X msg 33 227 list commutative1 $1 $2 -; - #X obj 119 122 abs; #X text 218 23 and 1*3=3*1 and...; #X obj 33 103 commutator $2; ! #X connect 0 0 4 0; ! #X connect 1 0 14 0; ! #X connect 1 1 14 1; ! #X connect 2 0 3 0; ! #X connect 3 0 6 0; ! #X connect 4 0 1 0; #X connect 6 0 10 0; ! #X connect 6 1 7 1; ! #X connect 7 0 11 0; #X connect 10 0 7 0; ! #X connect 11 0 8 0; ! #X connect 12 0 3 1; ! #X connect 14 0 2 0; ! #X connect 14 1 12 0; --- 11,30 ---- #X obj 33 189 <= 0; #X msg 33 227 list commutative1 $1 $2 -; #X text 218 23 and 1*3=3*1 and...; #X obj 33 103 commutator $2; ! #X obj 33 122 $1norm; ! #X obj 119 122 $1norm; ! #X connect 0 0 3 0; ! #X connect 1 0 12 0; ! #X connect 1 1 12 1; ! #X connect 2 0 5 0; ! #X connect 3 0 1 0; ! #X connect 5 0 9 0; ! #X connect 5 1 6 1; #X connect 6 0 10 0; ! #X connect 9 0 6 0; #X connect 10 0 7 0; ! #X connect 12 0 13 0; ! #X connect 12 1 14 0; ! #X connect 13 0 2 0; ! #X connect 14 0 2 1;
--- NEW FILE: fnorm.pd --- #N canvas 462 350 544 148 10; #X obj 23 20 inlet f; #X obj 23 58 outlet f; #X obj 23 39 abs; #X text 101 18 $1norm takes a value of type $1 and produces a nonnegative float , normally using L2-norm formulas; #X connect 0 0 2 0; #X connect 2 0 1 0;
Index: invertible-test.pd =================================================================== RCS file: /cvsroot/pure-data/abstractions/pureunity/generics/invertible-test.pd,v retrieving revision 1.2 retrieving revision 1.3 diff -C2 -d -r1.2 -r1.3 *** invertible-test.pd 31 Dec 2005 18:44:00 -0000 1.2 --- invertible-test.pd 31 Dec 2005 19:22:14 -0000 1.3 *************** *** 2,6 **** #X obj 40 15 inlet bang; #X obj 40 79 unpack 0 0; - #X obj 33 122 abs; #X obj 33 151 /; #X msg 40 34 1 3; --- 2,5 ---- *************** *** 10,29 **** #X text 217 24 with tolerance 0; #X obj 33 189 <= 0; - #X obj 126 122 abs; #X text 215 9 This test verifies that 1+3-3=1; #X msg 33 227 list invertible1 $1 $2 -; #X obj 33 103 invertor $2 $3; ! #X connect 0 0 4 0; ! #X connect 1 0 13 0; ! #X connect 1 1 13 1; ! #X connect 2 0 3 0; ! #X connect 3 0 5 0; ! #X connect 4 0 1 0; ! #X connect 5 0 9 0; ! #X connect 5 1 6 1; ! #X connect 6 0 12 0; ! #X connect 9 0 6 0; ! #X connect 10 0 3 1; ! #X connect 12 0 7 0; ! #X connect 13 0 2 0; ! #X connect 13 1 10 0; --- 9,29 ---- #X text 217 24 with tolerance 0; #X obj 33 189 <= 0; #X text 215 9 This test verifies that 1+3-3=1; #X msg 33 227 list invertible1 $1 $2 -; #X obj 33 103 invertor $2 $3; ! #X obj 33 122 $1norm; ! #X obj 126 122 $1norm; ! #X connect 0 0 3 0; ! #X connect 1 0 11 0; ! #X connect 1 1 11 1; ! #X connect 2 0 4 0; ! #X connect 3 0 1 0; ! #X connect 4 0 8 0; ! #X connect 4 1 5 1; ! #X connect 5 0 10 0; ! #X connect 8 0 5 0; ! #X connect 10 0 6 0; ! #X connect 11 0 12 0; ! #X connect 11 1 13 0; ! #X connect 12 0 2 0; ! #X connect 13 0 2 1;