[PD-cvs] externals/iem/iemmatrix/abs mtx_distance-help.pd, NONE, 1.1 mtx_distance.pd, NONE, 1.1

[IOhannes m zmölnig]

Update of /cvsroot/pure-data/externals/iem/iemmatrix/abs
In directory sc8-pr-cvs1.sourceforge.net:/tmp/cvs-serv1489

Added Files:
	mtx_distance-help.pd mtx_distance.pd 
Log Message:
added an abstraction to get the (real) distance between to sets of vectors (and not the squared one)


--- NEW FILE: mtx_distance.pd ---
#N canvas 323 233 661 451 10;
#X text 72 316 (c) 2005 by IOhannes m zmoelnig \, IEM KUG \, graz austria
;
#X text 72 333 for license-details see LICENSE.txt that must come with
iemmatrix.;
#X obj 115 164 mtx_distance2;
#X obj 115 78 inlet matrix1;
#X obj 264 78 inlet matrix2;
#X obj 115 209 mtx_.^ 0.5;
#X text 73 41 calculate the euclidian distance between to sets of vectors
;
#X text 229 162 for performance reasons this does not calculate the
square-root;
#X text 229 206 so here we do the square-root;
#X obj 115 240 outlet distance-matrix;
#X connect 2 0 5 0;
#X connect 3 0 2 0;
#X connect 4 0 2 1;
#X connect 5 0 9 0;

--- NEW FILE: mtx_distance-help.pd ---
#N canvas 83 338 841 379 10;
#X obj 33 267 mtx_print distances;
#X obj 119 179 t a a;
#X obj 157 198 mtx_print B;
#X obj 33 179 t a a;
#X obj 63 198 mtx_print A;
#X obj 33 106 t b b;
#X msg 33 85 bang;
#X obj 33 132 mtx_rand 4 3;
#X obj 119 154 mtx_rand 2 3;
#X text 482 28 part of iemmatrix;
#X text 268 138 inletA: a matrix defining <i> vectors of dimension
<n>;
#X text 268 158 inletB: a matrix defining <j> vectors of dimension
<n>;
#X obj 33 242 mtx_distance;
#X text 166 69 calculate the euclidian distance between two sets of
vectors.;
#X text 267 179 outlet: distance matrix (i \, j) \, where each element
Y(i \, j)=sqrt((A(i)-B(i)).(A(i)-B(i)))=|A(i)-B(i)|;
#X text 269 240 there is also a faster version of this object [mtx_distance2]
which does not calculate the square-root of the in-product \; use that
one if possible;
#X text 44 34 [mtx_distance];
#X connect 1 0 12 1;
#X connect 1 1 2 0;
#X connect 3 0 12 0;
#X connect 3 1 4 0;
#X connect 5 0 7 0;
#X connect 5 1 8 0;
#X connect 6 0 5 0;
#X connect 7 0 3 0;
#X connect 8 0 1 0;
#X connect 12 0 0 0;