Mercurial > hg > weather-synthesis-prototyping

annotate SwordSounds/thisAngle.pd @ 102:c64c81777e76

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
Brain melt over calculating the angle between source and observer. Looked at source having own axis with lift and drag normal to the axis of the sword.
author Rod Selfridge <r.selfridge@qmul.ac.uk>
date Sat, 25 Jul 2015 16:49:35 +0100
parents 7f67b04e6c5d
children 11f39050c282
rev   line source
r@102 1 #N canvas 282 232 1158 672 10;
r@101 2 #X obj -19 -52 inlet~;
r@101 3 #X obj 58 -52 inlet~;
r@101 4 #X obj 134 -53 inlet~;
r@101 5 #X obj -19 -31 s~ \$0_Ydiff;
r@101 6 #X obj 58 -31 s~ \$0_Xdiff;
r@101 7 #X obj 134 -32 s~ \$0_Zdiff;
r@102 8 #X obj -73 60 r Yobs;
r@102 9 #X obj -73 83 sig~;
r@102 10 #X obj -73 124 -~;
r@102 11 #X obj -58 103 r~ \$0_Ydiff;
r@102 12 #X obj -172 71 loadbang;
r@102 13 #X obj -172 92 tgl 15 0 empty empty empty 17 7 0 10 -262144 -1 -1 1
r@101 14 1;
r@102 15 #X obj -172 110 metro 10;
r@102 16 #X obj -172 132 snapshot~;
r@102 17 #X floatatom -172 152 5 0 0 0 - - -;
r@101 18 #X obj -130 -58 bng 50 250 50 0 empty empty empty 17 7 0 10 -4034 -1
r@101 19 -1;
r@101 20 #X obj -130 -5 s GO;
r@101 21 #X obj -190 -58 bng 50 250 50 0 empty empty empty 17 7 0 10 -257985
r@101 22 -1 -1;
r@101 23 #X obj -190 -5 s setUp;
r@102 24 #X obj -72 360 atan~;
r@102 25 #X obj -72 338 /~;
r@102 26 #X obj -160 423 loadbang;
r@102 27 #X obj -160 444 tgl 15 0 empty empty empty 17 7 0 10 -262144 -1 -1
r@102 28 1 1;
r@102 29 #X obj -160 462 metro 10;
r@102 30 #X obj -160 484 snapshot~;
r@102 31 #X floatatom -160 504 5 0 0 0 - - -;
r@102 32 #X obj -72 383 /~ 6.28319;
r@102 33 #X obj -72 405 *~ 360;
r@102 34 #X obj -72 472 s~ \$0_srcObsElev;
r@102 35 #X text -115 510 Elevation angle between source and observer;
r@102 36 #X text -39 121 Length between observer and source on the Y plane;
r@102 37 #X obj 213 -54 inlet~;
r@102 38 #X obj 213 -33 s~ \$0_scrObsDist;
r@102 39 #X obj 318 -54 inlet~;
r@102 40 #X obj 318 -33 s~ \$0_scrObsXZDist;
r@102 41 #X obj 74 5 loadbang;
r@102 42 #X obj 74 26 tgl 15 0 empty empty empty 17 7 0 10 -262144 -1 -1 1 1
r@102 43 ;
r@102 44 #X obj 74 44 metro 10;
r@102 45 #X obj 74 66 snapshot~;
r@102 46 #X floatatom 74 86 5 0 0 0 - - -;
r@102 47 #X obj 139 5 loadbang;
r@102 48 #X obj 139 26 tgl 15 0 empty empty empty 17 7 0 10 -262144 -1 -1 1
r@102 49 1;
r@102 50 #X obj 139 44 metro 10;
r@102 51 #X obj 139 66 snapshot~;
r@102 52 #X floatatom 139 86 5 0 0 0 - - -;
r@102 53 #X obj 205 6 loadbang;
r@102 54 #X obj 205 27 tgl 15 0 empty empty empty 17 7 0 10 -262144 -1 -1 1
r@102 55 1;
r@102 56 #X obj 205 45 metro 10;
r@102 57 #X obj 205 67 snapshot~;
r@102 58 #X floatatom 205 87 5 0 0 0 - - -;
r@102 59 #X obj 342 63 r~ \$0_Xdiff;
r@102 60 #X obj 357 107 r~ \$0_Zdiff;
r@102 61 #X obj 357 131 *~;
r@102 62 #X obj 342 87 *~;
r@102 63 #X obj 342 156 +~;
r@102 64 #X obj 495 134 r~ \$0_scrObsXZDist;
r@102 65 #X obj 495 160 *~;
r@102 66 #X obj 526 208 *~;
r@102 67 #X obj 342 202 *~ 2;
r@102 68 #X obj 342 179 sqrt~;
r@102 69 #X obj 480 319 -~;
r@102 70 #X obj 480 185 +~;
r@102 71 #X obj 480 348 /~;
r@102 72 #X obj 357 223 r~ \$0_scrObsXZDist;
r@102 73 #X obj 342 248 *~;
r@102 74 #X obj 480 369 arccos~;
r@102 75 #X obj 350 328 loadbang;
r@102 76 #X obj 350 349 tgl 15 0 empty empty empty 17 7 0 10 -262144 -1 -1 1
r@102 77 1;
r@102 78 #X obj 350 367 metro 10;
r@102 79 #X obj 350 389 snapshot~;
r@102 80 #X floatatom 350 409 8 0 0 0 - - -;
r@102 81 #X obj 541 275 *~;
r@102 82 #X obj 526 298 +~;
r@102 83 #X obj 526 185 sig~;
r@102 84 #X obj 526 165 r Zobs;
r@102 85 #X obj 541 229 r Xobs;
r@102 86 #X obj 541 250 sig~;
r@102 87 #X text 357 499 Azimuth angle between source and observer;
r@102 88 #X obj 480 453 s~ \$0_srcObsAzim;
r@102 89 #X obj 659 134 r~ \$0_srcObsAzim;
r@102 90 #X obj 659 158 /~ 360;
r@102 91 #X obj 659 182 cos~;
r@102 92 #X obj 674 227 /~ 360;
r@102 93 #X obj 674 251 cos~;
r@102 94 #X obj 659 275 *~;
r@102 95 #X obj 659 297 arccos~;
r@102 96 #X obj 753 262 loadbang;
r@102 97 #X obj 753 283 tgl 15 0 empty empty empty 17 7 0 10 -262144 -1 -1 1
r@102 98 1;
r@102 99 #X obj 753 301 metro 10;
r@102 100 #X obj 753 323 snapshot~;
r@102 101 #X floatatom 753 343 8 0 0 0 - - -;
r@102 102 #X obj 674 203 r~ \$0_srcObsElev;
r@102 103 #X obj -23 255 r~ \$0_Xdiff;
r@102 104 #X obj 470 -12 loadbang;
r@102 105 #X obj 470 9 tgl 15 0 empty empty empty 17 7 0 10 -262144 -1 -1 1 1
r@102 106 ;
r@102 107 #X obj 470 27 metro 10;
r@102 108 #X obj 470 49 snapshot~;
r@102 109 #X floatatom 470 71 5 0 0 0 - - -;
r@102 110 #X obj 565 -9 loadbang;
r@102 111 #X obj 565 12 tgl 15 0 empty empty empty 17 7 0 10 -262144 -1 -1 1
r@102 112 1;
r@102 113 #X obj 565 30 metro 10;
r@102 114 #X obj 565 52 snapshot~;
r@102 115 #X floatatom 565 72 5 0 0 0 - - -;
r@102 116 #X obj -120 385 sig~ 90;
r@102 117 #X obj -74 440 -~;
r@101 118 #X connect 0 0 3 0;
r@102 119 #X connect 0 0 38 0;
r@101 120 #X connect 1 0 4 0;
r@102 121 #X connect 1 0 43 0;
r@101 122 #X connect 2 0 5 0;
r@102 123 #X connect 2 0 48 0;
r@101 124 #X connect 6 0 7 0;
r@101 125 #X connect 7 0 8 0;
r@101 126 #X connect 8 0 13 0;
r@102 127 #X connect 8 0 20 0;
r@101 128 #X connect 9 0 8 1;
r@101 129 #X connect 10 0 11 0;
r@101 130 #X connect 11 0 12 0;
r@101 131 #X connect 12 0 13 0;
r@101 132 #X connect 13 0 14 0;
r@101 133 #X connect 15 0 16 0;
r@101 134 #X connect 17 0 18 0;
r@102 135 #X connect 19 0 26 0;
r@102 136 #X connect 20 0 19 0;
r@102 137 #X connect 21 0 22 0;
r@102 138 #X connect 22 0 23 0;
r@102 139 #X connect 23 0 24 0;
r@102 140 #X connect 24 0 25 0;
r@102 141 #X connect 26 0 27 0;
r@102 142 #X connect 27 0 104 1;
r@102 143 #X connect 31 0 32 0;
r@102 144 #X connect 31 0 96 0;
r@102 145 #X connect 33 0 34 0;
r@102 146 #X connect 33 0 101 0;
r@102 147 #X connect 35 0 36 0;
r@102 148 #X connect 36 0 37 0;
r@102 149 #X connect 37 0 38 0;
r@102 150 #X connect 38 0 39 0;
r@102 151 #X connect 40 0 41 0;
r@102 152 #X connect 41 0 42 0;
r@102 153 #X connect 42 0 43 0;
r@102 154 #X connect 43 0 44 0;
r@102 155 #X connect 45 0 46 0;
r@102 156 #X connect 46 0 47 0;
r@102 157 #X connect 47 0 48 0;
r@102 158 #X connect 48 0 49 0;
r@102 159 #X connect 50 0 53 0;
r@102 160 #X connect 50 0 53 1;
r@102 161 #X connect 51 0 52 1;
r@102 162 #X connect 51 0 52 0;
r@102 163 #X connect 52 0 54 1;
r@102 164 #X connect 53 0 54 0;
r@102 165 #X connect 54 0 59 0;
r@102 166 #X connect 54 0 61 0;
r@102 167 #X connect 55 0 56 0;
r@102 168 #X connect 55 0 56 1;
r@102 169 #X connect 56 0 61 1;
r@102 170 #X connect 57 0 72 0;
r@102 171 #X connect 58 0 64 0;
r@102 172 #X connect 59 0 58 0;
r@102 173 #X connect 60 0 62 0;
r@102 174 #X connect 61 0 60 0;
r@102 175 #X connect 62 0 65 0;
r@102 176 #X connect 63 0 64 1;
r@102 177 #X connect 64 0 62 1;
r@102 178 #X connect 65 0 69 0;
r@102 179 #X connect 65 0 78 0;
r@102 180 #X connect 66 0 67 0;
r@102 181 #X connect 67 0 68 0;
r@102 182 #X connect 68 0 69 0;
r@102 183 #X connect 69 0 70 0;
r@102 184 #X connect 71 0 72 1;
r@102 185 #X connect 72 0 60 1;
r@102 186 #X connect 73 0 57 0;
r@102 187 #X connect 73 0 57 1;
r@102 188 #X connect 74 0 73 0;
r@102 189 #X connect 75 0 76 0;
r@102 190 #X connect 76 0 71 0;
r@102 191 #X connect 76 0 71 1;
r@102 192 #X connect 79 0 80 0;
r@102 193 #X connect 80 0 81 0;
r@102 194 #X connect 81 0 84 0;
r@102 195 #X connect 82 0 83 0;
r@102 196 #X connect 83 0 84 1;
r@102 197 #X connect 84 0 85 0;
r@102 198 #X connect 85 0 89 0;
r@102 199 #X connect 86 0 87 0;
r@102 200 #X connect 87 0 88 0;
r@102 201 #X connect 88 0 89 0;
r@102 202 #X connect 89 0 90 0;
r@102 203 #X connect 91 0 82 0;
r@102 204 #X connect 92 0 20 1;
r@102 205 #X connect 93 0 94 0;
r@102 206 #X connect 94 0 95 0;
r@102 207 #X connect 95 0 96 0;
r@102 208 #X connect 96 0 97 0;
r@102 209 #X connect 98 0 99 0;
r@102 210 #X connect 99 0 100 0;
r@102 211 #X connect 100 0 101 0;
r@102 212 #X connect 101 0 102 0;
r@102 213 #X connect 103 0 104 0;
r@102 214 #X connect 104 0 28 0;
r@102 215 #X connect 104 0 24 0;