annotate newSword/newSword.pd @ 160:cd1f59cfc390

Development of sword model
author Rod Selfridge <r.selfridge@qmul.ac.uk>
date Wed, 27 Jan 2016 13:53:07 +0000
parents 807981af6f93
children 27ae51f25ff3
rev   line source
r@160 1 #N canvas 71 23 1283 702 10;
r@159 2 #X obj 586 149 freqCalcCyl3No_D2Mach;
r@159 3 #X obj 315 22 loadbang;
r@159 4 #X obj 315 44 tgl 15 0 empty empty empty 17 7 0 10 -262144 -1 -1 1
r@159 5 1;
r@159 6 #X obj 315 63 metro 100;
r@159 7 #X obj 315 85 s myMet;
r@159 8 #X msg -57 28 1;
r@159 9 #X obj -57 51 s bladeLen;
r@159 10 #X obj -259 60 s NoOfSources;
r@159 11 #X obj -221 455 s topSpeed;
r@159 12 #X obj -273 429 hsl 100 20 0 100 0 0 empty empty empty -2 -8 0 10 -262144
r@160 13 -1 -1 0 1;
r@159 14 #X floatatom -276 455 8 0 0 0 - - -;
r@159 15 #X text -24 27 Blade Length;
r@159 16 #X text -25 93 Arm Length;
r@159 17 #X text -231 37 Number of Sources;
r@159 18 #X text -165 433 Top Speed;
r@159 19 #X obj 21 248 hsl 100 20 -180 180 0 0 empty empty empty -2 -8 0 10
r@160 20 -262144 -1 -1 0 1;
r@159 21 #X floatatom 18 280 8 0 0 0 - - -;
r@159 22 #X obj -279 516 hsl 100 20 0 0.03 0 0 empty empty empty -2 -8 0 10
r@160 23 -262144 -1 -1 0 1;
r@159 24 #X obj -280 601 hsl 100 20 0.0001 0.01 0 0 empty empty empty -2 -8
r@160 25 0 10 -262144 -1 -1 0 1;
r@159 26 #X floatatom -282 546 8 0 0 0 - - -;
r@159 27 #X obj -228 545 s hiltThick;
r@159 28 #X floatatom -283 629 8 0 0 0 - - -;
r@159 29 #X obj -225 628 s tipThick;
r@159 30 #X text -165 518 Hilt Thickness;
r@159 31 #X text -173 602 Tip Thickness;
r@159 32 #X obj 143 73 bng 50 250 50 0 empty empty empty 17 7 0 10 -4034 -1
r@159 33 -1;
r@159 34 #X obj 143 126 s GO;
r@159 35 #X obj 143 27 tgl 15 0 empty empty empty 17 7 0 10 -262144 -1 -1 0
r@159 36 1;
r@159 37 #X obj 143 46 metro 200;
r@159 38 #X obj 197 22 hsl 100 20 500 30 0 0 empty empty empty -2 -8 0 10 -262144
r@159 39 -1 -1 0 1;
r@159 40 #X obj 83 73 bng 50 250 50 0 empty empty empty 17 7 0 10 -257985 -1
r@159 41 -1;
r@159 42 #X obj 83 126 s setUp;
r@159 43 #X obj -329 403 r setUp;
r@159 44 #X obj -40 228 r setUp;
r@159 45 #X obj -333 493 r setUp;
r@159 46 #X obj -334 581 r setUp;
r@159 47 #X obj -57 4 loadbang;
r@159 48 #X obj -59 73 loadbang;
r@159 49 #X obj -259 15 loadbang;
r@159 50 #X obj -276 403 r thisTS;
r@159 51 #X obj -282 493 r thisHT;
r@159 52 #X obj -283 581 r thisTT;
r@159 53 #X obj -312 17 r setUp;
r@159 54 #X obj -108 71 r setUp;
r@159 55 #X obj -109 6 r setUp;
r@159 56 #X obj 83 21 loadbang;
r@159 57 #X obj 83 45 delay 13;
r@159 58 #X obj 19 326 hsl 100 20 -180 180 0 0 empty empty empty -2 -8 0 10
r@159 59 -262144 -1 -1 0 1;
r@159 60 #X floatatom 16 358 8 0 0 0 - - -;
r@159 61 #X obj -42 306 r setUp;
r@159 62 #X obj 14 439 hsl 100 20 -90 90 0 0 empty empty empty -2 -8 0 10 -262144
r@160 63 -1 -1 0 1;
r@159 64 #X floatatom 11 471 8 0 0 0 - - -;
r@159 65 #X obj -47 419 r setUp;
r@159 66 #X obj 12 517 hsl 100 20 -90 90 0 0 empty empty empty -2 -8 0 10 -262144
r@160 67 -1 -1 0 1;
r@159 68 #X floatatom 9 549 8 0 0 0 - - -;
r@159 69 #X obj -49 497 r setUp;
r@159 70 #X obj 66 470 s presweepElev;
r@159 71 #X obj 160 492 s postsweepElev;
r@159 72 #X text 125 440 pre-sweep elevation;
r@159 73 #X text 123 517 post-sweep elevation;
r@159 74 #X text 132 249 pre-sweep azimuth;
r@159 75 #X text 130 327 post-sweep azimuth;
r@159 76 #X obj 73 279 s presweepAzim;
r@159 77 #X obj 166 301 s postsweepAzim;
r@159 78 #X obj -59 115 s start_armLength;
r@159 79 #X msg -59 94 0.35;
r@159 80 #X msg -259 37 10;
r@159 81 #X msg 87 225 80;
r@159 82 #X obj -274 139 hsl 100 20 -50 50 0 0 empty empty empty -2 -8 0 10
r@160 83 -262144 -1 -1 0 1;
r@159 84 #X obj -275 233 hsl 100 20 -50 50 0 0 empty empty empty -2 -8 0 10
r@160 85 -262144 -1 -1 0 1;
r@159 86 #X obj -275 324 hsl 100 20 -50 50 0 0 empty empty empty -2 -8 0 10
r@160 87 -262144 -1 -1 0 1;
r@159 88 #X obj -277 162 s Xobs;
r@159 89 #X obj -278 253 s Yobs;
r@159 90 #X obj -278 351 s Zobs;
r@159 91 #X floatatom -317 162 5 0 0 0 - - -;
r@159 92 #X floatatom -317 254 5 0 0 0 - - -;
r@159 93 #X floatatom -318 346 5 0 0 0 - - -;
r@159 94 #X msg -269 115 0;
r@159 95 #X msg -269 298 0;
r@159 96 #X msg -271 209 0.7;
r@159 97 #X obj -322 113 r setUp;
r@159 98 #X obj -327 210 r setUp;
r@159 99 #X obj -331 301 r setUp;
r@159 100 #X msg -219 208 0;
r@159 101 #X msg 136 221 90;
r@159 102 #X msg -227 298 4;
r@159 103 #X msg -230 116 4;
r@159 104 #X msg 79 416 0;
r@159 105 #X msg 89 307 -60;
r@159 106 #X msg 126 416 50;
r@159 107 #X msg 79 494 -30;
r@159 108 #X msg -170 207 1.034;
r@159 109 #X msg -127 207 2.034;
r@159 110 #X msg -81 209 3;
r@159 111 #X msg -208 400 0.5;
r@159 112 #X msg -188 111 0.2;
r@159 113 #X msg -195 297 0.2;
r@159 114 #X obj 166 277 * -1;
r@159 115 #X obj 160 470 * -1;
r@159 116 #X msg -204 491 0.02;
r@159 117 #X msg -210 575 0.008;
r@159 118 #X msg -141 404 35;
r@159 119 #X obj -277 94 r thisXobs;
r@159 120 #X obj -278 186 r thisYobs;
r@159 121 #X obj -278 279 r thisZobs;
r@159 122 #X obj 18 227 r thisPrA;
r@159 123 #X obj 16 305 r thisPoA;
r@159 124 #X obj 11 418 r thisPrE;
r@159 125 #X obj 9 496 r thisPoE;
r@159 126 #X msg 175 222 10;
r@159 127 #X msg 206 221 0;
r@159 128 #X msg 109 492 0;
r@160 129 #X obj 384 23 sweepTime;
r@160 130 #X obj 384 45 centreAngles;
r@160 131 #N canvas 528 427 426 335 thickCalc 0;
r@160 132 #X obj 173 139 r NoOfSources;
r@160 133 #X obj 158 115 -;
r@160 134 #X obj 158 164 /;
r@160 135 #X floatatom 126 147 5 0 0 0 - - -;
r@160 136 #X floatatom 94 189 8 0 0 0 - - -;
r@160 137 #X obj 173 72 t f b;
r@160 138 #X obj 200 95 delay 9;
r@160 139 #X text 58 237 Calculates the difference in thickness between sources
r@160 140 ;
r@160 141 #X text 59 254 based on the blade tapering in a straight line;
r@160 142 #X obj 158 19 r hiltThick;
r@160 143 #X obj 173 44 r tipThick;
r@160 144 #X obj 158 187 s deltaThick;
r@160 145 #X connect 0 0 2 1;
r@160 146 #X connect 1 0 2 0;
r@160 147 #X connect 1 0 3 0;
r@160 148 #X connect 2 0 4 0;
r@160 149 #X connect 2 0 11 0;
r@160 150 #X connect 5 0 1 1;
r@160 151 #X connect 5 1 6 0;
r@160 152 #X connect 6 0 1 0;
r@160 153 #X connect 9 0 1 0;
r@160 154 #X connect 10 0 5 0;
r@160 155 #X restore 384 67 pd thickCalc;
r@160 156 #N canvas 72 23 1360 722 maxCircCalc 0;
r@160 157 #X obj 440 104 +;
r@160 158 #X obj 468 128 s length;
r@160 159 #X obj 153 86 r presweepAzim;
r@160 160 #X obj 644 76 bng 50 250 50 0 empty empty empty 17 7 0 10 -4034 -1
r@160 161 -1;
r@160 162 #X obj 644 129 s GO;
r@160 163 #X obj 584 76 bng 50 250 50 0 empty empty empty 17 7 0 10 -257985 -1
r@160 164 -1;
r@160 165 #X obj 584 129 s setUp;
r@160 166 #X obj 153 132 * 6.28312;
r@160 167 #X obj 153 110 / 360;
r@160 168 #X obj 153 174 *;
r@160 169 #X floatatom 91 198 5 0 0 0 - - -;
r@160 170 #X text 194 175 Circumference of the nearest source on blade;
r@160 171 #X text 307 191 up to 0 azimuth;
r@160 172 #X obj 153 200 s minPreCirc;
r@160 173 #X obj 437 279 * 6.28312;
r@160 174 #X obj 437 257 / 360;
r@160 175 #X obj 437 321 *;
r@160 176 #X floatatom 375 345 5 0 0 0 - - -;
r@160 177 #X text 478 322 Circumference of the nearest source on blade;
r@160 178 #X obj 437 233 r postsweepAzim;
r@160 179 #X obj 437 347 s minPostCirc;
r@160 180 #X obj 149 252 r presweepAzim;
r@160 181 #X obj 149 276 / 360;
r@160 182 #X obj 149 342 *;
r@160 183 #X floatatom 85 364 0 0 0 0 - - -;
r@160 184 #X obj 440 57 r bladeLen;
r@160 185 #X obj 455 81 r start_armLength;
r@160 186 #X obj 437 434 * 6.28312;
r@160 187 #X obj 437 412 / 360;
r@160 188 #X obj 437 478 *;
r@160 189 #X floatatom 399 501 5 0 0 0 - - -;
r@160 190 #X obj 437 388 r postsweepAzim;
r@160 191 #X obj 164 362 r minPreCirc;
r@160 192 #X obj 149 383 -;
r@160 193 #X obj 149 426 /;
r@160 194 #X floatatom 80 454 0 0 0 0 - - -;
r@160 195 #X obj 164 403 r NoOfSources;
r@160 196 #X obj 149 454 s deltaPreCirc;
r@160 197 #X obj 437 519 -;
r@160 198 #X obj 437 562 /;
r@160 199 #X obj 452 539 r NoOfSources;
r@160 200 #X obj 452 498 r minPostCirc;
r@160 201 #X obj 437 590 s deltaPostCirc;
r@160 202 #X floatatom 368 591 0 0 0 0 - - -;
r@160 203 #X text 33 334 Max Circumference;
r@160 204 #X text 323 472 Max Circumference;
r@160 205 #X obj 1076 361 r presweepElev;
r@160 206 #X obj 1091 384 r postsweepElev;
r@160 207 #X obj 1076 419 +;
r@160 208 #X obj 1076 441 * 0.5;
r@160 209 #X obj 1075 488 * 6.28312;
r@160 210 #X obj 1075 466 / 360;
r@160 211 #X obj 1074 514 cos;
r@160 212 #X floatatom 1022 579 0 0 0 0 - - -;
r@160 213 #X floatatom 1126 425 5 0 0 0 - - -;
r@160 214 #X obj 1074 536 *;
r@160 215 #X floatatom 531 128 5 0 0 0 - - -;
r@160 216 #X obj 1101 514 r start_armLength;
r@160 217 #X obj 149 298 * 6.28319;
r@160 218 #X obj 1074 562 s compSrcRadius;
r@160 219 #X obj 452 300 r compSrcRadius;
r@160 220 #X obj 168 153 r compSrcRadius;
r@160 221 #X obj 364 101 r arcConst;
r@160 222 #X obj 425 129 *;
r@160 223 #X floatatom 387 153 5 0 0 0 - - -;
r@160 224 #X obj 994 538 s arcConst;
r@160 225 #X obj 425 153 s compRadius;
r@160 226 #X obj 164 320 r compRadius;
r@160 227 #X obj 452 456 r compRadius;
r@160 228 #X connect 0 0 1 0;
r@160 229 #X connect 0 0 56 0;
r@160 230 #X connect 0 0 63 1;
r@160 231 #X connect 2 0 8 0;
r@160 232 #X connect 3 0 4 0;
r@160 233 #X connect 5 0 6 0;
r@160 234 #X connect 7 0 9 0;
r@160 235 #X connect 8 0 7 0;
r@160 236 #X connect 9 0 10 0;
r@160 237 #X connect 9 0 13 0;
r@160 238 #X connect 14 0 16 0;
r@160 239 #X connect 15 0 14 0;
r@160 240 #X connect 16 0 17 0;
r@160 241 #X connect 16 0 20 0;
r@160 242 #X connect 19 0 15 0;
r@160 243 #X connect 21 0 22 0;
r@160 244 #X connect 22 0 58 0;
r@160 245 #X connect 23 0 24 0;
r@160 246 #X connect 23 0 33 0;
r@160 247 #X connect 25 0 0 0;
r@160 248 #X connect 26 0 0 1;
r@160 249 #X connect 27 0 29 0;
r@160 250 #X connect 28 0 27 0;
r@160 251 #X connect 29 0 30 0;
r@160 252 #X connect 29 0 38 0;
r@160 253 #X connect 31 0 28 0;
r@160 254 #X connect 32 0 33 1;
r@160 255 #X connect 33 0 34 0;
r@160 256 #X connect 34 0 35 0;
r@160 257 #X connect 34 0 37 0;
r@160 258 #X connect 36 0 34 1;
r@160 259 #X connect 38 0 39 0;
r@160 260 #X connect 39 0 42 0;
r@160 261 #X connect 39 0 43 0;
r@160 262 #X connect 40 0 39 1;
r@160 263 #X connect 41 0 38 1;
r@160 264 #X connect 46 0 48 0;
r@160 265 #X connect 47 0 48 1;
r@160 266 #X connect 48 0 49 0;
r@160 267 #X connect 48 0 54 0;
r@160 268 #X connect 49 0 51 0;
r@160 269 #X connect 50 0 52 0;
r@160 270 #X connect 51 0 50 0;
r@160 271 #X connect 52 0 55 0;
r@160 272 #X connect 52 0 65 0;
r@160 273 #X connect 55 0 53 0;
r@160 274 #X connect 55 0 59 0;
r@160 275 #X connect 57 0 55 1;
r@160 276 #X connect 58 0 23 0;
r@160 277 #X connect 60 0 16 1;
r@160 278 #X connect 61 0 9 1;
r@160 279 #X connect 62 0 63 0;
r@160 280 #X connect 63 0 64 0;
r@160 281 #X connect 63 0 66 0;
r@160 282 #X connect 67 0 23 1;
r@160 283 #X connect 68 0 29 1;
r@160 284 #X restore 383 87 pd maxCircCalc;
r@160 285 #X obj 586 63 sourceSpeed;
r@160 286 #X text 836 -13 Wind Speed;
r@160 287 #X text 837 5 Diameter;
r@160 288 #X text 839 25 Length;
r@160 289 #X text 838 48 Distance;
r@160 290 #X text 838 72 Azimuth;
r@160 291 #X text 838 93 Elevation;
r@160 292 #X text 837 114 Pan;
r@160 293 #X text 836 132 X Rot;
r@160 294 #X text 838 154 Y Rot;
r@160 295 #X text 839 174 Z Rot;
r@160 296 #X text 836 193 TurbInt;
r@160 297 #X floatatom 666 365 0 0 0 0 - - -;
r@160 298 #X floatatom 700 365 0 0 0 0 - - -;
r@160 299 #X obj 666 318 route motion;
r@160 300 #X obj 666 340 route x y;
r@160 301 #X obj 666 297 cursor;
r@160 302 #X obj 666 279 tgl 15 0 empty empty empty 17 7 0 10 -262144 -1 -1 1
r@160 303 1;
r@160 304 #X obj 666 258 loadbang;
r@159 305 #X connect 1 0 2 0;
r@159 306 #X connect 2 0 3 0;
r@159 307 #X connect 3 0 4 0;
r@159 308 #X connect 5 0 6 0;
r@159 309 #X connect 9 0 8 0;
r@159 310 #X connect 9 0 10 0;
r@159 311 #X connect 15 0 16 0;
r@159 312 #X connect 15 0 62 0;
r@159 313 #X connect 15 0 97 0;
r@159 314 #X connect 17 0 19 0;
r@159 315 #X connect 17 0 20 0;
r@159 316 #X connect 18 0 21 0;
r@159 317 #X connect 18 0 22 0;
r@159 318 #X connect 25 0 26 0;
r@159 319 #X connect 27 0 28 0;
r@159 320 #X connect 28 0 25 0;
r@159 321 #X connect 29 0 28 1;
r@159 322 #X connect 30 0 31 0;
r@159 323 #X connect 32 0 9 0;
r@159 324 #X connect 33 0 15 0;
r@159 325 #X connect 34 0 17 0;
r@159 326 #X connect 35 0 18 0;
r@159 327 #X connect 36 0 5 0;
r@159 328 #X connect 37 0 65 0;
r@159 329 #X connect 38 0 66 0;
r@159 330 #X connect 39 0 9 0;
r@159 331 #X connect 40 0 17 0;
r@159 332 #X connect 41 0 18 0;
r@159 333 #X connect 42 0 66 0;
r@159 334 #X connect 43 0 65 0;
r@159 335 #X connect 44 0 5 0;
r@159 336 #X connect 45 0 46 0;
r@159 337 #X connect 46 0 30 0;
r@159 338 #X connect 47 0 48 0;
r@159 339 #X connect 49 0 47 0;
r@159 340 #X connect 50 0 51 0;
r@159 341 #X connect 50 0 56 0;
r@159 342 #X connect 50 0 98 0;
r@159 343 #X connect 52 0 50 0;
r@159 344 #X connect 53 0 54 0;
r@159 345 #X connect 55 0 53 0;
r@159 346 #X connect 65 0 64 0;
r@159 347 #X connect 66 0 7 0;
r@159 348 #X connect 67 0 15 0;
r@159 349 #X connect 68 0 71 0;
r@159 350 #X connect 68 0 74 0;
r@159 351 #X connect 69 0 72 0;
r@159 352 #X connect 69 0 75 0;
r@159 353 #X connect 70 0 73 0;
r@159 354 #X connect 70 0 76 0;
r@159 355 #X connect 77 0 68 0;
r@159 356 #X connect 78 0 70 0;
r@159 357 #X connect 79 0 69 0;
r@159 358 #X connect 80 0 68 0;
r@159 359 #X connect 81 0 69 0;
r@159 360 #X connect 82 0 70 0;
r@159 361 #X connect 83 0 69 0;
r@159 362 #X connect 84 0 15 0;
r@159 363 #X connect 85 0 70 0;
r@159 364 #X connect 86 0 68 0;
r@159 365 #X connect 87 0 50 0;
r@159 366 #X connect 88 0 47 0;
r@159 367 #X connect 89 0 50 0;
r@159 368 #X connect 90 0 53 0;
r@159 369 #X connect 91 0 69 0;
r@159 370 #X connect 92 0 69 0;
r@159 371 #X connect 93 0 69 0;
r@159 372 #X connect 94 0 9 0;
r@159 373 #X connect 95 0 68 0;
r@159 374 #X connect 96 0 70 0;
r@159 375 #X connect 97 0 63 0;
r@159 376 #X connect 98 0 57 0;
r@159 377 #X connect 99 0 17 0;
r@159 378 #X connect 100 0 18 0;
r@159 379 #X connect 101 0 9 0;
r@159 380 #X connect 102 0 68 0;
r@159 381 #X connect 103 0 69 0;
r@159 382 #X connect 104 0 70 0;
r@159 383 #X connect 105 0 15 0;
r@159 384 #X connect 107 0 50 0;
r@159 385 #X connect 108 0 53 0;
r@159 386 #X connect 109 0 15 0;
r@159 387 #X connect 110 0 15 0;
r@159 388 #X connect 111 0 53 0;
r@160 389 #X connect 116 0 0 0;
r@160 390 #X connect 130 0 131 0;
r@160 391 #X connect 131 0 128 0;
r@160 392 #X connect 131 1 129 0;
r@160 393 #X connect 132 0 130 0;
r@160 394 #X connect 133 0 132 0;
r@160 395 #X connect 134 0 133 0;