Mercurial > hg > weather-synthesis-prototyping

annotate Shallow Cavity/CavD1.pd @ 211:bf12c520e599

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
diameter and speed added for 7 sources
author Rod Selfridge <r.selfridge@qmul.ac.uk>
date Tue, 29 Mar 2016 20:37:47 +0100
parents 451337700704
children 62b41b255645
rev   line source
r@201 1 #N canvas 130 23 1193 815 10;
r@201 2 #X obj -127 -66 loadbang;
r@201 3 #X obj -127 -29 metro 10;
r@201 4 #X obj -127 -46 tgl 15 0 empty empty empty 17 7 0 10 -262144 -1 -1
r@201 5 1 1;
r@201 6 #X obj -127 -7 s myMet;
r@201 7 #X obj -48 235 delwrite~ varwind 3000;
r@201 8 #X obj 62 -16 hsl 128 15 0 150 0 0 empty empty empty -2 -8 0 10 -262144
r@201 9 -1 -1 0 1;
r@201 10 #X obj -47 28 *~ 1;
r@201 11 #X obj -47 54 +~ 1;
r@201 12 #X obj 151 -60 loadbang;
r@201 13 #X msg 151 -40 5;
r@201 14 #N canvas 20 383 344 123 machCalc 0;
r@201 15 #X text 107 15 Speed of Sound (dry air 20 Degs C);
r@201 16 #X obj 26 -14 vd~ varwind;
r@201 17 #X obj 26 33 s~ MY_MACH;
r@201 18 #X obj 26 9 /~ 343.56;
r@201 19 #X connect 1 0 3 0;
r@201 20 #X connect 3 0 2 0;
r@201 21 #X restore 209 -3 pd machCalc;
r@201 22 #X floatatom 100 7 5 0 0 0 - - -;
r@201 23 #X obj 59 -40 r SPEED;
r@201 24 #N canvas 634 290 596 443 windDirection 0;
r@201 25 #X obj 183 0 inlet~;
r@201 26 #X obj 280 52 inlet;
r@201 27 #X obj 280 86 sig~;
r@201 28 #X obj 185 251 *~;
r@201 29 #X obj 185 279 outlet~;
r@201 30 #X obj 246 254 outlet~;
r@201 31 #X obj 200 195 cos~;
r@201 32 #X obj 200 135 +~;
r@201 33 #X obj 200 71 lop~ 1;
r@201 34 #X obj 246 194 *~ 360;
r@201 35 #X obj 200 91 lop~ 1;
r@201 36 #X obj 200 30 noise~;
r@201 37 #X obj 200 51 lop~ 1;
r@201 38 #X obj 200 157 /~ 360;
r@201 39 #X obj 200 113 *~ 800;
r@201 40 #X obj 200 221 abs~;
r@201 41 #X connect 0 0 3 0;
r@201 42 #X connect 1 0 2 0;
r@201 43 #X connect 2 0 7 1;
r@201 44 #X connect 3 0 4 0;
r@201 45 #X connect 6 0 15 0;
r@201 46 #X connect 7 0 13 0;
r@201 47 #X connect 8 0 10 0;
r@201 48 #X connect 9 0 5 0;
r@201 49 #X connect 10 0 14 0;
r@201 50 #X connect 11 0 12 0;
r@201 51 #X connect 12 0 8 0;
r@201 52 #X connect 13 0 6 0;
r@201 53 #X connect 13 0 9 0;
r@201 54 #X connect 14 0 7 0;
r@201 55 #X connect 15 0 3 1;
r@201 56 #X restore -48 133 pd windDirection;
r@201 57 #X obj 105 178 snapshot~;
r@201 58 #X floatatom 105 205 10 0 0 0 - - -;
r@201 59 #X text 102 223 Wind Speed;
r@201 60 #X obj 48 108 hsl 128 15 0 360 0 0 empty empty empty -2 -8 0 10 -262144
r@201 61 -1 -1 0 1;
r@201 62 #X obj 186 178 snapshot~;
r@201 63 #X floatatom 186 205 10 0 0 0 - - -;
r@201 64 #X text 183 223 Wind Direction;
r@201 65 #X obj -47 -2 WindGenD1;
r@201 66 #X msg 114 -39 20;
r@201 67 #X obj 186 155 r myMet;
r@201 68 #X obj 105 155 r myMet;
r@201 69 #X obj 22 7 * 0.5;
r@201 70 #X obj 59 7 * 0.88;
r@201 71 #X obj 41 314 sig~;
r@201 72 #X obj -162 467 vu 15 120 empty empty -1 -8 0 10 -66577 -1 1 0;
r@201 73 #X obj -99 467 vu 15 120 empty empty -1 -8 0 10 -66577 -1 1 0;
r@201 74 #X text -102 376 Gain;
r@201 75 #X obj -154 347 loadbang;
r@201 76 #N canvas 555 179 313 396 opLevels 0;
r@201 77 #X obj 79 184 dac~;
r@201 78 #X obj 30 70 catch~ l;
r@201 79 #X obj 128 70 catch~ r;
r@201 80 #X obj 129 104 *~ 0.45;
r@201 81 #X obj 30 104 *~ 0.45;
r@201 82 #X obj 30 210 prvu~;
r@201 83 #X obj 129 211 prvu~;
r@201 84 #X obj 93 33 inlet;
r@201 85 #X obj 30 239 outlet;
r@201 86 #X obj 129 239 outlet;
r@201 87 #X connect 1 0 4 0;
r@201 88 #X connect 2 0 3 0;
r@201 89 #X connect 3 0 6 0;
r@201 90 #X connect 3 0 0 1;
r@201 91 #X connect 4 0 5 0;
r@201 92 #X connect 4 0 0 0;
r@201 93 #X connect 5 0 8 0;
r@201 94 #X connect 6 0 9 0;
r@201 95 #X connect 7 0 4 1;
r@201 96 #X connect 7 0 3 1;
r@201 97 #X restore -163 424 pd opLevels;
r@201 98 #X msg -154 370 5;
r@201 99 #X obj -160 395 hsl 100 25 0.1 1e+09 1 0 empty empty empty -2 -8 0
r@201 100 10 -262144 -1 -1 0 1;
r@201 101 #X obj -163 324 r GAIN;
r@201 102 #X floatatom -220 425 8 0 0 0 - - -;
r@201 103 #N canvas 146 64 1247 740 cavFreqD1 0;
r@201 104 #X obj 53 -260 s~ \$0-windSpeed;
r@201 105 #X obj 53 -280 vd~ varwind;
r@201 106 #X text 66 -304 Wind Speed;
r@201 107 #X obj 197 -279 inlet;
r@201 108 #X obj 415 -281 inlet;
r@201 109 #X obj 469 -278 inlet;
r@201 110 #X obj 197 -258 s $-thisLen;
r@201 111 #X obj 194 -164 sig~ 1;
r@201 112 #X obj 194 -142 -~ 0.25;
r@201 113 #X obj 239 -76 r~ MY_MACH;
r@201 114 #X obj 224 -97 sig~ 1;
r@201 115 #X obj 239 -51 *~;
r@201 116 #X obj 239 -29 *~ 0.2;
r@201 117 #X obj 224 -6 +~;
r@201 118 #X obj 224 17 sqrt~;
r@201 119 #X obj 209 -119 r~ MY_MACH;
r@201 120 #X obj 209 38 /~;
r@201 121 #X obj 209 60 +~ 1.7544;
r@201 122 #X obj 194 82 /~;
r@201 123 #X obj 114 75 r myMet;
r@201 124 #X obj 114 97 snapshot~;
r@201 125 #X floatatom 114 121 0 0 0 0 - - -;
r@201 126 #X obj 194 124 *~;
r@201 127 #X obj 209 103 r~ \$0-windSpeed;
r@201 128 #X obj 194 164 /~ 1;
r@201 129 #X obj 215 144 r $-thisLen;
r@201 130 #X obj 122 279 r myMet;
r@201 131 #X obj 122 300 snapshot~;
r@201 132 #X floatatom 122 324 0 0 0 0 - - -;
r@201 133 #X obj 297 283 r myMet;
r@201 134 #X obj 297 305 snapshot~;
r@201 135 #X floatatom 297 329 0 0 0 0 - - -;
r@201 136 #X obj 202 279 r myMet;
r@201 137 #X obj 202 301 snapshot~;
r@201 138 #X floatatom 202 325 0 0 0 0 - - -;
r@201 139 #X text 290 -34 (y-1)/2 -> y = 1.4;
r@201 140 #X text 254 -144 alpha = 0.25;
r@201 141 #X text 250 -164 m = 1;
r@201 142 #X text 277 58 (1/k) -> k = 0.57;
r@201 143 #X obj 395 284 r myMet;
r@201 144 #X obj 395 306 snapshot~;
r@201 145 #X floatatom 395 330 0 0 0 0 - - -;
r@201 146 #X obj 288 263 *~ 3.6667;
r@201 147 #X obj 387 265 *~ 5;
r@201 148 #X obj 473 281 r myMet;
r@201 149 #X obj 473 303 snapshot~;
r@201 150 #X floatatom 473 327 0 0 0 0 - - -;
r@201 151 #X obj 563 280 r myMet;
r@201 152 #X obj 563 302 snapshot~;
r@201 153 #X floatatom 563 326 0 0 0 0 - - -;
r@201 154 #X obj 194 260 *~ 2.3333;
r@201 155 #X obj 464 261 *~ 6.3333;
r@201 156 #X obj 553 260 *~ 7.6667;
r@201 157 #X text 130 347 m = 1;
r@201 158 #X text 207 351 m = 2;
r@201 159 #X text 296 351 m = 3;
r@201 160 #X text 399 352 m = 4;
r@201 161 #X text 476 352 m = 5;
r@201 162 #X text 568 349 m = 6;
r@201 163 #X connect 1 0 0 0;
r@201 164 #X connect 3 0 6 0;
r@201 165 #X connect 7 0 8 0;
r@201 166 #X connect 8 0 18 0;
r@201 167 #X connect 9 0 11 0;
r@201 168 #X connect 9 0 11 1;
r@201 169 #X connect 10 0 13 0;
r@201 170 #X connect 11 0 12 0;
r@201 171 #X connect 12 0 13 1;
r@201 172 #X connect 13 0 14 0;
r@201 173 #X connect 14 0 16 1;
r@201 174 #X connect 15 0 16 0;
r@201 175 #X connect 16 0 17 0;
r@201 176 #X connect 17 0 18 1;
r@201 177 #X connect 18 0 20 0;
r@201 178 #X connect 18 0 22 0;
r@201 179 #X connect 19 0 20 0;
r@201 180 #X connect 20 0 21 0;
r@201 181 #X connect 22 0 24 0;
r@201 182 #X connect 23 0 22 1;
r@201 183 #X connect 24 0 27 0;
r@201 184 #X connect 24 0 42 0;
r@201 185 #X connect 24 0 43 0;
r@201 186 #X connect 24 0 50 0;
r@201 187 #X connect 24 0 51 0;
r@201 188 #X connect 24 0 52 0;
r@201 189 #X connect 25 0 24 1;
r@201 190 #X connect 26 0 27 0;
r@201 191 #X connect 27 0 28 0;
r@201 192 #X connect 29 0 30 0;
r@201 193 #X connect 30 0 31 0;
r@201 194 #X connect 32 0 33 0;
r@201 195 #X connect 33 0 34 0;
r@201 196 #X connect 39 0 40 0;
r@201 197 #X connect 40 0 41 0;
r@201 198 #X connect 42 0 30 0;
r@201 199 #X connect 43 0 40 0;
r@201 200 #X connect 44 0 45 0;
r@201 201 #X connect 45 0 46 0;
r@201 202 #X connect 47 0 48 0;
r@201 203 #X connect 48 0 49 0;
r@201 204 #X connect 50 0 33 0;
r@201 205 #X connect 51 0 45 0;
r@201 206 #X connect 52 0 48 0;
r@201 207 #X restore 484 385 pd cavFreqD1;
r@201 208 #X obj 487 165 hsl 100 25 0.001 10 1 0 empty empty empty -2 -8 0 10
r@201 209 -262144 -1 -1 1138 1;
r@201 210 #X floatatom 520 202 0 0 0 0 - - -;
r@201 211 #X obj 521 229 hsl 100 25 0.1 10 1 0 empty empty empty -2 -8 0 10 -262144
r@201 212 -1 -1 0 1;
r@201 213 #X floatatom 554 266 0 0 0 0 - - -;
r@201 214 #X obj 556 293 hsl 100 25 0.1 10 1 0 empty empty empty -2 -8 0 10 -262144
r@201 215 -1 -1 0 1;
r@201 216 #X floatatom 589 330 0 0 0 0 - - -;
r@201 217 #X text 599 168 Length;
r@201 218 #X msg 526 122 3.6576;
r@201 219 #X msg 41 290 510.54;
r@201 220 #X connect 0 0 2 0;
r@201 221 #X connect 1 0 3 0;
r@201 222 #X connect 2 0 1 0;
r@201 223 #X connect 5 0 11 0;
r@201 224 #X connect 5 0 25 0;
r@201 225 #X connect 5 0 26 0;
r@201 226 #X connect 6 0 7 0;
r@201 227 #X connect 7 0 13 0;
r@201 228 #X connect 8 0 9 0;
r@201 229 #X connect 9 0 5 0;
r@201 230 #X connect 12 0 5 0;
r@201 231 #X connect 13 0 14 0;
r@201 232 #X connect 13 0 4 0;
r@201 233 #X connect 13 1 18 0;
r@201 234 #X connect 14 0 15 0;
r@201 235 #X connect 17 0 13 1;
r@201 236 #X connect 18 0 19 0;
r@201 237 #X connect 21 0 6 0;
r@201 238 #X connect 22 0 5 0;
r@201 239 #X connect 23 0 18 0;
r@201 240 #X connect 24 0 14 0;
r@201 241 #X connect 25 0 6 1;
r@201 242 #X connect 26 0 7 1;
r@201 243 #X connect 31 0 33 0;
r@201 244 #X connect 32 0 28 0;
r@201 245 #X connect 32 1 29 0;
r@201 246 #X connect 33 0 34 0;
r@201 247 #X connect 34 0 32 0;
r@201 248 #X connect 34 0 36 0;
r@201 249 #X connect 35 0 34 0;
r@201 250 #X connect 38 0 39 0;
r@201 251 #X connect 38 0 37 0;
r@201 252 #X connect 40 0 41 0;
r@201 253 #X connect 40 0 37 1;
r@201 254 #X connect 42 0 43 0;
r@201 255 #X connect 42 0 37 2;
r@201 256 #X connect 45 0 38 0;
r@201 257 #X connect 46 0 27 0;