From 02a5595973b61d2cf789b9074167ed73b928d157 Mon Sep 17 00:00:00 2001 From: Guenter Geiger Date: Wed, 13 Nov 2002 08:38:02 +0000 Subject: This commit was generated by cvs2svn to compensate for changes in r206, which included commits to RCS files with non-trunk default branches. svn path=/trunk/; revision=207 --- xgui/physics/atom.pd | 21 +++++ xgui/physics/damping.pd | 59 ++++++++++++++ xgui/physics/force.pd | 29 +++++++ xgui/physics/lia_2d.pd | 206 ++++++++++++++++++++++++++++++++++++++++++++++++ xgui/physics/mass.pd | 118 +++++++++++++++++++++++++++ xgui/physics/spring.pd | 155 ++++++++++++++++++++++++++++++++++++ xgui/physics/vector.pd | 162 +++++++++++++++++++++++++++++++++++++ 7 files changed, 750 insertions(+) create mode 100644 xgui/physics/atom.pd create mode 100644 xgui/physics/damping.pd create mode 100644 xgui/physics/force.pd create mode 100644 xgui/physics/lia_2d.pd create mode 100644 xgui/physics/mass.pd create mode 100644 xgui/physics/spring.pd create mode 100644 xgui/physics/vector.pd (limited to 'xgui/physics') diff --git a/xgui/physics/atom.pd b/xgui/physics/atom.pd new file mode 100644 index 00000000..2defe2ff --- /dev/null +++ b/xgui/physics/atom.pd @@ -0,0 +1,21 @@ +#N canvas 579 401 301 287 10; +#X obj 22 35 inlet; +#X text 199 245 dh20020401; +#X text 22 10 atom name x y; +#X obj 21 85 concat !xy; +#X obj 75 109 concat ?xy; +#X obj 129 133 concat add; +#X obj 18 212 convert xy= coord=; +#X obj 18 183 vector \$1-pos \$2 \$3; +#X obj 18 239 outlet; +#X obj 21 62 route !coord ?coord move drag; +#X connect 0 0 9 0; +#X connect 3 0 7 0; +#X connect 4 0 7 0; +#X connect 5 0 7 0; +#X connect 6 0 8 0; +#X connect 7 0 6 0; +#X connect 9 0 3 0; +#X connect 9 1 4 0; +#X connect 9 2 5 0; +#X connect 9 3 5 0; diff --git a/xgui/physics/damping.pd b/xgui/physics/damping.pd new file mode 100644 index 00000000..1e8a0973 --- /dev/null +++ b/xgui/physics/damping.pd @@ -0,0 +1,59 @@ +#N canvas 605 407 505 422 10; +#X obj 26 45 inlet; +#X text 237 8 force = -c.v; +#X obj 93 45 valueinit \$1_c \$2; +#X text 23 8 damping name c; +#X obj 62 120 value \$1_c; +#X msg 62 95 bang; +#X obj 243 78 inlet; +#X obj 248 261 value \$1_c; +#X obj 248 310 *; +#X msg 243 128 ?abs; +#X obj 266 284 * -1; +#X obj 248 360 force \$1_s; +#X obj 337 389 outlet; +#X obj 248 211 r b_spring; +#X text 405 368 dh20020404; +#X obj 64 222 outlet; +#X msg 248 335 !abs \$1; +#X obj 122 150 force \$1_s; +#X obj 26 70 route !c ?c ?force; +#X msg 120 95 ?force; +#X obj 264 184 route abs=; +#X msg 284 128 !xy \$3 \$4; +#X obj 264 159 vector \$1_calcul; +#X obj 243 103 t b a a; +#X obj 332 286 vector \$1_speed; +#X msg 362 132 !xy \$3 \$4; +#X obj 385 159 vector \$1_speed; +#X obj 248 236 t b b; +#X msg 332 264 ?xy; +#X msg 332 311 !force \$1 \$2; +#X connect 0 0 18 0; +#X connect 4 0 15 0; +#X connect 5 0 4 0; +#X connect 6 0 23 0; +#X connect 7 0 8 0; +#X connect 8 0 16 0; +#X connect 9 0 22 0; +#X connect 10 0 8 1; +#X connect 11 1 12 0; +#X connect 13 0 27 0; +#X connect 16 0 11 0; +#X connect 17 0 15 0; +#X connect 18 0 4 0; +#X connect 18 1 5 0; +#X connect 18 2 19 0; +#X connect 19 0 17 0; +#X connect 20 0 10 0; +#X connect 21 0 22 0; +#X connect 22 0 20 0; +#X connect 23 0 9 0; +#X connect 23 1 21 0; +#X connect 23 2 25 0; +#X connect 24 0 29 0; +#X connect 25 0 26 0; +#X connect 27 0 7 0; +#X connect 27 1 28 0; +#X connect 28 0 24 0; +#X connect 29 0 11 0; diff --git a/xgui/physics/force.pd b/xgui/physics/force.pd new file mode 100644 index 00000000..7371eb9c --- /dev/null +++ b/xgui/physics/force.pd @@ -0,0 +1,29 @@ +#N canvas 534 341 718 332 12; +#X obj 25 78 inlet; +#X obj 25 254 outlet; +#X text 580 265 dh20020401; +#X obj 388 143 r b_force; +#X text 17 8 force name x y; +#X obj 25 200 vector \$1_force \$2 \$3; +#X msg 388 170 ?xy; +#X obj 388 199 vector \$1_force \$2 \$3; +#X obj 388 254 outlet; +#X obj 388 226 convert xy= force; +#X obj 25 104 route !force ?force !abs; +#X obj 25 227 convert xy= force=; +#X msg 25 133 !xy \$1 \$2; +#X msg 119 132 ?xy; +#X msg 166 131 !abs \$1; +#X connect 0 0 10 0; +#X connect 3 0 6 0; +#X connect 5 0 11 0; +#X connect 6 0 7 0; +#X connect 7 0 9 0; +#X connect 9 0 8 0; +#X connect 10 0 12 0; +#X connect 10 1 13 0; +#X connect 10 2 14 0; +#X connect 11 0 1 0; +#X connect 12 0 5 0; +#X connect 13 0 5 0; +#X connect 14 0 5 0; diff --git a/xgui/physics/lia_2d.pd b/xgui/physics/lia_2d.pd new file mode 100644 index 00000000..8b21948a --- /dev/null +++ b/xgui/physics/lia_2d.pd @@ -0,0 +1,206 @@ +#N canvas 100 156 652 628 10; +#X obj 217 36 inlet; +#X obj 443 33 inlet; +#X obj 402 32 inlet; +#X obj 259 35 inlet; +#X text 225 -17 X1; +#X text 285 -39 masse 1; +#X text 449 -43 masse 2; +#X text 412 -19 X2; +#X obj 173 552 outlet; +#X obj 384 553 outlet; +#X floatatom 616 65 0 0 0; +#X text 552 -62 longeur du resort; +#X obj -19 -9 loadbang; +#X text 276 -99 modele de liaison; +#X floatatom 218 82 0 0 0; +#X floatatom 388 61 0 0 0; +#X obj 324 186 -; +#X obj 286 184 -; +#X floatatom 66 61 0 0 0; +#X floatatom 131 60 0 0 0; +#X text 74 -43 K; +#X text 135 -41 C; +#X obj 322 353 *; +#X obj 337 328 -; +#X obj 460 422 *; +#X obj 343 464 +; +#X floatatom 259 62 0 0 0; +#X floatatom 446 62 0 0 0; +#X obj 291 499 * -1; +#X obj 67 36 inlet; +#X obj 132 35 inlet; +#X obj 36 109 float; +#X obj 101 110 float; +#X obj 187 107 float; +#X obj 229 107 float; +#X obj 372 107 float; +#X obj 413 106 float; +#X text 53 -61 raideur; +#X text 110 -60 viscosite; +#X obj 66 -12 r lk; +#X obj 132 -12 r lc; +#X obj 67 13 \$1; +#X obj 133 12 \$2; +#X obj 216 9 \$3; +#X obj 307 9 \$5; +#X obj 616 38 inlet; +#X obj 599 107 f; +#X text 596 -32 L0; +#X text 579 -49 a vide; +#X obj 306 35 inlet; +#X obj 348 35 inlet; +#X floatatom 306 83 0 0 0; +#X floatatom 348 62 0 0 0; +#X obj 276 107 float; +#X obj 318 107 float; +#X obj 529 32 inlet; +#X obj 488 31 inlet; +#X floatatom 486 61 0 0 0; +#X floatatom 526 63 0 0 0; +#X obj 458 106 float; +#X obj 499 105 float; +#X text 272 -17 Vx1; +#X text 314 -17 Y1; +#X text 361 -17 Vy1; +#X text 453 -20 Vx2; +#X text 498 -20 Y2; +#X text 539 -21 Vy2; +#X obj 260 9 \$4; +#X obj 349 8 \$6; +#X obj 403 6 \$7; +#X obj 445 6 \$8; +#X obj 488 5 \$9; +#X obj 528 6 \$10; +#X obj 612 14 \$11; +#X obj 417 185 -; +#X obj 377 185 -; +#X text 288 202 Dx; +#X text 323 205 DVx; +#X text 380 206 Dy; +#X text 416 204 DVy; +#X obj 287 230 *; +#X obj 377 230 *; +#X obj 320 258 +; +#X text 360 285 l; +#X text 352 353 FK; +#X obj 325 392 *; +#X obj 371 392 *; +#X obj 325 421 /; +#X obj 373 422 /; +#X obj 421 420 *; +#X obj 408 469 +; +#X text 321 439 FKx; +#X text 371 441 FKy; +#X text 416 442 FCx; +#X text 465 439 FCy; +#X text 190 573 F1x; +#X text 400 571 F2x; +#X obj 281 551 outlet; +#X obj 466 552 outlet; +#X obj 373 499 * -1; +#X text 286 570 F1y; +#X text 478 572 F2y; +#X obj -154 89 t b b b b b b b b b b b b; +#X obj 322 284 sqrt; +#X text 565 558 ch20020120; +#X obj -155 60 r b_spring; +#X connect 0 0 14 0; +#X connect 1 0 36 0; +#X connect 2 0 35 0; +#X connect 3 0 26 0; +#X connect 10 0 46 1; +#X connect 12 0 41 0; +#X connect 12 0 42 0; +#X connect 12 0 43 0; +#X connect 12 0 67 0; +#X connect 12 0 44 0; +#X connect 12 0 68 0; +#X connect 12 0 69 0; +#X connect 12 0 70 0; +#X connect 12 0 71 0; +#X connect 12 0 72 0; +#X connect 12 0 73 0; +#X connect 14 0 33 1; +#X connect 15 0 35 1; +#X connect 16 0 89 1; +#X connect 17 0 80 1; +#X connect 17 0 80 0; +#X connect 17 0 85 1; +#X connect 18 0 31 1; +#X connect 19 0 32 1; +#X connect 22 0 85 0; +#X connect 22 0 86 0; +#X connect 23 0 22 1; +#X connect 24 0 90 1; +#X connect 25 0 28 0; +#X connect 25 0 9 0; +#X connect 26 0 34 1; +#X connect 27 0 36 1; +#X connect 28 0 8 0; +#X connect 29 0 18 0; +#X connect 30 0 19 0; +#X connect 31 0 22 0; +#X connect 32 0 89 0; +#X connect 32 0 24 0; +#X connect 33 0 17 0; +#X connect 34 0 16 0; +#X connect 35 0 17 1; +#X connect 36 0 16 1; +#X connect 39 0 18 0; +#X connect 40 0 19 0; +#X connect 41 0 18 0; +#X connect 42 0 19 0; +#X connect 43 0 14 0; +#X connect 44 0 51 0; +#X connect 45 0 10 0; +#X connect 46 0 23 1; +#X connect 49 0 51 0; +#X connect 50 0 52 0; +#X connect 51 0 53 1; +#X connect 52 0 54 1; +#X connect 53 0 75 0; +#X connect 54 0 74 0; +#X connect 55 0 60 0; +#X connect 56 0 59 0; +#X connect 57 0 59 1; +#X connect 58 0 60 1; +#X connect 59 0 75 1; +#X connect 60 0 74 1; +#X connect 67 0 26 0; +#X connect 68 0 52 0; +#X connect 69 0 15 0; +#X connect 70 0 27 0; +#X connect 71 0 57 0; +#X connect 72 0 58 0; +#X connect 73 0 10 0; +#X connect 74 0 24 1; +#X connect 75 0 81 1; +#X connect 75 0 81 0; +#X connect 75 0 86 1; +#X connect 80 0 82 0; +#X connect 81 0 82 1; +#X connect 82 0 103 0; +#X connect 85 0 87 0; +#X connect 86 0 88 0; +#X connect 87 0 25 0; +#X connect 88 0 90 0; +#X connect 89 0 25 1; +#X connect 90 0 99 0; +#X connect 90 0 98 0; +#X connect 99 0 97 0; +#X connect 102 1 31 0; +#X connect 102 2 32 0; +#X connect 102 3 33 0; +#X connect 102 4 35 0; +#X connect 102 5 34 0; +#X connect 102 6 36 0; +#X connect 102 7 53 0; +#X connect 102 8 59 0; +#X connect 102 9 54 0; +#X connect 102 10 60 0; +#X connect 102 11 46 0; +#X connect 103 0 88 1; +#X connect 103 0 23 0; +#X connect 103 0 87 1; +#X connect 105 0 102 0; diff --git a/xgui/physics/mass.pd b/xgui/physics/mass.pd new file mode 100644 index 00000000..bed61e42 --- /dev/null +++ b/xgui/physics/mass.pd @@ -0,0 +1,118 @@ +#N canvas 336 189 834 719 10; +#X obj 24 35 inlet; +#X obj 30 631 outlet; +#X text 591 652 dh20020401; +#X obj 77 86 bang; +#X msg 24 142 mass= \$1; +#X obj 466 162 r b_mass; +#X obj 561 22 valueinit \$1_m \$2; +#X obj 24 119 value \$1_m; +#X obj 126 119 concat !xy; +#X text 23 10 mass name m x y speed_x speed_y; +#X obj 291 276 concat add; +#X obj 371 275 value \$1_m; +#X msg 371 299 divide \$1 \$1; +#X msg 590 273 ?xy; +#X obj 222 276 r b_init; +#X msg 222 301 !xy 0 0; +#X obj 125 171 convert xy= speed=; +#X msg 143 87 ?xy; +#X obj 290 395 vector \$1_speed \$3 \$4; +#X obj 293 363 convert xy= add; +#X msg 620 274 ?xy; +#X obj 291 336 vector \$1_calcul1; +#X obj 288 423 unpack s f f; +#X obj 326 451 * 0.01; +#X obj 386 453 * 0.01; +#X obj 303 493 pack s f f; +#X msg 470 273 mult 0.01 0.01; +#X obj 304 517 route list; +#X msg 289 451 move; +#X obj 295 119 atom \$1_pos \$3 \$4; +#X obj 304 550 atom \$1_pos \$3 \$4; +#X msg 723 273 ?coord; +#X obj 124 145 vector \$1_speed \$5 \$6; +#X obj 337 669 outlet; +#X obj 297 158 inlet; +#X obj 297 184 route force; +#X msg 256 87 1; +#X msg 289 87 0; +#X obj 466 188 spigot; +#X obj 24 62 route !mass ?mass !speed ?speed speed on off; +#X msg 187 88 !abs \$1; +#X obj 668 301 vector \$1_speed \$5 \$6; +#X obj 466 212 t b b b b b b; +#X obj 387 597 unpack f f; +#X obj 304 597 unpack f f; +#X obj 304 574 route coord=; +#X msg 340 647 mass \$1 \$2 \$3 \$4; +#X text 507 596 mass x y speed_x speed_y; +#X obj 339 622 pack f f f f; +#X msg 668 274 ?xy; +#X obj 668 328 route xy=; +#X obj 461 394 value time_interval; +#X obj 461 371 loadbang; +#X connect 0 0 39 0; +#X connect 3 0 7 0; +#X connect 4 0 1 0; +#X connect 5 0 38 0; +#X connect 7 0 4 0; +#X connect 8 0 32 0; +#X connect 10 0 21 0; +#X connect 11 0 12 0; +#X connect 12 0 21 0; +#X connect 13 0 21 0; +#X connect 14 0 15 0; +#X connect 15 0 21 0; +#X connect 16 0 1 0; +#X connect 17 0 32 0; +#X connect 18 0 22 0; +#X connect 19 0 18 0; +#X connect 20 0 18 0; +#X connect 21 0 19 0; +#X connect 22 0 28 0; +#X connect 22 1 23 0; +#X connect 22 2 24 0; +#X connect 23 0 25 1; +#X connect 24 0 25 2; +#X connect 25 0 27 0; +#X connect 26 0 21 0; +#X connect 27 0 30 0; +#X connect 28 0 25 0; +#X connect 29 0 1 0; +#X connect 30 0 45 0; +#X connect 31 0 30 0; +#X connect 32 0 16 0; +#X connect 34 0 35 0; +#X connect 35 0 10 0; +#X connect 36 0 38 1; +#X connect 37 0 38 1; +#X connect 38 0 42 0; +#X connect 39 0 7 0; +#X connect 39 1 3 0; +#X connect 39 2 8 0; +#X connect 39 3 17 0; +#X connect 39 4 40 0; +#X connect 39 5 36 0; +#X connect 39 6 37 0; +#X connect 39 7 29 0; +#X connect 40 0 32 0; +#X connect 41 0 50 0; +#X connect 42 0 31 0; +#X connect 42 1 49 0; +#X connect 42 2 20 0; +#X connect 42 3 13 0; +#X connect 42 4 26 0; +#X connect 42 5 11 0; +#X connect 43 0 48 2; +#X connect 43 1 48 3; +#X connect 44 0 48 0; +#X connect 44 1 48 1; +#X connect 45 0 44 0; +#X connect 46 0 33 0; +#X connect 48 0 46 0; +#X connect 49 0 41 0; +#X connect 50 0 43 0; +#X connect 51 0 23 1; +#X connect 51 0 24 1; +#X connect 52 0 51 0; diff --git a/xgui/physics/spring.pd b/xgui/physics/spring.pd new file mode 100644 index 00000000..b5f75d28 --- /dev/null +++ b/xgui/physics/spring.pd @@ -0,0 +1,155 @@ +#N canvas 207 165 1045 677 10; +#X obj 13 33 inlet; +#X obj 21 119 concat !xy; +#X obj 40 144 concat ?xy; +#X obj 97 120 concat !xy; +#X obj 118 143 concat ?xy; +#X text 912 34 k : N/m; +#X obj 899 64 inlet; +#X obj 175 319 outlet; +#X obj 16 206 convert xy= xy1=; +#X obj 157 206 convert xy= xy1=; +#X obj 899 87 route mass; +#X obj 338 358 vector \$1_calcul_l; +#X obj 411 270 convert xy= add; +#X obj 353 190 t b b b b; +#X msg 453 222 !xy 0 0; +#X obj 337 405 value \$1_l; +#X obj 198 120 value \$1_l; +#X msg 198 143 l= \$1; +#X msg 375 224 ?xy; +#X msg 413 223 ?xy; +#X msg 337 225 ?abs; +#X obj 338 382 route abs=; +#X obj 292 121 value \$1_k; +#X obj 374 15 valueinit \$1_k \$2; +#X obj 292 144 concat k=; +#X msg 714 565 !abs \$1; +#X text 642 29 k : N/m; +#X obj 653 61 inlet; +#X obj 653 84 route mass; +#X obj 607 600 force \$1_s1; +#X msg 653 571 !abs \$1; +#X obj 701 632 outlet; +#X obj 376 146 force \$1_s1; +#X obj 724 537 * -1; +#X text 10 7 spring name k l x1 y1 x2 y2; +#X obj 374 40 valueinit \$1_l \$3; +#X obj 483 146 force \$1_s2; +#X msg 376 124 ?force; +#X msg 482 125 ?force; +#X obj 13 53 route !xy1 ?xy1 !xy2 ?xy2 !l ?l l !k ?k ?force1 ?force2; +#X msg 653 108 !xy \$1 \$2; +#X msg 899 111 !xy \$1 \$2; +#X obj 653 162 r b_spring; +#X obj 719 598 force \$1_s2; +#X obj 774 284 convert xy= add; +#X msg 816 236 !xy 0 0; +#X msg 738 238 ?xy; +#X msg 776 237 ?xy; +#X msg 665 236 ?abs; +#X obj 701 372 vector \$1_calcul_kl; +#X obj 683 442 value \$1_l; +#X obj 683 466 -; +#X obj 661 514 *; +#X obj 661 484 value \$1_k; +#X obj 651 193 t b b b b b b b; +#X msg 705 237 ?xy; +#X obj 700 394 route abs= xy=; +#X obj 813 625 outlet; +#X text 853 515 dh20020404; +#X obj 16 178 vector \$1_p1 \$4 \$5; +#X obj 157 179 vector \$1_p2 \$6 \$7; +#X obj 410 247 vector \$1_p1 \$4 \$5; +#X obj 376 296 vector \$1_p2 \$6 \$7; +#X obj 773 261 vector \$1_p1 \$4 \$5; +#X obj 739 310 vector \$1_p2 \$6 \$7; +#X obj 653 130 vector \$1_p1 \$4 \$5; +#X obj 899 133 vector \$1_p2 \$6 \$7; +#X msg 292 98 bang; +#X msg 198 96 bang; +#X msg 746 418 !force \$1 \$2; +#X obj 376 318 convert xy= substract; +#X obj 739 332 convert xy= substract; +#X connect 0 0 39 0; +#X connect 1 0 59 0; +#X connect 2 0 59 0; +#X connect 3 0 60 0; +#X connect 4 0 60 0; +#X connect 6 0 10 0; +#X connect 8 0 7 0; +#X connect 9 0 7 0; +#X connect 10 0 41 0; +#X connect 11 0 21 0; +#X connect 12 0 11 0; +#X connect 13 0 20 0; +#X connect 13 1 18 0; +#X connect 13 2 19 0; +#X connect 13 3 14 0; +#X connect 14 0 11 0; +#X connect 16 0 17 0; +#X connect 17 0 7 0; +#X connect 18 0 62 0; +#X connect 19 0 61 0; +#X connect 20 0 11 0; +#X connect 21 0 15 0; +#X connect 22 0 24 0; +#X connect 24 0 7 0; +#X connect 25 0 43 0; +#X connect 27 0 28 0; +#X connect 28 0 40 0; +#X connect 29 1 31 0; +#X connect 30 0 29 0; +#X connect 32 0 7 0; +#X connect 33 0 25 0; +#X connect 36 0 7 0; +#X connect 37 0 32 0; +#X connect 38 0 36 0; +#X connect 39 0 1 0; +#X connect 39 1 2 0; +#X connect 39 2 3 0; +#X connect 39 3 4 0; +#X connect 39 4 16 0; +#X connect 39 5 68 0; +#X connect 39 6 13 0; +#X connect 39 7 22 0; +#X connect 39 8 67 0; +#X connect 39 9 37 0; +#X connect 39 10 38 0; +#X connect 40 0 65 0; +#X connect 41 0 66 0; +#X connect 42 0 54 0; +#X connect 43 1 57 0; +#X connect 44 0 49 0; +#X connect 45 0 49 0; +#X connect 46 0 64 0; +#X connect 47 0 63 0; +#X connect 48 0 49 0; +#X connect 49 0 56 0; +#X connect 50 0 51 0; +#X connect 51 0 52 1; +#X connect 52 0 33 0; +#X connect 52 0 30 0; +#X connect 53 0 52 0; +#X connect 54 0 53 0; +#X connect 54 1 50 0; +#X connect 54 2 48 0; +#X connect 54 3 55 0; +#X connect 54 4 46 0; +#X connect 54 5 47 0; +#X connect 54 6 45 0; +#X connect 55 0 49 0; +#X connect 56 0 51 1; +#X connect 56 1 69 0; +#X connect 59 0 8 0; +#X connect 60 0 9 0; +#X connect 61 0 12 0; +#X connect 62 0 70 0; +#X connect 63 0 44 0; +#X connect 64 0 71 0; +#X connect 67 0 22 0; +#X connect 68 0 16 0; +#X connect 69 0 29 0; +#X connect 69 0 43 0; +#X connect 70 0 11 0; +#X connect 71 0 49 0; diff --git a/xgui/physics/vector.pd b/xgui/physics/vector.pd new file mode 100644 index 00000000..1195cad9 --- /dev/null +++ b/xgui/physics/vector.pd @@ -0,0 +1,162 @@ +#N canvas 46 212 1098 676 12; +#X obj 23 75 inlet; +#X obj 102 619 outlet; +#X obj 24 157 unpack f f; +#X obj 42 247 pack f f; +#X obj 122 157 t b b; +#X msg 42 270 xy= \$1 \$2; +#X text 625 537 dh20020401; +#X text 19 10 vector name x y; +#X obj 24 206 value \$1_x; +#X obj 125 206 value \$1_y; +#X obj 203 244 value \$1_x; +#X obj 299 244 value \$1_y; +#X obj 305 279 +; +#X obj 206 279 +; +#X obj 256 216 unpack f f; +#X obj 203 303 value \$1_x; +#X obj 305 304 value \$1_y; +#X obj 236 185 t a b; +#X obj 285 16 valueinit \$1_x \$2; +#X obj 412 245 value \$1_x; +#X obj 508 245 value \$1_y; +#X obj 465 217 unpack f f; +#X obj 412 304 value \$1_x; +#X obj 514 305 value \$1_y; +#X obj 445 185 t a b; +#X obj 514 280 *; +#X obj 412 279 *; +#X text 635 547 dh20020402; +#X obj 420 401 value \$1_x; +#X obj 516 401 value \$1_y; +#X obj 473 373 unpack f f; +#X obj 420 460 value \$1_x; +#X obj 522 461 value \$1_y; +#X obj 521 436 /; +#X obj 420 435 /; +#X obj 417 337 t b b a; +#X obj 287 45 valueinit \$1_y \$3; +#X obj 629 338 value \$1_x; +#X obj 669 282 value \$1_y; +#X obj 664 315 *; +#X obj 622 373 *; +#X obj 629 258 t b b; +#X obj 639 403 +; +#X obj 639 431 sqrt; +#X obj 208 396 value \$1_x; +#X obj 304 396 value \$1_y; +#X obj 261 368 unpack f f; +#X obj 208 455 value \$1_x; +#X obj 310 455 value \$1_y; +#X obj 205 332 t b b a; +#X obj 309 430 -; +#X obj 208 430 -; +#X obj 756 537 value \$1_x; +#X obj 852 537 value \$1_y; +#X obj 756 596 value \$1_x; +#X obj 852 595 value \$1_y; +#X obj 784 303 value \$1_x; +#X obj 824 247 value \$1_y; +#X obj 819 280 *; +#X obj 777 338 *; +#X obj 784 223 t b b; +#X obj 776 368 +; +#X obj 776 396 sqrt; +#X obj 815 498 /; +#X obj 857 426 t b b; +#X obj 796 183 t b f b; +#X obj 852 569 *; +#X obj 755 571 *; +#X obj 639 459 concat abs=; +#X obj 24 106 route !xy ?xy add substract mult divide ?teta ?abs !teta +!abs rotate; +#X obj 776 425 select 0; +#X msg 785 456 0.7; +#X connect 0 0 69 0; +#X connect 2 0 8 0; +#X connect 2 1 9 0; +#X connect 3 0 5 0; +#X connect 4 0 8 0; +#X connect 4 1 9 0; +#X connect 5 0 1 0; +#X connect 8 0 3 0; +#X connect 9 0 3 1; +#X connect 10 0 13 1; +#X connect 11 0 12 1; +#X connect 12 0 16 0; +#X connect 13 0 15 0; +#X connect 14 0 13 0; +#X connect 14 1 12 0; +#X connect 17 0 14 0; +#X connect 17 1 11 0; +#X connect 17 1 10 0; +#X connect 19 0 26 1; +#X connect 20 0 25 1; +#X connect 21 0 26 0; +#X connect 21 1 25 0; +#X connect 24 0 21 0; +#X connect 24 1 20 0; +#X connect 24 1 19 0; +#X connect 25 0 23 0; +#X connect 26 0 22 0; +#X connect 28 0 34 0; +#X connect 29 0 33 0; +#X connect 30 0 34 1; +#X connect 30 1 33 1; +#X connect 33 0 32 0; +#X connect 34 0 31 0; +#X connect 35 0 28 0; +#X connect 35 1 29 0; +#X connect 35 2 30 0; +#X connect 37 0 40 1; +#X connect 37 0 40 0; +#X connect 38 0 39 1; +#X connect 38 0 39 0; +#X connect 39 0 42 1; +#X connect 40 0 42 0; +#X connect 41 0 37 0; +#X connect 41 1 38 0; +#X connect 42 0 43 0; +#X connect 43 0 68 0; +#X connect 44 0 51 0; +#X connect 45 0 50 0; +#X connect 46 0 51 1; +#X connect 46 1 50 1; +#X connect 49 0 44 0; +#X connect 49 1 45 0; +#X connect 49 2 46 0; +#X connect 50 0 48 0; +#X connect 51 0 47 0; +#X connect 52 0 67 0; +#X connect 53 0 66 0; +#X connect 56 0 59 1; +#X connect 56 0 59 0; +#X connect 57 0 58 1; +#X connect 57 0 58 0; +#X connect 58 0 61 1; +#X connect 59 0 61 0; +#X connect 60 0 56 0; +#X connect 60 1 57 0; +#X connect 61 0 62 0; +#X connect 62 0 70 0; +#X connect 63 0 67 1; +#X connect 63 0 66 1; +#X connect 64 0 52 0; +#X connect 64 1 53 0; +#X connect 65 0 64 0; +#X connect 65 1 63 0; +#X connect 65 2 60 0; +#X connect 66 0 55 0; +#X connect 67 0 54 0; +#X connect 68 0 1 0; +#X connect 69 0 2 0; +#X connect 69 1 4 0; +#X connect 69 2 17 0; +#X connect 69 3 49 0; +#X connect 69 4 24 0; +#X connect 69 5 35 0; +#X connect 69 7 41 0; +#X connect 69 9 65 0; +#X connect 70 0 71 0; +#X connect 70 1 63 1; +#X connect 71 0 63 1; -- cgit v1.2.1