#N canvas 51 18 635 423 10; #X obj 18 181 t b b; #X obj 18 103 tgl 15 0 empty empty empty 0 -6 0 8 -262144 -1 -1 0 1 ; #X msg 145 149 0 \, destroy; #X obj 111 177 gemwin; #X msg 111 124 reset \, create \, 1; #X obj 18 390 s masse; #X obj 266 150 s reset_masse; #X msg 266 128 bang; #X text 359 281 <- right border; #X text 360 303 <- left border; #X text 360 325 <- top border; #X text 360 347 <- bottom border; #N canvas 845 31 438 384 pool 0; #X obj 290 290 aglom2 29; #X obj 0 0 aglom2 0; #X obj 10 10 aglom2 1; #X obj 20 20 aglom2 2; #X obj 30 30 aglom2 3; #X obj 40 40 aglom2 4; #X obj 50 50 aglom2 5; #X obj 60 60 aglom2 6; #X obj 70 70 aglom2 7; #X obj 80 80 aglom2 8; #X obj 90 90 aglom2 9; #X obj 100 100 aglom2 10; #X obj 110 110 aglom2 11; #X obj 120 120 aglom2 12; #X obj 130 130 aglom2 13; #X obj 140 140 aglom2 14; #X obj 150 150 aglom2 15; #X obj 160 160 aglom2 16; #X obj 170 170 aglom2 17; #X obj 180 180 aglom2 18; #X obj 190 190 aglom2 19; #X obj 200 200 aglom2 20; #X obj 210 210 aglom2 21; #X obj 220 220 aglom2 22; #X obj 230 230 aglom2 23; #X obj 240 240 aglom2 24; #X obj 250 250 aglom2 25; #X obj 260 260 aglom2 26; #X obj 270 270 aglom2 27; #X obj 280 280 aglom2 28; #X restore 398 132 pd pool; #N canvas 860 482 315 409 creation 0; #X obj 43 319 s pd-new; #X msg 86 95 \; pd filename new ./ \; #N canvas \; #X pop 1 \;; #X msg 43 289 menuclose; #X obj 76 238 pack f f f; #X obj 43 47 sel 0 1; #X obj 43 29 tgl 15 0 empty empty empty 0 -6 0 8 -262144 -1 -1 0 1 ; #X obj 61 72 t b b; #X obj 76 187 t f f f; #X obj 103 211 * 10; #X obj 76 211 * 10; #X msg 76 265 obj \$1 \$2 aglom2 \$3; #X obj 61 163 ch_uzi 30; #X connect 2 0 0 0; #X connect 3 0 10 0; #X connect 4 0 2 0; #X connect 4 1 6 0; #X connect 5 0 4 0; #X connect 6 0 11 0; #X connect 6 1 1 0; #X connect 7 0 9 0; #X connect 7 1 8 0; #X connect 7 2 3 2; #X connect 8 0 3 1; #X connect 9 0 3 0; #X connect 10 0 0 0; #X connect 11 1 7 0; #X restore 398 158 pd creation pool; #X obj 61 214 s link; #X obj 18 154 metro 5; #X obj 53 280 iLine2D masse 3.5 -3.5 3.5 3.5 1000 0 0 10; #X obj 63 304 iLine2D masse -3.5 3.5 -3.5 -3.5 1000 0 0 10; #X obj 78 327 iLine2D masse 3.5 3.5 -3.5 3.5 1000 0 0 10; #X obj 89 350 iLine2D masse -3.5 -3.5 3.5 -3.5 1000 0 0 10; #X text 50 100 <- begin (change the metro speed for slow computer) ; #X floatatom 55 123 5 0 0 0 - - -; #X obj 43 260 iAmbient2D masse 0 0 0.01 0.01 1; #X text 359 257 <- give random speed and ambient viscosity; #X text 174 35 All masses got 2 circular interactors around them. This create a non linear interactor. this make them to atract / repuls depending on ther distances....; #X text 177 6 All masses interact each other in a way for the creation of small structures; #X connect 0 0 5 0; #X connect 0 1 14 0; #X connect 0 1 16 0; #X connect 0 1 17 0; #X connect 0 1 18 0; #X connect 0 1 19 0; #X connect 0 1 22 0; #X connect 1 0 15 0; #X connect 2 0 3 0; #X connect 4 0 3 0; #X connect 7 0 6 0; #X connect 15 0 0 0; #X connect 21 0 15 1;