/usr/lib/pd/extra/pmpd/examples/15_constant_force_field.pd is in pd-pmpd 0.9-5.
This file is owned by root:root, with mode 0o644.
The actual contents of the file can be viewed below.
1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22 23 24 25 26 27 28 29 30 31 32 33 34 35 36 37 38 39 40 41 42 43 44 45 46 47 48 49 50 51 52 53 54 55 56 57 58 59 60 61 62 63 64 65 66 67 68 69 70 71 72 73 74 75 76 77 78 79 80 81 82 83 84 85 86 87 88 89 90 91 92 93 94 95 96 97 98 99 100 101 102 103 104 105 106 107 108 109 110 111 112 113 114 115 116 117 118 119 120 121 122 123 124 125 126 127 128 129 130 131 132 133 134 135 136 137 138 139 140 141 142 143 144 145 146 147 148 149 150 151 152 153 154 155 156 157 158 159 160 161 162 163 164 165 166 167 168 169 170 171 172 173 174 175 176 177 178 179 180 181 182 183 184 185 186 187 188 189 190 191 192 193 194 195 196 197 198 199 200 201 202 203 204 205 206 207 208 209 210 211 212 213 214 215 216 217 218 219 220 221 222 223 224 225 226 227 228 229 230 231 232 233 234 235 236 237 238 239 240 241 242 243 244 245 246 247 248 249 250 251 252 253 254 255 256 257 258 259 260 261 262 263 264 265 266 267 268 269 270 271 272 273 274 275 276 277 278 279 280 281 282 283 | #N canvas 40 72 795 432 12;
#X obj 16 104 t b b;
#X obj 16 56 tgl 15 0 empty empty empty 0 -6 0 8 -262144 -1 -1 1 1
;
#X obj 94 57 bng 15 250 50 0 empty empty empty 0 -6 0 8 -262144 -1
-1;
#X msg 258 79 0 \, destroy;
#X msg 224 54 reset \, create \, 1;
#N canvas 510 193 970 698 structure 0;
#X obj 124 314 pd_link \$0;
#X obj 27 290 pd_mass -1 0 \$0;
#X obj 49 445 pd_link \$0;
#X obj 123 558 pd_mass -0.7 -0.7 \$0;
#X obj 198 502 pd_link \$0;
#X obj 124 43 pd_mass -0.7 0.7 \$0;
#X obj 189 113 pd_link \$0;
#X obj 69 161 pd_link \$0;
#X obj 201 187 pd_link \$0;
#X obj 213 373 pd_link \$0;
#X obj 279 598 pd_link \$0;
#X obj 399 624 pd_mass 0 -1 \$0;
#X obj 410 562 pd_link \$0;
#X obj 580 585 pd_link \$0;
#X obj 310 327 pd_link \$0;
#X obj 388 330 pd_link \$0;
#X obj 468 330 pd_link \$0;
#X obj 338 427 pd_link \$0;
#X obj 509 422 pd_link \$0;
#X obj 304 26 pd_link \$0;
#X obj 436 16 pd_mass 0 1 \$0;
#X obj 441 57 pd_link \$0;
#X obj 347 129 pd_link \$0;
#X obj 308 231 pd_link \$0;
#X obj 304 280 pd_link \$0;
#X obj 393 227 pd_link \$0;
#X obj 475 227 pd_link \$0;
#X obj 529 278 pd_link \$0;
#X obj 604 358 pd_link \$0;
#X obj 678 291 pd_link \$0;
#X obj 604 221 pd_link \$0;
#X obj 499 135 pd_link \$0;
#X obj 571 43 pd_link \$0;
#X obj 612 101 pd_link \$0;
#X obj 749 179 pd_link \$0;
#X obj 680 64 pd_mass 0.7 0.7 \$0;
#X obj 766 285 pd_mass 1 0 \$0;
#X obj 763 429 pd_link \$0;
#X obj 671 510 pd_link \$0;
#X obj 748 552 pd_mass 0.7 -0.7 \$0;
#X obj 407 274 pd_mass 0 0 \$0;
#X connect 0 0 5 0;
#X connect 0 1 3 0;
#X connect 1 0 2 0;
#X connect 1 0 4 0;
#X connect 1 0 6 0;
#X connect 1 0 7 0;
#X connect 1 0 17 0;
#X connect 1 0 22 0;
#X connect 1 0 24 0;
#X connect 2 0 1 0;
#X connect 2 1 3 0;
#X connect 3 0 0 1;
#X connect 3 0 2 1;
#X connect 3 0 8 1;
#X connect 3 0 10 0;
#X connect 3 0 12 0;
#X connect 3 0 14 0;
#X connect 3 0 18 0;
#X connect 4 0 1 0;
#X connect 4 1 11 0;
#X connect 5 0 0 0;
#X connect 5 0 7 1;
#X connect 5 0 9 0;
#X connect 5 0 19 0;
#X connect 5 0 21 0;
#X connect 5 0 23 0;
#X connect 5 0 31 0;
#X connect 6 0 1 0;
#X connect 6 1 20 0;
#X connect 7 0 1 0;
#X connect 7 1 5 0;
#X connect 8 0 20 0;
#X connect 8 1 3 0;
#X connect 9 0 5 0;
#X connect 9 1 11 0;
#X connect 10 0 3 0;
#X connect 10 1 11 0;
#X connect 11 0 4 1;
#X connect 11 0 9 1;
#X connect 11 0 10 1;
#X connect 11 0 13 0;
#X connect 11 0 15 1;
#X connect 11 0 28 0;
#X connect 11 0 38 0;
#X connect 12 0 3 0;
#X connect 12 1 39 0;
#X connect 13 0 11 0;
#X connect 13 1 39 0;
#X connect 14 0 3 0;
#X connect 14 1 40 0;
#X connect 15 0 40 0;
#X connect 15 1 11 0;
#X connect 16 0 40 0;
#X connect 16 1 39 0;
#X connect 17 0 1 0;
#X connect 17 1 39 0;
#X connect 18 0 3 0;
#X connect 18 1 36 0;
#X connect 19 0 5 0;
#X connect 19 1 20 0;
#X connect 20 0 6 1;
#X connect 20 0 8 0;
#X connect 20 0 19 1;
#X connect 20 0 25 1;
#X connect 20 0 30 0;
#X connect 20 0 32 0;
#X connect 20 0 33 0;
#X connect 21 0 5 0;
#X connect 21 1 35 0;
#X connect 22 0 1 0;
#X connect 22 1 35 0;
#X connect 23 0 5 0;
#X connect 23 1 40 0;
#X connect 24 0 1 0;
#X connect 24 1 40 0;
#X connect 25 0 40 0;
#X connect 25 1 20 0;
#X connect 26 0 40 0;
#X connect 26 1 35 0;
#X connect 27 0 40 0;
#X connect 27 1 36 0;
#X connect 28 0 11 0;
#X connect 28 1 35 0;
#X connect 29 0 39 0;
#X connect 29 1 35 0;
#X connect 30 0 20 0;
#X connect 30 1 39 0;
#X connect 31 0 5 0;
#X connect 31 1 36 0;
#X connect 32 0 20 0;
#X connect 32 1 35 0;
#X connect 33 0 20 0;
#X connect 33 1 36 0;
#X connect 34 0 35 0;
#X connect 34 1 36 0;
#X connect 35 0 21 1;
#X connect 35 0 22 1;
#X connect 35 0 26 1;
#X connect 35 0 28 1;
#X connect 35 0 29 1;
#X connect 35 0 32 1;
#X connect 35 0 34 0;
#X connect 36 0 18 1;
#X connect 36 0 27 1;
#X connect 36 0 31 1;
#X connect 36 0 33 1;
#X connect 36 0 34 1;
#X connect 36 0 37 0;
#X connect 36 0 38 1;
#X connect 37 0 36 0;
#X connect 37 1 39 0;
#X connect 38 0 11 0;
#X connect 38 1 36 0;
#X connect 39 0 12 1;
#X connect 39 0 13 1;
#X connect 39 0 16 1;
#X connect 39 0 17 1;
#X connect 39 0 29 0;
#X connect 39 0 30 1;
#X connect 39 0 37 1;
#X connect 40 0 14 1;
#X connect 40 0 15 0;
#X connect 40 0 16 0;
#X connect 40 0 23 1;
#X connect 40 0 24 1;
#X connect 40 0 25 0;
#X connect 40 0 26 0;
#X connect 40 0 27 0;
#X restore 372 150 pd structure;
#X msg 590 101 force2D 0 5;
#X msg 646 127 force2D 5 0;
#N canvas 623 135 504 293 init 0;
#X msg 200 169 setK \$1;
#X msg 274 143 setD \$1;
#X msg 416 115 setM \$1;
#X floatatom 200 94 5 -10 200 0 - - -;
#X floatatom 274 92 5 0 0 0 - - -;
#X floatatom 416 92 5 0 0 0 - - -;
#X obj 200 143 / 10;
#X obj 200 117 + 1;
#X obj 274 116 / 10;
#X msg 200 67 100;
#X msg 274 68 25;
#X msg 416 66 50;
#X floatatom 341 92 5 0 0 0 - - -;
#X obj 341 116 / 10;
#X msg 341 143 setD2 \$1;
#X msg 341 68 1;
#X obj 200 201 s \$0-link;
#X obj 416 143 s \$0-mass;
#X obj 42 50 loadbang;
#X obj 44 202 s \$0-mass;
#X msg 44 84 setXmin -3.8;
#X msg 57 109 setXmax 3.8;
#X msg 75 133 setYmin -3.8;
#X msg 88 159 setYmax 3.8;
#X connect 0 0 16 0;
#X connect 1 0 16 0;
#X connect 2 0 17 0;
#X connect 3 0 7 0;
#X connect 4 0 8 0;
#X connect 5 0 2 0;
#X connect 6 0 0 0;
#X connect 7 0 6 0;
#X connect 8 0 1 0;
#X connect 9 0 3 0;
#X connect 10 0 4 0;
#X connect 11 0 5 0;
#X connect 12 0 13 0;
#X connect 13 0 14 0;
#X connect 14 0 16 0;
#X connect 15 0 12 0;
#X connect 18 0 20 0;
#X connect 18 0 21 0;
#X connect 18 0 22 0;
#X connect 18 0 23 0;
#X connect 20 0 19 0;
#X connect 21 0 19 0;
#X connect 22 0 19 0;
#X connect 23 0 19 0;
#X restore 372 123 pd init;
#X obj 117 52 loadbang;
#X msg 592 155 force2D 0 -5;
#X msg 535 128 force2D -5 0;
#X obj 51 181 s \$0-link;
#X obj 16 209 s \$0-mass;
#X obj 591 187 s \$0-mass;
#X msg 145 108 reset;
#X msg 119 132 resetL;
#X msg 94 153 resetF;
#X obj 94 81 t b b b;
#X obj 223 176 color 1 0 0;
#X obj 223 231 rectangle 2 1;
#X obj 223 146 gemhead 40;
#X obj 223 205 translateXYZ -2 -3 0;
#X text 437 310 <- positive Y force : just in the red square;
#X text 239 284 <- negative Y force (gravity) everywhere.;
#X text 92 361 the red square is a place with force from bottom to
top. like a ball in wather.;
#X obj 16 77 metro 50;
#X obj 224 107 gemwin;
#X obj 26 285 iAmbient2D \$0-mass 0 -1;
#X obj 24 309 iAmbient2D \$0-mass 0 3 0 0 0 -4 0 -4 -2;
#X text 285 -27 This is the same ball as prevuis exemple \, but in
a differents context.;
#X obj 646 72 loadbang;
#X text 40 54 <- 1;
#X text 359 55 <- 2;
#X text 579 212 move the structure;
#X connect 0 0 13 0;
#X connect 0 1 12 0;
#X connect 0 1 28 0;
#X connect 0 1 29 0;
#X connect 1 0 26 0;
#X connect 2 0 18 0;
#X connect 3 0 27 0;
#X connect 4 0 27 0;
#X connect 6 0 14 0;
#X connect 7 0 14 0;
#X connect 9 0 18 0;
#X connect 10 0 14 0;
#X connect 11 0 14 0;
#X connect 15 0 13 0;
#X connect 16 0 12 0;
#X connect 17 0 12 0;
#X connect 18 0 17 0;
#X connect 18 1 16 0;
#X connect 18 2 15 0;
#X connect 19 0 22 0;
#X connect 21 0 19 0;
#X connect 22 0 20 0;
#X connect 26 0 0 0;
#X connect 31 0 7 0;
|