#N canvas 1035 175 568 784 10;
#X obj 4 289 cnv 15 550 15 empty empty empty 20 12 0 14 -158509 -66577
0;
#X obj 5 675 cnv 15 550 30 empty empty empty 20 12 0 14 -158509 -66577
0;
#X obj 8 6 cnv 15 550 30 empty empty empty 20 12 0 14 -233017 -66577
0;
#X obj 14 309 cnv 15 75 15 empty empty empty 20 12 0 14 -233017 -66577
0;
#X obj 14 594 cnv 15 75 15 empty empty empty 20 12 0 14 -233017 -66577
0;
#X obj 4 537 cnv 15 550 15 empty empty empty 20 12 0 14 -158509 -66577
0;
#X obj 4 572 cnv 15 550 15 empty empty empty 20 12 0 14 -158509 -66577
0;
#X obj 7 76 cnv 15 550 15 empty empty empty 20 12 0 14 -158509 -66577
0;
#X obj 5 625 cnv 15 550 20 empty empty empty 20 12 0 14 -158509 -66577
0;
#X obj 5 645 cnv 15 550 30 empty empty empty 20 12 0 14 -233017 -66577
0;
#X text 12 76 Examples:;
#X text 9 289 Inlets:;
#X text 19 308 - Left:;
#X text 10 536 Arguments:;
#X text 11 572 Outlets:;
#X text 19 627 See Also:;
#X text 74 48 Full Name:;
#N canvas 56 111 262 70 Related_Objects 0;
#X obj 3 10 cnv 15 250 15 empty empty empty 20 12 0 14 -158509 -66577
0;
#X obj 3 30 cnv 15 250 30 empty empty empty 20 12 0 14 -233017 -66577
0;
#X text 5 10 Externals and libraries;
#X obj 44 37 pmpd;
#X obj 141 39 pmpd3d;
#X restore 122 683 pd Related_Objects;
#X text 101 308 Bang - A bang at the left inlet compute the new model
state based on previous instant.;
#X text 188 376 To create the model masses and links.;
#X text 188 430 To get the model parameters;
#X text 103 552 None;
#X text 18 593 - Left:;
#X text 101 594 Outputs the model parameters asked with the attributes
messages.;
#X text 101 340 Messages - Different messages are used to control the
pmpd object. They are of three types :;
#X text 9 649 CATEGORY: control;
#X text 9 659 KEYWORDS: physical model mass spring damper link;
#X text 135 98 Sorry \, you need GEM for this example...;
#X text 265 679 - Cyrille Henry 2011;
#X text 265 691 based on MSD by Nicolas Montgermont \, 2005;
#X text 12 8 HELP: pmpd3d;
#X text 11 19 DESCRIPTION: Physical modeling for Pd in 3d;
#X obj 157 48 pmpd3d;
#N canvas 426 263 759 345 init 0;
#X obj 89 215 t a;
#X obj 89 33 loadbang;
#X obj 89 241 s \$0-in;
#X obj 89 59 t b b b b b;
#X msg 161 80 reset;
#X obj 44 13 inlet;
#X msg 107 161 link souple mob mob 10 10;
#X msg 89 187 Xmax 4 \, Xmin -4 \, Ymax 4 \, Ymin -4 \, Zmax 1 \, Zmin
-4;
#X msg 125 110 mass mob 1 100 0 1 0 \, mass mob 1 100 1 0 0 \, mass
mob 1 100 0 0 0 \, mass mob 1 100 1 1 0 \, mass mob 1 100 0 1 -1 \,
mass mob 1 100 1 0 -1 \, mass mob 1 100 0 0 -1 \, mass mob 1 100 1
1 -1;
#X connect 0 0 2 0;
#X connect 1 0 3 0;
#X connect 3 0 7 0;
#X connect 3 1 6 0;
#X connect 3 2 8 0;
#X connect 3 4 4 0;
#X connect 4 0 0 0;
#X connect 5 0 3 0;
#X connect 6 0 0 0;
#X connect 7 0 0 0;
#X connect 8 0 0 0;
#X restore 17 156 pd init;
#X obj 17 251 s \$0-out;
#X obj 17 202 r \$0-in;
#X obj 318 257 s \$0-in;
#N canvas 565 515 355 193 compute 0;
#X obj 27 127 s \$0-in;
#X obj 27 66 gemhead;
#X msg 27 96 bang \, massPos \, linkEnd;
#X connect 1 0 2 0;
#X connect 2 0 0 0;
#X restore 17 179 pd compute;
#X obj 102 205 r \$0-out;
#N canvas 363 318 550 319 gemrender 0;
#X obj 48 203 translateXYZ;
#X obj 48 229 sphere 0.1;
#X obj 127 24 inlet;
#X obj 390 13 inlet;
#X obj 303 213 curve 2;
#X msg 390 58 \$2 \$3 \$4;
#X msg 462 62 \$5 \$6 \$7;
#X obj 48 167 gemhead;
#X msg 48 143 0;
#X obj 48 115 loadbang;
#X obj 303 147 gemhead;
#X msg 303 123 0;
#X obj 303 95 loadbang;
#X obj 390 86 t b l;
#X obj 127 62 unpack s f f f f;
#X obj 119 109 t b;
#X connect 0 0 1 0;
#X connect 2 0 14 0;
#X connect 3 0 6 0;
#X connect 3 0 5 0;
#X connect 5 0 13 0;
#X connect 6 0 4 2;
#X connect 7 0 0 0;
#X connect 8 0 7 0;
#X connect 9 0 8 0;
#X connect 10 0 4 0;
#X connect 11 0 10 0;
#X connect 12 0 11 0;
#X connect 13 0 10 0;
#X connect 13 1 4 1;
#X connect 14 1 15 0;
#X connect 14 2 0 1;
#X connect 14 3 0 2;
#X connect 14 4 0 3;
#X connect 15 0 7 0;
#X restore 102 256 pd gemrender;
#X obj 17 226 pmpd3d;
#X text 417 226 2 Send forces;
#X text 112 628 01_pmpd3dtest.pd;
#N canvas 544 115 967 626 creation____________ 0;
#X obj 5 75 cnv 15 450 15 empty empty empty 20 12 0 14 -158509 -66577
0;
#X obj 5 3 cnv 15 450 15 empty empty empty 20 12 0 14 -233017 -66577
0;
#X text 7 2 CREATION Messages;
#X obj 4 157 cnv 15 450 15 empty empty empty 20 12 0 14 -158509 -66577
0;
#X obj 3 371 cnv 15 450 15 empty empty empty 20 12 0 14 -158509 -66577
0;
#X msg 32 104 reset;
#X text 202 187 Add a mass;
#X text 57 211 \$1 : Id (symbol);
#X text 57 231 \$2 : fixed or mobile (0/1);
#X text 57 249 \$3 : mass;
#X text 7 157 Masses :;
#X text 7 74 Reset :;
#X text 103 103 Delete all masses \, links and internal variables;
#X text 6 371 Links :;
#X text 49 426 \$1 : Id (symbol);
#X text 49 479 \$4 : rigidity;
#X text 49 426 \$1 : Id (symbol);
#X text 49 479 \$4 : rigidity;
#X text 49 444 \$2 : creation No/Id of mass1;
#X text 49 462 \$3 : creation No/Id of mass2;
#X text 266 404 Add link(s);
#X text 49 497 \$5 : damping;
#X text 10 28 Creation messages are used to define the structure of
the model. Messages create links and masses or destroy them.;
#X msg 30 404 link \$1 \$2 \$3 \$4 \$5 (\$6 \$7 \$8);
#X text 46 515 (\$6) : Power of the rigidity distance;
#X text 46 534 (\$7) : minimum lenght of link;
#X text 46 551 (\$8) : maximum lenght of link;
#X obj 471 75 bng 15 250 50 0 empty empty empty 0 -6 0 8 -262144 -1
-1;
#X obj 501 75 cnv 15 450 15 empty empty empty 20 12 0 14 -158509 -66577
0;
#X obj 471 578 bng 15 250 50 0 empty empty empty 0 -6 0 8 -262144 -1
-1;
#X text 527 180 \$1 : Id (symbol);
#X text 527 233 \$4 : rigidity;
#X text 527 180 \$1 : Id (symbol);
#X text 527 233 \$4 : rigidity;
#X text 527 198 \$2 : creation No/Id of mass1;
#X text 527 216 \$3 : creation No/Id of mass2;
#X text 527 251 \$5 : damping;
#X text 812 154 Add tangential link(s);
#X text 506 102 In 2D (and 3D) there are two specials links : oriented
links. They works as general links excepts their calculation is made
following a vector.;
#X text 504 75 Oriented links :;
#X msg 502 406 tabLink \$1 \$2 \$3 \$4 \$5 \$6 \$7;
#X text 532 453 \$1 : Id (symbol);
#X text 532 453 \$1 : Id (symbol);
#X text 532 471 \$2 : creation No/Id of mass1;
#X text 532 489 \$3 : creation No/Id of mass2;
#X text 527 434 Add non linear link(s);
#X text 530 506 \$4 : table name for the rigidity;
#X text 530 524 \$5 : length of the table;
#X text 530 542 \$6 : table name for the damping;
#X text 529 561 \$7 : length of the table;
#X obj 494 351 cnv 15 450 15 empty empty empty 20 12 0 14 -158509 -66577
0;
#X text 497 351 Table links :;
#X msg 32 187 mass \$1 \$2 \$3 \$4 \$5 \$6;
#X text 58 267 \$4 \, \$5 \, \$6 : initial position;
#X msg 507 153 tLink \$1 \$2 \$3 \$4 \$5 \$6 \$7 \$8 (\$9 \$10 \$11)
;
#X text 526 270 \$6 \, \$7 \, \$8 : tangential vector (x \, y);
#X text 524 289 (\$9) : Power of the rigidity distance;
#X text 524 308 (\$10) : minimum lenght of link;
#X text 524 325 (\$11) : maximum lenght of link;
#X msg 33 131 print;
#X text 103 131 post surrent physical model topology;
#X connect 27 0 29 0;
#X restore 12 377 pd creation____________;
#N canvas 601 155 1158 898 dynamic 0;
#X obj 5 3 cnv 15 550 15 empty empty empty 20 12 0 14 -233017 -66577
0;
#X obj 10 85 cnv 15 150 750 empty empty empty 20 12 0 14 -233017 -66577
0;
#X obj 4 62 cnv 15 550 15 empty empty empty 20 12 0 14 -158509 -66577
0;
#X obj 574 86 cnv 15 130 350 empty empty empty 20 12 0 14 -233017 -66577
0;
#X obj 567 62 cnv 15 550 15 empty empty empty 20 12 0 14 -158509 -66577
0;
#X text 7 62 Masses :;
#X text 570 62 Links :;
#X text 7 2 DYNAMIC SETTINGS Messages;
#X text 191 178 Add force on mass(es);
#X msg 30 191 forceX \$1 \$2;
#X text 190 114 \$1 : Id (symbol) or No;
#X text 193 195 \$1 : Id (symbol) or No;
#X msg 29 347 setMobile \$1;
#X msg 29 368 setFixed \$1;
#X text 190 96 Set position of fixed mass(es);
#X text 177 272 Set minimimum and maximum position of all masses;
#X text 188 347 Set mass to mobile or fixed;
#X msg 593 150 setD \$1 \$2;
#X text 716 134 \$2 : New value;
#X msg 593 99 setK \$1 \$2;
#X text 716 190 \$2 : New value;
#X text 718 249 \$2 : New value;
#X text 710 98 Set rigidity of link(s);
#X text 710 154 Set damping of link(s);
#X msg 591 211 setL \$1 \$2;
#X text 712 213 Set initial lenght of link(s);
#X text 716 116 \$1 : Id (symbol) or No;
#X text 716 172 \$1 : Id (symbol) or No;
#X text 718 231 \$1 : Id (symbol) or No;
#X text 191 364 \$1 : Id (symbol) or No;
#X text 10 25 Dynamic settings messages allows the user to redefine
internal parameters of links and masses.;
#X msg 29 391 grabMass \$1 \$2 \$3;
#X text 186 391 Grab nearest mass;
#X text 191 407 \$1 \, \$2 : position;
#X text 190 424 \$3 : grab or not (0/1);
#X msg 30 210 forceY \$1 \$2;
#X text 191 476 \$2 : New Id;
#X msg 29 444 setMassId \$1 \$2;
#X text 191 442 Change the Id of a mass;
#X text 192 459 \$1 : mass (number or Id);
#X msg 24 564 setSpeed \$1 \$2;
#X text 186 518 \$1 : Id (symbol) or No;
#X text 183 501 set force on mass(es);
#X text 185 585 \$1 : Id (symbol) or No;
#X text 182 568 set speed of a mass(es);
#X text 178 664 \$1 : Id (symbol) or No;
#X text 175 647 add pos of a mass(es);
#X msg 27 734 grabMass \$1 \$2 \$3;
#X text 183 703 grab a mass \, and move it;
#X text 185 725 \$1 : mass number;
#X text 185 741 \$2 : position;
#X text 185 757 \$3 : grab or not (0 or 1);
#X msg 24 484 setForce \$1 \$2 \$3;
#X text 186 536 \$2 / \$3 : Value;
#X msg 24 503 setForceX \$1 \$2;
#X msg 24 522 setForceY \$1 \$2;
#X text 190 132 \$2 / \$3 : Value;
#X msg 30 172 force \$1 \$2 \$3;
#X text 191 213 \$2 / \$3 : Value;
#X text 178 781 Change environement damping;
#X msg 24 583 setSpeedX \$1 \$2;
#X msg 24 602 setSpeedY \$1 \$2;
#X text 185 602 \$2 / \$3 : Value;
#X text 179 682 \$2 / \$3 : Value;
#X msg 24 645 addPos \$1 \$2 \$3;
#X msg 589 359 setLinkId \$1 \$2;
#X text 743 360 Change the Id of a link;
#X text 744 377 \$1 : link (number or Id);
#X text 747 394 \$2 : New Id;
#X msg 586 425 setLKTab \$1 \$2;
#X text 745 425 change the table (K) size of a non linear link;
#X text 746 445 \$1 : link (number or Id);
#X text 747 462 \$2 : New KL;
#X text 746 507 \$1 : link (number or Id);
#X msg 586 487 setLDTab \$1 \$2;
#X text 745 487 change the table (D) size of a non linear link;
#X text 747 524 \$2 : New DL;
#X msg 30 229 forceZ \$1 \$2;
#X msg 31 249 min \$1 \$2;
#X msg 31 269 max \$1 \$2;
#X text 180 288 \$1 / \$2 / \$3 : Value;
#X msg 24 541 setForceZ \$1 \$2;
#X msg 24 621 setSpeedZ \$1 \$2;
#X msg 24 664 addPosX \$1 \$2;
#X msg 24 683 addPosY \$1 \$2;
#X msg 25 702 addPosZ \$1 \$2;
#X msg 29 781 setDEnv \$1 \$2;
#X text 190 812 \$2 : damping;
#X text 189 797 \$1 : Id (symbol) or No;
#X text 178 870 \$2 : damping;
#X text 177 855 \$1 : Id (symbol) or No;
#X msg 30 824 setDEnvOffset \$1 \$2;
#X msg 31 289 minX \$1;
#X msg 90 288 maxX \$1;
#X msg 31 307 minY \$1;
#X msg 90 307 maxY \$1;
#X msg 31 326 minZ \$1;
#X msg 90 326 maxZ \$1;
#X msg 31 96 setPos \$1 \$2 \$3;
#X msg 31 115 setPosX \$1 \$2;
#X msg 31 134 setPposY \$1 \$2;
#X msg 31 153 setPosZ \$1 \$2;
#X text 579 856 if only 1 argument is provided \, message generally
used this argument as the value applayed to all masses (or link);
#X text 176 828 Set environement damping offset (in order to force
a specific velocity to masses);
#X text 719 273 Set initial lenght of link(s);
#X text 725 291 \$1 : Id (symbol) or No;
#X msg 591 271 setLCurrent \$1 [\$2];
#X text 725 309 \$2 : mix between link size (0) and curent length (1)
;
#X text 720 327 if no \$2 arg is provide \, then L is set to curent
length;
#X text 747 610 \$1 : link (number or Id);
#X text 746 566 \$1 : link (number or Id);
#X msg 587 590 setActive \$1 \$2;
#X msg 586 546 setInactive \$1 \$2;
#X text 745 546 did not compute a link anymore;
#X text 746 590 compute the link at each bang;
#X text 742 677 \$1 : link (number or Id);
#X msg 587 634 setOverdamp \$1 \$2;
#X text 742 691 \$2 : overdamp value;
#X text 741 635 Change the overdamp of a link. i.e a strange parametter
that amplifie forces that oposed to movment. Use at your own risk.
;
#X text 745 732 \$1 : link (number or Id);
#X msg 587 711 setLDTab \$1 \$2;
#X text 744 712 change the table (D) size of a non linear link;
#X text 746 749 \$2 : New DL;
#X text 744 788 \$1 : link (number or Id);
#X msg 589 769 setEnd \$1 \$2 \$3;
#X text 743 804 \$2 : mass number for end 1;
#X text 743 771 Change the masses a link is connected to;
#X text 742 820 \$3 : mass number for end 2;
#X msg 601 792 setEnd1 \$1 \$2;
#X msg 601 814 setEnd2 \$1 \$2;
#X restore 12 398 pd dynamic settings ___;
#X text 188 398 To set the model parameters after creation.;
#N canvas 306 135 1234 920 masses_attributes 0;
#X obj 5 95 cnv 15 590 15 empty empty empty 20 12 0 14 -158509 -66577
0;
#X obj 5 3 cnv 15 590 15 empty empty empty 20 12 0 14 -233017 -66577
0;
#X obj 11 372 cnv 15 150 110 empty empty empty 20 12 0 14 -233017 -66577
0;
#X obj 5 351 cnv 15 590 15 empty empty empty 20 12 0 14 -158509 -66577
0;
#X obj 10 157 cnv 15 110 150 empty empty empty 20 12 0 14 -233017 -66577
0;
#X text 7 94 General :;
#X text 7 2 ATTRIBUTES Messages;
#X text 8 351 Lists :;
#X text 171 384 Output all masses positions in a list on outlet No
1;
#X text 173 613 Output all forces applied on masses in a list on outlet
No 1;
#X text 171 416 Output all masses x or y in a list on outlet No 1;
#X text 171 444 Output all norm of position vector (sqrt(x*x+y*y))
in a list on outlet No 1;
#X obj 12 486 cnv 15 150 110 empty empty empty 20 12 0 14 -233017 -66577
0;
#X text 172 498 Output all masses speeds in a list on outlet No 1;
#X text 173 530 Output all masses speeds in x or y in a list on outlet
No 1;
#X text 180 567 Output all norm of speed vector (sqrt(x*x+y*y)) in
a list on outlet No 1;
#X obj 12 599 cnv 15 150 110 empty empty empty 20 12 0 14 -233017 -66577
0;
#X text 176 643 Output all masses forces in x or y in a list on outlet
No 1;
#X text 176 677 Output all norm of forces vector (sqrt(x*x+y*y)) in
a list on outlet No 1;
#X obj 611 26 cnv 15 150 110 empty empty empty 20 12 0 14 -233017 -66577
0;
#X obj 605 5 cnv 15 590 15 empty empty empty 20 12 0 14 -158509 -66577
0;
#X text 796 264 Output all forces applied on masses in a list on outlet
No 1;
#X obj 612 140 cnv 15 150 110 empty empty empty 20 12 0 14 -233017
-66577 0;
#X text 795 149 Output all masses speeds in a list on outlet No 1;
#X text 796 181 Output all masses speeds in x or y in a list on outlet
No 1;
#X text 801 209 Output all norm of speed vector (sqrt(x*x+y*y)) in
a list on outlet No 1;
#X obj 612 253 cnv 15 150 110 empty empty empty 20 12 0 14 -233017
-66577 0;
#X text 799 294 Output all masses forces in x or y in a list on outlet
No 1;
#X text 804 322 Output all norm of forces vector (sqrt(x*x+y*y)) in
a list on outlet No 1;
#X msg 13 459 massesPosNormL (\$1);
#X text 794 35 Output all masses positions in a table (\$1);
#X text 794 67 Output all masses x or y in a table (\$1);
#X text 794 95 Output all norm of position vector (sqrt(x*x+y*y)) in
a table (\$1);
#X text 175 712 \$1 (optional): Masses Id;
#X text 815 376 \$2 (optional): Masses Id;
#X text 814 363 \$1 : table name;
#X text 608 5 tables :;
#X text 15 30 The attributes messages ask the object to output some
of his internal parameters. They can be output by lists for positions
and forces of masses \, or directly send value to a table.;
#X obj 623 488 cnv 15 150 95 empty empty empty 20 12 0 14 -233017 -66577
0;
#X obj 617 468 cnv 15 590 15 empty empty empty 20 12 0 14 -158509 -66577
0;
#X text 783 516 output the closest mass;
#X text 620 468 others :;
#X text 782 530 \$1 : x -position;
#X text 782 545 \$2 : y -position;
#X text 782 560 \$3 : z -position;
#X text 782 572 \$4 : none or Id;
#X msg 628 516 closestMass \$1 \$2 \$3 (\$4);
#X msg 13 383 massPosL (\$1);
#X msg 13 402 massPosXL (\$1);
#X msg 13 421 massPosYL (\$1);
#X msg 13 440 massPosZL (\$1);
#X msg 15 569 massSpeedsNormL (\$1);
#X msg 14 493 massSpeedL (\$1);
#X msg 15 512 massSpeedXL (\$1);
#X msg 14 530 massSpeedYL (\$1);
#X msg 15 549 massSpeedZL (\$1);
#X msg 18 606 massForceL (\$1);
#X msg 16 625 massForceXL (\$1);
#X msg 16 644 massForceYL (\$1);
#X msg 15 663 massForceZL (\$1);
#X msg 615 38 massPosT \$1 (\$2);
#X msg 615 57 massPosXT \$1 (\$2);
#X msg 615 76 massPosYT \$1 (\$2);
#X msg 615 95 massPosZT \$1 (\$2);
#X msg 614 114 massPosNormT \$1 (\$2);
#X msg 616 152 massSpeedsT \$1 (\$2);
#X msg 616 171 massSpeedsXT \$1 (\$2);
#X msg 616 190 massSpeedsYT \$1 (\$2);
#X msg 616 209 massSpeedsZT \$1 (\$2);
#X msg 616 228 massSpeedsNormT \$1 (\$2);
#X msg 617 259 massForcesT \$1 (\$2);
#X msg 616 278 massForcesXT \$1 (\$2);
#X msg 616 297 massForcesYT \$1 (\$2);
#X msg 616 316 massForcesZT \$1 (\$2);
#X msg 616 335 massSpeedsNormT \$1 (\$2);
#X msg 14 165 massPos [\$1];
#X text 136 167 \$1 : id float or symbol of masses (nothing for all)
;
#X text 137 187 output a message for every masses :;
#X text 167 204 massPos symbolId number posX posY posZ;
#X text 136 227 \$1 : id float or symbol of masses (nothing for all)
;
#X text 137 247 output a message for every masses :;
#X text 167 264 massPos symbolId number speedX speedY speedZ;
#X text 136 286 \$1 : id float or symbol of masses (nothing for all)
;
#X text 137 302 output a message for every masses :;
#X msg 14 284 massForce [\$1];
#X text 167 319 massPos symbolId number forceX forceY forceZ;
#X obj 11 115 cnv 15 100 35 empty empty empty 20 12 0 14 -233017 -66577
0;
#X text 136 124 Get infos on all masses and links on right outlet;
#X msg 33 124 print;
#X msg 14 225 massSpeed [\$1];
#X msg 15 682 massForceNormL (\$1);
#X text 806 596 output a series of message :;
#X msg 628 596 massDistance [\$1 [\$2]];
#X text 825 617 distance mass1 mass2 distanceX \, distanceY \, distanceZ
\, distance;
#X obj 12 728 cnv 15 590 15 empty empty empty 20 12 0 14 -158509 -66577
0;
#X text 15 728 Table :;
#X msg 21 756 forceXT \$1 [\$2];
#X msg 22 776 forceYT \$1 [\$2];
#X msg 21 796 forceZT \$1 [\$2];
#X text 163 782 \$1 : table name;
#X text 162 801 \$2 : masses name;
#X text 161 759 apply a force to masses. Force come from a table;
#X restore 12 419 pd masses_attributes __;
#N canvas 274 125 1643 924 links_attributes 0;
#X obj 5 3 cnv 15 590 15 empty empty empty 20 12 0 14 -233017 -66577
0;
#X obj 8 260 cnv 15 150 110 empty empty empty 20 12 0 14 -233017 -66577
0;
#X obj 2 239 cnv 15 590 15 empty empty empty 20 12 0 14 -158509 -66577
0;
#X text 7 2 ATTRIBUTES Messages;
#X text 5 239 Lists :;
#X text 168 332 Output all norm of position vector (sqrt(x*x+y*y))
in a list on outlet No 1;
#X obj 9 374 cnv 15 150 110 empty empty empty 20 12 0 14 -233017 -66577
0;
#X obj 9 487 cnv 15 150 110 empty empty empty 20 12 0 14 -233017 -66577
0;
#X obj 611 26 cnv 15 150 110 empty empty empty 20 12 0 14 -233017 -66577
0;
#X obj 605 5 cnv 15 590 15 empty empty empty 20 12 0 14 -158509 -66577
0;
#X obj 612 140 cnv 15 150 110 empty empty empty 20 12 0 14 -233017
-66577 0;
#X obj 612 253 cnv 15 150 110 empty empty empty 20 12 0 14 -233017
-66577 0;
#X text 833 502 \$2 (optional): Masses Id;
#X text 832 489 \$1 : table name;
#X text 608 5 tables :;
#X text 15 30 The attributes messages ask the object to output some
of his internal parameters. They can be output by lists for positions
and forces of links;
#X text 168 272 Output all links center positions in a list on outlet
No 1;
#X text 168 304 Output all links x or y in a list on outlet No 1;
#X obj 10 603 cnv 15 150 110 empty empty empty 20 12 0 14 -233017 -66577
0;
#X text 182 611 Output all link lenght deformation speed in a list
on outlet No 1;
#X text 182 647 Output all link lenght deformation speed in x or y
in a list on outlet No 1;
#X text 212 675 Output all norm of link lenght deformation speed vector
(sqrt(x*x+y*y)) in a list on outlet No 1;
#X obj 612 369 cnv 15 150 110 empty empty empty 20 12 0 14 -233017
-66577 0;
#X text 808 377 Output all link lenght deformation speed in a list
on outlet No 1;
#X text 808 413 Output all link lenght deformation speed in x or y
in a list on outlet No 1;
#X text 838 441 Output all norm of link lenght deformation speed vector
(sqrt(x*x+y*y)) in a list on outlet No 1;
#X text 794 35 Output all links center positions in a table (\$1);
#X text 794 67 Output all links center positions x or y in a table
(\$1);
#X text 793 105 Output all norm of links center positions vector (sqrt(x*x+y*y))
in a table (\$1);
#X text 168 385 Output all link lenght in a list on outlet No 1;
#X text 170 418 Output all link lenght in x or y in a list on outlet
No 1;
#X text 179 446 Output all norm of link lenght vector (sqrt(x*x+y*y))
in a list on outlet No 1;
#X text 169 501 Output all link center speed in a list on outlet No
1;
#X text 173 531 Output all link center speed in x or y in a list on
outlet No 1;
#X text 192 567 Output all norm of link center speed vector (sqrt(x*x+y*y))
in a list on outlet No 1;
#X text 797 154 Output all link length in a list on outlet No 1;
#X text 796 181 Output all link length in x or y in a list on outlet
No 1;
#X text 799 218 Output all norm of link length vector (sqrt(x*x+y*y))
in a list on outlet No 1;
#X text 795 264 Output all link center speed in a list on outlet No
1;
#X text 799 294 Output all link center speed in x or y in a list on
outlet No 1;
#X text 815 326 Output all norm of link center speed vector (sqrt(x*x+y*y))
in a list on outlet No 1;
#X msg 9 271 linkPosL (\$1);
#X msg 9 290 linkPosXL (\$1);
#X msg 10 309 linkPosYL (\$1);
#X msg 10 328 linkPosZL (\$1);
#X msg 10 347 linkPosNormL (\$1);
#X msg 11 381 linkLengthL (\$1);
#X msg 11 400 linkLengthXL (\$1);
#X msg 11 419 linkLengthYL (\$1);
#X msg 12 438 linkLengthZL (\$1);
#X msg 14 494 linkPosSpeedL (\$1);
#X msg 14 513 linkPosSpeedXL (\$1);
#X msg 13 532 linkPosSpeedYL (\$1);
#X msg 13 551 linkPosSpeedsZL (\$1);
#X msg 12 570 linkPosSpeedNormL (\$1);
#X msg 12 610 linkLengthSpeedL (\$1);
#X msg 12 629 linkLengthSpeedXL (\$1);
#X msg 12 648 linkLengthSpeedYL (\$1);
#X msg 13 667 linkLengthSpeedZL (\$1);
#X msg 615 38 linkPosT \$1 (\$2);
#X msg 615 57 linkPosXT \$1 (\$2);
#X msg 615 75 linkPosYT \$1 (\$2);
#X msg 615 95 linkPosZT \$1 (\$2);
#X msg 614 114 linkPosNormT \$1 (\$2);
#X msg 616 152 linkLengthT \$1 (\$2);
#X msg 616 171 linkLengthXT \$1 (\$2);
#X msg 616 190 linkLengthYT \$1 (\$2);
#X msg 616 209 linkLengthZT \$1 (\$2);
#X msg 615 228 linkLengthNormT \$1 (\$2);
#X msg 616 259 linkPosSpeedT \$1 (\$2);
#X msg 616 278 linkPosSpeedXT \$1 (\$2);
#X msg 616 297 linkPosSpeedYT \$1 (\$2);
#X msg 616 316 linkPosSpeedZT \$1 (\$2);
#X msg 616 335 linkPosSpeedNormT \$1 (\$2);
#X msg 614 376 linkLengthSpeedT \$1 (\$2);
#X msg 613 395 linkLengthSpeedXT \$1 (\$2);
#X msg 614 414 linkLengthSpeedYT \$1 (\$2);
#X msg 615 433 linkLengthSpeedZT \$1 (\$2);
#X obj 8 88 cnv 15 110 100 empty empty empty 20 12 0 14 -233017 -66577
0;
#X text 134 98 \$1 : id float or symbol of masses (nothing for all)
;
#X text 134 158 \$1 : id float or symbol of masses (nothing for all)
;
#X msg 12 96 linkPos [\$1];
#X msg 12 156 linkEnd [\$1];
#X text 135 118 output a message for every links :;
#X text 135 178 output a message for every links :;
#X text 164 135 linkPos symbolId number centerX centerY centerZ;
#X text 134 194 linkEnd symbolId number posX1 posY1 posZ1 posX2 posY2
posZ2;
#X obj 2 69 cnv 15 590 15 empty empty empty 20 12 0 14 -158509 -66577
0;
#X text 5 69 generic :;
#X msg 10 457 linkLengthNormL (\$1);
#X msg 13 687 linkLengthSpeedNormL (\$1);
#X msg 615 453 linkLengthSpeedNormT \$1 (\$2);
#X msg 617 556 linkEndT \$1 [\$2];
#X text 798 559 Put position of the 2 link end on a table (\$1) \,
filter on link id is possible;
#X text 803 591 table is posX1 posY1 posZ1 posX2 posY2 posZ2 ....;
#X msg 629 576 linkEnd1T \$1 [\$2];
#X msg 628 596 linkEnd2T \$1 [\$2];
#X msg 627 617 linkEndXT \$1 [\$2];
#X msg 627 636 linkEnd1XT \$1 [\$2];
#X msg 627 656 linkEnd2XT \$1 [\$2];
#X msg 628 678 linkEndYT \$1 [\$2];
#X msg 630 698 linkEnd1YT \$1 [\$2];
#X msg 629 718 linkEnd2YT \$1 [\$2];
#X msg 628 738 linkEndZT \$1 [\$2];
#X msg 630 758 linkEnd1ZT \$1 [\$2];
#X msg 629 778 linkEnd2ZT \$1 [\$2];
#X restore 12 439 pd links_attributes ___;
#N canvas 0 50 901 640 More_Info 0;
#X text 96 12 pmpd : mass - spring - damper model;
#X text 27 155 Be careful : if masses are deleted \, lists messages
won't work;
#X text 27 60 It is designed to implement particules physical model
in PD.The model is based on two elements type : mass and link. The
pmpd masses are the principals objects of the model. They got only
one physical parameter \, the value of their mass. They can be mobile
or fixed \, in this case forces applied on them automatically \, by
links \, or manually \, by messages \, don't do anything.;
#X obj 426 -5 bng 15 250 50 0 empty empty empty 0 -6 0 8 -262144 -1
-1;
#X obj 426 294 bng 15 250 50 0 empty empty empty 0 -6 0 8 -262144 -1
-1;
#N canvas 0 50 450 300 (subpatch) 0;
#X array rigidity1 4 float 1;
#A 0 -1 0 1 2;
#X array - 4 float 1;
#A 0 0 0 0 0;
#X coords 0 3 3 -3 200 150 1;
#X restore 31 428 graph;
#X text 89 585 L0;
#N canvas 324 73 956 727 figure 0;
#X obj 284 53 loadbang;
#X msg 293 125 \; rigidity1 resize 1 \; rigidity1 resize 4 \; rigidity1
bounds 0 3 3 -3 \; rigidity1 0 -1 0 1 2 \; rigidity1 ylabel -0.5 \;
rigidity1 xlabel -3.5 \; rigidity1 xticks 0 1 1 \; rigidity1 yticks
0 0.1 5;
#X obj 388 574 sqrt;
#X obj 316 651 tabwrite rigidity3;
#X obj 343 464 - 20;
#X obj 316 609 f;
#X obj 316 579 t b f;
#X obj 343 494 moses 0;
#X obj 343 517 * -1;
#X obj 343 538 sqrt;
#X obj 343 559 * -1;
#X obj 481 479 - 20;
#X obj 453 662 f;
#X obj 453 632 t b f;
#X obj 481 509 moses 0;
#X obj 481 532 * -1;
#X obj 480 612 * -1;
#X obj 528 622 *;
#X obj 480 591 *;
#X obj 525 590 t f f;
#X obj 480 564 t f f;
#X obj 453 683 tabwrite rigidity4;
#X obj 181 235 t b b;
#X obj 620 552 f;
#X obj 620 522 t b f;
#X obj 620 623 tabwrite rigidity2;
#X msg 763 574 0;
#X obj 679 437 - 50;
#X obj 751 491 moses 40;
#X obj 681 510 moses -40;
#X obj 620 586 * 1.5;
#X obj 680 462 moses 10;
#X obj 680 488 moses -10;
#X msg 55 419 \; rigidity2 resize 101 \; rigidity2 xticks 1 10 5 \;
rigidity2 yticks 0 5 5 \; rigidity3 resize 51 \; rigidity3 xticks 0
1 5 \; rigidity3 yticks 0 1 5 \; rigidity4 resize 51 \; rigidity4 xticks
0 1 5 \; rigidity4 yticks 0 100 5;
#X obj 631 315 f;
#X obj 648 394 + 1;
#X obj 632 367 t f f;
#X obj 375 333 f;
#X obj 375 360 moses 50.5;
#X obj 392 411 + 1;
#X obj 376 384 t f f;
#X obj 176 141 bng 15 250 50 0 empty empty empty 17 7 0 10 -262144
-1 -1;
#X msg 371 310 0;
#X msg 627 286 0;
#X obj 631 343 moses 100.5;
#X connect 0 0 1 0;
#X connect 0 0 22 0;
#X connect 2 0 5 1;
#X connect 4 0 7 0;
#X connect 5 0 3 0;
#X connect 6 0 5 0;
#X connect 6 1 3 1;
#X connect 7 0 8 0;
#X connect 7 1 2 0;
#X connect 8 0 9 0;
#X connect 9 0 10 0;
#X connect 10 0 5 1;
#X connect 11 0 14 0;
#X connect 12 0 21 0;
#X connect 13 0 12 0;
#X connect 13 1 21 1;
#X connect 14 0 15 0;
#X connect 14 1 19 0;
#X connect 15 0 20 0;
#X connect 16 0 12 1;
#X connect 17 0 12 1;
#X connect 18 0 16 0;
#X connect 19 0 17 0;
#X connect 19 1 17 1;
#X connect 20 0 18 0;
#X connect 20 1 18 1;
#X connect 22 0 42 0;
#X connect 22 1 33 0;
#X connect 22 1 43 0;
#X connect 23 0 30 0;
#X connect 24 0 23 0;
#X connect 24 1 25 1;
#X connect 26 0 23 1;
#X connect 27 0 31 0;
#X connect 28 0 23 1;
#X connect 28 1 26 0;
#X connect 29 0 26 0;
#X connect 29 1 23 1;
#X connect 30 0 25 0;
#X connect 31 0 32 0;
#X connect 31 1 28 0;
#X connect 32 0 29 0;
#X connect 32 1 26 0;
#X connect 34 0 44 0;
#X connect 35 0 34 0;
#X connect 36 0 35 0;
#X connect 36 1 27 0;
#X connect 36 1 24 0;
#X connect 37 0 38 0;
#X connect 38 0 40 0;
#X connect 39 0 37 0;
#X connect 40 0 39 0;
#X connect 40 1 4 0;
#X connect 40 1 6 0;
#X connect 40 1 13 0;
#X connect 40 1 11 0;
#X connect 41 0 22 0;
#X connect 42 0 37 0;
#X connect 43 0 34 0;
#X connect 44 0 36 0;
#X restore 27 304 pd figure;
#X text 105 375 Rigidity;
#N canvas 0 50 450 300 (subpatch) 0;
#X array rigidity2 101 float 1;
#A 0 0 0 0 0 0 0 0 0 0 0 -60 -58.5 -57 -55.5 -54 -52.5 -51 -49.5 -48
-46.5 -45 -43.5 -42 -40.5 -39 -37.5 -36 -34.5 -33 -31.5 -30 -28.5 -27
-25.5 -24 -22.5 -21 -19.5 -18 -16.5 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0
0 0 0 0 15 16.5 18 19.5 21 22.5 24 25.5 27 28.5 30 31.5 33 34.5 36
37.5 39 40.5 42 43.5 45 46.5 48 49.5 51 52.5 54 55.5 57 58.5 0 0 0
0 0 0 0 0 0 0 0;
#X array - 101 float 1;
#A 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0
0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0
0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0
0 0;
#X coords 0 100 100 -100 200 150 1;
#X restore 449 428 graph;
#X text 547 583 L0;
#X text 466 374 Rigidity with Lmin and Lmax;
#X text 563 583 Lmin;
#X text 625 582 Lmax;
#N canvas 0 50 450 300 (subpatch) 0;
#X array rigidity3 51 float 1;
#A 0 -4.47214 -4.3589 -4.24264 -4.12311 -4 -3.87298 -3.74166 -3.60555
-3.4641 -3.31662 -3.16228 -3 -2.82843 -2.64575 -2.44949 -2.23607 -2
-1.73205 -1.41421 -1 0 1 1.41421 1.73205 2 2.23607 2.44949 2.64575
2.82843 3 3.16228 3.31662 3.4641 3.60555 3.74166 3.87298 4 4.12311
4.24264 4.3589 4.47214 4.58258 4.69042 4.79583 4.89898 5 5.09902 5.19615
5.2915 5.38516 5.47723;
#X array - 51 float 1;
#A 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0
0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0;
#X coords 0 6 50 -6 200 150 1;
#X restore 241 428 graph;
#X text 314 581 L0;
#X text 257 375 Rigidity with power = 1/2;
#N canvas 0 50 450 300 (subpatch) 0;
#X array rigidity4 51 float 1;
#A 0 0 -400 -361 -324 -289 -256 -225 -196 -169 -144 -121 -100 -81 -64
-49 -36 -25 -16 -9 -4 -1 0 1 4 9 16 25 36 49 64 81 100 121 144 169
196 225 256 289 324 361 400 441 484 529 576 625 676 729 784 841;
#X array - 51 float 1;
#A 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0
0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0;
#X coords 0 1000 50 -1000 200 150 1;
#X restore 657 428 graph;
#X text 730 582 L0;
#X text 688 373 Rigidity with power = 2;
#X text 571 12 The equations are :;
#X text 497 36 if Lmin<|L[n]-L[0]|<Lmax;
#X text 496 75 else;
#X text 496 95 F[n] = D(L[n]-L[n-1]);
#X text 496 54 F[n] = K(L[n] - L[0])^P + D(L[n] - L[n-1]);
#X text 28 187 Links connect masses two by two. They got 4 physicals
parameters : length \, rigidity \, damping and power.;
#X text 27 216 Rigidity \, damping and power are defined by the creation
message. The lenght is initialised to the distance between the two
masses at the creation.;
#X text 495 124 For oriented links \, the force F[n] is projected onto
a vector which is given during the creation of the link using x1y1
coordinates.;
#X text 495 169 For normal vector \, the direction is calculated using
the scalar product :;
#X text 495 248 You can build specific links using different links
messages defining the characteristic step by step.;
#X text 496 206 x1x2 + y1y2 = 0;
#X text 27 257 Links can be created in one shot between mutiples masses
\, instead of creation number \, the masses linked are defined with
their Id.;
#X text 28 41 pmpd is the 2D object of the pmpd objects collection.
;
#X connect 3 0 4 0;
#X restore 14 682 pd More_Info;
#X obj 225 254 print;
#X obj 102 229 route massPos linkEnd;
#X obj 318 186 loadbang;
#N canvas 780 280 450 300 gemwin 0;
#X obj 144 24 inlet;
#X obj 144 46 sel 1 0;
#X obj 144 128 gemwin;
#X msg 164 96 0 \, destroy;
#X msg 144 71 reset \, create \, 1;
#X connect 0 0 1 0;
#X connect 1 0 4 0;
#X connect 1 1 3 0;
#X connect 3 0 2 0;
#X connect 4 0 2 0;
#X restore 317 157 pd gemwin;
#X obj 317 134 tgl 15 0 empty empty empty 17 7 0 10 -262144 -1 -1 0
1;
#X obj 17 133 bng 15 250 50 0 empty empty reset 17 7 0 10 -262144 -1
-1;
#X text 416 133 1 Create window;
#X msg 318 211 forceZ 1 30;
#X msg 318 233 forceX mob 10;
#N canvas 915 128 774 655 tests 0;
#X msg 20 26 testMass testId filterId filter_parametter ...;
#X text 315 29 output a message for every masses that pass all the
tests:;
#X text 265 52 testMass testId mass_number;
#X text 327 92 output a list with 0 or 1 for every masses depending
if it pass all test or not;
#X text 344 125 testMassL filterID 0/1 0/1 0/1 ...;
#X msg 22 154 testMassT tab_name filterId filter_parametter ...;
#X msg 22 93 testMassL testId filterId filter_parametter ....;
#X text 341 153 Put in a table 0 or 1 depending if masses pass all
tests;
#X text 38 191 masses test can be :;
#X text 180 191 Id \$1 / posXSup \$1 / posXInf \$1 / posYSup \$1 /
posYInf \$1 / posZSup \$1 / posZInf \$1 / speedXSup \$1 / speedXInf
\$1 / speedYSup \$1 / speedYInf \$1 / speedZSup \$1 / speedZInf \$1
/ speedSup \$1 / speedInf \$1 / distanceCircleSup \$1 \$2 \$3 \$4 (centerX
\, centerY \, centerZ \, distance) / distanceCircleInf \$1 \$2 \$3
\$4 (centerX \, centerY \, centerZ \, distance) / massSup \$1 / massInf
\$1 / forceSup \$1 / forceInf \$1 / forceXSup \$1 / forceXInf \$1 /
forceYSup \$1 / forceYInf \$1 / forceZSup \$1 / forceZInf \$1;
#X msg 19 344 testLink testId filterId filter_parametter ...;
#X msg 21 411 testLinkL testId filterId filter_parametter ....;
#X msg 21 472 testLinkT tab_name filterId filter_parametter ...;
#X text 314 347 output a message for every links that pass all the
tests:;
#X text 264 370 testLink testId mass_number;
#X text 342 442 testLinkL filterID 0/1 0/1 0/1 ...;
#X text 340 471 Put in a table 0 or 1 depending if links pass all tests
;
#X text 326 410 output a list with 0 or 1 for every links depending
if it pass all test or not;
#X text 35 509 links test can be :;
#X text 177 509 Id \$1 / forceSup \$1 / forceInf \$1 / forceXSup \$1
/ forceXInf \$1 / forceYSup \$1 / forceYInf \$1 / forceZSup \$1 / forceZInf
\$1 / lengthSup \$1 / lengthInf \$1 / lengthXSup \$1 / lengthXInf \$1
/ lengthYSup \$1 / lengthYInf \$1 / lengthZSup \$1 / lengthZInf \$1
/ connectedTo \$1 (symbol or float);
#X restore 12 460 pd tests ______________;
#X text 188 463 To test specific parametters;
#N canvas 995 176 666 599 interactors 0;
#X msg 16 24 iCylinder \$1 \$2 \$3 \$4 \$5 \$6 \$7 \$8 \$9 [\$10 [\$11
[\$12 [\$13 [\$14]]]]];
#X text 28 58 \$1 : mess Id (float or symbol) to apply this interactor
;
#X text 27 71 \$2 \$3 \$4 : center of the cylinder;
#X text 26 85 \$5 \$6 \$7 : center vector of the cylinder;
#X text 26 113 \$9 : K;
#X text 25 126 \$10 : power of the force;
#X text 25 141 \$11 : K tengential;
#X text 24 155 \$12 : power of the tengential force;
#X text 23 170 \$13 : minimum radius of the interactor;
#X text 22 185 \$14 : maximum radius of the interactor;
#X text 24 241 \$1 : mess Id (float or symbol) to apply this interactor
;
#X text 23 254 \$2 \$3 \$4 : vector perpendicular to the place;
#X text 22 268 \$5 \$6 \$7 : one point of the plane;
#X text 23 282 \$8 : K;
#X text 23 297 \$9 : power of the force;
#X text 22 314 \$10 : minimum profund of the interactor;
#X text 21 329 \$11 : maximum profund of the interactor;
#X msg 15 216 iPlane \$1 \$2 \$3 \$4 \$5 \$6 \$7 \$8 [\$9 [\$10 [\$11]]]
;
#X text 21 382 \$1 : mess Id (float or symbol) to apply this interactor
;
#X text 21 395 \$2 \$3 \$4 : center of the sphere;
#X text 26 99 \$8 : cylinder radius;
#X text 22 415 \$5 : cylinder radius;
#X text 22 429 \$6 : K;
#X text 21 446 \$7 : power of the force;
#X text 20 463 \$8 : minimum radius of the interactor;
#X text 19 478 \$9 : maximum radius of the interactor;
#X msg 13 365 iSphere \$1 \$2 \$3 \$4 \$5 \$6 [\$7 [\$8 [\$9]]];
#X restore 12 479 pd interactors ________;
#N canvas 1 89 965 752 statistics 0;
#X obj 25 41 cnv 15 150 270 empty empty empty 20 12 0 14 -233017 -66577
0;
#X obj 19 21 cnv 15 590 15 empty empty empty 20 12 0 14 -158509 -66577
0;
#X text 185 70 \$1 : none or Id;
#X text 187 107 \$1 : none or Id;
#X text 185 157 \$1 : none or Id;
#X text 187 194 \$1 : none or Id;
#X text 185 242 \$1 : none or Id;
#X text 186 279 \$1 : none or Id;
#X msg 30 54 massPosMean;
#X msg 31 92 massPosStd \$1;
#X msg 30 141 massForceMean;
#X msg 30 179 massForceStd \$1;
#X msg 31 228 massSpeedMean;
#X msg 30 262 massSpeedStd \$1;
#X text 181 54 output the average position of masses and center distance
;
#X text 182 91 output the standard deviation of masses position and
center distance;
#X text 181 141 output the average force applyed to masses (X \, Y
\, Z and Norm);
#X text 182 178 output the standard deviation of masses force;
#X text 181 226 output the average velocity of masses (X \, Y \, Z
\, Norm);
#X text 181 263 output the standard deviation of masses velocity;
#X text 22 21 masses :;
#X obj 29 357 cnv 15 150 220 empty empty empty 20 12 0 14 -233017 -66577
0;
#X obj 23 337 cnv 15 590 15 empty empty empty 20 12 0 14 -158509 -66577
0;
#X text 191 389 \$1 : none or Id;
#X text 190 421 \$1 : none or Id;
#X text 192 467 \$1 : none or Id;
#X text 194 504 \$1 : none or Id;
#X text 187 562 \$1 : none or Id;
#X text 193 597 \$1 : none or Id;
#X msg 38 402 linkPosStd \$1;
#X msg 37 489 linkLengthStd \$1;
#X msg 37 572 linkPosSpeedStd \$1;
#X text 194 637 \$1 : none or Id;
#X text 196 674 \$1 : none or Id;
#X msg 38 658 linkLengthSpeedStd \$1;
#X msg 37 364 linkPosMean \$1;
#X msg 37 450 linkLengthMean \$1;
#X msg 38 538 linkPosSpeedMean \$1;
#X msg 39 618 linkLengthSpeedMean \$1;
#X text 189 404 output the standard deviation of link center position
;
#X text 188 364 output the average position of links center (X \, Y
\, Z \, center disdance);
#X text 189 488 output the standard deviation of links length;
#X text 188 451 output the average links length (X \, Y \, Z \, L)
;
#X text 188 536 output the average center position velocity of links
(X \, Y \, Z \, Norm);
#X text 192 572 output the standard deviation of links center position
velocity;
#X text 190 620 output the average change in links length (X \, Y \,
Z \, Norm);
#X text 191 658 output the standard deviation of links length change
;
#X text 26 337 links :;
#X restore 13 501 pd statistics _________;
#X connect 35 0 40 0;
#X connect 38 0 50 0;
#X connect 40 0 34 0;
#X connect 50 0 39 0;
#X connect 50 1 39 1;
#X connect 50 2 49 0;
#X connect 51 0 56 0;
#X connect 53 0 52 0;
#X connect 54 0 33 0;
#X connect 56 0 36 0;
#X connect 57 0 36 0;