annotate June/woSoFreq.pd @ 78:3fd10ec003c3

testBed added to trial new developments without disturbing previous generations. Noise source (pow8) not connected porperly which has now been rectified. Gives much more white noise type sound.
author Rod Selfridge <r.selfridge@qmul.ac.uk>
date Fri, 26 Jun 2015 10:32:49 +0100
parents d8fd722c9ff0
children 9fbf39788338
rev   line source
r@62 1 #N canvas 642 52 1236 817 10;
r@58 2 #X text 181 156 Mass Density of Air;
r@58 3 #X text 115 130 Frequency (Hz);
r@58 4 #X obj 170 644 throw~ l;
r@58 5 #X obj 197 625 throw~ r;
r@58 6 #X obj 274 476 osc~;
r@58 7 #X obj 303 157 *~ 1.225;
r@58 8 #X obj 303 232 /~ 1.81e-05;
r@58 9 #X obj 273 335 *~ 0.198;
r@58 10 #X obj 303 187 *~ 1;
r@58 11 #X obj 273 395 /~ 1;
r@58 12 #X obj 125 79 snapshot~;
r@58 13 #X obj 125 32 tgl 15 0 empty empty empty 17 7 0 10 -262144 -1 -1 1
r@58 14 1;
r@58 15 #X floatatom 125 105 10 0 0 0 - - -;
r@58 16 #X obj 234 251 sig~ 19.7;
r@58 17 #X obj 288 275 /~;
r@58 18 #X obj 234 275 sig~ 1;
r@58 19 #X obj 273 304 -~;
r@58 20 #X obj 273 364 *~;
r@58 21 #X obj 273 421 clip~ 0 20000;
r@58 22 #X obj 175 -110 inlet;
r@58 23 #X obj 205 104 outlet;
r@58 24 #X obj 125 6 loadbang;
r@58 25 #X text 365 33 Mass Density of Air \, squared;
r@58 26 #X text 662 18 Speed of Sound to power 2;
r@58 27 #N canvas 759 125 286 289 pow6 0;
r@58 28 #X obj 47 67 *~;
r@58 29 #X obj 76 67 *~;
r@58 30 #X obj 76 35 inlet~;
r@58 31 #X obj 47 163 outlet~;
r@58 32 #X obj 136 184 snapshot~;
r@58 33 #X obj 136 159 metro 100;
r@58 34 #X obj 136 137 tgl 15 0 empty empty empty 17 7 0 10 -262144 -1 -1 1
r@58 35 1;
r@58 36 #X floatatom 136 211 10 0 0 0 - - -;
r@58 37 #X obj 216 210 outlet;
r@58 38 #X obj 136 111 loadbang;
r@58 39 #X obj 106 67 *~;
r@58 40 #X obj 47 93 *~;
r@58 41 #X obj 47 118 *~;
r@58 42 #X connect 0 0 11 0;
r@58 43 #X connect 1 0 11 1;
r@58 44 #X connect 2 0 0 0;
r@58 45 #X connect 2 0 0 1;
r@58 46 #X connect 2 0 1 1;
r@58 47 #X connect 2 0 10 0;
r@58 48 #X connect 2 0 10 1;
r@58 49 #X connect 2 0 1 0;
r@58 50 #X connect 4 0 7 0;
r@58 51 #X connect 4 0 8 0;
r@58 52 #X connect 5 0 4 0;
r@58 53 #X connect 6 0 5 0;
r@58 54 #X connect 9 0 6 0;
r@58 55 #X connect 10 0 12 1;
r@58 56 #X connect 11 0 12 0;
r@58 57 #X connect 12 0 4 0;
r@58 58 #X connect 12 0 3 0;
r@58 59 #X restore 548 -64 pd pow6;
r@58 60 #X text 144 225 Reynolds Number;
r@58 61 #X text 152 407 Strouhal Number;
r@58 62 #X obj 511 -51 *~;
r@58 63 #X obj 548 -26 *~;
r@58 64 #X obj 548 8 *~ 1;
r@58 65 #X obj 548 36 *~ 1.50063;
r@58 66 #X obj 626 -15 inlet;
r@58 67 #X obj 626 10 *;
r@58 68 #X obj 626 35 * 118033;
r@58 69 #X obj 548 71 /~ 1;
r@58 70 #X obj 569 139 inlet;
r@58 71 #X obj 569 239 cos;
r@58 72 #X obj 569 194 / 360;
r@58 73 #X obj 548 344 *~ 0.27;
r@58 74 #X obj 274 507 *~;
r@58 75 #X floatatom 586 291 5 0 0 0 - - -;
r@58 76 #X obj 569 263 *;
r@58 77 #X text 572 116 Azimuth;
r@58 78 #X text 625 -35 Distance;
r@58 79 #X obj 548 319 *~ 1;
r@58 80 #X text 333 212 Viscosity;
r@58 81 #X obj 76 454 *~ 2;
r@58 82 #X obj 76 481 osc~;
r@58 83 #X obj 76 517 *~;
r@58 84 #X obj 170 557 +~;
r@58 85 #X obj 548 369 *~ 1e-06;
r@58 86 #X obj 678 239 cos;
r@58 87 #X obj 678 194 / 360;
r@58 88 #X floatatom 705 290 5 0 0 0 - - -;
r@58 89 #X obj 678 263 *;
r@58 90 #X obj 657 343 *~ 0.27;
r@58 91 #X obj 657 319 *~ 1;
r@58 92 #X obj 175 -87 s \$0-diameter;
r@58 93 #X obj 364 156 r \$0-diameter;
r@58 94 #X obj 374 351 r \$0-diameter;
r@58 95 #X obj 617 -58 r \$0-diameter;
r@58 96 #X obj 53 -85 s~ \$0-windSpeed;
r@58 97 #X obj 548 -90 r~ \$0-windSpeed;
r@58 98 #X obj 329 334 r~ \$0-windSpeed;
r@58 99 #X obj 303 129 r~ \$0-windSpeed;
r@58 100 #X obj 207 433 s~ \$0_str;
r@58 101 #X obj 481 -89 r~ \$0_str;
r@58 102 #X obj 565 100 s~ \$0-a;
r@58 103 #X obj 632 293 r~ \$0-a;
r@58 104 #X obj 657 393 s~ \$0_dragDiGain;
r@58 105 #X obj 109 481 r~ \$0_dragDiGain;
r@58 106 #X obj 286 447 s~ \$0-myFreq;
r@58 107 #X obj 76 427 r~ \$0-myFreq;
r@58 108 #X obj 39 54 r~ \$0-myFreq;
r@58 109 #X obj 548 393 s~ \$0_liftDiGain;
r@58 110 #X obj 312 477 r~ \$0_liftDiGain;
r@58 111 #X obj 887 20 r~ \$0-myFreq;
r@58 112 #X obj 853 -4 noise~;
r@58 113 #X obj 930 204 throw~ l;
r@58 114 #X obj 957 183 throw~ r;
r@58 115 #X obj 945 60 r~ \$0_liftDiGain;
r@58 116 #X obj 930 111 *~;
r@58 117 #X obj 544 541 snapshot~;
r@58 118 #X obj 544 516 metro 100;
r@58 119 #X obj 544 494 tgl 15 0 empty empty empty 17 7 0 10 -262144 -1 -1 1
r@58 120 1;
r@58 121 #X floatatom 544 567 10 0 0 0 - - -;
r@58 122 #X obj 544 468 loadbang;
r@58 123 #X obj 458 516 r~ \$0-myRey;
r@58 124 #X obj 316 256 s~ \$0-myRey;
r@58 125 #X obj 1068 21 snapshot~;
r@58 126 #X floatatom 1068 47 10 0 0 0 - - -;
r@58 127 #X obj 1068 -52 loadbang;
r@58 128 #X obj 1068 -27 tgl 15 0 empty empty empty 17 7 0 10 -262144 -1 -1
r@58 129 1 1;
r@58 130 #X obj 979 -81 r~ \$0-myRey;
r@58 131 #X obj 905 320 r~ \$0-myFreq;
r@58 132 #X obj 871 295 noise~;
r@58 133 #X obj 948 509 throw~ l;
r@58 134 #X obj 975 486 throw~ r;
r@58 135 #X obj 948 417 *~;
r@58 136 #X obj 1086 329 snapshot~;
r@58 137 #X floatatom 1086 355 10 0 0 0 - - -;
r@58 138 #X obj 1086 256 loadbang;
r@58 139 #X obj 1086 281 tgl 15 0 empty empty empty 17 7 0 10 -262144 -1 -1
r@58 140 1 1;
r@58 141 #X obj 997 227 r~ \$0-myRey;
r@58 142 #X obj 963 369 r~ \$0_dragDiGain;
r@58 143 #X obj 905 346 *~ 2;
r@58 144 #X text 529 589 Reynolds Number;
r@58 145 #X obj 853 63 vcf~ 1000 10;
r@58 146 #X obj 871 371 vcf~ 1000 10;
r@58 147 #X obj 53 -108 inlet~;
r@58 148 #X floatatom 642 153 5 0 0 0 - - -;
r@58 149 #X obj 170 600 fcpan;
r@58 150 #X obj 489 170 s \$0-b;
r@58 151 #X obj 213 550 r \$0-b;
r@58 152 #X obj 213 572 / 180;
r@58 153 #X obj 930 160 fcpan;
r@58 154 #X obj 957 112 r \$0-b;
r@58 155 #X obj 957 134 / 180;
r@58 156 #X obj 948 461 fcpan;
r@58 157 #X obj 975 416 r \$0-b;
r@58 158 #X obj 975 438 / 180;
r@58 159 #X obj 569 216 * 6.28319;
r@58 160 #X obj 678 216 * 6.28319;
r@58 161 #X obj 945 84 *~ 1;
r@58 162 #X obj 963 392 *~ 1;
r@58 163 #X obj 997 302 clip~ 2 400;
r@58 164 #X obj 979 -6 clip~ 2 400;
r@58 165 #X obj 997 251 *~ -0.003;
r@58 166 #X obj 979 -57 *~ -0.003;
r@58 167 #X obj 979 -32 +~ 20;
r@58 168 #X obj 997 276 +~ 20;
r@58 169 #X obj 569 172 + 90;
r@58 170 #X floatatom 591 11 5 0 0 0 - - -;
r@58 171 #X obj 1068 -4 metro 10;
r@58 172 #X obj 1086 304 metro 10;
r@58 173 #X obj 125 54 metro 10;
r@62 174 #X obj 657 368 *~ 1e-08;
r@58 175 #X connect 4 0 39 0;
r@58 176 #X connect 5 0 8 0;
r@58 177 #X connect 6 0 14 1;
r@62 178 #X connect 6 0 88 0;
r@58 179 #X connect 7 0 17 0;
r@58 180 #X connect 8 0 6 0;
r@58 181 #X connect 9 0 18 0;
r@62 182 #X connect 9 0 65 0;
r@58 183 #X connect 10 0 12 0;
r@58 184 #X connect 10 0 20 0;
r@62 185 #X connect 11 0 135 0;
r@58 186 #X connect 13 0 14 0;
r@58 187 #X connect 14 0 16 1;
r@58 188 #X connect 15 0 16 0;
r@58 189 #X connect 16 0 7 0;
r@58 190 #X connect 17 0 9 0;
r@58 191 #X connect 18 0 4 0;
r@62 192 #X connect 18 0 71 0;
r@62 193 #X connect 19 0 57 0;
r@58 194 #X connect 21 0 11 0;
r@58 195 #X connect 24 0 28 0;
r@58 196 #X connect 27 0 28 1;
r@58 197 #X connect 28 0 29 0;
r@58 198 #X connect 29 0 30 0;
r@58 199 #X connect 30 0 34 0;
r@58 200 #X connect 31 0 32 0;
r@58 201 #X connect 31 0 32 1;
r@62 202 #X connect 31 0 132 0;
r@58 203 #X connect 32 0 33 0;
r@58 204 #X connect 33 0 34 1;
r@58 205 #X connect 34 0 44 0;
r@62 206 #X connect 34 0 67 0;
r@62 207 #X connect 35 0 110 0;
r@58 208 #X connect 35 0 52 0;
r@62 209 #X connect 35 0 112 0;
r@62 210 #X connect 35 0 131 0;
r@58 211 #X connect 36 0 41 0;
r@58 212 #X connect 36 0 41 1;
r@62 213 #X connect 37 0 121 0;
r@58 214 #X connect 38 0 50 0;
r@58 215 #X connect 39 0 49 1;
r@58 216 #X connect 41 0 40 0;
r@58 217 #X connect 41 0 44 1;
r@58 218 #X connect 44 0 38 0;
r@58 219 #X connect 46 0 47 0;
r@58 220 #X connect 47 0 48 0;
r@58 221 #X connect 48 0 49 0;
r@62 222 #X connect 49 0 111 0;
r@62 223 #X connect 50 0 74 0;
r@58 224 #X connect 51 0 54 0;
r@58 225 #X connect 51 0 54 1;
r@62 226 #X connect 52 0 122 0;
r@58 227 #X connect 54 0 53 0;
r@58 228 #X connect 54 0 56 1;
r@62 229 #X connect 55 0 136 0;
r@58 230 #X connect 56 0 55 0;
r@62 231 #X connect 58 0 8 1;
r@62 232 #X connect 59 0 9 1;
r@62 233 #X connect 60 0 29 1;
r@62 234 #X connect 62 0 24 0;
r@62 235 #X connect 63 0 17 1;
r@62 236 #X connect 64 0 5 0;
r@62 237 #X connect 66 0 27 1;
r@62 238 #X connect 66 0 27 0;
r@62 239 #X connect 68 0 56 0;
r@62 240 #X connect 70 0 48 1;
r@62 241 #X connect 72 0 46 0;
r@62 242 #X connect 73 0 10 0;
r@62 243 #X connect 75 0 39 1;
r@62 244 #X connect 76 0 107 1;
r@62 245 #X connect 77 0 107 0;
r@62 246 #X connect 80 0 123 0;
r@62 247 #X connect 81 0 115 0;
r@62 248 #X connect 82 0 85 0;
r@62 249 #X connect 83 0 82 0;
r@58 250 #X connect 84 0 83 0;
r@62 251 #X connect 86 0 84 0;
r@62 252 #X connect 87 0 82 0;
r@62 253 #X connect 89 0 90 0;
r@62 254 #X connect 89 0 107 2;
r@62 255 #X connect 91 0 92 0;
r@62 256 #X connect 92 0 133 0;
r@62 257 #X connect 93 0 128 0;
r@62 258 #X connect 94 0 105 0;
r@62 259 #X connect 95 0 108 0;
r@62 260 #X connect 98 0 118 0;
r@62 261 #X connect 99 0 100 0;
r@62 262 #X connect 99 0 108 2;
r@62 263 #X connect 101 0 102 0;
r@62 264 #X connect 102 0 134 0;
r@62 265 #X connect 103 0 127 0;
r@62 266 #X connect 104 0 124 0;
r@62 267 #X connect 105 0 108 1;
r@62 268 #X connect 107 0 81 0;
r@62 269 #X connect 108 0 98 0;
r@62 270 #X connect 109 0 61 0;
r@62 271 #X connect 111 0 2 0;
r@62 272 #X connect 111 1 3 0;
r@62 273 #X connect 113 0 114 0;
r@62 274 #X connect 114 0 111 1;
r@62 275 #X connect 115 0 78 0;
r@62 276 #X connect 115 1 79 0;
r@62 277 #X connect 116 0 117 0;
r@62 278 #X connect 117 0 115 1;
r@62 279 #X connect 118 0 96 0;
r@62 280 #X connect 118 1 97 0;
r@62 281 #X connect 119 0 120 0;
r@62 282 #X connect 120 0 118 1;
r@62 283 #X connect 121 0 36 0;
r@62 284 #X connect 122 0 51 0;
r@62 285 #X connect 123 0 81 1;
r@62 286 #X connect 124 0 98 1;
r@62 287 #X connect 125 0 99 0;
r@62 288 #X connect 126 0 89 0;
r@62 289 #X connect 127 0 130 0;
r@62 290 #X connect 128 0 129 0;
r@62 291 #X connect 129 0 126 0;
r@62 292 #X connect 130 0 125 0;
r@62 293 #X connect 131 0 37 0;
r@62 294 #X connect 133 0 89 0;
r@62 295 #X connect 134 0 99 0;
r@62 296 #X connect 135 0 10 0;
r@62 297 #X connect 136 0 69 0;