#N canvas 597 49 843 799 10; #X obj 119 28 cnv 15 400 300 empty empty CREATION 20 12 1 14 -260818 -66577 0; #X obj 167 310 t a; #X obj 42 28 bng 20 250 50 0 empty empty empty 0 -6 0 8 -258699 -1 -1; #X msg 239 84 reset; #X obj 245 32 loadbang; #X text 68 30 reset; #X obj 167 55 t b b b b b; #X text 501 28 change number of mass to test performance; #X text 501 41 (and reset afterwards); #X obj 441 34 nbx 5 14 1 20000 1 1 empty empty empty 0 -6 0 10 -262144 -1 -1 1681.79 256; #X msg 185 241 Xmax 4 \, Xmin -4 \, Ymax 4 \, Ymin -4; #X msg 167 215 setL sun 0; #X msg 221 107 mass fix 0 100 0 0; #X text 409 270 0.2 : rigidity \, 0 : damping \, -2 : power \, 0.4 : Lmin; #X text 363 109 Sun; #X text 288 181 Initial speed; #N canvas 309 104 769 663 masses 0; #X obj 151 16 inlet; #X obj 232 28 inlet; #X obj 151 616 outlet; #X msg 151 551 mass mob 1 \$1 \$2 \$3; #X msg 151 307 seed 3; #X obj 151 519 pack f f f; #X obj 151 228 t b b b; #X msg 243 306 seed 20; #X msg 331 308 seed 10; #X obj 151 327 random 10000; #X obj 243 371 - 1; #X obj 331 370 - 1; #X obj 151 47 t b; #X obj 333 52 loadbang; #X text 263 277 X; #X text 166 276 M; #X text 372 278 Y; #X obj 151 67 until; #X obj 151 86 f; #X obj 177 87 + 1; #X obj 177 118 mod 1000; #X obj 206 87 sel 0; #X obj 243 327 random 1000; #X obj 331 328 random 1000; #X obj 243 348 / 50000; #X obj 331 349 / 50000; #X obj 151 349 / 250; #X obj 151 371 + 185; #X connect 0 0 12 0; #X connect 1 0 20 1; #X connect 3 0 2 0; #X connect 4 0 9 0; #X connect 5 0 3 0; #X connect 6 0 9 0; #X connect 6 1 22 0; #X connect 6 2 23 0; #X connect 7 0 22 0; #X connect 8 0 23 0; #X connect 9 0 26 0; #X connect 10 0 5 1; #X connect 11 0 5 2; #X connect 12 0 17 0; #X connect 13 0 7 0; #X connect 13 0 8 0; #X connect 13 0 4 0; #X connect 17 0 18 0; #X connect 18 0 19 0; #X connect 18 0 6 0; #X connect 19 0 20 0; #X connect 20 0 21 0; #X connect 20 0 18 1; #X connect 21 0 17 1; #X connect 22 0 24 0; #X connect 23 0 25 0; #X connect 24 0 10 0; #X connect 25 0 11 0; #X connect 26 0 27 0; #X connect 27 0 5 0; #X restore 203 144 pd masses; #X text 410 289 The power of the link is -2 to simulate a gravity field in 1/R^2; #X text 292 146 Particules; #X msg 185 268 link sun fix mob 0.2 0 -2 0.4; #X msg 167 178 forceX mob 5.9; #X obj 453 353 cnv 15 300 300 empty empty GEM_STUFF 20 12 1 14 -241291 -66577 0; #X msg 460 409 0 \, destroy; #X obj 460 525 gemhead; #X obj 460 578 world_light; #X obj 460 488 gemwin; #X msg 460 433 view 0 0 4 0 0 0 0 1 0; #X msg 460 386 reset \, dimen 800 800 \, create \, lighting 1 \, 1 ; #X obj 460 552 rotateXYZ 30 20 0; #X obj 38 359 cnv 15 350 250 empty empty COMPUTING 20 12 1 14 -260818 -66577 0; #X obj 52 542 msd2D --------------------------------; #X obj 52 424 t b; #X obj 52 401 gemhead; #X msg 197 483 forceX mob 0.051; #X msg 197 509 forceY mob 0.1; #X msg 52 458 bang \, bang \, get massesPos; #X obj 37 639 cnv 15 300 100 empty empty DISPLAYING 20 12 1 14 -241291 -66577 0; #N canvas 637 205 605 590 massrender 0; #X obj 124 5 inlet; #X obj 291 245 translateXYZ; #X obj 307 156 gemhead; #X obj 291 219 separator; #X obj 291 195 any; #X obj 292 63 unpack f f f; #X obj 57 257 translateXYZ; #X obj 73 168 gemhead; #X obj 57 231 separator; #X obj 57 207 any; #X obj 123 31 route 0 1; #X obj 296 118 t b; #X obj 64 71 unpack f f; #X obj 50 116 t b f; #X obj 168 262 translateXYZ; #X obj 184 173 gemhead; #X obj 168 236 separator; #X obj 168 212 any; #X obj 175 76 unpack f f; #X obj 161 121 t b f; #X obj 169 290 color 1 0 0; #X obj 292 319 square 0.015; #X obj 168 320 square 0.04; #X text 61 351 Sun; #X text 169 355 Red particule; #X text 307 355 Particule; #X obj 56 315 sphere 0.3 30; #X obj 57 289 color 0.3 0.3 0.3; #X obj 292 291 color 0.3 0.3 0.3; #X connect 0 0 10 0; #X connect 1 0 28 0; #X connect 2 0 4 1; #X connect 3 0 1 0; #X connect 4 0 3 0; #X connect 5 0 11 0; #X connect 5 1 1 1; #X connect 5 2 1 2; #X connect 6 0 27 0; #X connect 7 0 9 1; #X connect 8 0 6 0; #X connect 9 0 8 0; #X connect 10 0 12 0; #X connect 10 1 18 0; #X connect 10 2 5 0; #X connect 11 0 4 0; #X connect 12 0 13 0; #X connect 12 1 6 2; #X connect 13 0 9 0; #X connect 13 1 6 1; #X connect 14 0 20 0; #X connect 15 0 17 1; #X connect 16 0 14 0; #X connect 17 0 16 0; #X connect 18 0 19 0; #X connect 18 1 14 2; #X connect 19 0 17 0; #X connect 19 1 14 1; #X connect 20 0 22 0; #X connect 27 0 26 0; #X connect 28 0 21 0; #X restore 52 709 pd massrender; #X obj 52 672 route massesPos; #X connect 1 0 30 0; #X connect 2 0 6 0; #X connect 3 0 1 0; #X connect 4 0 6 0; #X connect 6 0 11 0; #X connect 6 0 20 0; #X connect 6 1 10 0; #X connect 6 1 19 0; #X connect 6 2 16 0; #X connect 6 3 12 0; #X connect 6 4 3 0; #X connect 9 0 16 1; #X connect 10 0 1 0; #X connect 11 0 1 0; #X connect 12 0 1 0; #X connect 16 0 1 0; #X connect 19 0 1 0; #X connect 20 0 1 0; #X connect 22 0 25 0; #X connect 23 0 28 0; #X connect 26 0 25 0; #X connect 27 0 25 0; #X connect 28 0 24 0; #X connect 30 0 38 0; #X connect 31 0 35 0; #X connect 32 0 31 0; #X connect 33 0 30 0; #X connect 34 0 30 0; #X connect 35 0 30 0; #X connect 38 0 37 0;