Mercurial > hg > weather-synthesis-prototyping

annotate scene demo/testTone/newStrou1.pd @ 306:c57f401165ca tip

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
New Decision tree added
author Rod Selfridge <r.selfridge@qmul.ac.uk>
date Sat, 13 Jan 2018 14:47:35 +0000
parents 1f4eebd51e51
children
rev   line source
r@152 1 #N canvas 74 48 718 433 10;
r@152 2 #X obj 203 48 inlet~;
r@152 3 #X obj 273 202 outlet~;
r@152 4 #X text 101 20 Reynolds number coming in;
r@152 5 #X text 211 238 Strouhal Number going out;
r@152 6 #N canvas 385 322 1026 531 eqnSelect 1;
r@152 7 #X msg 41 221 0.2684 -1.0356;
r@152 8 #X msg 148 221 0.2437 -0.8607;
r@152 9 #X msg 256 223 0.4291 -3.6735;
r@152 10 #X msg 365 223 0.3274 -2.0569;
r@152 11 #X msg 472 223 0.2257 -0.4402;
r@152 12 #X msg 577 222 0.204 0.3364;
r@152 13 #X msg 686 224 0.1776 2.2023;
r@152 14 #X obj 365 299 unpack;
r@152 15 #X obj 75 164 < 180;
r@152 16 #X obj 181 144 > 180;
r@152 17 #X obj 227 146 < 230;
r@152 18 #X obj 289 149 > 230;
r@152 19 #X obj 335 148 < 240;
r@152 20 #X obj 398 148 > 240;
r@152 21 #X obj 444 149 < 360;
r@152 22 #X obj 505 147 > 360;
r@152 23 #X obj 551 147 < 1300;
r@152 24 #X obj 611 150 > 1300;
r@152 25 #X obj 657 150 < 5000;
r@152 26 #X obj 719 149 > 5000;
r@152 27 #X obj 765 148 < 200000;
r@152 28 #X obj 827 149 > 200000;
r@152 29 #X obj 41 196 spigot;
r@152 30 #X floatatom 286 327 8 0 0 0 - - -;
r@152 31 #X floatatom 455 330 8 0 0 0 - - -;
r@152 32 #X obj 148 198 spigot;
r@152 33 #X obj 194 171 spigot;
r@152 34 #X obj 256 200 spigot;
r@152 35 #X obj 302 173 spigot;
r@152 36 #X obj 365 200 spigot;
r@152 37 #X obj 411 173 spigot;
r@152 38 #X floatatom 546 83 8 0 0 0 - - -;
r@152 39 #X obj 472 198 spigot;
r@152 40 #X obj 518 171 spigot;
r@152 41 #X obj 578 200 spigot;
r@152 42 #X obj 624 173 spigot;
r@152 43 #X obj 686 199 spigot;
r@152 44 #X obj 732 172 spigot;
r@152 45 #X obj 426 67 snapshot~;
r@152 46 #X obj 426 37 inlet~;
r@152 47 #X obj 365 373 outlet~;
r@152 48 #X obj 398 352 outlet~;
r@152 49 #X obj 365 327 sig~;
r@152 50 #X obj 398 327 sig~;
r@152 51 #X text 539 419 This selects the values for the St* and m coefficients
r@152 52 for Fey's formula;
r@152 53 #X text 372 240 Averaged;
r@152 54 #X obj 794 201 spigot;
r@152 55 #X obj 840 174 spigot;
r@152 56 #X obj 885 149 < 1e+06;
r@152 57 #X text 784 251 Critical - Derived by author;
r@152 58 #X msg 794 226 0.5839 -183.885;
r@152 59 #X obj 376 36 r myMet;
r@152 60 #X text 254 359 St* (lambda) coefficient;
r@152 61 #X text 462 361 m (tau) coefficient;
r@152 62 #X connect 0 0 7 0;
r@152 63 #X connect 1 0 7 0;
r@152 64 #X connect 2 0 7 0;
r@152 65 #X connect 3 0 7 0;
r@152 66 #X connect 4 0 7 0;
r@152 67 #X connect 5 0 7 0;
r@152 68 #X connect 6 0 7 0;
r@152 69 #X connect 7 0 23 0;
r@152 70 #X connect 7 0 42 0;
r@152 71 #X connect 7 1 24 0;
r@152 72 #X connect 7 1 43 0;
r@152 73 #X connect 8 0 22 1;
r@152 74 #X connect 8 0 22 0;
r@152 75 #X connect 9 0 25 1;
r@152 76 #X connect 9 0 26 0;
r@152 77 #X connect 10 0 26 1;
r@152 78 #X connect 11 0 28 0;
r@152 79 #X connect 11 0 27 1;
r@152 80 #X connect 12 0 28 1;
r@152 81 #X connect 13 0 29 1;
r@152 82 #X connect 13 0 30 0;
r@152 83 #X connect 14 0 30 1;
r@152 84 #X connect 15 0 32 1;
r@152 85 #X connect 15 0 33 0;
r@152 86 #X connect 16 0 33 1;
r@152 87 #X connect 17 0 34 1;
r@152 88 #X connect 17 0 35 0;
r@152 89 #X connect 18 0 35 1;
r@152 90 #X connect 19 0 36 1;
r@152 91 #X connect 19 0 37 0;
r@152 92 #X connect 20 0 37 1;
r@152 93 #X connect 21 0 47 0;
r@152 94 #X connect 21 0 46 1;
r@152 95 #X connect 22 0 0 0;
r@152 96 #X connect 25 0 1 0;
r@152 97 #X connect 26 0 25 0;
r@152 98 #X connect 27 0 2 0;
r@152 99 #X connect 28 0 27 0;
r@152 100 #X connect 29 0 3 0;
r@152 101 #X connect 30 0 29 0;
r@152 102 #X connect 32 0 4 0;
r@152 103 #X connect 33 0 32 0;
r@152 104 #X connect 34 0 5 0;
r@152 105 #X connect 35 0 34 0;
r@152 106 #X connect 36 0 6 0;
r@152 107 #X connect 37 0 36 0;
r@152 108 #X connect 38 0 8 0;
r@152 109 #X connect 38 0 9 0;
r@152 110 #X connect 38 0 10 0;
r@152 111 #X connect 38 0 11 0;
r@152 112 #X connect 38 0 12 0;
r@152 113 #X connect 38 0 13 0;
r@152 114 #X connect 38 0 14 0;
r@152 115 #X connect 38 0 31 0;
r@152 116 #X connect 38 0 15 0;
r@152 117 #X connect 38 0 16 0;
r@152 118 #X connect 38 0 17 0;
r@152 119 #X connect 38 0 18 0;
r@152 120 #X connect 38 0 19 0;
r@152 121 #X connect 38 0 20 0;
r@152 122 #X connect 38 0 21 0;
r@152 123 #X connect 38 0 48 0;
r@152 124 #X connect 39 0 38 0;
r@152 125 #X connect 42 0 40 0;
r@152 126 #X connect 43 0 41 0;
r@152 127 #X connect 46 0 50 0;
r@152 128 #X connect 47 0 46 0;
r@152 129 #X connect 48 0 47 1;
r@152 130 #X connect 50 0 7 0;
r@152 131 #X connect 51 0 38 0;
r@152 132 #X restore 273 83 pd eqnSelect;
r@152 133 #X obj 203 85 sqrt~;
r@152 134 #X obj 342 119 /~;
r@152 135 #X text 135 97 sqrt(Re);
r@152 136 #X text 250 114 St*;
r@152 137 #X text 359 101 m;
r@152 138 #X text 376 152 St = St* + m / sqrt(Re);
r@152 139 #X obj 273 166 +~;
r@152 140 #X connect 0 0 4 0;
r@152 141 #X connect 0 0 5 0;
r@152 142 #X connect 4 0 11 0;
r@152 143 #X connect 4 1 6 0;
r@152 144 #X connect 5 0 6 1;
r@152 145 #X connect 6 0 11 1;
r@152 146 #X connect 11 0 1 0;