Mercurial > hg > weather-synthesis-prototyping

annotate June/wirePosition.pd @ 75:c0c0d99d1e2e

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
3D source added / edited Comments put on most patches but needs more work Intensity of high reynolds numbers sounds increased to proportional to speed ^ 8 as per paper by Etkin 1957.
author Rod Selfridge <r.selfridge@qmul.ac.uk>
date Tue, 23 Jun 2015 15:02:20 +0100
parents
children 93856d889505
rev   line source
r@75 1 #N canvas 573 45 889 625 10;
r@75 2 #X obj 200 -47 -;
r@75 3 #X obj 200 -20 *;
r@75 4 #X obj 215 52 *;
r@75 5 #X obj 200 107 sqrt;
r@75 6 #X floatatom 260 140 5 0 0 0 - - -;
r@75 7 #X obj 200 140 outlet;
r@75 8 #X obj 200 -98 r Xpos;
r@75 9 #X obj -135 119 outlet;
r@75 10 #X obj 500 3 inlet;
r@75 11 #X obj 215 -75 inlet;
r@75 12 #X obj 200 83 +;
r@75 13 #X obj 558 4 inlet;
r@75 14 #X obj 485 58 +;
r@75 15 #X obj 558 25 * -1;
r@75 16 #X obj 558 62 +;
r@75 17 #X obj 543 124 <;
r@75 18 #X obj 470 120 >;
r@75 19 #X obj 510 154 spigot;
r@75 20 #X obj 437 153 spigot;
r@75 21 #X floatatom 471 212 5 0 0 0 - - -;
r@75 22 #X obj 510 182 f;
r@75 23 #X floatatom 608 82 5 0 0 0 - - -;
r@75 24 #X floatatom 390 83 5 0 0 0 - - -;
r@75 25 #X obj 436 76 r Zpos;
r@75 26 #X obj 509 77 r Zpos;
r@75 27 #X obj 543 97 r Zpos;
r@75 28 #X obj 470 98 r Zpos;
r@75 29 #X obj 437 127 -;
r@75 30 #X obj 510 126 -;
r@75 31 #X obj 595 25 t b;
r@75 32 #X msg 595 152 0;
r@75 33 #X obj 271 -74 inlet;
r@75 34 #X obj 256 -51 -;
r@75 35 #X obj 256 -23 *;
r@75 36 #X text 305 6 Height Calc;
r@75 37 #X floatatom 271 2 5 0 0 0 - - -;
r@75 38 #X obj 200 7 +;
r@75 39 #X text 423 243 Calculates if the ball is between;
r@75 40 #X text 424 255 the end of the fence and then the;
r@75 41 #X text 423 267 distance in the z direction;
r@75 42 #X obj 444 27 s \$0_myZp;
r@75 43 #X obj 256 -96 r Ypos;
r@75 44 #X obj 510 209 s \$0_zRel;
r@75 45 #X obj -136 -74 r \$0_zRel;
r@75 46 #X obj -135 38 atan;
r@75 47 #X obj -135 16 /;
r@75 48 #X floatatom -170 119 5 0 0 0 - - -;
r@75 49 #X obj -135 62 * 360;
r@75 50 #X obj -135 86 / 6.28319;
r@75 51 #X obj 166 383 outlet;
r@75 52 #X obj 166 302 atan;
r@75 53 #X obj 166 280 /;
r@75 54 #X floatatom 131 383 5 0 0 0 - - -;
r@75 55 #X obj 166 326 * 360;
r@75 56 #X obj 166 350 / 6.28319;
r@75 57 #X obj 139 -23 s \$0_xRel;
r@75 58 #X obj 181 255 r \$0_xRel;
r@75 59 #X obj 302 -19 s \$0_yRel;
r@75 60 #X obj 166 232 r \$0_yRel;
r@75 61 #X obj 215 29 r \$0_zRel;
r@75 62 #X obj -120 -53 r \$0_xRel;
r@75 63 #X text 131 -137 Calculates the distance between;
r@75 64 #X text 149 -124 the wire and the ball;
r@75 65 #X text -139 -95 Calculates the azimuth;
r@75 66 #X text 120 209 Calculates the elevation;
r@75 67 #X obj -110 255 r \$0_xRel;
r@75 68 #X obj -74 281 > 0;
r@75 69 #X obj -110 281 <= 0;
r@75 70 #X obj -78 310 spigot;
r@75 71 #X obj -144 314 spigot;
r@75 72 #X obj -83 120 abs;
r@75 73 #X obj -83 143 / 90;
r@75 74 #X obj -83 167 swap 1;
r@75 75 #X obj -83 193 -;
r@75 76 #X obj -83 217 / 2;
r@75 77 #X obj -155 259 + 0.5;
r@75 78 #X obj -42 255 - 0.5;
r@75 79 #X obj -42 277 * -1;
r@75 80 #X obj -101 352 outlet;
r@75 81 #X text -2 312 Calculates the pan value;
r@75 82 #X obj -120 -30 t f b;
r@75 83 #X obj -93 -4 delay 9;
r@75 84 #X connect 0 0 1 0;
r@75 85 #X connect 0 0 1 1;
r@75 86 #X connect 0 0 55 0;
r@75 87 #X connect 1 0 36 0;
r@75 88 #X connect 2 0 10 1;
r@75 89 #X connect 3 0 4 0;
r@75 90 #X connect 3 0 5 0;
r@75 91 #X connect 6 0 0 0;
r@75 92 #X connect 8 0 12 1;
r@75 93 #X connect 8 0 14 1;
r@75 94 #X connect 8 0 40 0;
r@75 95 #X connect 9 0 0 1;
r@75 96 #X connect 10 0 3 0;
r@75 97 #X connect 11 0 12 0;
r@75 98 #X connect 11 0 13 0;
r@75 99 #X connect 11 0 29 0;
r@75 100 #X connect 12 0 16 1;
r@75 101 #X connect 12 0 22 0;
r@75 102 #X connect 12 0 27 1;
r@75 103 #X connect 13 0 14 0;
r@75 104 #X connect 14 0 15 1;
r@75 105 #X connect 14 0 21 0;
r@75 106 #X connect 14 0 28 1;
r@75 107 #X connect 15 0 17 1;
r@75 108 #X connect 16 0 18 1;
r@75 109 #X connect 17 0 20 0;
r@75 110 #X connect 18 0 20 0;
r@75 111 #X connect 20 0 19 0;
r@75 112 #X connect 20 0 42 0;
r@75 113 #X connect 23 0 27 0;
r@75 114 #X connect 24 0 28 0;
r@75 115 #X connect 25 0 15 0;
r@75 116 #X connect 26 0 16 0;
r@75 117 #X connect 27 0 18 0;
r@75 118 #X connect 28 0 17 0;
r@75 119 #X connect 29 0 30 0;
r@75 120 #X connect 30 0 20 0;
r@75 121 #X connect 31 0 32 1;
r@75 122 #X connect 32 0 33 0;
r@75 123 #X connect 32 0 33 1;
r@75 124 #X connect 32 0 57 0;
r@75 125 #X connect 33 0 35 0;
r@75 126 #X connect 33 0 36 1;
r@75 127 #X connect 36 0 10 0;
r@75 128 #X connect 41 0 32 0;
r@75 129 #X connect 43 0 45 0;
r@75 130 #X connect 44 0 47 0;
r@75 131 #X connect 45 0 44 0;
r@75 132 #X connect 47 0 48 0;
r@75 133 #X connect 48 0 46 0;
r@75 134 #X connect 48 0 7 0;
r@75 135 #X connect 48 0 70 0;
r@75 136 #X connect 50 0 53 0;
r@75 137 #X connect 51 0 50 0;
r@75 138 #X connect 53 0 54 0;
r@75 139 #X connect 54 0 52 0;
r@75 140 #X connect 54 0 49 0;
r@75 141 #X connect 56 0 51 1;
r@75 142 #X connect 58 0 51 0;
r@75 143 #X connect 59 0 2 0;
r@75 144 #X connect 59 0 2 1;
r@75 145 #X connect 60 0 80 0;
r@75 146 #X connect 65 0 67 0;
r@75 147 #X connect 65 0 66 0;
r@75 148 #X connect 66 0 68 1;
r@75 149 #X connect 67 0 69 1;
r@75 150 #X connect 68 0 78 0;
r@75 151 #X connect 69 0 78 0;
r@75 152 #X connect 70 0 71 0;
r@75 153 #X connect 71 0 72 0;
r@75 154 #X connect 72 0 73 0;
r@75 155 #X connect 72 1 73 1;
r@75 156 #X connect 73 0 74 0;
r@75 157 #X connect 74 0 75 0;
r@75 158 #X connect 74 0 76 0;
r@75 159 #X connect 75 0 69 0;
r@75 160 #X connect 76 0 77 0;
r@75 161 #X connect 77 0 68 0;
r@75 162 #X connect 80 0 45 1;
r@75 163 #X connect 80 1 81 0;
r@75 164 #X connect 81 0 45 0;