comparison June/prop_D1.pd @ 117:3f2588a64b25

merged
author Roderick Selfridge <r.selfridge@qmul.ac.uk>
date Sat, 01 Aug 2015 05:48:03 +0100
parents 94fdafb68c3e
children
comparison
equal deleted inserted replaced
116:195db2866d0a 117:3f2588a64b25
1 #N canvas 136 36 1105 841 10;
2 #X obj 377 -124 vu 15 120 empty empty -1 -8 0 10 -66577 -1 1 0;
3 #X obj 440 -124 vu 15 120 empty empty -1 -8 0 10 -66577 -1 1 0;
4 #X text 437 -215 Gain;
5 #X obj 376 -241 loadbang;
6 #N canvas 865 368 284 318 opLevels 1;
7 #X obj 74 188 dac~;
8 #X obj 30 70 catch~ l;
9 #X obj 128 70 catch~ r;
10 #X obj 129 104 *~ 0.45;
11 #X obj 30 104 *~ 0.45;
12 #X obj 30 210 prvu~;
13 #X obj 129 211 prvu~;
14 #X obj 186 75 / 127;
15 #X obj 186 40 inlet;
16 #X obj 30 239 outlet;
17 #X obj 129 239 outlet;
18 #X obj 219 118 inlet;
19 #X obj 30 152 /~ 1;
20 #X obj 129 154 /~ 1;
21 #X connect 1 0 4 0;
22 #X connect 2 0 3 0;
23 #X connect 3 0 13 0;
24 #X connect 4 0 12 0;
25 #X connect 5 0 9 0;
26 #X connect 6 0 10 0;
27 #X connect 7 0 3 1;
28 #X connect 7 0 4 1;
29 #X connect 8 0 7 0;
30 #X connect 11 0 12 1;
31 #X connect 11 0 13 1;
32 #X connect 12 0 0 0;
33 #X connect 12 0 5 0;
34 #X connect 13 0 0 1;
35 #X connect 13 0 6 0;
36 #X restore 376 -167 pd opLevels;
37 #X msg 376 -218 5;
38 #N canvas 12 52 684 554 speedCalc 0;
39 #X obj 59 -12 inlet;
40 #X obj 135 -11 inlet;
41 #X obj 217 -12 inlet;
42 #X obj 317 -12 inlet;
43 #X obj 59 11 s \$0_swLen;
44 #X obj 135 11 s \$0_armLen;
45 #X obj 317 10 s \$0_tipSpeed;
46 #X obj 141 301 r \$0_tipSpeed;
47 #X obj 211 437 outlet;
48 #X obj 211 414 r \$0_minSpeed;
49 #X obj 126 349 s \$0_minSpeed;
50 #X obj 310 414 r \$0_deltaSpeed;
51 #X obj 388 261 s \$0_deltaSpeed;
52 #X obj 310 437 outlet;
53 #X obj 84 100 r \$0_swLen;
54 #X obj 126 280 /;
55 #X floatatom 80 307 5 0 0 0 - - -;
56 #X obj 99 123 r \$0_armLen;
57 #X obj 84 205 +;
58 #X obj 99 152 t f b;
59 #X floatatom 40 240 5 0 0 0 - - -;
60 #X obj 126 207 r \$0_armLen;
61 #X obj 126 231 t f b;
62 #X obj 126 177 delay 6;
63 #X obj 153 256 delay 9;
64 #X obj 217 11 s \$0_sourceTot;
65 #X obj 421 202 r \$0_sourceTot;
66 #X obj 126 325 *;
67 #X floatatom 84 349 5 0 0 0 - - -;
68 #X obj 512 119 r \$0_minSpeed;
69 #X obj 388 202 -;
70 #X obj 388 158 r \$0_tipSpeed;
71 #X obj 388 232 /;
72 #X obj 512 145 t f b;
73 #X floatatom 343 261 5 0 0 0 - - -;
74 #X obj 539 170 delay 14;
75 #X connect 0 0 4 0;
76 #X connect 1 0 5 0;
77 #X connect 2 0 25 0;
78 #X connect 3 0 6 0;
79 #X connect 7 0 27 1;
80 #X connect 9 0 8 0;
81 #X connect 11 0 13 0;
82 #X connect 14 0 18 0;
83 #X connect 15 0 16 0;
84 #X connect 15 0 27 0;
85 #X connect 17 0 19 0;
86 #X connect 18 0 20 0;
87 #X connect 18 0 15 1;
88 #X connect 19 0 18 1;
89 #X connect 19 1 23 0;
90 #X connect 21 0 22 0;
91 #X connect 22 0 15 0;
92 #X connect 22 1 24 0;
93 #X connect 23 0 18 0;
94 #X connect 24 0 15 0;
95 #X connect 26 0 32 1;
96 #X connect 27 0 10 0;
97 #X connect 27 0 28 0;
98 #X connect 29 0 33 0;
99 #X connect 30 0 32 0;
100 #X connect 31 0 30 0;
101 #X connect 32 0 34 0;
102 #X connect 32 0 12 0;
103 #X connect 33 0 30 1;
104 #X connect 33 1 35 0;
105 #X connect 35 0 30 0;
106 #X restore 226 264 pd speedCalc;
107 #X floatatom 135 288 8 0 0 0 - - -;
108 #X floatatom 380 286 8 0 0 0 - - -;
109 #X obj 226 169 r bladeLen;
110 #X obj 249 192 r armLength;
111 #X obj 272 216 r NoOfSources;
112 #X obj 295 241 r topSpeed;
113 #X obj -62 -210 hsl 100 20 0 3000 0 0 empty empty empty -2 -8 0 10
114 -262144 -1 -1 900 1;
115 #X floatatom -65 -184 8 0 0 0 - - -;
116 #X obj -62 -132 hsl 100 20 0 300 0 0 empty empty empty -2 -8 0 10 -262144
117 -1 -1 0 1;
118 #X obj 200 288 s firstSpeed;
119 #X obj 295 287 s deltaSpeed;
120 #X floatatom 145 59 8 0 0 0 - - -;
121 #N canvas 57 585 305 180 thickCalc 0;
122 #X obj 173 86 r NoOfSources;
123 #X obj 23 16 inlet;
124 #X obj 26 64 inlet;
125 #X obj 26 86 s \$0_tipThick;
126 #X obj 158 62 -;
127 #X obj 158 111 /;
128 #X obj 158 134 outlet;
129 #X obj 23 39 s \$0_hiltThick;
130 #X floatatom 126 94 5 0 0 0 - - -;
131 #X obj 173 40 r \$0_tipThick;
132 #X obj 158 15 r \$0_hiltThick;
133 #X floatatom 94 136 8 0 0 0 - - -;
134 #X connect 0 0 5 1;
135 #X connect 1 0 7 0;
136 #X connect 2 0 3 0;
137 #X connect 4 0 5 0;
138 #X connect 4 0 8 0;
139 #X connect 5 0 6 0;
140 #X connect 5 0 11 0;
141 #X connect 9 0 4 1;
142 #X connect 10 0 4 0;
143 #X restore 205 -36 pd thickCalc;
144 #X obj 205 -13 s deltaThick;
145 #X floatatom 150 -12 8 0 0 0 - - -;
146 #X obj 205 -81 r hiltThick;
147 #X obj 274 -59 r tipThick;
148 #N canvas 447 270 208 198 circumferCalc 0;
149 #X obj 84 45 inlet;
150 #X obj 84 69 * 3.14159;
151 #X floatatom 26 120 8 0 0 0 - - -;
152 #X obj 84 93 * 2;
153 #X obj 84 118 outlet;
154 #X connect 0 0 1 0;
155 #X connect 1 0 3 0;
156 #X connect 3 0 2 0;
157 #X connect 3 0 4 0;
158 #X restore 202 35 pd circumferCalc;
159 #X obj 306 128 s deltaCircum;
160 #N canvas 767 188 758 617 angleCalc 0;
161 #X floatatom -252 49 8 0 0 0 - - -;
162 #X obj -194 50 * 0.75;
163 #X obj 149 51 * 0.25;
164 #X floatatom 171 76 8 0 0 0 - - -;
165 #X floatatom -178 72 8 0 0 0 - - -;
166 #X obj -194 97 /;
167 #X msg -209 203 1 \$1;
168 #X obj -209 180 f;
169 #X floatatom -242 203 5 0 0 0 - - -;
170 #X obj -209 225 line 0;
171 #X obj -245 154 r GO;
172 #X msg -165 203 0;
173 #X obj -194 121 * 1000;
174 #X obj 61 290 line 0;
175 #X obj 61 212 delay \$1;
176 #X obj 63 154 f;
177 #X obj 63 111 r GO;
178 #X obj 63 180 t f b;
179 #X obj 61 239 i;
180 #X msg 61 261 1 \$1;
181 #X msg 139 255 0;
182 #X obj 149 184 /;
183 #X obj 149 208 * 1000;
184 #X obj -209 275 *;
185 #X obj -157 244 r sweepAngle;
186 #X obj -206 340 hsl 100 25 0 360 0 0 empty empty empty -2 -8 0 10 -262144
187 -1 -1 0 1;
188 #X obj -160 272 * -0.75;
189 #X obj -209 299 +;
190 #X obj -159 297 * -1;
191 #X obj -179 155 s \$0_thisDe;
192 #X obj 78 133 r \$0_thisDe;
193 #X obj 61 328 *;
194 #X obj 118 295 r sweepAngle;
195 #X obj 64 380 hsl 100 25 -360 360 0 0 empty empty empty -2 -8 0 10
196 -262144 -1 -1 0 1;
197 #X obj 13 239 s \$0_d;
198 #X obj 139 233 r GO;
199 #X obj -194 26 r maxCirc;
200 #X obj 149 29 r maxCirc;
201 #X obj -124 70 r topSpeed;
202 #X obj 164 158 r topSpeed;
203 #X obj -90 459 s currentAngle;
204 #X obj -90 413 +;
205 #X floatatom -90 438 8 0 0 0 - - -;
206 #X obj -41 392 t f b;
207 #X obj 280 146 delay \$1;
208 #X obj 282 88 f;
209 #X obj 282 62 r GO;
210 #X obj 282 114 t f b;
211 #X obj 318 -6 r maxCirc;
212 #X obj 333 16 r topSpeed;
213 #X obj 318 40 /;
214 #X obj 318 62 * 1000;
215 #X obj 280 168 s end;
216 #X obj -165 182 r end;
217 #X floatatom -166 408 8 0 0 0 - - -;
218 #X obj -41 359 r end;
219 #X obj 118 318 * -0.25;
220 #X connect 1 0 4 0;
221 #X connect 1 0 5 0;
222 #X connect 2 0 3 0;
223 #X connect 2 0 21 0;
224 #X connect 5 0 12 0;
225 #X connect 6 0 9 0;
226 #X connect 7 0 6 0;
227 #X connect 7 0 8 0;
228 #X connect 9 0 23 0;
229 #X connect 10 0 7 0;
230 #X connect 11 0 9 0;
231 #X connect 12 0 7 1;
232 #X connect 12 0 29 0;
233 #X connect 13 0 31 0;
234 #X connect 14 0 18 0;
235 #X connect 14 0 34 0;
236 #X connect 15 0 17 0;
237 #X connect 16 0 15 0;
238 #X connect 17 0 14 1;
239 #X connect 17 1 14 0;
240 #X connect 18 0 19 0;
241 #X connect 19 0 13 0;
242 #X connect 20 0 13 0;
243 #X connect 21 0 22 0;
244 #X connect 22 0 18 1;
245 #X connect 23 0 27 0;
246 #X connect 24 0 26 0;
247 #X connect 25 0 41 0;
248 #X connect 25 0 54 0;
249 #X connect 26 0 28 0;
250 #X connect 26 0 23 1;
251 #X connect 27 0 25 0;
252 #X connect 28 0 27 1;
253 #X connect 30 0 15 1;
254 #X connect 31 0 33 0;
255 #X connect 32 0 56 0;
256 #X connect 33 0 43 0;
257 #X connect 35 0 20 0;
258 #X connect 36 0 0 0;
259 #X connect 36 0 1 0;
260 #X connect 37 0 2 0;
261 #X connect 38 0 5 1;
262 #X connect 39 0 21 1;
263 #X connect 41 0 42 0;
264 #X connect 42 0 40 0;
265 #X connect 43 0 41 1;
266 #X connect 43 1 41 0;
267 #X connect 44 0 52 0;
268 #X connect 45 0 47 0;
269 #X connect 46 0 45 0;
270 #X connect 47 0 44 1;
271 #X connect 47 1 44 0;
272 #X connect 48 0 50 0;
273 #X connect 49 0 50 1;
274 #X connect 50 0 51 0;
275 #X connect 51 0 45 1;
276 #X connect 53 0 11 0;
277 #X connect 54 0 42 0;
278 #X connect 55 0 43 0;
279 #X connect 56 0 31 1;
280 #X restore 263 -108 pd angleCalc;
281 #X obj 379 -196 hsl 100 25 0 127 0 0 empty empty empty -2 -8 0 10 -262144
282 -1 -1 390 1;
283 #X obj 652 -128 freqCalcWoo;
284 #X obj 652 -179 r \$0_thisGroup;
285 #X obj 778 -101 *;
286 #X obj 793 -126 r deltaThick;
287 #X obj 778 -190 r \$0_thisGroup;
288 #X obj 778 -147 +;
289 #X obj 763 -215 r hiltThick;
290 #X obj 763 -76 -;
291 #X floatatom 774 -50 8 0 0 0 - - -;
292 #X obj 793 -169 r \$0_s0;
293 #X obj 715 -151 r \$0_s0;
294 #N canvas 1051 49 396 632 obsPosition 0;
295 #X obj -49 337 r obsDistance;
296 #X obj 113 149 r obsAngle;
297 #X obj -44 29 inlet;
298 #X obj 188 108 r bladeLen;
299 #X obj 203 214 r armLength;
300 #X obj -44 52 s \$0_sourceNo;
301 #X obj 202 129 r NoOfSources;
302 #X obj 188 239 +;
303 #X obj 188 149 /;
304 #X obj 188 193 *;
305 #X obj 203 170 r \$0_sourceNo;
306 #X floatatom 61 53 5 0 0 0 - - -;
307 #X obj 98 204 / 360;
308 #X obj 98 226 * 6.28319;
309 #X floatatom 40 277 8 0 0 0 - - -;
310 #X obj 98 277 *;
311 #X floatatom 41 339 8 0 0 0 - - -;
312 #X obj 122 391 hsl 128 15 15 25 0 0 empty empty empty -2 -8 0 10 -262144
313 -1 -1 0 1;
314 #X obj 98 127 r currentAngle;
315 #X floatatom 55 147 5 0 0 0 - - -;
316 #X floatatom 20 397 8 0 0 0 - - -;
317 #X obj 98 339 t f b;
318 #X obj 98 172 +;
319 #X obj 116 36 hsl 128 15 180 -180 0 0 empty empty empty -2 -8 0 10
320 -262144 -1 -1 0 1;
321 #X floatatom 124 63 5 0 0 0 - - -;
322 #X obj 83 370 +;
323 #X obj 98 251 cos;
324 #X obj 98 314 * -1;
325 #X obj -36 158 hsl 75 25 -60 180 0 0 empty empty empty -2 -8 0 10 -262144
326 -1 -1 0 1;
327 #X floatatom -23 203 5 0 0 0 - - -;
328 #X obj 83 412 outlet;
329 #X floatatom 54 205 5 0 0 0 - - -;
330 #X obj 146 205 outlet;
331 #X connect 0 0 25 0;
332 #X connect 1 0 22 1;
333 #X connect 2 0 5 0;
334 #X connect 2 0 11 0;
335 #X connect 3 0 8 0;
336 #X connect 4 0 7 1;
337 #X connect 6 0 8 1;
338 #X connect 7 0 15 1;
339 #X connect 8 0 9 0;
340 #X connect 9 0 7 0;
341 #X connect 10 0 9 1;
342 #X connect 12 0 13 0;
343 #X connect 13 0 26 0;
344 #X connect 15 0 27 0;
345 #X connect 18 0 19 0;
346 #X connect 18 0 22 0;
347 #X connect 19 0 28 0;
348 #X connect 21 0 25 1;
349 #X connect 21 1 25 0;
350 #X connect 22 0 12 0;
351 #X connect 22 0 31 0;
352 #X connect 22 0 32 0;
353 #X connect 23 0 24 0;
354 #X connect 25 0 17 0;
355 #X connect 25 0 20 0;
356 #X connect 25 0 30 0;
357 #X connect 26 0 14 0;
358 #X connect 26 0 15 0;
359 #X connect 27 0 21 0;
360 #X connect 27 0 16 0;
361 #X connect 28 0 29 0;
362 #X connect 28 0 22 0;
363 #X restore 677 -43 pd obsPosition;
364 #X obj 655 227 freq3DChord;
365 #X obj -66 175 hsl 100 20 -90 90 0 0 empty empty empty -2 -8 0 10 -262144
366 -1 -1 7300 1;
367 #X obj -69 329 hsl 100 20 100 1 0 0 empty empty empty -2 -8 0 10 -262144
368 -1 -1 7500 1;
369 #X obj -66 254 hsl 100 20 -90 90 0 0 empty empty empty -2 -8 0 10 -262144
370 -1 -1 4500 1;
371 #X text -62 152 Azimuth Angle;
372 #X text -63 233 Elevation Angle;
373 #X text -53 308 Distance;
374 #X floatatom -69 281 5 0 0 0 - - -;
375 #X floatatom -72 357 5 0 0 0 - - -;
376 #X floatatom -69 203 5 0 0 0 - - -;
377 #X obj -68 -57 hsl 100 20 0.5 10 0 0 empty empty empty -2 -8 0 10 -262144
378 -1 -1 4900 1;
379 #X floatatom -71 -29 5 0 0 0 - - -;
380 #X obj -70 100 hsl 100 20 0.001 0.1 0 0 empty empty empty -2 -8 0 10
381 -262144 -1 -1 6200 1;
382 #X floatatom -73 127 5 0 0 0 - - -;
383 #X text -67 78 Chord Thickness;
384 #X obj -69 23 hsl 100 20 0 90 0 0 empty empty empty -2 -8 0 10 -262144
385 -1 -1 0 1;
386 #X floatatom -72 48 5 0 0 0 - - -;
387 #X text -65 1 Chord Pitch;
388 #X text 538 -238 Vertical propellor;
389 #X obj 202 12 r bladeRadius;
390 #X obj -34 -29 s bladeRadius;
391 #X obj 202 58 s circum;
392 #X text -68 -153 RMP (Fine);
393 #X text -66 -230 RMP (Coarse);
394 #X floatatom -66 -107 8 0 0 0 - - -;
395 #X obj -11 -107 s fineRPM;
396 #X obj -10 -184 s coarseRPM;
397 #X obj -30 203 s obsAzim;
398 #X obj -29 281 s obsElev;
399 #X text -59 -79 Blade Radius (m);
400 #X obj -37 126 s chordTh;
401 #X obj 670 162 r chordTh;
402 #X obj -29 356 s obsDist;
403 #X obj 775 143 freqCalc3dCh;
404 #X obj 790 163 r chordTh;
405 #X msg 676 87 1;
406 #X msg 793 93 2;
407 #X msg 784 69 1;
408 #X obj 785 37 bng 15 250 50 0 empty empty empty 17 7 0 10 -262144 -1
409 -1;
410 #X msg 722 73 0;
411 #X obj 490 -194 hsl 100 25 1 400 0 0 empty empty empty -2 -8 0 10 -262144
412 -1 -1 7700 1;
413 #X obj 655 142 freqCalc3dCh;
414 #X obj 775 228 freq3DChord;
415 #X obj 146 -201 bng 25 250 50 0 empty empty empty 17 7 0 10 -257985
416 -1 -1;
417 #X obj 146 -172 s setUp;
418 #X obj 32 -231 r setUp;
419 #X obj 37 -154 r setUp;
420 #X obj 45 -80 r setUp;
421 #X obj 38 3 r setUp;
422 #X obj 40 76 r setUp;
423 #X obj 41 155 r setUp;
424 #X obj 42 228 r setUp;
425 #X obj 31 306 r setUp;
426 #X text 69 411 Pan not working on this yet;
427 #X obj 471 545 s fCRPM;
428 #X obj 507 507 s fRad;
429 #X obj 526 488 s fPit;
430 #X obj 544 469 s fThi;
431 #X obj 563 450 s fAzi;
432 #X obj 581 431 s fEle;
433 #X obj 600 412 s fDis;
434 #X obj 489 526 s fFRPM;
435 #X obj -116 -231 r fCRPM;
436 #X obj -120 -152 r fFRPM;
437 #X obj -110 -80 r fRad;
438 #X obj -112 -1 r fPit;
439 #X obj -112 76 r fThi;
440 #X obj -111 153 r fAzi;
441 #X obj -114 232 r fEle;
442 #X obj -113 310 r fDis;
443 #X obj 471 392 unpack f f f f f f f f;
444 #X connect 3 0 5 0;
445 #X connect 4 0 0 0;
446 #X connect 4 1 1 0;
447 #X connect 5 0 27 0;
448 #X connect 6 0 7 0;
449 #X connect 6 0 16 0;
450 #X connect 6 1 8 0;
451 #X connect 6 1 17 0;
452 #X connect 9 0 6 0;
453 #X connect 10 0 6 1;
454 #X connect 11 0 6 2;
455 #X connect 12 0 6 3;
456 #X connect 13 0 14 0;
457 #X connect 13 0 66 0;
458 #X connect 15 0 64 0;
459 #X connect 15 0 65 0;
460 #X connect 19 0 20 0;
461 #X connect 19 0 21 0;
462 #X connect 22 0 19 0;
463 #X connect 23 0 19 1;
464 #X connect 24 0 18 0;
465 #X connect 24 0 61 0;
466 #X connect 27 0 4 0;
467 #X connect 29 0 28 0;
468 #X connect 30 0 35 1;
469 #X connect 31 0 30 1;
470 #X connect 32 0 33 0;
471 #X connect 33 0 30 0;
472 #X connect 33 0 39 0;
473 #X connect 34 0 35 0;
474 #X connect 35 0 36 0;
475 #X connect 37 0 33 1;
476 #X connect 38 0 28 1;
477 #X connect 41 0 49 0;
478 #X connect 41 0 67 0;
479 #X connect 42 0 48 0;
480 #X connect 42 0 72 0;
481 #X connect 43 0 47 0;
482 #X connect 43 0 68 0;
483 #X connect 50 0 51 0;
484 #X connect 50 0 60 0;
485 #X connect 52 0 53 0;
486 #X connect 52 0 70 0;
487 #X connect 55 0 56 0;
488 #X connect 59 0 24 0;
489 #X connect 71 0 40 1;
490 #X connect 73 0 82 0;
491 #X connect 73 1 82 3;
492 #X connect 73 2 82 2;
493 #X connect 74 0 82 1;
494 #X connect 75 0 81 0;
495 #X connect 76 0 73 0;
496 #X connect 77 0 81 0;
497 #X connect 78 0 77 0;
498 #X connect 78 0 76 0;
499 #X connect 79 0 73 0;
500 #X connect 80 0 4 1;
501 #X connect 81 0 40 0;
502 #X connect 81 1 40 3;
503 #X connect 81 2 40 2;
504 #X connect 83 0 84 0;
505 #X connect 85 0 13 0;
506 #X connect 86 0 15 0;
507 #X connect 87 0 50 0;
508 #X connect 88 0 55 0;
509 #X connect 89 0 52 0;
510 #X connect 90 0 41 0;
511 #X connect 91 0 43 0;
512 #X connect 92 0 42 0;
513 #X connect 102 0 13 0;
514 #X connect 103 0 15 0;
515 #X connect 104 0 50 0;
516 #X connect 105 0 55 0;
517 #X connect 106 0 52 0;
518 #X connect 107 0 41 0;
519 #X connect 108 0 43 0;
520 #X connect 109 0 42 0;
521 #X connect 110 0 94 0;
522 #X connect 110 1 101 0;
523 #X connect 110 2 95 0;
524 #X connect 110 3 96 0;
525 #X connect 110 4 97 0;
526 #X connect 110 5 98 0;
527 #X connect 110 6 99 0;
528 #X connect 110 7 100 0;